Index: /ccr/branches/ohum/kids/C0C_0120.KID-DONT-USE
===================================================================
--- /ccr/branches/ohum/kids/C0C_0120.KID-DONT-USE	(revision 1425)
+++ /ccr/branches/ohum/kids/C0C_0120.KID-DONT-USE	(revision 1425)
@@ -0,0 +1,126558 @@
+KIDS Distribution saved on May 10, 2012@17:23:39
+C0C 1.2, try 2
+**KIDS**:C0C 1.2^
+
+**INSTALL NAME**
+C0C 1.2
+"BLD",7888,0)
+C0C 1.2^CCD/CCR GENERATION UTILITIES^0^3120510^n
+"BLD",7888,1,0)
+^^185^185^3120510^^^^
+"BLD",7888,1,1,0)
+CCR Project release v1.2
+"BLD",7888,1,2,0)
+ 
+"BLD",7888,1,3,0)
+The purpose of the CCR package is to provide support for exporting and 
+"BLD",7888,1,4,0)
+eventually importing patient information from/to VistA in XML documents 
+"BLD",7888,1,5,0)
+conforming to the Continuity of Care Record (CCR - ASTM) and Continuity 
+"BLD",7888,1,6,0)
+of Care Document (CCD - HL7) standards.
+"BLD",7888,1,7,0)
+ 
+"BLD",7888,1,8,0)
+This version of the CCR package provides:
+"BLD",7888,1,9,0)
+ 
+"BLD",7888,1,10,0)
+EXPORT^C0CCCR
+"BLD",7888,1,11,0)
+A command line interface to export a single patient's CCR to a host 
+"BLD",7888,1,12,0)
+directory by specifying the patient by name.
+"BLD",7888,1,13,0)
+ 
+"BLD",7888,1,14,0)
+EXPORT^C0CCCD
+"BLD",7888,1,15,0)
+A command line interface to export a single patient's CCD to a host 
+"BLD",7888,1,16,0)
+directory by specifying the patient by name. As an alternative to 
+"BLD",7888,1,17,0)
+generating the CCD directly, an XSLT transformation is available to 
+"BLD",7888,1,18,0)
+translate a CCR into a level 2 CCD. This tranformation has been tested 
+"BLD",7888,1,19,0)
+and produces a CCD with all currently supported sections of the CCR. The 
+"BLD",7888,1,20,0)
+EXPORT^C0CCCD only extracts the PROBLEMS section into a CCD.
+"BLD",7888,1,21,0)
+ 
+"BLD",7888,1,22,0)
+XPAT^C0CCCR(DFN,OUTDIR,OUTFILE)
+"BLD",7888,1,23,0)
+A command line and program interface to export a single patient's CCR 
+"BLD",7888,1,24,0)
+using the IEN of the patient in the ^DPT file (DFN).
+"BLD",7888,1,25,0)
+OUTDIR specifies an existing directory on the Host system into which the 
+"BLD",7888,1,26,0)
+CCR XML document will be written. If OUTDIR is null (""), the output 
+"BLD",7888,1,27,0)
+directory name will be taken from ^TMP("C0CCCR","ODIR").
+"BLD",7888,1,28,0)
+OUFILE specifies the host file name of the CCR XML document that will be 
+"BLD",7888,1,29,0)
+written for this patient. If OUTFILE is null ("") the document name will 
+"BLD",7888,1,30,0)
+default to PAT_x_CCR_V1.xml where x is the DFN of the patient.
+"BLD",7888,1,31,0)
+ 
+"BLD",7888,1,32,0)
+CCRRPC(CCRGRTN,DFN,CCRPARMS,CCRPART)
+"BLD",7888,1,33,0)
+An RPC and program interface to return in return array CCRGRTN (passed by 
+"BLD",7888,1,34,0)
+reference) a single patient's CCR.
+"BLD",7888,1,35,0)
+DFN is the patient's IEN
+"BLD",7888,1,36,0)
+CCRPART is what portion of the CCR should be returned. If "CCR" is 
+"BLD",7888,1,37,0)
+specified, the entire CCR will be returned. If "PROBLEMS", "VITALS", or 
+"BLD",7888,1,38,0)
+"MEDICATIONS" is specified, only that section of the CCR will be returned.
+"BLD",7888,1,39,0)
+CCRPARMS ARE PARAMETERS THAT AFFECT THE EXTRACTION
+"BLD",7888,1,40,0)
+IN THE FORM "PARM1:VALUE1^PARM2:VALUE2"
+"BLD",7888,1,41,0)
+EXAMPLE: "LABLIMIT:T-60" TO LIMIT LAB EXTRACTION TO THE LAST 60 DAYS
+"BLD",7888,1,42,0)
+SEE C0CPARMS FOR A COMPLETE LIST OF SUPPORTED PARAMETERS
+"BLD",7888,1,43,0)
+ 
+"BLD",7888,1,44,0)
+ANALYZE^C0CRIMA(BGNDFN,DFNCNT,CCRPARMS)
+"BLD",7888,1,45,0)
+A command line and program interface to analyze the data from multiple 
+"BLD",7888,1,46,0)
+patients into categories that can be batch extracted.
+"BLD",7888,1,47,0)
+BGNDFN is the beginning DFN to be analyzed. If BGNDFN is null ("") its 
+"BLD",7888,1,48,0)
+value will be taken from ^TMP("C0CRIM","RESUME"). If this variable does 
+"BLD",7888,1,49,0)
+not exist, the routine will start with the first IEN in the patient file 
+"BLD",7888,1,50,0)
+^DPT. ^TMP("C0CRIM","RESUME") is updated to the "next" patient to be 
+"BLD",7888,1,51,0)
+analyzed on successful completion.
+"BLD",7888,1,52,0)
+DFNCNT is the count of how many patient records will be analyzed in this 
+"BLD",7888,1,53,0)
+execution.
+"BLD",7888,1,54,0)
+For example ANALYZE^C0CRIMA(1000,1000) would start at patient DFN 1000 
+"BLD",7888,1,55,0)
+and analyzes 1000 patient records. ANALYZE^C0CRIMA("",1000) would then 
+"BLD",7888,1,56,0)
+analyze the next 1000 patients. When the end of the patient file is 
+"BLD",7888,1,57,0)
+reached, the routine terminates with a message that RESET^C0CRIMA would 
+"BLD",7888,1,58,0)
+need to be called to restart the analysis.
+"BLD",7888,1,59,0)
+ 
+"BLD",7888,1,60,0)
+The categories into which the records are analyzed consist of attribute 
+"BLD",7888,1,61,0)
+strings. The attributes represent characteristics of the variables that 
+"BLD",7888,1,62,0)
+can be extracted for a given patient into the CCR or the CCD. This 
+"BLD",7888,1,63,0)
+version supports the following attributes:
+"BLD",7888,1,64,0)
+VITALS : the patient has variables for the VITALS section of the CCR/CCD
+"BLD",7888,1,65,0)
+PROBLEMS : the patient has variables for the PROBLEMS section of the 
+"BLD",7888,1,66,0)
+CCR/CCD
+"BLD",7888,1,67,0)
+MEDS : the patient has variables for the MEDICATIONS section of the 
+"BLD",7888,1,68,0)
+CCR/CCD
+"BLD",7888,1,69,0)
+HEADER : the patient has variables for the HEADER section of the CCR/CCD. 
+"BLD",7888,1,70,0)
+All patients are marked with the HEADER attribute in this version.
+"BLD",7888,1,71,0)
+NOTEXTRACTED : the CCR or CCD has not yet been produced/extracted for 
+"BLD",7888,1,72,0)
+this patient. All patient records are marked with the NOTEXTRACTED 
+"BLD",7888,1,73,0)
+attribute in this version for batch control processing (not implemented 
+"BLD",7888,1,74,0)
+in this version).
+"BLD",7888,1,75,0)
+ 
+"BLD",7888,1,76,0)
+ANAZYZE^C0CRIMA calls the variable extraction routines that would be used 
+"BLD",7888,1,77,0)
+to produce a CCR or a CCD and saves the results to ^TMP("C0CRIM",DFN) for 
+"BLD",7888,1,78,0)
+each patient. In addition, the attribute string for each patient is saved 
+"BLD",7888,1,79,0)
+in ^TMP("C0CRIM","ATTR")
+"BLD",7888,1,80,0)
+ 
+"BLD",7888,1,81,0)
+Categories are created as they first occur based on each unique 
+"BLD",7888,1,82,0)
+combination of attributes that is encountered. They are named after the 
+"BLD",7888,1,83,0)
+attribute table that is used for the analysis. This version supports only 
+"BLD",7888,1,84,0)
+the attribute table .RIMTBL. and the categories are named "RIMTBL_x". An 
+"BLD",7888,1,85,0)
+example set of categories from a demo systems is:
+"BLD",7888,1,86,0)
+ 
+"BLD",7888,1,87,0)
+GTM>D CLIST^C0CRIMA
+"BLD",7888,1,88,0)
+(RIMTBL_1:105) ^NOTEXTRACTED^HEADER^^^PROBLEMS^^^^^VITALS^^^^^MEDS
+"BLD",7888,1,89,0)
+(RIMTBL_2:596) ^NOTEXTRACTED^HEADER^^^^^^^^VITALS
+"BLD",7888,1,90,0)
+(RIMTBL_3:44) ^NOTEXTRACTED^HEADER^^^PROBLEMS^^^^^VITALS
+"BLD",7888,1,91,0)
+(RIMTBL_4:821) ^NOTEXTRACTED^HEADER
+"BLD",7888,1,92,0)
+(RIMTBL_5:18) ^NOTEXTRACTED^HEADER^^^^^^^^VITALS^^^^^MEDS
+"BLD",7888,1,93,0)
+(RIMTBL_6:14) ^NOTEXTRACTED^HEADER^^^PROBLEMS
+"BLD",7888,1,94,0)
+(RIMTBL_7:15) ^NOTEXTRACTED^HEADER^^^^^^^^^^^^^MEDS
+"BLD",7888,1,95,0)
+(RIMTBL_8:5) ^NOTEXTRACTED^HEADER^^^PROBLEMS^^^^^^^^^^MEDS
+"BLD",7888,1,96,0)
+ 
+"BLD",7888,1,97,0)
+for RIMTBL_1 in this example, 105 is the record count of patients who 
+"BLD",7888,1,98,0)
+have this combination of attributes. The list of patients for each 
+"BLD",7888,1,99,0)
+category is also maintained for batch extraction.
+"BLD",7888,1,100,0)
+ 
+"BLD",7888,1,101,0)
+CLIST^C0CRIMA
+"BLD",7888,1,102,0)
+A command line interface to show a summary of the categories, record 
+"BLD",7888,1,103,0)
+counts, and attributes that have been analyzed so far. It produces the 
+"BLD",7888,1,104,0)
+listing in the example above from information stored in 
+"BLD",7888,1,105,0)
+^TMP("C0CRIM","CATS","RIMTBL"). It is intended for future versions that 
+"BLD",7888,1,106,0)
+attribute tables be supported in addition to the default "RIMTBL".
+"BLD",7888,1,107,0)
+ 
+"BLD",7888,1,108,0)
+CPAT^C0CRIMA(CPATCAT)
+"BLD",7888,1,109,0)
+A command line interface which shows the DFN numbers of the patients 
+"BLD",7888,1,110,0)
+represented by the category CPATCAT. DFNs are listed 10 per line. For 
+"BLD",7888,1,111,0)
+example:
+"BLD",7888,1,112,0)
+ 
+"BLD",7888,1,113,0)
+GTM>D CPAT^C0CRIMA("RIMTBL_1")
+"BLD",7888,1,114,0)
+1 3 8 25 42 69 123 140 146 149
+"BLD",7888,1,115,0)
+151 168 204 205 217 218 224 228 229 231
+"BLD",7888,1,116,0)
+236 237 240 253 260 267 271 301 347 350
+"BLD",7888,1,117,0)
+366 379 384 391 407 418 419 420 428 433
+"BLD",7888,1,118,0)
+442 520 569 600 620 692 706 715 722 723
+"BLD",7888,1,119,0)
+724 728 730 744 745 746 747 748 749 750
+"BLD",7888,1,120,0)
+751 752 753 754 755 756 757 758 759 760
+"BLD",7888,1,121,0)
+761 762 763 764 765 766 767 768 769 770
+"BLD",7888,1,122,0)
+771 772 773 774 775 776 777 778 779 780
+"BLD",7888,1,123,0)
+100000 100001 100002 100003 100004 100005 100006 100007 100008 100009
+"BLD",7888,1,124,0)
+100010 100011 100012 100013 100014
+"BLD",7888,1,125,0)
+ 
+"BLD",7888,1,126,0)
+These are the 105 patient records included in category "RIMTBL_1" from 
+"BLD",7888,1,127,0)
+the above example.
+"BLD",7888,1,128,0)
+ 
+"BLD",7888,1,129,0)
+DPATV^C0CRIMA(DFN,"SECTION")
+"BLD",7888,1,130,0)
+A command line interface to display the values of variables for a 
+"BLD",7888,1,131,0)
+patient. "SECTION" can be any of the CCR sections. ie 
+"BLD",7888,1,132,0)
+"ALERTS","RESULTS","MEDS". If SECTION is ommitted, all sections will be 
+"BLD",7888,1,133,0)
+shown. An example:
+"BLD",7888,1,134,0)
+ 
+"BLD",7888,1,135,0)
+GTM>D DPATV^C0CRIMA(2,"PROBLEMS")
+"BLD",7888,1,136,0)
+1 1^PROBLEMCODEVALUE^V18.0
+"BLD",7888,1,137,0)
+2 1^PROBLEMCODINGVERSION^
+"BLD",7888,1,138,0)
+3 1^PROBLEMCONDITION^P
+"BLD",7888,1,139,0)
+4 1^PROBLEMDATEMOD^2005-07-19T00:00:00-05:00
+"BLD",7888,1,140,0)
+5 1^PROBLEMDATEOFONSET^1700--T00:00:00-05:00
+"BLD",7888,1,141,0)
+6 1^PROBLEMDESCRIPTION^Family History of Diabetes Mellitus (ICD-9-CM 
+"BLD",7888,1,142,0)
+V18.0)
+"BLD",7888,1,143,0)
+7 1^PROBLEMDTREC^1701--T00:00:00-05:00
+"BLD",7888,1,144,0)
+8 1^PROBLEMHASCMT^
+"BLD",7888,1,145,0)
+9 1^PROBLEMIEN^8
+"BLD",7888,1,146,0)
+10 1^PROBLEMINACT^1700--T00:00:00-05:00
+"BLD",7888,1,147,0)
+ 
+"BLD",7888,1,148,0)
+DCCR^C0CCCR(DFN)
+"BLD",7888,1,149,0)
+This will display the XML of a CCR that has been generated for a patient. 
+"BLD",7888,1,150,0)
+It is run after generating the CCR with XPAT^C0CCCR or XCPAT^C0CRIMA.
+"BLD",7888,1,151,0)
+ 
+"BLD",7888,1,152,0)
+XCPAT^C0CRIMA(CPATCAT)
+"BLD",7888,1,153,0)
+A command line interface to extract a batch of patient CCR documents that 
+"BLD",7888,1,154,0)
+are associated with the category CPATCAT. For example,
+"BLD",7888,1,155,0)
+ 
+"BLD",7888,1,156,0)
+XCPAT^C0CRIMA("RIMTBL_1") to extract the CCR documents for the 105 
+"BLD",7888,1,157,0)
+patients in the above example.
+"BLD",7888,1,158,0)
+ 
+"BLD",7888,1,159,0)
+RESET^C0CRIMA
+"BLD",7888,1,160,0)
+A command line interface to kill all ANALYZE^C0CRIMA results stored so 
+"BLD",7888,1,161,0)
+far so that the analysis can be done again. It kills 
+"BLD",7888,1,162,0)
+^TMP("C0CRIM","RESUME") and all extraction variables that have been saved 
+"BLD",7888,1,163,0)
+in ^TMP("C0CRIM")
+"BLD",7888,1,164,0)
+ 
+"BLD",7888,1,165,0)
+NOTES:
+"BLD",7888,1,166,0)
+This version of the package is a prototype, and does not yet make use of 
+"BLD",7888,1,167,0)
+the standard VistA features that are appropriate for it to use.
+"BLD",7888,1,168,0)
+ 
+"BLD",7888,1,169,0)
+^TMP("C0CCCR","ODIR") must be set manually to the output directory on the 
+"BLD",7888,1,170,0)
+Host System. It is intended that this be maintainable in a parameter file.
+"BLD",7888,1,171,0)
+ 
+"BLD",7888,1,172,0)
+CCRRPC^C0CCCR and CCDRPC^C0CCCD are intended to be RPC interfaces to the 
+"BLD",7888,1,173,0)
+package but there is no entry for them in the RPC table and the RPC 
+"BLD",7888,1,174,0)
+method of access has not been tested.
+"BLD",7888,1,175,0)
+ 
+"BLD",7888,1,176,0)
+Most of the command line interface functions in the package are intended 
+"BLD",7888,1,177,0)
+to also be made available as RPC calls. This will provide the ability to 
+"BLD",7888,1,178,0)
+invoke and control batch extraction and analysis via RPCs
+"BLD",7888,1,179,0)
+ 
+"BLD",7888,1,180,0)
+The "RIM" variables and attributes that are now being stored in 
+"BLD",7888,1,181,0)
+^TMP("C0CRIM") are intended to be maintained in a standard FILEMAN 
+"BLD",7888,1,182,0)
+global, and to take advantage of FILEMAN indexing for efficient batch 
+"BLD",7888,1,183,0)
+analysis and processing.
+"BLD",7888,1,184,0)
+ 
+"BLD",7888,1,185,0)
+It is intended that menu interfaces be provided in addition to command 
+"BLD",7888,4,0)
+^9.64PA^170.9^12
+"BLD",7888,4,170,0)
+170
+"BLD",7888,4,170,222)
+y^y^f^^n^^y^o^n
+"BLD",7888,4,170.101,0)
+170.101
+"BLD",7888,4,170.101,222)
+y^y^f^^n^^y^o^n
+"BLD",7888,4,170.9,0)
+170.9
+"BLD",7888,4,170.9,222)
+y^y^f^^n^^y^o^n
+"BLD",7888,4,171.101,0)
+171.101
+"BLD",7888,4,171.101,222)
+y^y^f^^^^n
+"BLD",7888,4,171.401,0)
+171.401
+"BLD",7888,4,171.401,222)
+y^y^f^^^^n
+"BLD",7888,4,175,0)
+175
+"BLD",7888,4,175,222)
+y^y^f^^^^n
+"BLD",7888,4,176.112,0)
+176.112
+"BLD",7888,4,176.112,222)
+y^y^f^^n^^y^o^n
+"BLD",7888,4,177.101,0)
+177.101
+"BLD",7888,4,177.101,222)
+y^y^f^^^^n
+"BLD",7888,4,177.201,0)
+177.201
+"BLD",7888,4,177.201,222)
+y^y^f^^n^^y^o^n
+"BLD",7888,4,177.301,0)
+177.301
+"BLD",7888,4,177.301,222)
+y^y^f^^^^n
+"BLD",7888,4,178.101,0)
+178.101
+"BLD",7888,4,178.101,222)
+y^y^f^^n^^y^o^n
+"BLD",7888,4,178.301,0)
+178.301
+"BLD",7888,4,178.301,222)
+y^y^f^^n^^y^o^n
+"BLD",7888,4,"B",170,170)
+
+"BLD",7888,4,"B",170.101,170.101)
+
+"BLD",7888,4,"B",170.9,170.9)
+
+"BLD",7888,4,"B",171.101,171.101)
+
+"BLD",7888,4,"B",171.401,171.401)
+
+"BLD",7888,4,"B",175,175)
+
+"BLD",7888,4,"B",176.112,176.112)
+
+"BLD",7888,4,"B",177.101,177.101)
+
+"BLD",7888,4,"B",177.201,177.201)
+
+"BLD",7888,4,"B",177.301,177.301)
+
+"BLD",7888,4,"B",178.101,178.101)
+
+"BLD",7888,4,"B",178.301,178.301)
+
+"BLD",7888,6.3)
+42
+"BLD",7888,"ABNS",0)
+^9.66A^^
+"BLD",7888,"ABPKG")
+n^n
+"BLD",7888,"INI")
+PRE^C0CENV
+"BLD",7888,"INIT")
+POST^C0CENV
+"BLD",7888,"KRN",0)
+^9.67PA^779.2^20
+"BLD",7888,"KRN",.4,0)
+.4
+"BLD",7888,"KRN",.401,0)
+.401
+"BLD",7888,"KRN",.402,0)
+.402
+"BLD",7888,"KRN",.403,0)
+.403
+"BLD",7888,"KRN",.5,0)
+.5
+"BLD",7888,"KRN",.84,0)
+.84
+"BLD",7888,"KRN",3.6,0)
+3.6
+"BLD",7888,"KRN",3.8,0)
+3.8
+"BLD",7888,"KRN",9.2,0)
+9.2
+"BLD",7888,"KRN",9.8,0)
+9.8
+"BLD",7888,"KRN",9.8,"NM",0)
+^9.68A^101^70
+"BLD",7888,"KRN",9.8,"NM",22,0)
+C0CRXN^^0^B103277157
+"BLD",7888,"KRN",9.8,"NM",23,0)
+C0CRNF^^0^B195772222
+"BLD",7888,"KRN",9.8,"NM",24,0)
+C0CFM1^^0^B27048099
+"BLD",7888,"KRN",9.8,"NM",29,0)
+C0CPARMS^^0^B9463714
+"BLD",7888,"KRN",9.8,"NM",31,0)
+C0CFM2^^0^B102195978
+"BLD",7888,"KRN",9.8,"NM",34,0)
+C0CXPATH^^0^B521207435
+"BLD",7888,"KRN",9.8,"NM",35,0)
+C0CXPAT0^^0^B50736852
+"BLD",7888,"KRN",9.8,"NM",36,0)
+C0CVITAL^^0^B319933080
+"BLD",7888,"KRN",9.8,"NM",37,0)
+C0CUNIT^^0^B43465566
+"BLD",7888,"KRN",9.8,"NM",38,0)
+C0CRIMA^^0^B331901748
+"BLD",7888,"KRN",9.8,"NM",39,0)
+C0CPROBS^^0^B53281308
+"BLD",7888,"KRN",9.8,"NM",40,0)
+C0CLABS^^0^B282604886
+"BLD",7888,"KRN",9.8,"NM",41,0)
+C0CIMMU^^0^B20441765
+"BLD",7888,"KRN",9.8,"NM",42,0)
+C0CCCR0^^0^B790419172
+"BLD",7888,"KRN",9.8,"NM",43,0)
+C0CCCR^^0^B111682825
+"BLD",7888,"KRN",9.8,"NM",44,0)
+C0CCCD1^^0^B100634737
+"BLD",7888,"KRN",9.8,"NM",45,0)
+C0CCCD^^0^B114134049
+"BLD",7888,"KRN",9.8,"NM",46,0)
+C0CALERT^^0^B31627309
+"BLD",7888,"KRN",9.8,"NM",47,0)
+C0CACTOR^^0^B99733742
+"BLD",7888,"KRN",9.8,"NM",48,0)
+C0CMED^^0^B18939705
+"BLD",7888,"KRN",9.8,"NM",49,0)
+C0CMED1^^0^B110909428
+"BLD",7888,"KRN",9.8,"NM",50,0)
+C0CMED2^^0^B144699326
+"BLD",7888,"KRN",9.8,"NM",51,0)
+C0CMED3^^0^B172422279
+"BLD",7888,"KRN",9.8,"NM",52,0)
+C0CMED6^^0^B194349409
+"BLD",7888,"KRN",9.8,"NM",53,0)
+C0CDPT^^0^B45873061
+"BLD",7888,"KRN",9.8,"NM",54,0)
+C0CUTIL^^0^B27079469
+"BLD",7888,"KRN",9.8,"NM",55,0)
+C0CVA200^^0^B32092477
+"BLD",7888,"KRN",9.8,"NM",56,0)
+C0CSYS^^0^B3933593
+"BLD",7888,"KRN",9.8,"NM",57,0)
+C0CBAT^^0^B56971574
+"BLD",7888,"KRN",9.8,"NM",61,0)
+C0CSUB1^^0^B16280924
+"BLD",7888,"KRN",9.8,"NM",62,0)
+C0CLA7Q^^0^B21818572
+"BLD",7888,"KRN",9.8,"NM",63,0)
+C0CPROC^^0^B27869918
+"BLD",7888,"KRN",9.8,"NM",64,0)
+C0CMXP^^0^B77680190
+"BLD",7888,"KRN",9.8,"NM",65,0)
+C0CMXML^^0^B56456416
+"BLD",7888,"KRN",9.8,"NM",66,0)
+C0CVIT2^^0^B320700684
+"BLD",7888,"KRN",9.8,"NM",67,0)
+C0CIM2^^0^B20157375
+"BLD",7888,"KRN",9.8,"NM",68,0)
+C0CCPT^^0^B16531537
+"BLD",7888,"KRN",9.8,"NM",69,0)
+C0CSOAP^^0^B79899662
+"BLD",7888,"KRN",9.8,"NM",70,0)
+C0CENC^^0^B46321144
+"BLD",7888,"KRN",9.8,"NM",71,0)
+C0CCMT^^0^B6740701
+"BLD",7888,"KRN",9.8,"NM",72,0)
+C0CIN^^0^B30946883
+"BLD",7888,"KRN",9.8,"NM",73,0)
+C0CDIC^^0^B43527636
+"BLD",7888,"KRN",9.8,"NM",74,0)
+C0CDOM^^0^B86773980
+"BLD",7888,"KRN",9.8,"NM",75,0)
+C0CENV^^0^B25371113
+"BLD",7888,"KRN",9.8,"NM",76,0)
+C0CEVC^^0^B18388545
+"BLD",7888,"KRN",9.8,"NM",77,0)
+C0CEWD^^0^B5607678
+"BLD",7888,"KRN",9.8,"NM",78,0)
+C0CEWD1^^0^B6563070
+"BLD",7888,"KRN",9.8,"NM",79,0)
+C0CFM3^^0^B68203631
+"BLD",7888,"KRN",9.8,"NM",80,0)
+C0CLA7DD^^0^B66668579
+"BLD",7888,"KRN",9.8,"NM",81,0)
+C0CMAIL^^0^B92791623
+"BLD",7888,"KRN",9.8,"NM",82,0)
+C0CMAIL2^^0^B166788518
+"BLD",7888,"KRN",9.8,"NM",83,0)
+C0CMAIL3^^0^B224733815
+"BLD",7888,"KRN",9.8,"NM",84,0)
+C0CMCCD^^0^B73168233
+"BLD",7888,"KRN",9.8,"NM",85,0)
+C0CMED4^^0^B61058927
+"BLD",7888,"KRN",9.8,"NM",86,0)
+C0CMIME^^0^B99031395
+"BLD",7888,"KRN",9.8,"NM",87,0)
+C0CMXMLB^^0^B12065941
+"BLD",7888,"KRN",9.8,"NM",88,0)
+C0CNHIN^^0^B87973392
+"BLD",7888,"KRN",9.8,"NM",89,0)
+C0CNMED2^^0^B33217786
+"BLD",7888,"KRN",9.8,"NM",90,0)
+C0CNMED4^^0^B92238704
+"BLD",7888,"KRN",9.8,"NM",91,0)
+C0CORSLT^^0^B9647157
+"BLD",7888,"KRN",9.8,"NM",92,0)
+C0CPXRM^^0^B14904056
+"BLD",7888,"KRN",9.8,"NM",93,0)
+C0CQRY1^^0^B18992765
+"BLD",7888,"KRN",9.8,"NM",94,0)
+C0CQRY2^^0^B20465060
+"BLD",7888,"KRN",9.8,"NM",95,0)
+C0CRNFRP^^0^B91701220
+"BLD",7888,"KRN",9.8,"NM",96,0)
+C0CRPMS^^0^B16300714
+"BLD",7888,"KRN",9.8,"NM",97,0)
+C0CRXNRD^^0^B31474664
+"BLD",7888,"KRN",9.8,"NM",98,0)
+C0CSNOA^^0^B56032588
+"BLD",7888,"KRN",9.8,"NM",99,0)
+C0CVOBX1^^0^B12947698
+"BLD",7888,"KRN",9.8,"NM",100,0)
+C0CVORU^^0^B58596883
+"BLD",7888,"KRN",9.8,"NM",101,0)
+C0CXEWD^^0^B15380480
+"BLD",7888,"KRN",9.8,"NM","B","C0CACTOR",47)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CALERT",46)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CBAT",57)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CCCD",45)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CCCD1",44)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CCCR",43)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CCCR0",42)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CCMT",71)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CCPT",68)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CDIC",73)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CDOM",74)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CDPT",53)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CENC",70)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CENV",75)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CEVC",76)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CEWD",77)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CEWD1",78)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CFM1",24)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CFM2",31)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CFM3",79)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CIM2",67)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CIMMU",41)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CIN",72)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CLA7DD",80)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CLA7Q",62)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CLABS",40)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMAIL",81)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMAIL2",82)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMAIL3",83)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMCCD",84)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMED",48)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMED1",49)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMED2",50)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMED3",51)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMED4",85)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMED6",52)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMIME",86)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMXML",65)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMXMLB",87)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CMXP",64)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CNHIN",88)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CNMED2",89)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CNMED4",90)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CORSLT",91)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CPARMS",29)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CPROBS",39)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CPROC",63)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CPXRM",92)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CQRY1",93)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CQRY2",94)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CRIMA",38)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CRNF",23)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CRNFRP",95)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CRPMS",96)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CRXN",22)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CRXNRD",97)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CSNOA",98)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CSOAP",69)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CSUB1",61)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CSYS",56)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CUNIT",37)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CUTIL",54)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CVA200",55)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CVIT2",66)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CVITAL",36)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CVOBX1",99)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CVORU",100)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CXEWD",101)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CXPAT0",35)
+
+"BLD",7888,"KRN",9.8,"NM","B","C0CXPATH",34)
+
+"BLD",7888,"KRN",19,0)
+19
+"BLD",7888,"KRN",19,"NM",0)
+^9.68A^10^10
+"BLD",7888,"KRN",19,"NM",1,0)
+C0C BATCH OPTIONS^^0
+"BLD",7888,"KRN",19,"NM",2,0)
+C0C CCR EXPORT BY PATIENT NAME^^0
+"BLD",7888,"KRN",19,"NM",3,0)
+C0C CCR MENU^^0
+"BLD",7888,"KRN",19,"NM",4,0)
+C0C DISPLAY ELEMENTS^^0
+"BLD",7888,"KRN",19,"NM",5,0)
+C0C DISPLAY PATIENT VARIABLES^^0
+"BLD",7888,"KRN",19,"NM",6,0)
+C0C KILL BATCH JOB^^0
+"BLD",7888,"KRN",19,"NM",7,0)
+C0C LIST RIM CATEGORIES^^0
+"BLD",7888,"KRN",19,"NM",8,0)
+C0C START CCR BATCH PROCESSING^^0
+"BLD",7888,"KRN",19,"NM",9,0)
+C0C STATUS OF CCR BATCH^^0
+"BLD",7888,"KRN",19,"NM",10,0)
+C0C CCR RPC^^0
+"BLD",7888,"KRN",19,"NM","B","C0C BATCH OPTIONS",1)
+
+"BLD",7888,"KRN",19,"NM","B","C0C CCR EXPORT BY PATIENT NAME",2)
+
+"BLD",7888,"KRN",19,"NM","B","C0C CCR MENU",3)
+
+"BLD",7888,"KRN",19,"NM","B","C0C CCR RPC",10)
+
+"BLD",7888,"KRN",19,"NM","B","C0C DISPLAY ELEMENTS",4)
+
+"BLD",7888,"KRN",19,"NM","B","C0C DISPLAY PATIENT VARIABLES",5)
+
+"BLD",7888,"KRN",19,"NM","B","C0C KILL BATCH JOB",6)
+
+"BLD",7888,"KRN",19,"NM","B","C0C LIST RIM CATEGORIES",7)
+
+"BLD",7888,"KRN",19,"NM","B","C0C START CCR BATCH PROCESSING",8)
+
+"BLD",7888,"KRN",19,"NM","B","C0C STATUS OF CCR BATCH",9)
+
+"BLD",7888,"KRN",19.1,0)
+19.1
+"BLD",7888,"KRN",101,0)
+101
+"BLD",7888,"KRN",409.61,0)
+409.61
+"BLD",7888,"KRN",771,0)
+771
+"BLD",7888,"KRN",779.2,0)
+779.2
+"BLD",7888,"KRN",870,0)
+870
+"BLD",7888,"KRN",8989.51,0)
+8989.51
+"BLD",7888,"KRN",8989.52,0)
+8989.52
+"BLD",7888,"KRN",8994,0)
+8994
+"BLD",7888,"KRN",8994,"NM",0)
+^9.68A^1^1
+"BLD",7888,"KRN",8994,"NM",1,0)
+C0C CCR RPC^^0
+"BLD",7888,"KRN",8994,"NM","B","C0C CCR RPC",1)
+
+"BLD",7888,"KRN","B",.4,.4)
+
+"BLD",7888,"KRN","B",.401,.401)
+
+"BLD",7888,"KRN","B",.402,.402)
+
+"BLD",7888,"KRN","B",.403,.403)
+
+"BLD",7888,"KRN","B",.5,.5)
+
+"BLD",7888,"KRN","B",.84,.84)
+
+"BLD",7888,"KRN","B",3.6,3.6)
+
+"BLD",7888,"KRN","B",3.8,3.8)
+
+"BLD",7888,"KRN","B",9.2,9.2)
+
+"BLD",7888,"KRN","B",9.8,9.8)
+
+"BLD",7888,"KRN","B",19,19)
+
+"BLD",7888,"KRN","B",19.1,19.1)
+
+"BLD",7888,"KRN","B",101,101)
+
+"BLD",7888,"KRN","B",409.61,409.61)
+
+"BLD",7888,"KRN","B",771,771)
+
+"BLD",7888,"KRN","B",779.2,779.2)
+
+"BLD",7888,"KRN","B",870,870)
+
+"BLD",7888,"KRN","B",8989.51,8989.51)
+
+"BLD",7888,"KRN","B",8989.52,8989.52)
+
+"BLD",7888,"KRN","B",8994,8994)
+
+"BLD",7888,"PRE")
+C0CENV
+"BLD",7888,"QUES",0)
+^9.62^^
+"BLD",7888,"REQB",0)
+^9.611^^
+"DATA",170,1,0)
+DATETIME
+"DATA",170,1,1)
+//ContinuityOfCareRecord/DateTime/ExactDateTime
+"DATA",170,1,4)
+^DT
+"DATA",170,1,7)
+N^HEADER^^1
+"DATA",170,2,0)
+ACTORPATIENT
+"DATA",170,2,1)
+//ContinuityOfCareRecord/Patient/ActorID
+"DATA",170,2,4)
+^ID
+"DATA",170,2,7)
+N^ACTORS^^6
+"DATA",170,3,0)
+ACTORFROM
+"DATA",170,3,1)
+//ContinuityOfCareRecord/From/ActorLink/ActorID
+"DATA",170,3,4)
+^ID
+"DATA",170,3,7)
+N^ACTORS^^6
+"DATA",170,4,0)
+ACTORFROM2
+"DATA",170,4,4)
+^ID
+"DATA",170,4,7)
+N^ACTORS^^6
+"DATA",170,5,0)
+ACTORTO
+"DATA",170,5,1)
+//ContinuityOfCareRecord/To/ActorLink/ActorID
+"DATA",170,5,4)
+^ID
+"DATA",170,5,7)
+N^ACTORS^^6
+"DATA",170,6,0)
+ACTORTOTEXT
+"DATA",170,6,1)
+//ContinuityOfCareRecord/To/ActorLink/ActorRole/Text
+"DATA",170,6,4)
+^V
+"DATA",170,6,7)
+N^ACTORS^^6
+"DATA",170,7,0)
+PURPOSEDESCRIPTION
+"DATA",170,7,1)
+//ContinuityOfCareRecord/Purpose/Description/Text
+"DATA",170,7,4)
+^V
+"DATA",170,7,7)
+N^HEADER^^1
+"DATA",170,8,0)
+PROBLEMOBJECTID
+"DATA",170,8,1)
+//ContinuityOfCareRecord/Body/Problems/Problem/CCRDataObjectID
+"DATA",170,8,4)
+^ID
+"DATA",170,8,7)
+N^PROBLEMS^PROBLEMS^5
+"DATA",170,9,0)
+PROBLEMDESCRIPTION
+"DATA",170,9,1)
+//ContinuityOfCareRecord/Body/Problems/Problem/Description/Text
+"DATA",170,9,4)
+^V
+"DATA",170,9,7)
+N^PROBLEMS^^5
+"DATA",170,10,0)
+PROBLEMCODEVALUE
+"DATA",170,10,1)
+//ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/Value
+"DATA",170,10,4)
+^CD
+"DATA",170,10,6,0)
+^170.08S^1^1
+"DATA",170,10,6,1,0)
+ICD
+"DATA",170,10,6,1,1,0)
+^^3^3^3081123^
+"DATA",170,10,6,1,1,1,0)
+The ICD9 code for the problem is retrieved from the patient's record by a 
+"DATA",170,10,6,1,1,2,0)
+call to LIST^ORQQPL3. It is piece 4 in the return array.
+"DATA",170,10,6,1,1,3,0)
+. S @VMAP@("PROBLEMCODEVALUE")=$P(PTMP,U,4)
+"DATA",170,10,7)
+N^PROBLEMS^^5
+"DATA",170,11,0)
+PROBLEMCODINGVERSION
+"DATA",170,11,1)
+//ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/Version
+"DATA",170,11,4)
+^CV
+"DATA",170,11,6,0)
+^170.08S^1^1
+"DATA",170,11,6,1,0)
+ICD
+"DATA",170,11,6,1,1,0)
+^170.81^5^5^3081123^^
+"DATA",170,11,6,1,1,1,0)
+The ICD9 codes for problems are retrieved from the patient record by 
+"DATA",170,11,6,1,1,2,0)
+using the remote procedure call LIST^ORQQPL3. The value is in the 4th 
+"DATA",170,11,6,1,1,3,0)
+piece of the return array for the problem.
+"DATA",170,11,6,1,1,4,0)
+ 
+"DATA",170,11,6,1,1,5,0)
+          . S @VMAP@("PROBLEMCODEVALUE")=$P(PTMP,U,4)
+"DATA",170,11,7)
+N^PROBLEMS^^5
+"DATA",170,12,0)
+PROBLEMSOURCEACTORID
+"DATA",170,12,1)
+//ContinuityOfCareRecord/Body/Problems/Problem/Source/Actor/ActorID
+"DATA",170,12,4)
+^ID
+"DATA",170,12,7)
+N^PROBLEMS^^5
+"DATA",170,13,0)
+FAMILYHISTORYOBJECTID
+"DATA",170,13,1)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/CCRDataObjectID
+"DATA",170,13,4)
+^ID
+"DATA",170,13,7)
+X^FAM^^12
+"DATA",170,14,0)
+FAMILYHISTORYACTORID
+"DATA",170,14,1)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Source/Actor/ActorID
+"DATA",170,14,4)
+^ID
+"DATA",170,14,7)
+X^FAM^^12
+"DATA",170,15,0)
+FAMILYMEMBERACTORID
+"DATA",170,15,1)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/ActorID
+"DATA",170,15,4)
+^ID
+"DATA",170,15,7)
+X^FAM^^12
+"DATA",170,16,0)
+FAMILYMEMBERACTORROLETEXT
+"DATA",170,16,1)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/ActorRole/Text
+"DATA",170,16,4)
+^V
+"DATA",170,16,7)
+X^FAM^^12
+"DATA",170,17,0)
+FAMILYMEMBERSOURCACTORID
+"DATA",170,17,1)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/Source/Actor/ActorID
+"DATA",170,17,4)
+^ID
+"DATA",170,17,7)
+X^FAM^^12
+"DATA",170,18,0)
+FAMILYMEMBERPROBLEMDESCRIPTION
+"DATA",170,18,1)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Text
+"DATA",170,18,7)
+X^FAM^^12
+"DATA",170,19,0)
+FAMILYMEMBERPROBLEMCODE
+"DATA",170,19,1)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/Value
+"DATA",170,19,7)
+X^FAM^^12
+"DATA",170,20,0)
+FAMILYMEMBERCODESYSTEM
+"DATA",170,20,1)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/CodingSystem
+"DATA",170,20,7)
+X^FAM^^12
+"DATA",170,21,0)
+FAMILYMEMBERCODEVERSION
+"DATA",170,21,1)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/Version
+"DATA",170,21,4)
+^CV
+"DATA",170,21,7)
+X^FAM^^12
+"DATA",170,22,0)
+FAMILYMEMBERPROBLEMSOURCEID
+"DATA",170,22,1)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Source/Actor/ActorID
+"DATA",170,22,4)
+^ID
+"DATA",170,22,7)
+X^FAM^^12
+"DATA",170,23,0)
+SOCIALHISTORYOBJECTID
+"DATA",170,23,4)
+^ID
+"DATA",170,23,7)
+X^SOC^^13
+"DATA",170,24,0)
+SOCIALHISTORYTYPETEXT
+"DATA",170,24,7)
+X^SOC^^13
+"DATA",170,25,0)
+SOCIALHISTORYDESCRIPTIONTEXT
+"DATA",170,25,7)
+X^SOC^^13
+"DATA",170,26,0)
+SOCIALHISTORYSOURCACTORID
+"DATA",170,26,4)
+^ID
+"DATA",170,26,7)
+X^SOC^^13
+"DATA",170,27,0)
+ALERTOBJECTID
+"DATA",170,27,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/CCRDataObjectID
+"DATA",170,27,4)
+^ID
+"DATA",170,27,5,0)
+^^1^1^3081120^
+"DATA",170,27,5,1,0)
+Unique (in the document) ObjectID for the Alert
+"DATA",170,27,7)
+N^ALERTS^ALERTS^4
+"DATA",170,28,0)
+ALERTDESCRIPTIONTEXT
+"DATA",170,28,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Description/Text
+"DATA",170,28,4)
+^V
+"DATA",170,28,5,0)
+^170.01^6^6^3081122^^
+"DATA",170,28,5,1,0)
+An instance of CodedDescriptionType that
+"DATA",170,28,5,2,0)
+supports a free text string, a structured text
+"DATA",170,28,5,3,0)
+string or strings, or a structured and coded
+"DATA",170,28,5,4,0)
+text string or strings. It is recommended
+"DATA",170,28,5,5,0)
+that, when possible, all instances of <Alert>
+"DATA",170,28,5,6,0)
+be coded with SNOMED CT
+"DATA",170,28,7)
+I^ALERTS^^4
+"DATA",170,29,0)
+ALERTCODEVALUE^6.06
+"DATA",170,29,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Description/Code/Value
+"DATA",170,29,4)
+^CD^Reaction Coded
+"DATA",170,29,5,0)
+^^1^1^3081120^
+"DATA",170,29,5,1,0)
+Code Value for the Alert Reaction
+"DATA",170,29,7)
+N^ALERTS^^4
+"DATA",170,30,0)
+ALERTCODESYSTEM^6.06
+"DATA",170,30,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Description/Code/CodingSystem
+"DATA",170,30,4)
+^CS^Reaction Coded
+"DATA",170,30,5,0)
+^170.01^1^1^3081120^^
+"DATA",170,30,5,1,0)
+Coding System for the Alert Reaction Code
+"DATA",170,30,6,0)
+^170.08S^1^1
+"DATA",170,30,6,1,0)
+SNO
+"DATA",170,30,6,1,1,0)
+^^17^17^3081121^
+"DATA",170,30,6,1,1,1,0)
+The Alerts Reaction SNOMED CT code
+"DATA",170,30,6,1,1,2,0)
+is assigned by the extraction as one of two
+"DATA",170,30,6,1,1,3,0)
+values based on the MECHANISM field in the PATIENT ALLERGY file 120.8.
+"DATA",170,30,6,1,1,4,0)
+ 
+"DATA",170,30,6,1,1,5,0)
+The codes are 
+"DATA",170,30,6,1,1,6,0)
+ 
+"DATA",170,30,6,1,1,7,0)
+282100009 for Adverse Reaction to a Substance
+"DATA",170,30,6,1,1,8,0)
+418634005 for Allergic Reaction to a substance
+"DATA",170,30,6,1,1,9,0)
+ 
+"DATA",170,30,6,1,1,10,0)
+ . N A2 S A2=$$GET1^DIQ(120.8,ALTTMP,"MECHANISM","I") ; MECHANISM
+"DATA",170,30,6,1,1,11,0)
+ 
+"DATA",170,30,6,1,1,12,0)
+ . S ADT=ADT_$S(A2="P":"ADVERSE",A2="A":"ALLERGIC",1:"UNKNOWN")
+"DATA",170,30,6,1,1,13,0)
+ 
+"DATA",170,30,6,1,1,14,0)
+ . S ALTCDE=$S(A2="P":"282100009",A2="A":"418634005",1:"") ;
+"DATA",170,30,6,1,1,15,0)
+ 
+"DATA",170,30,6,1,1,16,0)
+In a future patch, it is planned to retrieve these codes from a C0CCODES 
+"DATA",170,30,6,1,1,17,0)
+file for easier maintenance.
+"DATA",170,30,7)
+N^ALERTS^^4
+"DATA",170,31,0)
+ALERTSTATUSTEXT
+"DATA",170,31,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Status/Text
+"DATA",170,31,7)
+N^ALERTS^^4
+"DATA",170,32,0)
+ALERTSOURCEID
+"DATA",170,32,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Source/Actor/ActorID
+"DATA",170,32,4)
+^ID
+"DATA",170,32,5,0)
+^^1^1^3081120^
+"DATA",170,32,5,1,0)
+Source Actor for the Alert
+"DATA",170,32,7)
+N^ALERTS^^4
+"DATA",170,33,0)
+ALERTAGENTPRODUCTOBJECTID
+"DATA",170,33,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/CCRDataObjectID
+"DATA",170,33,4)
+^ID
+"DATA",170,33,5,0)
+^170.01^1^1^3081120^^
+"DATA",170,33,5,1,0)
+Object ID for the Alert Agent Product
+"DATA",170,33,7)
+N^ALERTS^^4
+"DATA",170,34,0)
+ALERTAGENTPRODUCTSOURCEID
+"DATA",170,34,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/Source/Actor/ActorID
+"DATA",170,34,4)
+^ID
+"DATA",170,34,5,0)
+^^1^1^3081120^
+"DATA",170,34,5,1,0)
+Source Object ID for the Alert Agent Product
+"DATA",170,34,7)
+N^ALERTS^^4
+"DATA",170,35,0)
+ALERTAGENTPRODUCTNAMETEXT^6.03
+"DATA",170,35,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/ProductName/Text
+"DATA",170,35,4)
+^V^Product Free-Text
+"DATA",170,35,7)
+N^ALERTS^^4
+"DATA",170,36,0)
+ALERTAGENTPRODUCTCODEVALUE^6.04
+"DATA",170,36,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/ProductName/Code/Value
+"DATA",170,36,4)
+^CD^Product Coded
+"DATA",170,36,7)
+N^ALERTS^ALERTSCODE^4
+"DATA",170,37,0)
+ALERTAGENTPRODUCTCODESYSTEM
+"DATA",170,37,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/ProductName/Code/CodingSystem
+"DATA",170,37,6,0)
+^170.08S^1^1
+"DATA",170,37,6,1,0)
+VUI
+"DATA",170,37,6,1,1,0)
+^^22^22^3081121^
+"DATA",170,37,6,1,1,1,0)
+The VUID code for Alerts Agent Product (Reactant) is 
+"DATA",170,37,6,1,1,2,0)
+retrieved from the PATIENT ALLERGY file where
+"DATA",170,37,6,1,1,3,0)
+it is found using a variable pointer to several files which have a VUID 
+"DATA",170,37,6,1,1,4,0)
+index. 
+"DATA",170,37,6,1,1,5,0)
+ 
+"DATA",170,37,6,1,1,6,0)
+ . S ACGL1=$P(@ALTG@(ALTTMP),U,9) ; ADDRESS OF THE REACTANT XX;GLB(YY.Z,
+"DATA",170,37,6,1,1,7,0)
+ . S ACGFI=$$PRSGLB($P(ACGL1,";",2)) ; FILE NUMBER
+"DATA",170,37,6,1,1,8,0)
+ . S ACIEN=$P(ACGL1,";",1) ; IEN OF REACTANT
+"DATA",170,37,6,1,1,9,0)
+ . S ACVUID=$$GET1^DIQ(ACGFI,ACIEN,"VUID") ; VUID OF THE REACTANT
+"DATA",170,37,6,1,1,10,0)
+ 
+"DATA",170,37,6,1,1,11,0)
+[the following is copied from the Technical Description of field 1 GMR 
+"DATA",170,37,6,1,1,12,0)
+ALLERGY of the PATIENT ALLERGY file]
+"DATA",170,37,6,1,1,13,0)
+This field is a variable pointer to help relate this allergy to some
+"DATA",170,37,6,1,1,14,0)
+record in one of the files to which this field points.  The files that are
+"DATA",170,37,6,1,1,15,0)
+pointed to are the GMR Allergies (120.82) file, National Drug (50.6) file,
+"DATA",170,37,6,1,1,16,0)
+Drug (50) file, Drug Ingredients (50.416) file and VA Drug Class
+"DATA",170,37,6,1,1,17,0)
+(50.605) file.
+"DATA",170,37,6,1,1,18,0)
+ 
+"DATA",170,37,6,1,1,19,0)
+In a future patch, the resulting VUID code will be used to retrieve a 
+"DATA",170,37,6,1,1,20,0)
+RXNORM code from the C0CCODES file. The RXNORM mapping
+"DATA",170,37,6,1,1,21,0)
+has been done by the
+"DATA",170,37,6,1,1,22,0)
+VA for 10,449 VUID code values.
+"DATA",170,37,7)
+N^ALERTS^^4
+"DATA",170,38,0)
+ALERTREACTIOINDESCRIPTIONTEXT^6.05
+"DATA",170,38,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Text
+"DATA",170,38,4)
+^V^Reaction Free-Text
+"DATA",170,38,5,0)
+^170.01^1^1^3081122^^
+"DATA",170,38,5,1,0)
+Alert Reaction Description Text - derived from the code
+"DATA",170,38,7)
+I^ALERTS^^4
+"DATA",170,39,0)
+ALERTREACTIONCODEVALUE
+"DATA",170,39,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Code/Value
+"DATA",170,39,4)
+^CD
+"DATA",170,39,7)
+N^ALERTS^^4
+"DATA",170,40,0)
+ALERTREACTIONCODESYSTEM
+"DATA",170,40,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Code/CodingSystem
+"DATA",170,40,7)
+N^ALERTS^^4
+"DATA",170,41,0)
+MEDOBJECTID
+"DATA",170,41,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/CCRDataObjectID
+"DATA",170,41,4)
+^ID
+"DATA",170,41,7)
+N^MEDS^MEDS^7
+"DATA",170,42,0)
+MEDISSUEDATETXT
+"DATA",170,42,7)
+N^^^7
+"DATA",170,43,0)
+MEDISSUEDATE
+"DATA",170,43,7)
+N^^^7
+"DATA",170,44,0)
+MEDLASTFILLDATETXT
+"DATA",170,44,7)
+N^^^7
+"DATA",170,45,0)
+MEDLASTFILLDATE
+"DATA",170,45,7)
+N^^^7
+"DATA",170,46,0)
+MEDRXNOTXT
+"DATA",170,46,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/IDs/Type/Text
+"DATA",170,46,7)
+N^MEDS^^7
+"DATA",170,47,0)
+MEDRXNO
+"DATA",170,47,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/IDs/ID
+"DATA",170,47,7)
+N^MEDS^^7
+"DATA",170,48,0)
+MEDTYPETEXT
+"DATA",170,48,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Type/Text
+"DATA",170,48,7)
+N^MEDS^^7
+"DATA",170,49,0)
+MEDDETAILUNADORNED
+"DATA",170,49,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Description/Text
+"DATA",170,49,7)
+N^MEDS^^7
+"DATA",170,50,0)
+MEDSTATUSTEXT
+"DATA",170,50,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Status/Text
+"DATA",170,50,7)
+N^MEDS^^7
+"DATA",170,51,0)
+MEDSOURCEACTORID
+"DATA",170,51,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Source/Actor/ActorID
+"DATA",170,51,4)
+^ID
+"DATA",170,51,7)
+N^MEDS^^7
+"DATA",170,52,0)
+MEDPRODUCTNAMETEXT
+"DATA",170,52,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Text
+"DATA",170,52,7)
+N^MEDS^^7
+"DATA",170,53,0)
+MEDPRODUCTNAMECODEVALUE
+"DATA",170,53,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/Value
+"DATA",170,53,4)
+^CD
+"DATA",170,53,7)
+N^MEDS^MEDSCODE^7
+"DATA",170,54,0)
+MEDPRODUCTNAMECODINGINGSYSTEM
+"DATA",170,54,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/CodingSystem
+"DATA",170,54,7)
+N^MEDS^^7
+"DATA",170,55,0)
+MEDPRODUCTNAMECODEVERSION
+"DATA",170,55,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/Version
+"DATA",170,55,4)
+^CV
+"DATA",170,55,7)
+N^MEDS^^7
+"DATA",170,56,0)
+MEDBRANDNAMETEXT
+"DATA",170,56,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/BrandName/Text
+"DATA",170,56,7)
+N^MEDS^^7
+"DATA",170,57,0)
+MEDSTRENGTHVALUE
+"DATA",170,57,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Strength/Value
+"DATA",170,57,7)
+N^MEDS^^7
+"DATA",170,58,0)
+MEDSTRENGTHUNIT
+"DATA",170,58,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Strength/Units/Unit
+"DATA",170,58,7)
+N^MEDS^^7
+"DATA",170,59,0)
+MEDFORMTEXT
+"DATA",170,59,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Form/Text
+"DATA",170,59,7)
+N^MEDS^^7
+"DATA",170,60,0)
+MEDCONCVALUE
+"DATA",170,60,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Concentration/Value
+"DATA",170,60,7)
+N^MEDS^^7
+"DATA",170,61,0)
+MEDCONCUNIT
+"DATA",170,61,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Concentration/Units/Unit
+"DATA",170,61,7)
+N^MEDS^^7
+"DATA",170,62,0)
+MEDSIZETEXT
+"DATA",170,62,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Size/Text
+"DATA",170,62,7)
+N^MEDS^^7
+"DATA",170,63,0)
+MEDQUANTITYVALUE
+"DATA",170,63,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Quantity/Value
+"DATA",170,63,7)
+N^MEDS^^7
+"DATA",170,64,0)
+MEDQUANTITYUNIT
+"DATA",170,64,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Quantity/Units/Unit
+"DATA",170,64,7)
+N^MEDS^^7
+"DATA",170,65,0)
+MEDDIRECTIONDESCRIPTIONTEXT
+"DATA",170,65,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Description/Text
+"DATA",170,65,7)
+N^DIR^^8
+"DATA",170,66,0)
+MEDDOSEINDICATOR
+"DATA",170,66,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DoseIndicator/Text
+"DATA",170,66,7)
+N^DIR^^8
+"DATA",170,67,0)
+MEDDELIVERYMETHOD
+"DATA",170,67,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DeliveryMethod/Text
+"DATA",170,67,7)
+N^DIR^^8
+"DATA",170,68,0)
+MEDDOSEVALUE
+"DATA",170,68,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Value
+"DATA",170,68,7)
+N^DIR^^8
+"DATA",170,69,0)
+MEDDOSEUNIT
+"DATA",170,69,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Units/Unit
+"DATA",170,69,7)
+N^DIR^^8
+"DATA",170,70,0)
+MEDRATEVALUE
+"DATA",170,70,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Rate/Value
+"DATA",170,70,7)
+N^DIR^^8
+"DATA",170,71,0)
+MEDRATEUNIT
+"DATA",170,71,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Rate/Units/Unit
+"DATA",170,71,7)
+N^DIR^^8
+"DATA",170,72,0)
+MEDVEHICLETEXT
+"DATA",170,72,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Vehicle/Text
+"DATA",170,72,7)
+N^DIR^^8
+"DATA",170,73,0)
+MEDDIRECTIONROUTETEXT
+"DATA",170,73,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Route/Text
+"DATA",170,73,7)
+N^DIR^^8
+"DATA",170,74,0)
+MEDFREQUENCYVALUE
+"DATA",170,74,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Frequency/Value
+"DATA",170,74,7)
+N^DIR^^8
+"DATA",170,75,0)
+MEDINTERVALVALUE
+"DATA",170,75,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Interval/Value
+"DATA",170,75,7)
+N^DIR^^8
+"DATA",170,76,0)
+MEDINTERVALUNIT
+"DATA",170,76,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Interval/Units/Unit
+"DATA",170,76,7)
+N^DIR^^8
+"DATA",170,77,0)
+MEDDURATIONVALUE
+"DATA",170,77,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Duration/Value
+"DATA",170,77,7)
+N^DIR^^8
+"DATA",170,78,0)
+MEDDURATIONUNIT
+"DATA",170,78,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Duration/Units/Unit
+"DATA",170,78,7)
+N^DIR^^8
+"DATA",170,79,0)
+MEDPRNFLAG
+"DATA",170,79,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/PRNFlag/Text
+"DATA",170,79,7)
+N^DIR^^8
+"DATA",170,80,0)
+MEDPROBLEMOBJECTID
+"DATA",170,80,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/CCRDataObjectID
+"DATA",170,80,4)
+^ID
+"DATA",170,80,7)
+N^DIR^^8
+"DATA",170,81,0)
+MEDPROBLEMTYPETXT
+"DATA",170,81,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Type/Text
+"DATA",170,81,7)
+N^DIR^^8
+"DATA",170,82,0)
+MEDPROBLEMDESCRIPTION
+"DATA",170,82,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Text
+"DATA",170,82,7)
+N^DIR^^8
+"DATA",170,83,0)
+MEDPROBLEMCODEVALUE
+"DATA",170,83,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/Value
+"DATA",170,83,4)
+^CD
+"DATA",170,83,7)
+N^DIR^^8
+"DATA",170,84,0)
+MEDPROBLEMCODINGSYSTEM
+"DATA",170,84,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/CodingSystem
+"DATA",170,84,4)
+^CS
+"DATA",170,84,7)
+N^DIR^^8
+"DATA",170,85,0)
+MEDPROBLEMCODINGVERSION
+"DATA",170,85,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/Version
+"DATA",170,85,7)
+N^DIR^^8
+"DATA",170,86,0)
+MEDPROBLEMSOURCEACTORID
+"DATA",170,86,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Source/Actor/ActorID
+"DATA",170,86,4)
+^ID
+"DATA",170,86,7)
+N^DIR^^8
+"DATA",170,87,0)
+MEDSTOPINDICATOR
+"DATA",170,87,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/StopIndicator/Text
+"DATA",170,87,7)
+N^DIR^^8
+"DATA",170,88,0)
+MEDDIRSEQ
+"DATA",170,88,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DirectionSequenceModifier
+"DATA",170,88,7)
+N^DIR^^8
+"DATA",170,89,0)
+MEDMULDIRMOD
+"DATA",170,89,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/MultipleDirectionModifier/Text
+"DATA",170,89,7)
+N^DIR^^8
+"DATA",170,90,0)
+MEDPTINSTRUCTIONS
+"DATA",170,90,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/PatientInstructions/Instruction
+"DATA",170,90,7)
+N^MEDS^^7
+"DATA",170,91,0)
+MEDFULLFILLMENTINSTRUCTIONS
+"DATA",170,91,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/FullfillmentInstructions/Text
+"DATA",170,91,7)
+N^MEDS^^7
+"DATA",170,92,0)
+MEDRFNO
+"DATA",170,92,1)
+//ContinuityOfCareRecord/Body/Medications/Medication/Refills/Refill/Number
+"DATA",170,92,7)
+N^MEDS^^7
+"DATA",170,93,0)
+VITALSIGNSDATAOBJECTID
+"DATA",170,93,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/CCRDataObjectID
+"DATA",170,93,4)
+^ID
+"DATA",170,93,7)
+N^VITALS^VITALS^11
+"DATA",170,94,0)
+VITALSIGNSDATETIMETYPETEXT
+"DATA",170,94,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/DateTime/Type/Text
+"DATA",170,94,4)
+^DT
+"DATA",170,94,7)
+N^VITALS^^11
+"DATA",170,95,0)
+VITALSIGNSEXACTDATETIME
+"DATA",170,95,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/DateTime/ExactDateTime
+"DATA",170,95,4)
+^DT
+"DATA",170,95,7)
+N^VITALS^^11
+"DATA",170,96,0)
+VITALSIGNSSOURCEACTORID
+"DATA",170,96,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Source/Actor/ActorID
+"DATA",170,96,4)
+^ID
+"DATA",170,96,7)
+N^VITALS^^11
+"DATA",170,97,0)
+VITALSIGNSTESTOBJECTID
+"DATA",170,97,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/CCRDataObjectID
+"DATA",170,97,4)
+^ID
+"DATA",170,97,7)
+N^VITALS^^11
+"DATA",170,98,0)
+VITALSIGNSTESTTYPETEXT
+"DATA",170,98,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Type/Text
+"DATA",170,98,7)
+N^VITALS^^11
+"DATA",170,99,0)
+VITALSIGNSDESCRIPTIONTEXT
+"DATA",170,99,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Text
+"DATA",170,99,7)
+N^VITALS^^11
+"DATA",170,100,0)
+VITALSIGNSDESCCODEVALUE
+"DATA",170,100,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/Value
+"DATA",170,100,4)
+^CD
+"DATA",170,100,6,0)
+^170.08S^196^2
+"DATA",170,100,6,1,0)
+SNO
+"DATA",170,100,6,1,1,0)
+^^26^26^3081121^
+"DATA",170,100,6,1,1,1,0)
+The SNOMED CT codes for Vitals are assigned by the extraction according 
+"DATA",170,100,6,1,1,2,0)
+to the vital signs supported in VistA as follows:
+"DATA",170,100,6,1,1,3,0)
+ 
+"DATA",170,100,6,1,1,4,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"DATA",170,100,6,1,1,5,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="248327008"
+"DATA",170,100,6,1,1,6,0)
+ 
+"DATA",170,100,6,1,1,7,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"DATA",170,100,6,1,1,8,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="107647005"
+"DATA",170,100,6,1,1,9,0)
+ 
+"DATA",170,100,6,1,1,10,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"DATA",170,100,6,1,1,11,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="392570002"
+"DATA",170,100,6,1,1,12,0)
+ 
+"DATA",170,100,6,1,1,13,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"DATA",170,100,6,1,1,14,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="309646008"
+"DATA",170,100,6,1,1,15,0)
+ 
+"DATA",170,100,6,1,1,16,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"DATA",170,100,6,1,1,17,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366147009"
+"DATA",170,100,6,1,1,18,0)
+ 
+"DATA",170,100,6,1,1,19,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"DATA",170,100,6,1,1,20,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366199006"
+"DATA",170,100,6,1,1,21,0)
+ 
+"DATA",170,100,6,1,1,22,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"DATA",170,100,6,1,1,23,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="22253000"
+"DATA",170,100,6,1,1,24,0)
+ 
+"DATA",170,100,6,1,1,25,0)
+It is planned that these codes be retrieved from a C0CCODES FILE in a 
+"DATA",170,100,6,1,1,26,0)
+future patch for easier maintenance.
+"DATA",170,100,6,196,0)
+SNO
+"DATA",170,100,6,196,1,0)
+^^26^26^3081121^
+"DATA",170,100,6,196,1,1,0)
+The SNOMED CT codes for Vitals are assigned by the extraction according 
+"DATA",170,100,6,196,1,2,0)
+to the vital signs supported in VistA as follows:
+"DATA",170,100,6,196,1,3,0)
+ 
+"DATA",170,100,6,196,1,4,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"DATA",170,100,6,196,1,5,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="248327008"
+"DATA",170,100,6,196,1,6,0)
+ 
+"DATA",170,100,6,196,1,7,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"DATA",170,100,6,196,1,8,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="107647005"
+"DATA",170,100,6,196,1,9,0)
+ 
+"DATA",170,100,6,196,1,10,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"DATA",170,100,6,196,1,11,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="392570002"
+"DATA",170,100,6,196,1,12,0)
+ 
+"DATA",170,100,6,196,1,13,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"DATA",170,100,6,196,1,14,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="309646008"
+"DATA",170,100,6,196,1,15,0)
+ 
+"DATA",170,100,6,196,1,16,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"DATA",170,100,6,196,1,17,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366147009"
+"DATA",170,100,6,196,1,18,0)
+ 
+"DATA",170,100,6,196,1,19,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"DATA",170,100,6,196,1,20,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366199006"
+"DATA",170,100,6,196,1,21,0)
+ 
+"DATA",170,100,6,196,1,22,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"DATA",170,100,6,196,1,23,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="22253000"
+"DATA",170,100,6,196,1,24,0)
+ 
+"DATA",170,100,6,196,1,25,0)
+It is planned that these codes be retrieved from a C0CCODES FILE in a 
+"DATA",170,100,6,196,1,26,0)
+future patch for easier maintenance.
+"DATA",170,100,7)
+N^VITALS^^11
+"DATA",170,101,0)
+VITALSIGNSDESCCODINGSYSTEM
+"DATA",170,101,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/CodingSystem
+"DATA",170,101,4)
+^CS
+"DATA",170,101,6,0)
+^170.08S^197^2
+"DATA",170,101,6,1,0)
+SNO
+"DATA",170,101,6,1,1,0)
+^^26^26^3081121^
+"DATA",170,101,6,1,1,1,0)
+The SNOMED CT codes for Vitals are assigned by the extraction according 
+"DATA",170,101,6,1,1,2,0)
+to the vital signs supported in VistA as follows:
+"DATA",170,101,6,1,1,3,0)
+ 
+"DATA",170,101,6,1,1,4,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"DATA",170,101,6,1,1,5,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="248327008"
+"DATA",170,101,6,1,1,6,0)
+ 
+"DATA",170,101,6,1,1,7,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"DATA",170,101,6,1,1,8,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="107647005"
+"DATA",170,101,6,1,1,9,0)
+ 
+"DATA",170,101,6,1,1,10,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"DATA",170,101,6,1,1,11,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="392570002"
+"DATA",170,101,6,1,1,12,0)
+ 
+"DATA",170,101,6,1,1,13,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"DATA",170,101,6,1,1,14,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="309646008"
+"DATA",170,101,6,1,1,15,0)
+ 
+"DATA",170,101,6,1,1,16,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"DATA",170,101,6,1,1,17,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366147009"
+"DATA",170,101,6,1,1,18,0)
+ 
+"DATA",170,101,6,1,1,19,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"DATA",170,101,6,1,1,20,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366199006"
+"DATA",170,101,6,1,1,21,0)
+ 
+"DATA",170,101,6,1,1,22,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"DATA",170,101,6,1,1,23,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="22253000"
+"DATA",170,101,6,1,1,24,0)
+ 
+"DATA",170,101,6,1,1,25,0)
+It is planned that these codes be retrieved from a C0CCODES FILE in a 
+"DATA",170,101,6,1,1,26,0)
+future patch for easier maintenance.
+"DATA",170,101,6,197,0)
+SNO
+"DATA",170,101,6,197,1,0)
+^^26^26^3081121^
+"DATA",170,101,6,197,1,1,0)
+The SNOMED CT codes for Vitals are assigned by the extraction according 
+"DATA",170,101,6,197,1,2,0)
+to the vital signs supported in VistA as follows:
+"DATA",170,101,6,197,1,3,0)
+ 
+"DATA",170,101,6,197,1,4,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"DATA",170,101,6,197,1,5,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="248327008"
+"DATA",170,101,6,197,1,6,0)
+ 
+"DATA",170,101,6,197,1,7,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"DATA",170,101,6,197,1,8,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="107647005"
+"DATA",170,101,6,197,1,9,0)
+ 
+"DATA",170,101,6,197,1,10,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"DATA",170,101,6,197,1,11,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="392570002"
+"DATA",170,101,6,197,1,12,0)
+ 
+"DATA",170,101,6,197,1,13,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"DATA",170,101,6,197,1,14,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="309646008"
+"DATA",170,101,6,197,1,15,0)
+ 
+"DATA",170,101,6,197,1,16,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"DATA",170,101,6,197,1,17,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366147009"
+"DATA",170,101,6,197,1,18,0)
+ 
+"DATA",170,101,6,197,1,19,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"DATA",170,101,6,197,1,20,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366199006"
+"DATA",170,101,6,197,1,21,0)
+ 
+"DATA",170,101,6,197,1,22,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"DATA",170,101,6,197,1,23,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="22253000"
+"DATA",170,101,6,197,1,24,0)
+ 
+"DATA",170,101,6,197,1,25,0)
+It is planned that these codes be retrieved from a C0CCODES FILE in a 
+"DATA",170,101,6,197,1,26,0)
+future patch for easier maintenance.
+"DATA",170,101,7)
+I^VITALS^^11
+"DATA",170,102,0)
+VITALSIGNSCODEVERSION
+"DATA",170,102,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/Version
+"DATA",170,102,4)
+^CV
+"DATA",170,102,6,0)
+^170.08S^1^1
+"DATA",170,102,6,1,0)
+SNO
+"DATA",170,102,6,1,1,0)
+^^26^26^3081121^
+"DATA",170,102,6,1,1,1,0)
+The SNOMED CT codes for Vitals are assigned by the extraction according 
+"DATA",170,102,6,1,1,2,0)
+to the vital signs supported in VistA as follows:
+"DATA",170,102,6,1,1,3,0)
+ 
+"DATA",170,102,6,1,1,4,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"DATA",170,102,6,1,1,5,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="248327008"
+"DATA",170,102,6,1,1,6,0)
+ 
+"DATA",170,102,6,1,1,7,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"DATA",170,102,6,1,1,8,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="107647005"
+"DATA",170,102,6,1,1,9,0)
+ 
+"DATA",170,102,6,1,1,10,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"DATA",170,102,6,1,1,11,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="392570002"
+"DATA",170,102,6,1,1,12,0)
+ 
+"DATA",170,102,6,1,1,13,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"DATA",170,102,6,1,1,14,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="309646008"
+"DATA",170,102,6,1,1,15,0)
+ 
+"DATA",170,102,6,1,1,16,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"DATA",170,102,6,1,1,17,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366147009"
+"DATA",170,102,6,1,1,18,0)
+ 
+"DATA",170,102,6,1,1,19,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"DATA",170,102,6,1,1,20,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366199006"
+"DATA",170,102,6,1,1,21,0)
+ 
+"DATA",170,102,6,1,1,22,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"DATA",170,102,6,1,1,23,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="22253000"
+"DATA",170,102,6,1,1,24,0)
+ 
+"DATA",170,102,6,1,1,25,0)
+It is planned that these codes be retrieved from a C0CCODES FILE in a 
+"DATA",170,102,6,1,1,26,0)
+future patch for easier maintenance.
+"DATA",170,102,7)
+N^VITALS^^11
+"DATA",170,103,0)
+VITALSIGNSTESTSOURCEACTORID
+"DATA",170,103,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Source/Actor/ActorID
+"DATA",170,103,4)
+^ID
+"DATA",170,103,7)
+N^VITALS^^11
+"DATA",170,104,0)
+VITALSIGNSTESTRESULTVALUE
+"DATA",170,104,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/TestResult/Value
+"DATA",170,104,7)
+N^VITALS^^11
+"DATA",170,105,0)
+VITALSIGNSTESTRESULTUNIT
+"DATA",170,105,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/TestResult/Units/Unit
+"DATA",170,105,7)
+N^VITALS^^11
+"DATA",170,106,0)
+RESULTOBJECTID
+"DATA",170,106,1)
+//ContinuityOfCareRecord/Body/Results/Result/CCRDataObjectID
+"DATA",170,106,4)
+^ID
+"DATA",170,106,7)
+N^LABS^RESULTS^14
+"DATA",170,107,0)
+RESULTASSESSMENTDATETIME
+"DATA",170,107,1)
+//ContinuityOfCareRecord/Body/Results/Result/DateTime/ExactDateTime
+"DATA",170,107,3,0)
+^^4^4^3081122^
+"DATA",170,107,3,1,0)
+The result assessment time is pulled from OBR7 of the HL7 message for LABS
+"DATA",170,107,3,2,0)
+ 
+"DATA",170,107,3,3,0)
+ S X("OBR","OBR7")="7^00241^Observation 
+"DATA",170,107,3,4,0)
+Date/Time^RESULTASSESSMENTDATETIME"
+"DATA",170,107,4)
+^DT
+"DATA",170,107,5,0)
+^^4^4^3081122^
+"DATA",170,107,5,1,0)
+The result assessment date is pulled from OB7 of the HL7 message for LABS.
+"DATA",170,107,5,2,0)
+ 
+"DATA",170,107,5,3,0)
+ S X("OBR","OBR7")="7^00241^Observation 
+"DATA",170,107,5,4,0)
+Date/Time^RESULTASSESSMENTDATETIME"
+"DATA",170,107,7)
+I^LABS^^14
+"DATA",170,108,0)
+RESULTDESCRIPTIONTEXT
+"DATA",170,108,1)
+//ContinuityOfCareRecord/Body/Results/Result/Description/Text
+"DATA",170,108,7)
+N^LABS^^14
+"DATA",170,109,0)
+RESULTCODE
+"DATA",170,109,1)
+//ContinuityOfCareRecord/Body/Results/Result/Description/Code/Value
+"DATA",170,109,3,0)
+^170.04^5^5^3091027^^
+"DATA",170,109,3,1,0)
+The result code is pulled from OBR4 piece 1 of the HL7 message for LABS. 
+"DATA",170,109,3,2,0)
+ 
+"DATA",170,109,3,3,0)
+ 
+"DATA",170,109,3,4,0)
+ S X("OBR","OBR4;LOINC")="4;1^00238^Universal Service ID - 
+"DATA",170,109,3,5,0)
+LOINC^RESULTCODE"
+"DATA",170,109,4)
+^CD
+"DATA",170,109,6,0)
+^170.08S^1^1
+"DATA",170,109,6,1,0)
+LN
+"DATA",170,109,6,1,1,0)
+^170.81^4^4^3091027^^^^
+"DATA",170,109,6,1,1,1,0)
+The result code is a LOINC passed in OBR4 piece 1 of the HL7 message.
+"DATA",170,109,6,1,1,2,0)
+ 
+"DATA",170,109,6,1,1,3,0)
+ S X("OBR","OBR4;LOINC")="4;1^00238^Universal Service ID - 
+"DATA",170,109,6,1,1,4,0)
+LOINC^RESULTCODE"
+"DATA",170,109,7)
+I^LABS^^14
+"DATA",170,110,0)
+RESULTCODINGSYSTEM
+"DATA",170,110,1)
+//ContinuityOfCareRecord/Body/Results/Result/Description/Code/CodingSystem
+"DATA",170,110,4)
+^CS
+"DATA",170,110,7)
+N^LABS^^14
+"DATA",170,111,0)
+RESULTSTATUS
+"DATA",170,111,1)
+//ContinuityOfCareRecord/Body/Results/Result/Status/Text
+"DATA",170,111,7)
+N^LABS^^14
+"DATA",170,112,0)
+RESULTSOURCEACTORID
+"DATA",170,112,1)
+//ContinuityOfCareRecord/Body/Results/Result/Source/Actor/ActorID
+"DATA",170,112,4)
+^ID
+"DATA",170,112,7)
+N^LABS^^14
+"DATA",170,113,0)
+RESULTTESTOBJECTID
+"DATA",170,113,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/CCRDataObjectID
+"DATA",170,113,4)
+^ID
+"DATA",170,113,7)
+N^TEST^^10
+"DATA",170,114,0)
+RESULTTESTDATETIME
+"DATA",170,114,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/DateTime/ExactDateTime
+"DATA",170,114,4)
+^DT
+"DATA",170,114,7)
+N^TEST^^10
+"DATA",170,115,0)
+RESULTTESTDESCRIPTIONTEXT
+"DATA",170,115,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Description/Text
+"DATA",170,115,7)
+N^TEST^^10
+"DATA",170,116,0)
+RESULTTESTCODEVALUE
+"DATA",170,116,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Description/Code/Value
+"DATA",170,116,4)
+^CD
+"DATA",170,116,7)
+N^TEST^^10
+"DATA",170,117,0)
+RESULTTESTCODINGSYSTEM
+"DATA",170,117,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Description/Code/CodingSystem
+"DATA",170,117,4)
+^CS
+"DATA",170,117,7)
+N^TEST^RESULTSLN^10
+"DATA",170,118,0)
+RESULTTESTSTATUSTEXT
+"DATA",170,118,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Status/Text
+"DATA",170,118,7)
+N^TEST^^10
+"DATA",170,119,0)
+RESULTTESTSOURCEACTORID
+"DATA",170,119,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Source/Actor/ActorID
+"DATA",170,119,4)
+^ID
+"DATA",170,119,7)
+N^TEST^^10
+"DATA",170,120,0)
+RESULTTESTVALUE
+"DATA",170,120,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/TestResult/Value
+"DATA",170,120,7)
+N^TEST^^10
+"DATA",170,121,0)
+RESULTTESTUNITS
+"DATA",170,121,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/TestResult/Units/Unit
+"DATA",170,121,7)
+N^TEST^^10
+"DATA",170,122,0)
+RESULTTESTNORMALDESCTEXT
+"DATA",170,122,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/NormalResult/Normal/Description/Text
+"DATA",170,122,7)
+N^TEST^^10
+"DATA",170,123,0)
+RESULTTESTNORMALSOURCEACTORID
+"DATA",170,123,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/NormalResult/Normal/Source/Actor/ActorID
+"DATA",170,123,4)
+^ID
+"DATA",170,123,7)
+N^TEST^^10
+"DATA",170,124,0)
+RESULTTESTFLAG
+"DATA",170,124,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Flag/Text
+"DATA",170,124,7)
+N^TEST^^10
+"DATA",170,125,0)
+ACTORDATEOFBIRTH
+"DATA",170,125,1)
+//ContinuityOfCareRecord/Actors/Actor/Person/DateOfBirth/ExactDateTime
+"DATA",170,125,7)
+N^ACTORS^^6
+"DATA",170,126,0)
+ACTORGENDER
+"DATA",170,126,1)
+//ContinuityOfCareRecord/Actors/Actor/Person/Gender/Code/Value
+"DATA",170,126,7)
+N^ACTORS^^6
+"DATA",170,127,0)
+ACTORSSNTEXT
+"DATA",170,127,1)
+//ContinuityOfCareRecord/Actors/Actor/IDs/Type/Text
+"DATA",170,127,7)
+N^ACTORS^^6
+"DATA",170,128,0)
+ACTORSSN
+"DATA",170,128,1)
+//ContinuityOfCareRecord/Actors/Actor/IDs/ID
+"DATA",170,128,7)
+N^ACTORS^^6
+"DATA",170,129,0)
+ACTORSSNSOURCEID
+"DATA",170,129,1)
+//ContinuityOfCareRecord/Actors/Actor/IDs/Source/Actor/ActorID
+"DATA",170,129,4)
+^ID
+"DATA",170,129,7)
+N^ACTORS^^6
+"DATA",170,130,0)
+ACTORADDRESSLINE2
+"DATA",170,130,1)
+//ContinuityOfCareRecord/Actors/Actor/Address/Line2
+"DATA",170,130,7)
+N^ACTORS^^6
+"DATA",170,131,0)
+ACTORADDRESSZIPCODE
+"DATA",170,131,1)
+//ContinuityOfCareRecord/Actors/Actor/Address/PostalCode
+"DATA",170,131,7)
+N^ACTORS^^6
+"DATA",170,132,0)
+ACTORRESTEL
+"DATA",170,132,7)
+N^ACTORS^^6
+"DATA",170,133,0)
+ACTORRESTELTEXT
+"DATA",170,133,7)
+N^ACTORS^^6
+"DATA",170,134,0)
+ACTORWORKTEL
+"DATA",170,134,7)
+N^ACTORS^^6
+"DATA",170,135,0)
+ACTORWORKTELTEXT
+"DATA",170,135,7)
+N^ACTORS^^6
+"DATA",170,136,0)
+ACTORCELLTEL
+"DATA",170,136,7)
+N^ACTORS^^6
+"DATA",170,137,0)
+ACTORCELLTELTEXT
+"DATA",170,137,7)
+N^ACTORS^^6
+"DATA",170,138,0)
+ACTORADDRESSSOURCEID
+"DATA",170,138,1)
+//ContinuityOfCareRecord/Actors/Actor/Source/Actor/ActorID
+"DATA",170,138,4)
+^ID
+"DATA",170,138,7)
+N^ACTORS^^6
+"DATA",170,139,0)
+ACTORINFOSYSNAME
+"DATA",170,139,1)
+//ContinuityOfCareRecord/Actors/Actor/InformationSystem/Name
+"DATA",170,139,7)
+N^ACTORS^^6
+"DATA",170,140,0)
+ACTORINFOSYSVER
+"DATA",170,140,1)
+//ContinuityOfCareRecord/Actors/Actor/InformationSystem/Version
+"DATA",170,140,7)
+N^ACTORS^^6
+"DATA",170,141,0)
+ACTORINFOSYSSOURCEID
+"DATA",170,141,1)
+//ContinuityOfCareRecord/Actors/Actor/Source/Actor/ActorID
+"DATA",170,141,4)
+^ID
+"DATA",170,141,7)
+N^ACTORS^^6
+"DATA",170,142,0)
+ACTORDISPLAYNAME
+"DATA",170,142,1)
+//ContinuityOfCareRecord/Actors/Actor/Person/Name/DisplayName
+"DATA",170,142,7)
+N^ACTORS^^6
+"DATA",170,143,0)
+ACTORRELATION
+"DATA",170,143,1)
+//ContinuityOfCareRecord/Actors/Actor/Relation/Text
+"DATA",170,143,7)
+N^ACTORS^^6
+"DATA",170,144,0)
+ACTORRELATIONSOURCEID
+"DATA",170,144,1)
+//ContinuityOfCareRecord/Actors/Actor/Source/Actor/ActorID
+"DATA",170,144,4)
+^ID
+"DATA",170,144,7)
+N^ACTORS^^6
+"DATA",170,145,0)
+ACTORGIVENNAME
+"DATA",170,145,1)
+//ContinuityOfCareRecord/Actors/Actor/Person/Name/CurrentName/Given
+"DATA",170,145,7)
+N^ACTORS^^6
+"DATA",170,146,0)
+ACTORMIDDLENAME
+"DATA",170,146,1)
+//ContinuityOfCareRecord/Actors/Actor/Person/Name/CurrentName/Middle
+"DATA",170,146,7)
+N^ACTORS^^6
+"DATA",170,147,0)
+ACTORFAMILYNAME
+"DATA",170,147,1)
+//ContinuityOfCareRecord/Actors/Actor/Person/Name/CurrentName/Family
+"DATA",170,147,4)
+^V
+"DATA",170,147,7)
+N^ACTORS^^6
+"DATA",170,148,0)
+ACTORTITLE
+"DATA",170,148,1)
+//ContinuityOfCareRecord/Actors/Actor/Person/Name/CurrentName/Title
+"DATA",170,148,7)
+N^ACTORS^^6
+"DATA",170,149,0)
+IDTYPE
+"DATA",170,149,1)
+//ContinuityOfCareRecord/Actors/Actor/IDs/Type/Text
+"DATA",170,149,7)
+N^^^6
+"DATA",170,150,0)
+ID
+"DATA",170,150,1)
+//ContinuityOfCareRecord/Actors/Actor/IDs/ID
+"DATA",170,150,4)
+^ID
+"DATA",170,150,7)
+N^^^6
+"DATA",170,151,0)
+IDDESC
+"DATA",170,151,1)
+//ContinuityOfCareRecord/Actors/Actor/IDs/IssuedBy/Description/Text
+"DATA",170,151,7)
+N^^^6
+"DATA",170,152,0)
+ACTORSPECIALITY
+"DATA",170,152,1)
+//ContinuityOfCareRecord/Actors/Actor/Specialty/Text
+"DATA",170,152,7)
+N^ACTORS^^6
+"DATA",170,153,0)
+ACTORADDRESSTYPE
+"DATA",170,153,1)
+//ContinuityOfCareRecord/Actors/Actor/Address/Type/Text
+"DATA",170,153,7)
+N^ACTORS^^6
+"DATA",170,154,0)
+ACTORADDRESSLINE1
+"DATA",170,154,1)
+//ContinuityOfCareRecord/Actors/Actor/Address/Line1
+"DATA",170,154,7)
+N^ACTORS^^6
+"DATA",170,155,0)
+ACTORADDRESSCITY
+"DATA",170,155,1)
+//ContinuityOfCareRecord/Actors/Actor/Address/City
+"DATA",170,155,7)
+N^ACTORS^^6
+"DATA",170,156,0)
+ACTORADDRESSSTATE
+"DATA",170,156,1)
+//ContinuityOfCareRecord/Actors/Actor/Address/State
+"DATA",170,156,7)
+N^ACTORS^^6
+"DATA",170,157,0)
+ACTORPOSTALCODE
+"DATA",170,157,1)
+//ContinuityOfCareRecord/Actors/Actor/Address/PostalCode
+"DATA",170,157,7)
+N^ACTORS^^6
+"DATA",170,158,0)
+ACTORTELEPHONE
+"DATA",170,158,1)
+//ContinuityOfCareRecord/Actors/Actor/Telephone/Value
+"DATA",170,158,7)
+N^ACTORS^^6
+"DATA",170,159,0)
+ACTORTELEPHONETYPE
+"DATA",170,159,1)
+//ContinuityOfCareRecord/Actors/Actor/Telephone/Type/Text
+"DATA",170,159,7)
+N^ACTORS^^6
+"DATA",170,160,0)
+ACTOREMAIL
+"DATA",170,160,1)
+//ContinuityOfCareRecord/Actors/Actor/Email/Value
+"DATA",170,160,7)
+N^ACTORS^^6
+"DATA",170,161,0)
+ACTOROBJECTID
+"DATA",170,161,1)
+//ContinuityOfCareRecord/Actors/Actor/ActorObjectID
+"DATA",170,161,4)
+^ID
+"DATA",170,161,7)
+N^ACTORS^^6
+"DATA",170,162,0)
+ORGANIZATIONNAME
+"DATA",170,162,1)
+//ContinuityOfCareRecord/Actors/Actor/Organization/Name
+"DATA",170,162,7)
+N^^^6
+"DATA",170,163,0)
+ACTORSOURCEID
+"DATA",170,163,1)
+//ContinuityOfCareRecord/Actors/Actor/Source/Actor/ActorID
+"DATA",170,163,4)
+^ID
+"DATA",170,163,7)
+N^ACTORS^^6
+"DATA",170,164,0)
+PROBLEMCONDITION
+"DATA",170,164,7)
+^^^5
+"DATA",170,165,0)
+PROBLEMDATEMOD
+"DATA",170,165,1)
+//ContinuityOfCareRecord/Body/Problems/Problem/DateTime/ExactDateTime
+"DATA",170,165,7)
+^^^5
+"DATA",170,166,0)
+PROBLEMDATEOFONSET
+"DATA",170,166,7)
+^^^5
+"DATA",170,167,0)
+PROBLEMDTREC
+"DATA",170,167,7)
+^^^5
+"DATA",170,168,0)
+PROBLEMHASCMT
+"DATA",170,168,7)
+^^^5
+"DATA",170,169,0)
+PROBLEMIEN
+"DATA",170,169,7)
+^^^5
+"DATA",170,170,0)
+PROBLEMINACT
+"DATA",170,170,7)
+^^^5
+"DATA",170,171,0)
+PROBLEMLOC
+"DATA",170,171,7)
+^^^5
+"DATA",170,172,0)
+PROBLEMLOCTYPE
+"DATA",170,172,7)
+^^^5
+"DATA",170,173,0)
+PROBLEMPROVIDER
+"DATA",170,173,7)
+^^^5
+"DATA",170,174,0)
+PROBLEMSC
+"DATA",170,174,7)
+^^^5
+"DATA",170,175,0)
+PROBLEMSE
+"DATA",170,175,7)
+^^^5
+"DATA",170,176,0)
+PROBLEMSERVICE
+"DATA",170,176,7)
+^^^5
+"DATA",170,177,0)
+PROBLEMSTATUS
+"DATA",170,177,1)
+//ContinuityOfCareRecord/Body/Problems/Problem/Status/Text
+"DATA",170,177,7)
+^^^5
+"DATA",170,178,0)
+IMMUNEDATETIME
+"DATA",170,178,1)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/DateTime/ExactDateTime
+"DATA",170,178,7)
+^^^15
+"DATA",170,179,0)
+IMMUNEDATETIMETYPETEXT
+"DATA",170,179,1)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/DateTime/Type/Text
+"DATA",170,179,7)
+^^^15
+"DATA",170,180,0)
+IMMUNEOBJECTID
+"DATA",170,180,1)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/CCRDataObjectID
+"DATA",170,180,4)
+^ID
+"DATA",170,180,7)
+^IMM^^15
+"DATA",170,181,0)
+IMMUNEPRODUCTCODE
+"DATA",170,181,1)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/Product/ProductName/Code/Value
+"DATA",170,181,7)
+^^^15
+"DATA",170,182,0)
+IMMUNEPRODUCTCODESYSTEM
+"DATA",170,182,1)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/Product/ProductName/Code/CodingSystem
+"DATA",170,182,7)
+^^^15
+"DATA",170,183,0)
+IMMUNEPRODUCTNAMETEXT
+"DATA",170,183,1)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/Product/ProductName/Text
+"DATA",170,183,7)
+^^^15
+"DATA",170,184,0)
+IMMUNESOURCEACTORID
+"DATA",170,184,1)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/Source/Actor/ActorID
+"DATA",170,184,7)
+^^^15
+"DATA",170,185,0)
+ALERTCODESYSTEMVERSION
+"DATA",170,185,7)
+^^^4
+"DATA",170,186,0)
+ALERTDATETIME
+"DATA",170,186,1)
+//ContinuityOfCareRecord/Body/Alerts/Alert/DateTime/ExactDateTime
+"DATA",170,186,7)
+^ALERTS^^4
+"DATA",170,187,0)
+ALERTTYPE
+"DATA",170,187,7)
+^^^4
+"DATA",170,188,0)
+VITALSIGNSDESCRIPTIONCODEVALUE
+"DATA",170,188,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/Value
+"DATA",170,188,4)
+^CD
+"DATA",170,188,6,0)
+^170.08S^1^1
+"DATA",170,188,6,1,0)
+SNO
+"DATA",170,188,6,1,1,0)
+^^26^26^3081121^
+"DATA",170,188,6,1,1,1,0)
+The SNOMED CT codes for Vitals are assigned by the extraction according 
+"DATA",170,188,6,1,1,2,0)
+to the vital signs supported in VistA as follows:
+"DATA",170,188,6,1,1,3,0)
+ 
+"DATA",170,188,6,1,1,4,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"DATA",170,188,6,1,1,5,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="248327008"
+"DATA",170,188,6,1,1,6,0)
+ 
+"DATA",170,188,6,1,1,7,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"DATA",170,188,6,1,1,8,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="107647005"
+"DATA",170,188,6,1,1,9,0)
+ 
+"DATA",170,188,6,1,1,10,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"DATA",170,188,6,1,1,11,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="392570002"
+"DATA",170,188,6,1,1,12,0)
+ 
+"DATA",170,188,6,1,1,13,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"DATA",170,188,6,1,1,14,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="309646008"
+"DATA",170,188,6,1,1,15,0)
+ 
+"DATA",170,188,6,1,1,16,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"DATA",170,188,6,1,1,17,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366147009"
+"DATA",170,188,6,1,1,18,0)
+ 
+"DATA",170,188,6,1,1,19,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"DATA",170,188,6,1,1,20,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366199006"
+"DATA",170,188,6,1,1,21,0)
+ 
+"DATA",170,188,6,1,1,22,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"DATA",170,188,6,1,1,23,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="22253000"
+"DATA",170,188,6,1,1,24,0)
+ 
+"DATA",170,188,6,1,1,25,0)
+It is planned that these codes be retrieved from a C0CCODES FILE in a 
+"DATA",170,188,6,1,1,26,0)
+future patch for easier maintenance.
+"DATA",170,188,7)
+N^VITALS^^11
+"DATA",170,189,0)
+VITALSIGNSDESCODEVALUE
+"DATA",170,189,7)
+^^^11
+"DATA",170,191,0)
+C1
+"DATA",170,191,7)
+^^^10
+"DATA",170,192,0)
+C2
+"DATA",170,192,7)
+^^^10
+"DATA",170,193,0)
+C3
+"DATA",170,193,7)
+^^^10
+"DATA",170,194,0)
+C4
+"DATA",170,194,7)
+^^^10
+"DATA",170,195,0)
+C5
+"DATA",170,195,7)
+^^^10
+"DATA",170,196,0)
+C6
+"DATA",170,196,7)
+^^^10
+"DATA",170,197,0)
+VITALSIGNSDESCRIPTIONCODINGSYSTEM
+"DATA",170,197,1)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/CodingSystem
+"DATA",170,197,4)
+^CS
+"DATA",170,197,6,0)
+^170.08S^1^1
+"DATA",170,197,6,1,0)
+SNO
+"DATA",170,197,6,1,1,0)
+^^26^26^3081121^
+"DATA",170,197,6,1,1,1,0)
+The SNOMED CT codes for Vitals are assigned by the extraction according 
+"DATA",170,197,6,1,1,2,0)
+to the vital signs supported in VistA as follows:
+"DATA",170,197,6,1,1,3,0)
+ 
+"DATA",170,197,6,1,1,4,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"DATA",170,197,6,1,1,5,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="248327008"
+"DATA",170,197,6,1,1,6,0)
+ 
+"DATA",170,197,6,1,1,7,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"DATA",170,197,6,1,1,8,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="107647005"
+"DATA",170,197,6,1,1,9,0)
+ 
+"DATA",170,197,6,1,1,10,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"DATA",170,197,6,1,1,11,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="392570002"
+"DATA",170,197,6,1,1,12,0)
+ 
+"DATA",170,197,6,1,1,13,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"DATA",170,197,6,1,1,14,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="309646008"
+"DATA",170,197,6,1,1,15,0)
+ 
+"DATA",170,197,6,1,1,16,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"DATA",170,197,6,1,1,17,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366147009"
+"DATA",170,197,6,1,1,18,0)
+ 
+"DATA",170,197,6,1,1,19,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"DATA",170,197,6,1,1,20,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366199006"
+"DATA",170,197,6,1,1,21,0)
+ 
+"DATA",170,197,6,1,1,22,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"DATA",170,197,6,1,1,23,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="22253000"
+"DATA",170,197,6,1,1,24,0)
+ 
+"DATA",170,197,6,1,1,25,0)
+It is planned that these codes be retrieved from a C0CCODES FILE in a 
+"DATA",170,197,6,1,1,26,0)
+future patch for easier maintenance.
+"DATA",170,197,7)
+N^VITALS^^11
+"DATA",170,198,0)
+RESULTTESTNORMALDESCRIPTIONTEXT
+"DATA",170,198,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/NormalResult/Normal/Description/Text
+"DATA",170,198,7)
+N^TEST^^10
+"DATA",170,199,0)
+ACTORGENDERCODINGSYSTEM
+"DATA",170,199,1)
+//ContinuityOfCareRecord/Actors/Actor/Person/Gender/Code/CodingSystem
+"DATA",170,199,4)
+^CS
+"DATA",170,199,7)
+^ACTORS^^6
+"DATA",170,200,0)
+ACTORGENDERTEXT
+"DATA",170,200,1)
+//ContinuityOfCareRecord/Actors/Actor/Person/Gender/Text
+"DATA",170,200,4)
+^V
+"DATA",170,200,7)
+^ACTORS^^6
+"DATA",170,201,0)
+RESULTASSESSMENTTIME
+"DATA",170,201,1)
+//ContinuityOfCareRecord/Body/Results/Result/DateTime/Type/Text
+"DATA",170,201,4)
+^V
+"DATA",170,201,7)
+^LABS^^9
+"DATA",170,202,0)
+RESULTTESTASSESSMENTTIME
+"DATA",170,202,1)
+//ContinuityOfCareRecord/Body/Results/Result/Test/DateTime/Type/Text
+"DATA",170,202,4)
+^V
+"DATA",170,202,7)
+^TEST^^10
+"DATA",170,203,0)
+CCRDOCOBJECTID
+"DATA",170,203,1)
+//ContinuityOfCareRecord/CCRDocumentObjectID
+"DATA",170,203,4)
+^ID
+"DATA",170,203,7)
+^HEADER^^1
+"DATA",170,204,0)
+CCRLANGUAGE
+"DATA",170,204,1)
+//ContinuityOfCareRecord/Language/Text
+"DATA",170,204,4)
+^V
+"DATA",170,204,7)
+^HEADER^^1
+"DATA",170,205,0)
+CCRVERSION
+"DATA",170,205,1)
+//ContinuityOfCareRecord/Version
+"DATA",170,205,4)
+^V
+"DATA",170,205,7)
+^HEADER^^1
+"DATA",170,206,0)
+PROBLEMCODINGSYSTEM
+"DATA",170,206,1)
+//ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/CodingSystem
+"DATA",170,206,4)
+^CS
+"DATA",170,206,6,0)
+^170.08S^1^1
+"DATA",170,206,6,1,0)
+ICD
+"DATA",170,206,7)
+^PROBLEMS^^5
+"DATA",170,207,0)
+PROBLEMTYPE
+"DATA",170,207,1)
+//ContinuityOfCareRecord/Body/Problems/Problem/Type/Text
+"DATA",170,207,4)
+^V
+"DATA",170,207,7)
+^PROBLEMS^^5
+"DATA",170,208,0)
+PROCOBJECTID
+"DATA",170,208,1)
+//Procedures/Procedure/CCRDataObjectID
+"DATA",170,208,4)
+^ID
+"DATA",170,208,7)
+N^^^16
+"DATA",170,209,0)
+PROCDATETIME
+"DATA",170,209,1)
+//Procedures/Procedure/DateTime/ExactDateTime
+"DATA",170,209,4)
+^DT
+"DATA",170,209,7)
+^^^16
+"DATA",170,210,0)
+PROCDATETEXT
+"DATA",170,210,1)
+//Procedures/Procedure/DateTime/Type/Text
+"DATA",170,210,4)
+^V
+"DATA",170,210,7)
+^^^16
+"DATA",170,211,0)
+PROCDESCTEXT
+"DATA",170,211,1)
+//Procedures/Procedure/Description/Text
+"DATA",170,211,4)
+^V
+"DATA",170,211,7)
+^^^16
+"DATA",170,212,0)
+PROCDESCOBJATTR
+"DATA",170,212,1)
+//Procedures/Procedure/Description/ObjectAttribute/Attribute
+"DATA",170,212,7)
+^^^16
+"DATA",170,213,0)
+PROCDESCOBJATTRVAL
+"DATA",170,213,1)
+//Procedures/Procedure/Description/ObjectAttribute/AttributeValue/Value
+"DATA",170,213,7)
+^^^16
+"DATA",170,214,0)
+PROCDESCOBJATTRCODE
+"DATA",170,214,1)
+//Procedures/Procedure/Description/ObjectAttribute/AttributeValue/Code/Value
+"DATA",170,214,7)
+^^^16
+"DATA",170,215,0)
+PROCDESCOBJATTRCODESYS
+"DATA",170,215,1)
+//Procedures/Procedure/Description/ObjectAttribute/AttributeValue/Code/CodingSystem
+"DATA",170,215,7)
+^^^16
+"DATA",170,216,0)
+PROCCODE
+"DATA",170,216,1)
+//Procedures/Procedure/Description/Code/Value
+"DATA",170,216,7)
+^^^16
+"DATA",170,217,0)
+PROCCODESYS
+"DATA",170,217,1)
+//Procedures/Procedure/Description/Code/CodingSystem
+"DATA",170,217,7)
+^^^16
+"DATA",170,218,0)
+PROCSTATUS
+"DATA",170,218,1)
+//Procedures/Procedure/Status/Text
+"DATA",170,218,7)
+^^^16
+"DATA",170,219,0)
+PROCACTOROBJID
+"DATA",170,219,1)
+//Procedures/Procedure/Source/Actor/ActorID
+"DATA",170,219,4)
+^ID
+"DATA",170,219,7)
+^^^16
+"DATA",170,220,0)
+PROCLINKID
+"DATA",170,220,1)
+//Procedures/Procedure/InternalCCRLink/LinkID
+"DATA",170,220,4)
+^ID
+"DATA",170,220,7)
+^^^16
+"DATA",170,221,0)
+PROCLINKREL
+"DATA",170,221,1)
+//Procedures/Procedure/InternalCCRLink/LinkRelationship
+"DATA",170,221,4)
+^V
+"DATA",170,221,7)
+^^^16
+"DATA",170,222,0)
+ENCOBJECTID
+"DATA",170,222,1)
+//Encounters/Encounter/CCRDataObjectID
+"DATA",170,222,4)
+^ID
+"DATA",170,222,7)
+^^^17
+"DATA",170,223,0)
+ENCDATETIME
+"DATA",170,223,1)
+//Encounters/Encounter/DateTime/ExactDateTime
+"DATA",170,223,4)
+^DT
+"DATA",170,223,7)
+^^^17
+"DATA",170,224,0)
+ENCTYPE
+"DATA",170,224,1)
+//Encounters/Encounter/Type/Text
+"DATA",170,224,4)
+^V
+"DATA",170,224,7)
+^^^17
+"DATA",170,225,0)
+ENCCODE
+"DATA",170,225,1)
+//Encounters/Encounter/Type/Code/Value
+"DATA",170,225,4)
+^CD
+"DATA",170,225,7)
+^^^17
+"DATA",170,226,0)
+ENCCODESYS
+"DATA",170,226,1)
+//Encounters/Encounter/Type/Code/CodingSystem
+"DATA",170,226,4)
+^CS
+"DATA",170,226,7)
+^^^17
+"DATA",170,227,0)
+ENCACTORID
+"DATA",170,227,1)
+//Encounters/Encounter/Source/Actor/ActorID
+"DATA",170,227,4)
+^ID
+"DATA",170,227,7)
+^^^17
+"DATA",170,228,0)
+ENCLOCACTORID
+"DATA",170,228,1)
+//Encounters/Encounter/Locations/Location/Actor/ActorID
+"DATA",170,228,4)
+^ID
+"DATA",170,228,7)
+^^^17
+"DATA",170,229,0)
+ENCCOMMENTID
+"DATA",170,229,1)
+//Encounters/Encounter/CommentID
+"DATA",170,229,4)
+^ID
+"DATA",170,229,7)
+^^^17
+"DATA",170.101,1,0)
+HEADER^2
+"DATA",170.101,1,1,0)
+^170.1012P^3^3
+"DATA",170.101,1,1,1,0)
+3
+"DATA",170.101,1,1,2,0)
+5
+"DATA",170.101,1,1,3,0)
+7
+"DATA",170.101,2,0)
+ROOT
+"DATA",170.101,2,2,0)
+^170.1013P^1^1
+"DATA",170.101,2,2,1,0)
+1
+"DATA",170.101,3,0)
+BODY^2
+"DATA",170.101,4,0)
+ALERTS^3
+"DATA",170.101,4,1,0)
+^170.1012P^3^3
+"DATA",170.101,4,1,1,0)
+37
+"DATA",170.101,4,1,2,0)
+35
+"DATA",170.101,4,1,3,0)
+36
+"DATA",170.101,5,0)
+PROBLEMS^3
+"DATA",170.101,5,1,0)
+^170.1012P^4^4
+"DATA",170.101,5,1,1,0)
+10
+"DATA",170.101,5,1,2,0)
+11
+"DATA",170.101,5,1,3,0)
+9
+"DATA",170.101,5,1,4,0)
+8
+"DATA",170.101,6,0)
+ACTORS^2
+"DATA",170.101,6,1,0)
+^170.1012P^1^1
+"DATA",170.101,6,1,1,0)
+155
+"DATA",170.101,7,0)
+MEDS^3
+"DATA",170.101,7,1,0)
+^170.1012P^2^2
+"DATA",170.101,7,1,1,0)
+56
+"DATA",170.101,7,1,2,0)
+61
+"DATA",170.101,7,2,0)
+^170.1013P^1^1
+"DATA",170.101,7,2,1,0)
+8
+"DATA",170.101,8,0)
+DIRECTIONS^7
+"DATA",170.101,8,1,0)
+^170.1012P^200^6
+"DATA",170.101,8,1,1,0)
+65
+"DATA",170.101,8,1,2,0)
+88
+"DATA",170.101,8,1,3,0)
+65
+"DATA",170.101,8,1,4,0)
+88
+"DATA",170.101,8,1,199,0)
+65
+"DATA",170.101,8,1,200,0)
+88
+"DATA",170.101,9,0)
+RESULTS^3
+"DATA",170.101,9,1,0)
+^170.1012P^2^2
+"DATA",170.101,9,1,1,0)
+109
+"DATA",170.101,9,1,2,0)
+110
+"DATA",170.101,9,2,0)
+^170.1013P^1^1
+"DATA",170.101,9,2,1,0)
+10
+"DATA",170.101,10,0)
+TEST^14
+"DATA",170.101,10,1,0)
+^170.1012P^1^1
+"DATA",170.101,10,1,1,0)
+116
+"DATA",170.101,11,0)
+VITALS^3
+"DATA",170.101,11,1,0)
+^170.1012P^5^5
+"DATA",170.101,11,1,1,0)
+100
+"DATA",170.101,11,1,2,0)
+99
+"DATA",170.101,11,1,3,0)
+102
+"DATA",170.101,11,1,4,0)
+93
+"DATA",170.101,11,1,5,0)
+94
+"DATA",170.101,12,0)
+FAM^3
+"DATA",170.101,12,1,0)
+^170.1012P^1^1
+"DATA",170.101,12,1,1,0)
+14
+"DATA",170.101,13,0)
+SOC^3
+"DATA",170.101,13,1,0)
+^170.1012P^1^1
+"DATA",170.101,13,1,1,0)
+25
+"DATA",170.101,14,0)
+LABS^3
+"DATA",170.101,14,1,0)
+^170.1012P^1^1
+"DATA",170.101,14,1,1,0)
+109
+"DATA",170.101,14,2,0)
+^170.1013P^1^1
+"DATA",170.101,14,2,1,0)
+10
+"DATA",170.101,15,0)
+IMMUNE^3
+"DATA",170.101,16,0)
+PROCEDURES^3
+"DATA",170.101,16,1,0)
+^170.1012P^1^1
+"DATA",170.101,16,1,1,0)
+208
+"DATA",170.101,17,0)
+ENCOUNTERS^3
+"DATA",170.9,1,0)
+DEFAULT^T-360^T^T-360
+"DATA",170.9,1,1)
+T^T-360^T^ACT
+"DATA",170.9,1,2)
+T-500^T^1
+"DATA",176.112,19701,0)
+4001533^DIATRIZOATE MEGLUMINE 85% INJ
+"DATA",176.112,19701,1)
+809873
+"DATA",176.112,19702,0)
+4005434^HC 0.5%/N-MYCIN 5MG/POLYMYX 10000UNT/GM CREAM,TOP
+"DATA",176.112,19702,1)
+809813
+"DATA",176.112,19703,0)
+4009610^CALCIUM CARBONATE 1.5GM/VITAMIN D 200UNT TAB
+"DATA",176.112,19703,1)
+809533
+"DATA",176.112,19704,0)
+4015287^CALCIUM 600MG (AS CARBONATE)/VITAMIN D 200UNT TAB
+"DATA",176.112,19704,1)
+809533
+"DATA",176.112,19705,0)
+4026252^CALCIUM 600MG (AS CARBONATE)/VITAMIN D 400UNIT TAB
+"DATA",176.112,19705,1)
+809529
+"DATA",176.112,19706,0)
+4004622^BELLADONNA ALKALOIDS 0.3888MG/PHENOBARBITAL 48.6MG TAB,SA
+"DATA",176.112,19706,1)
+809353
+"DATA",176.112,19707,0)
+4004619^BELLADONNA ALKALOIDS 0.16MG/PHENOBARBITAL 16MG TAB
+"DATA",176.112,19707,1)
+809351
+"DATA",176.112,19708,0)
+4009563^BENZOIC ACID 6%/SALICYLIC ACID 12% OINT,TOP
+"DATA",176.112,19708,1)
+809346
+"DATA",176.112,19709,0)
+4016228^LOVASTATIN 20MG/NIACIN 1000MG TAB
+"DATA",176.112,19709,1)
+809345
+"DATA",176.112,19710,0)
+4003834^CTM 12MG/P-EPHRINE 25MG/P-PROPANOL 50MG/P-TOLOXAMINE 30MG CAP,SA
+"DATA",176.112,19710,1)
+809205
+"DATA",176.112,19711,0)
+4003833^CTM 5MG/P-EPHRINE 10MG/P-PROPANOL 40MG/P-TOLOXAMINE 5MG TAB,SA
+"DATA",176.112,19711,1)
+809204
+"DATA",176.112,19712,0)
+4003524^METHYLPREDNISOLONE ACETATE 1%/NEOMYCIN SO4 0.5% CREAM,TOP
+"DATA",176.112,19712,1)
+809174
+"DATA",176.112,19713,0)
+4009000^APAP 108MG/CTM 0.6MG/DM 3.3MG/PSEUDEFED 10MG/5ML LIQUID
+"DATA",176.112,19713,1)
+809172
+"DATA",176.112,19714,0)
+4026052^ETANERCEPT 25MG/0.5ML INJ SYRINGE
+"DATA",176.112,19714,1)
+809158
+"DATA",176.112,19715,0)
+4010451^CTM 1MG/GG 100MG/P-EPHRIN 3.5MG/P-PROPANOL 6MG/PYRILAMIN 6MG TAB
+"DATA",176.112,19715,1)
+809132
+"DATA",176.112,19716,0)
+4007304^CTM 12MG/P-EPHRINE 10MG/P-PROPANOL 40MG CAP,SA
+"DATA",176.112,19716,1)
+809129
+"DATA",176.112,19717,0)
+4007578^APAP 130MG/CTM 2MG/P-EPHRINE 10MG/SALICYLAMIDE 100MG CAP
+"DATA",176.112,19717,1)
+809125
+"DATA",176.112,19718,0)
+4012975^FOSFOMYCIN TROMETHAMINE 3GM GRANULES SACHET
+"DATA",176.112,19718,1)
+808917
+"DATA",176.112,19719,0)
+4006197^VALPROATE NA 250MG/5ML SYRUP
+"DATA",176.112,19719,1)
+808658
+"DATA",176.112,19720,0)
+4006196^VALPROIC ACID 250MG/5ML SYRUP
+"DATA",176.112,19720,1)
+808658
+"DATA",176.112,19721,0)
+4006195^VALPROIC ACID 250MG CAP
+"DATA",176.112,19721,1)
+808651
+"DATA",176.112,19722,0)
+4006252^DIVALPROEX NA 125MG CAP,SPRINKLE
+"DATA",176.112,19722,1)
+808587
+"DATA",176.112,19723,0)
+4016503^DIVALPROEX NA 250MG TAB,SA
+"DATA",176.112,19723,1)
+808578
+"DATA",176.112,19724,0)
+4006249^DIVALPROEX NA 125MG TAB,EC
+"DATA",176.112,19724,1)
+808569
+"DATA",176.112,19725,0)
+4015120^DIVALPROEX NA 125MG TAB,EC,UD
+"DATA",176.112,19725,1)
+808569
+"DATA",176.112,19726,0)
+4006250^DIVALPROEX NA 250MG TAB,EC
+"DATA",176.112,19726,1)
+808548
+"DATA",176.112,19727,0)
+4014892^DIVALPROEX NA 250MG TAB,EC,UD
+"DATA",176.112,19727,1)
+808548
+"DATA",176.112,19728,0)
+4006251^DIVALPROEX NA 500MG TAB,EC
+"DATA",176.112,19728,1)
+808543
+"DATA",176.112,19729,0)
+4015089^DIVALPROEX NA 500MG TAB,SA
+"DATA",176.112,19729,1)
+808543
+"DATA",176.112,19730,0)
+4007587^POTASSIUM PARA-AMINOBENZOATE 0.5GM TAB
+"DATA",176.112,19730,1)
+807302
+"DATA",176.112,19731,0)
+4006064^SODIUM BICARBONATE 75MG/ML INJ
+"DATA",176.112,19731,1)
+807284
+"DATA",176.112,19732,0)
+4001074^SODIUM CHLORIDE 2% INJ,CONC
+"DATA",176.112,19732,1)
+807030
+"DATA",176.112,19733,0)
+4027746^LACTIC ACID 2.5%/UREA 5% LOTION,TOP
+"DATA",176.112,19733,1)
+807008
+"DATA",176.112,19734,0)
+4027705^DIPHTHERIA/PERTUSSIS/POLIOVIRUS/TETANUS VACCINE INJ,0.5ML,SYR
+"DATA",176.112,19734,1)
+806795^^^DIPHTHERIA/PERTUSSIS/POLIO/TETANUS SYR^Y
+"DATA",176.112,19735,0)
+4001084^SODIUM CHLORIDE 12% SOLN,IRRG
+"DATA",176.112,19735,1)
+806718
+"DATA",176.112,19736,0)
+4001083^SODIUM CHLORIDE 1.6% SOLN,IRRG
+"DATA",176.112,19736,1)
+806717
+"DATA",176.112,19737,0)
+4001082^SODIUM CHLORIDE 0.5% INJ
+"DATA",176.112,19737,1)
+806703
+"DATA",176.112,19738,0)
+4007973^NA SULFITE 0.0125%/NA THIOSULFATE 10%/NACL 0.3% INJ
+"DATA",176.112,19738,1)
+806674
+"DATA",176.112,19739,0)
+4013385^TRASTUZUMAB 440MG/VIL INJ
+"DATA",176.112,19739,1)
+806573
+"DATA",176.112,19740,0)
+4025756^PEG-3350/ELECTROLYTES PWDR W/FLAVOR PKT
+"DATA",176.112,19740,1)
+806426
+"DATA",176.112,19741,0)
+4006231^DEXTROSE 3.5%/NACL 0.15%/KCL 27MEQ/L INJ
+"DATA",176.112,19741,1)
+806413
+"DATA",176.112,19742,0)
+4015934^GLYCERIN 3%/SODIUM CL 0.75% SOLN,NASAL
+"DATA",176.112,19742,1)
+806140
+"DATA",176.112,19743,0)
+4027892^TETRABENAZINE 12.5MG TAB
+"DATA",176.112,19743,1)
+805464
+"DATA",176.112,19744,0)
+4027890^ROMIPLASTIM 500MCG/VIL INJ
+"DATA",176.112,19744,1)
+805455
+"DATA",176.112,19745,0)
+4027891^ROMIPLASTIM 250MCG/VIL INJ
+"DATA",176.112,19745,1)
+805455
+"DATA",176.112,19746,0)
+4010433^FAT EMULSION (SOYBEAN) 30% INJ
+"DATA",176.112,19746,1)
+805153
+"DATA",176.112,19747,0)
+4006079^FAT EMULSION (SOYBEAN) 10% INJ
+"DATA",176.112,19747,1)
+805132
+"DATA",176.112,19748,0)
+4006080^FAT EMULSION (SOYBEAN) 20% INJ
+"DATA",176.112,19748,1)
+805124
+"DATA",176.112,19749,0)
+4006073^SODIUM BICARBONATE 84MG/ML INJ,SYRINGE,50ML
+"DATA",176.112,19749,1)
+804926
+"DATA",176.112,19750,0)
+4027896^GADOXETATE DISODIUM 181.43MG/ML INJ,SOLN
+"DATA",176.112,19750,1)
+804632
+"DATA",176.112,19751,0)
+4008870^AL OH 400MG/MG OH 400MG/SIMETHICONE 64MG/5ML LIQUID
+"DATA",176.112,19751,1)
+804567
+"DATA",176.112,19752,0)
+4027686^DIFLUPREDNATE 0.05% EMULSION,OPH
+"DATA",176.112,19752,1)
+804544
+"DATA",176.112,19753,0)
+4027895^CLEVIDEPINE BUTYRATE 0.5MG/ML INJ,EMULSION
+"DATA",176.112,19753,1)
+804538^^^CLEVIDEPINE BUTYRATE 0.5MG/ML EMUL INJ^Y
+"DATA",176.112,19754,0)
+4014982^CHOLESTYRAMINE 4GM/5GM (LIGHT) PWDR
+"DATA",176.112,19754,1)
+804495
+"DATA",176.112,19755,0)
+4027733^TIPRANAVIR 500MG/5ML SOLN,ORAL
+"DATA",176.112,19755,1)
+802321^^^TIPRANAVIR 500MG/5ML ORAL SOLN^Y
+"DATA",176.112,19756,0)
+4006198^VALPROATE NA 100MG/ML INJ
+"DATA",176.112,19756,1)
+802197
+"DATA",176.112,19757,0)
+4017213^ACAMPROSATE CA 333MG TAB,EC
+"DATA",176.112,19757,1)
+802195
+"DATA",176.112,19758,0)
+4002226^DIAZEPAM 20MG/SYSTEM,ADULT,GEL,RTL
+"DATA",176.112,19758,1)
+801965
+"DATA",176.112,19759,0)
+4002224^DIAZEPAM 10MG/SYSTEM,ADULT,GEL,RTL
+"DATA",176.112,19759,1)
+801961
+"DATA",176.112,19760,0)
+4002221^DIAZEPAM 2.5MG/SYSTEM,PEDIATRIC,GEL,RTL
+"DATA",176.112,19760,1)
+801957
+"DATA",176.112,19761,0)
+4003078^CEFTIZOXIME NA 1GM/PB VIL INJ
+"DATA",176.112,19761,1)
+801823
+"DATA",176.112,19762,0)
+4027704^DIPHTHERIA/PERTUSSIS/POLIOVIRUS/TETANUS VACCINE INJ
+"DATA",176.112,19762,1)
+801720^^^DIPHTHERIA/PERTUSSIS/POLIO/TETANUS INJ^Y
+"DATA",176.112,19763,0)
+4027520^MENTHOL/METHYL SALICYLATE (16-30%) HIGH CONC. CREAM,TOP
+"DATA",176.112,19763,1)
+801678^^^MENTHOL/M-SALICYLATE 16-30% TOP CREAM^Y
+"DATA",176.112,19764,0)
+4027546^CHOLECALCIFEROL 2,000UNIT TAB
+"DATA",176.112,19764,1)
+801663
+"DATA",176.112,19765,0)
+4027687^ALVIMOPAN 12MG CAP,ORAL,UD
+"DATA",176.112,19765,1)
+799835
+"DATA",176.112,19766,0)
+4001012^MORPHINE SO4 1MG/ML INJ,MIN-I-JET 18G,STK-GUARD,10ML
+"DATA",176.112,19766,1)
+798592
+"DATA",176.112,19767,0)
+4016758^ALFUZOSIN HCL 10MG CAP,SA
+"DATA",176.112,19767,1)
+798550
+"DATA",176.112,19768,0)
+4005145^RHO (D) IMMUNE GLOBULIN,HUMAN 300MCG/ML INJ,SYRINGE,0.17ML
+"DATA",176.112,19768,1)
+798513
+"DATA",176.112,19769,0)
+4012763^HEPATITIS A VACCINE,INACTIVATED 720 EL.U./0.5ML INJ,SYR,0.5ML
+"DATA",176.112,19769,1)
+798481
+"DATA",176.112,19770,0)
+4012765^HEPATITIS A VACCINE,INACTIVATED 720 EL.U./0.5ML INJ,SYR-TL,0.5ML
+"DATA",176.112,19770,1)
+798481
+"DATA",176.112,19771,0)
+4012766^HEPATITIS A VACCINE,INACTIVATED 1440 EL.U./ML INJ,SYR-TL,1ML
+"DATA",176.112,19771,1)
+798477
+"DATA",176.112,19772,0)
+4012757^HEPATITIS A VACCINE,INACTIVATED 1440 EL.U./ML INJ,SYR,1ML
+"DATA",176.112,19772,1)
+798477
+"DATA",176.112,19773,0)
+4002296^HEMOPHILUS B CONJUGATE VACCINE INJ
+"DATA",176.112,19773,1)
+798447
+"DATA",176.112,19774,0)
+4013397^HEPATITIS B VACCINE (RECOMBINANT) 10MCG/0.5ML INJ,SYRINGE,0.5ML
+"DATA",176.112,19774,1)
+798429
+"DATA",176.112,19775,0)
+4009225^SODIUM BIPHOSPHATE 10.9GM/SODIUM PHOSPHATE 4GM ENEMA,RTL
+"DATA",176.112,19775,1)
+798405
+"DATA",176.112,19776,0)
+4003010^MUMPS VIRUS VACCINE,LIVE INJ
+"DATA",176.112,19776,1)
+798375
+"DATA",176.112,19777,0)
+4017100^HAEMOPHILUS B CONJUGATE VACCINE INJ
+"DATA",176.112,19777,1)
+798282
+"DATA",176.112,19778,0)
+4025304^PAPILLOMAVIRUS HUMAN QUADRIVALENT VACCINE INJ,SYRINGE,0.5ML
+"DATA",176.112,19778,1)
+798276
+"DATA",176.112,19779,0)
+4025303^PAPILLOMAVIRUS HUMAN QUADRIVALENT VACCINE INJ
+"DATA",176.112,19779,1)
+798271
+"DATA",176.112,19780,0)
+4006006^LACTATED RINGER'S SOLN,IRRG
+"DATA",176.112,19780,1)
+798201
+"DATA",176.112,19781,0)
+4006005^LACTATED RINGER'S INJ
+"DATA",176.112,19781,1)
+798174
+"DATA",176.112,19782,0)
+4005959^DEXTROSE 5%/RINGER'S INJ
+"DATA",176.112,19782,1)
+798139
+"DATA",176.112,19783,0)
+4027887^FACTOR VIIa,RECOMBINANT 1000MCG/VIL INJ
+"DATA",176.112,19783,1)
+798102
+"DATA",176.112,19784,0)
+4027888^FACTOR VIIa,RECOMBINANT 2000MCG/VIL INJ
+"DATA",176.112,19784,1)
+798102
+"DATA",176.112,19785,0)
+4027889^FACTOR VIIa,RECOMBINANT 5000MCG/VIL INJ
+"DATA",176.112,19785,1)
+798102
+"DATA",176.112,19786,0)
+4016731^ADAPALENE 0.1% SWAB TOP
+"DATA",176.112,19786,1)
+798061
+"DATA",176.112,19787,0)
+4005850^SALICYLIC ACID 2% PAD,TOP
+"DATA",176.112,19787,1)
+797892
+"DATA",176.112,19788,0)
+4005849^SALICYLIC ACID 0.5% PAD,TOP
+"DATA",176.112,19788,1)
+797885
+"DATA",176.112,19789,0)
+4007370^DEXTROSE 5%/NACL 0.117%/SODIUM LACTATE 0.056% INJ
+"DATA",176.112,19789,1)
+797838
+"DATA",176.112,19790,0)
+4005955^DEXTROSE 5%/LACTATED RINGER'S INJ
+"DATA",176.112,19790,1)
+797838
+"DATA",176.112,19791,0)
+4007402^DEXTROSE 5%/LACTATED RINGER'S/KCL 25MEQ/L INJ
+"DATA",176.112,19791,1)
+797838
+"DATA",176.112,19792,0)
+4006046^RINGER'S SOLN,IRRG
+"DATA",176.112,19792,1)
+797820
+"DATA",176.112,19793,0)
+4002940^HYDROCORTISONE 0.5% PAD,TOP
+"DATA",176.112,19793,1)
+797807
+"DATA",176.112,19794,0)
+4009848^CHLORHEXIDINE GLUCONATE 0.5%/ISOPROPYL ALCOHOL 70% PAD,TOP
+"DATA",176.112,19794,1)
+797741
+"DATA",176.112,19795,0)
+4008173^POVIDONE IODINE 10% SWABSTICK,TOP
+"DATA",176.112,19795,1)
+797730
+"DATA",176.112,19796,0)
+4008190^POVIDONE IODINE 10% PAD
+"DATA",176.112,19796,1)
+797730
+"DATA",176.112,19797,0)
+4025891^BENZOYL PEROXIDE 9% SWAB,TOP
+"DATA",176.112,19797,1)
+797710
+"DATA",176.112,19798,0)
+4025893^BENZOYL PEROXIDE 6% SWAB,TOP
+"DATA",176.112,19798,1)
+797704
+"DATA",176.112,19799,0)
+4007567^FLURANDRENOLIDE 4MCG/SQCM TAPE,80IN ROLL
+"DATA",176.112,19799,1)
+797694
+"DATA",176.112,19800,0)
+4007568^FLURANDRENOLIDE 4CM/SQCM TAPE,2IN X 3IN PATCH
+"DATA",176.112,19800,1)
+797694
+"DATA",176.112,19801,0)
+4007564^FLURANDRENOLIDE 4MCG/SQCM TAPE,24IN ROLL
+"DATA",176.112,19801,1)
+797694
+"DATA",176.112,19802,0)
+4025892^BENZOYL PEROXIDE 3% SWAB,TOP
+"DATA",176.112,19802,1)
+797678
+"DATA",176.112,19803,0)
+4027416^SODIUM HYPOCHLORITE 0.057% GEL,TOP
+"DATA",176.112,19803,1)
+797616
+"DATA",176.112,19804,0)
+4027359^PHENYLMECURIC NITRATE 0.04% (3-WEA) SOLN,TOP
+"DATA",176.112,19804,1)
+797587
+"DATA",176.112,19805,0)
+4025021^ESTRADIOL ACETATE 0.1MG/24HR RING,VAG
+"DATA",176.112,19805,1)
+797569
+"DATA",176.112,19806,0)
+4025020^ESTRADIOL ACETATE 0.05MG/24HR RING,VAG
+"DATA",176.112,19806,1)
+797559
+"DATA",176.112,19807,0)
+4003318^GLOBULIN,IMMUNE (IM) INJ
+"DATA",176.112,19807,1)
+797553
+"DATA",176.112,19808,0)
+4008894^ALCOHOL PREP PAD
+"DATA",176.112,19808,1)
+797544
+"DATA",176.112,19809,0)
+4027364^DOCOSANOL 10% CREAM,TOP
+"DATA",176.112,19809,1)
+797534
+"DATA",176.112,19810,0)
+4027398^CAMPHOR 5%/MENTHOL 5% GEL,TOP
+"DATA",176.112,19810,1)
+797500
+"DATA",176.112,19811,0)
+4001680^ESTRADIOL 2MG RING,VAG
+"DATA",176.112,19811,1)
+797454
+"DATA",176.112,19812,0)
+4001595^ERYTHROMYCIN 2% PAD,TOP
+"DATA",176.112,19812,1)
+797452
+"DATA",176.112,19813,0)
+4013323^CLINDAMYCIN PO4 1% SWAB,TOP
+"DATA",176.112,19813,1)
+797274
+"DATA",176.112,19814,0)
+4004775^FLUNISOLIDE 25MCG/SPRAY SOLN,NASAL
+"DATA",176.112,19814,1)
+797155
+"DATA",176.112,19815,0)
+4015713^FLUNISOLIDE 25MCG/SPRAY INHL,NASAL
+"DATA",176.112,19815,1)
+797155
+"DATA",176.112,19816,0)
+4027409^METHYLNALTREXONE BROMIDE 12MG/0.6ML INJ,VIL
+"DATA",176.112,19816,1)
+796393^^^METHYLNALTREXONE BROM 12MG/0.6ML INJ VIL^Y
+"DATA",176.112,19817,0)
+4004834^FERROUS FUMARATE 100MG/0.6ML DROPS,ORAL
+"DATA",176.112,19817,1)
+795776
+"DATA",176.112,19818,0)
+4005764^ASPIRIN 487.5MG TAB,EC
+"DATA",176.112,19818,1)
+795728
+"DATA",176.112,19819,0)
+4008674^ASPIRIN 227.5MG/CAFFEINE 32.5MG TAB
+"DATA",176.112,19819,1)
+795727
+"DATA",176.112,19820,0)
+4006243^AMMONIUM CHLORIDE 487.5MG TAB
+"DATA",176.112,19820,1)
+795726
+"DATA",176.112,19821,0)
+4027406^REGADENOSON 0.4MG/5ML INJ,VIL 5ML
+"DATA",176.112,19821,1)
+795690^^^REGADENOSON 0.4MG/5ML INJ VIL 5ML^Y
+"DATA",176.112,19822,0)
+4027407^REGADENOSON 0.4MG/5ML INJ,SYRINGE 5ML
+"DATA",176.112,19822,1)
+795690^^^REGADENOSON 0.4MG/5ML INJ SYRINGE 5ML^Y
+"DATA",176.112,19823,0)
+4003003^ANTIVENIN,LATRODECTUS MACTANS 6000UNT/VIL INJ
+"DATA",176.112,19823,1)
+795461
+"DATA",176.112,19824,0)
+4027419^CERTOLIZUMAB PEGOL 200MG/VIL,INJ
+"DATA",176.112,19824,1)
+795081^^^CERTOLIZUMAB PEGOL 200MG/VIL INJ^Y
+"DATA",176.112,19825,0)
+4006781^EPHEDRINE 36MG/GG 150MG/PHENOBARB 12MG/THEOPHYLLINE 45MG/15ML EL
+"DATA",176.112,19825,1)
+794969
+"DATA",176.112,19826,0)
+4027408^OLOPATADINE HCL 0.6% SOLN,NASAL SPRAY
+"DATA",176.112,19826,1)
+794953^^^OLOPATADINE HCL 0.6% NASAL SPRAY^Y
+"DATA",176.112,19827,0)
+4027179^CETYLPYRIDINIUM CL 0.07%/MENTHOL 3.6MG LOZENGE
+"DATA",176.112,19827,1)
+794945
+"DATA",176.112,19828,0)
+4027376^NAPROXEN NA 500MG/SUMATRIPTAN SUCCINATE 85MG TAB
+"DATA",176.112,19828,1)
+794764^^^NAPROXEN NA 500MG/SUMATRIPTAN 85MG TAB^Y
+"DATA",176.112,19829,0)
+4027684^LUBIPROSTONE 8MCG CAP,ORAL
+"DATA",176.112,19829,1)
+794639
+"DATA",176.112,19830,0)
+4027536^RISEDRONATE NA 150MG TAB
+"DATA",176.112,19830,1)
+794630
+"DATA",176.112,19831,0)
+4025031^ASCORBIC ACID 500MG/BIOFLAVONOID 200MG/CALCIUM 50MG TAB
+"DATA",176.112,19831,1)
+792296
+"DATA",176.112,19832,0)
+4015926^LANSOPRAZOLE 30MG/PKT PWDR
+"DATA",176.112,19832,1)
+791880
+"DATA",176.112,19833,0)
+4015927^LANSOPRAZOLE 15MG/PKT PWDR
+"DATA",176.112,19833,1)
+791878
+"DATA",176.112,19834,0)
+4027021^SAPROPTERIN DIHYDROCHLORIDE 10MG TAB
+"DATA",176.112,19834,1)
+791114
+"DATA",176.112,19835,0)
+4026986^DEXMETHYLPHENIDATE HCL 5MG TAB,SA
+"DATA",176.112,19835,1)
+791095
+"DATA",176.112,19836,0)
+4026989^DEXMETHYLPHENIDATE HCL 20MG TAB,SA
+"DATA",176.112,19836,1)
+791094
+"DATA",176.112,19837,0)
+4026988^DEXMETHYLPHENIDATE HCL 15MG TAB,SA
+"DATA",176.112,19837,1)
+791092
+"DATA",176.112,19838,0)
+4026987^DEXMETHYLPHENIDATE HCL 10MG TAB,SA
+"DATA",176.112,19838,1)
+791091
+"DATA",176.112,19839,0)
+4027298^DESVENLAFAXINE 50MG TAB,SA,UD
+"DATA",176.112,19839,1)
+790288^^^DESVENLAFAXINE 50MG SA TAB UD^Y
+"DATA",176.112,19840,0)
+4027296^DESVENLAFAXINE 50MG TAB,SA
+"DATA",176.112,19840,1)
+790288^^^DESVENLAFAXINE 50MG SA TAB^Y
+"DATA",176.112,19841,0)
+4027375^CICLESONIDE 50MCG/SPRAY INHL,NASAL,12.5GM
+"DATA",176.112,19841,1)
+790273^^^CICLESONIDE 50MCG/SPRAY 120D NASAL INHL^Y
+"DATA",176.112,19842,0)
+4027299^DESVENLAFAXINE 100MG TAB,SA,UD
+"DATA",176.112,19842,1)
+790264^^^DESVENLAFAXINE 100MG SA TAB UD^Y
+"DATA",176.112,19843,0)
+4027297^DESVENLAFAXINE 100MG TAB,SA
+"DATA",176.112,19843,1)
+790264^^^DESVENLAFAXINE 100MG SA TAB^Y
+"DATA",176.112,19844,0)
+4001339^AMPICILLIN NA 10GM/VIL INJ
+"DATA",176.112,19844,1)
+789980
+"DATA",176.112,19845,0)
+4000978^MORPHINE SO4 30MG TAB,SOLUBLE
+"DATA",176.112,19845,1)
+789972
+"DATA",176.112,19846,0)
+4000666^CODEINE PO4 30MG/ML INJ,CARPUJECT,2ML
+"DATA",176.112,19846,1)
+763627
+"DATA",176.112,19847,0)
+4027552^NISOLDIPINE 34MG TAB,SA
+"DATA",176.112,19847,1)
+763589^^^NISOLDIPINE 34MG SA TAB^Y
+"DATA",176.112,19848,0)
+4027551^NISOLDIPINE 25.5MG TAB,SA
+"DATA",176.112,19848,1)
+763574^^^NISOLDIPINE 25.5MG SA TAB^Y
+"DATA",176.112,19849,0)
+4027550^NISOLDIPINE 17MG TAB,SA
+"DATA",176.112,19849,1)
+763519^^^NISOLDIPINE 17MG SA TAB^Y
+"DATA",176.112,19850,0)
+4027548^NISOLDIPINE 8.5MG TAB,SA
+"DATA",176.112,19850,1)
+763497^^^NISOLDIPINE 8.5MG SA TAB^Y
+"DATA",176.112,19851,0)
+4027305^RILONACEPT 220MG/VIL INJ
+"DATA",176.112,19851,1)
+763453
+"DATA",176.112,19852,0)
+4003545^ALPROSTADIL 40MCG/VIL INJ,SYSTEM
+"DATA",176.112,19852,1)
+763420
+"DATA",176.112,19853,0)
+4003543^ALPROSTADIL 40MCG/VIL INJ
+"DATA",176.112,19853,1)
+763420
+"DATA",176.112,19854,0)
+4026074^LEUPROLIDE ACETATE (PEDIATRIC) 11.25MG/KIT INJ,SUSP,SA
+"DATA",176.112,19854,1)
+763392
+"DATA",176.112,19855,0)
+4007352^LEUPROLIDE ACETATE 15MG/KIT INJ,SUSP,SA
+"DATA",176.112,19855,1)
+763359
+"DATA",176.112,19856,0)
+4013340^LEUPROLIDE ACETATE 30MG/KIT INJ,SUSP,SA
+"DATA",176.112,19856,1)
+763348
+"DATA",176.112,19857,0)
+4007349^LEUPROLIDE ACETATE 7.5MG/KIT INJ,SUSP,SA
+"DATA",176.112,19857,1)
+763346
+"DATA",176.112,19858,0)
+4003027^HEPATITIS B VACCINE (RECOMBINANT) 10MCG/0.5ML INJ,SYR-TL,0.5ML
+"DATA",176.112,19858,1)
+763313
+"DATA",176.112,19859,0)
+4027563^PANTOPRAZOLE NA 40MG/PKT PWDR,ORAL
+"DATA",176.112,19859,1)
+763306^^^PANTOPRAZOLE NA 40MG/PKT ORAL PWDR^Y
+"DATA",176.112,19860,0)
+4015546^HEPATITIS A 720 EL.U/HEPATITIS B 20MCG/ML VACCINE INJ,SYR,1ML
+"DATA",176.112,19860,1)
+763302
+"DATA",176.112,19861,0)
+4024562^PEGAPTANIB NA 0.3MG/0.09ML INTRACOCULAR SOLN,SYR
+"DATA",176.112,19861,1)
+763213
+"DATA",176.112,19862,0)
+4024618^PEGAPTANIB NA 0.3MG/0.09ML INTRAOCULAR SOLN,SYR
+"DATA",176.112,19862,1)
+763213
+"DATA",176.112,19863,0)
+4002299^POLIOVIRUS VACCINE INACTIVATED INJ
+"DATA",176.112,19863,1)
+763103
+"DATA",176.112,19864,0)
+4013110^ARDEPARIN NA 10000 UNT/0.5ML INJ,TUBEX
+"DATA",176.112,19864,1)
+763058
+"DATA",176.112,19865,0)
+4013109^ARDEPARIN NA 5000 UNT/0.5ML INJ,TUBEX
+"DATA",176.112,19865,1)
+763057
+"DATA",176.112,19866,0)
+4000668^CODEINE PO4 60MG/ML (PF) INJ,TUBEX,1ML
+"DATA",176.112,19866,1)
+763050
+"DATA",176.112,19867,0)
+4000667^CODEINE PO4 30MG/ML (PF) INJ,TUBEX,1ML
+"DATA",176.112,19867,1)
+763049
+"DATA",176.112,19868,0)
+4003284^HYDROMORPHONE HCL 4MG/ML INJ,TUBEX,1ML
+"DATA",176.112,19868,1)
+763046
+"DATA",176.112,19869,0)
+4003283^HYDROMORPHONE HCL 2MG/ML INJ,TUBEX,1ML
+"DATA",176.112,19869,1)
+763044
+"DATA",176.112,19870,0)
+4003285^HYDROMORPHONE HCL 1MG/ML INJ,TUBEX,1ML
+"DATA",176.112,19870,1)
+763043
+"DATA",176.112,19871,0)
+4001385^HEPARIN NA 1000 UNT/ML INJ,TUBEX,1ML
+"DATA",176.112,19871,1)
+763041
+"DATA",176.112,19872,0)
+4001019^MORPHINE SO4 8MG/ML INJ,TUBEX BP,1ML
+"DATA",176.112,19872,1)
+763038
+"DATA",176.112,19873,0)
+4001020^MORPHINE SO4 10MG/ML INJ,TUBEX BP,1ML
+"DATA",176.112,19873,1)
+763037
+"DATA",176.112,19874,0)
+4003236^MEPERIDINE HCL 75MG/ML INJ,TUBEX,1ML
+"DATA",176.112,19874,1)
+763036
+"DATA",176.112,19875,0)
+4003235^MEPERIDINE HCL 50MG/ML INJ,TUBEX,1ML
+"DATA",176.112,19875,1)
+763033
+"DATA",176.112,19876,0)
+4003232^MEPERIDINE HCL 25MG/ML INJ,TUBEX,2ML
+"DATA",176.112,19876,1)
+763032
+"DATA",176.112,19877,0)
+4003234^MEPERIDINE HCL 25MG/ML INJ,TUBEX,1ML
+"DATA",176.112,19877,1)
+763031
+"DATA",176.112,19878,0)
+4003237^MEPERIDINE HCL 100MG/ML INJ,TUBEX,1ML
+"DATA",176.112,19878,1)
+763030
+"DATA",176.112,19879,0)
+4014106^MEPERIDINE HCL 100MG/ML INJ,CARPUJECT,LUER LOCK,1ML
+"DATA",176.112,19879,1)
+763030
+"DATA",176.112,19880,0)
+4002464^LORAZEPAM 4MG/ML INJ,TUBEX,1ML
+"DATA",176.112,19880,1)
+763029
+"DATA",176.112,19881,0)
+4002463^LORAZEPAM 2MG/ML INJ,TUBEX,1ML
+"DATA",176.112,19881,1)
+763028
+"DATA",176.112,19882,0)
+4002462^LORAZEPAM 2MG/ML INJ,TUBEX,0.5ML
+"DATA",176.112,19882,1)
+763027
+"DATA",176.112,19883,0)
+4025993^INSULIN,HUMAN 3MG X 90 INHL,ORAL,BLISTER,PKT
+"DATA",176.112,19883,1)
+763007
+"DATA",176.112,19884,0)
+4025992^INSULIN,HUMAN 1MG X 90 INHL,ORAL,BLISTER,PKT
+"DATA",176.112,19884,1)
+763002
+"DATA",176.112,19885,0)
+4027261^NIACIN 750MG/SIMVASTATIN 20MG TAB,SA
+"DATA",176.112,19885,1)
+762970^^^NIACIN 750MG/SIMVASTATIN 20MG SA TAB^Y
+"DATA",176.112,19886,0)
+4014268^SOMATROPIN 2MG/VIL INJ,MINIQUICK
+"DATA",176.112,19886,1)
+762895
+"DATA",176.112,19887,0)
+4014263^SOMATROPIN 1MG/VIL INJ,MINIQUICK
+"DATA",176.112,19887,1)
+762873
+"DATA",176.112,19888,0)
+4014267^SOMATROPIN 1.8MG/VIL INJ,MINIQUICK
+"DATA",176.112,19888,1)
+762866
+"DATA",176.112,19889,0)
+4014266^SOMATROPIN 1.6MG/VIL INJ,MINIQUICK
+"DATA",176.112,19889,1)
+762857
+"DATA",176.112,19890,0)
+4014265^SOMATROPIN 1.4MG/VIL INJ,MINIQUICK
+"DATA",176.112,19890,1)
+762850
+"DATA",176.112,19891,0)
+4014264^SOMATROPIN 1.2MG/VIL INJ,MINIQUICK
+"DATA",176.112,19891,1)
+762846
+"DATA",176.112,19892,0)
+4014262^SOMATROPIN 0.8MG/VIL INJ,MINIQUICK
+"DATA",176.112,19892,1)
+762841
+"DATA",176.112,19893,0)
+4014261^SOMATROPIN 0.6MG/VIL INJ,MINIQUICK
+"DATA",176.112,19893,1)
+762837
+"DATA",176.112,19894,0)
+4014260^SOMATROPIN 0.4MG/VIL INJ,MINIQUICK
+"DATA",176.112,19894,1)
+762834
+"DATA",176.112,19895,0)
+4014259^SOMATROPIN 0.2MG/VIL INJ,MINIQUICK
+"DATA",176.112,19895,1)
+762830
+"DATA",176.112,19896,0)
+4003014^RUBELLA VIRUS VACCINE,LIVE INJ
+"DATA",176.112,19896,1)
+762820
+"DATA",176.112,19897,0)
+4025722^AMINOLEVULINIC ACID 20% SOLN,TOP W/APPLICATOR
+"DATA",176.112,19897,1)
+762672
+"DATA",176.112,19898,0)
+4003306^TYPHOID VACCINE LIVE CAP
+"DATA",176.112,19898,1)
+762598
+"DATA",176.112,19899,0)
+4027260^NIACIN 500MG/SIMVASTATIN 20MG TAB,SA
+"DATA",176.112,19899,1)
+761909^^^NIACIN 500MG/SIMVASTATIN 20MG SA TAB^Y
+"DATA",176.112,19900,0)
+4027262^NIACIN 1000MG/SIMVASTATIN 20MG TAB,SA
+"DATA",176.112,19900,1)
+761907^^^NIACIN 1000MG/SIMVASTATIN 20MG SA TAB^Y
+"DATA",176.112,19901,0)
+4013719^INTERFERON ALFACON-1 9MCG/0.3ML INJ,SYRINGE
+"DATA",176.112,19901,1)
+760638
+"DATA",176.112,19902,0)
+4002235^APROBARBITAL 40MG/5ML ELIXIR
+"DATA",176.112,19902,1)
+760273
+"DATA",176.112,19903,0)
+4012939^CHONDROITIN NA 40MG/HYALURONATE NA 30MG/ML INJ,OPH,SYRINGE,0.5ML
+"DATA",176.112,19903,1)
+760195
+"DATA",176.112,19904,0)
+4015856^CHONDROITIN NA 40MG/HYALURONATE 30MG/ML INJ,OPH,SYRINGE,0.75ML
+"DATA",176.112,19904,1)
+760194
+"DATA",176.112,19905,0)
+4005384^CHLORPHENIRAMINE 12MG/PSEUDOEPHEDRINE 120MG CAP,SA
+"DATA",176.112,19905,1)
+759687
+"DATA",176.112,19906,0)
+4027233^FOSAPREPITANT DIMEGLUMINE 115MG/VIL INJ
+"DATA",176.112,19906,1)
+759502
+"DATA",176.112,19907,0)
+4014092^ZANAMIVIR 5MG/BLISTER INHL,ORAL,ROTADISK KIT
+"DATA",176.112,19907,1)
+759471
+"DATA",176.112,19908,0)
+4000955^SILVER NITRATE 1% SOLN,OPH
+"DATA",176.112,19908,1)
+759388
+"DATA",176.112,19909,0)
+4025141^SUMATRIPTAN SUCCINATE 4MG/0.5ML INJ,STATDOSE RFL KIT
+"DATA",176.112,19909,1)
+758521
+"DATA",176.112,19910,0)
+4025140^SUMATRIPTAN SUCCINATE 4MG/0.5ML INJ,STATDOSE SYSTEM KIT
+"DATA",176.112,19910,1)
+758521
+"DATA",176.112,19911,0)
+4026935^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 800MCG/0.6ML SYR INJ
+"DATA",176.112,19911,1)
+758179
+"DATA",176.112,19912,0)
+4026928^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 75MCG/0.3ML SYR INJ
+"DATA",176.112,19912,1)
+758178
+"DATA",176.112,19913,0)
+4026934^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 600MCG/0.6ML SYR INJ
+"DATA",176.112,19913,1)
+758172
+"DATA",176.112,19914,0)
+4026927^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 50MCG/0.3ML SYR INJ
+"DATA",176.112,19914,1)
+758169
+"DATA",176.112,19915,0)
+4026933^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 400MCG/0.6ML SYR INJ
+"DATA",176.112,19915,1)
+758165
+"DATA",176.112,19916,0)
+4026932^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 250MCG/0.3ML SYR INJ
+"DATA",176.112,19916,1)
+758164
+"DATA",176.112,19917,0)
+4026931^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 200MCG/0.3ML SYR INJ
+"DATA",176.112,19917,1)
+758162
+"DATA",176.112,19918,0)
+4026930^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 150MCG/0.3ML SYR INJ
+"DATA",176.112,19918,1)
+758160
+"DATA",176.112,19919,0)
+4026929^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 100MCG/0.3ML SYR INJ
+"DATA",176.112,19919,1)
+758159
+"DATA",176.112,19920,0)
+4013091^PRAMIPEXOLE DIHYDROCHLORIDE 0.25MG TAB
+"DATA",176.112,19920,1)
+757700
+"DATA",176.112,19921,0)
+4013729^PRAMIPEXOLE DIHYDROCHLORIDE 0.25MG TAB,UD
+"DATA",176.112,19921,1)
+757700
+"DATA",176.112,19922,0)
+4013092^PRAMIPEXOLE DIHYDROCHLORIDE 1MG TAB
+"DATA",176.112,19922,1)
+757698
+"DATA",176.112,19923,0)
+4013090^PRAMIPEXOLE DIHYDROCHLORIDE 0.125MG TAB
+"DATA",176.112,19923,1)
+757696
+"DATA",176.112,19924,0)
+4004868^GLYCEROL,IODINATED 30MG/THEOPHYLLINE 120MG/5ML ELIXIR
+"DATA",176.112,19924,1)
+756363
+"DATA",176.112,19925,0)
+4005714^OXTRIPHYLLINE 100MG/5ML ELIXIR
+"DATA",176.112,19925,1)
+756357
+"DATA",176.112,19926,0)
+4004788^BUTABARBITAL NA 30MG/5ML ELIXIR
+"DATA",176.112,19926,1)
+756353
+"DATA",176.112,19927,0)
+4006628^BUTABARB 20MG/EPHEDRINE 25MG/GG 100MG/THEOPHYLLINE 150MG/15ML EL
+"DATA",176.112,19927,1)
+756352
+"DATA",176.112,19928,0)
+4003682^THEOPHYLLINE NA GLYCINATE 330MG/15ML ELIXIR
+"DATA",176.112,19928,1)
+756346
+"DATA",176.112,19929,0)
+4010036^TERPIN HYDRATE 85MG/5ML ELIXIR
+"DATA",176.112,19929,1)
+756345
+"DATA",176.112,19930,0)
+4000889^POTASSIUM CHLORIDE 20MEQ/5ML ELIXIR
+"DATA",176.112,19930,1)
+756337
+"DATA",176.112,19931,0)
+4008750^IRON (POLYSACCHARIDE COMPLEX) 100MG/5ML ELIXIR
+"DATA",176.112,19931,1)
+756336
+"DATA",176.112,19932,0)
+4000729^PHENOBARBITAL 18.5MG/5ML ELIXIR
+"DATA",176.112,19932,1)
+756329
+"DATA",176.112,19933,0)
+4006931^PHENIRAMINE 4MG/P-TOLOXAMINE 4MG/PYRILAMINE 4MG/5ML ELIXIR
+"DATA",176.112,19933,1)
+756325
+"DATA",176.112,19934,0)
+4003293^PENTOBARBITAL NA 20MG/5ML ELIXIR
+"DATA",176.112,19934,1)
+756323
+"DATA",176.112,19935,0)
+4006727^HYOSCYAMINE SO4 0.125MG/PHENOBARBITAL 15MG/5ML ELIXIR
+"DATA",176.112,19935,1)
+756314
+"DATA",176.112,19936,0)
+4010020^GLYCERIN 1.82 GM/LYSINE 100MG/15ML ELIXIR
+"DATA",176.112,19936,1)
+756303
+"DATA",176.112,19937,0)
+4006943^CYANOCOBALAMIN 25MCG/FOLIC ACID 1MG/IRON 100MG/5ML ELIXIR
+"DATA",176.112,19937,1)
+756301
+"DATA",176.112,19938,0)
+4001894^FLUPHENAZINE HCL 0.5MG/ML ELIXIR
+"DATA",176.112,19938,1)
+756300
+"DATA",176.112,19939,0)
+4005098^ETHYLESTRENOL 2MG/5ML ELIXIR
+"DATA",176.112,19939,1)
+756299
+"DATA",176.112,19940,0)
+4007144^EPHEDRINE 18MG/PHENOBARB 6MG/THEOPHYLLINE 88.5MG/15ML ELIXIR
+"DATA",176.112,19940,1)
+756296
+"DATA",176.112,19941,0)
+4006778^EPHEDRINE 12MG/GG 78MG/PHENOBARB 7.5MG/THEOPHYLLINE 60MG/15ML EL
+"DATA",176.112,19941,1)
+756295
+"DATA",176.112,19942,0)
+4004813^DYPHYLLINE 160MG/15ML ELIXIR
+"DATA",176.112,19942,1)
+756292
+"DATA",176.112,19943,0)
+4004825^DYPHYLLINE 150MG/EPHEDRINE 24MG/GG 300MG/PHENOBARB 24MG/15ML EL
+"DATA",176.112,19943,1)
+756291
+"DATA",176.112,19944,0)
+4003107^DEXTROAMPHETAMINE SO4 5MG/5ML ELIXIR
+"DATA",176.112,19944,1)
+756285
+"DATA",176.112,19945,0)
+4007311^CTM 4MG/DM 10MG/P-EPHRINE 10MG/5ML ELIXIR
+"DATA",176.112,19945,1)
+756279
+"DATA",176.112,19946,0)
+4006918^CTM 4MG/DM 10MG/GG 100MG/P-EPHRINE 10MG/5ML ELIXIR
+"DATA",176.112,19946,1)
+756278
+"DATA",176.112,19947,0)
+4008011^CODEINE 10MG/CTM 2MG/GLYCEROL,IODINATED 15MG/5ML ELIXIR
+"DATA",176.112,19947,1)
+756277
+"DATA",176.112,19948,0)
+4008120^CODEINE 10MG/CTM 2MG/P-PROPANOL 18.75MG/5ML ELIXIR
+"DATA",176.112,19948,1)
+756276
+"DATA",176.112,19949,0)
+4007693^BROMPHENIRAMINE 4MG/PHENYLPROPANOLAMINE 25MG/5ML ELIXIR
+"DATA",176.112,19949,1)
+756272
+"DATA",176.112,19950,0)
+4007698^BROMPHENIRAMINE 4MG/PHENYLPROPANOLAMINE 12.5MG/5ML ELIXIR
+"DATA",176.112,19950,1)
+756271
+"DATA",176.112,19951,0)
+4005451^BPM 4MG/P-EPHRINE 5MG/P-PROPANOL 5MG/5ML ELIXIR
+"DATA",176.112,19951,1)
+756269
+"DATA",176.112,19952,0)
+4004783^BELLADONNA EXTRACT 15MG/BUTABARBITAL NA 15MG/5ML ELIXIR
+"DATA",176.112,19952,1)
+756262
+"DATA",176.112,19953,0)
+4004624^BELLADONNA ALKALOIDS 0.218MG/PHENOBARBITAL 21.6MG/5ML ELIXIR
+"DATA",176.112,19953,1)
+756261
+"DATA",176.112,19954,0)
+4004621^BELLADONNA ALKALOIDS 0.1296MG/PHENOBARBITAL 16.2MG/5ML ELIXIR
+"DATA",176.112,19954,1)
+756260
+"DATA",176.112,19955,0)
+4006773^ATROPINE SO4 0.195MG/PHENOBARBITAL 15MG/5ML ELIXIR
+"DATA",176.112,19955,1)
+756256
+"DATA",176.112,19956,0)
+4008164^CODEINE 10MG/AMMONIUM CL 40MG/CTM 4MG/P-EPHRINE 10MG/5ML ELIXIR
+"DATA",176.112,19956,1)
+756250
+"DATA",176.112,19957,0)
+4004968^HYDROCODONE 5MG/ACETAMINOPHEN 500MG/5ML ELIXIR
+"DATA",176.112,19957,1)
+756244
+"DATA",176.112,19958,0)
+4009071^ZIDOVUDINE 50MG/5ML SYRUP
+"DATA",176.112,19958,1)
+756209
+"DATA",176.112,19959,0)
+4003147^TRIMEPRAZINE TARTRATE 2.5MG/5ML SYRUP
+"DATA",176.112,19959,1)
+756204
+"DATA",176.112,19960,0)
+4001604^TRIAMCINOLONE DIACETATE 4MG/5ML SYRUP
+"DATA",176.112,19960,1)
+756202
+"DATA",176.112,19961,0)
+4001618^TRIAMCINOLONE DIACETATE 2MG/5ML SYRUP
+"DATA",176.112,19961,1)
+756200
+"DATA",176.112,19962,0)
+4002044^SULFISOXAZOLE ACETYL 500MG/5ML SYRUP
+"DATA",176.112,19962,1)
+756189
+"DATA",176.112,19963,0)
+4016234^SENNOSIDES 8.6MG/5ML SYRUP,ORAL
+"DATA",176.112,19963,1)
+756180
+"DATA",176.112,19964,0)
+4008854^SENNA 218MG/5ML SYRUP
+"DATA",176.112,19964,1)
+756176
+"DATA",176.112,19965,0)
+4012146^RIMANTADINE HCL 50MG/5ML SYRUP
+"DATA",176.112,19965,1)
+756169
+"DATA",176.112,19966,0)
+4002169^PYRIDOSTIGMINE BR 60MG/5ML SYRUP
+"DATA",176.112,19966,1)
+756165
+"DATA",176.112,19967,0)
+4005163^PSEUDOEPHEDRINE 30MG/TRIPROLIDINE 1.25MG/5ML SYRUP
+"DATA",176.112,19967,1)
+756163
+"DATA",176.112,19968,0)
+4005158^PSEUDOEPHEDRINE HCL 30MG/TRIPROLIDINE HCL 1.25MG/5ML SYRUP
+"DATA",176.112,19968,1)
+756163
+"DATA",176.112,19969,0)
+4002498^PROMETHAZINE HCL 12.5MG/5ML SYRUP
+"DATA",176.112,19969,1)
+756161
+"DATA",176.112,19970,0)
+4003164^PROMAZINE HCL 10MG/5ML SYRUP
+"DATA",176.112,19970,1)
+756156
+"DATA",176.112,19971,0)
+4000725^PHENOBARBITAL 15MG/5ML ELIXIR
+"DATA",176.112,19971,1)
+756143
+"DATA",176.112,19972,0)
+4005684^OXYTETRACYCLINE CA 125MG/5ML SYRUP
+"DATA",176.112,19972,1)
+756138
+"DATA",176.112,19973,0)
+4002783^MINOCYCLINE HCL 50MG/5ML SYRUP
+"DATA",176.112,19973,1)
+756134
+"DATA",176.112,19974,0)
+4005213^HYDROCODONE 10MG/PHENYLPROPANOLAMINE 25MG/5ML SYRUP
+"DATA",176.112,19974,1)
+756107
+"DATA",176.112,19975,0)
+4005211^HYDROCODONE 5MG/PHENYLPROPANOLAMINE 25MG/5ML SYRUP
+"DATA",176.112,19975,1)
+756105
+"DATA",176.112,19976,0)
+4005214^HYDROCODONE 5MG/PHENYLPROPANOLAMINE 12.5MG/5ML SYRUP
+"DATA",176.112,19976,1)
+756104
+"DATA",176.112,19977,0)
+4005212^HYDROCODONE 2.5MG/PHENYLPROPANOLAMINE 12.5MG/5ML SYRUP
+"DATA",176.112,19977,1)
+756101
+"DATA",176.112,19978,0)
+4005395^GUAIFENESIN 200MG/PSEUDOEPHEDRINE 45MG/5ML SYRUP
+"DATA",176.112,19978,1)
+756089
+"DATA",176.112,19979,0)
+4006889^PIPERAZINE HEXAHYDRATE 411MG/5ML SYRUP
+"DATA",176.112,19979,1)
+756085
+"DATA",176.112,19980,0)
+4006887^PIPERAZINE HEXAHYDRATE 500MG/5ML SYRUP
+"DATA",176.112,19980,1)
+756080
+"DATA",176.112,19981,0)
+4006888^PIPERAZINE CITRATE 500MG/5ML SYRUP
+"DATA",176.112,19981,1)
+756080
+"DATA",176.112,19982,0)
+4005868^METHDILAZINE HCL 4MG/5ML SYRUP
+"DATA",176.112,19982,1)
+756061
+"DATA",176.112,19983,0)
+4007139^ISONIAZID 50MG/PYRIDOXINE HCL 2.5MG/5ML SYRUP
+"DATA",176.112,19983,1)
+756053
+"DATA",176.112,19984,0)
+4009972^HYDROGEN IODIDE 70MG/5ML SYRUP
+"DATA",176.112,19984,1)
+756051
+"DATA",176.112,19985,0)
+4005183^HYDROCODONE 5MG/HOMATROPINE 1.5MG/5ML SYRUP
+"DATA",176.112,19985,1)
+756050
+"DATA",176.112,19986,0)
+4009900^CALCIUM GLUBIONATE 1.8GM/5ML SYRUP
+"DATA",176.112,19986,1)
+756039
+"DATA",176.112,19987,0)
+4008249^FERROUS SULFATE 90MG/5ML SYRUP
+"DATA",176.112,19987,1)
+756036
+"DATA",176.112,19988,0)
+4005715^OXTRIPHYLLINE 50MG/5ML SYRUP
+"DATA",176.112,19988,1)
+756004
+"DATA",176.112,19989,0)
+4007196^DM 15MG/GG 100MG/P-PROPANOL 25MG/5ML SYRUP
+"DATA",176.112,19989,1)
+755887
+"DATA",176.112,19990,0)
+4008880^DEXTROMETHORPHAN 10MG/TERPIN HYDRATE 85MG/5ML SYRUP
+"DATA",176.112,19990,1)
+755881
+"DATA",176.112,19991,0)
+4008881^DEXTROMETHORPHAN 10MG/TERPIN HYDRATE 85MG/5ML ELIXIR
+"DATA",176.112,19991,1)
+755881
+"DATA",176.112,19992,0)
+4005470^DEXTROMETHORPHAN HBR 10MG/GUAIFENESIN 85MG/5ML (SF & AF) SYRUP
+"DATA",176.112,19992,1)
+755877
+"DATA",176.112,19993,0)
+4008633^DEXTROMETHORPHAN 7.5MG/PHENYLPROPANOLAMINE 9MG/5ML SYRUP
+"DATA",176.112,19993,1)
+755872
+"DATA",176.112,19994,0)
+4007198^DM 7.5MG/GG 100MG/P-PROPANOL 9MG/5ML SYRUP
+"DATA",176.112,19994,1)
+755869
+"DATA",176.112,19995,0)
+4008118^DM 15MG/DYPHYLLINE 100MG/PSEUDEFED 45MG/15ML SYRUP
+"DATA",176.112,19995,1)
+755863
+"DATA",176.112,19996,0)
+4003843^CODEINE 12MG/GG 100MG/P-PROPANOL 25MG/5ML SYRUP
+"DATA",176.112,19996,1)
+755847
+"DATA",176.112,19997,0)
+4007459^CODEINE 10MG/POTASSIUM CITRATE 216MG/5ML SYRUP
+"DATA",176.112,19997,1)
+755846
+"DATA",176.112,19998,0)
+4004816^CODEINE 10MG/CTM 4MG/PSEUDEFED 60MG/5ML SYRUP
+"DATA",176.112,19998,1)
+755845
+"DATA",176.112,19999,0)
+4008292^CODEINE 10MG/P-PROPANOL 5MG/PROMETH 6.25MG/5ML SYRUP
+"DATA",176.112,19999,1)
+755842
+"DATA",176.112,20000,0)
+4008337^CODEINE 10MG/P-EPHRINE 5MG/PYRILAMINE 8.33MG/5ML SYRUP
+"DATA",176.112,20000,1)
+755841
+"DATA",176.112,20001,0)
+4002453^CODEINE 10MG/P-EPHRINE 5MG/PROMETH 5MG/5ML SYRUP
+"DATA",176.112,20001,1)
+755840
+"DATA",176.112,20002,0)
+4010335^CODEINE 10MG/P-EPHRINE 2MG/PSEUDEFED 30MG/5ML SYRUP
+"DATA",176.112,20002,1)
+755839
+"DATA",176.112,20003,0)
+4007642^CODEINE 10MG/EPHEDRINE 6.25MG/GG 100MG/5ML SYRUP
+"DATA",176.112,20003,1)
+755838
+"DATA",176.112,20004,0)
+4010430^CODEINE 8.2MG/PYRILAMINE 12.5MG/5ML SYRUP
+"DATA",176.112,20004,1)
+755835
+"DATA",176.112,20005,0)
+4006429^CLEMASTINE FUMARATE 0.67MG/5ML SYRUP
+"DATA",176.112,20005,1)
+755824
+"DATA",176.112,20006,0)
+4002524^CHLORPROMAZINE HCL 10MG/5ML SYRUP
+"DATA",176.112,20006,1)
+755820
+"DATA",176.112,20007,0)
+4005377^CHLORPHENIRAMINE 3MG/PSEUDOEPHEDRINE 45MG/5ML SYRUP
+"DATA",176.112,20007,1)
+755803
+"DATA",176.112,20008,0)
+4007583^CHLORPHENIRAMINE 3MG/EPHEDRINE 4MG/5ML SYRUP
+"DATA",176.112,20008,1)
+755802
+"DATA",176.112,20009,0)
+4005389^CTM 3MG/DM 15MG/PSEUDEFED 45MG/5ML SYRUP
+"DATA",176.112,20009,1)
+755801
+"DATA",176.112,20010,0)
+4003828^CTM 2.5MG/P-EPHRINE 5MG/P-PROPANOL 20MG/P-TOLOXAMINE 7.5MG/5ML
+"DATA",176.112,20010,1)
+755799
+"DATA",176.112,20011,0)
+4003134^CHLORPHENIRAMINE 2MG/PHENYLPROPANOLAMINE 12.5MG/5ML SYRUP
+"DATA",176.112,20011,1)
+755796
+"DATA",176.112,20012,0)
+4003137^CHLORPHENIRAMINE 2MG/PHENYLPROPANOLAMINE 12.5MG/5ML LIQUID
+"DATA",176.112,20012,1)
+755796
+"DATA",176.112,20013,0)
+4006813^GUAIFENESIN 100MG/PHENYLPROPANOLAMINE 9MG/5ML SYRUP
+"DATA",176.112,20013,1)
+755786
+"DATA",176.112,20014,0)
+4006815^GUAIFENESIN 100MG/PHENYLPROPANOLAMINE 6.25MG/5ML SYRUP
+"DATA",176.112,20014,1)
+755785
+"DATA",176.112,20015,0)
+4004971^HYDROMORPHONE 1MG/GUAIFENESIN 100MG/5ML SYRUP
+"DATA",176.112,20015,1)
+755784
+"DATA",176.112,20016,0)
+4007315^HYDROCODONE 2.5MG/GG 100MG/P-EPHRINE 10MG/5ML SYRUP
+"DATA",176.112,20016,1)
+755779
+"DATA",176.112,20017,0)
+4000954^EPHEDRINE SO4 20MG/5ML SYRUP
+"DATA",176.112,20017,1)
+755749
+"DATA",176.112,20018,0)
+4005063^EPHEDRINE 18.75MG/HYDROXYZINE 7.5MG/THEOPHYLLINE 97.5MG/15ML SYR
+"DATA",176.112,20018,1)
+755744
+"DATA",176.112,20019,0)
+4006936^EPHEDRINE 6.25MG/GUAIFENESIN 100MG/5ML SYRUP
+"DATA",176.112,20019,1)
+755743
+"DATA",176.112,20020,0)
+4008052^DOCUSATE NA 50MG/15ML SYRUP
+"DATA",176.112,20020,1)
+755731
+"DATA",176.112,20021,0)
+4009712^DIPHENHYDRAMINE 12.5MG/PSEUDOEPHEDRINE 60MG/5ML SYRUP
+"DATA",176.112,20021,1)
+755724
+"DATA",176.112,20022,0)
+4002559^DIPHENHYDRAMINE HCL 10MG/5ML SYRUP
+"DATA",176.112,20022,1)
+755721
+"DATA",176.112,20023,0)
+4010434^APAP 108MG/DM 5MG/P-EPHRINE 1.67MG/PYRILAMINE 8.3MG/5ML SYRUP
+"DATA",176.112,20023,1)
+755706
+"DATA",176.112,20024,0)
+4001930^CHLORAL HYDRATE 250MG/5ML SYRUP
+"DATA",176.112,20024,1)
+755621
+"DATA",176.112,20025,0)
+4001929^CHLORAL HYDRATE 500MG/5ML SYRUP
+"DATA",176.112,20025,1)
+755618
+"DATA",176.112,20026,0)
+4015263^CHLORAL HYDRATE 500MG/5ML SYRUP,5ML
+"DATA",176.112,20026,1)
+755618
+"DATA",176.112,20027,0)
+4008229^CASANTHRANOL 30MG/DOCUSATE NA 60MG/5ML SYRUP
+"DATA",176.112,20027,1)
+755611
+"DATA",176.112,20028,0)
+4008230^CASANTHRANOL 10MG/DOCUSATE NA 20MG/5ML SYRUP
+"DATA",176.112,20028,1)
+755610
+"DATA",176.112,20029,0)
+4006203^CODEINE 8.4MG/CALCIUM IODIDE 152MG/5ML SYRUP
+"DATA",176.112,20029,1)
+755601
+"DATA",176.112,20030,0)
+4006282^CALCIUM IODIDE 150MG/ISOPROTERENOL SO4 3MG/5ML SYRUP
+"DATA",176.112,20030,1)
+755600
+"DATA",176.112,20031,0)
+4015889^BPM 4MG/DM 15MG/PSEUDO 45MG/5ML SYRUP,ORAL
+"DATA",176.112,20031,1)
+755590
+"DATA",176.112,20032,0)
+4007322^BROMPHENIRAMINE 2MG/PSEUDOEPHEDRINE 30MG/5ML SYRUP
+"DATA",176.112,20032,1)
+755586
+"DATA",176.112,20033,0)
+4004700^BPM 2MG/DM 10MG/PSEUDEFED 30MG/5ML SYRUP
+"DATA",176.112,20033,1)
+755585
+"DATA",176.112,20034,0)
+4007981^CTM 2MG/GG 100MG/PSEUDEFED 30MG/5ML SYRUP
+"DATA",176.112,20034,1)
+755556
+"DATA",176.112,20035,0)
+4007719^CTM 2MG/GG 100MG/P-EPHRINE 5MG/P-PROPANOL 5MG/5ML SYRUP
+"DATA",176.112,20035,1)
+755555
+"DATA",176.112,20036,0)
+4010428^CHLORPHENIRAMINE 2MG/DEXTROMETHORPHAN 10MG/5ML (SF) SYRUP
+"DATA",176.112,20036,1)
+755553
+"DATA",176.112,20037,0)
+4006916^CTM 2MG/DM 7.5MG/GG 100MG/P-EPHRINE 10MG SYRUP
+"DATA",176.112,20037,1)
+755550
+"DATA",176.112,20038,0)
+4007933^CODEINE 8MG/CTM 1.5MG/P-EPHRINE 4.5MG/5ML SYRUP
+"DATA",176.112,20038,1)
+755546
+"DATA",176.112,20039,0)
+4004322^CODEINE 5MG/CTM 0.75MG/P-EPHRINE 2.5MG/KI 75MG/5ML SYRUP
+"DATA",176.112,20039,1)
+755539
+"DATA",176.112,20040,0)
+4003835^CTM 0.5MG/P-EPHRINE 1.25MG/P-PROPANOL 5MG/P-TOLOXAMINE 5MG/5ML
+"DATA",176.112,20040,1)
+755537
+"DATA",176.112,20041,0)
+4003830^CTM 0.5MG/P-EPHRINE 1.25MG/P-PROPANOL 5MG/P-TOLOXAMINE 2MG/5ML
+"DATA",176.112,20041,1)
+755536
+"DATA",176.112,20042,0)
+4007557^AMMONIUM CL 131.5MG/DIPHENHYDRAMINE HCL 12.5MG/5ML SYRUP
+"DATA",176.112,20042,1)
+755513
+"DATA",176.112,20043,0)
+4006595^ALBUTEROL SO4 2MG/5ML SYRUP,5ML
+"DATA",176.112,20043,1)
+755497
+"DATA",176.112,20044,0)
+4006587^ALBUTEROL SO4 2MG/5ML SYRUP
+"DATA",176.112,20044,1)
+755497
+"DATA",176.112,20045,0)
+4006596^ALBUTEROL SO4 1MG/2.5ML SYRUP,2.5ML
+"DATA",176.112,20045,1)
+755497
+"DATA",176.112,20046,0)
+4027213^ETRAVIRINE 100MG TAB
+"DATA",176.112,20046,1)
+754761
+"DATA",176.112,20047,0)
+4025714^DEFEROXAMINE MESYLATE 500MG/VIL INJ
+"DATA",176.112,20047,1)
+754736
+"DATA",176.112,20048,0)
+4016339^DEFEROXAMINE MESYLATE 2GM/VIL INJ
+"DATA",176.112,20048,1)
+754734
+"DATA",176.112,20049,0)
+4027747^ALISKIREN 300MG/HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,20049,1)
+754721^^^ALISKIREN 300MG/HCTZ 25MG TAB^Y
+"DATA",176.112,20050,0)
+4027748^ALISKIREN 300MG/HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,20050,1)
+754720^^^ALISKIREN 300MG/HCTZ 12.5MG TAB^Y
+"DATA",176.112,20051,0)
+4027749^ALISKIREN 150MG/HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,20051,1)
+754719^^^ALISKIREN 150MG/HCTZ 25MG TAB^Y
+"DATA",176.112,20052,0)
+4027750^ALISKIREN 150MG/HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,20052,1)
+754718^^^ALISKIREN 150MG/HCTZ 12.5MG TAB^Y
+"DATA",176.112,20053,0)
+4004506^ALLERGENIC EXTRACT, HOUSE DUST 1 UNT/ML INJ
+"DATA",176.112,20053,1)
+754374
+"DATA",176.112,20054,0)
+4026578^OMEPRAZOLE 20MG/SODIUM BICARBONATE 1680MG/PKT PWDR,ORAL
+"DATA",176.112,20054,1)
+753562
+"DATA",176.112,20055,0)
+4026576^OMEPRAZOLE 40MG/SODIUM BICARBONATE 1680MG/PKT PWDR,ORAL
+"DATA",176.112,20055,1)
+753557
+"DATA",176.112,20056,0)
+4001114^SODIUM CHLORIDE 0.4% SOLN,NASAL SPRAY
+"DATA",176.112,20056,1)
+753525
+"DATA",176.112,20057,0)
+4001115^SODIUM CHLORIDE 0.4% SOLN,NASAL
+"DATA",176.112,20057,1)
+753522
+"DATA",176.112,20058,0)
+4025154^METHYLPHENIDATE 30MG/9HR PATCH
+"DATA",176.112,20058,1)
+753441
+"DATA",176.112,20059,0)
+4025153^METHYLPHENIDATE 20MG/9HR PATCH
+"DATA",176.112,20059,1)
+753440
+"DATA",176.112,20060,0)
+4025152^METHYLPHENIDATE 15MG/9HR PATCH
+"DATA",176.112,20060,1)
+753438
+"DATA",176.112,20061,0)
+4025151^METHYLPHENIDATE 10MG/9HR PATCH
+"DATA",176.112,20061,1)
+753436
+"DATA",176.112,20062,0)
+4026921^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 100MCG/ML INJ
+"DATA",176.112,20062,1)
+753423
+"DATA",176.112,20063,0)
+4026925^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 600MCG/ML INJ
+"DATA",176.112,20063,1)
+753415
+"DATA",176.112,20064,0)
+4026926^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 1,000MCG/ML INJ
+"DATA",176.112,20064,1)
+753413
+"DATA",176.112,20065,0)
+4026920^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 50CMG/ML INJ
+"DATA",176.112,20065,1)
+753411
+"DATA",176.112,20066,0)
+4026923^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 400MCG/ML INJ
+"DATA",176.112,20066,1)
+753407
+"DATA",176.112,20067,0)
+4026922^METHOXY POLYETHYLENE GLYCOL-EPOETIN BETA 300MCG/ML INJ
+"DATA",176.112,20067,1)
+753401
+"DATA",176.112,20068,0)
+4027278^TRIAMCINOLONE ACETONIDE 40MG/ML INJ,SUSP,OPH
+"DATA",176.112,20068,1)
+753379^^^TRIAMCINOLONE ACET 40MG/ML OPH SUSP INJ^Y
+"DATA",176.112,20069,0)
+4027535^SINECATECHINS 15% OINT,TOP
+"DATA",176.112,20069,1)
+753350
+"DATA",176.112,20070,0)
+4025766^KUNECATECHINS 15% OINT,TOP
+"DATA",176.112,20070,1)
+753350
+"DATA",176.112,20071,0)
+4027528^LEUPROLIDE ACETATE 45MG/KIT INJ,SUSP,SA
+"DATA",176.112,20071,1)
+752884
+"DATA",176.112,20072,0)
+4026961^PRAMLINTIDE ACETATE 1,000MCG/ML INJ,SOLN PEN 1.5ML
+"DATA",176.112,20072,1)
+752830
+"DATA",176.112,20073,0)
+4026962^PRAMLINTIDE ACETATE 1,000MCG/ML INJ,SOLN PEN 3ML
+"DATA",176.112,20073,1)
+752830
+"DATA",176.112,20074,0)
+4027235^PRAMLINTIDE ACETATE 1,000MCG/ML INJ,SOLN PEN 2.7ML
+"DATA",176.112,20074,1)
+752830
+"DATA",176.112,20075,0)
+4027165^FLUNISOLIDE 0.025% INHL,NASAL
+"DATA",176.112,20075,1)
+752376
+"DATA",176.112,20076,0)
+4027013^OXYCODONE HCL 60MG TAB,SA
+"DATA",176.112,20076,1)
+752358
+"DATA",176.112,20077,0)
+4027012^OXYCODONE HCL 30MG TAB,SA
+"DATA",176.112,20077,1)
+752356
+"DATA",176.112,20078,0)
+4027011^OXYCODONE HCL 15MG TAB,SA
+"DATA",176.112,20078,1)
+752355
+"DATA",176.112,20079,0)
+4008413^IPRATROPIUM BR 18MCG/SPRAY AEROSOL,INHL
+"DATA",176.112,20079,1)
+751866
+"DATA",176.112,20080,0)
+4027133^NEBIVOLOL 2.5MG TAB
+"DATA",176.112,20080,1)
+751618
+"DATA",176.112,20081,0)
+4027136^NEBIVOLOL 10MG TAB,UD
+"DATA",176.112,20081,1)
+751612
+"DATA",176.112,20082,0)
+4027135^NEBIVOLOL 10MG TAB
+"DATA",176.112,20082,1)
+751612
+"DATA",176.112,20083,0)
+4026268^HYDROCORTISONE 2%/LIDOCAINE 2% CREAM,RTL W/APPLICATOR
+"DATA",176.112,20083,1)
+751589
+"DATA",176.112,20084,0)
+4026423^COLLAGEN,ACTIVATED 96% PWDR,TOP
+"DATA",176.112,20084,1)
+751586
+"DATA",176.112,20085,0)
+4026422^COLLAGEN,ACTIVATED 60% GEL,TOP
+"DATA",176.112,20085,1)
+751583
+"DATA",176.112,20086,0)
+4026667^KETOTIFEN FUMARATE 0.035% SOLN,OPH
+"DATA",176.112,20086,1)
+751552
+"DATA",176.112,20087,0)
+4026340^AZITHROMYCIN 1% SUSP,OPH
+"DATA",176.112,20087,1)
+750856
+"DATA",176.112,20088,0)
+4026591^ACETYLCYSTEINE 750MG CAP,ORAL
+"DATA",176.112,20088,1)
+750849
+"DATA",176.112,20089,0)
+4001088^SODIUM CHLORIDE 2% SOLN,OPH
+"DATA",176.112,20089,1)
+750121
+"DATA",176.112,20090,0)
+4026595^LANREOTIDE 90MG INJ,SUSP,SA SYRINGE
+"DATA",176.112,20090,1)
+749817
+"DATA",176.112,20091,0)
+4026597^LANREOTIDE 120MG INJ,SUSP,SA SYRINGE
+"DATA",176.112,20091,1)
+749814
+"DATA",176.112,20092,0)
+4026594^LANREOTIDE 60MG INJ,SUSP,SA SYRINGE
+"DATA",176.112,20092,1)
+749811
+"DATA",176.112,20093,0)
+4027543^FENOFIBRATE 40MG TAB
+"DATA",176.112,20093,1)
+749804
+"DATA",176.112,20094,0)
+4027544^FENOFIBRATE 120MG TAB
+"DATA",176.112,20094,1)
+749802
+"DATA",176.112,20095,0)
+4013035^PHENYLBUTYRATE NA 3GM/5GM PWDR,ORAL
+"DATA",176.112,20095,1)
+749751
+"DATA",176.112,20096,0)
+4027146^CLOPIDOGREL BISULFATE 300MG TAB,UD
+"DATA",176.112,20096,1)
+749196
+"DATA",176.112,20097,0)
+4026580^TRIAMCINOLONE ACETONIDE 75MCG/SPRAY AEROSOL,INHL
+"DATA",176.112,20097,1)
+748625
+"DATA",176.112,20098,0)
+4004397^LIDOCAINE HCL 300MG/INJECTOR
+"DATA",176.112,20098,1)
+746915
+"DATA",176.112,20099,0)
+4012714^BUDESONIDE 32MCG/ACTUAT INHL,NASAL,7GM
+"DATA",176.112,20099,1)
+746832
+"DATA",176.112,20100,0)
+4026044^BUDESONIDE 90MCG/INHL INHL,ORAL,60
+"DATA",176.112,20100,1)
+746830
+"DATA",176.112,20101,0)
+4026043^BUDESONIDE 180MCG/INHL INHL,ORAL,120
+"DATA",176.112,20101,1)
+746828
+"DATA",176.112,20102,0)
+4012715^BUDESONIDE 200MCG/INHL INHALER,ORAL,0.4GM
+"DATA",176.112,20102,1)
+746825
+"DATA",176.112,20103,0)
+4015924^BUDESONIDE 32MCG/ACTUAT AQ,INHL,NASAL,8.6GM
+"DATA",176.112,20103,1)
+746821
+"DATA",176.112,20104,0)
+4024689^MOMETASONE FUROATE 220MCG/INHL INHL,ORAL,60
+"DATA",176.112,20104,1)
+746814
+"DATA",176.112,20105,0)
+4024688^MOMETASONE FUROATE 220MCG/INHL INHL,ORAL,30
+"DATA",176.112,20105,1)
+746812
+"DATA",176.112,20106,0)
+4024687^MOMETASONE FUROATE 220MCG/INHL INHL,ORAL,14
+"DATA",176.112,20106,1)
+746810
+"DATA",176.112,20107,0)
+4024690^MOMETASONE FUROATE 220MCG/INHL INHL,ORAL,120
+"DATA",176.112,20107,1)
+746803
+"DATA",176.112,20108,0)
+4004917^SODIUM FLUORIDE 0.5% GEL
+"DATA",176.112,20108,1)
+746756
+"DATA",176.112,20109,0)
+4004913^HYDROFLUORIC ACID 0.17%/NA FLUORIDE 2.6% GEL
+"DATA",176.112,20109,1)
+746746
+"DATA",176.112,20110,0)
+4015723^FLUTICASONE 500MCG/SALMETEROL 50MCG INHL,ORAL,DISKUS,60
+"DATA",176.112,20110,1)
+746730
+"DATA",176.112,20111,0)
+4015416^FLUTICASONE 500MCG/SALMETEROL 50MCG INHL,ORAL,DISKUS
+"DATA",176.112,20111,1)
+746730
+"DATA",176.112,20112,0)
+4015724^FLUTICASONE 500MCG/SALMETEROL 50MCG INHL,ORAL,DISKUS,28
+"DATA",176.112,20112,1)
+746730
+"DATA",176.112,20113,0)
+4026960^LOPINAVIR 100MG/RITONAVIR 25MG TAB
+"DATA",176.112,20113,1)
+746645
+"DATA",176.112,20114,0)
+4026879^NILOTINIB HCL 200MG CAP,ORAL
+"DATA",176.112,20114,1)
+746606
+"DATA",176.112,20115,0)
+4014961^GANIRELIX ACETATE 250MCG/0.5ML SYR INJ
+"DATA",176.112,20115,1)
+746563
+"DATA",176.112,20116,0)
+4014969^BECLOMETHASONE DIPROPIONATE 80MCG/ACTUAT (HFA) INHL,ORAL,7.3GM
+"DATA",176.112,20116,1)
+746455
+"DATA",176.112,20117,0)
+4014970^BECLOMETHASONE DIPROPIONATE 80MCG/ACTUAT (HFA) INHL,ORAL,13.2GM
+"DATA",176.112,20117,1)
+746454
+"DATA",176.112,20118,0)
+4014967^BECLOMETHASONE DIPROPIONATE 40MCG/ACTUAT (HFA) INHL,ORAL,7.3GM
+"DATA",176.112,20118,1)
+746452
+"DATA",176.112,20119,0)
+4014968^BECLOMETHASONE DIPROPIONATE 40MCG/ACTUAT (HFA) INHL,ORAL,13.2GM
+"DATA",176.112,20119,1)
+746451
+"DATA",176.112,20120,0)
+4026604^UREA 40% SUSP,TOP
+"DATA",176.112,20120,1)
+746391
+"DATA",176.112,20121,0)
+4007076^CROMOLYN NA 40MG/ML SOLN,NASAL,26ML
+"DATA",176.112,20121,1)
+746341
+"DATA",176.112,20122,0)
+4007077^CROMOLYN NA 800MCG/SPRAY AEROSOL,INHL,8.1GM
+"DATA",176.112,20122,1)
+746340
+"DATA",176.112,20123,0)
+4007071^CROMOLYN NA 40MG/ML SOLN,NASAL,13ML
+"DATA",176.112,20123,1)
+746336
+"DATA",176.112,20124,0)
+4007074^CROMOLYN NA 800MCG/SPRAY AEROSOL,INHL,14.2GM
+"DATA",176.112,20124,1)
+746182
+"DATA",176.112,20125,0)
+4027223^PRAMOXINE HCL 1%/ZINC OXIDE 5% CREAM,RTL
+"DATA",176.112,20125,1)
+746130
+"DATA",176.112,20126,0)
+4027399^TERBINAFINE HCL 125MG/PKT GRNL,ORAL
+"DATA",176.112,20126,1)
+746036
+"DATA",176.112,20127,0)
+4024619^LEVALBUTEROL TARTRATE 59MCG/SPRAY INHL,ORAL,15GM
+"DATA",176.112,20127,1)
+745791
+"DATA",176.112,20128,0)
+4013039^ALBUTEROL 90MCG/IPRATROPIUM BR 18MCG/SPRAY INHALER,ORAL,14.7GM
+"DATA",176.112,20128,1)
+745735
+"DATA",176.112,20129,0)
+4006597^ALBUTEROL 90MCG/SPRAY INHL,ORAL,6.8GM
+"DATA",176.112,20129,1)
+745682
+"DATA",176.112,20130,0)
+4006594^ALBUTEROL SO4 90MCG/ACTUAT (CFC-F) INHL,ORAL,6.7GM
+"DATA",176.112,20130,1)
+745679
+"DATA",176.112,20131,0)
+4027327^ALBUTEROL 90MCG/ACTUAT (CFC-F) INHL,ORAL,18GM DOSE COUNTER
+"DATA",176.112,20131,1)
+745679^^^ALBUTEROL 90MCG (D-COUNT) 200D ORAL INHL^Y
+"DATA",176.112,20132,0)
+4024786^ALBUTEROL SO4 90MCG/ACTUAT (CFC-F) INHL,ORAL,8.5GM
+"DATA",176.112,20132,1)
+745679
+"DATA",176.112,20133,0)
+4024787^ALBUTEROL SO4 90MCG/ACTUAT (CFC-F) INHL,ORAL,18GM
+"DATA",176.112,20133,1)
+745679
+"DATA",176.112,20134,0)
+4025717^FLUTICASONE 45MCG/SALMETEROL 21MCG INHL,ORAL,12GM
+"DATA",176.112,20134,1)
+745623
+"DATA",176.112,20135,0)
+4000818^PENICILLIN G PROCAINE 600000UNT/ML INJ,SUSP
+"DATA",176.112,20135,1)
+745560
+"DATA",176.112,20136,0)
+4000817^PENICILLIN G K 400000UNT/5ML SOLN,ORAL
+"DATA",176.112,20136,1)
+745535
+"DATA",176.112,20137,0)
+4000832^PENICILLIN G K 100000UNT/5ML SOLN,ORAL
+"DATA",176.112,20137,1)
+745533
+"DATA",176.112,20138,0)
+4000812^PENICILLIN G PROCAINE 600000UNT/1.2ML INJ,SUSP
+"DATA",176.112,20138,1)
+745512
+"DATA",176.112,20139,0)
+4007412^PENICILLIN G K 30000UNT/ML/DEXTROSE 5% INJ
+"DATA",176.112,20139,1)
+745505
+"DATA",176.112,20140,0)
+4000802^PENICILLIN G K 200000UNT/VIL INJ
+"DATA",176.112,20140,1)
+745493
+"DATA",176.112,20141,0)
+4000811^PENICILLIN G K 800000UNT TAB
+"DATA",176.112,20141,1)
+745483
+"DATA",176.112,20142,0)
+4000831^PENICILLIN G K 500000UNT TAB
+"DATA",176.112,20142,1)
+745479
+"DATA",176.112,20143,0)
+4000816^PENICILLIN G K 10MILLION UNT/VIL INJ
+"DATA",176.112,20143,1)
+745464
+"DATA",176.112,20144,0)
+4015484^PENICILLIN G PROCAINE 600000UNT/ML INJ,SUSP,2ML
+"DATA",176.112,20144,1)
+745462
+"DATA",176.112,20145,0)
+4000835^PENICILLIN G PROCAINE 3MILLION UNT/VIL INJ,SUSP
+"DATA",176.112,20145,1)
+745303
+"DATA",176.112,20146,0)
+4000808^PENICILLIN G PROCAINE 300000UNT/ML INJ,SUSP
+"DATA",176.112,20146,1)
+745303
+"DATA",176.112,20147,0)
+4000814^PENICILLIN G NA 5MILLION UNT/VIL INJ
+"DATA",176.112,20147,1)
+745302
+"DATA",176.112,20148,0)
+4000804^PENICILLIN G K 5MILLION UNT/VIL INJ
+"DATA",176.112,20148,1)
+745300
+"DATA",176.112,20149,0)
+4000803^PENICILLIN G K 1MILLION UNT/VIL INJ
+"DATA",176.112,20149,1)
+745300
+"DATA",176.112,20150,0)
+4000810^PENICILLIN G K 400000UNT TAB
+"DATA",176.112,20150,1)
+745292
+"DATA",176.112,20151,0)
+4000826^PENICILLIN G K 250000UNT TAB
+"DATA",176.112,20151,1)
+745286
+"DATA",176.112,20152,0)
+4000828^PENICILLIN G K 250000UNT/5ML SOLN,ORAL
+"DATA",176.112,20152,1)
+745284
+"DATA",176.112,20153,0)
+4000809^PENICILLIN G K 200000UNT TAB
+"DATA",176.112,20153,1)
+745051
+"DATA",176.112,20154,0)
+4000833^PENICILLIN G BENZATHINE 200000UNT TAB
+"DATA",176.112,20154,1)
+745049
+"DATA",176.112,20155,0)
+4000822^PEN G BENZATHINE 450000UNT/PEN G PROCAINE 150000UNT/ML INJ,SUSP
+"DATA",176.112,20155,1)
+745042
+"DATA",176.112,20156,0)
+4014752^LEUPROLIDE ACETATE 72MG/KIT INJ,IMPLANT
+"DATA",176.112,20156,1)
+745034
+"DATA",176.112,20157,0)
+4027323^PRAMIPEXOLE DIHYDROCHLORIDE 0.75MG TAB
+"DATA",176.112,20157,1)
+745022
+"DATA",176.112,20158,0)
+4024671^EXENATIDE 250MCG/ML (10MCG/DOSE) 2.4ML 60D PEN
+"DATA",176.112,20158,1)
+744863
+"DATA",176.112,20159,0)
+4024670^EXENATIDE 250MCG/ML (5MCG/DOSE) 1.2ML 60D PEN
+"DATA",176.112,20159,1)
+744863
+"DATA",176.112,20160,0)
+4026676^RALTEGRAVIR 400MG TAB
+"DATA",176.112,20160,1)
+744842
+"DATA",176.112,20161,0)
+4026682^IXABEPILONE 15MG/VIL INJ
+"DATA",176.112,20161,1)
+744824
+"DATA",176.112,20162,0)
+4026683^IXABEPILONE 45MG/VIL INJ
+"DATA",176.112,20162,1)
+744824
+"DATA",176.112,20163,0)
+4026684^DORIPENEM 500MG/VIL INJ
+"DATA",176.112,20163,1)
+744808
+"DATA",176.112,20164,0)
+4000823^PENICILLIN G BENZATHINE 300000UNT/ML INJ,SUSP
+"DATA",176.112,20164,1)
+731575
+"DATA",176.112,20165,0)
+4000834^PENICILLIN G BENZATHINE 1.2MILLION UNT/VIL INJ
+"DATA",176.112,20165,1)
+731572
+"DATA",176.112,20166,0)
+4015485^PENICILLIN G BENZATHINE 600000UNT/ML INJ,SUSP,4ML
+"DATA",176.112,20166,1)
+731570
+"DATA",176.112,20167,0)
+4005144^RHO (D) IMMUNE GLOBULIN,HUMAN 300MCG/ML INJ,SYRINGE,1ML
+"DATA",176.112,20167,1)
+731381
+"DATA",176.112,20168,0)
+4017084^PEGINTERFERON ALFA-2B 80MCG/0.5ML INJ,KIT
+"DATA",176.112,20168,1)
+731348
+"DATA",176.112,20169,0)
+4016933^PEGINTERFERON ALFA-2B 80MCG/0.5ML INJ,SYR
+"DATA",176.112,20169,1)
+731348
+"DATA",176.112,20170,0)
+4015805^PEGINTERFERON ALPHA 2B 80MCG/0.5ML INJ,KIT
+"DATA",176.112,20170,1)
+731348
+"DATA",176.112,20171,0)
+4017083^PEGINTERFERON ALFA-2B 50MCG/0.5ML INJ,KIT
+"DATA",176.112,20171,1)
+731345
+"DATA",176.112,20172,0)
+4016932^PEGINTERFERON ALFA-2B 50MCG/0.5ML INJ,SYR
+"DATA",176.112,20172,1)
+731345
+"DATA",176.112,20173,0)
+4015804^PEGINTERFERON ALPHA-2B 50MCG/0.5ML INJ,KIT
+"DATA",176.112,20173,1)
+731345
+"DATA",176.112,20174,0)
+4015807^PEGINTERFERON ALPHA-2B 150MCG/0.5ML INJ,KIT
+"DATA",176.112,20174,1)
+731334
+"DATA",176.112,20175,0)
+4017086^PEGINTERFERON ALFA-2B 150MCG/0.5ML INJ,KIT
+"DATA",176.112,20175,1)
+731334
+"DATA",176.112,20176,0)
+4016935^PEGINTERFERON ALFA-2B 150MCG/0.5ML INJ,SYR
+"DATA",176.112,20176,1)
+731334
+"DATA",176.112,20177,0)
+4017085^PEGINTERFERON ALFA-2B 120MCG/0.5ML INJ,KIT
+"DATA",176.112,20177,1)
+731333
+"DATA",176.112,20178,0)
+4015806^PEGINTERFERON ALPHA-2B 120MCG/0.5ML INJ,KIT
+"DATA",176.112,20178,1)
+731333
+"DATA",176.112,20179,0)
+4016934^PEGINTERFERON ALFA-2B 120MCG/0.5ML INJ,SYR
+"DATA",176.112,20179,1)
+731333
+"DATA",176.112,20180,0)
+4017020^PEGINTERFERON ALFA-2A 180MCG/0.5ML INJ,SYR,PKT,4
+"DATA",176.112,20180,1)
+731326
+"DATA",176.112,20181,0)
+4016931^PEGINTERFERON ALFA-2A 180MCG/0.5ML INJ,SYR
+"DATA",176.112,20181,1)
+731326
+"DATA",176.112,20182,0)
+4027221^TROSPIUM CL 60MG CAP,SA
+"DATA",176.112,20182,1)
+731223
+"DATA",176.112,20183,0)
+4025686^DARBEPOETIN ALFA,RECOMBINANT 500MCG/ML SYR INJ ALBUMIN FREE
+"DATA",176.112,20183,1)
+731184
+"DATA",176.112,20184,0)
+4025650^DARBEPOETIN ALFA,RECOMBINANT 500MCG/ML SYR INJ SURECLICK
+"DATA",176.112,20184,1)
+731184
+"DATA",176.112,20185,0)
+4016699^DARBEPOETIN ALFA,RECOMBINANT 500MCG/ML SYR INJ W/ALBUMIN
+"DATA",176.112,20185,1)
+731184
+"DATA",176.112,20186,0)
+4017135^DARBEPOETIN ALFA,RECOMBINANT 40MCG/0.4ML SYR INJ W/ALBUMIN
+"DATA",176.112,20186,1)
+731181
+"DATA",176.112,20187,0)
+4025688^DARBEPOETIN ALFA,RECOMBINANT 40MCG/0.4ML SYR INJ ALBUMIN FREE
+"DATA",176.112,20187,1)
+731181
+"DATA",176.112,20188,0)
+4025644^DARBEPOETIN ALFA,RECOMBINANT 40MCG/0.4ML SYR INJ SURECLICK
+"DATA",176.112,20188,1)
+731181
+"DATA",176.112,20189,0)
+4016698^DARBEPOETIN ALFA,RECOMBINANT 300MCG/0.6ML SYR INJ W/ALBUMIN
+"DATA",176.112,20189,1)
+731179
+"DATA",176.112,20190,0)
+4025685^DARBEPOETIN ALFA,RECOMBINANT 300MCG/0.6ML SYR INJ ALBUMIN FREE
+"DATA",176.112,20190,1)
+731179
+"DATA",176.112,20191,0)
+4025649^DARBEPOETIN ALFA,RECOMBINANT 300MCG/0.6ML SYR INJ SURECLICK
+"DATA",176.112,20191,1)
+731179
+"DATA",176.112,20192,0)
+4017136^DARBEPOETIN ALFA,RECOMBINANT 25MCG/0.42ML SYR INJ W/ALBUMIN
+"DATA",176.112,20192,1)
+731176
+"DATA",176.112,20193,0)
+4025643^DARBEPOETIN ALFA,RECOMBINANT 25MCG/0.42ML SYR INJ SURECLICK
+"DATA",176.112,20193,1)
+731176
+"DATA",176.112,20194,0)
+4025687^DARBEPOETIN ALFA,RECOMBINANT 25MCG/0.42ML SYR INJ ALBUMIN FREE
+"DATA",176.112,20194,1)
+731176
+"DATA",176.112,20195,0)
+4025648^DARBEPOETIN ALFA,RECOMBINANT 200MCG/0.4ML SYR INJ SURECLICK
+"DATA",176.112,20195,1)
+731174
+"DATA",176.112,20196,0)
+4016697^DARBEPOETIN ALFA,RECOMBINANT 200MCG/0.4ML SYR INJ W/ALBUMIN
+"DATA",176.112,20196,1)
+731174
+"DATA",176.112,20197,0)
+4025684^DARBEPOETIN ALFA,RECOMBINANT 200MCG/0.4ML SYR INJ ALBUMIN FREE
+"DATA",176.112,20197,1)
+731174
+"DATA",176.112,20198,0)
+4016696^DARBEPOETIN ALFA,RECOMBINANT 150MCG/0.3ML SYR INJ W/ALBUMIN
+"DATA",176.112,20198,1)
+731171
+"DATA",176.112,20199,0)
+4025691^DARBEPOETIN ALFA,RECOMBINANT 150MCG/0.3ML SYR INJ ALBUMIN FREE
+"DATA",176.112,20199,1)
+731171
+"DATA",176.112,20200,0)
+4025647^DARBEPOETIN ALFA,RECOMBINANT 150MCG/0.3ML SYR INJ SURECLICK
+"DATA",176.112,20200,1)
+731171
+"DATA",176.112,20201,0)
+4016694^DARBEPOETIN ALFA,RECOMBINANT 60MCG/0.3ML SYR INJ W/ALBUMIN
+"DATA",176.112,20201,1)
+731167
+"DATA",176.112,20202,0)
+4025689^DARBEPOETIN ALFA,RECOMBINANT 60MCG/0.3ML SYR INJ ALBUMIN FREE
+"DATA",176.112,20202,1)
+731167
+"DATA",176.112,20203,0)
+4025645^DARBEPOETIN ALFA,RECOMBINANT 60MCG/0.3ML SYR INJ SURECLICK
+"DATA",176.112,20203,1)
+731167
+"DATA",176.112,20204,0)
+4027101^CARBIDOPA 50MG/ENTACAPONE 200MG/LEVODOPA 200MG TAB
+"DATA",176.112,20204,1)
+730988
+"DATA",176.112,20205,0)
+4026872^AMLODIPINE BESYLATE 5MG/OLMESARTAN MEDOXOMIL 40MG TAB
+"DATA",176.112,20205,1)
+730872
+"DATA",176.112,20206,0)
+4026870^AMLODIPINE BESYLATE 5MG/OLMESARTAN MEDOXOMIL 20MG TAB
+"DATA",176.112,20206,1)
+730869
+"DATA",176.112,20207,0)
+4026873^AMLODIPINE BESYLATE 5MG/OLMESARTAN MEDOXOMIL 20MG TAB,UD
+"DATA",176.112,20207,1)
+730869
+"DATA",176.112,20208,0)
+4026875^AMLODIPINE BESYLATE 10MG/OLMESARTAN MEDOXOMIL 40MG TAB,UD
+"DATA",176.112,20208,1)
+730866
+"DATA",176.112,20209,0)
+4026869^AMLODIPINE BESYLATE 10MG/OLMESARTAN MEDOXOMIL 40MG TAB
+"DATA",176.112,20209,1)
+730866
+"DATA",176.112,20210,0)
+4026871^AMLODIPINE BESYLATE 10MG/OLMESARTAN MEDOXOMIL 20MG TAB
+"DATA",176.112,20210,1)
+730861
+"DATA",176.112,20211,0)
+4026874^AMLODIPINE BESYLATE 10MG/OLMESARTAN MEDOXOMIL 20MG TAB,UD
+"DATA",176.112,20211,1)
+730861
+"DATA",176.112,20212,0)
+4026747^CARISOPRODOL 250MG TAB
+"DATA",176.112,20212,1)
+730794
+"DATA",176.112,20213,0)
+4001072^SODIUM CHLORIDE 5% INJ
+"DATA",176.112,20213,1)
+730782
+"DATA",176.112,20214,0)
+4001077^SODIUM CHLORIDE 3% INJ
+"DATA",176.112,20214,1)
+730781
+"DATA",176.112,20215,0)
+4001089^SODIUM CHLORIDE 5% SOLN,OPH
+"DATA",176.112,20215,1)
+730780
+"DATA",176.112,20216,0)
+4025646^DARBEPOETIN ALFA,RECOMBINANT 100MCG/0.5ML SYR INJ SURECLICK
+"DATA",176.112,20216,1)
+730044
+"DATA",176.112,20217,0)
+4016695^DARBEPOETIN ALFA,RECOMBINANT 100MCG/0.5ML SYR INJ W/ALBUMIN
+"DATA",176.112,20217,1)
+730044
+"DATA",176.112,20218,0)
+4025690^DARBEPOETIN ALFA,RECOMBINANT 100MCG/0.5ML SYR INJ ALBUMIN FREE
+"DATA",176.112,20218,1)
+730044
+"DATA",176.112,20219,0)
+4001382^HEPARIN NA 5000 UNT/0.5ML TUBEX,0.5ML
+"DATA",176.112,20219,1)
+729976
+"DATA",176.112,20220,0)
+4001389^HEPARIN NA 10UNT/ML LOCK FLUSH SOLN,TUBEX,2.5ML
+"DATA",176.112,20220,1)
+729975
+"DATA",176.112,20221,0)
+4001401^HEPARIN NA 10UNT/ML (PF) LOCK FLUSH SOLN,SYRINGE,1ML
+"DATA",176.112,20221,1)
+729974
+"DATA",176.112,20222,0)
+4001388^HEPARIN NA 10UNT/ML LOCK FLUSH SOLN,TUBEX,1ML
+"DATA",176.112,20222,1)
+729974
+"DATA",176.112,20223,0)
+4001390^HEPARIN NA 10UNT/ML LOCK FLUSH SOLN,SYRINGE,1ML
+"DATA",176.112,20223,1)
+729974
+"DATA",176.112,20224,0)
+4001402^HEPARIN NA 10UNT/ML (PF) LOCK FLUSH SOLN,SYRINGE,3ML
+"DATA",176.112,20224,1)
+729973
+"DATA",176.112,20225,0)
+4001398^HEPARIN NA 10UNT/ML LOCK FLUSH SOLN,CARPUJECT,3ML
+"DATA",176.112,20225,1)
+729973
+"DATA",176.112,20226,0)
+4001391^HEPARIN NA 10UNT/ML LOCK FLUSH SOLN,SYRINGE,3ML
+"DATA",176.112,20226,1)
+729973
+"DATA",176.112,20227,0)
+4001399^HEPARIN NA 10UNT/ML LOCK FLUSH SOLN,CARPUJECT,5ML
+"DATA",176.112,20227,1)
+729972
+"DATA",176.112,20228,0)
+4001392^HEPARIN NA 10UNT/ML LOCK FLUSH SOLN,SYRINGE,5ML
+"DATA",176.112,20228,1)
+729972
+"DATA",176.112,20229,0)
+4001403^HEPARIN NA 10UNT/ML (PF) LOCK FLUSH SOLN,SYRINGE,5ML
+"DATA",176.112,20229,1)
+729972
+"DATA",176.112,20230,0)
+4001387^HEPARIN NA 100UNT/ML/NACL 0.9% LOCK FLUSH SOLN,TUBEX 2.5ML
+"DATA",176.112,20230,1)
+729971
+"DATA",176.112,20231,0)
+4001406^HEPARIN NA 100UNT/ML (PF) LOCK FLUSH SOLN,SYRINGE,5ML
+"DATA",176.112,20231,1)
+729970
+"DATA",176.112,20232,0)
+4001397^HEPARIN NA 100UNT/ML LOCK FLUSH SOLN,CARPUJECT,5ML
+"DATA",176.112,20232,1)
+729970
+"DATA",176.112,20233,0)
+4001395^HEPARIN NA 100UNT/ML LOCK FLUSH SOLN,SYRINGE,5ML
+"DATA",176.112,20233,1)
+729970
+"DATA",176.112,20234,0)
+4001405^HEPARIN NA 100UNT/ML (PF) LOCK FLUSH SOLN,SYRINGE,3ML
+"DATA",176.112,20234,1)
+729969
+"DATA",176.112,20235,0)
+4001394^HEPARIN NA 100UNT/ML LOCK FLUSH SOLN,SYRINGE,3ML
+"DATA",176.112,20235,1)
+729969
+"DATA",176.112,20236,0)
+4001400^HEPARIN NA 100UNT/ML LOCK FLUSH SOLN,CARPUJECT,3ML
+"DATA",176.112,20236,1)
+729969
+"DATA",176.112,20237,0)
+4001404^HEPARIN NA 100UNT/ML (PF) LOCK FLUSH SOLN,SYRINGE,1ML
+"DATA",176.112,20237,1)
+729968
+"DATA",176.112,20238,0)
+4001393^HEPARIN NA 100UNT/ML LOCK FLUSH SOLN,SYRINGE,1ML
+"DATA",176.112,20238,1)
+729968
+"DATA",176.112,20239,0)
+4001386^HEPARIN NA 100UNT/ML/NACL 0.9% LOCK FLUSH SOLN,TUBEX,1ML
+"DATA",176.112,20239,1)
+729968
+"DATA",176.112,20240,0)
+4027239^DICLOFENAC EPOLAMINE 1.3% PATCH
+"DATA",176.112,20240,1)
+729805
+"DATA",176.112,20241,0)
+4026534^KETOCONAZOLE 2% FOAM,TOP
+"DATA",176.112,20241,1)
+728550
+"DATA",176.112,20242,0)
+4027263^CYCLOBENZAPRINE HCL 30MG CAP,SA
+"DATA",176.112,20242,1)
+728496
+"DATA",176.112,20243,0)
+4026560^MARAVIROC 300MG TAB
+"DATA",176.112,20243,1)
+728225
+"DATA",176.112,20244,0)
+4026559^MARAVIROC 150MG TAB
+"DATA",176.112,20244,1)
+728223
+"DATA",176.112,20245,0)
+4027098^FORMOTEROL FUMARATE 10MCG/ML SOLN,INH,2ML
+"DATA",176.112,20245,1)
+728211
+"DATA",176.112,20246,0)
+4027659^ESTRADIOL 1.53MG/SPRAY SPRAY,TOP,8.1ML
+"DATA",176.112,20246,1)
+728118^^^ESTRADIOL 1.53MG/SPRAY 56D TOP SPRAY^Y
+"DATA",176.112,20247,0)
+4027321^OSELTAMIVIR PO4 45MG CAP
+"DATA",176.112,20247,1)
+728113
+"DATA",176.112,20248,0)
+4027322^OSELTAMIVIR PO4 30MG CAP
+"DATA",176.112,20248,1)
+728109
+"DATA",176.112,20249,0)
+4007350^LEUPROLIDE ACETATE 22.5MG/KIT INJ,SUSP,SA
+"DATA",176.112,20249,1)
+727938
+"DATA",176.112,20250,0)
+4007351^LEUPROLIDE ACETATE 11.25MG/KIT INJ,SUSP,SA
+"DATA",176.112,20250,1)
+727935
+"DATA",176.112,20251,0)
+4015972^GLATIRAMER ACETATE 20MG/ML INJ,SYR,1ML
+"DATA",176.112,20251,1)
+727862
+"DATA",176.112,20252,0)
+4026704^DALTEPARIN NA 15,000UNT/0.6ML SYRINGE
+"DATA",176.112,20252,1)
+727861
+"DATA",176.112,20253,0)
+4026705^DALTEPARIN NA 18,000UNT/0.72ML SYRINGE
+"DATA",176.112,20253,1)
+727860
+"DATA",176.112,20254,0)
+4026703^DALTEPARIN NA 12,500UNT/0.5ML SYRINGE
+"DATA",176.112,20254,1)
+727859
+"DATA",176.112,20255,0)
+4014931^INTERFERON ALFA-2A,RECOMBINANT 9 MILLION UNT/SYR INJ
+"DATA",176.112,20255,1)
+727854
+"DATA",176.112,20256,0)
+4014932^INTERFERON ALFA-2A,RECOMINANT 6 MILLION UNT/SYR INJ
+"DATA",176.112,20256,1)
+727853
+"DATA",176.112,20257,0)
+4014941^INTERFERON ALFA-2A,RECOMBINANT 6 MILLION UNT/SYR INJ
+"DATA",176.112,20257,1)
+727853
+"DATA",176.112,20258,0)
+4014933^INTERFERON ALFA-2A,RECOMBINANT 3 MILLION UNT/SYR INJ
+"DATA",176.112,20258,1)
+727848
+"DATA",176.112,20259,0)
+4026701^DALTEPARIN NA 10,000UNT/0.4ML SYRINGE
+"DATA",176.112,20259,1)
+727838
+"DATA",176.112,20260,0)
+4013400^LYME DISEASE VACCINE 30MCG/0.5ML INJ,SYRINGE,0.5ML
+"DATA",176.112,20260,1)
+727827
+"DATA",176.112,20261,0)
+4006602^LABETALOL HCL 5MG/ML INJ,SYRINGE,8ML
+"DATA",176.112,20261,1)
+727825
+"DATA",176.112,20262,0)
+4009111^KETOROLAC TROMETHAMINE 30MG/ML INJ,SYRINGE,2ML
+"DATA",176.112,20262,1)
+727823
+"DATA",176.112,20263,0)
+4009106^KETOROLAC TROMETHAMINE 30MG/ML INJ,TUBEX,2ML
+"DATA",176.112,20263,1)
+727823
+"DATA",176.112,20264,0)
+4001122^SODIUM CHLORIDE 0.9% (PF) INJ,SYRINGE,5ML
+"DATA",176.112,20264,1)
+727822
+"DATA",176.112,20265,0)
+4001120^SODIUM CHLORIDE 0.9% (PF) INJ,SYRINGE,3ML
+"DATA",176.112,20265,1)
+727821
+"DATA",176.112,20266,0)
+4024817^SODIUM CHLORIDE 0.9% INJ,SYR,10ML POSIFLUSH
+"DATA",176.112,20266,1)
+727820
+"DATA",176.112,20267,0)
+4001123^SODIUM CHLORIDE 0.9% (PF) INJ,SYRINGE,10ML
+"DATA",176.112,20267,1)
+727820
+"DATA",176.112,20268,0)
+4002509^PHENYTOIN NA 50MG/ML INJ,SYRINGE,2ML
+"DATA",176.112,20268,1)
+727819
+"DATA",176.112,20269,0)
+4003238^MEPERIDINE HCL 10MG/ML INJ,SYRINGE,30ML
+"DATA",176.112,20269,1)
+727817
+"DATA",176.112,20270,0)
+4025149^IBANDRONATE NA 1MG/ML INJ,SYRINGE,3ML
+"DATA",176.112,20270,1)
+727808
+"DATA",176.112,20271,0)
+4009434^HYALURONATE NA 30MG/ML INJ,OPH,SYRINGE,0.65ML
+"DATA",176.112,20271,1)
+727806
+"DATA",176.112,20272,0)
+4024645^HYALURONATE NA 23MG/ML INJ,OPH,SYRINGE,0.6ML
+"DATA",176.112,20272,1)
+727801
+"DATA",176.112,20273,0)
+4009437^HYALURONATE NA 16MG/ML INJ,OPH,SYRINGE,0.8ML
+"DATA",176.112,20273,1)
+727800
+"DATA",176.112,20274,0)
+4009438^HYALURONATE NA 16MG/ML INJ,OPH,SYRINGE,0.5ML
+"DATA",176.112,20274,1)
+727799
+"DATA",176.112,20275,0)
+4025011^HYALURONATE NA 15MG/ML INJ,SYRINGE,2ML
+"DATA",176.112,20275,1)
+727798
+"DATA",176.112,20276,0)
+4009429^HYALURONATE NA 14MG/ML INJ,OPH,SYRINGE,0.85ML
+"DATA",176.112,20276,1)
+727797
+"DATA",176.112,20277,0)
+4009430^HYALURONATE NA 14MG/ML INJ,OPH,SYRINGE,0.55ML
+"DATA",176.112,20277,1)
+727796
+"DATA",176.112,20278,0)
+4009436^HYALURONATE NA 12MG/ML INJ,OPH,SYRINGE,0.8ML
+"DATA",176.112,20278,1)
+727795
+"DATA",176.112,20279,0)
+4009435^HYALURONATE NA 12MG/ML INJ,OPH,SYRINGE,0.5ML
+"DATA",176.112,20279,1)
+727794
+"DATA",176.112,20280,0)
+4017026^HYALURONATE NA 10MG/ML INJ,SYRINGE,2.5ML
+"DATA",176.112,20280,1)
+727793
+"DATA",176.112,20281,0)
+4009433^HYALURONATE NA 10MG/ML INJ,OPH,SYRINGE,0.85ML
+"DATA",176.112,20281,1)
+727792
+"DATA",176.112,20282,0)
+4009432^HYALURONATE NA 10MG/ML INJ,OPH,SYRINGE,0.55ML
+"DATA",176.112,20282,1)
+727791
+"DATA",176.112,20283,0)
+4012761^HEPATITIS A VACCINE,INACTIVATED 50UNT/ML INJ,SYRINGE,1ML
+"DATA",176.112,20283,1)
+727782
+"DATA",176.112,20284,0)
+4012759^HEPATITIS A VACCINE,INACTIVATED 25UNT/0.5ML INJ,SYRINGE,0.5ML
+"DATA",176.112,20284,1)
+727781
+"DATA",176.112,20285,0)
+4001384^HEPARIN CA 5000 UNT/0.2ML INJ,AMP W/SYRINGE,0.2ML
+"DATA",176.112,20285,1)
+727778
+"DATA",176.112,20286,0)
+4012505^GADOTERIDOL 279.3MG/ML INJ,SYRINGE,17ML
+"DATA",176.112,20286,1)
+727765
+"DATA",176.112,20287,0)
+4012504^GADOTERIDOL 279.3MG/ML INJ,SYRINGE,10ML
+"DATA",176.112,20287,1)
+727764
+"DATA",176.112,20288,0)
+4016252^FULVESTRANT 50MG/ML INJ,SYRINGE,5ML
+"DATA",176.112,20288,1)
+727762
+"DATA",176.112,20289,0)
+4016253^FULVESTRANT 50MG/ML INJ,SYRINGE,2.5ML
+"DATA",176.112,20289,1)
+727761
+"DATA",176.112,20290,0)
+4006326^FENTANYL CITRATE 50MCG/ML INJ,SYRINGE,2ML
+"DATA",176.112,20290,1)
+727759
+"DATA",176.112,20291,0)
+4017373^ETANERCEPT 50MG/ML INJ SYRINGE
+"DATA",176.112,20291,1)
+727757
+"DATA",176.112,20292,0)
+4001675^ESTRADIOL VALERATE 20MG/ML INJ (IN OIL),SYRINGE,1ML
+"DATA",176.112,20292,1)
+727739
+"DATA",176.112,20293,0)
+4013299^ENOXAPARIN 80MG/0.8ML INJ,SYRINGE,0.8ML
+"DATA",176.112,20293,1)
+727729
+"DATA",176.112,20294,0)
+4013297^ENOXAPARIN 60MG/0.6ML INJ,SYRINGE,0.6ML
+"DATA",176.112,20294,1)
+727728
+"DATA",176.112,20295,0)
+4013301^ENOXAPARIN 40MG/0.4ML INJ,SYRINGE,0.4ML
+"DATA",176.112,20295,1)
+727727
+"DATA",176.112,20296,0)
+4013300^ENOXAPARIN 30MG/0.3ML INJ,SYRINGE,0.3ML
+"DATA",176.112,20296,1)
+727726
+"DATA",176.112,20297,0)
+4015803^ENOXAPARIN 150MG/ML INJ,SYRINGE,1ML
+"DATA",176.112,20297,1)
+727725
+"DATA",176.112,20298,0)
+4015802^ENOXAPARIN 120MG/0.8ML INJ,SYRINGE,0.8ML
+"DATA",176.112,20298,1)
+727724
+"DATA",176.112,20299,0)
+4013298^ENOXAPARIN 100MG/ML INJ,SYRINGE,1ML
+"DATA",176.112,20299,1)
+727723
+"DATA",176.112,20300,0)
+4013399^OXYTOCIN 10UNT/ML INJ,SYRINGE,1ML
+"DATA",176.112,20300,1)
+727721
+"DATA",176.112,20301,0)
+4016257^DALTEPARIN NA 7500UNT/0.3ML SYRINGE
+"DATA",176.112,20301,1)
+727719
+"DATA",176.112,20302,0)
+4012727^DALTEPARIN NA 5000UNT/0.2ML SYRINGE
+"DATA",176.112,20302,1)
+727718
+"DATA",176.112,20303,0)
+4013244^ARBUTAMINE HCL 0.05MG/ML INJ,SYRINGE,20ML
+"DATA",176.112,20303,1)
+727717
+"DATA",176.112,20304,0)
+4024830^ANAKINRA 100MG/0.67ML INJ,SYRINGE
+"DATA",176.112,20304,1)
+727711
+"DATA",176.112,20305,0)
+4015741^ANAKINRA 100MG INJ,SYRINGE,1ML
+"DATA",176.112,20305,1)
+727709
+"DATA",176.112,20306,0)
+4009088^ADENOSINE 3MG/ML INJ,SYRINGE 5ML
+"DATA",176.112,20306,1)
+727707
+"DATA",176.112,20307,0)
+4016457^ADALIMUMAB 40MG/0.8ML INJ,SYRINGE,KIT
+"DATA",176.112,20307,1)
+727703
+"DATA",176.112,20308,0)
+4016458^ADALIMUMAB 40MG/0.8ML INJ,VIAL,KIT
+"DATA",176.112,20308,1)
+727703
+"DATA",176.112,20309,0)
+4025576^ADALIMUMAB 40MG/0.8ML INJ,PEN,KIT
+"DATA",176.112,20309,1)
+727703
+"DATA",176.112,20310,0)
+4026199^ADALIMUMAB 40MG/0.8ML INJ,PEN,CROHNS STARTER PKG,6
+"DATA",176.112,20310,1)
+727703
+"DATA",176.112,20311,0)
+4026474^RANOLAZINE 1000MG TAB,SA
+"DATA",176.112,20311,1)
+727657
+"DATA",176.112,20312,0)
+4004988^PRALIDOXIME CL 300MG/ML INJ
+"DATA",176.112,20312,1)
+727631
+"DATA",176.112,20313,0)
+4002358^MEDROXYPROGESTERONE ACETATE 150MG/ML INJ,SUSP,SYRINGE,1ML
+"DATA",176.112,20313,1)
+727615
+"DATA",176.112,20314,0)
+4026489^MEDROXYPROGESTERONE ACETATE 104MG/0.65ML SYR INJ,SUSP
+"DATA",176.112,20314,1)
+727611
+"DATA",176.112,20315,0)
+4009107^KETOROLAC TROMETHAMINE 30MG/ML INJ,TUBEX,BLUNT POINT,1ML
+"DATA",176.112,20315,1)
+727598
+"DATA",176.112,20316,0)
+4009105^KETOROLAC TROMETHAMINE 30MG/ML INJ,TUBEX,1ML
+"DATA",176.112,20316,1)
+727598
+"DATA",176.112,20317,0)
+4009101^KETOROLAC TROMETHAMINE 30MG/ML INJ,SYRINGE,1ML
+"DATA",176.112,20317,1)
+727598
+"DATA",176.112,20318,0)
+4009108^KETOROLAC TROMETHAMINE 15MG/ML INJ,TUBEX,BLUNT POINT,1ML
+"DATA",176.112,20318,1)
+727597
+"DATA",176.112,20319,0)
+4009100^KETOROLAC TROMETHAMINE 15MG/ML INJ,SYRINGE,1ML
+"DATA",176.112,20319,1)
+727597
+"DATA",176.112,20320,0)
+4009104^KETOROLAC TROMETHAMINE 15MG/ML INJ,TUBEX,1ML
+"DATA",176.112,20320,1)
+727597
+"DATA",176.112,20321,0)
+4024543^FONDAPARINUX NA 7.5MG/0.6ML INJ,SYRINGE,0.6ML
+"DATA",176.112,20321,1)
+727567
+"DATA",176.112,20322,0)
+4024542^FONDAPARINUX NA 5MG/0.4ML INJ,SYRINGE,0.6ML
+"DATA",176.112,20322,1)
+727567
+"DATA",176.112,20323,0)
+4024615^FONDAPARINUX NA 5MG/0.4ML INJ,SYRINGE,0.4ML
+"DATA",176.112,20323,1)
+727565
+"DATA",176.112,20324,0)
+4015843^FONDAPARINUX NA 2.5MG/0.5ML INJ,SYRINGE,0.5ML
+"DATA",176.112,20324,1)
+727563
+"DATA",176.112,20325,0)
+4024544^FONDAPARINUX NA 10MG/0.8ML INJ,SYRINGE,0.8ML
+"DATA",176.112,20325,1)
+727560
+"DATA",176.112,20326,0)
+4015905^FLUPHENAZINE DECONOATE 25MG/ML INJ,SYRINGE,1ML
+"DATA",176.112,20326,1)
+727548
+"DATA",176.112,20327,0)
+4015069^FILGRASTIM 600MCG/ML (PF) INJ,SYRINGE,0.8ML
+"DATA",176.112,20327,1)
+727544
+"DATA",176.112,20328,0)
+4015840^PEGFILGRASTIM 10MG/ML INJ,SYRINGE,0.6ML (6MG)
+"DATA",176.112,20328,1)
+727539
+"DATA",176.112,20329,0)
+4015068^FILGRASTIM 600MCG/ML (PF) INJ,SYRINGE,0.5ML
+"DATA",176.112,20329,1)
+727535
+"DATA",176.112,20330,0)
+4002567^DIPHENHYDRAMINE HCL 50MG/ML INJ,SYRINGE,1ML
+"DATA",176.112,20330,1)
+727527
+"DATA",176.112,20331,0)
+4000646^ATROPINE SO4 0.1MG/ML INJ,SYRINGE,5ML
+"DATA",176.112,20331,1)
+727393
+"DATA",176.112,20332,0)
+4000647^ATROPINE SO4 0.1MG/ML INJ,SYRINGE,10ML
+"DATA",176.112,20332,1)
+727392
+"DATA",176.112,20333,0)
+4012726^DALTEPARIN NA 2500UNT/0.2ML SYRINGE
+"DATA",176.112,20333,1)
+727384
+"DATA",176.112,20334,0)
+4016258^DALTEPARIN NA 10,000UNT/ML SYRINGE
+"DATA",176.112,20334,1)
+727383
+"DATA",176.112,20335,0)
+4009431^HYALURONATE NA 10MG/ML INJ,OPH,SYRINGE,0.4ML
+"DATA",176.112,20335,1)
+727381
+"DATA",176.112,20336,0)
+4003267^EPINEPHRINE 1MG/ML INJ,SYRINGE,1ML
+"DATA",176.112,20336,1)
+727374
+"DATA",176.112,20337,0)
+4003265^EPINEPHRINE 1MG/ML INJ,TUBEX,1ML
+"DATA",176.112,20337,1)
+727374
+"DATA",176.112,20338,0)
+4009087^ADENOSINE 3MG/ML INJ,SYRINGE 2ML
+"DATA",176.112,20338,1)
+727360
+"DATA",176.112,20339,0)
+4026880^ADENOSINE 3MG/ML INJ,SYRINGE 4ML
+"DATA",176.112,20339,1)
+727355
+"DATA",176.112,20340,0)
+4010259^SUMATRIPTAN SUCCINATE 6MG/0.5ML INJ,KIT
+"DATA",176.112,20340,1)
+727339
+"DATA",176.112,20341,0)
+4010262^SUMATRIPTAN SUCCINATE 6MG/0.5ML INJ,STATDOSE RFL KIT
+"DATA",176.112,20341,1)
+727339
+"DATA",176.112,20342,0)
+4010263^SUMATRIPTAN SUCCINATE 6MG/0.5ML INJ,STATDOSE SYSTEM KIT
+"DATA",176.112,20342,1)
+727339
+"DATA",176.112,20343,0)
+4010257^SUMATRIPTAN SUCCINATE 6MG/0.5ML INJ,SYRINGE,0.5ML
+"DATA",176.112,20343,1)
+727339
+"DATA",176.112,20344,0)
+4009439^HYALURONATE NA 10MG/ML INJ,SYRINGE,2ML
+"DATA",176.112,20344,1)
+727305
+"DATA",176.112,20345,0)
+4008072^HYDROCODONE 5MG/K GUAIACOLSULFONATE 300MG/5ML LIQUID
+"DATA",176.112,20345,1)
+725915
+"DATA",176.112,20346,0)
+4026137^CARBOXYMETHYLCELLULOSE NA 0.5%/GLYCERIN 0.5% SOLN,OPH
+"DATA",176.112,20346,1)
+725147
+"DATA",176.112,20347,0)
+4026665^PROGESTERONE 100MG TAB,VAG
+"DATA",176.112,20347,1)
+725094
+"DATA",176.112,20348,0)
+4026605^CYCLOBENZAPRINE HCL 15MG CAP,SA
+"DATA",176.112,20348,1)
+725084
+"DATA",176.112,20349,0)
+4026575^RIVASTIGMINE 9.5MG/24HR PATCH
+"DATA",176.112,20349,1)
+725023
+"DATA",176.112,20350,0)
+4026574^RIVASTIGMINE 4.6MG/24HR PATCH
+"DATA",176.112,20350,1)
+725021
+"DATA",176.112,20351,0)
+4026184^ARMODAFINIL 50MG TAB
+"DATA",176.112,20351,1)
+724863
+"DATA",176.112,20352,0)
+4026186^ARMODAFINIL 250MG TAB
+"DATA",176.112,20352,1)
+724861
+"DATA",176.112,20353,0)
+4026185^ARMODAFINIL 150MG TAB
+"DATA",176.112,20353,1)
+724859
+"DATA",176.112,20354,0)
+4003065^OXYCODONE HCL 2.25MG/OXYCODONE TEREPH 0.19MG/ASA 325MG TAB
+"DATA",176.112,20354,1)
+724614
+"DATA",176.112,20355,0)
+4014635^SODIUM CHLORIDE 10% INHL 15ML
+"DATA",176.112,20355,1)
+724592
+"DATA",176.112,20356,0)
+4025543^SODIUM CHLORIDE 3% INHL 15ML
+"DATA",176.112,20356,1)
+724590
+"DATA",176.112,20357,0)
+4003346^DIMENHYDRINATE 12.5MG/4ML LIQUID
+"DATA",176.112,20357,1)
+724570
+"DATA",176.112,20358,0)
+4001502^NYSTATIN 100000UNT TAB,VAG
+"DATA",176.112,20358,1)
+724568
+"DATA",176.112,20359,0)
+4026893^ZILEUTON 600MG TAB,SA
+"DATA",176.112,20359,1)
+723848
+"DATA",176.112,20360,0)
+4026127^ROTIGOTINE 4MG/24HRS PATCH
+"DATA",176.112,20360,1)
+722295
+"DATA",176.112,20361,0)
+4026189^TEMSIROLIMUS 25MG/ML INJ,SOLN
+"DATA",176.112,20361,1)
+722289
+"DATA",176.112,20362,0)
+4026271^SULFACETAMIDE NA 10%/SULFUR 4% WASH,TOP
+"DATA",176.112,20362,1)
+722265
+"DATA",176.112,20363,0)
+4026126^ROTIGOTINE 2MG/24HRS PATCH
+"DATA",176.112,20363,1)
+722253
+"DATA",176.112,20364,0)
+4026283^AMLODIPINE BESYLATE 5MG/VALSARTAN 320MG TAB
+"DATA",176.112,20364,1)
+722137
+"DATA",176.112,20365,0)
+4026284^AMLODIPINE BESYLATE 5MG/VALSARTAN 320MG TAB,UD
+"DATA",176.112,20365,1)
+722137
+"DATA",176.112,20366,0)
+4026276^AMLODIPINE BESYLATE 5MG/VALSARTAN 160MG TAB
+"DATA",176.112,20366,1)
+722134
+"DATA",176.112,20367,0)
+4026277^AMLODIPINE BESYLATE 5MG/VALSARTAN 160MG TAB,UD
+"DATA",176.112,20367,1)
+722134
+"DATA",176.112,20368,0)
+4026281^AMLODIPINE BESYLATE 10MG/VALSARTAN 320MG TAB,UD
+"DATA",176.112,20368,1)
+722131
+"DATA",176.112,20369,0)
+4026280^AMLODIPINE BESYLATE 10MG/VALSARTAN 320MG TAB
+"DATA",176.112,20369,1)
+722131
+"DATA",176.112,20370,0)
+4026286^AMLODIPINE BESYLATE 10MG/VALSARTAN 160MG TAB
+"DATA",176.112,20370,1)
+722126
+"DATA",176.112,20371,0)
+4026287^AMLODIPINE BESYLATE 10MG/VALSARTAN 160MG TAB,UD
+"DATA",176.112,20371,1)
+722126
+"DATA",176.112,20372,0)
+4026187^AMBRISENTAN 5MG TAB
+"DATA",176.112,20372,1)
+722122
+"DATA",176.112,20373,0)
+4026188^AMBRISENTAN 10MG TAB
+"DATA",176.112,20373,1)
+722116
+"DATA",176.112,20374,0)
+4026473^ADAPALENE 0.3% GEL,TOP
+"DATA",176.112,20374,1)
+722111
+"DATA",176.112,20375,0)
+4026256^QUETIAPINE FUMARATE 400MG TAB,SA
+"DATA",176.112,20375,1)
+721796
+"DATA",176.112,20376,0)
+4026255^QUETIAPINE FUMARATE 300MG TAB,SA
+"DATA",176.112,20376,1)
+721794
+"DATA",176.112,20377,0)
+4026254^QUETIAPINE FUMARATE 200MG TAB,SA
+"DATA",176.112,20377,1)
+721791
+"DATA",176.112,20378,0)
+4001079^SODIUM CHLORIDE 0.15% SOLN,IRRG
+"DATA",176.112,20378,1)
+707677
+"DATA",176.112,20379,0)
+4026215^BUDESONIDE 80MCG/FORMOTEROL FUM 4.5MCG/SPRAY INHL,ORAL,10.2GM
+"DATA",176.112,20379,1)
+707365
+"DATA",176.112,20380,0)
+4026214^BUDESONIDE 160MCG/FORMOTEROL FUM 4.5MCG/SPRAY INHL,ORAL,10.2GM
+"DATA",176.112,20380,1)
+707361
+"DATA",176.112,20381,0)
+4026270^UREA 50% SUSP,TOP
+"DATA",176.112,20381,1)
+707348
+"DATA",176.112,20382,0)
+4001094^SODIUM CHLORIDE 0.65% SOLN,NASAL
+"DATA",176.112,20382,1)
+707329
+"DATA",176.112,20383,0)
+4001117^SODIUM CHLORIDE 0.65% SOLN,NASAL SPRAY
+"DATA",176.112,20383,1)
+707251
+"DATA",176.112,20384,0)
+4001743^NYSTATIN 100000UNT/GM/TRIAMCINOLONE 0.1% OINT,TOP
+"DATA",176.112,20384,1)
+706961
+"DATA",176.112,20385,0)
+4013106^TAMSULOSIN HCL 0.4MG CAP
+"DATA",176.112,20385,1)
+706955
+"DATA",176.112,20386,0)
+4027334^SODIUM CHLORIDE 7% INHL 4ML
+"DATA",176.112,20386,1)
+706943
+"DATA",176.112,20387,0)
+4027280^AZITHROMYCIN 1% SOLN,OPH
+"DATA",176.112,20387,1)
+706868^^^AZITHROMYCIN 1% OPH SOLN^Y
+"DATA",176.112,20388,0)
+4026121^RISPERIDONE 12.5MG/VIL INJ,SUSP,SA
+"DATA",176.112,20388,1)
+706822
+"DATA",176.112,20389,0)
+4013408^PREDNICARBATE 0.1% OINT,TOP
+"DATA",176.112,20389,1)
+706546
+"DATA",176.112,20390,0)
+4006959^DANTROLENE NA 20MG/VIL INJ
+"DATA",176.112,20390,1)
+706536
+"DATA",176.112,20391,0)
+4026131^BISMUTH 140MG/METRONIDAZOLE 125MG/TETRACYCLINE 125MG CAP,ORAL
+"DATA",176.112,20391,1)
+705861
+"DATA",176.112,20392,0)
+4026159^ZOLEDRONIC ACID 5MG/BTL INJ,100ML
+"DATA",176.112,20392,1)
+705824
+"DATA",176.112,20393,0)
+4026274^SULFACETAMIDE NA 10%/SULFUR 5% FOAM,TOP
+"DATA",176.112,20393,1)
+705822
+"DATA",176.112,20394,0)
+4027282^CHOLECALCIFEROL 50,000UNIT CAP,ORAL
+"DATA",176.112,20394,1)
+705728
+"DATA",176.112,20395,0)
+4007041^RANITIDINE HCL 75MG/5ML SYRUP
+"DATA",176.112,20395,1)
+705610
+"DATA",176.112,20396,0)
+4026175^RISEDRONATE NA 75MG TAB
+"DATA",176.112,20396,1)
+705192
+"DATA",176.112,20397,0)
+4026095^ALENDRONATE SODIUM 70MG/CHOLECALCIFEROL 5600UNIT TAB
+"DATA",176.112,20397,1)
+705185
+"DATA",176.112,20398,0)
+4026117^FLUTICASONE FUROATE 27.5MCG/SPRAY SUSP,NASAL,10GM
+"DATA",176.112,20398,1)
+705024
+"DATA",176.112,20399,0)
+4026078^RETAPAMULIN 1% OINT,TOP
+"DATA",176.112,20399,1)
+704855
+"DATA",176.112,20400,0)
+4007768^VITAMIN E 50UNT/GM CREAM,TOP
+"DATA",176.112,20400,1)
+702648
+"DATA",176.112,20401,0)
+4007770^VITAMIN E 30UNT/GM CREAM,TOP
+"DATA",176.112,20401,1)
+702639
+"DATA",176.112,20402,0)
+4007773^VITAMIN E 13500UNT/GM CREAM,TOP
+"DATA",176.112,20402,1)
+702635
+"DATA",176.112,20403,0)
+4007764^VITAMIN E 100UNT/GM CREAM,TOP
+"DATA",176.112,20403,1)
+702633
+"DATA",176.112,20404,0)
+4007765^VITAMIN E 3200UNT/GM CREAM,TOP
+"DATA",176.112,20404,1)
+702631
+"DATA",176.112,20405,0)
+4015410^HYDROCODONE 2.5MG/ACETAMINOPHEN 167MG/5ML ELIXIR
+"DATA",176.112,20405,1)
+702550
+"DATA",176.112,20406,0)
+4025308^HYDROCODONE 2.5MG/APAP 167MG/5ML ELIXIR,15ML
+"DATA",176.112,20406,1)
+702550
+"DATA",176.112,20407,0)
+4000734^PHENOBARBITAL 20MG/5ML ELIXIR,15ML
+"DATA",176.112,20407,1)
+702519
+"DATA",176.112,20408,0)
+4000719^PHENOBARBITAL 20MG/5ML ELIXIR
+"DATA",176.112,20408,1)
+702519
+"DATA",176.112,20409,0)
+4000957^SILVER NITRATE 10% SOLN,TOP
+"DATA",176.112,20409,1)
+702313
+"DATA",176.112,20410,0)
+4015941^SENNOSIDES 8.8MG/5ML SYRUP,ORAL
+"DATA",176.112,20410,1)
+702311
+"DATA",176.112,20411,0)
+4002487^PROMETHAZINE HCL 6.25MG/5ML SYRUP
+"DATA",176.112,20411,1)
+702310
+"DATA",176.112,20412,0)
+4006457^METAPROTERENOL SO4 10MG/5ML SYRUP
+"DATA",176.112,20412,1)
+702262
+"DATA",176.112,20413,0)
+4006463^METAPROTERENOL SO4 10MG/5ML (SF) SYRUP
+"DATA",176.112,20413,1)
+702262
+"DATA",176.112,20414,0)
+4008234^FERROUS SO4 220MG/5ML ELIXIR
+"DATA",176.112,20414,1)
+702249
+"DATA",176.112,20415,0)
+4008336^DM 10MG/P-EPHRINE 5MG/PYRILAMINE 8.3MG/5ML SYRUP
+"DATA",176.112,20415,1)
+702221
+"DATA",176.112,20416,0)
+4006556^DEXCHLORPHENIRAMINE MALEATE 2MG/5ML SYRUP
+"DATA",176.112,20416,1)
+702220
+"DATA",176.112,20417,0)
+4002858^CYPROHEPTADINE HCL 2MG/5ML SYRUP
+"DATA",176.112,20417,1)
+702214
+"DATA",176.112,20418,0)
+4006660^CODEINE 10MG/BROMODIPHENHYDRAMINE 12.5MG/5ML SYRUP
+"DATA",176.112,20418,1)
+702131
+"DATA",176.112,20419,0)
+4005193^AMANTADINE HCL 50MG/5ML SYRUP
+"DATA",176.112,20419,1)
+702117
+"DATA",176.112,20420,0)
+4005195^AMANTADINE HCL 50MG/5ML (SF) SYRUP,10ML
+"DATA",176.112,20420,1)
+702117
+"DATA",176.112,20421,0)
+4008296^CARBAMIDE PEROXIDE 6.5%/GLYCERIN SOLN,OTIC
+"DATA",176.112,20421,1)
+702050
+"DATA",176.112,20422,0)
+4007767^VITAMIN E 14000UNT/15ML LIQUID,TOP
+"DATA",176.112,20422,1)
+702016
+"DATA",176.112,20423,0)
+4014240^CYTARABINE LIPOSOME 10MG/ML,INJ,VIL,5ML
+"DATA",176.112,20423,1)
+701786
+"DATA",176.112,20424,0)
+4003699^THEOPHYLLINE 100MG CAP,SA
+"DATA",176.112,20424,1)
+701712
+"DATA",176.112,20425,0)
+4003646^THEOPHYLLINE,ANHYDROUS 100MG CAP,SA
+"DATA",176.112,20425,1)
+701712
+"DATA",176.112,20426,0)
+4026180^TEMOZOLOMIDE 180MG CAP
+"DATA",176.112,20426,1)
+700885
+"DATA",176.112,20427,0)
+4026179^TEMOZOLOMIDE 140MG CAP
+"DATA",176.112,20427,1)
+700883
+"DATA",176.112,20428,0)
+4025990^LISDEXAMFETAMINE DIMESYLATE 70MG CAP,ORAL
+"DATA",176.112,20428,1)
+700817
+"DATA",176.112,20429,0)
+4025989^LISDEXAMFETAMINE DIMESYLATE 50MG CAP,ORAL
+"DATA",176.112,20429,1)
+700815
+"DATA",176.112,20430,0)
+4025988^LISDEXAMFETAMINE DIMESYLATE 30MG CAP,ORAL
+"DATA",176.112,20430,1)
+700813
+"DATA",176.112,20431,0)
+4026046^METFORMIN HCL 1000MG/SITAGLIPTIN PHOSPHATE 50MG TAB
+"DATA",176.112,20431,1)
+700518
+"DATA",176.112,20432,0)
+4026045^METFORMIN HCL 500MG/SITAGLIPTIN PHOSPHATE 50MG TAB
+"DATA",176.112,20432,1)
+700517
+"DATA",176.112,20433,0)
+4025994^THALIDOMIDE 150MG CAP
+"DATA",176.112,20433,1)
+700416
+"DATA",176.112,20434,0)
+4026005^ESOMEPRAZOLE MAGNESIUM 40MG/PKT PWDR,ORAL
+"DATA",176.112,20434,1)
+700395
+"DATA",176.112,20435,0)
+4026004^ESOMEPRAZOLE MAGNESIUM 20MG/PKT PWDR,ORAL
+"DATA",176.112,20435,1)
+700391
+"DATA",176.112,20436,0)
+4025991^ECULIZUMAB 10MG/ML INJ,SOLN
+"DATA",176.112,20436,1)
+700384
+"DATA",176.112,20437,0)
+4009043^UNDECYLENIC ACID 2% SOAP,TOP
+"DATA",176.112,20437,1)
+693951
+"DATA",176.112,20438,0)
+4009042^UNDECYLENIC ACID 10% SOLN,TOP
+"DATA",176.112,20438,1)
+693947
+"DATA",176.112,20439,0)
+4009391^UNDECYLENIC ACID 10%/ISOPROPANOL 32.5% FOAM,TOP
+"DATA",176.112,20439,1)
+693946
+"DATA",176.112,20440,0)
+4007860^CHLOROXYLENOL 3%/ISOPROPYL MYRISTA 72%/UNDECYLENIC ACID 25% SOLN
+"DATA",176.112,20440,1)
+693914
+"DATA",176.112,20441,0)
+4010056^CHLOROXYLENOL 0.5%/UNDECYLENIC ACID 10% TINCTURE,TOP
+"DATA",176.112,20441,1)
+693912
+"DATA",176.112,20442,0)
+4009390^CALCIUM UNDECYLENATE 2%/ZINC UNDECYLENATE 20% PWDR,AEROSOL
+"DATA",176.112,20442,1)
+693910
+"DATA",176.112,20443,0)
+4009388^UNDECYLENATE CALCIUM 10% PWDR,TOP
+"DATA",176.112,20443,1)
+693906
+"DATA",176.112,20444,0)
+4025906^ORLISTAT 60MG CAP
+"DATA",176.112,20444,1)
+692876
+"DATA",176.112,20445,0)
+4010304^LORATADINE 5MG/5ML SYRUP
+"DATA",176.112,20445,1)
+692783
+"DATA",176.112,20446,0)
+4006355^CHLORPHENIRAMINE 1MG/PHENYLEPHRINE 2.5MG/5ML SYRUP
+"DATA",176.112,20446,1)
+692741
+"DATA",176.112,20447,0)
+4025958^ALISKIREN 300MG TAB
+"DATA",176.112,20447,1)
+692506
+"DATA",176.112,20448,0)
+4025959^ALISKIREN 300MG TAB,UD
+"DATA",176.112,20448,1)
+692506
+"DATA",176.112,20449,0)
+4025957^ALISKIREN 150MG TAB,UD
+"DATA",176.112,20449,1)
+692501
+"DATA",176.112,20450,0)
+4025956^ALISKIREN 150MG TAB
+"DATA",176.112,20450,1)
+692501
+"DATA",176.112,20451,0)
+4027402^CYCLOBENZAPRINE HCL 7.5MG TAB
+"DATA",176.112,20451,1)
+688637
+"DATA",176.112,20452,0)
+4001745^DIATRIZOATE MEGLUMINE 52.7%/IODIPAMIDE MEGLUMINE 26.8% SOLN
+"DATA",176.112,20452,1)
+688635
+"DATA",176.112,20453,0)
+4001540^DIATRIZOATE MEGLUMINE 66%/DIATRIZOATE NA 10% INJ
+"DATA",176.112,20453,1)
+688605
+"DATA",176.112,20454,0)
+4024778^ESTRADIOL 2.5MG/GM EMULSION,TOP,PKT,1.74GM
+"DATA",176.112,20454,1)
+688507
+"DATA",176.112,20455,0)
+4003580^K BICARB 10MEQ/KCL 8MEQ/K CITRATE 2MEQ TAB,EFFERVSC
+"DATA",176.112,20455,1)
+687188
+"DATA",176.112,20456,0)
+4016286^AMPHETAMINE 6.25MG/DEXTROAMPHETAMINE 6.25MG TAB
+"DATA",176.112,20456,1)
+687043
+"DATA",176.112,20457,0)
+4013087^CARVEDILOL 3.125MG TAB
+"DATA",176.112,20457,1)
+686924
+"DATA",176.112,20458,0)
+4005947^DEXTROSE 10%/NACL 0.33% INJ
+"DATA",176.112,20458,1)
+686894
+"DATA",176.112,20459,0)
+4005936^DEXTROSE 10%/NACL 0.3% INJ
+"DATA",176.112,20459,1)
+686893
+"DATA",176.112,20460,0)
+4005935^DEXTROSE 10%/NACL 0.225% INJ
+"DATA",176.112,20460,1)
+686892
+"DATA",176.112,20461,0)
+4005948^DEXTROSE 10%/NACL 0.11% INJ
+"DATA",176.112,20461,1)
+686890
+"DATA",176.112,20462,0)
+4005937^DEXTROSE 5%/NACL 0.33% INJ
+"DATA",176.112,20462,1)
+686542
+"DATA",176.112,20463,0)
+4005931^DEXTROSE 5%/NACL 0.3% INJ
+"DATA",176.112,20463,1)
+686541
+"DATA",176.112,20464,0)
+4005930^DEXTROSE 5%/NACL 0.225% INJ
+"DATA",176.112,20464,1)
+686540
+"DATA",176.112,20465,0)
+4005939^DEXTROSE 5%/NACL 0.11% INJ
+"DATA",176.112,20465,1)
+686538
+"DATA",176.112,20466,0)
+4006225^DEXTROSE 5%/NACL 0.33%/KCL 10MEQ/L INJ
+"DATA",176.112,20466,1)
+686536
+"DATA",176.112,20467,0)
+4006219^DEXTROSE 5%/NACL 0.3%/KCL 10MEQ/L INJ
+"DATA",176.112,20467,1)
+686535
+"DATA",176.112,20468,0)
+4006211^DEXTROSE 5%/NACL 0.225%/KCL 10MEQ/L INJ
+"DATA",176.112,20468,1)
+686534
+"DATA",176.112,20469,0)
+4001583^ERYTHROMYCIN GLUCEPTATE 1GM/VIL INJ IV
+"DATA",176.112,20469,1)
+686447
+"DATA",176.112,20470,0)
+4001582^ERYTHROMYCIN GLUCEPTATE 500MG/VIL INJ IV
+"DATA",176.112,20470,1)
+686447
+"DATA",176.112,20471,0)
+4026155^MESALAMINE 1200MG TAB,EC
+"DATA",176.112,20471,1)
+686429
+"DATA",176.112,20472,0)
+4001561^ERYTHROMYCIN ES 400MG/5ML SUSP
+"DATA",176.112,20472,1)
+686418
+"DATA",176.112,20473,0)
+4027870^ERYTHROMYCIN ES 400MG/5ML SUSP,PWDR,ORAL
+"DATA",176.112,20473,1)
+686418^^^ERYTHROMYCIN ES 400MG/5ML ORAL SUSP^Y
+"DATA",176.112,20474,0)
+4001556^ERYTHROMYCIN STEARATE 500MG TAB
+"DATA",176.112,20474,1)
+686406
+"DATA",176.112,20475,0)
+4001557^ERYTHROMYCIN ES 400MG TAB
+"DATA",176.112,20475,1)
+686405
+"DATA",176.112,20476,0)
+4001574^ERYTHROMYCIN ES 40MG/ML DROPS,ORAL
+"DATA",176.112,20476,1)
+686400
+"DATA",176.112,20477,0)
+4001560^ERYTHROMYCIN ES 200MG/5ML SUSP
+"DATA",176.112,20477,1)
+686400
+"DATA",176.112,20478,0)
+4001569^ERYTHROMYCIN ES 100MG/2.5ML DROPS,ORAL
+"DATA",176.112,20478,1)
+686400
+"DATA",176.112,20479,0)
+4027869^ERYTHROMYCIN ES 200MG/5ML SUSP,PWDR,ORAL
+"DATA",176.112,20479,1)
+686400^^^ERYTHROMYCIN ES 200MG/5ML ORAL SUSP^Y
+"DATA",176.112,20480,0)
+4006318^ERYTHROMYCIN ES 200MG/SULFISOXAZOLE 600MG/5ML SUSP
+"DATA",176.112,20480,1)
+686383
+"DATA",176.112,20481,0)
+4025889^CELECOXIB 50MG CAP
+"DATA",176.112,20481,1)
+686379
+"DATA",176.112,20482,0)
+4001555^ERYTHROMYCIN STEARATE 250MG TAB
+"DATA",176.112,20482,1)
+686355
+"DATA",176.112,20483,0)
+4015266^ERYTHROMYCIN STEARATE 250MG TAB,UD
+"DATA",176.112,20483,1)
+686355
+"DATA",176.112,20484,0)
+4001576^ERYTHROMYCIN ES 200MG TAB,CHEWABLE
+"DATA",176.112,20484,1)
+686350
+"DATA",176.112,20485,0)
+4006227^DEXTROSE 5%/NACL 0.33%/KCL 30MEQ/L INJ
+"DATA",176.112,20485,1)
+686186
+"DATA",176.112,20486,0)
+4006213^DEXTROSE 5%/NACL 0.225%/KCL 30MEQ/L INJ
+"DATA",176.112,20486,1)
+686185
+"DATA",176.112,20487,0)
+4009717^APAP 167MG/DIPHENHYDRAMINE 8.33MG/PSEUDEFED 10MG/5ML LIQUID
+"DATA",176.112,20487,1)
+685802
+"DATA",176.112,20488,0)
+4026948^CHOLECALCIFEROL 10,000UNIT CAP,ORAL
+"DATA",176.112,20488,1)
+685054
+"DATA",176.112,20489,0)
+4014140^OXYCHLOROSENE NA 2GM/BTL PWDR,TOP
+"DATA",176.112,20489,1)
+672963
+"DATA",176.112,20490,0)
+4001738^IPODATE CA 3GM/PKG PWDR
+"DATA",176.112,20490,1)
+672957
+"DATA",176.112,20491,0)
+4000766^METHADONE HCL 40MG TAB,EFFERVSC
+"DATA",176.112,20491,1)
+672939
+"DATA",176.112,20492,0)
+4025974^APAP 108MG/DM 3.3MG/PHENYLEPHRINE 1.6MG/5ML LIQUID,ORAL
+"DATA",176.112,20492,1)
+672809
+"DATA",176.112,20493,0)
+4025995^SULFACETAMIDE NA 10%/SULFUR 1% WASH,TOP
+"DATA",176.112,20493,1)
+672596
+"DATA",176.112,20494,0)
+4025851^PALIPERIDONE 9MG TAB,SA
+"DATA",176.112,20494,1)
+672571
+"DATA",176.112,20495,0)
+4025852^PALIPERIDONE 9MG TAB,SA,UD
+"DATA",176.112,20495,1)
+672571
+"DATA",176.112,20496,0)
+4025849^PALIPERIDONE 6MG TAB,SA
+"DATA",176.112,20496,1)
+672569
+"DATA",176.112,20497,0)
+4025850^PALIPERIDONE 6MG TAB,SA,UD
+"DATA",176.112,20497,1)
+672569
+"DATA",176.112,20498,0)
+4025847^PALIPERIDONE 3MG TAB,SA
+"DATA",176.112,20498,1)
+672567
+"DATA",176.112,20499,0)
+4025848^PALIPERIDONE 3MG TAB,SA,UD
+"DATA",176.112,20499,1)
+672567
+"DATA",176.112,20500,0)
+4026946^MENTHOL 6%/METHYL SALICYLATE 14% OINT,TOP
+"DATA",176.112,20500,1)
+672562
+"DATA",176.112,20501,0)
+4025913^ARIPIPRAZOLE 9.75MG/1.3ML (7.5MG/ML) INJ
+"DATA",176.112,20501,1)
+672356
+"DATA",176.112,20502,0)
+4025971^LAPATINIB 250MG TAB
+"DATA",176.112,20502,1)
+672149
+"DATA",176.112,20503,0)
+4003603^XYLOSE 25GM/BTL PWDR
+"DATA",176.112,20503,1)
+672081
+"DATA",176.112,20504,0)
+4010431^APAP 500MG/PAMABROM 25MG/PYRIDOXINE 50MG TAB
+"DATA",176.112,20504,1)
+670595
+"DATA",176.112,20505,0)
+4025569^PHENOL (DILUTE) 0.6% (AF) MOUTHWASH
+"DATA",176.112,20505,1)
+670451
+"DATA",176.112,20506,0)
+4024810^CYCLOSPORINE NON-MODIFIED 50MG/ML SOLN,ORAL
+"DATA",176.112,20506,1)
+670177
+"DATA",176.112,20507,0)
+4027187^FEXOFENADINE HCL 6MG/ML SUSP,ORAL
+"DATA",176.112,20507,1)
+670107
+"DATA",176.112,20508,0)
+4024536^HYDROCORTISONE ACETATE 1%/PRAMOXINE HCL 1% AEROSOL,TOP
+"DATA",176.112,20508,1)
+670098
+"DATA",176.112,20509,0)
+4005802^BETAMETHASONE 0.6MG/5ML SYRUP
+"DATA",176.112,20509,1)
+670084
+"DATA",176.112,20510,0)
+4025109^BENZALKONIUM CL 0.011% SPRAY,TOP
+"DATA",176.112,20510,1)
+670083
+"DATA",176.112,20511,0)
+4024870^LOPINAVIR 200MG/RITONAVIR 50MG CAP
+"DATA",176.112,20511,1)
+670079
+"DATA",176.112,20512,0)
+4025585^MYCOPHENOLATE NA 360MG TAB,EC
+"DATA",176.112,20512,1)
+670051
+"DATA",176.112,20513,0)
+4025584^MYCOPHENOLATE NA 180MG TAB,EC
+"DATA",176.112,20513,1)
+670049
+"DATA",176.112,20514,0)
+4024886^DESLORATADINE 5MG/PSEUDOEPHEDRINE SULFATE 240MG TAB,SA
+"DATA",176.112,20514,1)
+670028
+"DATA",176.112,20515,0)
+4025320^DARUNAVIR ETHANOLATE 600MG TAB
+"DATA",176.112,20515,1)
+670026
+"DATA",176.112,20516,0)
+4025996^OXYCODONE HCL 5MG/ACETAMINOPHEN 400MG TAB
+"DATA",176.112,20516,1)
+670023
+"DATA",176.112,20517,0)
+4025999^OXYCODONE HCL 2.5MG/ACETAMINOPHEN 400MG TAB
+"DATA",176.112,20517,1)
+670021
+"DATA",176.112,20518,0)
+4025998^OXYCODONE HCL 10MG/ACETAMINOPHEN 400MG TAB
+"DATA",176.112,20518,1)
+670020
+"DATA",176.112,20519,0)
+4004475^ALLERGENIC EXTRACT, STINGING INSECT MIX 20000PNU/ML INJ
+"DATA",176.112,20519,1)
+669947
+"DATA",176.112,20520,0)
+4026096^ARFORMOTEROL TARTRATE 7.5MCG/ML SOLN,INHL,2ML
+"DATA",176.112,20520,1)
+668956
+"DATA",176.112,20521,0)
+4026877^GUAIFENESIN 800MG/PHENYLEPHRINE 30MG TAB,SA
+"DATA",176.112,20521,1)
+668635
+"DATA",176.112,20522,0)
+4025709^VORINOSTAT 100MG CAP,ORAL
+"DATA",176.112,20522,1)
+668579
+"DATA",176.112,20523,0)
+4025735^FENTANYL CITRATE 800MCG TAB,BUCCAL
+"DATA",176.112,20523,1)
+668367
+"DATA",176.112,20524,0)
+4025734^FENTANYL CITRATE 600MCG TAB,BUCCAL
+"DATA",176.112,20524,1)
+668366
+"DATA",176.112,20525,0)
+4025733^FENTANYL CITRATE 400MCG TAB,BUCCAL
+"DATA",176.112,20525,1)
+668365
+"DATA",176.112,20526,0)
+4025732^FENTANYL CITRATE 200MCG TAB,BUCCAL
+"DATA",176.112,20526,1)
+668364
+"DATA",176.112,20527,0)
+4025731^FENTANYL CITRATE 100MCG TAB,BUCCAL
+"DATA",176.112,20527,1)
+668363
+"DATA",176.112,20528,0)
+4025943^DESONIDE 0.05% FOAM,TOP
+"DATA",176.112,20528,1)
+668350
+"DATA",176.112,20529,0)
+4026509^CLINDAMYCIN PHOSPHATE 1.2%/TRETINOIN 0.025% GEL,TOP
+"DATA",176.112,20529,1)
+668330
+"DATA",176.112,20530,0)
+4012738^LORATADINE 10MG/PSEUDOEPHEDRINE SO4 240MG TAB,SA
+"DATA",176.112,20530,1)
+668263
+"DATA",176.112,20531,0)
+4026073^SALICYLIC ACID 6% SHAMPOO
+"DATA",176.112,20531,1)
+667904
+"DATA",176.112,20532,0)
+4026417^MICAFUNGIN NA 100MG/VIL INJ
+"DATA",176.112,20532,1)
+667891
+"DATA",176.112,20533,0)
+4027745^MENTHOL 10% SPRAY,TOP
+"DATA",176.112,20533,1)
+667889
+"DATA",176.112,20534,0)
+4025683^PANITUMUMAB 20MG/ML INJ,SOLN
+"DATA",176.112,20534,1)
+667881
+"DATA",176.112,20535,0)
+4025736^TELBIVUDINE 600MG TAB
+"DATA",176.112,20535,1)
+665122
+"DATA",176.112,20536,0)
+4025726^SITAGLIPTIN PHOSPHATE 50MG TAB,UD
+"DATA",176.112,20536,1)
+665042
+"DATA",176.112,20537,0)
+4025725^SITAGLIPTIN PHOSPHATE 50MG TAB
+"DATA",176.112,20537,1)
+665042
+"DATA",176.112,20538,0)
+4025723^SITAGLIPTIN PHOSPHATE 25MG TAB
+"DATA",176.112,20538,1)
+665038
+"DATA",176.112,20539,0)
+4025724^SITAGLIPTIN PHOSPHATE 25MG TAB,UD
+"DATA",176.112,20539,1)
+665038
+"DATA",176.112,20540,0)
+4025727^SITAGLIPTIN PHOSPHATE 100MG TAB
+"DATA",176.112,20540,1)
+665033
+"DATA",176.112,20541,0)
+4025728^SITAGLIPTIN PHOSPHATE 100MG TAB,UD
+"DATA",176.112,20541,1)
+665033
+"DATA",176.112,20542,0)
+4025621^POSACONAZOLE 200MG/5ML SUSP,ORAL
+"DATA",176.112,20542,1)
+665019
+"DATA",176.112,20543,0)
+4006045^RINGER'S INJ
+"DATA",176.112,20543,1)
+665005
+"DATA",176.112,20544,0)
+4026750^CODEINE 10MG/GUAIFENESIN 300MG/5ML (AF&SF) LIQUID
+"DATA",176.112,20544,1)
+664786
+"DATA",176.112,20545,0)
+4025966^CARVEDILOL P04 80MG CAP,SA
+"DATA",176.112,20545,1)
+664781
+"DATA",176.112,20546,0)
+4025964^CARVEDILOL P04 40MG CAP,SA
+"DATA",176.112,20546,1)
+664777
+"DATA",176.112,20547,0)
+4025965^CARVEDILOL P04 20MG CAP,SA
+"DATA",176.112,20547,1)
+664773
+"DATA",176.112,20548,0)
+4025967^CARVEDILOL P04 10MG CAP,SA
+"DATA",176.112,20548,1)
+664768
+"DATA",176.112,20549,0)
+4025708^ATAZANAVIR SO4 300MG CAP
+"DATA",176.112,20549,1)
+664741
+"DATA",176.112,20550,0)
+4025563^ACETYLCYSTEINE 500MG CAP,ORAL
+"DATA",176.112,20550,1)
+664732
+"DATA",176.112,20551,0)
+4006214^DEXTROSE 5%/NACL 0.225%/KCL 40MEQ/L INJ
+"DATA",176.112,20551,1)
+664704
+"DATA",176.112,20552,0)
+4006212^DEXTROSE 5%/NACL 0.225%/KCL 20MEQ/L INJ
+"DATA",176.112,20552,1)
+664703
+"DATA",176.112,20553,0)
+4006228^DEXTROSE 5%/NACL 0.33%/KCL 40MEQ/L INJ
+"DATA",176.112,20553,1)
+664701
+"DATA",176.112,20554,0)
+4010014^IODINE 2%/NA IODIDE 2.4% TINCTURE,TOP
+"DATA",176.112,20554,1)
+657638
+"DATA",176.112,20555,0)
+4015828^BOSENTAN 125MG TAB
+"DATA",176.112,20555,1)
+656659
+"DATA",176.112,20556,0)
+4004047^HYDROCORTISONE ACETATE 1%/PRAMOXINE HCL 1% OINT,RTL
+"DATA",176.112,20556,1)
+647697
+"DATA",176.112,20557,0)
+4003121^LITHIUM CITRATE 8MEQ/5ML SYRUP
+"DATA",176.112,20557,1)
+647437
+"DATA",176.112,20558,0)
+4003123^LITHIUM CITRATE 8MEQ/5ML (SF) SYRUP
+"DATA",176.112,20558,1)
+647437
+"DATA",176.112,20559,0)
+4025718^FLUTICASONE 115MCG/SALMETEROL 21MCG INHL,ORAL,12GM
+"DATA",176.112,20559,1)
+647426
+"DATA",176.112,20560,0)
+4025719^FLUTICASONE 230MCG/SALMETEROL 21MCG INHL,ORAL,12GM
+"DATA",176.112,20560,1)
+647421
+"DATA",176.112,20561,0)
+4027743^KETOCONAZOLE 2% GEL,TOP
+"DATA",176.112,20561,1)
+647253
+"DATA",176.112,20562,0)
+4025817^GLIMEPIRIDE 4MG/PIOGLITAZONE HCL 30MG TAB
+"DATA",176.112,20562,1)
+647239
+"DATA",176.112,20563,0)
+4025816^GLIMEPIRIDE 2MG/PIOGLITAZONE HCL 30MG TAB
+"DATA",176.112,20563,1)
+647237
+"DATA",176.112,20564,0)
+4025775^LEVETIRACETAM 100MG/ML INJ
+"DATA",176.112,20564,1)
+647121
+"DATA",176.112,20565,0)
+4003399^DAUNORUBICIN CITRATE LIPOSOME 2MG/ML INJ
+"DATA",176.112,20565,1)
+646830
+"DATA",176.112,20566,0)
+4009588^PANTOTHENIC ACID 100MG TAB
+"DATA",176.112,20566,1)
+646824
+"DATA",176.112,20567,0)
+4002991^AMINOHIPPURATE NA 20% INJ
+"DATA",176.112,20567,1)
+646817
+"DATA",176.112,20568,0)
+4016264^AMPHETAMINE/DEXTROAMPHETAMINE RESIN COMPLEX 10MG CAP,SA
+"DATA",176.112,20568,1)
+646461
+"DATA",176.112,20569,0)
+4001506^NYSTATIN 100000UNT/GM PWDR,TOP
+"DATA",176.112,20569,1)
+646456
+"DATA",176.112,20570,0)
+4012947^REMIFENTANIL HCL 1MG/VIL INJ
+"DATA",176.112,20570,1)
+646132
+"DATA",176.112,20571,0)
+4012949^REMIFENTANIL HCL 5MG/VIL INJ
+"DATA",176.112,20571,1)
+646132
+"DATA",176.112,20572,0)
+4012948^REMIFENTANIL HCL 2MG/VIL INJ
+"DATA",176.112,20572,1)
+646132
+"DATA",176.112,20573,0)
+4027569^CHLOROPHYLL 0.5%/PAPAIN/UREA 10% SPRAY,TOP
+"DATA",176.112,20573,1)
+645688^^^CHLOROPHYLL 0.5%/PAPAIN/UREA 10% SPRAY^Y
+"DATA",176.112,20574,0)
+4027513^PAPAIN/UREA 10% SPRAY,TOP
+"DATA",176.112,20574,1)
+645683
+"DATA",176.112,20575,0)
+4026624^DIPHENHYDRAMINE 25MG/IBUPROFEN 200MG CAP
+"DATA",176.112,20575,1)
+645635
+"DATA",176.112,20576,0)
+4026689^MINOXIDIL 5% FOAM,TOP
+"DATA",176.112,20576,1)
+645146
+"DATA",176.112,20577,0)
+4006559^DEXCHLORPHENIRAMINE MALEATE 4MG TAB
+"DATA",176.112,20577,1)
+644992
+"DATA",176.112,20578,0)
+4006557^DEXCHLORPHENIRAMINE MALEATE 4MG TAB,SA
+"DATA",176.112,20578,1)
+644991
+"DATA",176.112,20579,0)
+4025997^OXYCODONE HCL 7.5MG/ACETAMINOPHEN 400MG TAB
+"DATA",176.112,20579,1)
+644846
+"DATA",176.112,20580,0)
+4016929^CYANOCOBALAMIN 1MG/FOLIC ACID 2.5MG/PYRIDOXINE 25MG TAB
+"DATA",176.112,20580,1)
+644787
+"DATA",176.112,20581,0)
+4025113^METHYLPHENIDATE HCL 10MG/5ML SOLN,ORAL
+"DATA",176.112,20581,1)
+644338
+"DATA",176.112,20582,0)
+4025542^LIDOCAINE 70MG/TETRACAINE 70MG PATCH
+"DATA",176.112,20582,1)
+644287
+"DATA",176.112,20583,0)
+4025985^SODIUM HYPOCHLORITE 0.125% SOLN,TOP
+"DATA",176.112,20583,1)
+644133
+"DATA",176.112,20584,0)
+4027404^LOVASTATIN 40MG/NIACIN 1000MG TAB,SA
+"DATA",176.112,20584,1)
+644112^^^LOVASTATIN 40MG/NIACIN 1000MG SA TAB^Y
+"DATA",176.112,20585,0)
+4025757^LOVASTATIN 40MG/NIACIN 1000MG TAB
+"DATA",176.112,20585,1)
+644112
+"DATA",176.112,20586,0)
+4025549^IDURSULFASE 2MG/ML INJ
+"DATA",176.112,20586,1)
+644104
+"DATA",176.112,20587,0)
+4025887^APREPITANT 40MG CAP
+"DATA",176.112,20587,1)
+644088
+"DATA",176.112,20588,0)
+4025888^APREPITANT 40MG CAP,UD
+"DATA",176.112,20588,1)
+644088
+"DATA",176.112,20589,0)
+4025315^DOXYCYCLINE MONOHYDRATE 30MG IR/10MG CAP,EC
+"DATA",176.112,20589,1)
+643821
+"DATA",176.112,20590,0)
+4025613^LENALIDOMIDE 25MG CAP,ORAL
+"DATA",176.112,20590,1)
+643720
+"DATA",176.112,20591,0)
+4025612^LENALIDOMIDE 15MG CAP,ORAL
+"DATA",176.112,20591,1)
+643712
+"DATA",176.112,20592,0)
+4025681^GUAIFENESIN 650MG/PHENYLEPHRINE 40MG TAB,SA
+"DATA",176.112,20592,1)
+643701
+"DATA",176.112,20593,0)
+4025512^RANIBIZUMAB 0.5MG/0.05ML INJ,OPH
+"DATA",176.112,20593,1)
+643193
+"DATA",176.112,20594,0)
+4027367^PREDNISOLONE NA PHOSPHATE 30MG TAB,ORAL DISINTEGRATING
+"DATA",176.112,20594,1)
+643127^^^PREDNISOLONE NA PHOS 30MG DISINTEGR TAB^Y
+"DATA",176.112,20595,0)
+4025768^PREDNISOLONE NA PHOSPHATE 15MG TAB,ORAL DISINTEGRATING
+"DATA",176.112,20595,1)
+643125
+"DATA",176.112,20596,0)
+4027368^PREDNISOLONE NA PHOSPHATE 10MG TAB,ORAL,DISINTEGRATING
+"DATA",176.112,20596,1)
+643123^^^PREDNISOLONE NA PHOS 10MG DISINTEGR TAB^Y
+"DATA",176.112,20597,0)
+4025520^OXYMORPHONE HCL 5MG TAB,SA
+"DATA",176.112,20597,1)
+643122
+"DATA",176.112,20598,0)
+4025521^OXYMORPHONE HCL 5MG TAB,SA,UD
+"DATA",176.112,20598,1)
+643122
+"DATA",176.112,20599,0)
+4025528^OXYMORPHONE HCL 5MG TAB
+"DATA",176.112,20599,1)
+643121
+"DATA",176.112,20600,0)
+4025531^OXYMORPHONE HCL 5MG TAB,UD
+"DATA",176.112,20600,1)
+643121
+"DATA",176.112,20601,0)
+4025526^OXYMORPHONE HCL 40MG TAB,SA
+"DATA",176.112,20601,1)
+643120
+"DATA",176.112,20602,0)
+4025527^OXYMORPHONE HCL 40MG TAB,SA,UD
+"DATA",176.112,20602,1)
+643120
+"DATA",176.112,20603,0)
+4025525^OXYMORPHONE HCL 20MG TAB,SA,UD
+"DATA",176.112,20603,1)
+643118
+"DATA",176.112,20604,0)
+4025524^OXYMORPHONE HCL 20MG TAB,SA
+"DATA",176.112,20604,1)
+643118
+"DATA",176.112,20605,0)
+4025522^OXYMORPHONE HCL 10MG TAB,SA
+"DATA",176.112,20605,1)
+643116
+"DATA",176.112,20606,0)
+4025523^OXYMORPHONE HCL 10MG TAB,SA,UD
+"DATA",176.112,20606,1)
+643116
+"DATA",176.112,20607,0)
+4025529^OXYMORPHONE HCL 10MG TAB
+"DATA",176.112,20607,1)
+643114
+"DATA",176.112,20608,0)
+4025530^OXYMORPHONE HCL 10MG TAB,UD
+"DATA",176.112,20608,1)
+643114
+"DATA",176.112,20609,0)
+4025390^DASATINIB 70MG TAB
+"DATA",176.112,20609,1)
+643109
+"DATA",176.112,20610,0)
+4025389^DASATINIB 50MG TAB
+"DATA",176.112,20610,1)
+643107
+"DATA",176.112,20611,0)
+4025388^DASATINIB 20MG TAB
+"DATA",176.112,20611,1)
+643105
+"DATA",176.112,20612,0)
+4025387^DARUNAVIR ETHANOLATE 300MG TAB
+"DATA",176.112,20612,1)
+643074
+"DATA",176.112,20613,0)
+4025519^EFAVIRENZ 600MG/EMTRICITABINE 200MG/TENOFOVIR DF 300MG TAB
+"DATA",176.112,20613,1)
+643066
+"DATA",176.112,20614,0)
+4026625^DIPHENHYDRAMINE 38MG/IBUPROFEN 200MG TAB
+"DATA",176.112,20614,1)
+643060
+"DATA",176.112,20615,0)
+4025514^SELEGILINE HCL 1.25MG TAB,ORAL DISINTEGRATING
+"DATA",176.112,20615,1)
+643053
+"DATA",176.112,20616,0)
+4025982^ARIPIPRAZOLE 15MG TAB RAPID DISINTEGRATING
+"DATA",176.112,20616,1)
+643022
+"DATA",176.112,20617,0)
+4025983^ARIPIPRAZOLE 10MG TAB RAPID DISINTEGRATING
+"DATA",176.112,20617,1)
+643019
+"DATA",176.112,20618,0)
+4025300^LANTHANUM CARBONATE 750MG TAB,CHEWABLE
+"DATA",176.112,20618,1)
+642452
+"DATA",176.112,20619,0)
+4001150^PYRIDOXINE HCL 50MG TAB
+"DATA",176.112,20619,1)
+639566
+"DATA",176.112,20620,0)
+4013533^CANDESARTAN CILEXETIL 32MG TAB
+"DATA",176.112,20620,1)
+639537
+"DATA",176.112,20621,0)
+4013714^CANDESARTAN CILEXETIL 32MG TAB,UD
+"DATA",176.112,20621,1)
+639537
+"DATA",176.112,20622,0)
+4001608^TRIAMCINOLONE ACETONIDE 3.3MG/50GM AEROSOL,TOP
+"DATA",176.112,20622,1)
+639497
+"DATA",176.112,20623,0)
+4016594^GEMIFLOXACIN MESYLATE 320MG TAB,PKT,7
+"DATA",176.112,20623,1)
+637560
+"DATA",176.112,20624,0)
+4016595^GEMIFLOXACIN MESYLATE 320MG TAB,UD
+"DATA",176.112,20624,1)
+637560
+"DATA",176.112,20625,0)
+4016593^GEMIFLOXACIN MESYLATE 320MG TAB,PKT,5
+"DATA",176.112,20625,1)
+637560
+"DATA",176.112,20626,0)
+4012916^TOPOTECAN HCL 4MG/VIL INJ
+"DATA",176.112,20626,1)
+637549
+"DATA",176.112,20627,0)
+4003593^CYCLOPHOSPHAMIDE 100MG/VIL INJ
+"DATA",176.112,20627,1)
+637543
+"DATA",176.112,20628,0)
+4003596^CYCLOPHOSPHAMIDE 1GM/VIL INJ
+"DATA",176.112,20628,1)
+637543
+"DATA",176.112,20629,0)
+4003594^CYCLOPHOSPHAMIDE 200MG/VIL INJ
+"DATA",176.112,20629,1)
+637543
+"DATA",176.112,20630,0)
+4003064^OXYCODONE HCL 4.5MG/OXYCODONE TEREPH 0.38MG/ASA 325MG TAB
+"DATA",176.112,20630,1)
+637540
+"DATA",176.112,20631,0)
+4025513^OXYCODONE HCL 4.8355MG/ASPIRIN 325MG TAB
+"DATA",176.112,20631,1)
+637540
+"DATA",176.112,20632,0)
+4004507^ALUM PRECIPITATED POISON IVY EXTRACT 10000PNU/ML INJ
+"DATA",176.112,20632,1)
+637493
+"DATA",176.112,20633,0)
+4027264^MENTHOL 0.5%/PETROLATUM 30%/PRAMOXINE 1% CREAM,TOP
+"DATA",176.112,20633,1)
+637484
+"DATA",176.112,20634,0)
+4027274^ALOE 1%/HC ACETATE 2%/PRAMOXINE 1% GEL,TOP
+"DATA",176.112,20634,1)
+637466^^^ALOE 1%/HC 2%/PRAMOXINE 1% TOP GEL^Y
+"DATA",176.112,20635,0)
+4025730^NALTREXONE 380MG/VIL INJ,SUSP,SA
+"DATA",176.112,20635,1)
+637213
+"DATA",176.112,20636,0)
+4027150^MENTHOL 0.4%/ZINC OXIDE 20% PASTE,TOP
+"DATA",176.112,20636,1)
+637129
+"DATA",176.112,20637,0)
+4027800^MENTHOL 0.2%/ZINC OXIDE 20% PASTE,TOP
+"DATA",176.112,20637,1)
+637129
+"DATA",176.112,20638,0)
+4025535^VARENICLINE TARTRATE 1MG TAB
+"DATA",176.112,20638,1)
+636676
+"DATA",176.112,20639,0)
+4026563^VARENICLINE 1MG TAB
+"DATA",176.112,20639,1)
+636676
+"DATA",176.112,20640,0)
+4026566^VARENICLINE 0.5MG TAB
+"DATA",176.112,20640,1)
+636671
+"DATA",176.112,20641,0)
+4025534^VARENICLINE TARTRATE 0.5MG TAB
+"DATA",176.112,20641,1)
+636671
+"DATA",176.112,20642,0)
+4025317^RASAGILINE MESYLATE 0.5MG TAB
+"DATA",176.112,20642,1)
+636664
+"DATA",176.112,20643,0)
+4025316^DECITABINE 50MG/VIL INJ
+"DATA",176.112,20643,1)
+636631
+"DATA",176.112,20644,0)
+4027556^DOXAZOSIN MESYLATE 8MG 24HR TAB,SA
+"DATA",176.112,20644,1)
+636361^^^DOXAZOSIN MESYLATE 8MG 24HR SA TAB^Y
+"DATA",176.112,20645,0)
+4027555^DOXAZOSIN MESYLATE 4MG 24HR TAB,SA
+"DATA",176.112,20645,1)
+636360^^^DOXAZOSIN MESYLATE 4MG 24HR SA TAB^Y
+"DATA",176.112,20646,0)
+4024749^BUPROPION HCL 200MG 12HR TAB,SA
+"DATA",176.112,20646,1)
+636354
+"DATA",176.112,20647,0)
+4024895^BUPROPION HCL (SMOKE CESSATION) 150MG 12HR TAB,SA,PACK,60
+"DATA",176.112,20647,1)
+636353
+"DATA",176.112,20648,0)
+4024894^BUPROPION HCL 150MG (SMOKE CESSATION) 12HR TAB,SA
+"DATA",176.112,20648,1)
+636353
+"DATA",176.112,20649,0)
+4024898^BUPROPION HCL (SMOKE CESSATION) 150MG 12HR TAB,SA
+"DATA",176.112,20649,1)
+636353
+"DATA",176.112,20650,0)
+4017073^BUPROPION HCL 150MG 12HR TAB,SA
+"DATA",176.112,20650,1)
+636353
+"DATA",176.112,20651,0)
+4024897^BUPROPION (SMOKE CESSATION) 150MG 12HR TAB,SA
+"DATA",176.112,20651,1)
+636353
+"DATA",176.112,20652,0)
+4026476^CASTOR OIL 788MG/PERUVIAN BALSAM 87MG/TRYPSIN 0.12MG/GM GEL,TOP
+"DATA",176.112,20652,1)
+636106
+"DATA",176.112,20653,0)
+4025615^HYDROCHLOROTHIAZIDE 25MG/VALSARTAN 320MG TAB
+"DATA",176.112,20653,1)
+636045
+"DATA",176.112,20654,0)
+4025792^HYDROCHLOROTHIAZIDE 12.5MG/VALSARTAN 320MG TAB
+"DATA",176.112,20654,1)
+636042
+"DATA",176.112,20655,0)
+4027118^HYALURONATE NA 0.1% LOTION,TOP
+"DATA",176.112,20655,1)
+635942
+"DATA",176.112,20656,0)
+4025217^HYALURONATE NA 0.2% SPRAY,TOP
+"DATA",176.112,20656,1)
+635939
+"DATA",176.112,20657,0)
+4025216^HYALURONATE NA 0.2% GEL,TOP
+"DATA",176.112,20657,1)
+635938
+"DATA",176.112,20658,0)
+4009440^HYALURONATE NA 10MG/ML INJ,VIAL,2ML
+"DATA",176.112,20658,1)
+633176
+"DATA",176.112,20659,0)
+4009428^HYALURONATE NA 10MG/ML INJ,OPH
+"DATA",176.112,20659,1)
+633176
+"DATA",176.112,20660,0)
+4000920^VANCOMYCIN HCL 10GM/BTL SOLN,ORAL
+"DATA",176.112,20660,1)
+633163
+"DATA",176.112,20661,0)
+4012708^GLYCERIN 5%/ISOPROPYL ALCOHOL 95% SOLN,OTIC
+"DATA",176.112,20661,1)
+631799
+"DATA",176.112,20662,0)
+4026019^POLYVINYL ALCOHOL 2.7%/POVIDONE 2% SOLN,OPH
+"DATA",176.112,20662,1)
+630977
+"DATA",176.112,20663,0)
+4012739^VINORELBINE TARTRATE 10MG/ML INJ,VIL,1ML
+"DATA",176.112,20663,1)
+630920
+"DATA",176.112,20664,0)
+4012740^VINORELBINE TARTRATE 10MG/ML INJ,VIL,5ML
+"DATA",176.112,20664,1)
+630920
+"DATA",176.112,20665,0)
+4025711^MINOCYCLINE HCL 90MG TAB,SA
+"DATA",176.112,20665,1)
+630827
+"DATA",176.112,20666,0)
+4025712^MINOCYCLINE HCL 135MG TAB,SA
+"DATA",176.112,20666,1)
+630819
+"DATA",176.112,20667,0)
+4005938^DEXTROSE 5%/NACL 0.2% INJ
+"DATA",176.112,20667,1)
+630800
+"DATA",176.112,20668,0)
+4006226^DEXTROSE 5%/NACL 0.33%/KCL 20MEQ/L INJ
+"DATA",176.112,20668,1)
+630799
+"DATA",176.112,20669,0)
+4006215^DEXTROSE 5%/NACL 0.45%/KCL 10MEQ/L INJ
+"DATA",176.112,20669,1)
+630796
+"DATA",176.112,20670,0)
+4006593^ALBUTEROL SO4 0.083% INHL,3ML
+"DATA",176.112,20670,1)
+630208
+"DATA",176.112,20671,0)
+4006589^ALBUTEROL SO4 0.083% SOLN,INHL
+"DATA",176.112,20671,1)
+630208
+"DATA",176.112,20672,0)
+4016804^ALBUTEROL SO4 0.083% INHL,3ML,UD
+"DATA",176.112,20672,1)
+630208
+"DATA",176.112,20673,0)
+4006582^ALBUTEROL 0.083% SOLN,INHL
+"DATA",176.112,20673,1)
+630208
+"DATA",176.112,20674,0)
+4026695^SODIUM FLUORIDE 1.1% TOOTHPASTE
+"DATA",176.112,20674,1)
+630188
+"DATA",176.112,20675,0)
+4025710^MINOCYCLINE HCL 45MG TAB,SA
+"DATA",176.112,20675,1)
+629697
+"DATA",176.112,20676,0)
+4025589^AMLODIPINE BESYLATE 5MG/BENAZEPRIL HCL 40MG CAP
+"DATA",176.112,20676,1)
+629570
+"DATA",176.112,20677,0)
+4025590^AMLODIPINE BESYLATE 10MG/BENAZEPRIL HCL 40MG CAP
+"DATA",176.112,20677,1)
+629569
+"DATA",176.112,20678,0)
+4025189^ALGLUCOSIDASE ALFA 50MG/VIL INJ
+"DATA",176.112,20678,1)
+629568
+"DATA",176.112,20679,0)
+4000874^POTASSIUM CHLORIDE 10MEQ TAB,EC,SA
+"DATA",176.112,20679,1)
+628953
+"DATA",176.112,20680,0)
+4000856^POTASSIUM CHLORIDE 10MEQ TAB,SA
+"DATA",176.112,20680,1)
+628953
+"DATA",176.112,20681,0)
+4013966^POTASSIUM CHLORIDE 10MEQ TAB,SA,UD
+"DATA",176.112,20681,1)
+628953
+"DATA",176.112,20682,0)
+4015798^POTASSIUM CHLORIDE 10MEQ TAB,SA (DISPERSIBLE)
+"DATA",176.112,20682,1)
+628953
+"DATA",176.112,20683,0)
+4015799^POTASSIUM CHLORIDE 10MEQ TAB,SA,UD (DISPERSIBLE)
+"DATA",176.112,20683,1)
+628953
+"DATA",176.112,20684,0)
+4000824^PEN G BENZATHINE 150000UNT/PEN G PROCAINE 150000UNT/ML INJ,SUSP
+"DATA",176.112,20684,1)
+623695
+"DATA",176.112,20685,0)
+4000820^PEN G BENZATHINE 300000UNT/PEN G PROCAINE 300000UNT/ML INJ,SUSP
+"DATA",176.112,20685,1)
+623677
+"DATA",176.112,20686,0)
+4007585^POTASSIUM PARA-AMINOBENZOATE 0.5GM CAP
+"DATA",176.112,20686,1)
+618977
+"DATA",176.112,20687,0)
+4009327^NA BENZOATE 10%/NA PHENYLACETATE 10% SOLN,ORAL
+"DATA",176.112,20687,1)
+618959
+"DATA",176.112,20688,0)
+4009007^PANCREATIN 2000MG/PYRIDOXINE 3MG CAP
+"DATA",176.112,20688,1)
+618786
+"DATA",176.112,20689,0)
+4006089^CLORAZEPATE DIPOTASSIUM 7.5MG CAP
+"DATA",176.112,20689,1)
+618751
+"DATA",176.112,20690,0)
+4006088^CLORAZEPATE DIPOTASSIUM 3.75MG CAP
+"DATA",176.112,20690,1)
+618740
+"DATA",176.112,20691,0)
+4006087^CLORAZEPATE DIPOTASSIUM 22.5MG TAB
+"DATA",176.112,20691,1)
+618739
+"DATA",176.112,20692,0)
+4006086^CLORAZEPATE DIPOTASSIUM 11.25MG TAB
+"DATA",176.112,20692,1)
+618738
+"DATA",176.112,20693,0)
+4007710^DEHYDROCHOLIC AC 25MG/PANCREATIN 300MG/PEPSIN 250MG TAB,EC,SA
+"DATA",176.112,20693,1)
+618707
+"DATA",176.112,20694,0)
+4007709^DEHYDROCHOLIC AC 25MG/PANCREATIN 300MG/PEPSIN 250MG TAB
+"DATA",176.112,20694,1)
+618705
+"DATA",176.112,20695,0)
+4006881^DEHYDROCHOLIC ACID 130MG TAB
+"DATA",176.112,20695,1)
+618702
+"DATA",176.112,20696,0)
+4007503^DEHYDROCHOLIC AC 250MG/HOMATROPINE 2.5MG/PHENOBARB 8MG TAB
+"DATA",176.112,20696,1)
+618700
+"DATA",176.112,20697,0)
+4007207^DEHYDROCHOLIC AC 20MG/DOSS 200MG/PHENOLPHTHALEIN 30MG CAP
+"DATA",176.112,20697,1)
+618699
+"DATA",176.112,20698,0)
+4007208^DEHYDROCHOLIC AC 20MG/DOSS 200MG/PHENOLPHTHALEIN 15MG CAP
+"DATA",176.112,20698,1)
+618698
+"DATA",176.112,20699,0)
+4007502^DEHYDROCHOLIC AC 125MG/HOMATROPINE 2.5MG/PHENOBARB 8MG TAB
+"DATA",176.112,20699,1)
+618695
+"DATA",176.112,20700,0)
+4006939^DEHYDROCHOLIC ACID 240MG/DOCUSATE NA 50MG TAB
+"DATA",176.112,20700,1)
+618684
+"DATA",176.112,20701,0)
+4006940^DEHYDROCHOLIC ACID 50MG/DOCUSATE NA 100MG CAP
+"DATA",176.112,20701,1)
+618681
+"DATA",176.112,20702,0)
+4007982^DEHYDROCHOLIC ACID 200MG/HOMATROPINE METHYLBROMIDE 5MG TAB
+"DATA",176.112,20702,1)
+618676
+"DATA",176.112,20703,0)
+4006880^DEHYDROCHOLIC ACID 250MG TAB
+"DATA",176.112,20703,1)
+618673
+"DATA",176.112,20704,0)
+4010531^CALCIUM CITRATE 1.04GM/GLUTAMIC ACID 50MG TAB
+"DATA",176.112,20704,1)
+618654
+"DATA",176.112,20705,0)
+4007640^AMINO ACIDS/THIAMINE 10MG CAP
+"DATA",176.112,20705,1)
+618651
+"DATA",176.112,20706,0)
+4013088^GLUTAMIC ACID 500MG TAB
+"DATA",176.112,20706,1)
+618643
+"DATA",176.112,20707,0)
+4013089^GLUTAMIC ACID 340MG CAP
+"DATA",176.112,20707,1)
+618631
+"DATA",176.112,20708,0)
+4013892^TRICHLOROACETIC ACID 30% SOLN,TOP
+"DATA",176.112,20708,1)
+618584
+"DATA",176.112,20709,0)
+4007852^TRICHLOROACETIC ACID 50% SOLN,TOP
+"DATA",176.112,20709,1)
+618579
+"DATA",176.112,20710,0)
+4013893^TRICHLOROACETIC ACID 25% SOLN,TOP
+"DATA",176.112,20710,1)
+618574
+"DATA",176.112,20711,0)
+4007851^TRICHLOROACETIC ACID 80% SOLN,TOP
+"DATA",176.112,20711,1)
+618567
+"DATA",176.112,20712,0)
+4007704^MECLOFENAMATE NA 50MG TAB
+"DATA",176.112,20712,1)
+618560
+"DATA",176.112,20713,0)
+4007705^MECLOFENAMATE NA 100MG TAB
+"DATA",176.112,20713,1)
+618559
+"DATA",176.112,20714,0)
+4007702^MECLOFENAMATE NA 50MG CAP
+"DATA",176.112,20714,1)
+618557
+"DATA",176.112,20715,0)
+4007703^MECLOFENAMATE NA 100MG CAP
+"DATA",176.112,20715,1)
+618552
+"DATA",176.112,20716,0)
+4025110^URSODIOL 500MG TAB
+"DATA",176.112,20716,1)
+618542
+"DATA",176.112,20717,0)
+4014301^URSODIOL 250MG TAB
+"DATA",176.112,20717,1)
+618529
+"DATA",176.112,20718,0)
+4008362^URSODIOL 300MG CAP
+"DATA",176.112,20718,1)
+618522
+"DATA",176.112,20719,0)
+4004761^CHENODEOXYCHOLIC ACID 250MG TAB
+"DATA",176.112,20719,1)
+618469
+"DATA",176.112,20720,0)
+4004288^NALIDIXIC ACID 500MG CAP
+"DATA",176.112,20720,1)
+618439
+"DATA",176.112,20721,0)
+4004284^NALIDIXIC ACID 250MG/5ML SUSP,ORAL
+"DATA",176.112,20721,1)
+618437
+"DATA",176.112,20722,0)
+4004285^NALIDIXIC ACID 250MG TAB
+"DATA",176.112,20722,1)
+618435
+"DATA",176.112,20723,0)
+4004287^NALIDIXIC ACID 1GM TAB
+"DATA",176.112,20723,1)
+618433
+"DATA",176.112,20724,0)
+4004286^NALIDIXIC ACID 500MG TAB
+"DATA",176.112,20724,1)
+618428
+"DATA",176.112,20725,0)
+4007707^MEFENAMIC ACID 250MG CAP
+"DATA",176.112,20725,1)
+618389
+"DATA",176.112,20726,0)
+4025565^ESTROGENS,CONJUGATED SYNTHETIC B 1.25MG TAB
+"DATA",176.112,20726,1)
+618378
+"DATA",176.112,20727,0)
+4025568^ESTROGENS,CONJUGATED SYNTHETIC B 0.625MG TAB
+"DATA",176.112,20727,1)
+618376
+"DATA",176.112,20728,0)
+4025566^ESTROGENS,CONJUGATED SYNTHETIC B 0.45MG TAB
+"DATA",176.112,20728,1)
+618370
+"DATA",176.112,20729,0)
+4025567^ESTROGENS,CONJUGATED SYNTHETIC B 0.3MG TAB
+"DATA",176.112,20729,1)
+618368
+"DATA",176.112,20730,0)
+4026203^L-METHYLFOLATE 7.5MG TAB
+"DATA",176.112,20730,1)
+618304
+"DATA",176.112,20731,0)
+4007802^DICHLOROACETIC ACID 100% LIQUID,TOP
+"DATA",176.112,20731,1)
+618297
+"DATA",176.112,20732,0)
+4007785^CHLOROACETIC ACID 82% SOLN,TOP
+"DATA",176.112,20732,1)
+618294
+"DATA",176.112,20733,0)
+4007784^CHLOROACETIC ACID 80% SOLN,TOP
+"DATA",176.112,20733,1)
+618292
+"DATA",176.112,20734,0)
+4010051^MONOCHLOROACETIC ACID 80% LIQUID,TOP
+"DATA",176.112,20734,1)
+618292
+"DATA",176.112,20735,0)
+4016734^AZELAIC ACID 15% GEL,TOP
+"DATA",176.112,20735,1)
+618284
+"DATA",176.112,20736,0)
+4001162^BACITRACIN 10000UNT/VIL INJ
+"DATA",176.112,20736,1)
+618026
+"DATA",176.112,20737,0)
+4015680^AMOXICILLIN TRIHYRATE 600MG/CLAVULANATE K 42.9MG/5ML SUSP
+"DATA",176.112,20737,1)
+617993
+"DATA",176.112,20738,0)
+4016356^AMOXICILLIN 1000MG/CLAVULANATE K 62.5MG TAB,SA
+"DATA",176.112,20738,1)
+617989
+"DATA",176.112,20739,0)
+4004681^AMOXICILLIN 400MG/CLAVULANATE K 28.5MG TAB,CHEWABLE
+"DATA",176.112,20739,1)
+617981
+"DATA",176.112,20740,0)
+4004675^AMOXICILLIN TRIHYDRATE 250MG/CLAVULANATE K 125MG/5ML SUSP
+"DATA",176.112,20740,1)
+617976
+"DATA",176.112,20741,0)
+4004674^AMOXICILLIN TRIHYDRATE 125MG/CLAVULANATE K 125MG/5ML SUSP
+"DATA",176.112,20741,1)
+617975
+"DATA",176.112,20742,0)
+4025314^SELEGILINE 9MG/24HR PATCH
+"DATA",176.112,20742,1)
+617868
+"DATA",176.112,20743,0)
+4025312^SELEGILINE 6MG/24HR PATCH
+"DATA",176.112,20743,1)
+617866
+"DATA",176.112,20744,0)
+4025313^SELEGILINE 12MG/24HR PATCH
+"DATA",176.112,20744,1)
+617864
+"DATA",176.112,20745,0)
+4025060^ANIDULAFUNGIN 50MG/VIL INJ
+"DATA",176.112,20745,1)
+617754
+"DATA",176.112,20746,0)
+4027335^GLOBULIN,IMMUNE (SQ) 160MG/ML INJ
+"DATA",176.112,20746,1)
+617618
+"DATA",176.112,20747,0)
+4004684^AMOXICILLIN 400MG/CLAVULANATE K 57MG/5ML SUSP
+"DATA",176.112,20747,1)
+617430
+"DATA",176.112,20748,0)
+4004683^AMOXICILLIN 200MG/CLAVULANATE K 28.5MG/5ML SUSP
+"DATA",176.112,20748,1)
+617423
+"DATA",176.112,20749,0)
+4002860^ETHACRYNIC ACID 50MG TAB
+"DATA",176.112,20749,1)
+617330
+"DATA",176.112,20750,0)
+4002859^ETHACRYNIC ACID 25MG TAB
+"DATA",176.112,20750,1)
+617328
+"DATA",176.112,20751,0)
+4002861^ETHACRYNATE NA 50MG/VIL INJ
+"DATA",176.112,20751,1)
+617325
+"DATA",176.112,20752,0)
+4004679^AMOXICILLIN 250MG/CLAVULANATE K 62.5MG/5ML SUSP
+"DATA",176.112,20752,1)
+617322
+"DATA",176.112,20753,0)
+4004673^AMOXICILLIN TRIHYDRATE 250MG/CLAVULANATE K 62.5MG/5ML SUSP
+"DATA",176.112,20753,1)
+617322
+"DATA",176.112,20754,0)
+4014654^AMOXICILLIN TRIHYDRATE 400MG/CLAVULANATE K 57MG TAB,CHEWABLE
+"DATA",176.112,20754,1)
+617316
+"DATA",176.112,20755,0)
+4016343^AMOXICILLIN 400MG/CLAVULANATE K 57MG TAB,CHEWABLE
+"DATA",176.112,20755,1)
+617316
+"DATA",176.112,20756,0)
+4012960^ATORVASTATIN CA 10MG TAB
+"DATA",176.112,20756,1)
+617312
+"DATA",176.112,20757,0)
+4012962^ATORVASTATIN CA 40MG TAB
+"DATA",176.112,20757,1)
+617311
+"DATA",176.112,20758,0)
+4012961^ATORVASTATIN CA 20MG TAB
+"DATA",176.112,20758,1)
+617310
+"DATA",176.112,20759,0)
+4004680^AMOXICILLIN 200MG/CLAVULANATE K 28.5MG TAB,CHEWABLE
+"DATA",176.112,20759,1)
+617309
+"DATA",176.112,20760,0)
+4004669^AMOXICILLIN TRIHYDRATE 250MG/CLAVULANATE K 62.5MG TAB,CHEWABLE
+"DATA",176.112,20760,1)
+617304
+"DATA",176.112,20761,0)
+4004676^AMOXICILLIN 250MG/CLAVULANATE K 62.5MG TAB,CHEWABLE
+"DATA",176.112,20761,1)
+617304
+"DATA",176.112,20762,0)
+4004678^AMOXICILLIN 125MG/CLAVULANATE K 31.25MG/5ML SUSP
+"DATA",176.112,20762,1)
+617302
+"DATA",176.112,20763,0)
+4004672^AMOXICILLIN TRIHYDRATE 125MG/CLAVULANATE K 31.25MG/5ML SUSP
+"DATA",176.112,20763,1)
+617302
+"DATA",176.112,20764,0)
+4004671^AMOXICILLIN TRIHYDRATE 500MG/CLAVULANATE K 125MG TAB
+"DATA",176.112,20764,1)
+617296
+"DATA",176.112,20765,0)
+4024750^ALENDRONATE SODIUM 70MG/CHOLECALCIFEROL 2800UNIT TAB
+"DATA",176.112,20765,1)
+617285
+"DATA",176.112,20766,0)
+4014665^RISEDRONATE NA 5MG TAB
+"DATA",176.112,20766,1)
+617283
+"DATA",176.112,20767,0)
+4013228^RISEDRONATE NA 30MG TAB
+"DATA",176.112,20767,1)
+617279
+"DATA",176.112,20768,0)
+4017089^ALENDRONATE 70MG/75ML SOLN,ORAL
+"DATA",176.112,20768,1)
+617273
+"DATA",176.112,20769,0)
+4015144^ALENDRONATE 70MG TAB
+"DATA",176.112,20769,1)
+617264
+"DATA",176.112,20770,0)
+4012823^ALENDRONATE 5MG TAB
+"DATA",176.112,20770,1)
+617260
+"DATA",176.112,20771,0)
+4012821^ALENDRONATE 10MG TAB
+"DATA",176.112,20771,1)
+617256
+"DATA",176.112,20772,0)
+4027828^QUININE SO4 324MG CAP
+"DATA",176.112,20772,1)
+617229
+"DATA",176.112,20773,0)
+4025215^HYALURONATE NA 0.2% CREAM,TOP
+"DATA",176.112,20773,1)
+617092
+"DATA",176.112,20774,0)
+4016870^B-TRACIN 500UNT/POLYMYX 10000UNT/PRAMOXINE 10MG/GM OINT,TOP
+"DATA",176.112,20774,1)
+616955
+"DATA",176.112,20775,0)
+4006464^CLEMASTINE FUMARATE 1.34MG/PHENYLPROPANOLAMINE 75MG TAB
+"DATA",176.112,20775,1)
+616915
+"DATA",176.112,20776,0)
+4004841^CARBETAPENTANE 30MG/CTM 4MG/EPHEDRINE 5MG/P-EPHRINE 5MG/5ML SUSP
+"DATA",176.112,20776,1)
+616909
+"DATA",176.112,20777,0)
+4025033^MECASERMIN RINFABATE 36MG/0.6ML INJ
+"DATA",176.112,20777,1)
+616883
+"DATA",176.112,20778,0)
+4004840^CARBETAPENTANE 60MG/CTM 5MG/EPHEDRINE 10MG/P-EPHRINE 10MG TAB
+"DATA",176.112,20778,1)
+616863
+"DATA",176.112,20779,0)
+4026807^FENOFIBRATE 50MG CAP
+"DATA",176.112,20779,1)
+616853
+"DATA",176.112,20780,0)
+4026808^FENOFIBRATE 150MG CAP
+"DATA",176.112,20780,1)
+616852
+"DATA",176.112,20781,0)
+4003780^ALCOHOL,DENATURED 95% LIQUID
+"DATA",176.112,20781,1)
+616810
+"DATA",176.112,20782,0)
+4014882^ALCOHOL,ETHYL 95% LIQUID
+"DATA",176.112,20782,1)
+616810
+"DATA",176.112,20783,0)
+4009137^PRAMOXINE HCL 1% SUPP,RTL
+"DATA",176.112,20783,1)
+616809
+"DATA",176.112,20784,0)
+4006791^ALUMINUM HYDROXYCHLORIDE 6.25%/ALCOHOL 96% SOLN,TOP
+"DATA",176.112,20784,1)
+616801
+"DATA",176.112,20785,0)
+4010058^BENZOCAINE 1%/TANNIC ACID 4.5%/ETHANOL 60% AEROSOL,TOP
+"DATA",176.112,20785,1)
+616798
+"DATA",176.112,20786,0)
+4009841^ACETONE 6%/ALCOHOL 15% SHAMPOO
+"DATA",176.112,20786,1)
+616795
+"DATA",176.112,20787,0)
+4004048^HYDROCORTISONE ACETATE 2.5%/PRAMOXINE HCL 1% OINT,RTL
+"DATA",176.112,20787,1)
+616791
+"DATA",176.112,20788,0)
+4007497^HC 0.1%/ISOPROPANOL 10%/RESORCINOL 2%/SULFUR 5% LIQUID,TOP
+"DATA",176.112,20788,1)
+616787
+"DATA",176.112,20789,0)
+4012129^BENZOCAINE 2%/ALCOHOL 44%/MENTHOL 4% GEL,TOP
+"DATA",176.112,20789,1)
+616785
+"DATA",176.112,20790,0)
+4009843^ACETONE 10%/ISOPROPYL ALCOHOL 50%/POLYSORBATE 80 2% LIQUID,TOP
+"DATA",176.112,20790,1)
+616781
+"DATA",176.112,20791,0)
+4003777^ALCOHOL,ABSOLUTE 99.2% INJ
+"DATA",176.112,20791,1)
+616770
+"DATA",176.112,20792,0)
+4003779^ALCOHOL,ABSOLUTE 99% INJ
+"DATA",176.112,20792,1)
+616768
+"DATA",176.112,20793,0)
+4024760^HYDROCORTISONE ACETATE 1%/PRAMOXINE HCL 1% OINT,TOP
+"DATA",176.112,20793,1)
+616766
+"DATA",176.112,20794,0)
+4003774^ALCOHOL,ABSOLUTE 95% INJ
+"DATA",176.112,20794,1)
+616765
+"DATA",176.112,20795,0)
+4003789^ALCOHOL,ETHYL 62% FOAM,TOP
+"DATA",176.112,20795,1)
+616763
+"DATA",176.112,20796,0)
+4005840^SALICYLIC ACID 1.8%/ALCOHOL 61% LOTION
+"DATA",176.112,20796,1)
+616746
+"DATA",176.112,20797,0)
+4025188^BETAMETHASONE DIPROPIONATE 0.064%/CALCIPOTRIENE 0.005% OINT,TOP
+"DATA",176.112,20797,1)
+616711
+"DATA",176.112,20798,0)
+4025191^RISPERIDONE 4MG TAB,ORAL DISINTEGRATING
+"DATA",176.112,20798,1)
+616705
+"DATA",176.112,20799,0)
+4025190^RISPERIDONE 3MG TAB,ORAL DISINTEGRATING
+"DATA",176.112,20799,1)
+616698
+"DATA",176.112,20800,0)
+4025034^CONIVAPTAN HCL 5MG/ML INJ
+"DATA",176.112,20800,1)
+616611
+"DATA",176.112,20801,0)
+4025036^LUBIPROSTONE 24MCG CAP,ORAL
+"DATA",176.112,20801,1)
+616578
+"DATA",176.112,20802,0)
+4025984^DESLORATADINE 2.5MG/PSEUDOEPHEDRINE SULFATE 120MG TAB,SA
+"DATA",176.112,20802,1)
+616565
+"DATA",176.112,20803,0)
+4025611^OMEPRAZOLE 40MG/SODIUM BICARBONATE 1100MG CAP,ORAL
+"DATA",176.112,20803,1)
+616541
+"DATA",176.112,20804,0)
+4025610^OMEPRAZOLE 20MG/SODIUM BICARBONATE 1100MG CAP,ORAL
+"DATA",176.112,20804,1)
+616539
+"DATA",176.112,20805,0)
+4025115^UREA 50% SOLN,TOP
+"DATA",176.112,20805,1)
+616535
+"DATA",176.112,20806,0)
+4012089^ALCOHOL 43%/RESORCINOL 3% LOTION,TOP
+"DATA",176.112,20806,1)
+616515
+"DATA",176.112,20807,0)
+4009860^ALCOHOL 28%/SALICYLIC ACID 0.5% LOTION
+"DATA",176.112,20807,1)
+616513
+"DATA",176.112,20808,0)
+4009977^ALCOHOL 21%/SULFUR 5%/ZINC OXIDE 10%/ZINC SO4 1% LOTION
+"DATA",176.112,20808,1)
+616507
+"DATA",176.112,20809,0)
+4003775^ALCOHOL,ABSOLUTE 100% INJ
+"DATA",176.112,20809,1)
+616501
+"DATA",176.112,20810,0)
+4024991^RANOLAZINE 500MG TAB,SA
+"DATA",176.112,20810,1)
+616492
+"DATA",176.112,20811,0)
+4025108^QUETIAPINE FUMARATE 50MG TAB,UD
+"DATA",176.112,20811,1)
+616487
+"DATA",176.112,20812,0)
+4025107^QUETIAPINE FUMARATE 50MG TAB
+"DATA",176.112,20812,1)
+616487
+"DATA",176.112,20813,0)
+4025106^QUETIAPINE FUMARATE 400MG TAB,UD
+"DATA",176.112,20813,1)
+616483
+"DATA",176.112,20814,0)
+4025105^QUETIAPINE FUMARATE 400MG TAB
+"DATA",176.112,20814,1)
+616483
+"DATA",176.112,20815,0)
+4008892^ALCOHOL,ISOPROPYL 60% LIQUID,TOP
+"DATA",176.112,20815,1)
+616462
+"DATA",176.112,20816,0)
+4008893^ALCOHOL,ISOPROPYL 60% CLEANSER,TOP
+"DATA",176.112,20816,1)
+616462
+"DATA",176.112,20817,0)
+4008895^ALCOHOL,ISOPROPYL 54% LIQUID,TOP
+"DATA",176.112,20817,1)
+616460
+"DATA",176.112,20818,0)
+4003782^ALCOHOL,ISOPROPYL 50% LIQUID,TOP
+"DATA",176.112,20818,1)
+616456
+"DATA",176.112,20819,0)
+4007924^SAL AC 1%/NA THIOSULFATE 25%/ISOPROPANOL 10% LOT
+"DATA",176.112,20819,1)
+616454
+"DATA",176.112,20820,0)
+4003783^ALCOHOL,ISOPROPYL 100% LIQUID,TOP
+"DATA",176.112,20820,1)
+616452
+"DATA",176.112,20821,0)
+4024828^SODIUM FLUORIDE 0.25MG TAB,CHEWABLE
+"DATA",176.112,20821,1)
+616429
+"DATA",176.112,20822,0)
+4027009^MOMETASONE FUROATE 0.1% SOLN,TOP
+"DATA",176.112,20822,1)
+616353
+"DATA",176.112,20823,0)
+4024797^L-METHYLFOLATE 2.8/METHYLCOBALAMIN 2/PYRIDOXAL 25MG TAB
+"DATA",176.112,20823,1)
+616303
+"DATA",176.112,20824,0)
+4024994^SUNITINIB MALATE 50MG CAP,ORAL
+"DATA",176.112,20824,1)
+616289
+"DATA",176.112,20825,0)
+4024993^SUNITINIB MALATE 25MG CAP,ORAL
+"DATA",176.112,20825,1)
+616285
+"DATA",176.112,20826,0)
+4024992^SUNITINIB MALATE 12.5MG CAP,ORAL
+"DATA",176.112,20826,1)
+616279
+"DATA",176.112,20827,0)
+4026694^FLAVOCOXID 500MG CAP,ORAL
+"DATA",176.112,20827,1)
+615902
+"DATA",176.112,20828,0)
+4026195^HEPATITIS B IMMUNE GLOBULIN (IM) INJ,VI,0.5ML
+"DATA",176.112,20828,1)
+615874
+"DATA",176.112,20829,0)
+4013263^MENTHOL 0.5%/PRAMOXINE 1% GEL,TOP
+"DATA",176.112,20829,1)
+615857
+"DATA",176.112,20830,0)
+4025015^BRIMONIDINE TARTRATE 0.1% SOLN,OPH
+"DATA",176.112,20830,1)
+615199
+"DATA",176.112,20831,0)
+4009293^INTERFERON ALFA-3N 5 MILLION UNT/ML INJ
+"DATA",176.112,20831,1)
+615136
+"DATA",176.112,20832,0)
+4006220^DEXTROSE 5%/NACL 0.3%/KCL 30MEQ/L INJ
+"DATA",176.112,20832,1)
+615115
+"DATA",176.112,20833,0)
+4006234^DEXTROSE 5%/NACL 0.3%/KCL 40MEQ/L INJ
+"DATA",176.112,20833,1)
+615114
+"DATA",176.112,20834,0)
+4006221^DEXTROSE 5%/NACL 0.3%/KCL 20MEQ/L INJ
+"DATA",176.112,20834,1)
+615113
+"DATA",176.112,20835,0)
+4006233^DEXTROSE 5%/NACL 0.9%/KCL 40MEQ/L INJ
+"DATA",176.112,20835,1)
+615111
+"DATA",176.112,20836,0)
+4006232^DEXTROSE 5%/NACL 0.9%/KCL 20MEQ/L INJ
+"DATA",176.112,20836,1)
+615107
+"DATA",176.112,20837,0)
+4006224^DEXTROSE 5%/NACL 0.2%/KCL 40MEQ/L INJ
+"DATA",176.112,20837,1)
+615105
+"DATA",176.112,20838,0)
+4006223^DEXTROSE 5%/NACL 0.2%/KCL 30MEQ/L INJ
+"DATA",176.112,20838,1)
+615104
+"DATA",176.112,20839,0)
+4006222^DEXTROSE 5%/NACL 0.2%/KCL 20MEQ/L INJ
+"DATA",176.112,20839,1)
+615102
+"DATA",176.112,20840,0)
+4006218^DEXTROSE 5%/NACL 0.45%/KCL 40MEQ/L INJ
+"DATA",176.112,20840,1)
+615100
+"DATA",176.112,20841,0)
+4006217^DEXTROSE 5%/NACL 0.45%/KCL 30MEQ/L INJ
+"DATA",176.112,20841,1)
+615099
+"DATA",176.112,20842,0)
+4006216^DEXTROSE 5%/NACL 0.45%/KCL 20MEQ/L INJ
+"DATA",176.112,20842,1)
+615098
+"DATA",176.112,20843,0)
+4006244^UROKINASE 250000UNT/VIL INJ
+"DATA",176.112,20843,1)
+608930
+"DATA",176.112,20844,0)
+4025318^RASAGILINE MESYLATE 1MG TAB
+"DATA",176.112,20844,1)
+608328
+"DATA",176.112,20845,0)
+4025336^ATOMOXETINE 80MG CAP
+"DATA",176.112,20845,1)
+608143
+"DATA",176.112,20846,0)
+4025311^ATOMOXETINE 100MG CAP
+"DATA",176.112,20846,1)
+608139
+"DATA",176.112,20847,0)
+4003239^MEPERIDINE HCL 50MG/5ML SYRUP,5ML
+"DATA",176.112,20847,1)
+608009
+"DATA",176.112,20848,0)
+4003227^MEPERIDINE HCL 50MG/5ML SYRUP
+"DATA",176.112,20848,1)
+608009
+"DATA",176.112,20849,0)
+4024622^DESLORATADINE 2.5MG/5ML SYRUP
+"DATA",176.112,20849,1)
+607573
+"DATA",176.112,20850,0)
+4025032^ABATACEPT 250MG/VIL INJ
+"DATA",176.112,20850,1)
+607381
+"DATA",176.112,20851,0)
+4024679^AMYLASE 52000UNT/LIPASE 16000UNT/PROTEASE 52000UNT CAP,EC
+"DATA",176.112,20851,1)
+607113
+"DATA",176.112,20852,0)
+4027731^ACETYLCYSTEINE 600MG CAP,ORAL
+"DATA",176.112,20852,1)
+606971
+"DATA",176.112,20853,0)
+4006626^APAP 325MG/DICHLORALPHENAZONE 100MG/ISOMETHEPTENE 65MG CAP
+"DATA",176.112,20853,1)
+606947
+"DATA",176.112,20854,0)
+4009136^PRAMOXINE HCL 1% GEL,TOP
+"DATA",176.112,20854,1)
+606901
+"DATA",176.112,20855,0)
+4015441^ESOMEPRAZOLE MAGNESIUM 40MG CAP,SA,UD
+"DATA",176.112,20855,1)
+606730
+"DATA",176.112,20856,0)
+4015442^ESOMEPRAZOLE MAGNESIUM 40MG CAP,SA
+"DATA",176.112,20856,1)
+606730
+"DATA",176.112,20857,0)
+4015440^ESOMEPRAZOL MAGNESIUM 40MG CAP,SA
+"DATA",176.112,20857,1)
+606730
+"DATA",176.112,20858,0)
+4025392^ESOMEPRAZOLE MAGNESIUM 40MG CAP,EC
+"DATA",176.112,20858,1)
+606730
+"DATA",176.112,20859,0)
+4015438^ESOMEPRAZOLE MAGNESIUM 20MG CAP,SA
+"DATA",176.112,20859,1)
+606726
+"DATA",176.112,20860,0)
+4015439^ESOMEPRAZOLE MAGNESIUM 20MG CAP,SA,UD
+"DATA",176.112,20860,1)
+606726
+"DATA",176.112,20861,0)
+4025391^ESOMEPRAZOLE MAGNESIUM 20MG CAP,EC
+"DATA",176.112,20861,1)
+606726
+"DATA",176.112,20862,0)
+4027365^HYDROMORPHONE 0.5MG/ML INJ,30ML
+"DATA",176.112,20862,1)
+606514
+"DATA",176.112,20863,0)
+4012513^IMIGLUCERASE 200U/VIL INJ
+"DATA",176.112,20863,1)
+605881
+"DATA",176.112,20864,0)
+4025126^IMIGLUCERASE 400U/VIL INJ
+"DATA",176.112,20864,1)
+605881
+"DATA",176.112,20865,0)
+4008335^APAP 650MG/CTM 4MG/PSEUDEFED 60MG/PKT PWDR,ORAL
+"DATA",176.112,20865,1)
+605433
+"DATA",176.112,20866,0)
+4026000^ACETAMINOPHEN 500MG/DM 15MG/DOXYLAMINE 6.25MG/15ML LIQUID
+"DATA",176.112,20866,1)
+604809
+"DATA",176.112,20867,0)
+4024813^MECASERMIN 10MG/ML INJ,SOLN
+"DATA",176.112,20867,1)
+604806
+"DATA",176.112,20868,0)
+4026950^PAPAIN/UREA 10% EMULSION SPRAY,TOP
+"DATA",176.112,20868,1)
+604595
+"DATA",176.112,20869,0)
+4008898^GANCICLOVIR 4.5MG IMPLANT,OPH
+"DATA",176.112,20869,1)
+604020
+"DATA",176.112,20870,0)
+4024983^CARBETAPENTANE 30MG/P-EPHRINE 5MG/PYRILAMINE 30MG/5ML SUSP,ORAL
+"DATA",176.112,20870,1)
+603642
+"DATA",176.112,20871,0)
+4025061^NELARABINE 5MG/ML INJ
+"DATA",176.112,20871,1)
+603566
+"DATA",176.112,20872,0)
+4026664^METHYLPHENIDATE HCL 2.5MG TAB,CHEWABLE
+"DATA",176.112,20872,1)
+603197
+"DATA",176.112,20873,0)
+4016815^CARBETAPENTANE 60MG/CHLORPHENIRAMINE 5MG TAB
+"DATA",176.112,20873,1)
+603158
+"DATA",176.112,20874,0)
+4006836^NAPROXEN 375MG TAB,EC
+"DATA",176.112,20874,1)
+603103
+"DATA",176.112,20875,0)
+4015070^SODIUM PHOSPHATE MONO/DIBASIC 1.5GM TAB
+"DATA",176.112,20875,1)
+603011
+"DATA",176.112,20876,0)
+4025117^ARIPIPRAZOLE 2MG TAB
+"DATA",176.112,20876,1)
+602964
+"DATA",176.112,20877,0)
+4025118^ARIPIPRAZOLE 2MG TAB,UD
+"DATA",176.112,20877,1)
+602964
+"DATA",176.112,20878,0)
+4025035^LENALIDOMIDE 5MG CAP,ORAL
+"DATA",176.112,20878,1)
+602912
+"DATA",176.112,20879,0)
+4025112^LENALIDOMIDE 10MG CAP,ORAL
+"DATA",176.112,20879,1)
+602910
+"DATA",176.112,20880,0)
+4027203^RANITIDINE HCL 25MG TAB,EFFERVSC
+"DATA",176.112,20880,1)
+602639
+"DATA",176.112,20881,0)
+4025122^LANTHANUM CARBONATE 1000MG TAB,CHEWABLE
+"DATA",176.112,20881,1)
+602635
+"DATA",176.112,20882,0)
+4025680^DM 30MG/GG 1200MG/P-EPHRINE 30MG TAB,SA
+"DATA",176.112,20882,1)
+602583
+"DATA",176.112,20883,0)
+4024892^APAP 325MG/DIPHENHYDRAMINE HCL 12.5MG/PHENYLEPHRINE HCL 5MG TAB
+"DATA",176.112,20883,1)
+602582
+"DATA",176.112,20884,0)
+4025627^GLIMEPIRIDE 4MG/ROSIGLITAZONE MALEATE 4MG TAB
+"DATA",176.112,20884,1)
+602550
+"DATA",176.112,20885,0)
+4025628^GLIMEPIRIDE 2MG/ROSIGLITAZONE MALEATE 4MG TAB
+"DATA",176.112,20885,1)
+602549
+"DATA",176.112,20886,0)
+4025629^GLIMEPIRIDE 1MG/ROSIGLITAZONE MALEATE 4MG TAB
+"DATA",176.112,20886,1)
+602544
+"DATA",176.112,20887,0)
+4017221^ABACAVIR SO4 600MG/LAMIVUDINE 300MG TAB
+"DATA",176.112,20887,1)
+602393
+"DATA",176.112,20888,0)
+4006465^CLEMASTINE FUMARATE 1.34MG/PHENYLPROPANOLAMINE 75MG TAB,SA
+"DATA",176.112,20888,1)
+598030
+"DATA",176.112,20889,0)
+4006427^CLEMASTINE FUMARATE 2.68MG TAB
+"DATA",176.112,20889,1)
+598029
+"DATA",176.112,20890,0)
+4004555^ALLERGENIC EXTRACT, MOLD, TRICHO. MENTAGROPHYTES 10000PNU/ML INJ
+"DATA",176.112,20890,1)
+598027
+"DATA",176.112,20891,0)
+4001650^AMOXICILLIN 250MG TAB,CHEWABLE
+"DATA",176.112,20891,1)
+598025
+"DATA",176.112,20892,0)
+4001645^AMOXICILLIN TRIHYDRATE 250MG TAB,CHEWABLE
+"DATA",176.112,20892,1)
+598025
+"DATA",176.112,20893,0)
+4001580^ERYTHROMYCIN 250MG CAP
+"DATA",176.112,20893,1)
+598008
+"DATA",176.112,20894,0)
+4001572^ERYTHROMYCIN 250MG TAB
+"DATA",176.112,20894,1)
+598006
+"DATA",176.112,20895,0)
+4025803^AMLODIPINE BESYLATE 2.5MG/ATORVASTATIN CA 40MG TAB
+"DATA",176.112,20895,1)
+597993
+"DATA",176.112,20896,0)
+4017313^AMLODIPINE BESYLATE 10MG/ATORVASTATIN CA 40MG TAB
+"DATA",176.112,20896,1)
+597990
+"DATA",176.112,20897,0)
+4017307^AMLODIPINE BESYLATE 10MG/ATORVASTATIN 10MG TAB
+"DATA",176.112,20897,1)
+597987
+"DATA",176.112,20898,0)
+4017308^AMLODIPINE BESYLATE 5MG/ATORVASTATIN 40MG TAB
+"DATA",176.112,20898,1)
+597984
+"DATA",176.112,20899,0)
+4017310^AMLODIPINE BESYLATE 5MG/ATORVASTATIN CA 20MG TAB
+"DATA",176.112,20899,1)
+597980
+"DATA",176.112,20900,0)
+4017306^AMLODIPINE BESYLATE 5MG/ATORVASTATIN CA 10MG TAB
+"DATA",176.112,20900,1)
+597977
+"DATA",176.112,20901,0)
+4025804^AMLODIPINE BESYLATE 2.5MG/ATORVASTATIN CA 20MG TAB
+"DATA",176.112,20901,1)
+597974
+"DATA",176.112,20902,0)
+4025805^AMLODIPINE BESYLATE 2.5MG/ATORVASTATIN CA 10MG TAB
+"DATA",176.112,20902,1)
+597971
+"DATA",176.112,20903,0)
+4017311^AMLODIPINE BESYLATE 10MG/ATORVASTATIN CA 20MG TAB
+"DATA",176.112,20903,1)
+597967
+"DATA",176.112,20904,0)
+4004930^SODIUM FLUORIDE 0.05% SOLN
+"DATA",176.112,20904,1)
+597965
+"DATA",176.112,20905,0)
+4004918^SODIUM FLUORIDE 0.5MG/ML LIQUID,ORAL
+"DATA",176.112,20905,1)
+597965
+"DATA",176.112,20906,0)
+4003522^DINOPROSTONE 10MG INSERT,VAG
+"DATA",176.112,20906,1)
+597957
+"DATA",176.112,20907,0)
+4013108^ANAGRELIDE HCL 1MG CAP
+"DATA",176.112,20907,1)
+597852
+"DATA",176.112,20908,0)
+4013107^ANAGRELIDE HCL 0.5MG CAP
+"DATA",176.112,20908,1)
+597850
+"DATA",176.112,20909,0)
+4025904^ARTICAINE 4%/EPINEPHRINE 1:200,000 INJ,CARTRIDGE,1.7ML
+"DATA",176.112,20909,1)
+597833
+"DATA",176.112,20910,0)
+4016416^ARTICAINE 4%/EPINEPHRINE 1:100,000 INJ,CARTRIDGE,1.7ML
+"DATA",176.112,20910,1)
+597832
+"DATA",176.112,20911,0)
+4015256^TOBRAMYCIN SO4 1.2GM/VIL INJ
+"DATA",176.112,20911,1)
+597823
+"DATA",176.112,20912,0)
+4005550^TOBRAMYCIN SO4 40MG/ML INJ
+"DATA",176.112,20912,1)
+597823
+"DATA",176.112,20913,0)
+4025064^DEFERASIROX 500MG TAB,EFFERVSC
+"DATA",176.112,20913,1)
+597772
+"DATA",176.112,20914,0)
+4024882^DEFERASIROX 500MG TAB,SOLUBLE
+"DATA",176.112,20914,1)
+597772
+"DATA",176.112,20915,0)
+4025063^DEFERASIROX 250MG TAB,EFFERVSC
+"DATA",176.112,20915,1)
+597770
+"DATA",176.112,20916,0)
+4024881^DEFERASIROX 250MG TAB,SOLUBLE
+"DATA",176.112,20916,1)
+597770
+"DATA",176.112,20917,0)
+4024880^DEFERASIROX 125MG TAB,SOLUBLE
+"DATA",176.112,20917,1)
+597768
+"DATA",176.112,20918,0)
+4025062^DEFERASIROX 125MG TAB,EFFERVSC
+"DATA",176.112,20918,1)
+597768
+"DATA",176.112,20919,0)
+4025116^CLOBETASOL PROPIONATE 0.05% SPRAY,TOP
+"DATA",176.112,20919,1)
+597752
+"DATA",176.112,20920,0)
+4024989^SORAFENIB 200MG TAB
+"DATA",176.112,20920,1)
+597747
+"DATA",176.112,20921,0)
+4024872^LOPINAVIR 200MG/RITONAVIR 50MG TAB
+"DATA",176.112,20921,1)
+597730
+"DATA",176.112,20922,0)
+4027401^RIBAVIRIN 600MG TAB
+"DATA",176.112,20922,1)
+597722
+"DATA",176.112,20923,0)
+4027400^RIBAVIRIN 400MG TAB
+"DATA",176.112,20923,1)
+597718
+"DATA",176.112,20924,0)
+4025049^HYDROCHLOROTHIAZIDE 12.5MG/LOSARTAN POTASSIUM 100MG TAB
+"DATA",176.112,20924,1)
+597400
+"DATA",176.112,20925,0)
+4025319^HISTRELIN ACETATE 50MG IMPLANT
+"DATA",176.112,20925,1)
+597333
+"DATA",176.112,20926,0)
+4001594^ERYTHROMYCIN LACTOBIONATE 500MG/VIL (PF) INJ IV
+"DATA",176.112,20926,1)
+597298
+"DATA",176.112,20927,0)
+4001575^ERYTHROMYCIN LACTOBIONATE 500MG/VIL INJ IV
+"DATA",176.112,20927,1)
+597298
+"DATA",176.112,20928,0)
+4001573^ERYTHROMYCIN LACTOBIONATE 1GM/VIL INJ IV
+"DATA",176.112,20928,1)
+597298
+"DATA",176.112,20929,0)
+4001593^ERYTHROMYCIN LACTOBIONATE 1GM/VIL (PF) INJ IV
+"DATA",176.112,20929,1)
+597298
+"DATA",176.112,20930,0)
+4001591^ERYTHROMYCIN LACTOBIONATE 50MG/ML INJ IV
+"DATA",176.112,20930,1)
+597298
+"DATA",176.112,20931,0)
+4025003^EMTRICITABINE 10MG/ML SOLN,ORAL
+"DATA",176.112,20931,1)
+597291
+"DATA",176.112,20932,0)
+4027356^FOSAMPRENAVIR CA 50MG/ML SUSP,ORAL
+"DATA",176.112,20932,1)
+597267^^^FOSAMPRENAVIR CA 50MG/ML ORAL SUSP^Y
+"DATA",176.112,20933,0)
+4025899^OLOPATADINE HCL 0.2% SOLN,OPH
+"DATA",176.112,20933,1)
+597213
+"DATA",176.112,20934,0)
+4008973^CARBOPLATIN 150MG/VIL INJ
+"DATA",176.112,20934,1)
+597195
+"DATA",176.112,20935,0)
+4017256^CARBOPLATIN 600MG/VIL INJ
+"DATA",176.112,20935,1)
+597195
+"DATA",176.112,20936,0)
+4008974^CARBOPLATIN 450MG/VIL INJ
+"DATA",176.112,20936,1)
+597195
+"DATA",176.112,20937,0)
+4008972^CARBOPLATIN 50MG/VIL INJ
+"DATA",176.112,20937,1)
+597195
+"DATA",176.112,20938,0)
+4001559^ERYTHROMYCIN ESTOLATE 250MG/5ML SUSP
+"DATA",176.112,20938,1)
+597194
+"DATA",176.112,20939,0)
+4027224^BRIMONIDINE TARTRATE 0.2%/TIMOLOL MALEATE 0.5% SOLN,OPH
+"DATA",176.112,20939,1)
+597144
+"DATA",176.112,20940,0)
+4017218^DULOXETINE HCL 60MG CAP,ORAL
+"DATA",176.112,20940,1)
+596934
+"DATA",176.112,20941,0)
+4017219^DULOXETINE HCL 60MG CAP,ORAL,UD
+"DATA",176.112,20941,1)
+596934
+"DATA",176.112,20942,0)
+4017216^DULOXETINE HCL 30MG CAP,ORAL
+"DATA",176.112,20942,1)
+596930
+"DATA",176.112,20943,0)
+4017217^DULOXETINE HCL 30MG CAP,ORAL,UD
+"DATA",176.112,20943,1)
+596930
+"DATA",176.112,20944,0)
+4017215^DULOXETINE HCL 20MG CAP,ORAL,UD
+"DATA",176.112,20944,1)
+596926
+"DATA",176.112,20945,0)
+4017214^DULOXETINE HCL 20MG CAP,ORAL
+"DATA",176.112,20945,1)
+596926
+"DATA",176.112,20946,0)
+4012775^LANSOPRAZOLE 15MG CAP,SA
+"DATA",176.112,20946,1)
+596843
+"DATA",176.112,20947,0)
+4014008^LANSOPRAZOLE 15MG CAP,SA,UD
+"DATA",176.112,20947,1)
+596843
+"DATA",176.112,20948,0)
+4025394^LANSOPRAZOLE 15MG CAP,EC
+"DATA",176.112,20948,1)
+596843
+"DATA",176.112,20949,0)
+4025393^LANSOPRAZOLE 15MG CAP,EC,UD
+"DATA",176.112,20949,1)
+596843
+"DATA",176.112,20950,0)
+4003841^CODEINE 10MG/GG 200MG/P-PROPANOL 12.5MG/5ML SUSP
+"DATA",176.112,20950,1)
+596818
+"DATA",176.112,20951,0)
+4024665^TRYPAN BLUE 0.06% SOLN,INTRAOCULAR
+"DATA",176.112,20951,1)
+584369
+"DATA",176.112,20952,0)
+4005156^OXYCODONE HCL 80MG TAB,SA
+"DATA",176.112,20952,1)
+584150
+"DATA",176.112,20953,0)
+4016081^OXYCODONE HCL 40MG TAB,SA,UD
+"DATA",176.112,20953,1)
+584149
+"DATA",176.112,20954,0)
+4025018^MEGESTROL ACETATE 625MG/5ML SUSP,ORAL
+"DATA",176.112,20954,1)
+583374
+"DATA",176.112,20955,0)
+4024885^HYDRALAZINE HCL 37.5MG/ISOSORBIDE DINITRATE 20MG TAB
+"DATA",176.112,20955,1)
+583364
+"DATA",176.112,20956,0)
+4024635^PACLITAXEL PROTEIN-BOUND 100MG/VIL INJ
+"DATA",176.112,20956,1)
+583214
+"DATA",176.112,20957,0)
+4006694^SALSALATE 750MG TAB
+"DATA",176.112,20957,1)
+583170
+"DATA",176.112,20958,0)
+4014147^SALSALATE 750MG TAB,UD
+"DATA",176.112,20958,1)
+583170
+"DATA",176.112,20959,0)
+4024647^GALANTAMINE HYDROBROMIDE 8MG CAP,SA
+"DATA",176.112,20959,1)
+583132
+"DATA",176.112,20960,0)
+4024646^GALANTAMINE HYDROBROMIDE 24MG CAP,SA
+"DATA",176.112,20960,1)
+583129
+"DATA",176.112,20961,0)
+4025010^ACIDULATED PHOSPHATE FLUORIDE 0.044% LIQUID
+"DATA",176.112,20961,1)
+583105
+"DATA",176.112,20962,0)
+4024648^GALANTAMINE HYDROBROMIDE 16MG CAP,SA
+"DATA",176.112,20962,1)
+583098
+"DATA",176.112,20963,0)
+4025000^SOMATROPIN 24MG/VIL INJ,SOLN,CARTRIDGE
+"DATA",176.112,20963,1)
+582974
+"DATA",176.112,20964,0)
+4009332^PODOFILOX 0.5% SOLN,TOP
+"DATA",176.112,20964,1)
+582926
+"DATA",176.112,20965,0)
+4008891^ALCOHOL,ISOPROPYL 91% LIQUID,TOP
+"DATA",176.112,20965,1)
+582901
+"DATA",176.112,20966,0)
+4003781^ALCOHOL,ISOPROPYL 70% LIQUID,TOP
+"DATA",176.112,20966,1)
+582897
+"DATA",176.112,20967,0)
+4026917^HYDROMORPHONE 0.02MG/BUPIVACAINE 0.06%/ML/NS INJ,BAG,200ML
+"DATA",176.112,20967,1)
+582841
+"DATA",176.112,20968,0)
+4003776^ALCOHOL,ETHYL 70% LIQUID,TOP
+"DATA",176.112,20968,1)
+582753
+"DATA",176.112,20969,0)
+4025692^ETANERCEPT 50MG/ML INJ SURECLICK
+"DATA",176.112,20969,1)
+582671
+"DATA",176.112,20970,0)
+4006336^CTM 2MG/METHSCOPOLAMINE 1.25MG/P-EPHRINE 10MG/5ML SYRUP
+"DATA",176.112,20970,1)
+582454
+"DATA",176.112,20971,0)
+4002767^AMINOCAPROIC ACID 250MG/ML SYRUP
+"DATA",176.112,20971,1)
+582299
+"DATA",176.112,20972,0)
+4015929^IRON CARBONYL 15MG/1.25ML SUSP,ORAL
+"DATA",176.112,20972,1)
+582247
+"DATA",176.112,20973,0)
+4016227^LOVASTATIN 20MG/NIACIN 750MG TAB
+"DATA",176.112,20973,1)
+582043
+"DATA",176.112,20974,0)
+4027234^LOVASTATIN 20MG/NIACIN 750MG TAB,SA
+"DATA",176.112,20974,1)
+582043
+"DATA",176.112,20975,0)
+4016229^LOVASTATIN 20MG/NIACIN 500MG TAB
+"DATA",176.112,20975,1)
+582042
+"DATA",176.112,20976,0)
+4027420^LOVASTATIN 20MG/NIACIN 500MG TAB,SA
+"DATA",176.112,20976,1)
+582042^^^LOVASTATIN 20MG/NIACIN 500MG SA TAB^Y
+"DATA",176.112,20977,0)
+4027421^LOVASTATIN 20MG/NIACIN 1000MG TAB,SA
+"DATA",176.112,20977,1)
+582041^^^LOVASTATIN 20MG/NIACIN 1000MG SA TAB^Y
+"DATA",176.112,20978,0)
+4003790^ALCOHOL,ABSOLUTE 98% INJ,AMP,1ML
+"DATA",176.112,20978,1)
+581957
+"DATA",176.112,20979,0)
+4003778^ALCOHOL,ABSOLUTE 98% INJ
+"DATA",176.112,20979,1)
+581957
+"DATA",176.112,20980,0)
+4003791^ALCOHOL,ABSOLUTE 98% INJ,AMP,5ML
+"DATA",176.112,20980,1)
+581957
+"DATA",176.112,20981,0)
+4003792^ALCOHOL,ABSOLUTE 98% INJ,AMP,50ML
+"DATA",176.112,20981,1)
+581957
+"DATA",176.112,20982,0)
+4024890^CHLOROPHYLL 0.5%/PAPAIN 521700UNIT/UREA 10% OINT,TOP
+"DATA",176.112,20982,1)
+581771
+"DATA",176.112,20983,0)
+4024597^CASTOR OIL 788MG/PERUVIAN BALSAM 87MG/TRYPSIN 90UNIT/GM OINT,TOP
+"DATA",176.112,20983,1)
+581753
+"DATA",176.112,20984,0)
+4014639^ALCOHOL,ETHYL 60% GEL,TOP
+"DATA",176.112,20984,1)
+581658
+"DATA",176.112,20985,0)
+4024672^TIGECYCLINE 50MG/VIL INJ
+"DATA",176.112,20985,1)
+581531
+"DATA",176.112,20986,0)
+4024973^ALOE 1%/HC 2%/IODOQUINOL 1% GEL,TOP,2GM
+"DATA",176.112,20986,1)
+581506
+"DATA",176.112,20987,0)
+4002993^CILASTATIN NA 500MG/IMIPENEM 500MG/VIL INJ IV
+"DATA",176.112,20987,1)
+581374
+"DATA",176.112,20988,0)
+4002994^CILASTATIN NA 500MG/IMIPENEM 500MG/BTL INJ IV
+"DATA",176.112,20988,1)
+581374
+"DATA",176.112,20989,0)
+4025047^PYRITHIONE ZINC 0.25% CREAM,TOP
+"DATA",176.112,20989,1)
+580337
+"DATA",176.112,20990,0)
+4026586^CARBOXYMETHYLCELLULOSE NA 1% GEL,OPH 0.6ML
+"DATA",176.112,20990,1)
+579907
+"DATA",176.112,20991,0)
+4024848^NAPROXEN NA 220MG/PSEUDOEPHEDRINE 120MG TAB,SA
+"DATA",176.112,20991,1)
+579778
+"DATA",176.112,20992,0)
+4024627^IBANDRONATE NA 150MG TAB
+"DATA",176.112,20992,1)
+579525
+"DATA",176.112,20993,0)
+4026048^CTM 8MG/METHSCOPOLAMINE 2.5MG/P-EPHRINE 40MG TAB,SA
+"DATA",176.112,20993,1)
+579443
+"DATA",176.112,20994,0)
+4015302^GALANTAMINE HYDROBROMIDE 12MG TAB
+"DATA",176.112,20994,1)
+579148
+"DATA",176.112,20995,0)
+4024658^FLAVOCOXID 250MG CAP,ORAL
+"DATA",176.112,20995,1)
+578892
+"DATA",176.112,20996,0)
+4016261^AMPHETAMINE-DEXTROAMPHETAMINE RESIN COMPLEX 5MG CAP,SA
+"DATA",176.112,20996,1)
+578552
+"DATA",176.112,20997,0)
+4015930^AMPHETAMINE/DEXTROAMPHETAMINE RESIN COMPLEX 30MG CAP,SA
+"DATA",176.112,20997,1)
+578548
+"DATA",176.112,20998,0)
+4016263^AMPHETAMINE/DEXTROAMPHETAMINE RESIN COMPLEX 25MG CAP,SA
+"DATA",176.112,20998,1)
+578406
+"DATA",176.112,20999,0)
+4015931^AMPHETAMINE/DEXTROAMPHETAMINE RESIN COMPLEX 20MG CAP,SA
+"DATA",176.112,20999,1)
+578399
+"DATA",176.112,21000,0)
+4003907^AMPHETAMINE-DEXTROAMPHETAMINE RESIN COMPLEX 20MG CAP,SA
+"DATA",176.112,21000,1)
+578399
+"DATA",176.112,21001,0)
+4016262^AMPHETAMINE/DEXTROAMPHETAMINE RESIN COMPLEX 15MG CAP,SA
+"DATA",176.112,21001,1)
+578394
+"DATA",176.112,21002,0)
+4015102^CANDESARTAN CELEXETIL 32MG/HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,21002,1)
+578330
+"DATA",176.112,21003,0)
+4015101^CANDESARTAN CILEXETIL 16MG/HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,21003,1)
+578325
+"DATA",176.112,21004,0)
+4024812^NEPAFENAC 0.1% SUSP,OPH
+"DATA",176.112,21004,1)
+578044
+"DATA",176.112,21005,0)
+4024664^GALSULFASE 1MG/ML INJ
+"DATA",176.112,21005,1)
+578037
+"DATA",176.112,21006,0)
+4024624^BROMFENAC NA 0.09% SOLN,OPH
+"DATA",176.112,21006,1)
+578018
+"DATA",176.112,21007,0)
+4006757^AMPHETAMINE 10MG/DEXTROAMPHETAMINE 10MG TAB
+"DATA",176.112,21007,1)
+577961
+"DATA",176.112,21008,0)
+4006755^AMPHETAMINE 7.5MG/DEXTROAMPHETAMINE 7.5MG TAB
+"DATA",176.112,21008,1)
+577957
+"DATA",176.112,21009,0)
+4027531^LIGHT MINERAL OIL 1%/MINERAL OIL 4.5% SOLN,OPH
+"DATA",176.112,21009,1)
+577927
+"DATA",176.112,21010,0)
+4013532^CANDESARTAN CILEXETIL 16MG TAB
+"DATA",176.112,21010,1)
+577776
+"DATA",176.112,21011,0)
+4013713^CANDESARTAN CILEXETIL 16MG TAB,UD
+"DATA",176.112,21011,1)
+577776
+"DATA",176.112,21012,0)
+4026944^FENTANYL CITRATE 25MCG/ML INJ,30ML
+"DATA",176.112,21012,1)
+577455
+"DATA",176.112,21013,0)
+4025299^FLUTICASONE PROPIONATE 0.05% LOTION,TOP
+"DATA",176.112,21013,1)
+577393
+"DATA",176.112,21014,0)
+4024638^AZITHROMYCIN 2GM/60ML SUSP,SA
+"DATA",176.112,21014,1)
+577378
+"DATA",176.112,21015,0)
+4024673^RAMELTEON 8MG TAB
+"DATA",176.112,21015,1)
+577348
+"DATA",176.112,21016,0)
+4024773^PARICALCITOL 4MCG CAP,ORAL
+"DATA",176.112,21016,1)
+577324
+"DATA",176.112,21017,0)
+4024772^PARICALCITOL 2MCG CAP,ORAL
+"DATA",176.112,21017,1)
+577317
+"DATA",176.112,21018,0)
+4024771^PARICALCITOL 1MCG CAP,ORAL
+"DATA",176.112,21018,1)
+577315
+"DATA",176.112,21019,0)
+4001212^AMYL NITRITE 0.3ML/AMP,INHL
+"DATA",176.112,21019,1)
+577307
+"DATA",176.112,21020,0)
+4024896^METRONIDAZOLE 1% GEL,TOP
+"DATA",176.112,21020,1)
+577237
+"DATA",176.112,21021,0)
+4024663^TIPRANAVIR 250MG CAP
+"DATA",176.112,21021,1)
+577212
+"DATA",176.112,21022,0)
+4025743^MEMANTINE HCL 10MG/5ML ORAL,SOLN
+"DATA",176.112,21022,1)
+577157
+"DATA",176.112,21023,0)
+4024730^PREGABALIN 225MG CAP,ORAL
+"DATA",176.112,21023,1)
+577127
+"DATA",176.112,21024,0)
+4025044^METFORMIN HCL 850MG/PIOGLITAZONE HCL 15MG TAB
+"DATA",176.112,21024,1)
+577095
+"DATA",176.112,21025,0)
+4025043^METFORMIN HCL 500MG/PIOGLITAZONE HCL 15MG TAB
+"DATA",176.112,21025,1)
+577094
+"DATA",176.112,21026,0)
+4024864^ZOLPIDEM TARTRATE 6.25MG TAB,SA
+"DATA",176.112,21026,1)
+577092
+"DATA",176.112,21027,0)
+4024865^ZOLPIDEM TARTRATE 6.25MG TAB,SA,UD
+"DATA",176.112,21027,1)
+577092
+"DATA",176.112,21028,0)
+4024866^ZOLPIDEM TARTRATE 12.5MG TAB,SA
+"DATA",176.112,21028,1)
+577087
+"DATA",176.112,21029,0)
+4024867^ZOLPIDEM TARTRATE 12.5MG TAB,SA,UD
+"DATA",176.112,21029,1)
+577087
+"DATA",176.112,21030,0)
+4026437^CHLORPHENIRAMINE 4MG/PHENYLEPHRINE 10MG TAB
+"DATA",176.112,21030,1)
+577084
+"DATA",176.112,21031,0)
+4025298^ACETAMINOPHEN 325MG/PHENYLEPHRINE HCL 5MG TAB
+"DATA",176.112,21031,1)
+577083
+"DATA",176.112,21032,0)
+4025738^DESLORATADINE 2.5MG TAB,RAPID DISINTEGRATING
+"DATA",176.112,21032,1)
+577080
+"DATA",176.112,21033,0)
+4024667^MICAFUNGIN NA 50MG/VIL INJ
+"DATA",176.112,21033,1)
+577060
+"DATA",176.112,21034,0)
+4024696^FENTANYL 12.5MCG/HR PATCH
+"DATA",176.112,21034,1)
+577057
+"DATA",176.112,21035,0)
+4025012^SILDENAFIL CITRATE 20MG TAB
+"DATA",176.112,21035,1)
+577033
+"DATA",176.112,21036,0)
+4024770^FENOFIBRATE 50MG TAB
+"DATA",176.112,21036,1)
+577031
+"DATA",176.112,21037,0)
+4025341^ESTRADIOL ACETATE 1.8MG TAB
+"DATA",176.112,21037,1)
+577029
+"DATA",176.112,21038,0)
+4025339^ESTRADIOL ACETATE 0.45MG TAB
+"DATA",176.112,21038,1)
+577027
+"DATA",176.112,21039,0)
+4006090^CLORAZEPATE DIPOTASSIUM 15MG CAP
+"DATA",176.112,21039,1)
+576647
+"DATA",176.112,21040,0)
+4005480^GONADOTROPIN,CHORIONIC 5000UNT/MANNITOL 50MG/VIL INJ
+"DATA",176.112,21040,1)
+562828
+"DATA",176.112,21041,0)
+4001712^GONADOTROPIN,CHORIONIC 5000UNT/VIL INJ
+"DATA",176.112,21041,1)
+562828
+"DATA",176.112,21042,0)
+4001709^GONADOTROPIN,CHORIONIC 5000UNT/AMP INJ
+"DATA",176.112,21042,1)
+562828
+"DATA",176.112,21043,0)
+4005479^GONADOTROPIN,CHORIONIC 10000UNT/MANNITOL 100MG/VIL INJ
+"DATA",176.112,21043,1)
+562827
+"DATA",176.112,21044,0)
+4001716^GONADOTROPIN,CHORIONIC 10000UNT/ML INJ
+"DATA",176.112,21044,1)
+562827
+"DATA",176.112,21045,0)
+4001708^GONADOTROPIN,CHORIONIC 10000UNT/VIL INJ
+"DATA",176.112,21045,1)
+562827
+"DATA",176.112,21046,0)
+4015837^PIMECROLIMUS 1% CREAM,TOP
+"DATA",176.112,21046,1)
+562806
+"DATA",176.112,21047,0)
+4015808^ERTAPENEM 1GM/VIL INJ
+"DATA",176.112,21047,1)
+562804
+"DATA",176.112,21048,0)
+4026047^ERTAPENEM 1GM/VIL INJ ADD-VANTAGE
+"DATA",176.112,21048,1)
+562804
+"DATA",176.112,21049,0)
+4025310^MEQUINOL 2%/TRETINOIN 0.01% SOLN,TOP
+"DATA",176.112,21049,1)
+562793
+"DATA",176.112,21050,0)
+4016237^PAROXETINE HCL 25MG TAB,SA
+"DATA",176.112,21050,1)
+562791
+"DATA",176.112,21051,0)
+4024855^ASA 500MG/CITRIC ACID 100MG/SODIUM BICARBONATE 1985MG TAB,EFFER
+"DATA",176.112,21051,1)
+562782
+"DATA",176.112,21052,0)
+4024854^ASA 325MG/CITRIC ACID 1000MG/SODIUM BICARBONATE 1916MG TAB,EFFERVSC
+"DATA",176.112,21052,1)
+562777
+"DATA",176.112,21053,0)
+4015111^CHORIOGONADOTROPIN ALFA 250MCG/VIL INJ
+"DATA",176.112,21053,1)
+562725
+"DATA",176.112,21054,0)
+4027276^FOLLITROPIN ALFA 75UNT/VIL INJ
+"DATA",176.112,21054,1)
+562724
+"DATA",176.112,21055,0)
+4013153^FOLLITROPIN ALFA 75UNT/AMP INJ
+"DATA",176.112,21055,1)
+562724
+"DATA",176.112,21056,0)
+4014327^ROPINIROLE HCL 4MG TAB
+"DATA",176.112,21056,1)
+562704
+"DATA",176.112,21057,0)
+4015418^NEOMYCIN 3.5MG/POLYMYXIN 10000UNT/PRAMOXINE 10MG CREAM,TOP
+"DATA",176.112,21057,1)
+562699
+"DATA",176.112,21058,0)
+4005842^SALICYLIC ACID 2% SOAP,TOP
+"DATA",176.112,21058,1)
+562600
+"DATA",176.112,21059,0)
+4000629^ATROPINE SO4 1% SOLN,OPH
+"DATA",176.112,21059,1)
+562565
+"DATA",176.112,21060,0)
+4016259^DALTEPARIN NA 25,000UNT/ML INJ
+"DATA",176.112,21060,1)
+562550
+"DATA",176.112,21061,0)
+4004318^IOHEXOL 647.1MG/ML INJ
+"DATA",176.112,21061,1)
+562546
+"DATA",176.112,21062,0)
+4004317^IOHEXOL 517.7MG/ML INJ
+"DATA",176.112,21062,1)
+562545
+"DATA",176.112,21063,0)
+4004316^IOHEXOL 388.3MG/ML INJ
+"DATA",176.112,21063,1)
+562544
+"DATA",176.112,21064,0)
+4004320^IOHEXOL 302MG/ML INJ
+"DATA",176.112,21064,1)
+562543
+"DATA",176.112,21065,0)
+4009281^ISRADIPINE 5MG TAB,SA
+"DATA",176.112,21065,1)
+562520
+"DATA",176.112,21066,0)
+4009282^ISRADIPINE 10MG TAB,SA
+"DATA",176.112,21066,1)
+562518
+"DATA",176.112,21067,0)
+4004682^AMOXICILLIN TRIHYDRATE 875MG/CLAVULANATE K 125MG TAB
+"DATA",176.112,21067,1)
+562508
+"DATA",176.112,21068,0)
+4015793^AMOXICILLIN TRIHYDRATE 875MG/CLAVULANATE K 125MG TAB,UD
+"DATA",176.112,21068,1)
+562508
+"DATA",176.112,21069,0)
+4012887^EPOPROSTENOL NA 1.5MG/VIL INJ
+"DATA",176.112,21069,1)
+562502
+"DATA",176.112,21070,0)
+4012886^EPOPROSTENOL NA 0.5MG/VIL INJ
+"DATA",176.112,21070,1)
+562501
+"DATA",176.112,21071,0)
+4001163^BACITRACIN 50000UNT/VIL INJ
+"DATA",176.112,21071,1)
+562411
+"DATA",176.112,21072,0)
+4003032^PREDNISOLONE ACETATE 0.12% SUSP,OPH
+"DATA",176.112,21072,1)
+562379
+"DATA",176.112,21073,0)
+4012114^DESFLURANE SOLN,INHL
+"DATA",176.112,21073,1)
+562366
+"DATA",176.112,21074,0)
+4007489^DIMETHYL SULFOXIDE 50% SOLN,URH
+"DATA",176.112,21074,1)
+562359
+"DATA",176.112,21075,0)
+4001946^BENDROFLUMETHIAZIDE 4MG/RAUWOLFIA SERPENTINA 50MG TAB
+"DATA",176.112,21075,1)
+562344
+"DATA",176.112,21076,0)
+4001543^DIATRIZOATE NA 50% INJ
+"DATA",176.112,21076,1)
+562332
+"DATA",176.112,21077,0)
+4001535^DIATRIZOATE MEGLUMINE 60% INJ
+"DATA",176.112,21077,1)
+562324
+"DATA",176.112,21078,0)
+4001553^DIATRIZOATE MEGLUMINE 60% SOLN
+"DATA",176.112,21078,1)
+562324
+"DATA",176.112,21079,0)
+4001539^DIATRIZOATE MEGLUMINE 30% INJ
+"DATA",176.112,21079,1)
+562320
+"DATA",176.112,21080,0)
+4001552^DIATRIZOATE MEGLUMINE 30% SOLN,URH
+"DATA",176.112,21080,1)
+562320
+"DATA",176.112,21081,0)
+4001532^DIATRIZOATE MEGLUMINE 30% SOLN
+"DATA",176.112,21081,1)
+562320
+"DATA",176.112,21082,0)
+4001538^DIATRIZOATE MEGLUMINE 30%/EDETATE DISODIUM 0.4MG INJ
+"DATA",176.112,21082,1)
+562320
+"DATA",176.112,21083,0)
+4006235^PEMOLINE 18.75MG TAB
+"DATA",176.112,21083,1)
+562319
+"DATA",176.112,21084,0)
+4017170^HC 0.5%/N-MYCIN 3.5MG/POLYMYX 10000UNIT/GM CREAM,TOP
+"DATA",176.112,21084,1)
+562301
+"DATA",176.112,21085,0)
+4002008^IOPAMIDOL 612MG/ML INJ
+"DATA",176.112,21085,1)
+562285
+"DATA",176.112,21086,0)
+4002012^IOPAMIDOL 410MG/ML INJ
+"DATA",176.112,21086,1)
+562284
+"DATA",176.112,21087,0)
+4002010^IOPAMIDOL 408MG/ML INJ
+"DATA",176.112,21087,1)
+562284
+"DATA",176.112,21088,0)
+4005398^GUAIFENESIN 200MG/PSEUDOEPHEDRINE 60MG CAP,SA
+"DATA",176.112,21088,1)
+562274
+"DATA",176.112,21089,0)
+4007054^CLOBETASOL PROPIONATE 0.05% SOLN,TOP
+"DATA",176.112,21089,1)
+562272
+"DATA",176.112,21090,0)
+4004668^AMOXICILLIN TRIHYDRATE 125MG/CLAVULANATE K 31.25MG TAB,CHEWABLE
+"DATA",176.112,21090,1)
+562253
+"DATA",176.112,21091,0)
+4004670^AMOXICILLIN TRIHYDRATE 250MG/CLAVULANATE K 125MG TAB
+"DATA",176.112,21091,1)
+562251
+"DATA",176.112,21092,0)
+4004677^AMOXICILLIN 250MG/CLAVULANATE K 125MG TAB
+"DATA",176.112,21092,1)
+562251
+"DATA",176.112,21093,0)
+4006577^INTERFERON ALFA-2B,RECOMBINANT 18 MILLION UNT/VIL INJ,PWDR
+"DATA",176.112,21093,1)
+562166
+"DATA",176.112,21094,0)
+4006574^INTERFERON ALFA-2B,RECOMBINANT 18 MILLION UNT/VIL INJ
+"DATA",176.112,21094,1)
+562166
+"DATA",176.112,21095,0)
+4012938^IOVERSOL 350MG/ML INJ
+"DATA",176.112,21095,1)
+562153
+"DATA",176.112,21096,0)
+4012934^IOVERSOL 320MG/ML INJ
+"DATA",176.112,21096,1)
+562152
+"DATA",176.112,21097,0)
+4012937^IOVERSOL 300MG/ML INJ
+"DATA",176.112,21097,1)
+562151
+"DATA",176.112,21098,0)
+4012935^IOVERSOL 240MG/ML INJ
+"DATA",176.112,21098,1)
+562150
+"DATA",176.112,21099,0)
+4012936^IOVERSOL 160MG/ML INJ
+"DATA",176.112,21099,1)
+562149
+"DATA",176.112,21100,0)
+4012728^DALTEPARIN NA 10000 UNT/ML INJ
+"DATA",176.112,21100,1)
+562130
+"DATA",176.112,21101,0)
+4004911^STREPTOKINASE 600000UNT/VIL INJ
+"DATA",176.112,21101,1)
+562122
+"DATA",176.112,21102,0)
+4009330^GADOPENTETATE DIMEGLUMINE 469.01MG/ML INJ,SOLN
+"DATA",176.112,21102,1)
+562120
+"DATA",176.112,21103,0)
+4012796^IOPROMIDE 370mgI/ml INJ
+"DATA",176.112,21103,1)
+562117
+"DATA",176.112,21104,0)
+4012795^IOPROMIDE 300mgI/ml INJ
+"DATA",176.112,21104,1)
+562116
+"DATA",176.112,21105,0)
+4012794^IOPROMIDE 240mgI/ml INJ
+"DATA",176.112,21105,1)
+562115
+"DATA",176.112,21106,0)
+4012793^IOPROMIDE 150mgI/ml INJ
+"DATA",176.112,21106,1)
+562114
+"DATA",176.112,21107,0)
+4004348^IOPANOIC ACID 500MG TAB
+"DATA",176.112,21107,1)
+562101
+"DATA",176.112,21108,0)
+4007050^CLOBETASOL PROPIONATE 0.05% CREAM,TOP
+"DATA",176.112,21108,1)
+562032
+"DATA",176.112,21109,0)
+4025051^CLOBETASOL PROPIONATE 0.05% EMOLLIENT CREAM,TOP
+"DATA",176.112,21109,1)
+562032
+"DATA",176.112,21110,0)
+4003011^MEASLES VIRUS VACCINE,LIVE ATTENUATED INJ
+"DATA",176.112,21110,1)
+547240
+"DATA",176.112,21111,0)
+4013329^JAPANESE ENCEPHALITIS VIRUS VACCINE
+"DATA",176.112,21111,1)
+547236
+"DATA",176.112,21112,0)
+4004726^AMYLASE 70000UNT/LIPASE 16800UNT/PROTEASE 70000UNT/0.7GM PWDR
+"DATA",176.112,21112,1)
+546582
+"DATA",176.112,21113,0)
+4027792^APAP 325MG/CAFN 50MG/PHENYLTOLOX 20MG/SALICYLAMIDE 250MG CAP
+"DATA",176.112,21113,1)
+546393^^^APAP 325/CAFF 50/P-TLOX 20/SAL 250MG CAP^Y
+"DATA",176.112,21114,0)
+4006573^INTERFERON ALFA-2B,RECOMBINANT 10 MILLION UNT/VIL INJ
+"DATA",176.112,21114,1)
+545289
+"DATA",176.112,21115,0)
+4016596^INTERFERON ALFA-2B,RECOMBINANT 10 MILLION UNT/VIL INJ,PWDR
+"DATA",176.112,21115,1)
+545289
+"DATA",176.112,21116,0)
+4009400^ANTIHEMOPHILIC FACTOR,RECOMBINANT 100UNT/ML INJ
+"DATA",176.112,21116,1)
+545162
+"DATA",176.112,21117,0)
+4027403^LEVOFLOXACIN 1.5% SOLN,OPH
+"DATA",176.112,21117,1)
+545118^^^LEVOFLOXACIN 1.5% OPH SOLN^Y
+"DATA",176.112,21118,0)
+4003487^COLESTIPOL HCL 7.5GM/PKT GRANULES,FLAVORED
+"DATA",176.112,21118,1)
+544540
+"DATA",176.112,21119,0)
+4003485^COLESTIPOL HCL 5GM/PKT GRANULES
+"DATA",176.112,21119,1)
+544540
+"DATA",176.112,21120,0)
+4006365^DESMOPRESSIN ACETATE 150MCG/SPRAY SOLN,NASAL SPRAY
+"DATA",176.112,21120,1)
+543985
+"DATA",176.112,21121,0)
+4026133^LIDOCAINE 2.5%/PRILOCAINE 2.5% GEL,DENT
+"DATA",176.112,21121,1)
+543925
+"DATA",176.112,21122,0)
+4001503^NYSTATIN 100000UNT/GM CREAM,TOP
+"DATA",176.112,21122,1)
+543546
+"DATA",176.112,21123,0)
+4001744^NYSTATIN 100000UNT/GM/TRIAMCINOLONE 0.1% CREAM,TOP
+"DATA",176.112,21123,1)
+543512
+"DATA",176.112,21124,0)
+4005832^AMMONIUM LACTATE 12% CREAM,TOP
+"DATA",176.112,21124,1)
+543460
+"DATA",176.112,21125,0)
+4004290^PHENYLEPHRINE HCL 2.5% SOLN,OPH
+"DATA",176.112,21125,1)
+542674
+"DATA",176.112,21126,0)
+4007812^OXYGEN 100% GAS
+"DATA",176.112,21126,1)
+542304
+"DATA",176.112,21127,0)
+4024681^OMEPRAZOLE 40MG/PKT PWDR,ORAL
+"DATA",176.112,21127,1)
+542186
+"DATA",176.112,21128,0)
+4024554^OMEPRAZOLE 20MG/PKT PWDR,ORAL
+"DATA",176.112,21128,1)
+542177
+"DATA",176.112,21129,0)
+4026162^POLYETHYLENE GLYCOL 3350 17GM/PKT PWDR,ORAL
+"DATA",176.112,21129,1)
+542075
+"DATA",176.112,21130,0)
+4006924^POTASSIUM PHOSPHATE 305MG/SODIUM PHOSPHATE 700MG TAB
+"DATA",176.112,21130,1)
+541956
+"DATA",176.112,21131,0)
+4007331^AMPHETAMINE SO4 10MG TAB
+"DATA",176.112,21131,1)
+541892
+"DATA",176.112,21132,0)
+4006753^AMPHETAMINE 5MG/DEXTROAMPHETAMINE 5MG TAB
+"DATA",176.112,21132,1)
+541892
+"DATA",176.112,21133,0)
+4013317^AMPHETAMINE 2.5MG/DEXTROAMPHETAMINE 2.5MG TAB
+"DATA",176.112,21133,1)
+541878
+"DATA",176.112,21134,0)
+4025614^METFORMIN HCL 1000MG TAB,SA
+"DATA",176.112,21134,1)
+541765
+"DATA",176.112,21135,0)
+4009033^NAFARELIN ACETATE 2MG/ML SOLN,NASAL
+"DATA",176.112,21135,1)
+541535
+"DATA",176.112,21136,0)
+4014848^AMPHETAMINE 15MG/DEXTROAMPHETAMINE 15MG TAB
+"DATA",176.112,21136,1)
+541363
+"DATA",176.112,21137,0)
+4004045^HYDROCORTISONE ACETATE 2.5%/PRAMOXINE HCL 1% CREAM,RTL
+"DATA",176.112,21137,1)
+541003
+"DATA",176.112,21138,0)
+4003004^WATER FOR INJECTION
+"DATA",176.112,21138,1)
+540930
+"DATA",176.112,21139,0)
+4024709^NIFEDIPINE (EVQ-CC) 60MG TAB,SA,UD
+"DATA",176.112,21139,1)
+491078
+"DATA",176.112,21140,0)
+4024714^NIFEDIPINE (EVQ-XL) 60MG TAB,SA
+"DATA",176.112,21140,1)
+491078
+"DATA",176.112,21141,0)
+4024712^NIFEDIPINE (EVQ-CC) 60MG TAB,SA
+"DATA",176.112,21141,1)
+491078
+"DATA",176.112,21142,0)
+4024718^NIFEDIPINE (EVQ-XL) 60MG TAB,SA,UD
+"DATA",176.112,21142,1)
+491078
+"DATA",176.112,21143,0)
+4009157^NAFTIFINE HCL 1% GEL
+"DATA",176.112,21143,1)
+487272
+"DATA",176.112,21144,0)
+4004893^CICLOPIROX OLAMINE 1% CREAM,TOP
+"DATA",176.112,21144,1)
+487269
+"DATA",176.112,21145,0)
+4000960^SILVER NITRATE 10% OINT
+"DATA",176.112,21145,1)
+487261
+"DATA",176.112,21146,0)
+4026662^METHYLPHENIDATE HCL 5MG TAB,CHEWABLE
+"DATA",176.112,21146,1)
+487257
+"DATA",176.112,21147,0)
+4001587^ERYTHROMYCIN ESTOLATE 100MG/ML DROPS,ORAL
+"DATA",176.112,21147,1)
+487129
+"DATA",176.112,21148,0)
+4024566^ILOPROST 10MCG/ML INHL,ORAL,2ML
+"DATA",176.112,21148,1)
+487056
+"DATA",176.112,21149,0)
+4026130^ILOPROST 10MCG/ML INHL,ORAL,1ML
+"DATA",176.112,21149,1)
+487056
+"DATA",176.112,21150,0)
+4008531^PSYLLIUM HYDROPHILIC MUCILLOID 4.75GM/5GM PWDR,ORAL
+"DATA",176.112,21150,1)
+486997
+"DATA",176.112,21151,0)
+4001558^ERYTHROMYCIN ESTOLATE 125MG/5ML SUSP
+"DATA",176.112,21151,1)
+486960
+"DATA",176.112,21152,0)
+4001578^ERYTHROMYCIN ESTOLATE 250MG CAP
+"DATA",176.112,21152,1)
+486955
+"DATA",176.112,21153,0)
+4001586^ERYTHROMYCIN ESTOLATE 500MG TAB
+"DATA",176.112,21153,1)
+486912
+"DATA",176.112,21154,0)
+4007434^GENTIAN VIOLET 5MG TAMPON
+"DATA",176.112,21154,1)
+486848
+"DATA",176.112,21155,0)
+4017210^HYALURONIDASE 6200 UNIT/VIL INJ
+"DATA",176.112,21155,1)
+486753
+"DATA",176.112,21156,0)
+4001669^ESTRADIOL 0.1MG/24HRS PATCH
+"DATA",176.112,21156,1)
+486624
+"DATA",176.112,21157,0)
+4001682^ESTRADIOL 0.075MG/24HR PATCH
+"DATA",176.112,21157,1)
+486623
+"DATA",176.112,21158,0)
+4003836^CTM 0.5MG/P-EPHRINE 1.2MG/P-PROPANOL 5MG/P-TOLOXAMINE 2MG/ML GTT
+"DATA",176.112,21158,1)
+486574
+"DATA",176.112,21159,0)
+4010225^NA CL 4.9MG/NA BIPHOSPHATE 4MG/NA PHOSPHATE 4.5MG/ML SOLN,OPH
+"DATA",176.112,21159,1)
+486541
+"DATA",176.112,21160,0)
+4007314^HYDROCODONE 1.7MG/GG 100MG/P-PROPANOL 25MG/SALICYLAMIDE 300MG TB
+"DATA",176.112,21160,1)
+486528
+"DATA",176.112,21161,0)
+4025636^SODIUM CHLORIDE 0.9% SOLN,IRRG,30ML
+"DATA",176.112,21161,1)
+486515
+"DATA",176.112,21162,0)
+4017175^SODIUM CHLORIDE 0.9% SOLN,IRRG,SPRAY
+"DATA",176.112,21162,1)
+486515
+"DATA",176.112,21163,0)
+4017154^SODIUM CHLORIDE 0.9% SOLN,IRRG,75ML
+"DATA",176.112,21163,1)
+486515
+"DATA",176.112,21164,0)
+4001075^SODIUM CHLORIDE 0.9% SOLN,IRRG
+"DATA",176.112,21164,1)
+486515
+"DATA",176.112,21165,0)
+4024556^PALIFERMIN 6.25MG/VIL INJ
+"DATA",176.112,21165,1)
+486510
+"DATA",176.112,21166,0)
+4024620^PRAMLINTIDE ACETATE 0.6MG/ML INJ,SOLN,5ML
+"DATA",176.112,21166,1)
+486506
+"DATA",176.112,21167,0)
+4026963^PRAMLINTIDE ACETATE 600MCG/ML INJ,SOLN,5ML
+"DATA",176.112,21167,1)
+486506
+"DATA",176.112,21168,0)
+4025127^ESOMEPRAZOLE NA 40MG/VIL INJ
+"DATA",176.112,21168,1)
+486501
+"DATA",176.112,21169,0)
+4025128^ESOMEPRAZOLE NA 20MG/VIL INJ
+"DATA",176.112,21169,1)
+486499
+"DATA",176.112,21170,0)
+4024565^CLOFARABINE 1MG/ML INJ
+"DATA",176.112,21170,1)
+486419
+"DATA",176.112,21171,0)
+4015033^ORTHOPHTHALALDEHYDE 0.55% SOLN
+"DATA",176.112,21171,1)
+486377
+"DATA",176.112,21172,0)
+4004773^FLUNISOLIDE 0.25MG/ML SOLN,NASAL
+"DATA",176.112,21172,1)
+486340
+"DATA",176.112,21173,0)
+4009950^DIDANOSINE 83.3MG/5ML SOLN,ORAL
+"DATA",176.112,21173,1)
+486330
+"DATA",176.112,21174,0)
+4007300^STANNOUS FLUORIDE 4% LIQUID,DENT
+"DATA",176.112,21174,1)
+486249
+"DATA",176.112,21175,0)
+4007293^STANNOUS FLUORIDE 1.64% LIQUID,DENT
+"DATA",176.112,21175,1)
+486247
+"DATA",176.112,21176,0)
+4009370^MINERAL OIL 42.5%/PETROLATUM 55% OINT,OPH
+"DATA",176.112,21176,1)
+486188
+"DATA",176.112,21177,0)
+4009363^MINERAL OIL 42.5%/PETROLATUM 55.5% OINT,OPH
+"DATA",176.112,21177,1)
+486188
+"DATA",176.112,21178,0)
+4009364^MINERAL OIL 41.5%/PETROLATUM 55% OINT,OPH
+"DATA",176.112,21178,1)
+486185
+"DATA",176.112,21179,0)
+4009369^MINERAL OIL 41.5%/PETROLATUM 56.8% OINT,OPH
+"DATA",176.112,21179,1)
+486185
+"DATA",176.112,21180,0)
+4008555^LANOLIN 2%/MINERAL OIL 15%/PETROLATUM 83% OINT,OPH
+"DATA",176.112,21180,1)
+486182
+"DATA",176.112,21181,0)
+4024853^HYALURONIDASE 200UNT/ML INJ
+"DATA",176.112,21181,1)
+486166
+"DATA",176.112,21182,0)
+4001255^NITROGLYCERIN 9.6MG/24HRS PATCH
+"DATA",176.112,21182,1)
+486152
+"DATA",176.112,21183,0)
+4001254^NITROGLYCERIN 4.8MG/24HRS PATCH
+"DATA",176.112,21183,1)
+486148
+"DATA",176.112,21184,0)
+4001256^NITROGLYCERIN 14.4MG/24HRS PATCH
+"DATA",176.112,21184,1)
+486146
+"DATA",176.112,21185,0)
+4025796^CHLOROPHYLL 0.5%/PAPAIN/UREA 10% EMULSION SPRAY,TOP
+"DATA",176.112,21185,1)
+486139
+"DATA",176.112,21186,0)
+4016948^CHLOROPHYLL 0.5%/PAPAIN 10%/UREA 10% SPRAY,TOP
+"DATA",176.112,21186,1)
+486139
+"DATA",176.112,21187,0)
+4024557^ZICONOTIDE 25MCG/ML (PF) INJ,INTRATHECAL,20ML
+"DATA",176.112,21187,1)
+486133
+"DATA",176.112,21188,0)
+4017305^BENZOYL PEROXIDE 10% (WATER BASED) GEL,TOP
+"DATA",176.112,21188,1)
+486131
+"DATA",176.112,21189,0)
+4005299^BENZOYL PEROXIDE 10% GEL,TOP
+"DATA",176.112,21189,1)
+486131
+"DATA",176.112,21190,0)
+4024559^ZICONOTIDE 100MCG/ML (PF) INJ,INTRATHECAL,2ML
+"DATA",176.112,21190,1)
+486130
+"DATA",176.112,21191,0)
+4024558^ZICONOTIDE 100MCG/ML (PF) INJ,INTRATHECAL,1ML
+"DATA",176.112,21191,1)
+486130
+"DATA",176.112,21192,0)
+4024560^ZICONOTIDE 100MCG/ML (PF) INJ,INTRATHECAL,5ML
+"DATA",176.112,21192,1)
+486130
+"DATA",176.112,21193,0)
+4005780^ETHINYL ESTRADIOL 0.05MG/FE FUMARATE 75MG/NORETHINDRONE 2.5MG TB
+"DATA",176.112,21193,1)
+486123
+"DATA",176.112,21194,0)
+4009559^B-TRACIN 500UNT/N-MYCIN 5MG/POLYMYX 400UNT/GM OINT,TOP
+"DATA",176.112,21194,1)
+486118
+"DATA",176.112,21195,0)
+4009544^PHENOL 1.4% LIQUID,ORAL TOP
+"DATA",176.112,21195,1)
+486074
+"DATA",176.112,21196,0)
+4017388^PAPAIN 830000 UNIT/UREA 10% SPRAY,TOP
+"DATA",176.112,21196,1)
+486069
+"DATA",176.112,21197,0)
+4017384^CITRIC ACID 300MG/SODIUM CITRATE 500MG/5ML SOLN,ORAL
+"DATA",176.112,21197,1)
+486042
+"DATA",176.112,21198,0)
+4004849^CHYMOTRYPSIN 0.02% SOLN,OPH
+"DATA",176.112,21198,1)
+486019
+"DATA",176.112,21199,0)
+4010348^CHLOROTHEN 0.06%/METHAPYRILENE HCL 0.22%/PYRILAMINE 0.22% LOTION
+"DATA",176.112,21199,1)
+486017
+"DATA",176.112,21200,0)
+4009916^CA CARB 32MG/MG CARB 138MG/NA ALGINATE 137MG/5ML LIQUID
+"DATA",176.112,21200,1)
+485975
+"DATA",176.112,21201,0)
+4017064^OLANZAPINE 10MG/VIL INJ
+"DATA",176.112,21201,1)
+485968
+"DATA",176.112,21202,0)
+4013361^INTERFERON BETA-1A,RECOMBINANT 33 MCG/VIL INJ
+"DATA",176.112,21202,1)
+485961
+"DATA",176.112,21203,0)
+4007779^CARAMIPHEN 20MG/CTM 8MG/ISOPROPAMIDE 2.5MG/P-PROPANOL 50MG CP,SA
+"DATA",176.112,21203,1)
+485905
+"DATA",176.112,21204,0)
+4017315^APAP 500MG/DM 10MG/DOXYLAMINE 6.25MG/PSEUDEFED 30MG/15ML LIQUID
+"DATA",176.112,21204,1)
+485770
+"DATA",176.112,21205,0)
+4017314^APAP 325MG/DM 10MG/PSEUDEFED 10MG/15ML LIQUID
+"DATA",176.112,21205,1)
+485760
+"DATA",176.112,21206,0)
+4005050^SUTILAINS 82000UNT/GM OINT,TOP
+"DATA",176.112,21206,1)
+485731
+"DATA",176.112,21207,0)
+4016856^PHENOL 1.4% SPRAY,ORAL TOP
+"DATA",176.112,21207,1)
+485723
+"DATA",176.112,21208,0)
+4024756^PROPOXYPHENE N 100MG/ACETAMINOPHEN 325MG TAB
+"DATA",176.112,21208,1)
+485702
+"DATA",176.112,21209,0)
+4024674^FLUOCINONIDE 0.1% CREAM,TOP
+"DATA",176.112,21209,1)
+485647
+"DATA",176.112,21210,0)
+4010482^GLYCERIN 25%/SALICYLIC ACID 0.1% CREAM,TOP
+"DATA",176.112,21210,1)
+485638
+"DATA",176.112,21211,0)
+4024680^LOTEPREDNOL ETABONATE 0.5%/TOBRAMYCIN 0.3% SUSP,OPTH
+"DATA",176.112,21211,1)
+485595
+"DATA",176.112,21212,0)
+4005551^TOBRAMYCIN SO4 30MG/ML INJ
+"DATA",176.112,21212,1)
+485575
+"DATA",176.112,21213,0)
+4024634^ENTECAVIR 0.25MG/5ML SOLN,ORAL
+"DATA",176.112,21213,1)
+485536
+"DATA",176.112,21214,0)
+4024796^ALEMTUZUMAB 30MG/ML INJ
+"DATA",176.112,21214,1)
+485516
+"DATA",176.112,21215,0)
+4024743^ARIPIPRAZOLE 1MG/ML SOLN,ORAL
+"DATA",176.112,21215,1)
+485496
+"DATA",176.112,21216,0)
+4025744^TEMAZEPAM 22.5MG CAP
+"DATA",176.112,21216,1)
+485489
+"DATA",176.112,21217,0)
+4024479^TIZANIDINE HCL 2MG CAP,ORAL
+"DATA",176.112,21217,1)
+485486
+"DATA",176.112,21218,0)
+4024480^TIZANIDINE HCL 4MG CAP,ORAL
+"DATA",176.112,21218,1)
+485485
+"DATA",176.112,21219,0)
+4024481^TIZANIDINE HCL 6MG CAP,ORAL
+"DATA",176.112,21219,1)
+485484
+"DATA",176.112,21220,0)
+4024868^FEXOFENADINE HCL 180MG/PSEUOEPHEDRINE HCL 240MG 24HR TAB,SA
+"DATA",176.112,21220,1)
+485476
+"DATA",176.112,21221,0)
+4025030^HYDROCHLOROTHIAZIDE 25MG/IRBESARTAN 300MG TAB
+"DATA",176.112,21221,1)
+485471
+"DATA",176.112,21222,0)
+4024582^SAQUINAVIR MESYLATE 500MG TAB
+"DATA",176.112,21222,1)
+485468
+"DATA",176.112,21223,0)
+4024569^ESZOPICLONE 3MG TAB
+"DATA",176.112,21223,1)
+485465
+"DATA",176.112,21224,0)
+4024568^ESZOPICLONE 2MG TAB
+"DATA",176.112,21224,1)
+485442
+"DATA",176.112,21225,0)
+4024567^ESZOPICLONE 1MG TAB
+"DATA",176.112,21225,1)
+485440
+"DATA",176.112,21226,0)
+4024633^ENTECAVIR 1MG TAB
+"DATA",176.112,21226,1)
+485436
+"DATA",176.112,21227,0)
+4024632^ENTECAVIR 0.5MG TAB
+"DATA",176.112,21227,1)
+485434
+"DATA",176.112,21228,0)
+4024563^DARIFENACIN 7.5MG TAB,SA
+"DATA",176.112,21228,1)
+485423
+"DATA",176.112,21229,0)
+4024564^DARIFENACIN 15MG TAB,SA
+"DATA",176.112,21229,1)
+485421
+"DATA",176.112,21230,0)
+4027018^ALPRAZOLAM 2MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,21230,1)
+485416
+"DATA",176.112,21231,0)
+4027015^ALPRAZOLAM 0.5MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,21231,1)
+485415
+"DATA",176.112,21232,0)
+4027017^ALPRAZOLAM 1MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,21232,1)
+485414
+"DATA",176.112,21233,0)
+4027016^ALPRAZOLAM 0.25MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,21233,1)
+485413
+"DATA",176.112,21234,0)
+4017272^PENTETATE ZINC TRISODIUM 200MG/ML INJ
+"DATA",176.112,21234,1)
+485376
+"DATA",176.112,21235,0)
+4013734^TRICHOPHYTON MENTAGROPHYTES 1:500 INJ
+"DATA",176.112,21235,1)
+485356
+"DATA",176.112,21236,0)
+4013022^TRICOPHYTON MENTAGROPHYTES 1:500 INJ
+"DATA",176.112,21236,1)
+485356
+"DATA",176.112,21237,0)
+4017227^TRICHOPHYTON MENTAGROPHYTES 1:200 INJ
+"DATA",176.112,21237,1)
+485354
+"DATA",176.112,21238,0)
+4005436^HC 1%/N-MYCIN 5MG/POLYMYX 10000UNT/ML SOLN,OPH
+"DATA",176.112,21238,1)
+485348
+"DATA",176.112,21239,0)
+4017288^ALUMINUM CHLORIDE 12.5% SOLN,TOP
+"DATA",176.112,21239,1)
+485338
+"DATA",176.112,21240,0)
+4017280^BENZOCAINE 10MG/MENTHOL 2.6MG LOZENGE
+"DATA",176.112,21240,1)
+485294
+"DATA",176.112,21241,0)
+4009546^PHENOL 29MG LOZENGE
+"DATA",176.112,21241,1)
+485291
+"DATA",176.112,21242,0)
+4017284^MENTHOL 5.4MG LOZENGE
+"DATA",176.112,21242,1)
+485287
+"DATA",176.112,21243,0)
+4013710^FENTANYL CITRATE 800MG LOZENGE
+"DATA",176.112,21243,1)
+485284
+"DATA",176.112,21244,0)
+4013709^FENTANYL CITRATE 600MG LOZENGE
+"DATA",176.112,21244,1)
+485282
+"DATA",176.112,21245,0)
+4013708^FENTANYL CITRATE 400MG LOZENGE
+"DATA",176.112,21245,1)
+485276
+"DATA",176.112,21246,0)
+4013707^FENTANYL CITRATE 200MG LOZENGE
+"DATA",176.112,21246,1)
+485274
+"DATA",176.112,21247,0)
+4013712^FENTANYL CITRATE 1600MG LOZENGE
+"DATA",176.112,21247,1)
+485272
+"DATA",176.112,21248,0)
+4013711^FENTANYL CITRATE 1200MG LOZENGE
+"DATA",176.112,21248,1)
+485270
+"DATA",176.112,21249,0)
+4027019^CETUXIMAB 2MG/ML INJ,100ML
+"DATA",176.112,21249,1)
+485255
+"DATA",176.112,21250,0)
+4017001^CETUXIMAB 2MG/ML INJ,50ML
+"DATA",176.112,21250,1)
+485255
+"DATA",176.112,21251,0)
+4017105^AZACITIDINE 100MG/VI INJ,SUSP
+"DATA",176.112,21251,1)
+485246
+"DATA",176.112,21252,0)
+4008069^ANTIRABIES SERUM,EQUINE 125UNT/ML INJ
+"DATA",176.112,21252,1)
+485237
+"DATA",176.112,21253,0)
+4017109^INSULIN,GLULISINE,HUMAN 100 UNIT/ML INJ
+"DATA",176.112,21253,1)
+485210
+"DATA",176.112,21254,0)
+4025746^INSULIN,GLULISINE,HUMAN 100 UNIT/ML INJ PEN 3ML
+"DATA",176.112,21254,1)
+485210
+"DATA",176.112,21255,0)
+4009331^INTERFERON GAMMA-1B 3 MILLION UNT/0.5ML INJ
+"DATA",176.112,21255,1)
+485193
+"DATA",176.112,21256,0)
+4010422^APAP 325MG/CAFN 32MG/CTM 2MG/P-PROPANOLAMINE 12.5MG TAB
+"DATA",176.112,21256,1)
+485167
+"DATA",176.112,21257,0)
+4009990^APAP 325MG/CAFN 30MG/P-PROPANOL 20MG/PYRILAMINE 12.5MG TAB
+"DATA",176.112,21257,1)
+485166
+"DATA",176.112,21258,0)
+4010197^APAP 325MG/CTM 1MG/DM 10MG/P-PROPANOL 12.5MG TAB
+"DATA",176.112,21258,1)
+485164
+"DATA",176.112,21259,0)
+4007016^APAP 500MG/CTM 2MG/P-PROPANOL 18.7MG TAB
+"DATA",176.112,21259,1)
+485162
+"DATA",176.112,21260,0)
+4009212^MAGNESIUM HYDROXIDE 405MG/5ML SUSP,ORAL
+"DATA",176.112,21260,1)
+485102
+"DATA",176.112,21261,0)
+4009215^MAGNESIUM HYDROXIDE 390MG/5ML SUSP,ORAL
+"DATA",176.112,21261,1)
+485100
+"DATA",176.112,21262,0)
+4016909^VANCOMYCIN HCL 500MG/6ML SUSP
+"DATA",176.112,21262,1)
+485094
+"DATA",176.112,21263,0)
+4002185^CHLORPROTHIXENE 100MG/5ML SUSP,ORAL
+"DATA",176.112,21263,1)
+485064
+"DATA",176.112,21264,0)
+4016946^DIPHENHYDRAMINE 7.5/PHENYLEPHRINE 25MG/5ML SUSP,LA
+"DATA",176.112,21264,1)
+485063
+"DATA",176.112,21265,0)
+4016947^DIPHENHYDRAMINE 7.5MG/PHENYLEPHRINE 25MG/5ML SUSP,SA
+"DATA",176.112,21265,1)
+485063
+"DATA",176.112,21266,0)
+4007800^BITOLTEROL MESYLATE 0.8% AEROSOL,INHL
+"DATA",176.112,21266,1)
+485046
+"DATA",176.112,21267,0)
+4016887^TIOTROPIUM 18MCG CAP,INHL,30
+"DATA",176.112,21267,1)
+485032
+"DATA",176.112,21268,0)
+4016886^TIOTROPIUM 18MCG CAP,INHL,6
+"DATA",176.112,21268,1)
+485032
+"DATA",176.112,21269,0)
+4026569^TIOTROPIUM 18MCG CAP,INHL,5
+"DATA",176.112,21269,1)
+485032
+"DATA",176.112,21270,0)
+4026570^TIOTROPIUM 18MCG CAP,INHL,90
+"DATA",176.112,21270,1)
+485032
+"DATA",176.112,21271,0)
+4016999^MYCOPHENOLIC ACID 360MG TAB,EC
+"DATA",176.112,21271,1)
+485023
+"DATA",176.112,21272,0)
+4016919^MORPHINE SO4 90MG CAP,SA
+"DATA",176.112,21272,1)
+485021
+"DATA",176.112,21273,0)
+4017000^MYCOPHENOLIC ACID 180MG TAB,EC
+"DATA",176.112,21273,1)
+485020
+"DATA",176.112,21274,0)
+4016336^MAGNESIUM OXIDE 362MG/PYRIDOXINE HCL 25MG TAB
+"DATA",176.112,21274,1)
+485003
+"DATA",176.112,21275,0)
+4002714^HYDROCHLOROTHIAZIDE 15MG/METHYLDOPA 50MG TAB
+"DATA",176.112,21275,1)
+485001
+"DATA",176.112,21276,0)
+4006970^GG 200MG/P-EPHRINE 5MG/P-PROPANOL 45MG TAB
+"DATA",176.112,21276,1)
+484980
+"DATA",176.112,21277,0)
+4013173^DICLOFENAC NA 50MG/MISOPROSTOL 200MG TAB
+"DATA",176.112,21277,1)
+484942
+"DATA",176.112,21278,0)
+4005631^DESIPRAMINE HCL 50MG TAB,EC
+"DATA",176.112,21278,1)
+484938
+"DATA",176.112,21279,0)
+4017345^CYANOCOBALAMIN 2MG/FOLIC ACID 2.5MG/PYRIDOXINE 25MG TAB
+"DATA",176.112,21279,1)
+484925
+"DATA",176.112,21280,0)
+4017396^CYANOCOBALAMIN 1MG/FOLIC ACID 0.4MG/PYRIDOXINE 5MG TAB,SUBLINGUAL
+"DATA",176.112,21280,1)
+484915
+"DATA",176.112,21281,0)
+4007303^CTM 6MG/P-EPHRINE 5MG/P-PROPANOL 40MG TAB
+"DATA",176.112,21281,1)
+484899
+"DATA",176.112,21282,0)
+4003832^CTM 5MG/P-EPHRINE 10MG/P-PROPANOL 40MG/P-TOLOXAMINE 10MG TAB
+"DATA",176.112,21282,1)
+484892
+"DATA",176.112,21283,0)
+4013174^DICLOFENAC NA 75MG/MISOPROSTOL 200MG TAB
+"DATA",176.112,21283,1)
+484889
+"DATA",176.112,21284,0)
+4003837^CTM 2.5MG/P-EPHRINE 5MG/P-PROPANOL 20MG/P-TOLOXAMINE 7.5MG TAB
+"DATA",176.112,21284,1)
+484887
+"DATA",176.112,21285,0)
+4007194^CODEINE 10MG/APAP 300MG/GG 100MG/P-PROPANOL 25MG TAB
+"DATA",176.112,21285,1)
+484873
+"DATA",176.112,21286,0)
+4004311^PROCAINE HCL 375MG CAP
+"DATA",176.112,21286,1)
+484850
+"DATA",176.112,21287,0)
+4016920^MORPHINE SO4 120MG CAP,SA
+"DATA",176.112,21287,1)
+484848
+"DATA",176.112,21288,0)
+4007738^CTM 2MG/P-EPHRINE 10MG/P-TOLOXAMINE 25MG TAB
+"DATA",176.112,21288,1)
+484843
+"DATA",176.112,21289,0)
+4006969^GG 200MG/P-EPHRINE 5MG/P-PROPANOL 45MG CAP,SA
+"DATA",176.112,21289,1)
+484838
+"DATA",176.112,21290,0)
+4006971^GG 200MG/P-EPHRINE 15MG/P-PROPANOL 45MG CAP
+"DATA",176.112,21290,1)
+484834
+"DATA",176.112,21291,0)
+4006968^GG 100MG/P-EPHRINE 25MG/P-PROPANOL 2.25MG CAP
+"DATA",176.112,21291,1)
+484833
+"DATA",176.112,21292,0)
+4014075^BENZOCAINE 20% SPRAY,ORAL
+"DATA",176.112,21292,1)
+484827
+"DATA",176.112,21293,0)
+4017279^BENZOCAINE 10MG/MENTHOL 2MG LOZENGE
+"DATA",176.112,21293,1)
+484826
+"DATA",176.112,21294,0)
+4013429^TELMISARTIN 80MG TAB
+"DATA",176.112,21294,1)
+484824
+"DATA",176.112,21295,0)
+4016744^VERDENAFIL HCL 10MG TAB
+"DATA",176.112,21295,1)
+484819
+"DATA",176.112,21296,0)
+4016884^TADALAFIL 10MG TAB
+"DATA",176.112,21296,1)
+484814
+"DATA",176.112,21297,0)
+4017404^SOLIFENACIN SUCCINATE 10MG TAB,UD
+"DATA",176.112,21297,1)
+484794
+"DATA",176.112,21298,0)
+4007017^APAP 325MG/CTM 2MG/P-PROPANOL 18.7MG TAB
+"DATA",176.112,21298,1)
+484726
+"DATA",176.112,21299,0)
+4008928^APAP 325MG/DM 10MG/P-PROPANOL 12.5MG TAB
+"DATA",176.112,21299,1)
+484716
+"DATA",176.112,21300,0)
+4007020^APAP 80MG/CTM 1MG/P-PROPANOL 12.5MG TAB
+"DATA",176.112,21300,1)
+484714
+"DATA",176.112,21301,0)
+4008318^ALUMINUM HYDROXIDE GEL 475MG CAP
+"DATA",176.112,21301,1)
+484684
+"DATA",176.112,21302,0)
+4008985^APAP 500MG/PSEUDEFED 30MG/TRIPROLIDINE 1.25MG CAP
+"DATA",176.112,21302,1)
+484681
+"DATA",176.112,21303,0)
+4010195^APAP 325MG/CTM 2MG/DM 10MG/P-PROPANOL 12.5MG CAP
+"DATA",176.112,21303,1)
+484679
+"DATA",176.112,21304,0)
+4010057^APAP 325MG/CINNAMEDRINE HCL 14.9MG/PAMABROM 14.9MG CAP
+"DATA",176.112,21304,1)
+484678
+"DATA",176.112,21305,0)
+4010002^APAP 200MG/ASA 230MG/P-PROPANOL 15MG CAP
+"DATA",176.112,21305,1)
+484671
+"DATA",176.112,21306,0)
+4008128^AMINOPHYLLINE 130MG/EPHEDRINE 25MG CAP
+"DATA",176.112,21306,1)
+484668
+"DATA",176.112,21307,0)
+4008931^ACETAMINOPHEN 80MG/PHENYLPROPANOLAMINE 3.125MG TAB,CHEW
+"DATA",176.112,21307,1)
+484658
+"DATA",176.112,21308,0)
+4006874^AMINOPHYLLINE 100MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,21308,1)
+484500
+"DATA",176.112,21309,0)
+4009863^ASPIRIN 81MG/PHENYLPROPANOLAMINE 3.125MG TAB
+"DATA",176.112,21309,1)
+484491
+"DATA",176.112,21310,0)
+4002528^CHLORPROMAZINE HCL 50MG TAB,EC
+"DATA",176.112,21310,1)
+484489
+"DATA",176.112,21311,0)
+4002527^CHLORPROMAZINE HCL 25MG TAB,EC
+"DATA",176.112,21311,1)
+484485
+"DATA",176.112,21312,0)
+4002530^CHLORPROMAZINE HCL 200MG TAB,EC
+"DATA",176.112,21312,1)
+484483
+"DATA",176.112,21313,0)
+4002526^CHLORPROMAZINE HCL 10MG TAB,EC
+"DATA",176.112,21313,1)
+484482
+"DATA",176.112,21314,0)
+4002529^CHLORPROMAZINE HCL 100MG TAB,EC
+"DATA",176.112,21314,1)
+484479
+"DATA",176.112,21315,0)
+4016688^ALFUZOSIN HCL 2.5 TAB,SA
+"DATA",176.112,21315,1)
+484466
+"DATA",176.112,21316,0)
+4016940^BUPROPION HCL 100MG 12HR TAB,SA
+"DATA",176.112,21316,1)
+484425
+"DATA",176.112,21317,0)
+4002202^BETA CAROTENE 1000UNT TAB
+"DATA",176.112,21317,1)
+484422
+"DATA",176.112,21318,0)
+4024723^IPRATROPIUM BR 17MCG/SPRAY AEROSOL,INHL
+"DATA",176.112,21318,1)
+484341
+"DATA",176.112,21319,0)
+4025120^INSULIN,DETEMIR,HUMAN 100 UNIT/ML INJ,FLEXPEN,3ML
+"DATA",176.112,21319,1)
+484322
+"DATA",176.112,21320,0)
+4025119^INSULIN,DETEMIR,HUMAN 100 UNIT/ML INJ
+"DATA",176.112,21320,1)
+484322
+"DATA",176.112,21321,0)
+4027075^PREGABALIN 75MG CAP,UD
+"DATA",176.112,21321,1)
+483450
+"DATA",176.112,21322,0)
+4024735^PREGABALIN 75MG CAP,ORAL
+"DATA",176.112,21322,1)
+483450
+"DATA",176.112,21323,0)
+4027074^PREGABALIN 50MG CAP,UD
+"DATA",176.112,21323,1)
+483448
+"DATA",176.112,21324,0)
+4024734^PREGABALIN 50MG CAP,ORAL
+"DATA",176.112,21324,1)
+483448
+"DATA",176.112,21325,0)
+4024732^PREGABALIN 200MG CAP,ORAL
+"DATA",176.112,21325,1)
+483446
+"DATA",176.112,21326,0)
+4024729^PREGABALIN 300MG CAP,ORAL
+"DATA",176.112,21326,1)
+483444
+"DATA",176.112,21327,0)
+4024736^PREGABALIN 25MG CAP,ORAL
+"DATA",176.112,21327,1)
+483442
+"DATA",176.112,21328,0)
+4024733^PREGABALIN 150MG CAP,ORAL
+"DATA",176.112,21328,1)
+483440
+"DATA",176.112,21329,0)
+4027077^PREGABALIN 150MG CAP,UD
+"DATA",176.112,21329,1)
+483440
+"DATA",176.112,21330,0)
+4027076^PREGABALIN 100MG CAP,UD
+"DATA",176.112,21330,1)
+483438
+"DATA",176.112,21331,0)
+4024731^PREGABALIN 100MG CAP,ORAL
+"DATA",176.112,21331,1)
+483438
+"DATA",176.112,21332,0)
+4024767^FENOFIBRATE 43MG CAP
+"DATA",176.112,21332,1)
+483427
+"DATA",176.112,21333,0)
+4024766^FENOFIBRATE 130MG CAP
+"DATA",176.112,21333,1)
+483425
+"DATA",176.112,21334,0)
+4003637^VERAPAMIL HCL 180MG TAB,SA
+"DATA",176.112,21334,1)
+483374
+"DATA",176.112,21335,0)
+4013987^VERAPAMIL HCL 180MG TAB,SA,UD
+"DATA",176.112,21335,1)
+483374
+"DATA",176.112,21336,0)
+4025340^ESTRADIOL ACETATE 0.9MG TAB
+"DATA",176.112,21336,1)
+483169
+"DATA",176.112,21337,0)
+4024753^HYDROMORPHONE HCL 32MG CAP,SA
+"DATA",176.112,21337,1)
+483105
+"DATA",176.112,21338,0)
+4024540^CARBIDOPA 10MG/LEVODOPA 100MG TAB,RAPID DISINTEGRATING
+"DATA",176.112,21338,1)
+483090
+"DATA",176.112,21339,0)
+4024874^DONEPEZIL HCL 5MG,TAB RAPID DISINTEGRATING
+"DATA",176.112,21339,1)
+483073
+"DATA",176.112,21340,0)
+4024875^DONEPEZIL HCL 10MG,TAB RAPID DISINTEGRATING
+"DATA",176.112,21340,1)
+483069
+"DATA",176.112,21341,0)
+4017249^PEG-400 0.4%/PROPYLENE GLYCOL 0.3% SOLN,OPH
+"DATA",176.112,21341,1)
+477589
+"DATA",176.112,21342,0)
+4017250^PEG-400 0.4%/PROPYLENE GLYCOL 0.3% SOLN,OPH,0.8ML
+"DATA",176.112,21342,1)
+477589
+"DATA",176.112,21343,0)
+4027418^PEG-400 0.4%/PROPYLENE GLYCOL 0.3% SOLN,OPH,0.4ML
+"DATA",176.112,21343,1)
+477589
+"DATA",176.112,21344,0)
+4027331^DEXTROMETHORPHAN 20MG/GUAIFENESIN 400MG TAB
+"DATA",176.112,21344,1)
+477566
+"DATA",176.112,21345,0)
+4017375^FENOFIBRATE,MICRONIZED 48MG TAB
+"DATA",176.112,21345,1)
+477562
+"DATA",176.112,21346,0)
+4024768^FENOFIBRATE 48MG TAB
+"DATA",176.112,21346,1)
+477562
+"DATA",176.112,21347,0)
+4017376^FENOFIBRATE,MICRONIZED 145MG TAB
+"DATA",176.112,21347,1)
+477560
+"DATA",176.112,21348,0)
+4024769^FENOFIBRATE 145MG TAB
+"DATA",176.112,21348,1)
+477560
+"DATA",176.112,21349,0)
+4026040^MORPHINE SO4 LIPOSOME 10MG/ML INJ,SUSP,1.5ML
+"DATA",176.112,21349,1)
+477499
+"DATA",176.112,21350,0)
+4017399^NATALIZUMAB 20MG/ML INJ,SOLN,15ML
+"DATA",176.112,21350,1)
+477484
+"DATA",176.112,21351,0)
+4025017^CLINDAMYCIN PO4 1% FOAM,TOP
+"DATA",176.112,21351,1)
+477451
+"DATA",176.112,21352,0)
+4024728^CHLORDIAZEPOXIDE HCL 5MG/METHSCOPOLAMINE NITRATE 2.5MG CAP,ORAL
+"DATA",176.112,21352,1)
+477449
+"DATA",176.112,21353,0)
+4016239^RISEDRONATE NA 35MG TAB
+"DATA",176.112,21353,1)
+477422
+"DATA",176.112,21354,0)
+4024883^LEVOFLOXACIN 125MG/5ML SOLN,ORAL
+"DATA",176.112,21354,1)
+477391
+"DATA",176.112,21355,0)
+4017403^SOLIFENACIN SUCCINATE 10MG TAB
+"DATA",176.112,21355,1)
+477372
+"DATA",176.112,21356,0)
+4017402^SOLIFENACIN SUCCINATE 5MG TAB,UD
+"DATA",176.112,21356,1)
+477367
+"DATA",176.112,21357,0)
+4017401^SOLIFENACIN SUCCINATE 5MG TAB
+"DATA",176.112,21357,1)
+477367
+"DATA",176.112,21358,0)
+4017409^LANTHANUM CARBONATE 500MG TAB,CHEWABLE
+"DATA",176.112,21358,1)
+477347
+"DATA",176.112,21359,0)
+4017408^LANTHANUM CARBONATE 250MG TAB,CHEWABLE
+"DATA",176.112,21359,1)
+477343
+"DATA",176.112,21360,0)
+4017405^ERLOTINIB 25MG TAB
+"DATA",176.112,21360,1)
+477324
+"DATA",176.112,21361,0)
+4017407^ERLOTINIB 150MG TAB
+"DATA",176.112,21361,1)
+477322
+"DATA",176.112,21362,0)
+4017406^ERLOTINIB 100MG TAB
+"DATA",176.112,21362,1)
+477317
+"DATA",176.112,21363,0)
+4024682^ACETAMINOPHEN 160MG TAB RAPID DISINTEGRATING
+"DATA",176.112,21363,1)
+477282
+"DATA",176.112,21364,0)
+4017301^LANSOPRAZOLE 30MG/VIL INJ
+"DATA",176.112,21364,1)
+477260
+"DATA",176.112,21365,0)
+4017103^TINIDAZOLE 250MG TAB
+"DATA",176.112,21365,1)
+477234
+"DATA",176.112,21366,0)
+4024541^UREA 50% GEL,TOP
+"DATA",176.112,21366,1)
+477225
+"DATA",176.112,21367,0)
+4016588^ZINC OXIDE 16% PASTE,TOP
+"DATA",176.112,21367,1)
+477174
+"DATA",176.112,21368,0)
+4017341^HYDROCHLOROTHIAZIDE 25MG/TELMISARTAN 80MG TAB
+"DATA",176.112,21368,1)
+477130
+"DATA",176.112,21369,0)
+4024779^UREA 35% LOTION,TOP
+"DATA",176.112,21369,1)
+477126
+"DATA",176.112,21370,0)
+4024526^SALICYLIC ACID 6% CREAM,TOP
+"DATA",176.112,21370,1)
+477031
+"DATA",176.112,21371,0)
+4027417^CHLORPHENIRAMINE 4MG/PSEUDOEPHEDRINE 30MG TAB,CHEWABLE
+"DATA",176.112,21371,1)
+477005
+"DATA",176.112,21372,0)
+4026132^LEVALBUTEROL HCL 2.5MG/ML SOLN,INHL,0.5ML
+"DATA",176.112,21372,1)
+476979
+"DATA",176.112,21373,0)
+4024774^MIRTAZAPINE 7.5MG TAB
+"DATA",176.112,21373,1)
+476809
+"DATA",176.112,21374,0)
+4002990^HYDROXYPROPYL CELLULOSE 5MG/UNT INSERT,CONT REL,OPH
+"DATA",176.112,21374,1)
+476707
+"DATA",176.112,21375,0)
+4017353^GABAPENTIN 400MG TAB
+"DATA",176.112,21375,1)
+476679
+"DATA",176.112,21376,0)
+4017352^GABAPENTIN 300MG TAB
+"DATA",176.112,21376,1)
+476677
+"DATA",176.112,21377,0)
+4017351^GABAPENTIN 100MG TAB
+"DATA",176.112,21377,1)
+476673
+"DATA",176.112,21378,0)
+4026983^CEFDINIR 250MG/5ML SUSP,ORAL
+"DATA",176.112,21378,1)
+476576
+"DATA",176.112,21379,0)
+4017222^EMTRICITABINE 200MG/TENOFOVIR DISOPROXIL FUMARATE 300MG TAB
+"DATA",176.112,21379,1)
+476556
+"DATA",176.112,21380,0)
+4027736^CALCIUM CARBONATE 675MG/MAGNESIUM HYDROXIDE 135MG TAB,CHEWABLE
+"DATA",176.112,21380,1)
+476549^^^CA CARB 675/MAG HYDROXIDE 135MG CHEW TAB^Y
+"DATA",176.112,21381,0)
+4024761^ESTROGENS,CONJUGATED SYNTHETIC A 0.45MG TAB
+"DATA",176.112,21381,1)
+476540
+"DATA",176.112,21382,0)
+4024539^CARBIDOPA 25MG/LEVODOPA 250MG TAB,RAPID DISINTEGRATING
+"DATA",176.112,21382,1)
+476515
+"DATA",176.112,21383,0)
+4024538^CARBIDOPA 25MG/LEVODOPA 100MG TAB,RAPID DISINTEGRATING
+"DATA",176.112,21383,1)
+476399
+"DATA",176.112,21384,0)
+4026663^METHYLPHENIDATE HCL 10MG TAB,CHEWABLE
+"DATA",176.112,21384,1)
+476369
+"DATA",176.112,21385,0)
+4024533^MESALAMINE 500MG CAP,SA
+"DATA",176.112,21385,1)
+476362
+"DATA",176.112,21386,0)
+4017246^EZETIMIBE 10MG/SIMVASTATIN 80MG TAB
+"DATA",176.112,21386,1)
+476351
+"DATA",176.112,21387,0)
+4017247^EZETIMIBE 10MG/SIMVASTATIN 80MG TAB,UD
+"DATA",176.112,21387,1)
+476351
+"DATA",176.112,21388,0)
+4017245^EZETIMIBE 10MG/SIMVASTATIN 40MG TAB,UD
+"DATA",176.112,21388,1)
+476350
+"DATA",176.112,21389,0)
+4017244^EZETIMIBE 10MG/SIMVASTATIN 40MG TAB
+"DATA",176.112,21389,1)
+476350
+"DATA",176.112,21390,0)
+4017248^EZETIMIBE 10MG/SIMVASTATIN 20MG TAB,UD
+"DATA",176.112,21390,1)
+476349
+"DATA",176.112,21391,0)
+4017243^EZETIMIBE 10MG/SIVASTATIN 20MG TAB,UD
+"DATA",176.112,21391,1)
+476349
+"DATA",176.112,21392,0)
+4017242^EZETIMIBE 10MG/SIMVASTATIN 20MG TAB
+"DATA",176.112,21392,1)
+476349
+"DATA",176.112,21393,0)
+4017240^EZETIMIBE 10MG/SIMVASTATIN 10MG TAB
+"DATA",176.112,21393,1)
+476345
+"DATA",176.112,21394,0)
+4017241^EZETIMIBE 10MG/SIMVASTATIN 10MG TAB,UD
+"DATA",176.112,21394,1)
+476345
+"DATA",176.112,21395,0)
+4024625^CETIRIZINE HCL 5MG TAB,CHEW
+"DATA",176.112,21395,1)
+476338
+"DATA",176.112,21396,0)
+4024626^CETIRIZINE HCL 10MG TAB,CHEW
+"DATA",176.112,21396,1)
+476331
+"DATA",176.112,21397,0)
+4024628^ACETYLCYSTEINE 200MG/ML (PF) SOLN,INJ
+"DATA",176.112,21397,1)
+465377
+"DATA",176.112,21398,0)
+4025509^VORICONAZOLE 200MG/5ML SUSP,ORAL
+"DATA",176.112,21398,1)
+465355
+"DATA",176.112,21399,0)
+4013498^UROKINASE 9000 UNT/VIL INJ
+"DATA",176.112,21399,1)
+465347
+"DATA",176.112,21400,0)
+4006245^UROKINASE 5000UNT/ML INJ
+"DATA",176.112,21400,1)
+465347
+"DATA",176.112,21401,0)
+4016757^IBANDRONATE NA 2.5MG TAB
+"DATA",176.112,21401,1)
+443592
+"DATA",176.112,21402,0)
+4016759^ALFUZOSIN HCL 100MG CAP,SA,UD
+"DATA",176.112,21402,1)
+442054
+"DATA",176.112,21403,0)
+4024795^CARBINOXAMINE MALEATE 10MG CAP,SA
+"DATA",176.112,21403,1)
+438360
+"DATA",176.112,21404,0)
+4026049^DEXTROMETHORPHAN HBR 15MG CAP
+"DATA",176.112,21404,1)
+435543
+"DATA",176.112,21405,0)
+4004962^HYDROCODONE 2.5MG/ACETAMINOPHEN 120MG/5ML ELIXIR
+"DATA",176.112,21405,1)
+435460
+"DATA",176.112,21406,0)
+4003574^BENTIROMIDE 500MG/7.5ML SOLN,ORAL
+"DATA",176.112,21406,1)
+435308
+"DATA",176.112,21407,0)
+4025894^DOXYCYCLINE HYCLATE 100MG TAB,EC
+"DATA",176.112,21407,1)
+434018
+"DATA",176.112,21408,0)
+4024623^METFORMIN HCL 750MG TAB,SA
+"DATA",176.112,21408,1)
+433928
+"DATA",176.112,21409,0)
+4017070^CINACALCET HCL 30MG TAB
+"DATA",176.112,21409,1)
+432402
+"DATA",176.112,21410,0)
+4017071^CINACALCET HCL 60MG TAB
+"DATA",176.112,21410,1)
+432401
+"DATA",176.112,21411,0)
+4017072^CINACALCET HCL 90MG TAB
+"DATA",176.112,21411,1)
+432400
+"DATA",176.112,21412,0)
+4025791^METOPROLOL TARTRATE 25MG TAB,UD
+"DATA",176.112,21412,1)
+430618
+"DATA",176.112,21413,0)
+4016944^METOPROLOL TARTRATE 25MG TAB
+"DATA",176.112,21413,1)
+430618
+"DATA",176.112,21414,0)
+4017209^RIFAXIMIN 200MG TAB
+"DATA",176.112,21414,1)
+429662
+"DATA",176.112,21415,0)
+4027537^HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,21415,1)
+429503
+"DATA",176.112,21416,0)
+4027275^PILOCARPINE HCL 7.5MG TAB
+"DATA",176.112,21416,1)
+429349
+"DATA",176.112,21417,0)
+4006770^AMINOPHYLLINE 130MG/GUAIFENESIN 100MG TAB
+"DATA",176.112,21417,1)
+428923
+"DATA",176.112,21418,0)
+4010480^CALCIUM ACETATE 668MG (CA 167MG) TAB
+"DATA",176.112,21418,1)
+428703
+"DATA",176.112,21419,0)
+4005584^COAL TAR 7.5% EMULSION,TOP
+"DATA",176.112,21419,1)
+427689
+"DATA",176.112,21420,0)
+4024529^NITAZOXANIDE 500MG TAB
+"DATA",176.112,21420,1)
+427163
+"DATA",176.112,21421,0)
+4017372^CLOBETASOL PROPIONATE 0.05% SHAMPOO,TOP
+"DATA",176.112,21421,1)
+425730
+"DATA",176.112,21422,0)
+4003694^THEOPHYLLINE 150MG/15ML SYRUP
+"DATA",176.112,21422,1)
+425539
+"DATA",176.112,21423,0)
+4003666^THEOPHYLLINE,ANHYDROUS 150MG/15ML SYRUP
+"DATA",176.112,21423,1)
+425539
+"DATA",176.112,21424,0)
+4027529^TRICLOSAN 0.2% LIQUID,TOP
+"DATA",176.112,21424,1)
+425103
+"DATA",176.112,21425,0)
+4006467^CODEINE 10MG/PSEUDEFED 30MG/TRIPROLIDINE 2MG/5ML SYRUP
+"DATA",176.112,21425,1)
+424454
+"DATA",176.112,21426,0)
+4025111^SALICYLIC ACID 6% LOTION,TOP
+"DATA",176.112,21426,1)
+422998
+"DATA",176.112,21427,0)
+4013871^MIDAZOLAM HCL 2MG/ML SYRUP
+"DATA",176.112,21427,1)
+422410
+"DATA",176.112,21428,0)
+4002494^PROMETHAZINE HCL 25MG/5ML SYRUP
+"DATA",176.112,21428,1)
+422285
+"DATA",176.112,21429,0)
+4027590^MENTHOL 5% PATCH
+"DATA",176.112,21429,1)
+420222
+"DATA",176.112,21430,0)
+4026338^SULFACETAMIDE NA 10%/SULFUR 5% WASH,TOP
+"DATA",176.112,21430,1)
+420069
+"DATA",176.112,21431,0)
+4013853^DIDANOSINE 10MG/ML SOLN,ORAL
+"DATA",176.112,21431,1)
+419921
+"DATA",176.112,21432,0)
+4014667^DIDANOSINE 20MG/ML SOLN,ORAL
+"DATA",176.112,21432,1)
+419921
+"DATA",176.112,21433,0)
+4026272^CEFIXIME 200MG/5ML SUSP,ORAL
+"DATA",176.112,21433,1)
+419849
+"DATA",176.112,21434,0)
+4025582^MICONAZOLE NITRATE 0.25%/ZINC OXIDE 15% OINT,TOP
+"DATA",176.112,21434,1)
+418752
+"DATA",176.112,21435,0)
+4024873^SULFACETAMIDE NA 10% CREAM,TOP
+"DATA",176.112,21435,1)
+417660
+"DATA",176.112,21436,0)
+4024780^UREA 50% CREAM,TOP
+"DATA",176.112,21436,1)
+416916
+"DATA",176.112,21437,0)
+4017145^CAMPHOR 0.2%/MENTHOL 3.5% GEL,TOP
+"DATA",176.112,21437,1)
+416207
+"DATA",176.112,21438,0)
+4017088^BEVACIZUMAB 25MG/ML INJ,16ML
+"DATA",176.112,21438,1)
+415191
+"DATA",176.112,21439,0)
+4017087^BEVACIZUMAB 25MG/ML INJ,4ML
+"DATA",176.112,21439,1)
+415191
+"DATA",176.112,21440,0)
+4016881^SECRETIN 16MCG/VIL INJ
+"DATA",176.112,21440,1)
+414909
+"DATA",176.112,21441,0)
+4016613^AGALSIDASE BETA 35MG/VIL INJ
+"DATA",176.112,21441,1)
+414264
+"DATA",176.112,21442,0)
+4001542^DIATRIZOATE MEGLUMINE 18% INJ
+"DATA",176.112,21442,1)
+413334
+"DATA",176.112,21443,0)
+4017273^PENTETATE CA TRISODIUM 200MG/ML INJ
+"DATA",176.112,21443,1)
+413287
+"DATA",176.112,21444,0)
+4004242^ISOPROTERENOL HCL 0.25% AEROSOL,INHL
+"DATA",176.112,21444,1)
+409303
+"DATA",176.112,21445,0)
+4004240^ISOPROTERENOL HCL 0.25% SOLN,INHL
+"DATA",176.112,21445,1)
+409303
+"DATA",176.112,21446,0)
+4004245^ISOPROTERENOL SO4 0.25% AEROSOL,INHL
+"DATA",176.112,21446,1)
+409303
+"DATA",176.112,21447,0)
+4003250^EPINEPHRINE 0.3MG/ML INJ
+"DATA",176.112,21447,1)
+407869
+"DATA",176.112,21448,0)
+4025895^DOXYCYCLINE HYCLATE 75MG TAB,EC
+"DATA",176.112,21448,1)
+406524
+"DATA",176.112,21449,0)
+4024831^DOXERCALCIFEROL 0.5MCG CAP
+"DATA",176.112,21449,1)
+406503
+"DATA",176.112,21450,0)
+4001703^AMPHOTERICIN B LIPID COMPLEX 5MG/ML INJ,VIL,20ML
+"DATA",176.112,21450,1)
+406381
+"DATA",176.112,21451,0)
+4007316^HYDROCODONE 2.5MG/GG 50MG/P-EPHRINE 7.5MG/5ML SYRUP
+"DATA",176.112,21451,1)
+406375
+"DATA",176.112,21452,0)
+4006752^AMPHETAMINE 1.25MG/DEXTROAMPHETAMINE 2.5MG TAB
+"DATA",176.112,21452,1)
+405856
+"DATA",176.112,21453,0)
+4017312^AMLODIPINE BESYLATE 10MG/ATORVASTATIN CA 80MG TAB
+"DATA",176.112,21453,1)
+404013
+"DATA",176.112,21454,0)
+4017309^AMLODIPINE BESYLATE 5MG/ATORVASTATIN 80MG TAB
+"DATA",176.112,21454,1)
+404011
+"DATA",176.112,21455,0)
+4016888^PEMETREXED 500MG/VIL INJ
+"DATA",176.112,21455,1)
+404009
+"DATA",176.112,21456,0)
+4027515^PEMETREXED 100MG/VIL INJ
+"DATA",176.112,21456,1)
+404009
+"DATA",176.112,21457,0)
+4016869^CARBINOXAMINE 8MG/METHSCOPOLAMINE 2.5MG/PSE 90MG TAB,SA
+"DATA",176.112,21457,1)
+403988
+"DATA",176.112,21458,0)
+4025114^HYDROCORTISONE 0.5%/LIDOCAINE 3% LOTION,TOP
+"DATA",176.112,21458,1)
+403981
+"DATA",176.112,21459,0)
+4017075^NELFINAVIR MESYLATE 625MG TAB
+"DATA",176.112,21459,1)
+403978
+"DATA",176.112,21460,0)
+4025616^ALOSETRON HCL 0.5MG TAB
+"DATA",176.112,21460,1)
+403975
+"DATA",176.112,21461,0)
+4016890^FLUOXETINE HCL 50MG/OLANZAPINE 6MG CAP
+"DATA",176.112,21461,1)
+403972
+"DATA",176.112,21462,0)
+4016892^FLUOXETINE HCL 50MG/OLANZAPINE 12MG CAP
+"DATA",176.112,21462,1)
+403971
+"DATA",176.112,21463,0)
+4016891^FLUOXETINE HCL 25MG/OLANZAPINE 12MG CAP
+"DATA",176.112,21463,1)
+403970
+"DATA",176.112,21464,0)
+4016889^FLUOXETINE HCL 25MG/OLANZAPINE 6MG CAP
+"DATA",176.112,21464,1)
+403969
+"DATA",176.112,21465,0)
+4016998^METFORMIN HCL 500MG/5ML SOLN,ORAL
+"DATA",176.112,21465,1)
+403968
+"DATA",176.112,21466,0)
+4017122^ZONISAMIDE 50MG CAP
+"DATA",176.112,21466,1)
+403967
+"DATA",176.112,21467,0)
+4016901^ZONISAMIDE 25MG CAP
+"DATA",176.112,21467,1)
+403966
+"DATA",176.112,21468,0)
+4016883^TADALAFIL 5MG TAB
+"DATA",176.112,21468,1)
+403957
+"DATA",176.112,21469,0)
+4024781^GUAIFENESIN 400MG/PHENYLEPHRINE 30MG CAP,SA
+"DATA",176.112,21469,1)
+403947
+"DATA",176.112,21470,0)
+4017146^CARBINOXAMINE MALEATE 2MG/CARBINOXAMINE TANNATE 6MG/5ML SUSP,SA
+"DATA",176.112,21470,1)
+403944
+"DATA",176.112,21471,0)
+4016693^DARBEPOETIN ALFA,RECOMBINANT 500MCG/ML INJ W/ALBUMIN
+"DATA",176.112,21471,1)
+403943
+"DATA",176.112,21472,0)
+4017130^PROPAFENONE HCL 425MG CAP,SA
+"DATA",176.112,21472,1)
+403936
+"DATA",176.112,21473,0)
+4017131^PROPAFENONE HCL 325MG CAP,SA
+"DATA",176.112,21473,1)
+403935
+"DATA",176.112,21474,0)
+4017129^PROPAFENONE HCL 225MG CAP,SA
+"DATA",176.112,21474,1)
+403934
+"DATA",176.112,21475,0)
+4016942^MEMANTINE HCL 5MG TAB,UD
+"DATA",176.112,21475,1)
+403932
+"DATA",176.112,21476,0)
+4016819^MEMANTINE HCL 5MG TAB
+"DATA",176.112,21476,1)
+403932
+"DATA",176.112,21477,0)
+4016828^CIPROFLOXACIN 1000MG TAB,SA
+"DATA",176.112,21477,1)
+403921
+"DATA",176.112,21478,0)
+4016851^DAPTOMYCIN 250MG/VIL INJ
+"DATA",176.112,21478,1)
+403920
+"DATA",176.112,21479,0)
+4016850^DAPTOMYCIN 500MG/VIL INJ
+"DATA",176.112,21479,1)
+403920
+"DATA",176.112,21480,0)
+4026568^BUPROPION HCL 300MG 24HR TAB,SA
+"DATA",176.112,21480,1)
+403918
+"DATA",176.112,21481,0)
+4026567^BUPROPION HCL 150MG 24HR TAB,SA
+"DATA",176.112,21481,1)
+403917
+"DATA",176.112,21482,0)
+4017074^METFORMIN HCL 1000MG/ROSIGLITAZONE MALEATE 4MG TAB
+"DATA",176.112,21482,1)
+403916
+"DATA",176.112,21483,0)
+4024652^METFORMIN HCL 1000MG/ROSIGLITAZONE MALEATE 2MG TAB
+"DATA",176.112,21483,1)
+403915
+"DATA",176.112,21484,0)
+4017397^METHSCOPOLAMINE BR 5MG TAB
+"DATA",176.112,21484,1)
+403914
+"DATA",176.112,21485,0)
+4016749^ROSUVASTATIN CA 5MG TAB
+"DATA",176.112,21485,1)
+403909
+"DATA",176.112,21486,0)
+4016912^CIPROFLOXACIN HCL 0.3%/DEXAMETHASONE 0.1% SUSP,OTIC
+"DATA",176.112,21486,1)
+403908
+"DATA",176.112,21487,0)
+4017278^POTASSIUM CHLORIDE 20MEQ/L/NACL 0.45% INJ
+"DATA",176.112,21487,1)
+403890
+"DATA",176.112,21488,0)
+4016717^PALONOSETRON HCL 50MCG/ML INJ,5ML
+"DATA",176.112,21488,1)
+403886
+"DATA",176.112,21489,0)
+4026343^ESMOLOL HCL 20MG/ML/NACL INJ,100ML
+"DATA",176.112,21489,1)
+403885
+"DATA",176.112,21490,0)
+4016997^LEVETIRACETAM 100MG/ML SOLN,ORAL
+"DATA",176.112,21490,1)
+403884
+"DATA",176.112,21491,0)
+4016760^IMATINIB MESYLATE 400MG TAB
+"DATA",176.112,21491,1)
+403879
+"DATA",176.112,21492,0)
+4016761^IMATINIB MESYLATE 100MG TAB
+"DATA",176.112,21492,1)
+403878
+"DATA",176.112,21493,0)
+4016687^EMTRICITABINE 200MG CAP
+"DATA",176.112,21493,1)
+403875
+"DATA",176.112,21494,0)
+4016718^OMALIZUMAB 150MG/VIL INJ
+"DATA",176.112,21494,1)
+403866
+"DATA",176.112,21495,0)
+4017303^OMALIZUMAB 75MG/VIL INJ
+"DATA",176.112,21495,1)
+403866
+"DATA",176.112,21496,0)
+4016914^HYDROCHLOROTHIAZIDE 25MG/OLMESARTIN 40MG TAB
+"DATA",176.112,21496,1)
+403855
+"DATA",176.112,21497,0)
+4016917^HYDROCHLOROTHIAZIDE 25MG/OLMESARTAN 40MG TAB
+"DATA",176.112,21497,1)
+403855
+"DATA",176.112,21498,0)
+4016915^HYDROCHLOROTHIAZIDE 12.5MG/OLMESARTIN 40MG TAB
+"DATA",176.112,21498,1)
+403854
+"DATA",176.112,21499,0)
+4016918^HYDROCHLOROTHIAZIDE 12.5MG/OLMESARTAN 40MG TAB
+"DATA",176.112,21499,1)
+403854
+"DATA",176.112,21500,0)
+4016916^HYDROCHLOROTHIAZIDE 12.5MG/OLMESARTAN 20MG TAB
+"DATA",176.112,21500,1)
+403853
+"DATA",176.112,21501,0)
+4016825^CARBIDOPA 37.5MG/ENTACAPONE 200MG/LEVODOPA 150MG TAB
+"DATA",176.112,21501,1)
+403852
+"DATA",176.112,21502,0)
+4016824^CARBIDOPA 25MG/ENTACAPONE 200MG/LEVODOPA 100MG TAB
+"DATA",176.112,21502,1)
+403851
+"DATA",176.112,21503,0)
+4016826^CARBIDOPA 12.5MG/ENTACAPONE 200MG/LEVODOPA 50MG TAB
+"DATA",176.112,21503,1)
+403850
+"DATA",176.112,21504,0)
+4017123^ESTROGENS,CONJUGATED 0.45MG TAB
+"DATA",176.112,21504,1)
+403849
+"DATA",176.112,21505,0)
+4016921^KETOROLAC TROMETHAMINE 0.4% SOLN,OPH
+"DATA",176.112,21505,1)
+403848
+"DATA",176.112,21506,0)
+4016945^DIPHENHYDRAMINE 25MG/PHENYLEPHRINE 10MG TAB,CHEW
+"DATA",176.112,21506,1)
+403845
+"DATA",176.112,21507,0)
+4025737^DESLORATADINE 5MG TAB,RAPID DISINTEGRATING
+"DATA",176.112,21507,1)
+403841
+"DATA",176.112,21508,0)
+4025518^CALCIUM CARBONATE 1GM/SIMETHICONE 60MG TAB,CHEWABLE
+"DATA",176.112,21508,1)
+403828
+"DATA",176.112,21509,0)
+4016729^RISPERIDONE 0.5MG TAB,ORAL DISINTEGRATING
+"DATA",176.112,21509,1)
+403825
+"DATA",176.112,21510,0)
+4016614^LARONIDASE 580MCG/ML INJ
+"DATA",176.112,21510,1)
+403822
+"DATA",176.112,21511,0)
+4016808^MOXIFLOXACIN HCL 0.5% SOLN,OPH
+"DATA",176.112,21511,1)
+403818
+"DATA",176.112,21512,0)
+4016621^APREPITANT 125MG CAP,UD
+"DATA",176.112,21512,1)
+403811
+"DATA",176.112,21513,0)
+4016620^APREPITANT 125MG CAP
+"DATA",176.112,21513,1)
+403811
+"DATA",176.112,21514,0)
+4016619^APREPITANT 80MG CAP,UD
+"DATA",176.112,21514,1)
+403810
+"DATA",176.112,21515,0)
+4016618^APREPITANT 80MG CAP
+"DATA",176.112,21515,1)
+403810
+"DATA",176.112,21516,0)
+4016617^PEGVISOMANT PROTEIN 20MG/VIL INJ
+"DATA",176.112,21516,1)
+403808
+"DATA",176.112,21517,0)
+4016616^PEGVISOMANT PROTEIN 15MG/VIL INJ
+"DATA",176.112,21517,1)
+403807
+"DATA",176.112,21518,0)
+4016615^PEGVISOMANT PROTEIN 10MG/VIL INJ
+"DATA",176.112,21518,1)
+403806
+"DATA",176.112,21519,0)
+4025838^DM 60MG/GG 1200MG/PSEUDOEPHEDRINE 60MG TAB,SA
+"DATA",176.112,21519,1)
+403801
+"DATA",176.112,21520,0)
+4016735^OXYBUTYNIN 3.9MG/24HRS PATCH
+"DATA",176.112,21520,1)
+403799
+"DATA",176.112,21521,0)
+4016903^ALPRAZOLAM 3MG TAB,SA
+"DATA",176.112,21521,1)
+403794
+"DATA",176.112,21522,0)
+4015435^METHYLPHENIDATE HCL 54MG TAB,SA
+"DATA",176.112,21522,1)
+403784
+"DATA",176.112,21523,0)
+4010096^FELODIPINE 2.5MG TAB,SA
+"DATA",176.112,21523,1)
+402698
+"DATA",176.112,21524,0)
+4013723^FELODIPINE 5MG TAB,SA,UD
+"DATA",176.112,21524,1)
+402696
+"DATA",176.112,21525,0)
+4010094^FELODIPINE 5MG TAB,SA
+"DATA",176.112,21525,1)
+402696
+"DATA",176.112,21526,0)
+4010095^FELODIPINE 10MG TAB,SA
+"DATA",176.112,21526,1)
+402695
+"DATA",176.112,21527,0)
+4013724^FELODIPINE 10MG TAB,SA,UD
+"DATA",176.112,21527,1)
+402695
+"DATA",176.112,21528,0)
+4003785^ALCOHOL,ISOPROPYL 99% LIQUID,TOP
+"DATA",176.112,21528,1)
+402481
+"DATA",176.112,21529,0)
+4016742^VARDENAFIL HCL 2.5MG TAB
+"DATA",176.112,21529,1)
+402273
+"DATA",176.112,21530,0)
+4016692^ATAZANAVIR SO4 200MG CAP
+"DATA",176.112,21530,1)
+402247
+"DATA",176.112,21531,0)
+4016691^ATAZANAVIR SO4 150MG CAP
+"DATA",176.112,21531,1)
+402246
+"DATA",176.112,21532,0)
+4016690^ATAZANAVIR SO4 100MG CAP
+"DATA",176.112,21532,1)
+402245
+"DATA",176.112,21533,0)
+4016625^BORTEZOMIB 3.5MG/VIL INJ
+"DATA",176.112,21533,1)
+402243
+"DATA",176.112,21534,0)
+4016846^EFALIZUMAB 125MG/VIL INJ
+"DATA",176.112,21534,1)
+402239
+"DATA",176.112,21535,0)
+4027381^ARIPIPRAZOLE 5MG TAB,UD
+"DATA",176.112,21535,1)
+402131^^^ARIPIPRAZOLE 5MG TAB UD^Y
+"DATA",176.112,21536,0)
+4016837^ARIPIPRAZOLE 5MG TAB
+"DATA",176.112,21536,1)
+402131
+"DATA",176.112,21537,0)
+4016848^FOSAMPRENAVIR CA 700MG TAB
+"DATA",176.112,21537,1)
+402109
+"DATA",176.112,21538,0)
+4016845^ABARELIX 113MG/KIT INJ,SUSP,SA
+"DATA",176.112,21538,1)
+402100
+"DATA",176.112,21539,0)
+4016732^GATIFLOXACIN 0.3% SOLN,OPH
+"DATA",176.112,21539,1)
+402089
+"DATA",176.112,21540,0)
+4016885^TADALAFIL 20MG TAB
+"DATA",176.112,21540,1)
+402019
+"DATA",176.112,21541,0)
+4016813^OMEPRAZOLE 20MG TAB,SA
+"DATA",176.112,21541,1)
+402014
+"DATA",176.112,21542,0)
+4016878^RISPERIDONE 50MG/VIL INJ,SUSP,SA
+"DATA",176.112,21542,1)
+402012
+"DATA",176.112,21543,0)
+4016879^RISPERIDONE 37.5MG/VIL INJ,SUSP,SA
+"DATA",176.112,21543,1)
+402011
+"DATA",176.112,21544,0)
+4016880^RISPERIDONE 25MG/VIL INJ,SUSP,SA
+"DATA",176.112,21544,1)
+402010
+"DATA",176.112,21545,0)
+4025055^ZOLMITRIPTAN 5MG/SPRAY SOLN,NASAL,0.1ML
+"DATA",176.112,21545,1)
+402000
+"DATA",176.112,21546,0)
+4016906^ZOLMITRIPTAN 5MG SOLN,NASAL
+"DATA",176.112,21546,1)
+402000
+"DATA",176.112,21547,0)
+4016574^ENFUVIRTIDE 90MG/VIL INJ
+"DATA",176.112,21547,1)
+401981
+"DATA",176.112,21548,0)
+4016752^ROSUVASTATIN CA 20MG TAB
+"DATA",176.112,21548,1)
+401963
+"DATA",176.112,21549,0)
+4016753^ROSUVASTATIN CA 20MG TAB,UD
+"DATA",176.112,21549,1)
+401963
+"DATA",176.112,21550,0)
+4016750^ROSUVASTATIN CA 10MG TAB
+"DATA",176.112,21550,1)
+401962
+"DATA",176.112,21551,0)
+4016751^ROSUVASTATIN CA 10MG TAB,UD
+"DATA",176.112,21551,1)
+401962
+"DATA",176.112,21552,0)
+4016754^ROSUVASTATIN CA 40MG TAB
+"DATA",176.112,21552,1)
+401959
+"DATA",176.112,21553,0)
+4016755^ROSUVASTATIN CA 40MG TAB,UD
+"DATA",176.112,21553,1)
+401959
+"DATA",176.112,21554,0)
+4016728^RISPERIDONE 2MG TAB,ORAL DISINTEGRATING
+"DATA",176.112,21554,1)
+401954
+"DATA",176.112,21555,0)
+4016727^RISPERIDONE 1MG TAB,ORAL DISINTEGRATING
+"DATA",176.112,21555,1)
+401953
+"DATA",176.112,21556,0)
+4016756^MIGLUSTAT 100MG CAP
+"DATA",176.112,21556,1)
+401938
+"DATA",176.112,21557,0)
+4026691^LEVOCETIRIZINE DIHYDROCHLORIDE 5MG TAB
+"DATA",176.112,21557,1)
+401896
+"DATA",176.112,21558,0)
+4017364^LUTROPIN ALFA 75UNIT/VIL INJ
+"DATA",176.112,21558,1)
+401883
+"DATA",176.112,21559,0)
+4017101^EPINASTINE HCL 0.05% SOLN,OPH
+"DATA",176.112,21559,1)
+401750
+"DATA",176.112,21560,0)
+4004391^LIDOCAINE 10% AEROSOL,ORAL
+"DATA",176.112,21560,1)
+393258
+"DATA",176.112,21561,0)
+4004390^LIDOCAINE 5% OINT,DENT
+"DATA",176.112,21561,1)
+393248
+"DATA",176.112,21562,0)
+4025041^DIGOXIN 0.05MG/ML ELIXIR,2.5ML
+"DATA",176.112,21562,1)
+393245
+"DATA",176.112,21563,0)
+4025042^DIGOXIN 0.05MG/ML ELIXIR,5ML
+"DATA",176.112,21563,1)
+393245
+"DATA",176.112,21564,0)
+4003339^DIGOXIN 0.05MG/ML ELIXIR
+"DATA",176.112,21564,1)
+393245
+"DATA",176.112,21565,0)
+4003799^AMIKACIN SO4 5MG/ML/NACL 0.9% INJ,BAG,100ML
+"DATA",176.112,21565,1)
+392405
+"DATA",176.112,21566,0)
+4007816^ENFLURANE 99.9% INHL
+"DATA",176.112,21566,1)
+392158
+"DATA",176.112,21567,0)
+4024698^PHENYLEPHRINE HCL 10MG TAB
+"DATA",176.112,21567,1)
+392099
+"DATA",176.112,21568,0)
+4002670^INDOMETHACIN 75MG CAP
+"DATA",176.112,21568,1)
+392073
+"DATA",176.112,21569,0)
+4005653^LACTULOSE 10GM/15ML SYRUP
+"DATA",176.112,21569,1)
+391937
+"DATA",176.112,21570,0)
+4014256^SOMATROPIN 1.5MG/VIL INJ,INTRA-MIX
+"DATA",176.112,21570,1)
+391932
+"DATA",176.112,21571,0)
+4006610^AUROTHIOGLUCOSE 50MG/ML INJ,SUSP
+"DATA",176.112,21571,1)
+391913
+"DATA",176.112,21572,0)
+4004388^LIDOCAINE 5% SOLN,DENT
+"DATA",176.112,21572,1)
+391879
+"DATA",176.112,21573,0)
+4026094^TAMOXIFEN 10MG/5ML SOLN,ORAL
+"DATA",176.112,21573,1)
+389230
+"DATA",176.112,21574,0)
+4017208^TROSPIUM CL 20MG TAB,UD
+"DATA",176.112,21574,1)
+389224
+"DATA",176.112,21575,0)
+4017207^TROSPIUM CL 20MG TAB
+"DATA",176.112,21575,1)
+389224
+"DATA",176.112,21576,0)
+4017023^ALFUZOSIN HCL 10MG TAB,SA
+"DATA",176.112,21576,1)
+389223
+"DATA",176.112,21577,0)
+4017024^ALFUZOSIN HCL 10MG TAB,SA,UD
+"DATA",176.112,21577,1)
+389223
+"DATA",176.112,21578,0)
+4025716^ETONOGESTREL 68MG IMPLANT
+"DATA",176.112,21578,1)
+389221
+"DATA",176.112,21579,0)
+4024545^FOLLITROPIN BETA 600UNIT/0.72MG INJ
+"DATA",176.112,21579,1)
+389216
+"DATA",176.112,21580,0)
+4024814^FOLLITROPIN BETA 600UNIT/0.72ML INJ
+"DATA",176.112,21580,1)
+389216
+"DATA",176.112,21581,0)
+4025559^TRAMADOL HCL 300MG TAB,SA
+"DATA",176.112,21581,1)
+389204
+"DATA",176.112,21582,0)
+4003355^DEXTROMETHORPHAN 15MG/PROMETHAZINE 6.25MG/5ML SYRUP
+"DATA",176.112,21582,1)
+388702
+"DATA",176.112,21583,0)
+4006466^CODEINE 10MG/PSEUDEFED 30MG/TRIPROLIDINE 1.25MG/5ML SYRUP
+"DATA",176.112,21583,1)
+388698
+"DATA",176.112,21584,0)
+4010295^TERBINAFINE HCL 1% SPRAY SOLN,TOP
+"DATA",176.112,21584,1)
+388526
+"DATA",176.112,21585,0)
+4017112^TELITHROMYCIN 400MG TAB,PKT,10
+"DATA",176.112,21585,1)
+388510
+"DATA",176.112,21586,0)
+4017111^TELITHROMYCIN 400MG TAB,UD
+"DATA",176.112,21586,1)
+388510
+"DATA",176.112,21587,0)
+4017110^TELITHROMYCIN 400MG TAB
+"DATA",176.112,21587,1)
+388510
+"DATA",176.112,21588,0)
+4025124^EPHEDRINE S04 25MG/GUAIFENESIN 400MG TAB
+"DATA",176.112,21588,1)
+387570
+"DATA",176.112,21589,0)
+4027134^NEBIVOLOL 5MG TAB
+"DATA",176.112,21589,1)
+387013
+"DATA",176.112,21590,0)
+4027137^NEBIVOLOL 5MG TAB,UD
+"DATA",176.112,21590,1)
+387013
+"DATA",176.112,21591,0)
+4026546^LEVETIRACETAM 1000MG TAB
+"DATA",176.112,21591,1)
+387003
+"DATA",176.112,21592,0)
+4004728^AMYLASE 30000UNT/LIPASE 8000UNT/PROTEASE 30000UNT CAP
+"DATA",176.112,21592,1)
+384788
+"DATA",176.112,21593,0)
+4002309^ISOSORBIDE DINITRATE 10MG TAB,ORAL
+"DATA",176.112,21593,1)
+381056
+"DATA",176.112,21594,0)
+4014148^ISOSORBIDE DINITRATE 10MG TAB,ORAL,UD
+"DATA",176.112,21594,1)
+381056
+"DATA",176.112,21595,0)
+4007820^BENZOCAINE 20% AEROSOL,TOP
+"DATA",176.112,21595,1)
+360349
+"DATA",176.112,21596,0)
+4014076^BENZOCAINE 20% SPRAY,TOP
+"DATA",176.112,21596,1)
+360349
+"DATA",176.112,21597,0)
+4007823^BENZOCAINE 20% SPRAY
+"DATA",176.112,21597,1)
+360349
+"DATA",176.112,21598,0)
+4016634^THALIDOMIDE 200MG CAP
+"DATA",176.112,21598,1)
+360177
+"DATA",176.112,21599,0)
+4016635^THALIDOMIDE 100MG CAP
+"DATA",176.112,21599,1)
+360176
+"DATA",176.112,21600,0)
+4025588^TESTOSTERONE 2% CREAM,TOP
+"DATA",176.112,21600,1)
+360172
+"DATA",176.112,21601,0)
+4017137^SULFACETAMIDE NA 10%/SULFUR 5% GEL,TOP
+"DATA",176.112,21601,1)
+360155
+"DATA",176.112,21602,0)
+4016644^SIROLIMUS 2MG TAB
+"DATA",176.112,21602,1)
+360110
+"DATA",176.112,21603,0)
+4016923^DEXCHLORPHENIRAMINE 2.5/DM 25/PSEUDEFED 75MG/5ML SUSP
+"DATA",176.112,21603,1)
+360042
+"DATA",176.112,21604,0)
+4016434^PRAMOXINE HCL 1% CREAM,RTL
+"DATA",176.112,21604,1)
+359984
+"DATA",176.112,21605,0)
+4016238^PAROXETINE HCL 37.5MG TAB,SA
+"DATA",176.112,21605,1)
+359852
+"DATA",176.112,21606,0)
+4016236^PAROXETINE HCL 12.5MG TAB,SA
+"DATA",176.112,21606,1)
+359851
+"DATA",176.112,21607,0)
+4016365^NITAZOXANIDE 100MG/5ML SUSP,ORAL
+"DATA",176.112,21607,1)
+359822
+"DATA",176.112,21608,0)
+4016738^NICOTINE POLACRILEX 4MG LOZENGE
+"DATA",176.112,21608,1)
+359818
+"DATA",176.112,21609,0)
+4016739^NICOTINE POLACRILEX 2MG LOZENGE
+"DATA",176.112,21609,1)
+359817
+"DATA",176.112,21610,0)
+4017193^HYPROMELLOSE 0.2% SOLN,OPH
+"DATA",176.112,21610,1)
+359634
+"DATA",176.112,21611,0)
+4026896^HYDROMORPHONE 0.02MG/BUPIVACAINE 0.125%/ML/NS INJ,BAG,100ML
+"DATA",176.112,21611,1)
+359627
+"DATA",176.112,21612,0)
+4026092^GUAIFENESIN 400MG TAB
+"DATA",176.112,21612,1)
+359601
+"DATA",176.112,21613,0)
+4026251^POLYSORBATE 80 1%/GLYCERIN 1% SOLN,OPH,0.4ML
+"DATA",176.112,21613,1)
+359595
+"DATA",176.112,21614,0)
+4024630^FENTANYL 5MCG/BUPIVACAINE 0.125%/ML/NS INJ,BAG,250ML
+"DATA",176.112,21614,1)
+359522
+"DATA",176.112,21615,0)
+4016778^FENTANYL 5MCG/BUPIVACAINE 0.0625%/ML/NS INJ,BAG,250ML
+"DATA",176.112,21615,1)
+359521
+"DATA",176.112,21616,0)
+4016777^FENTANYL 5MCG/BUPIVACAINE 0.0625%/ML/NS INJ,BAG,100ML
+"DATA",176.112,21616,1)
+359521
+"DATA",176.112,21617,0)
+4016506^ELETRIPTAN 40MG TAB,PKG,6
+"DATA",176.112,21617,1)
+359494
+"DATA",176.112,21618,0)
+4016505^ELETRIPTAN 20MG TAB,PKG,6
+"DATA",176.112,21618,1)
+359493
+"DATA",176.112,21619,0)
+4016911^CYCLOBENZAPRINE HCL 5MG TAB
+"DATA",176.112,21619,1)
+359422
+"DATA",176.112,21620,0)
+4014664^CLARITHROMYCIN 500MG TAB,SA
+"DATA",176.112,21620,1)
+359385
+"DATA",176.112,21621,0)
+4015881^CLARITHROMYCIN 500MG TAB,SA,PKT,14
+"DATA",176.112,21621,1)
+359385
+"DATA",176.112,21622,0)
+4016827^CIPROFLOXACIN 500MG TAB,SA
+"DATA",176.112,21622,1)
+359383
+"DATA",176.112,21623,0)
+4016609^CARBETAPENTANE CITRATE 20MG/GUAIFENESIN 100MG/5ML SYRUP,ORAL
+"DATA",176.112,21623,1)
+359329
+"DATA",176.112,21624,0)
+4008094^CALCIUM CARBONATE 1.25GM TAB,CHEWABLE
+"DATA",176.112,21624,1)
+359297
+"DATA",176.112,21625,0)
+4015675^CALCIUM ACETATE 667MG (CA 167MG) CAP
+"DATA",176.112,21625,1)
+359296
+"DATA",176.112,21626,0)
+4024893^CALCIUM ACETATE 667MG (CA 169MG) CAP
+"DATA",176.112,21626,1)
+359296
+"DATA",176.112,21627,0)
+4016876^AZATHIOPRINE 75MG TAB
+"DATA",176.112,21627,1)
+359229
+"DATA",176.112,21628,0)
+4016877^AZATHIOPRINE 100MG TAB
+"DATA",176.112,21628,1)
+359228
+"DATA",176.112,21629,0)
+4016266^TRETINOIN,MICROSPHERE 0.04% GEL,TOP
+"DATA",176.112,21629,1)
+359050
+"DATA",176.112,21630,0)
+4016245^SENNOSIDES 15MG/5GM GRANULES
+"DATA",176.112,21630,1)
+359038
+"DATA",176.112,21631,0)
+4015525^SALICYLIC ACID 3%/SULFUR 5% BAR,TOP
+"DATA",176.112,21631,1)
+359033
+"DATA",176.112,21632,0)
+4016276^OCTAFLUOROPROPANE MICROSPHERE 10MG/ML INJ,SUSP
+"DATA",176.112,21632,1)
+359004
+"DATA",176.112,21633,0)
+4016095^LEVALBUTEROL HCL 0.1MG/ML SOLN,INHL,3ML
+"DATA",176.112,21633,1)
+358992
+"DATA",176.112,21634,0)
+4016285^IRON CARBONYL 15MG TAB,CHEWABLE
+"DATA",176.112,21634,1)
+358981
+"DATA",176.112,21635,0)
+4015850^HYDROGEN PEROXIDE 1.5% RINSE,ORAL
+"DATA",176.112,21635,1)
+358975
+"DATA",176.112,21636,0)
+4015886^DIMETHYL SULFOXIDE 100% SOLN,URH
+"DATA",176.112,21636,1)
+358944
+"DATA",176.112,21637,0)
+4015973^DIHYDROCODEINE 32MG/APAP 712.8MG/CAFN 32MG TAB
+"DATA",176.112,21637,1)
+358942
+"DATA",176.112,21638,0)
+4016104^CAPSACIAN 0.075% APPLICATOR SOLN,TOP
+"DATA",176.112,21638,1)
+358922
+"DATA",176.112,21639,0)
+4015541^BENZOYL PEROXIDE 5%/CLINDAMYCIN PO4 1% GEL,TOP
+"DATA",176.112,21639,1)
+358917
+"DATA",176.112,21640,0)
+4027149^BENZOYL PEROXIDE 5%/CLINDAMYCIN 1% GEL,KIT
+"DATA",176.112,21640,1)
+358917
+"DATA",176.112,21641,0)
+4016428^ASCORBIC ACID 90MG/ML SOLN
+"DATA",176.112,21641,1)
+358912
+"DATA",176.112,21642,0)
+4016311^ADEFOVIR DIPIVOXIL 10MG TAB
+"DATA",176.112,21642,1)
+358906
+"DATA",176.112,21643,0)
+4004039^HYDROCORTISONE ACETATE 0.5%/PRAMOXINE HCL 1% CREAM,TOP
+"DATA",176.112,21643,1)
+358364
+"DATA",176.112,21644,0)
+4004222^ERGOCALCIFEROL 50000UNT CAP
+"DATA",176.112,21644,1)
+358363
+"DATA",176.112,21645,0)
+4001461^INSULIN,NPH 70UNT/REGULAR 30UNT/ML PORK/PURIFIED INJ
+"DATA",176.112,21645,1)
+358349
+"DATA",176.112,21646,0)
+4016721^TRIPTORELIN PAMOATE 11.25MG/VIL INJ,SUSP,SA
+"DATA",176.112,21646,1)
+353530
+"DATA",176.112,21647,0)
+4016719^TRIPTORELIN PAMOATE 11.25MG/VIL INJ
+"DATA",176.112,21647,1)
+353530
+"DATA",176.112,21648,0)
+4001021^MORPHINE SO4 1MG/ML (PF) INJ,AMP,10ML
+"DATA",176.112,21648,1)
+352271
+"DATA",176.112,21649,0)
+4027284^MORPHINE SO4 1MG/ML INJ,SOLN,PCA,25ML
+"DATA",176.112,21649,1)
+352271
+"DATA",176.112,21650,0)
+4027285^MORPHINE SO4 1MG/ML INJ,SOLN,PCA,30ML
+"DATA",176.112,21650,1)
+352271
+"DATA",176.112,21651,0)
+4000992^MORPHINE SO4 1MG/ML (PF) INJ
+"DATA",176.112,21651,1)
+352271
+"DATA",176.112,21652,0)
+4000989^MORPHINE SO4 1MG/ML INJ
+"DATA",176.112,21652,1)
+352271
+"DATA",176.112,21653,0)
+4016780^MORPHINE SO4 1MG/ML/DEXTROSE INJ,BAG,100ML
+"DATA",176.112,21653,1)
+352271
+"DATA",176.112,21654,0)
+4016781^MORPHINE SO4 1MG/ML/DEXTROSE INJ,BAG,250ML
+"DATA",176.112,21654,1)
+352271
+"DATA",176.112,21655,0)
+4016782^MORPHINE SO4 1MG/ML/DEXTROSE INJ,BAG,500ML
+"DATA",176.112,21655,1)
+352271
+"DATA",176.112,21656,0)
+4026628^MORPHINE SO4 1MG/ML/NACL 0.9% INJ,BAG,100ML
+"DATA",176.112,21656,1)
+352271
+"DATA",176.112,21657,0)
+4000991^MORPHINE SO4 0.5MG/ML (PF) INJ
+"DATA",176.112,21657,1)
+352270
+"DATA",176.112,21658,0)
+4025046^METHSCOPOLAMINE 2.5MG/PSEDUOEPHEDRINE HCL 120MG TAB,SA
+"DATA",176.112,21658,1)
+351981
+"DATA",176.112,21659,0)
+4007875^GUAIFENESIN 1200MG TAB,SA
+"DATA",176.112,21659,1)
+351774
+"DATA",176.112,21660,0)
+4008586^DICLOFENAC NA 100MG TAB,SA
+"DATA",176.112,21660,1)
+351655
+"DATA",176.112,21661,0)
+4004912^STREPTOKINASE 1.5MILLION UNT/VIL INJ
+"DATA",176.112,21661,1)
+351449
+"DATA",176.112,21662,0)
+4001728^PROCAINAMIDE HCL 250MG TAB,SA
+"DATA",176.112,21662,1)
+351421
+"DATA",176.112,21663,0)
+4004406^LIDOCAINE HCL 10MG/ML (PF) INJ
+"DATA",176.112,21663,1)
+351360
+"DATA",176.112,21664,0)
+4004381^LIDOCAINE HCL 10MG/ML INJ
+"DATA",176.112,21664,1)
+351360
+"DATA",176.112,21665,0)
+4004378^LIDOCAINE HCL 1% INJ
+"DATA",176.112,21665,1)
+351360
+"DATA",176.112,21666,0)
+4004394^LIDOCAINE HCL 1% (PF) INJ
+"DATA",176.112,21666,1)
+351360
+"DATA",176.112,21667,0)
+4002347^LEVOTHYROXINE NA 0.137MG TAB
+"DATA",176.112,21667,1)
+351353
+"DATA",176.112,21668,0)
+4005403^GUAIFENESIN 600MG/PSEUDOEPHEDRINE 120MG TAB,SA
+"DATA",176.112,21668,1)
+351337
+"DATA",176.112,21669,0)
+4006364^DESMOPRESSIN ACETATE 0.1MG/ML SOLN,RHINAL TUBE
+"DATA",176.112,21669,1)
+351306
+"DATA",176.112,21670,0)
+4016507^ALEFACEPT 7.5MG/VI INJ KIT
+"DATA",176.112,21670,1)
+351299
+"DATA",176.112,21671,0)
+4016508^ALEFACEPT 15MG/VI INJ KIT
+"DATA",176.112,21671,1)
+351298
+"DATA",176.112,21672,0)
+4024546^EPROSARTAN 600MG/HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,21672,1)
+351293
+"DATA",176.112,21673,0)
+4024547^EPROSARTAN 600MG/HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,21673,1)
+351292
+"DATA",176.112,21674,0)
+4016568^CYCLOSPORINE 0.05% (PF) EMULSION,OPH,0.4ML
+"DATA",176.112,21674,1)
+351291
+"DATA",176.112,21675,0)
+4016838^ESCITALOPRAM OXALATE 5MG/5ML LIQUID,ORAL
+"DATA",176.112,21675,1)
+351285
+"DATA",176.112,21676,0)
+4016504^OXANDROLONE 10MG TAB
+"DATA",176.112,21676,1)
+351276
+"DATA",176.112,21677,0)
+4016487^GLIPIZIDE 2.5MG/METFORMIN HCL 250MG TAB
+"DATA",176.112,21677,1)
+351275
+"DATA",176.112,21678,0)
+4016489^GLIPIZIDE 5MG/METFORMIN HCL 500MG TAB
+"DATA",176.112,21678,1)
+351274
+"DATA",176.112,21679,0)
+4016488^GLIPIZIDE 2.5MG/METFORMIN HCL 500MG TAB
+"DATA",176.112,21679,1)
+351273
+"DATA",176.112,21680,0)
+4016321^PEGINTERFERON ALPHA-2A 180MCG/ML INJ,1ML
+"DATA",176.112,21680,1)
+351270
+"DATA",176.112,21681,0)
+4017019^PEGINTERFERON ALFA-2A 180MCG/ML INJ,PKT,4
+"DATA",176.112,21681,1)
+351270
+"DATA",176.112,21682,0)
+4017018^PEGINTERFERON ALFA-2A 180MCG/ML INJ,VIL
+"DATA",176.112,21682,1)
+351270
+"DATA",176.112,21683,0)
+4016345^METFORMIN HCL 500MG/ROSIGLITAZONE MALEATE 2MG TAB
+"DATA",176.112,21683,1)
+351269
+"DATA",176.112,21684,0)
+4016344^METFORMIN HCL 500MG/ROSIGLITAZONE MALEATE 1MG TAB
+"DATA",176.112,21684,1)
+351268
+"DATA",176.112,21685,0)
+4016379^BUPRENORPHINE HCL 8MG/NALOXONE HCL 2MG TAB,SUBLINGUAL
+"DATA",176.112,21685,1)
+351267
+"DATA",176.112,21686,0)
+4016378^BUPRENORPHINE HCL 2MG/NALOXONE HCL 0.5MG TAB,SUBLINGUAL
+"DATA",176.112,21686,1)
+351266
+"DATA",176.112,21687,0)
+4016377^BUPRENORPHINE HCL 8MG TAB,SUBLINGUAL
+"DATA",176.112,21687,1)
+351265
+"DATA",176.112,21688,0)
+4016376^BUPRENORPHINE HCL 2MG TAB,SUBLINGUAL
+"DATA",176.112,21688,1)
+351264
+"DATA",176.112,21689,0)
+4017057^LANSOPRAZOLE 15MG TAB,ORAL DISINTEGRATING,SA
+"DATA",176.112,21689,1)
+351261
+"DATA",176.112,21690,0)
+4017058^LANSOPRAZOLE 30MG TAB,ORAL DISINTEGRATING,SA
+"DATA",176.112,21690,1)
+351260
+"DATA",176.112,21691,0)
+4016354^EPLERENONE 100MG TAB
+"DATA",176.112,21691,1)
+351258
+"DATA",176.112,21692,0)
+4016355^EPLERENONE 100MG TAB,UD
+"DATA",176.112,21692,1)
+351258
+"DATA",176.112,21693,0)
+4016352^EPLERENONE 50MG TAB
+"DATA",176.112,21693,1)
+351257
+"DATA",176.112,21694,0)
+4016353^EPLERENONE 50MG TAB,UD
+"DATA",176.112,21694,1)
+351257
+"DATA",176.112,21695,0)
+4016350^EPLERENONE 25MG TAB
+"DATA",176.112,21695,1)
+351256
+"DATA",176.112,21696,0)
+4016351^EPLERENONE 25MG TAB,UD
+"DATA",176.112,21696,1)
+351256
+"DATA",176.112,21697,0)
+4024977^CARBINOXAMINE MALEATE 2MG/PSEUDOEPHEDRINE 25MG/5ML SYRUP,ORAL
+"DATA",176.112,21697,1)
+351255
+"DATA",176.112,21698,0)
+4016490^METAXALONE 800MG TAB
+"DATA",176.112,21698,1)
+351254
+"DATA",176.112,21699,0)
+4016309^ESCITALOPRAM OXALATE 20MG TAB
+"DATA",176.112,21699,1)
+351250
+"DATA",176.112,21700,0)
+4016310^ESCITALOPRAM OXALATE 20MG TAB,UD
+"DATA",176.112,21700,1)
+351250
+"DATA",176.112,21701,0)
+4016306^ESCITALOPRAM OXALATE 5MG TAB,UD
+"DATA",176.112,21701,1)
+351249
+"DATA",176.112,21702,0)
+4016305^ESCITALOPRAM OXALATE 5MG TAB
+"DATA",176.112,21702,1)
+351249
+"DATA",176.112,21703,0)
+4016292^OXALIPLATIN 100MG/VIL (PF) INJ
+"DATA",176.112,21703,1)
+351248
+"DATA",176.112,21704,0)
+4016291^OXALIPLATIN 50MG/VIL (PF) INJ
+"DATA",176.112,21704,1)
+351248
+"DATA",176.112,21705,0)
+4027879^OXALIPLATIN 200MG/VIL (PF) INJ
+"DATA",176.112,21705,1)
+351248
+"DATA",176.112,21706,0)
+4016380^DARBEPOETIN ALFA,RECOMBINANT 300MCG/ML INJ W/ALBUMIN
+"DATA",176.112,21706,1)
+351247
+"DATA",176.112,21707,0)
+4027801^MONTELUKAST NA 4MG/PKT GRANULES
+"DATA",176.112,21707,1)
+351246
+"DATA",176.112,21708,0)
+4016575^RASBURICASE 1.5MG/VIL INJ
+"DATA",176.112,21708,1)
+351244
+"DATA",176.112,21709,0)
+4026041^RASBURICASE 7.5MG/VIL INJ
+"DATA",176.112,21709,1)
+351244
+"DATA",176.112,21710,0)
+4004699^TICARCILLIN 3GM/CLAVULANATE K 0.1GM/100ML INJ,VIL
+"DATA",176.112,21710,1)
+351239
+"DATA",176.112,21711,0)
+4004697^TICARCILLIN 3GM/CLAVULANATE K 0.1GM/VIL INJ
+"DATA",176.112,21711,1)
+351239
+"DATA",176.112,21712,0)
+4024762^ESTROGENS,CONJUGATED SYNTHETIC A 0.3MG TAB
+"DATA",176.112,21712,1)
+351228
+"DATA",176.112,21713,0)
+4017140^LOVASTATIN 60MG TAB,SA
+"DATA",176.112,21713,1)
+351227
+"DATA",176.112,21714,0)
+4017139^LOVASTATIN 40MG TAB,SA
+"DATA",176.112,21714,1)
+351226
+"DATA",176.112,21715,0)
+4017138^LOVASTATIN 20MG TAB,SA
+"DATA",176.112,21715,1)
+351225
+"DATA",176.112,21716,0)
+4016631^ZIPRASIDONE MESYLATE 30MG/VIL (20MG/ML) INJ
+"DATA",176.112,21716,1)
+351223
+"DATA",176.112,21717,0)
+4016312^ZIPRASIDONE MESYLATE 20MG/VIL INJ
+"DATA",176.112,21717,1)
+351223
+"DATA",176.112,21718,0)
+4016246^VORICONAZOLE 200MG/VIL INJ
+"DATA",176.112,21718,1)
+351209
+"DATA",176.112,21719,0)
+4016260^METHYLPHENIDATE HCL 27MG TAB,SA
+"DATA",176.112,21719,1)
+351200
+"DATA",176.112,21720,0)
+4016577^FLUOCINOLONE 0.01%/HYDROQUINONE 4%/TRETINOIN 0.05% CREAM,TOP
+"DATA",176.112,21720,1)
+351182
+"DATA",176.112,21721,0)
+4015836^NITISINONE 10MG CAP
+"DATA",176.112,21721,1)
+351175
+"DATA",176.112,21722,0)
+4015835^NITISINONE 5MG CAP
+"DATA",176.112,21722,1)
+351174
+"DATA",176.112,21723,0)
+4015834^NITISINONE 2MG CAP
+"DATA",176.112,21723,1)
+351173
+"DATA",176.112,21724,0)
+4016492^DUTASTERIDE 0.5MG CAP,UD
+"DATA",176.112,21724,1)
+351172
+"DATA",176.112,21725,0)
+4016491^DUTASTERIDE 0.5MG CAP
+"DATA",176.112,21725,1)
+351172
+"DATA",176.112,21726,0)
+4016558^TRIMETHOBENZAMIDE HCL 300MG CAP
+"DATA",176.112,21726,1)
+351167
+"DATA",176.112,21727,0)
+4016823^HYDROCODONE 5MG/CARBINOXAMINE 2MG/PSEUDEFED 30MG/5ML SYRUP
+"DATA",176.112,21727,1)
+351162
+"DATA",176.112,21728,0)
+4015833^PRAVASTATIN NA 80MG TAB
+"DATA",176.112,21728,1)
+351160
+"DATA",176.112,21729,0)
+4017324^MOXIFLOXACIN HCL 1.6MG/ML/NACL INJ,BAG,250ML
+"DATA",176.112,21729,1)
+351156
+"DATA",176.112,21730,0)
+4016810^UREA 40% LOTION
+"DATA",176.112,21730,1)
+351155
+"DATA",176.112,21731,0)
+4015818^PARICALCITOL 2MCG/ML INJ,SOLN
+"DATA",176.112,21731,1)
+351154
+"DATA",176.112,21732,0)
+4015796^DROTRECOGIN ALFA (ACTIVATED) 20MG/VIL INJ
+"DATA",176.112,21732,1)
+351146
+"DATA",176.112,21733,0)
+4015795^DROTRECOGIN ALFA (ACTIVATED) 5MG/VIL INJ
+"DATA",176.112,21733,1)
+351146
+"DATA",176.112,21734,0)
+4015815^DEXMETHYLPHENIDATE HCL 10MG TAB
+"DATA",176.112,21734,1)
+351145
+"DATA",176.112,21735,0)
+4015814^DEXMETHYLPHENIDATE HCL 5MG TAB
+"DATA",176.112,21735,1)
+351144
+"DATA",176.112,21736,0)
+4015813^DEXMETHYLPHENIDATE HCL 2.5MG TAB
+"DATA",176.112,21736,1)
+351143
+"DATA",176.112,21737,0)
+4024999^ALBUTEROL SO4 0.021% INHL,3ML
+"DATA",176.112,21737,1)
+351137
+"DATA",176.112,21738,0)
+4024783^ALBUTEROL SO4 0.042% INHL,3ML
+"DATA",176.112,21738,1)
+351136
+"DATA",176.112,21739,0)
+4016741^ZOLMITRIPTAN 5MG TAB,ORALLY DISINTEGRATING,PKG,3
+"DATA",176.112,21739,1)
+351134
+"DATA",176.112,21740,0)
+4015681^FENOFIBRATE 54MG TAB
+"DATA",176.112,21740,1)
+351133
+"DATA",176.112,21741,0)
+4015819^CEFDITOREN PIVOXIL 200MG TAB
+"DATA",176.112,21741,1)
+351127
+"DATA",176.112,21742,0)
+4015816^ACETAMINOPHEN 325MG/TRAMADOL HCL 37.5MG TAB
+"DATA",176.112,21742,1)
+351126
+"DATA",176.112,21743,0)
+4015817^ACETAMINOPHEN 325MG/TRAMADOL HCL 37.5MG TAB,UD
+"DATA",176.112,21743,1)
+351126
+"DATA",176.112,21744,0)
+4016737^FOLLITROPIN ALFA 1200UNT/VIL INJ
+"DATA",176.112,21744,1)
+351125
+"DATA",176.112,21745,0)
+4027876^FOLLITROPIN ALFA 900UNT/1.5ML INJ,PEN,1.5ML
+"DATA",176.112,21745,1)
+351125^^^FOLLITROPIN ALFA 900UNT/1.5ML INJ PEN^Y
+"DATA",176.112,21746,0)
+4015678^CETIRIZINE HCL 5MG/PSEUDOEPHEDRINE HCL 120MG TAB,SA
+"DATA",176.112,21746,1)
+351124
+"DATA",176.112,21747,0)
+4016226^MINOCYCLINE HCL MICROSPHERE 1MG CARTRIDGE
+"DATA",176.112,21747,1)
+351121
+"DATA",176.112,21748,0)
+4016274^SOMATROPIN 10MG/1.5ML INJ,SOLN,CARTRIDGE
+"DATA",176.112,21748,1)
+351115
+"DATA",176.112,21749,0)
+4015694^ZOLEDRONIC ACID 4MG/VIL INJ
+"DATA",176.112,21749,1)
+351114
+"DATA",176.112,21750,0)
+4015545^HEPATITIS A 720 EL.U/HEPATITIS B 20MCG/1ML VACCINE INJ
+"DATA",176.112,21750,1)
+351112
+"DATA",176.112,21751,0)
+4015330^BUDESONIDE 0.5MG/2ML SUSP,INH,2ML
+"DATA",176.112,21751,1)
+351109
+"DATA",176.112,21752,0)
+4015672^OLANZAPINE 20MG TAB,RAPID DISINTEGRATING
+"DATA",176.112,21752,1)
+351108
+"DATA",176.112,21753,0)
+4015847^OLANZAPINE 15MG,TAB RAPID DISINTEGRATING
+"DATA",176.112,21753,1)
+351107
+"DATA",176.112,21754,0)
+4010399^LIDOCAINE 4%/NEOMYCIN 3.5MG/POLYMYXIN 10000UNT/GM CREAM
+"DATA",176.112,21754,1)
+351098
+"DATA",176.112,21755,0)
+4001951^CHLOROTHIAZIDE NA 500MG/VIL INJ
+"DATA",176.112,21755,1)
+351094
+"DATA",176.112,21756,0)
+4005296^DIENESTROL 0.01% CREAM,VAG
+"DATA",176.112,21756,1)
+351068
+"DATA",176.112,21757,0)
+4002893^HYDROCORTISONE ACETATE 50MG/ML INJ,SUSP
+"DATA",176.112,21757,1)
+350947
+"DATA",176.112,21758,0)
+4002486^CODEINE 10MG/BPM 2MG/P-PROPANOL 12.5MG/5ML SYRUP
+"DATA",176.112,21758,1)
+350721
+"DATA",176.112,21759,0)
+4006565^BECLOMETHASONE DIPROPIONATE 42MCG/SPRAY AEROSOL,INHL,ORAL,6.7GM
+"DATA",176.112,21759,1)
+350713
+"DATA",176.112,21760,0)
+4006562^BECLOMETHASONE DIPROPIONATE 42MCG/SPRAY AEROSOL,INHL
+"DATA",176.112,21760,1)
+350713
+"DATA",176.112,21761,0)
+4006564^BECLOMETHASONE DIPROPIONATE 42MCG/ACTUATION POCKETHALER
+"DATA",176.112,21761,1)
+350713
+"DATA",176.112,21762,0)
+4016363^ATOMOXETINE 60MG CAP
+"DATA",176.112,21762,1)
+349595
+"DATA",176.112,21763,0)
+4016362^ATOMOXETINE 40MG CAP
+"DATA",176.112,21763,1)
+349594
+"DATA",176.112,21764,0)
+4016361^ATOMOXETINE 25MG CAP
+"DATA",176.112,21764,1)
+349593
+"DATA",176.112,21765,0)
+4016360^ATOMOXETINE 18MG CAP
+"DATA",176.112,21765,1)
+349592
+"DATA",176.112,21766,0)
+4016359^ATOMOXETINE 10MG CAP
+"DATA",176.112,21766,1)
+349591
+"DATA",176.112,21767,0)
+4016366^EZETIMIBE 10MG TAB
+"DATA",176.112,21767,1)
+349556
+"DATA",176.112,21768,0)
+4016367^EZETIMIBE 10MG TAB,UD
+"DATA",176.112,21768,1)
+349556
+"DATA",176.112,21769,0)
+4016346^METFORMIN HCL 500MG/ROSIGLITAZONE MALEATE 4MG TAB
+"DATA",176.112,21769,1)
+349554
+"DATA",176.112,21770,0)
+4016373^ARIPIPRAZOLE 20MG TAB,UD
+"DATA",176.112,21770,1)
+349553
+"DATA",176.112,21771,0)
+4016372^ARIPIPRAZOLE 20MG TAB
+"DATA",176.112,21771,1)
+349553
+"DATA",176.112,21772,0)
+4024981^GUAIFENESIN 595MG/PSEUDEPHEDRINE 48MG TAB,SA
+"DATA",176.112,21772,1)
+349551
+"DATA",176.112,21773,0)
+4016996^CARBINOXAMINE MALEATE 8MG/PSEUDOEPHEDRINE 80MG TAB,SA
+"DATA",176.112,21773,1)
+349548
+"DATA",176.112,21774,0)
+4016374^ARIPIPRAZOLE 30MG TAB
+"DATA",176.112,21774,1)
+349547
+"DATA",176.112,21775,0)
+4016375^ARIPIPRAZOLE 30MG TAB,UD
+"DATA",176.112,21775,1)
+349547
+"DATA",176.112,21776,0)
+4016368^ARIPIPRAZOLE 10MG TAB
+"DATA",176.112,21776,1)
+349545
+"DATA",176.112,21777,0)
+4016369^ARIPIPRAZOLE 10MG TAB,UD
+"DATA",176.112,21777,1)
+349545
+"DATA",176.112,21778,0)
+4016483^CELECOXIB 400MG CAP
+"DATA",176.112,21778,1)
+349514
+"DATA",176.112,21779,0)
+4016484^CELECOXIB 400MG CAP,UD
+"DATA",176.112,21779,1)
+349514
+"DATA",176.112,21780,0)
+4001285^CEFACLOR 500MG TAB,SA
+"DATA",176.112,21780,1)
+349508
+"DATA",176.112,21781,0)
+4001284^CEFACLOR 375MG TAB,SA
+"DATA",176.112,21781,1)
+349507
+"DATA",176.112,21782,0)
+4016485^LAMIVUDINE 300MG TAB
+"DATA",176.112,21782,1)
+349491
+"DATA",176.112,21783,0)
+4016370^ARIPIPRAZOLE 15MG TAB,UD
+"DATA",176.112,21783,1)
+349490
+"DATA",176.112,21784,0)
+4016371^ARIPIPRAZOLE 15MG TAB
+"DATA",176.112,21784,1)
+349490
+"DATA",176.112,21785,0)
+4016561^VALSARTAN 40MG TAB,UD
+"DATA",176.112,21785,1)
+349483
+"DATA",176.112,21786,0)
+4016560^VALSARTAN 40MG TAB
+"DATA",176.112,21786,1)
+349483
+"DATA",176.112,21787,0)
+4016247^SODIUM OXYBATE 500MG/ML SOLN,ORAL
+"DATA",176.112,21787,1)
+349482
+"DATA",176.112,21788,0)
+4016748^VARDENAFIL HCL 20MG TAB,PKG,6
+"DATA",176.112,21788,1)
+349480
+"DATA",176.112,21789,0)
+4016745^VARDENAFIL HCL 20MG TAB
+"DATA",176.112,21789,1)
+349480
+"DATA",176.112,21790,0)
+4016747^VARDENAFIL HCL 10MG TAB,PKG,6
+"DATA",176.112,21790,1)
+349479
+"DATA",176.112,21791,0)
+4016746^VARDENAFIL HCL 10MG TAB
+"DATA",176.112,21791,1)
+349479
+"DATA",176.112,21792,0)
+4016743^VARDENAFIL HCL 5MG TAB
+"DATA",176.112,21792,1)
+349478
+"DATA",176.112,21793,0)
+4015862^EFAVIRENZ 600MG TAB
+"DATA",176.112,21793,1)
+349477
+"DATA",176.112,21794,0)
+4016624^GEFITINIB 250MG TAB
+"DATA",176.112,21794,1)
+349472
+"DATA",176.112,21795,0)
+4016256^TEGASEROD MALEATE 6MG TAB
+"DATA",176.112,21795,1)
+349467
+"DATA",176.112,21796,0)
+4016255^TEGASEROD MALEATE 2MG TAB
+"DATA",176.112,21796,1)
+349466
+"DATA",176.112,21797,0)
+4015845^FROVATRIPTAN 2.5MG TAB,PKG,9
+"DATA",176.112,21797,1)
+349462
+"DATA",176.112,21798,0)
+4015844^FROVATRIPTAN 2.5MG TAB
+"DATA",176.112,21798,1)
+349462
+"DATA",176.112,21799,0)
+4025837^CHLORPHENIRAMINE 8MG/METHSCOPOLAMINE 2.5MG TAB,SA
+"DATA",176.112,21799,1)
+349456
+"DATA",176.112,21800,0)
+4006339^CTM 2MG/METHSCOPOLAMINE 0.625MG/P-EPHRINE 10MG/5ML SYRUP
+"DATA",176.112,21800,1)
+349448
+"DATA",176.112,21801,0)
+4017316^HYDROCHLOROTHIAZIDE 12.5MG/MOEXIPRIL HCL 15MG TAB
+"DATA",176.112,21801,1)
+349443
+"DATA",176.112,21802,0)
+4016235^AMLODIPINE BESYLATE 10MG/BENAZEPRIL HCL 20MG CAP
+"DATA",176.112,21802,1)
+349442
+"DATA",176.112,21803,0)
+4016243^VORICONAZOLE 50MG TAB
+"DATA",176.112,21803,1)
+349435
+"DATA",176.112,21804,0)
+4016244^VORICONAZOLE 200MG TAB
+"DATA",176.112,21804,1)
+349434
+"DATA",176.112,21805,0)
+4015838^DESLORATADINE 5MG TAB
+"DATA",176.112,21805,1)
+349420
+"DATA",176.112,21806,0)
+4015839^DESLORATADINE 5MG TAB,UD
+"DATA",176.112,21806,1)
+349420
+"DATA",176.112,21807,0)
+4016250^TREPROSTINIL NA 5MG/ML INJ,SOLN
+"DATA",176.112,21807,1)
+349410
+"DATA",176.112,21808,0)
+4016249^TREPROSTINIL NA 2.5MG/ML INJ,SOLN
+"DATA",176.112,21808,1)
+349409
+"DATA",176.112,21809,0)
+4016251^TREPROSTINIL NA 10MG/ML INJ,SOLN
+"DATA",176.112,21809,1)
+349408
+"DATA",176.112,21810,0)
+4016248^TREPROSTINIL NA 1MG/ML INJ,SOLN
+"DATA",176.112,21810,1)
+349407
+"DATA",176.112,21811,0)
+4016101^OLMESARTAN MEDOXOMIL 40MG TAB
+"DATA",176.112,21811,1)
+349405
+"DATA",176.112,21812,0)
+4016102^OLMESARTAN MEDOXOMIL 40MG TAB,UD
+"DATA",176.112,21812,1)
+349405
+"DATA",176.112,21813,0)
+4016099^OLMESARTAN MEDOXOMIL 20MG TAB
+"DATA",176.112,21813,1)
+349401
+"DATA",176.112,21814,0)
+4016100^OLMESARTAN MEDOXOMIL 20MG TAB,UD
+"DATA",176.112,21814,1)
+349401
+"DATA",176.112,21815,0)
+4016098^OLMESARTAN MEDOXOMIL 5MG TAB
+"DATA",176.112,21815,1)
+349373
+"DATA",176.112,21816,0)
+4024982^HYDROCODONE 5MG/GG 100MG/P-EPHINE 7.5MG/5ML SYRUP
+"DATA",176.112,21816,1)
+349368
+"DATA",176.112,21817,0)
+4024553^DIPHENHYDRAMINE TANNATE 25MG/5ML SUSP,ORAL
+"DATA",176.112,21817,1)
+349355
+"DATA",176.112,21818,0)
+4016241^HYDROCHLOROTHIAZIDE 25MG/VALSARTAN 160MG TAB,UD
+"DATA",176.112,21818,1)
+349353
+"DATA",176.112,21819,0)
+4016242^HYDROCHLOROTHIAZIDE 25MG/VALSARTAN 160MG TAB
+"DATA",176.112,21819,1)
+349353
+"DATA",176.112,21820,0)
+4016240^HYDROCHLORTHIAZIDE 25MG/VALSARTAN 160MG TAB
+"DATA",176.112,21820,1)
+349353
+"DATA",176.112,21821,0)
+4016811^UREA 40% GEL,TOP
+"DATA",176.112,21821,1)
+349352
+"DATA",176.112,21822,0)
+4004415^DESONIDE 0.05% CREAM,TOP
+"DATA",176.112,21822,1)
+349351
+"DATA",176.112,21823,0)
+4016018^DICLOFENAC NA 3% GEL,TOP
+"DATA",176.112,21823,1)
+349347
+"DATA",176.112,21824,0)
+4016812^SULFACETAMIDE NA 10%/SULFUR 5% CREAM,TOP
+"DATA",176.112,21824,1)
+349340
+"DATA",176.112,21825,0)
+4016265^MIDODRINE HCL 10MG TAB
+"DATA",176.112,21825,1)
+349334
+"DATA",176.112,21826,0)
+4016308^ESCITALOPRAM OXALATE 10MG TAB,UD
+"DATA",176.112,21826,1)
+349332
+"DATA",176.112,21827,0)
+4016307^ESCITALOPRAM OXALATE 10MG TAB
+"DATA",176.112,21827,1)
+349332
+"DATA",176.112,21828,0)
+4016383^PHENYTOIN NA,EXTENDED 300MG CAP,SA
+"DATA",176.112,21828,1)
+349330
+"DATA",176.112,21829,0)
+4016382^PHENYTOIN NA,EXTENDED 200MG CAP,SA
+"DATA",176.112,21829,1)
+349328
+"DATA",176.112,21830,0)
+4009069^DIGOXIN IMMUNE FAB (OVINE) 40MG/VIL INJ
+"DATA",176.112,21830,1)
+349326
+"DATA",176.112,21831,0)
+4015812^VALDECOXIB 20MG TAB,UD
+"DATA",176.112,21831,1)
+349321
+"DATA",176.112,21832,0)
+4015811^VALDECOXIB 20MG TAB
+"DATA",176.112,21832,1)
+349321
+"DATA",176.112,21833,0)
+4015810^VALDECOXIB 10MG TAB,UD
+"DATA",176.112,21833,1)
+349319
+"DATA",176.112,21834,0)
+4015809^VALDECOXIB 10MG TAB
+"DATA",176.112,21834,1)
+349319
+"DATA",176.112,21835,0)
+4015693^NESIRITIDE RECOMBINANT 1.5MG/VIL INJ
+"DATA",176.112,21835,1)
+349294
+"DATA",176.112,21836,0)
+4015682^FENOFIBRATE 160MG TAB
+"DATA",176.112,21836,1)
+349287
+"DATA",176.112,21837,0)
+4015888^BROMPHENIRAMINE 4MG/PSEUDOEPHEDRINE 45MG/5ML SYRUP
+"DATA",176.112,21837,1)
+349281
+"DATA",176.112,21838,0)
+4016900^OXYCODONE HCL 10MG/ACETAMINOPHEN 325MG TAB
+"DATA",176.112,21838,1)
+349279
+"DATA",176.112,21839,0)
+4024636^OXYCODONE HCL 7.5MG/ACETAMINOPHEN 325MG TAB
+"DATA",176.112,21839,1)
+349278
+"DATA",176.112,21840,0)
+4015688^DARBEPOETIN ALFA,RECOMBINANT 200MCG/ML INJ W/ALBUMIN
+"DATA",176.112,21840,1)
+349277
+"DATA",176.112,21841,0)
+4016381^DARBEPOETIN ALFA,RECOMBINANT 150MCG/0.75ML INJ W/ALBUMIN
+"DATA",176.112,21841,1)
+349277
+"DATA",176.112,21842,0)
+4015684^DARBEPOETIN ALFA,RECOMBINANT 200MCG/ML INJ ALBUMIN FREE
+"DATA",176.112,21842,1)
+349277
+"DATA",176.112,21843,0)
+4015692^DARBEPOETIN ALFA,RECOMBINANT 100MCG/ML INJ W/ALBUMIN
+"DATA",176.112,21843,1)
+349276
+"DATA",176.112,21844,0)
+4015687^DARBEPOETIN ALFA,RECOMBINANT 100MCG/ML INJ ALBUMIN FREE
+"DATA",176.112,21844,1)
+349276
+"DATA",176.112,21845,0)
+4015691^DARBEPOETIN ALFA,RECOMBINANT 60MCG/ML INJ W/ALBUMIN
+"DATA",176.112,21845,1)
+349275
+"DATA",176.112,21846,0)
+4015686^DARBEPOETIN ALFA,RECOMBINANT 60MCG/ML INJ ALBUMIN FREE
+"DATA",176.112,21846,1)
+349275
+"DATA",176.112,21847,0)
+4015685^DARBEPOETIN ALFA,RECOMBINANT 40MCG/ML INJ ALBUMIN FREE
+"DATA",176.112,21847,1)
+349274
+"DATA",176.112,21848,0)
+4015690^DARBEPOETIN ALFA,RECOMBINANT 40MCG/ML INJ W/ALBUMIN
+"DATA",176.112,21848,1)
+349274
+"DATA",176.112,21849,0)
+4015683^DARBEPOETIN ALFA,RECOMBINANT 25MCG/ML INJ ALBUMIN FREE
+"DATA",176.112,21849,1)
+349273
+"DATA",176.112,21850,0)
+4015689^DARBEPOETIN ALFA,RECOMBINANT 25MCG/ML INJ W/ALBUMIN
+"DATA",176.112,21850,1)
+349273
+"DATA",176.112,21851,0)
+4015827^BOSENTAN 62.5MG TAB
+"DATA",176.112,21851,1)
+349253
+"DATA",176.112,21852,0)
+4015712^TENOFOVIR DISOPROXIL FUMARATE 300MG TAB
+"DATA",176.112,21852,1)
+349251
+"DATA",176.112,21853,0)
+4016633^GALANTAMINE HYDROBROMIDE 4MG/ML SOLN,ORAL
+"DATA",176.112,21853,1)
+349246
+"DATA",176.112,21854,0)
+4015643^BRIMONIDINE TARTRATE 0.15% SOLN,OPH
+"DATA",176.112,21854,1)
+349236
+"DATA",176.112,21855,0)
+4015641^SIROLIMUS 1MG TAB,UD
+"DATA",176.112,21855,1)
+349208
+"DATA",176.112,21856,0)
+4015640^SIROLIMUS 1MG TAB
+"DATA",176.112,21856,1)
+349208
+"DATA",176.112,21857,0)
+4015758^VALSARTAN 160MG TAB
+"DATA",176.112,21857,1)
+349201
+"DATA",176.112,21858,0)
+4015759^VALSARTAN 160MG TAB,UD
+"DATA",176.112,21858,1)
+349201
+"DATA",176.112,21859,0)
+4015676^VALSARTAN 320MG TAB,UD
+"DATA",176.112,21859,1)
+349200
+"DATA",176.112,21860,0)
+4015677^VALSARTAN 320MG TAB
+"DATA",176.112,21860,1)
+349200
+"DATA",176.112,21861,0)
+4015761^VALSARTAN 80MG TAB,UD
+"DATA",176.112,21861,1)
+349199
+"DATA",176.112,21862,0)
+4015760^VALSARTAN 80MG TAB
+"DATA",176.112,21862,1)
+349199
+"DATA",176.112,21863,0)
+4017128^CLONAZEPAM 0.5MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,21863,1)
+349198
+"DATA",176.112,21864,0)
+4017125^CLONAZEPAM 2MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,21864,1)
+349197
+"DATA",176.112,21865,0)
+4017124^CLONAZEPAM 1MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,21865,1)
+349196
+"DATA",176.112,21866,0)
+4017126^CLONAZEPAM 0.25MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,21866,1)
+349195
+"DATA",176.112,21867,0)
+4017127^CLONAZEPAM 0.125MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,21867,1)
+349194
+"DATA",176.112,21868,0)
+4015717^ALBUTEROL SO4 3MG/IPRATROPIUM BR 0.5MG/3ML INHL,3ML
+"DATA",176.112,21868,1)
+349173
+"DATA",176.112,21869,0)
+4015496^FORMOTEROL FUMARATE 12MCG CAP,INHL
+"DATA",176.112,21869,1)
+349154
+"DATA",176.112,21870,0)
+4016770^BUDESONIDE 0.25MG/2ML SUSP,INH,2ML
+"DATA",176.112,21870,1)
+349094
+"DATA",176.112,21871,0)
+4015434^METOPROLOL SUCCINATE 25MG TAB,SA
+"DATA",176.112,21871,1)
+348999
+"DATA",176.112,21872,0)
+4025202^DOXYCYCLINE HYCLATE 75MG CAP,EC
+"DATA",176.112,21872,1)
+348870
+"DATA",176.112,21873,0)
+4025203^DOXYCYCLINE HYCLATE 100MG CAP,EC
+"DATA",176.112,21873,1)
+348869
+"DATA",176.112,21874,0)
+4005552^TOBRAMYCIN 300MG/5ML SOLN,INHL,ORAL,5ML
+"DATA",176.112,21874,1)
+348719
+"DATA",176.112,21875,0)
+4008080^UROFOLLITROPIN 150UNT/VIL INJ
+"DATA",176.112,21875,1)
+348522
+"DATA",176.112,21876,0)
+4008078^UROFOLLITROPIN 150UNT/AMP INJ
+"DATA",176.112,21876,1)
+348522
+"DATA",176.112,21877,0)
+4010301^ITRACONAZOLE 50MG/5ML SOLN,ORAL
+"DATA",176.112,21877,1)
+348506
+"DATA",176.112,21878,0)
+4001730^PROCAINAMIDE HCL 1000MG TAB,SA
+"DATA",176.112,21878,1)
+348499
+"DATA",176.112,21879,0)
+4012945^RETEPLASE,RECOMBINANT 10UNT/VIL INJ,KIT
+"DATA",176.112,21879,1)
+348493
+"DATA",176.112,21880,0)
+4001017^MORPHINE SO4 100MG CAP,SA
+"DATA",176.112,21880,1)
+348445
+"DATA",176.112,21881,0)
+4001016^MORPHINE SO4 50MG CAP,SA
+"DATA",176.112,21881,1)
+348444
+"DATA",176.112,21882,0)
+4001015^MORPHINE SO4 20MG CAP,SA
+"DATA",176.112,21882,1)
+348443
+"DATA",176.112,21883,0)
+4004659^CODEINE 20MG/PSEUDOEPHEDRINE 60MG/5ML SYRUP
+"DATA",176.112,21883,1)
+348369
+"DATA",176.112,21884,0)
+4017336^AMYLASE 40000UNT/LIPASE 8000UNT/PROTEASE 45000UNT CAP,EC
+"DATA",176.112,21884,1)
+348295
+"DATA",176.112,21885,0)
+4006721^HYOSCYAMINE SO4 0.375MG TAB,SA
+"DATA",176.112,21885,1)
+348186
+"DATA",176.112,21886,0)
+4004755^AMYLASE 16600UNT/LIPASE 5000UNT/PROTEASE 18750UNT CAP
+"DATA",176.112,21886,1)
+348177
+"DATA",176.112,21887,0)
+4005394^GUAIFENESIN 400MG/PSEUDOEPHEDRINE 120MG TAB,SA
+"DATA",176.112,21887,1)
+348021
+"DATA",176.112,21888,0)
+4025135^AMYLASE 58500UNIT/LIPASE 18000UNIT/PROTEASE 58500UNIT CAP,EC
+"DATA",176.112,21888,1)
+347980
+"DATA",176.112,21889,0)
+4005437^HC 1%/N-MYCIN 5MG/POLYMYX 10000UNT/ML SUSP,OPH
+"DATA",176.112,21889,1)
+347975
+"DATA",176.112,21890,0)
+4010296^MILRINONE LACTATE 1MG/ML INJ
+"DATA",176.112,21890,1)
+347930
+"DATA",176.112,21891,0)
+4013461^MILRINONE LACTATE 1MG/ML INJ,CARTRIDGE W/NDL,5ML
+"DATA",176.112,21891,1)
+347930
+"DATA",176.112,21892,0)
+4010297^MILRINONE LACTATE 1MG/ML INJ,CARPUJECT,5ML
+"DATA",176.112,21892,1)
+347930
+"DATA",176.112,21893,0)
+4008074^FOLLICLE STIMULATING 150UNT/LUTEINIZING HORMONE 150UNT/AMP INJ
+"DATA",176.112,21893,1)
+347764
+"DATA",176.112,21894,0)
+4008076^FOLLICLE STIMULATING 150UNT/LUTEINIZING HORMONE 150UNT/VIL INJ
+"DATA",176.112,21894,1)
+347764
+"DATA",176.112,21895,0)
+4005428^HC 1%/N-MYCIN 5MG/POLYMYX 10000UNT/ML SOLN,OTIC
+"DATA",176.112,21895,1)
+347690
+"DATA",176.112,21896,0)
+4007097^APAP 325MG/CTM 4MG/P-PROPANOL 25MG/P-TOLOXAMINE 25MG CAP
+"DATA",176.112,21896,1)
+347681
+"DATA",176.112,21897,0)
+4004922^SODIUM FLUORIDE 1.23% GEL
+"DATA",176.112,21897,1)
+347669
+"DATA",176.112,21898,0)
+4005416^GUAIFENESIN 600MG/PSEUDOEPHEDRINE 60MG TAB,SA
+"DATA",176.112,21898,1)
+347165
+"DATA",176.112,21899,0)
+4007073^CROMOLYN NA 10MG/ML SOLN,INHL,2ML VIL
+"DATA",176.112,21899,1)
+347163
+"DATA",176.112,21900,0)
+4007882^PHOSPHORIC ACID 0.555GM/NA FLUORIDE 2.7GM GEL
+"DATA",176.112,21900,1)
+347052
+"DATA",176.112,21901,0)
+4001132^TESTOSTERONE 50MG/ML INJ,SUSP
+"DATA",176.112,21901,1)
+346968
+"DATA",176.112,21902,0)
+4007320^BROMPHENIRAMINE 4MG/PSEUDOEPHEDRINE 30MG/5ML SYRUP
+"DATA",176.112,21902,1)
+346966
+"DATA",176.112,21903,0)
+4005706^APAP 325MG/P-PROPANOL 25MG/P-TOLOXAMINE 22MG TAB
+"DATA",176.112,21903,1)
+346913
+"DATA",176.112,21904,0)
+4007677^CTM 2MG/DM 15MG/P-EPHRINE 5MG/P-PROPANOL 5MG/5ML SYRUP
+"DATA",176.112,21904,1)
+346902
+"DATA",176.112,21905,0)
+4005925^ALCOHOL 5%/DEXTROSE 5% INJ
+"DATA",176.112,21905,1)
+346806
+"DATA",176.112,21906,0)
+4005926^ALCOHOL 10%/DEXTROSE 5% INJ
+"DATA",176.112,21906,1)
+346805
+"DATA",176.112,21907,0)
+4001621^TRIAMCINOLONE DIACETATE 25MG/ML INJ,SUSP
+"DATA",176.112,21907,1)
+346775
+"DATA",176.112,21908,0)
+4004910^STREPTOKINASE 750000UNT/VIL INJ
+"DATA",176.112,21908,1)
+346773
+"DATA",176.112,21909,0)
+4002507^PHENYTOIN NA 30MG CAP
+"DATA",176.112,21909,1)
+346593
+"DATA",176.112,21910,0)
+4003685^THEOPHYLLINE,ANHYDROUS 200MG TAB,SA
+"DATA",176.112,21910,1)
+346574
+"DATA",176.112,21911,0)
+4003651^THEOPHYLLINE 200MG TAB,SA
+"DATA",176.112,21911,1)
+346574
+"DATA",176.112,21912,0)
+4015657^AMYLASE 20000UNT/LIPASE 4500UNT/PROTEASE 25000UNT CAP,EC
+"DATA",176.112,21912,1)
+346573
+"DATA",176.112,21913,0)
+4009284^RAMIPRIL 1.25MG CAP
+"DATA",176.112,21913,1)
+346568
+"DATA",176.112,21914,0)
+4001139^TESTOSTERONE 100MG/ML INJ (IN OIL)
+"DATA",176.112,21914,1)
+346536
+"DATA",176.112,21915,0)
+4001134^TESTOSTERONE 100MG/ML INJ,SUSP
+"DATA",176.112,21915,1)
+346536
+"DATA",176.112,21916,0)
+4003432^METHYLPREDNISOLONE ACETATE 40MG/ML INJ,SUSP
+"DATA",176.112,21916,1)
+346535
+"DATA",176.112,21917,0)
+4001726^PROCAINAMIDE HCL 500MG TAB,SA
+"DATA",176.112,21917,1)
+346503
+"DATA",176.112,21918,0)
+4015849^TRIAMCINOLONE ACETONIDE 0.147MG/GM AEROSOL,TOP,63GM
+"DATA",176.112,21918,1)
+346498
+"DATA",176.112,21919,0)
+4001602^TRIAMCINOLONE ACETONIDE 0.025% LOTION
+"DATA",176.112,21919,1)
+346495
+"DATA",176.112,21920,0)
+4016273^SOMATROPIN 5MG/1.5ML INJ,SOLN,CARTRIDGE
+"DATA",176.112,21920,1)
+346494
+"DATA",176.112,21921,0)
+4003044^PREDNISOLONE NA PHOSPHATE 0.125% SOLN,OPH
+"DATA",176.112,21921,1)
+345131
+"DATA",176.112,21922,0)
+4003056^GOLD NA THIOMALATE 50MG/ML INJ
+"DATA",176.112,21922,1)
+343051
+"DATA",176.112,21923,0)
+4004883^CEFOTETAN DISODIUM 1GM/VIL INJ
+"DATA",176.112,21923,1)
+343049
+"DATA",176.112,21924,0)
+4004886^CEFOTETAN DISODIUM 1GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,21924,1)
+343049
+"DATA",176.112,21925,0)
+4002810^DEXAMETHASONE 0.75MG TAB
+"DATA",176.112,21925,1)
+343033
+"DATA",176.112,21926,0)
+4015860^DEXTROMETHORPHAN 60MG/GUAIFENESIN 1200MG TAB,SA
+"DATA",176.112,21926,1)
+343032
+"DATA",176.112,21927,0)
+4014328^DEXTROMETHORPHAN 30MG/GUAIFENESIN 500MG TAB,SA
+"DATA",176.112,21927,1)
+343029
+"DATA",176.112,21928,0)
+4003033^PREDNISOLONE ACETATE 1% SUSP,OPH
+"DATA",176.112,21928,1)
+343019
+"DATA",176.112,21929,0)
+4004611^METOPROLOL SUCCINATE 50MG TAB,SA
+"DATA",176.112,21929,1)
+343005
+"DATA",176.112,21930,0)
+4004612^METOPROLOL SUCCINATE 100MG TAB,SA
+"DATA",176.112,21930,1)
+343003
+"DATA",176.112,21931,0)
+4005003^ESTRONE 2MG/ML INJ,SUSP
+"DATA",176.112,21931,1)
+343002
+"DATA",176.112,21932,0)
+4003085^CEFTIZOXIME NA 40MG/ML/DEXTROSE 5% INJ,BAG,50ML
+"DATA",176.112,21932,1)
+342959
+"DATA",176.112,21933,0)
+4003083^CEFTIZOXIME NA 40MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,21933,1)
+342959
+"DATA",176.112,21934,0)
+4003079^CEFTIZOXIME NA 1GM/ADD-VANTAGE VIL INJ
+"DATA",176.112,21934,1)
+342958
+"DATA",176.112,21935,0)
+4003080^CEFTIZOXIME NA 2GM/PB VIL INJ
+"DATA",176.112,21935,1)
+342958
+"DATA",176.112,21936,0)
+4003082^CEFTIZOXIME NA 20MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,21936,1)
+342958
+"DATA",176.112,21937,0)
+4003084^CEFTIZOXIME NA 20MG/ML/DEXTROSE 5% INJ,BAG,50ML
+"DATA",176.112,21937,1)
+342958
+"DATA",176.112,21938,0)
+4003081^CEFTIZOXIME NA 2GM/ADD-VANTAGE VIL INJ
+"DATA",176.112,21938,1)
+342958
+"DATA",176.112,21939,0)
+4003077^CEFTIZOXIME NA 500MG/VIL INJ
+"DATA",176.112,21939,1)
+342957
+"DATA",176.112,21940,0)
+4008282^CEFOXITIN NA 40MG/ML/DEXTROSE 2.2% INJ,BAG,50ML
+"DATA",176.112,21940,1)
+342904
+"DATA",176.112,21941,0)
+4008280^CEFOXITIN NA 40MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,21941,1)
+342904
+"DATA",176.112,21942,0)
+4002989^CEFOXITIN NA 40MG/ML INJ
+"DATA",176.112,21942,1)
+342904
+"DATA",176.112,21943,0)
+4003512^HYDROCORTISONE 1.5%/NEOMYCIN SO4 5MG/ML SOLN,OPH
+"DATA",176.112,21943,1)
+340280
+"DATA",176.112,21944,0)
+4009596^ZINC 25MG TAB
+"DATA",176.112,21944,1)
+340278
+"DATA",176.112,21945,0)
+4004336^TETRACAINE HCL 0.5% OINT,OPH
+"DATA",176.112,21945,1)
+340276
+"DATA",176.112,21946,0)
+4007508^DEXTRAN-75,6% INJ
+"DATA",176.112,21946,1)
+340275
+"DATA",176.112,21947,0)
+4005927^DEXTRAN-75,6%/NACL 0.9% INJ
+"DATA",176.112,21947,1)
+340275
+"DATA",176.112,21948,0)
+4005928^DEXTRAN-75,6%/DEXTROSE 5% INJ
+"DATA",176.112,21948,1)
+340275
+"DATA",176.112,21949,0)
+4002671^INDOMETHACIN 100MG CAP
+"DATA",176.112,21949,1)
+333823
+"DATA",176.112,21950,0)
+4009550^BISMUTH SUBSALICYLATE 300MG TAB
+"DATA",176.112,21950,1)
+328164
+"DATA",176.112,21951,0)
+4003426^METHYLPREDNISOLONE 16MG TAB
+"DATA",176.112,21951,1)
+328161
+"DATA",176.112,21952,0)
+4006450^CYCLOSPORINE 100MG CAP
+"DATA",176.112,21952,1)
+328160
+"DATA",176.112,21953,0)
+4006453^CYCLOSPORINE MICROEMULSION 100MG CAP
+"DATA",176.112,21953,1)
+328160
+"DATA",176.112,21954,0)
+4024808^CYCLOSPORINE NON-MODIFIED 100MG CAP
+"DATA",176.112,21954,1)
+328160
+"DATA",176.112,21955,0)
+4005751^ASPIRIN 81MG TAB,CHEWABLE
+"DATA",176.112,21955,1)
+318272
+"DATA",176.112,21956,0)
+4004079^PHENYLEPHRINE HCL 0.1%/PYRILAMINE MALEATE 0.12% SOLN,OPH
+"DATA",176.112,21956,1)
+318270
+"DATA",176.112,21957,0)
+4002005^TETANUS TOXOID FLUID INJ
+"DATA",176.112,21957,1)
+318242
+"DATA",176.112,21958,0)
+4002006^TETANUS TOXOID PUROGENATED INJ
+"DATA",176.112,21958,1)
+318241
+"DATA",176.112,21959,0)
+4001136^TESTOSTERONE 75MG PELLET
+"DATA",176.112,21959,1)
+318240
+"DATA",176.112,21960,0)
+4003020^HEPATITIS B SURFACE ANTIGEN 10MCG/0.5ML INJ
+"DATA",176.112,21960,1)
+318236
+"DATA",176.112,21961,0)
+4003019^HEPATITIS B SURFACE ANTIGEN 20MCG/ML INJ
+"DATA",176.112,21961,1)
+318236
+"DATA",176.112,21962,0)
+4001179^TRISULFAPYRIMIDINES 500MG/5ML SUSP
+"DATA",176.112,21962,1)
+318218
+"DATA",176.112,21963,0)
+4001178^TRISULFAPYRIMIDINES 500MG TAB
+"DATA",176.112,21963,1)
+318217
+"DATA",176.112,21964,0)
+4005295^TRIPLE SULFA TAB,VAG
+"DATA",176.112,21964,1)
+318215
+"DATA",176.112,21965,0)
+4007513^SODIUM SALICYLATE 325MG TAB,EC
+"DATA",176.112,21965,1)
+318213
+"DATA",176.112,21966,0)
+4007514^SODIUM SALICYLATE 650MG TAB,EC
+"DATA",176.112,21966,1)
+318212
+"DATA",176.112,21967,0)
+4003585^POTASSIUM GLUCONATE 6.66MEQ TAB
+"DATA",176.112,21967,1)
+318211
+"DATA",176.112,21968,0)
+4006293^PHOSPHORUS 3MMOL/SODIUM 4.4MEQ/ML (PF) INJ
+"DATA",176.112,21968,1)
+318209
+"DATA",176.112,21969,0)
+4006291^PHOSPHORUS 3MMOL/SODIUM 4MEQ/ML INJ,CONC
+"DATA",176.112,21969,1)
+318209
+"DATA",176.112,21970,0)
+4006189^PHOSPHORUS 3MMOL/POTASSIUM 4.4MEQ/ML (PF) INJ
+"DATA",176.112,21970,1)
+318207
+"DATA",176.112,21971,0)
+4006187^PHOSPHORUS 3MMOL/POTASSIUM 4.4MEQ/ML INJ
+"DATA",176.112,21971,1)
+318207
+"DATA",176.112,21972,0)
+4001564^ERYTHROMYCIN 2% SOLN,TOP
+"DATA",176.112,21972,1)
+318202
+"DATA",176.112,21973,0)
+4001565^ERYTHROMYCIN 2% PLEDGET SOLN,TOP
+"DATA",176.112,21973,1)
+318202
+"DATA",176.112,21974,0)
+4007979^CTM 2MG/GG 100MG/PSEUDEFED 30MG CAP
+"DATA",176.112,21974,1)
+318193
+"DATA",176.112,21975,0)
+4002390^ERGOLOID MESYLATES 1MG TAB,SUBLINGUAL
+"DATA",176.112,21975,1)
+318180
+"DATA",176.112,21976,0)
+4002388^ERGOLOID MESYLATES 1MG TAB,ORAL
+"DATA",176.112,21976,1)
+318179
+"DATA",176.112,21977,0)
+4002389^ERGOLOID MESYLATES 0.5MG TAB,SUBLINGUAL
+"DATA",176.112,21977,1)
+318178
+"DATA",176.112,21978,0)
+4010082^DEXTROSE 1.87GM/LEVULOSE 1.87GM/PHOSPHORIC ACID 21.5MG/5ML SOLN
+"DATA",176.112,21978,1)
+318146
+"DATA",176.112,21979,0)
+4012512^SALMETEROL XINAFOATE 50MCG/BLISTER INHL,ORAL,DISKUS,28
+"DATA",176.112,21979,1)
+318142
+"DATA",176.112,21980,0)
+4012511^SALMETEROL XINAFOATE 50MCG/BLISTER INHL,ORAL,DISKUS,60
+"DATA",176.112,21980,1)
+318142
+"DATA",176.112,21981,0)
+4005106^DESOXYCORTICOSTERONE ACETATE 125MG PELLET
+"DATA",176.112,21981,1)
+318126
+"DATA",176.112,21982,0)
+4012126^CONTACT LENS (FOR HARD LENS) SOAKING SOLN
+"DATA",176.112,21982,1)
+318117
+"DATA",176.112,21983,0)
+4008088^CALCIUM CARBONATE 500MG TAB
+"DATA",176.112,21983,1)
+318076
+"DATA",176.112,21984,0)
+4006729^HYOSCYAMINE SO4 0.1296MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,21984,1)
+318037
+"DATA",176.112,21985,0)
+4005064^HYDROXYZINE HCL 10MG/PENTAERYTHRITOL TETRANITRATE 10MG TAB
+"DATA",176.112,21985,1)
+318034
+"DATA",176.112,21986,0)
+4007576^ASAFETIDA 60MG/CAPSICUM 8MG/CASCARA 60MG/GINGER/NUX VOMICA TAB
+"DATA",176.112,21986,1)
+317904
+"DATA",176.112,21987,0)
+4003679^THEOPHYLLINE 250MG CAP,SA
+"DATA",176.112,21987,1)
+317869
+"DATA",176.112,21988,0)
+4003655^THEOPHYLLINE,ANHYDROUS 250MG CAP,SA
+"DATA",176.112,21988,1)
+317869
+"DATA",176.112,21989,0)
+4008096^CALCIUM CARBONATE 400MG TAB,CHEWABLE
+"DATA",176.112,21989,1)
+317865
+"DATA",176.112,21990,0)
+4007732^CA CARB 325MG/MG OH 325MG/PHENOBARB 8MG TAB
+"DATA",176.112,21990,1)
+317862
+"DATA",176.112,21991,0)
+4004731^AMYLASE 20000UNT/LIPASE 4000UNT/PROTEASE 25000UNT CAP
+"DATA",176.112,21991,1)
+317859
+"DATA",176.112,21992,0)
+4005604^BELLADONNA EXTRACT 15MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,21992,1)
+317855
+"DATA",176.112,21993,0)
+4004785^BELLADONNA 15MG/BUTABARBITAL NA 15MG TAB
+"DATA",176.112,21993,1)
+317854
+"DATA",176.112,21994,0)
+4004784^BELLADONNA EXTRACT 15MG/BUTABARBITAL NA 15MG TAB
+"DATA",176.112,21994,1)
+317854
+"DATA",176.112,21995,0)
+4001269^BELLADONNA ALKALOIDS 0.27MG/ML TINCTURE
+"DATA",176.112,21995,1)
+317853
+"DATA",176.112,21996,0)
+4004654^MORPHINE SO4 16MG/ATROPINE SO4 0.4MG/ML INJ
+"DATA",176.112,21996,1)
+317850
+"DATA",176.112,21997,0)
+4004626^BELLADONNA ALKALOIDS 0.126MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,21997,1)
+317849
+"DATA",176.112,21998,0)
+4004630^BELLADONNA ALKALOIDS 0.13MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,21998,1)
+317848
+"DATA",176.112,21999,0)
+4003680^THEOPHYLLINE 130MG CAP,SA
+"DATA",176.112,21999,1)
+317831
+"DATA",176.112,22000,0)
+4003674^THEOPHYLLINE,ANHYDROUS 130MG CAP,SA
+"DATA",176.112,22000,1)
+317831
+"DATA",176.112,22001,0)
+4006687^DILTIAZEM HCL 120MG CAP,SA
+"DATA",176.112,22001,1)
+317815
+"DATA",176.112,22002,0)
+4013398^LYME DISEASE VACCINE 30MCG/0.5ML INJ
+"DATA",176.112,22002,1)
+317809
+"DATA",176.112,22003,0)
+4009831^ALUMINUM ACETATE 10%/ZINC OXIDE 85% PASTE,TOP
+"DATA",176.112,22003,1)
+317805
+"DATA",176.112,22004,0)
+4001444^INSULIN,LENTE,PORK/PURIFIED 100UNT/ML INJ
+"DATA",176.112,22004,1)
+317800
+"DATA",176.112,22005,0)
+4002599^HYDROXYZINE HCL 50MG/ML INJ
+"DATA",176.112,22005,1)
+317799
+"DATA",176.112,22006,0)
+4002600^HYDROXYZINE HCL 25MG/ML INJ
+"DATA",176.112,22006,1)
+317798
+"DATA",176.112,22007,0)
+4002335^LEVOTHYROXINE NA 0.088MG TAB
+"DATA",176.112,22007,1)
+317797
+"DATA",176.112,22008,0)
+4006719^HYOSCYAMINE SO4 0.15MG TAB
+"DATA",176.112,22008,1)
+317796
+"DATA",176.112,22009,0)
+4003668^THEOPHYLLINE,ANHYDROUS 300MG TAB,SA
+"DATA",176.112,22009,1)
+317769
+"DATA",176.112,22010,0)
+4003652^THEOPHYLLINE 300MG TAB,SA
+"DATA",176.112,22010,1)
+317769
+"DATA",176.112,22011,0)
+4015716^THEOPHYLLINE 300MG TAB,SA (INWOOD)
+"DATA",176.112,22011,1)
+317769
+"DATA",176.112,22012,0)
+4015954^THEOPHYLLINE,ANHYDROUS 300MG TAB,SA,UD
+"DATA",176.112,22012,1)
+317769
+"DATA",176.112,22013,0)
+4014077^PIOGLITAZONE HCL 15MG TAB
+"DATA",176.112,22013,1)
+317573
+"DATA",176.112,22014,0)
+4005679^OXYTETRACYCLINE HCL 250MG CAP
+"DATA",176.112,22014,1)
+317570
+"DATA",176.112,22015,0)
+4004376^LIDOCAINE HCL 2% INJ
+"DATA",176.112,22015,1)
+317567
+"DATA",176.112,22016,0)
+4004395^LIDOCAINE HCL 2% (PF) INJ
+"DATA",176.112,22016,1)
+317567
+"DATA",176.112,22017,0)
+4004383^LIDOCAINE HCL 2% SOLN,ITRC
+"DATA",176.112,22017,1)
+317567
+"DATA",176.112,22018,0)
+4004382^LIDOCAINE HCL 20MG/ML INJ
+"DATA",176.112,22018,1)
+317567
+"DATA",176.112,22019,0)
+4004407^LIDOCAINE HCL 20MG/ML (PF) INJ
+"DATA",176.112,22019,1)
+317567
+"DATA",176.112,22020,0)
+4004319^IOHEXOL 755MG/ML INJ
+"DATA",176.112,22020,1)
+317566
+"DATA",176.112,22021,0)
+4001687^HYDROXYPROGESTERONE CAPROATE 250MG/ML INJ
+"DATA",176.112,22021,1)
+317565
+"DATA",176.112,22022,0)
+4001689^HYDROXYPROGESTERONE CAPROATE 250MG/ML INJ,REPOSITORY
+"DATA",176.112,22022,1)
+317565
+"DATA",176.112,22023,0)
+4002902^HYDROCORTISONE ACETATE 1% AEROSOL,TOP
+"DATA",176.112,22023,1)
+317564
+"DATA",176.112,22024,0)
+4002943^HYDROCORTISONE 1% AEROSOL,TOP
+"DATA",176.112,22024,1)
+317564
+"DATA",176.112,22025,0)
+4005131^THROMBIN 1000UNT/VIL PWDR,TOP
+"DATA",176.112,22025,1)
+317283
+"DATA",176.112,22026,0)
+4006700^ORPHENADRINE CITRATE 30MG/2ML INJ
+"DATA",176.112,22026,1)
+317282
+"DATA",176.112,22027,0)
+4014495^QUETIAPINE FUMARATE 200MG TAB,UD
+"DATA",176.112,22027,1)
+317174
+"DATA",176.112,22028,0)
+4013117^QUETIAPINE FUMARATE 200MG TAB
+"DATA",176.112,22028,1)
+317174
+"DATA",176.112,22029,0)
+4013917^CAPTOPRIL 25MG TAB,UD
+"DATA",176.112,22029,1)
+317173
+"DATA",176.112,22030,0)
+4001735^CAPTOPRIL 25MG TAB
+"DATA",176.112,22030,1)
+317173
+"DATA",176.112,22031,0)
+4003009^WATER/METHYLPARABEN 0.1%/PROPYLPARABEN 0.025% INJ
+"DATA",176.112,22031,1)
+317169
+"DATA",176.112,22032,0)
+4003518^WATER/BENZYL ALCOHOL 0.5% INJ
+"DATA",176.112,22032,1)
+317168
+"DATA",176.112,22033,0)
+4004335^TETRACAINE HCL 2% SOLN,TOP
+"DATA",176.112,22033,1)
+317161
+"DATA",176.112,22034,0)
+4014182^TEMOZOLOMIDE 100MG CAP
+"DATA",176.112,22034,1)
+317160
+"DATA",176.112,22035,0)
+4004921^SODIUM FLUORIDE 1MG LOZENGE
+"DATA",176.112,22035,1)
+317156
+"DATA",176.112,22036,0)
+4008740^SILICONE 30%/STARCH 10% OINT,TOP
+"DATA",176.112,22036,1)
+317154
+"DATA",176.112,22037,0)
+4008711^SALICYLIC ACID 1.5%/SULFUR 2% LIQUID,TOP
+"DATA",176.112,22037,1)
+317153
+"DATA",176.112,22038,0)
+4008712^SALICYLIC ACID 2%/SULFUR 1.5% LIQUID,TOP
+"DATA",176.112,22038,1)
+317153
+"DATA",176.112,22039,0)
+4005855^SALICYLIC ACID 2% CREAM
+"DATA",176.112,22039,1)
+317152
+"DATA",176.112,22040,0)
+4005859^SALICYLIC ACID 2% CREAM,TOP
+"DATA",176.112,22040,1)
+317152
+"DATA",176.112,22041,0)
+4014070^RITONAVIR 100MG (SOFT GELATIN) CAP
+"DATA",176.112,22041,1)
+317150
+"DATA",176.112,22042,0)
+4012899^RITONAVIR 100MG CAP
+"DATA",176.112,22042,1)
+317150
+"DATA",176.112,22043,0)
+4014340^PROPRANOLOL HCL 10MG TAB,UD
+"DATA",176.112,22043,1)
+317148
+"DATA",176.112,22044,0)
+4002373^PROPRANOLOL HCL 10MG TAB
+"DATA",176.112,22044,1)
+317148
+"DATA",176.112,22045,0)
+4008174^POVIDONE IODINE 5% CREAM,TOP
+"DATA",176.112,22045,1)
+317146
+"DATA",176.112,22046,0)
+4008182^POVIDONE IODINE 1% SOLN,TOP
+"DATA",176.112,22046,1)
+317145
+"DATA",176.112,22047,0)
+4009498^PIPERONYL BUTOXIDE 2%/PYRETHRINS 0.3% LIQUID,TOP
+"DATA",176.112,22047,1)
+317143
+"DATA",176.112,22048,0)
+4006120^OXYTOCIN 0.01UNT/ML/DEXTROSE 5% INJ
+"DATA",176.112,22048,1)
+317139
+"DATA",176.112,22049,0)
+4003451^NOVOBIOCIN NA 250MG CAP
+"DATA",176.112,22049,1)
+317137
+"DATA",176.112,22050,0)
+4001217^NORTRIPTYLINE HCL 25MG CAP
+"DATA",176.112,22050,1)
+317136
+"DATA",176.112,22051,0)
+4013964^NORTRIPTYLINE HCL 25MG CAP,UD
+"DATA",176.112,22051,1)
+317136
+"DATA",176.112,22052,0)
+4006744^NIACINAMIDE 100MG/ML INJ
+"DATA",176.112,22052,1)
+317135
+"DATA",176.112,22053,0)
+4001013^MORPHINE SO4 10MG/ML (PF) INJ,SELECT-A-JET,20ML
+"DATA",176.112,22053,1)
+317131
+"DATA",176.112,22054,0)
+4001009^MORPHINE SO4 10MG/ML (PF) INJ
+"DATA",176.112,22054,1)
+317131
+"DATA",176.112,22055,0)
+4000982^MORPHINE SO4 10MG/ML INJ
+"DATA",176.112,22055,1)
+317131
+"DATA",176.112,22056,0)
+4009726^MIVACURIUM CL 2MG/ML INJ
+"DATA",176.112,22056,1)
+317130
+"DATA",176.112,22057,0)
+4015454^MISOPROSTOL 200MCG TAB,UD
+"DATA",176.112,22057,1)
+317128
+"DATA",176.112,22058,0)
+4008344^MISOPROSTOL 200MCG TAB
+"DATA",176.112,22058,1)
+317128
+"DATA",176.112,22059,0)
+4002786^MINOCYCLINE HCL 100MG/VIL INJ
+"DATA",176.112,22059,1)
+317127
+"DATA",176.112,22060,0)
+4000968^MAGNESIUM SO4 4MEQ/ML (PF) INJ
+"DATA",176.112,22060,1)
+317121
+"DATA",176.112,22061,0)
+4000964^MAGNESIUM SO4 4MEQ/ML INJ
+"DATA",176.112,22061,1)
+317121
+"DATA",176.112,22062,0)
+4008704^MAGNESIUM OXIDE 600MG/PYRIDOXINE HCL 25MG TAB
+"DATA",176.112,22062,1)
+317120
+"DATA",176.112,22063,0)
+4002791^LOXAPINE HCL 25MG/ML LIQUID,ORAL
+"DATA",176.112,22063,1)
+317119
+"DATA",176.112,22064,0)
+4005916^LIDOCAINE HCL 0.5%/EPINEPHRINE 1:200000 INJ
+"DATA",176.112,22064,1)
+317118
+"DATA",176.112,22065,0)
+4010132^ISOSORBIDE MONONITRATE 30MG TAB,SA
+"DATA",176.112,22065,1)
+317110
+"DATA",176.112,22066,0)
+4002981^HYDROXOCOBALAMIN ACETATE 1000MCG/ML INJ
+"DATA",176.112,22066,1)
+317106
+"DATA",176.112,22067,0)
+4002980^HYDROXOCOBALAMIN 1000MCG/ML INJ
+"DATA",176.112,22067,1)
+317106
+"DATA",176.112,22068,0)
+4005030^GLYCERIN 50% INJECTION
+"DATA",176.112,22068,1)
+317104
+"DATA",176.112,22069,0)
+4009679^GLUTARALDEHYDE 2% SOLN
+"DATA",176.112,22069,1)
+317102
+"DATA",176.112,22070,0)
+4014221^ENTACAPONE 200MG TAB
+"DATA",176.112,22070,1)
+317094
+"DATA",176.112,22071,0)
+4008061^DOCUSATE NA 100MG TAB
+"DATA",176.112,22071,1)
+317090
+"DATA",176.112,22072,0)
+4002565^DIPHENHYDRAMINE HCL 2% SPRAY,TOP
+"DATA",176.112,22072,1)
+317089
+"DATA",176.112,22073,0)
+4012128^CTM 0.06%/ALCOHOL 35%/PYRILAMINE 0.44% LOTION
+"DATA",176.112,22073,1)
+317084
+"DATA",176.112,22074,0)
+4005577^COAL TAR 2% OINT,TOP
+"DATA",176.112,22074,1)
+317080
+"DATA",176.112,22075,0)
+4002165^CHLORDIAZEPOXIDE 10MG/ESTROGENS,ESTERIFIED 0.4MG TAB
+"DATA",176.112,22075,1)
+317077
+"DATA",176.112,22076,0)
+4003076^CEFTIZOXIME NA 10GM/VIL INJ
+"DATA",176.112,22076,1)
+317075
+"DATA",176.112,22077,0)
+4005091^CAFFEINE 100MG/ERGOTAMINE TARTRATE 1MG TAB
+"DATA",176.112,22077,1)
+317069
+"DATA",176.112,22078,0)
+4004274^BUPIVACAINE HCL 0.25%/EPINEPHRINE 1:200000 INJ
+"DATA",176.112,22078,1)
+317067
+"DATA",176.112,22079,0)
+4009501^APAP 125MG/DM 5MG/GG 50MG/PSEUDEFED 15MG/5ML LIQUID
+"DATA",176.112,22079,1)
+317060
+"DATA",176.112,22080,0)
+4012118^ALUMINUM CL 25%/HYDROXYQUINOLINE 0.1%/TETRACAINE 0.25% SOLN,TOP
+"DATA",176.112,22080,1)
+317059
+"DATA",176.112,22081,0)
+4006790^ALUMINUM CHLORIDE 10% PASTE
+"DATA",176.112,22081,1)
+317058
+"DATA",176.112,22082,0)
+4004422^ALLERGENIC EXTRACT, 9 GRASS MIX, SOUTHERN 10000PNU/ML INJ
+"DATA",176.112,22082,1)
+317056
+"DATA",176.112,22083,0)
+4008859^AL OH 200MG/MG OH 200MG/SIMETHICONE 20MG TAB,CHEWABLE
+"DATA",176.112,22083,1)
+317055
+"DATA",176.112,22084,0)
+4009731^NA FLUORIDE 0.2MG/SD ALCOHOL 38-B 6.65%/ML LIQUID
+"DATA",176.112,22084,1)
+317014
+"DATA",176.112,22085,0)
+4002577^METHENAMINE MANDELATE 500MG TAB,EC
+"DATA",176.112,22085,1)
+317012
+"DATA",176.112,22086,0)
+4009481^MERCURIC OXIDE,YELLOW 1% OINT,OPH
+"DATA",176.112,22086,1)
+317011
+"DATA",176.112,22087,0)
+4006050^UREA 40GM/BTL INJ,IV
+"DATA",176.112,22087,1)
+315243
+"DATA",176.112,22088,0)
+4006051^UREA 40GM/BTL INJ,IU
+"DATA",176.112,22088,1)
+315243
+"DATA",176.112,22089,0)
+4004607^TRIPELENNAMINE HCL 2% CREAM,TOP
+"DATA",176.112,22089,1)
+315241
+"DATA",176.112,22090,0)
+4001623^TRIAMCINOLONE HEXACETONIDE 20MG/ML INJ,SUSP
+"DATA",176.112,22090,1)
+315240
+"DATA",176.112,22091,0)
+4002663^TOLBUTAMIDE NA 1GM/VIL INJ
+"DATA",176.112,22091,1)
+315239
+"DATA",176.112,22092,0)
+4007758^TOCOPHERYL ACETATE,DL-ALPHA 200MG/ML INJ
+"DATA",176.112,22092,1)
+315238
+"DATA",176.112,22093,0)
+4013148^TIAGABINE HCL 4MG TAB
+"DATA",176.112,22093,1)
+315237
+"DATA",176.112,22094,0)
+4000704^THYROID 65MG CAP
+"DATA",176.112,22094,1)
+315236
+"DATA",176.112,22095,0)
+4000710^THYROID 300MG TAB
+"DATA",176.112,22095,1)
+315235
+"DATA",176.112,22096,0)
+4000702^THYROID 195MG TAB
+"DATA",176.112,22096,1)
+315234
+"DATA",176.112,22097,0)
+4000705^THYROID 130MG CAP
+"DATA",176.112,22097,1)
+315233
+"DATA",176.112,22098,0)
+4002684^THIORIDAZINE HCL 10MG TAB,EC
+"DATA",176.112,22098,1)
+315231
+"DATA",176.112,22099,0)
+4004333^TETRACAINE HCL 0.5% SOLN,TOP
+"DATA",176.112,22099,1)
+315227
+"DATA",176.112,22100,0)
+4010260^SUMATRIPTAN SUCCINATE 25MG TAB
+"DATA",176.112,22100,1)
+315223
+"DATA",176.112,22101,0)
+4002976^SULINDAC 200MG TAB,EC
+"DATA",176.112,22101,1)
+315222
+"DATA",176.112,22102,0)
+4008726^SULFUR 10% CREAM
+"DATA",176.112,22102,1)
+315220
+"DATA",176.112,22103,0)
+4002047^SULFISOXAZOLE ACETYL 1GM/5ML SUSP,ORAL
+"DATA",176.112,22103,1)
+315219
+"DATA",176.112,22104,0)
+4001066^STREPTOMYCIN SO4 500MG/ML INJ
+"DATA",176.112,22104,1)
+315218
+"DATA",176.112,22105,0)
+4013513^STAVUDINE (d4T) 5MG/5ML SUSP
+"DATA",176.112,22105,1)
+315217
+"DATA",176.112,22106,0)
+4009251^SOMATREM 5MG/VIL INJ
+"DATA",176.112,22106,1)
+315216
+"DATA",176.112,22107,0)
+4004948^SODIUM FLUORIDE 2.25MG/ML DROPS,ORAL
+"DATA",176.112,22107,1)
+315214
+"DATA",176.112,22108,0)
+4004923^SODIUM FLUORIDE 2.2MG TAB,CHEWABLE
+"DATA",176.112,22108,1)
+315213
+"DATA",176.112,22109,0)
+4001091^SODIUM CHLORIDE 1GM TAB,EC
+"DATA",176.112,22109,1)
+315211
+"DATA",176.112,22110,0)
+4009919^TOBRAMYCIN SO4 0.8MG/ML/NACL 0.9% INJ
+"DATA",176.112,22110,1)
+315209
+"DATA",176.112,22111,0)
+4009918^TOBRAMYCIN SO4 0.6MG/ML/NACL 0.9% INJ
+"DATA",176.112,22111,1)
+315208
+"DATA",176.112,22112,0)
+4008400^SILVER PROTEIN,MILD 10% SOLN,OPH
+"DATA",176.112,22112,1)
+315207
+"DATA",176.112,22113,0)
+4004164^SELENIUM 40MCG/ML INJ
+"DATA",176.112,22113,1)
+315204
+"DATA",176.112,22114,0)
+4004163^SELENIOUS ACID 40MCG/ML INJ
+"DATA",176.112,22114,1)
+315204
+"DATA",176.112,22115,0)
+4004167^SELENIUM 40MCG/ML (PF) INJ
+"DATA",176.112,22115,1)
+315204
+"DATA",176.112,22116,0)
+4004165^SELENIOUS ACID 50MCG/ML INJ
+"DATA",176.112,22116,1)
+315203
+"DATA",176.112,22117,0)
+4000905^SECOBARBITAL NA 50MG CAP
+"DATA",176.112,22117,1)
+315201
+"DATA",176.112,22118,0)
+4005524^SCOPOLAMINE HBR 0.43MG/0.5ML INJ
+"DATA",176.112,22118,1)
+315200
+"DATA",176.112,22119,0)
+4009267^SARGRAMOSTIM 250MCG/VIL (PF) INJ
+"DATA",176.112,22119,1)
+315199
+"DATA",176.112,22120,0)
+4009269^SARGRAMOSTIM 250MCG/VIL INJ
+"DATA",176.112,22120,1)
+315199
+"DATA",176.112,22121,0)
+4005837^SALICYLIC ACID 60% OINT,TOP
+"DATA",176.112,22121,1)
+315198
+"DATA",176.112,22122,0)
+4001199^RESERPINE 1MG TAB
+"DATA",176.112,22122,1)
+315197
+"DATA",176.112,22123,0)
+4003357^RABIES VACCINE 0.25UNT/ML INJ,ID
+"DATA",176.112,22123,1)
+315196
+"DATA",176.112,22124,0)
+4008983^QUININE SO4 65MG/VITAMIN E 400UNT CAP
+"DATA",176.112,22124,1)
+315195
+"DATA",176.112,22125,0)
+4000683^QUINIDINE SO4 200MG/ML INJ
+"DATA",176.112,22125,1)
+315194
+"DATA",176.112,22126,0)
+4002726^QUINETHAZONE 50MG/RESERPINE 0.125MG TAB
+"DATA",176.112,22126,1)
+315193
+"DATA",176.112,22127,0)
+4009536^PSYLLIUM MUCILLOID 1.6GM/SUCROSE 3.4GM/5GM PWDR,ORAL
+"DATA",176.112,22127,1)
+315192
+"DATA",176.112,22128,0)
+4005175^PSEUDOEPHEDRINE HCL 120MG TAB,SA
+"DATA",176.112,22128,1)
+315191
+"DATA",176.112,22129,0)
+4005179^PSEUDOEPHEDRINE SO4 120MG TAB,SA
+"DATA",176.112,22129,1)
+315191
+"DATA",176.112,22130,0)
+4005725^PROTEOLYTIC ENZYME 20000UNT TAB
+"DATA",176.112,22130,1)
+315190
+"DATA",176.112,22131,0)
+4001206^PROPOXYPHENE N 50MG/5ML SUSP,ORAL
+"DATA",176.112,22131,1)
+315189
+"DATA",176.112,22132,0)
+4000911^PROGESTERONE 25MG/ML INJ (IN OIL)
+"DATA",176.112,22132,1)
+315188
+"DATA",176.112,22133,0)
+4002621^PREDNISONE 5MG/5ML SOLN,ORAL
+"DATA",176.112,22133,1)
+315187
+"DATA",176.112,22134,0)
+4002624^PREDNISONE 1MG/ML SOLN,ORAL
+"DATA",176.112,22134,1)
+315187
+"DATA",176.112,22135,0)
+4002623^PREDNISONE 5MG/5ML SYRUP
+"DATA",176.112,22135,1)
+315187
+"DATA",176.112,22136,0)
+4008186^POVIDONE IODINE 10% SUPP,VAG
+"DATA",176.112,22136,1)
+315186
+"DATA",176.112,22137,0)
+4003586^POTASSIUM GLUCONATE 2.6MEQ TAB
+"DATA",176.112,22137,1)
+315185
+"DATA",176.112,22138,0)
+4003584^POTASSIUM GLUCONATE 2.2MEQ TAB
+"DATA",176.112,22138,1)
+315184
+"DATA",176.112,22139,0)
+4000858^POTASSIUM CHLORIDE 8MEQ CAP,SA
+"DATA",176.112,22139,1)
+315183
+"DATA",176.112,22140,0)
+4000863^POTASSIUM CHLORIDE 3.2MEQ/ML INJ,CONC
+"DATA",176.112,22140,1)
+315182
+"DATA",176.112,22141,0)
+4007221^POTASSIUM CHLORIDE 30MEQ/L/NACL 0.9% INJ
+"DATA",176.112,22141,1)
+315181
+"DATA",176.112,22142,0)
+4007406^PIPERACILLIN NA 40MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,22142,1)
+315178
+"DATA",176.112,22143,0)
+4005504^PHYSOSTIGMINE SALICYLATE 0.125%/PILOCARPINE HCL 2% SOLN,OPH
+"DATA",176.112,22143,1)
+315177
+"DATA",176.112,22144,0)
+4008915^PHENOLPHTHALEIN,YELLOW 97.2MG GUM,CHEW
+"DATA",176.112,22144,1)
+315175
+"DATA",176.112,22145,0)
+4000730^PHENOBARBITAL NA 32MG CAP
+"DATA",176.112,22145,1)
+315172
+"DATA",176.112,22146,0)
+4000728^PHENOBARBITAL 32MG CAP
+"DATA",176.112,22146,1)
+315172
+"DATA",176.112,22147,0)
+4005016^PHENAZOPYRIDINE HCL 50MG/SULFAMETHIZOLE 250MG TAB
+"DATA",176.112,22147,1)
+315171
+"DATA",176.112,22148,0)
+4006860^PHENAZOPYRIDINE HCL 100MG TAB,EC
+"DATA",176.112,22148,1)
+315170
+"DATA",176.112,22149,0)
+4006555^PERPHENAZINE 2MG TAB,SA
+"DATA",176.112,22149,1)
+315169
+"DATA",176.112,22150,0)
+4003292^PENTOBARBITAL NA 100MG CAP
+"DATA",176.112,22150,1)
+315167
+"DATA",176.112,22151,0)
+4006238^PEMOLINE 37.5MG TAB,CHEWABLE
+"DATA",176.112,22151,1)
+315164
+"DATA",176.112,22152,0)
+4003311^OXYTOCIN 40UNT/ML SOLN,SPRAY NASAL
+"DATA",176.112,22152,1)
+315163
+"DATA",176.112,22153,0)
+4009953^OAT BRAN 800MG TAB,CHEWABLE
+"DATA",176.112,22153,1)
+315161
+"DATA",176.112,22154,0)
+4001238^NITROGLYCERIN 8MG/10ML INJ,CONC
+"DATA",176.112,22154,1)
+315160
+"DATA",176.112,22155,0)
+4001242^NITROGLYCERIN 0.8MG/ML INJ
+"DATA",176.112,22155,1)
+315160
+"DATA",176.112,22156,0)
+4008149^NITROGEN 72%/OXYGEN 21% GAS
+"DATA",176.112,22156,1)
+315159
+"DATA",176.112,22157,0)
+4006975^NITROFURAZONE 0.2% PWDR,TOP
+"DATA",176.112,22157,1)
+315158
+"DATA",176.112,22158,0)
+4007190^NIACIN 50MG/PENTAERYTHRITOL TETRANITRATE 100MG TAB
+"DATA",176.112,22158,1)
+315157
+"DATA",176.112,22159,0)
+4005538^NEOMYCIN SO4 0.35%/POLYMYXIN B 16250UNT/ML SOLN,OPH
+"DATA",176.112,22159,1)
+315156
+"DATA",176.112,22160,0)
+4005099^NANDROLONE PHENPROPIONATE 25MG/ML INJ
+"DATA",176.112,22160,1)
+315155
+"DATA",176.112,22161,0)
+4026696^MORPHINE SO4 20MG/ML SOLN,CONC,ORAL,0.25ML
+"DATA",176.112,22161,1)
+315153
+"DATA",176.112,22162,0)
+4025942^MORPHINE SO4 20MG/ML SOLN,CONC,ORAL,1ML
+"DATA",176.112,22162,1)
+315153
+"DATA",176.112,22163,0)
+4025941^MORPHINE SO4 20MG/ML SOLN,CONC,ORAL,0.5ML
+"DATA",176.112,22163,1)
+315153
+"DATA",176.112,22164,0)
+4001004^MORPHINE SO4 100MG/5ML SOLN,ORAL
+"DATA",176.112,22164,1)
+315153
+"DATA",176.112,22165,0)
+4000986^MORPHINE SO4 20MG/ML SOLN,CONC,ORAL
+"DATA",176.112,22165,1)
+315153
+"DATA",176.112,22166,0)
+4000998^MORPHINE SO4 15MG TAB,SA
+"DATA",176.112,22166,1)
+315152
+"DATA",176.112,22167,0)
+4012965^MIDODRINE HCL 2.5MG TAB
+"DATA",176.112,22167,1)
+315150
+"DATA",176.112,22168,0)
+4007674^METHYL METHACRYLATE 100% LIQUID
+"DATA",176.112,22168,1)
+315149
+"DATA",176.112,22169,0)
+4002737^METHOTREXATE NA 2.5MG/ML INJ
+"DATA",176.112,22169,1)
+315148
+"DATA",176.112,22170,0)
+4007093^METHANDROSTENOLONE 5MG TAB
+"DATA",176.112,22170,1)
+315147
+"DATA",176.112,22171,0)
+4003607^MESTRANOL 0.1MG/NORETHYNODREL 2.5MG TAB
+"DATA",176.112,22171,1)
+315146
+"DATA",176.112,22172,0)
+4005227^MESTRANOL 0.08MG/NORETHINDRONE 1MG TAB
+"DATA",176.112,22172,1)
+315145
+"DATA",176.112,22173,0)
+4007661^MESORIDAZINE BESYLATE 25MG/ML INJ
+"DATA",176.112,22173,1)
+315144
+"DATA",176.112,22174,0)
+4009959^MERCURY,AMMONIATED 10% OINT,TOP
+"DATA",176.112,22174,1)
+315143
+"DATA",176.112,22175,0)
+4003233^MEPERIDINE HCL 10MG/ML INJ,SYRINGE,50ML
+"DATA",176.112,22175,1)
+315142
+"DATA",176.112,22176,0)
+4003230^MEPERIDINE HCL 10MG/ML INJ
+"DATA",176.112,22176,1)
+315142
+"DATA",176.112,22177,0)
+4009535^MENTHOL 8%/METHYL SALICYLATE 30% OINT,TOP
+"DATA",176.112,22177,1)
+315141
+"DATA",176.112,22178,0)
+4009511^MENTHOL 6.1MG COUGH DROP
+"DATA",176.112,22178,1)
+315140
+"DATA",176.112,22179,0)
+4002443^MECLIZINE HCL 30MG TAB
+"DATA",176.112,22179,1)
+315139
+"DATA",176.112,22180,0)
+4000901^LIVER EXTRACT 2MCG/ML INJ
+"DATA",176.112,22180,1)
+315136
+"DATA",176.112,22181,0)
+4007249^LEVOCARNITINE 500MG TAB
+"DATA",176.112,22181,1)
+315135
+"DATA",176.112,22182,0)
+4007244^LEVOCARNITINE 1GM/10ML LIQUID
+"DATA",176.112,22182,1)
+315134
+"DATA",176.112,22183,0)
+4026118^LEVOCARNITINE 1GM/10ML (SF) LIQUID
+"DATA",176.112,22183,1)
+315134
+"DATA",176.112,22184,0)
+4010514^LEVO-ORNITHINE 500MG TAB
+"DATA",176.112,22184,1)
+315133
+"DATA",176.112,22185,0)
+4007065^ISOPROPAMIDE IODIDE 6.8MG/PROCHLORPERAZINE 10MG CAP
+"DATA",176.112,22185,1)
+315132
+"DATA",176.112,22186,0)
+4009328^IOTROLAN 190MG/ML INJ INTH
+"DATA",176.112,22186,1)
+315131
+"DATA",176.112,22187,0)
+4007149^IOPHENDYLATE 100% INJ
+"DATA",176.112,22187,1)
+315128
+"DATA",176.112,22188,0)
+4002014^IOPAMIDOL 510MG/ML INJ
+"DATA",176.112,22188,1)
+315127
+"DATA",176.112,22189,0)
+4002540^IMIPRAMINE HCL 25MG TAB,EC
+"DATA",176.112,22189,1)
+315125
+"DATA",176.112,22190,0)
+4007809^HYOSCYAMINE 0.15MG/METHENAMINE MANDELATE 500MG TAB
+"DATA",176.112,22190,1)
+315123
+"DATA",176.112,22191,0)
+4003271^HYDROMORPHONE HCL 2MG/ML INJ
+"DATA",176.112,22191,1)
+315122
+"DATA",176.112,22192,0)
+4004044^HYDROCORTISONE ACETATE 1%/PRAMOXINE HCL 1% CREAM,RTL
+"DATA",176.112,22192,1)
+315121
+"DATA",176.112,22193,0)
+4008119^HC 0.5%/SULFUR 5%/ZN OXIDE 20% CREAM,TOP
+"DATA",176.112,22193,1)
+315120
+"DATA",176.112,22194,0)
+4003910^HYDROCODONE RESIN 5MG/PHENYLTOLOXAMINE RESIN 10MG TAB
+"DATA",176.112,22194,1)
+315119
+"DATA",176.112,22195,0)
+4005634^HYDROCODONE 5MG/PSEUDOEPHEDRINE 60MG/5ML LIQUID
+"DATA",176.112,22195,1)
+315118
+"DATA",176.112,22196,0)
+4007479^HYDROCHLORIC ACID 28% LIQUID
+"DATA",176.112,22196,1)
+315116
+"DATA",176.112,22197,0)
+4000972^HISTAMINE PO4 2.75MG/5ML INJ
+"DATA",176.112,22197,1)
+315115
+"DATA",176.112,22198,0)
+4005399^GUAIFENESIN 300MG/PSEUDOEPHEDRINE 60MG CAP,SA
+"DATA",176.112,22198,1)
+315114
+"DATA",176.112,22199,0)
+4005676^HYDROCODONE 5MG/GG 300MG/PSEUDEFED 30MG TAB
+"DATA",176.112,22199,1)
+315113
+"DATA",176.112,22200,0)
+4005404^GUAIFENESIN 250MG/PSEUDOEPHEDRINE 90MG CAP,SA
+"DATA",176.112,22200,1)
+315112
+"DATA",176.112,22201,0)
+4005616^GUAIFENESIN 200MG/THEOPHYLLINE 250MG TAB
+"DATA",176.112,22201,1)
+315111
+"DATA",176.112,22202,0)
+4006808^GUAIFENESIN 200MG/PHENYLPROPANOLAMINE 75MG TAB,SA
+"DATA",176.112,22202,1)
+315110
+"DATA",176.112,22203,0)
+4005167^GUAIFENESIN 200MG/PHENYLEPHRINE 10MG CAP,SA
+"DATA",176.112,22203,1)
+315109
+"DATA",176.112,22204,0)
+4005068^GLIPIZIDE 10MG TAB,SA
+"DATA",176.112,22204,1)
+315107
+"DATA",176.112,22205,0)
+4005774^GEMFIBROZIL 300MG CAP
+"DATA",176.112,22205,1)
+315106
+"DATA",176.112,22206,0)
+4007121^GALLAMINE TRIETHIODIDE 20MG/ML INJ
+"DATA",176.112,22206,1)
+315105
+"DATA",176.112,22207,0)
+4010013^FORMALDEHYDE 1%/ISOPROPYL ALCOHOL 87%/NA NITRITE 1% SOLN
+"DATA",176.112,22207,1)
+315104
+"DATA",176.112,22208,0)
+4004945^FLUORIDE 0.5MG/ML SOLN,ORAL
+"DATA",176.112,22208,1)
+315102
+"DATA",176.112,22209,0)
+4005487^FLUORESCEIN NA 25% INJ
+"DATA",176.112,22209,1)
+315101
+"DATA",176.112,22210,0)
+4004176^FLUOCINOLONE ACETONIDE 0.01% SOLN,TOP
+"DATA",176.112,22210,1)
+315100
+"DATA",176.112,22211,0)
+4008242^FERROUS SO4 2.5MG/ML DROPS,ORAL
+"DATA",176.112,22211,1)
+315099
+"DATA",176.112,22212,0)
+4003614^ETHYNODIOL DIACETATE 1MG/MESTRANOL 0.1MG TAB
+"DATA",176.112,22212,1)
+315098
+"DATA",176.112,22213,0)
+4007470^ETHYL CHLORIDE 100% AEROSOL,TOP
+"DATA",176.112,22213,1)
+315097
+"DATA",176.112,22214,0)
+4003608^ETHINYL ESTRADIOL 0.05MG/ETHYNODIOL DIACETATE 1MG TAB
+"DATA",176.112,22214,1)
+315096
+"DATA",176.112,22215,0)
+4005244^ETHINYL ESTRADIOL 0.03MG/NORETHINDRONE 1.5MG TAB
+"DATA",176.112,22215,1)
+315095
+"DATA",176.112,22216,0)
+4007091^ESTROGENS,CONJUGATED 0.5MG/ESTRONE 1.5MG/ML INJ,SUSP
+"DATA",176.112,22216,1)
+315094
+"DATA",176.112,22217,0)
+4004650^ESTROGENS 2MG/ML INJ
+"DATA",176.112,22217,1)
+315093
+"DATA",176.112,22218,0)
+4001696^ESTRADIOL VALERATE 4MG/TESTOSTERONE ENANTHATE 90MG/ML INJ
+"DATA",176.112,22218,1)
+315092
+"DATA",176.112,22219,0)
+4001563^ERYTHROMYCIN 333MG TAB,EC
+"DATA",176.112,22219,1)
+315090
+"DATA",176.112,22220,0)
+4001598^ERYTHROMYCIN 333MG TAB,SA
+"DATA",176.112,22220,1)
+315090
+"DATA",176.112,22221,0)
+4007805^EPINEPHRINE BITARTRATE 1%/PILOCARPINE HCL 2% SOLN,OPH
+"DATA",176.112,22221,1)
+315088
+"DATA",176.112,22222,0)
+4003261^EPINEPHRINE BITARTRATE 0.7% AEROSOL,INHL,ORAL
+"DATA",176.112,22222,1)
+315087
+"DATA",176.112,22223,0)
+4006779^EPHEDRINE 24MG/GG 100MG/PHENOBARB 8MG/THEOPHYLLINE 130MG TAB
+"DATA",176.112,22223,1)
+315086
+"DATA",176.112,22224,0)
+4000947^EMETINE HCL 65MG/ML INJ
+"DATA",176.112,22224,1)
+315085
+"DATA",176.112,22225,0)
+4005041^ECHOTHIOPHATE IODIDE 0.06% SOLN,OPH
+"DATA",176.112,22225,1)
+315083
+"DATA",176.112,22226,0)
+4007974^DIPHENHYDRAMINE 12.5MG/GG 100MG/MENTHOL 1MG/NA CIT 50MG/5ML LIQ
+"DATA",176.112,22226,1)
+315081
+"DATA",176.112,22227,0)
+4002566^DIPHENHYDRAMINE HCL 1% SOLN,TOP
+"DATA",176.112,22227,1)
+315080
+"DATA",176.112,22228,0)
+4004228^DIHYDROTACHYSTEROL 0.2MG/ML SOLN,ORAL
+"DATA",176.112,22228,1)
+315078
+"DATA",176.112,22229,0)
+4000742^DIETHYLSTILBESTROL 1MG TAB,EC
+"DATA",176.112,22229,1)
+315077
+"DATA",176.112,22230,0)
+4001550^DIATRIZOATE MEGLUMINE 60%/DIATRIZOATE NA 30% INJ
+"DATA",176.112,22230,1)
+315075
+"DATA",176.112,22231,0)
+4001549^DIATRIZOATE MEGLUMINE 50%/DIATRIZOATE NA 25% INJ
+"DATA",176.112,22231,1)
+315074
+"DATA",176.112,22232,0)
+4007405^PIPERACILLIN NA 20MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,22232,1)
+315066
+"DATA",176.112,22233,0)
+4009307^OFLOXACIN 4MG/ML/D5W INJ,BAG,50ML
+"DATA",176.112,22233,1)
+315065
+"DATA",176.112,22234,0)
+4009303^OFLOXACIN 4MG/ML INJ
+"DATA",176.112,22234,1)
+315065
+"DATA",176.112,22235,0)
+4008303^DM 15MG/GG 100MG/P-EPHRINE 10MG/5ML (SF) LIQUID
+"DATA",176.112,22235,1)
+315064
+"DATA",176.112,22236,0)
+4009652^DEXTRAN HM 32% INJ
+"DATA",176.112,22236,1)
+315062
+"DATA",176.112,22237,0)
+4002828^DEXAMETHASONE NA PHOSPHATE 20MG/ML INJ,SOLN
+"DATA",176.112,22237,1)
+315061
+"DATA",176.112,22238,0)
+4005104^DESOXYCORTICOSTERONE ACETATE 5MG/ML INJ,SOLN
+"DATA",176.112,22238,1)
+315060
+"DATA",176.112,22239,0)
+4004897^DESOXIMETASONE 0.05% GEL,TOP
+"DATA",176.112,22239,1)
+315059
+"DATA",176.112,22240,0)
+4006543^DEFEROXAMINE MESYLATE 100MG/ML INJ
+"DATA",176.112,22240,1)
+315057
+"DATA",176.112,22241,0)
+4010308^CYANOCOBALAMIN 500MCG/IRON 20MG/LIVER 10MCG/ML INJ
+"DATA",176.112,22241,1)
+315056
+"DATA",176.112,22242,0)
+4007572^CODEINE 10MG/GG 100MG/PSEUDEFED 30MG/TRIPROLIDINE 1.25MG/5ML LIQ
+"DATA",176.112,22242,1)
+315049
+"DATA",176.112,22243,0)
+4007688^CODEINE 10MG/GG 100MG/P-EPHRINE 5MG/5ML LIQUID
+"DATA",176.112,22243,1)
+315048
+"DATA",176.112,22244,0)
+4009032^CLOZAPINE 600MG/DAY TAB
+"DATA",176.112,22244,1)
+315047
+"DATA",176.112,22245,0)
+4003806^CISPLATIN 0.5MG/ML INJ
+"DATA",176.112,22245,1)
+315046
+"DATA",176.112,22246,0)
+4004847^CHYMOTRYPSIN 4000UNT TAB,EC
+"DATA",176.112,22246,1)
+315045
+"DATA",176.112,22247,0)
+4002546^CHLORPHENIRAMINE MALEATE 8MG TAB,SA
+"DATA",176.112,22247,1)
+315038
+"DATA",176.112,22248,0)
+4007737^CTM 4MG/P-EPHRINE 20MG/P-TOLOXAMINE 40MG TAB
+"DATA",176.112,22248,1)
+315037
+"DATA",176.112,22249,0)
+4006921^CTM 4MG/GG 300MG/P-EPHRINE 20MG TAB,SA
+"DATA",176.112,22249,1)
+315036
+"DATA",176.112,22250,0)
+4005392^CTM 1MG/DM 5MG/PSEUDEFED 15MG TAB,CHEWABLE
+"DATA",176.112,22250,1)
+315035
+"DATA",176.112,22251,0)
+4003502^CHLORPHENESIN CARBAMATE 400MG TAB
+"DATA",176.112,22251,1)
+315032
+"DATA",176.112,22252,0)
+4007876^CHLOROXYLENOL 0.05%/DOMIPHEN 0.1%/HC 0.5%/PRAMOXINE 1% SOLN,OTIC
+"DATA",176.112,22252,1)
+315031
+"DATA",176.112,22253,0)
+4005817^PITUITARY,POSTERIOR,HORMONE 20UNT/ML INJ
+"DATA",176.112,22253,1)
+315030
+"DATA",176.112,22254,0)
+4010193^CHLORIDE HEXAHYDRATE 10% TOOTHPASTE
+"DATA",176.112,22254,1)
+315029
+"DATA",176.112,22255,0)
+4005809^CHLORAMPHENICOL 1%/HC 0.5%/POLYMYX 10000UNT/GM OINT,OPH
+"DATA",176.112,22255,1)
+315028
+"DATA",176.112,22256,0)
+4007787^CETYLPYRIDINIUM CL 1%/CHLOROXYLENOL 0.5%/TRIACETIN 12% SPRAY
+"DATA",176.112,22256,1)
+315027
+"DATA",176.112,22257,0)
+4007786^CETYLPYRIDINIUM 0.5%/CHLOROXYLENOL 1.25%/TRIACETIN 1% CREAM,TOP
+"DATA",176.112,22257,1)
+315026
+"DATA",176.112,22258,0)
+4012844^CETIRIZINE HCL 5MG TAB
+"DATA",176.112,22258,1)
+315025
+"DATA",176.112,22259,0)
+4008578^CEFOPERAZONE NA 20MG/ML/DEXTROSE 4.6% INJ
+"DATA",176.112,22259,1)
+315023
+"DATA",176.112,22260,0)
+4006194^CARBINOXAMINE 4MG/DM 15MG/PSEUDEFED 60MG/5ML LIQUID
+"DATA",176.112,22260,1)
+315022
+"DATA",176.112,22261,0)
+4006193^CARBINOXAMINE 4MG/DM 15MG/PSEUDEFED 60MG/5ML SYRUP
+"DATA",176.112,22261,1)
+315022
+"DATA",176.112,22262,0)
+4004687^CARBENICILLIN DISODIUM 5GM/VIL INJ
+"DATA",176.112,22262,1)
+315021
+"DATA",176.112,22263,0)
+4009611^CALCIUM CARBONATE 600MG/VITAMIN D 125UNT TAB
+"DATA",176.112,22263,1)
+315015
+"DATA",176.112,22264,0)
+4008909^CALCIUM CARBONATE 261MG/PECTIN 65MG TAB
+"DATA",176.112,22264,1)
+315014
+"DATA",176.112,22265,0)
+4007451^CA CARB 200MG/NUX VOMICA EXT 8MG/PHENOBARB 15MG TAB
+"DATA",176.112,22265,1)
+315013
+"DATA",176.112,22266,0)
+4006736^BUTABARB 30MG/PHENOBARB 30MG/SECOBARB 30MG CAP
+"DATA",176.112,22266,1)
+315011
+"DATA",176.112,22267,0)
+4010530^BORON 6MG TAB
+"DATA",176.112,22267,1)
+315009
+"DATA",176.112,22268,0)
+4008884^BORIC ACID 5% OINT,TOP
+"DATA",176.112,22268,1)
+315008
+"DATA",176.112,22269,0)
+4007711^MORPHINE SO4 0.5MG/BISMUTH SUBCARBONATE 0.3GM TAB
+"DATA",176.112,22269,1)
+315007
+"DATA",176.112,22270,0)
+4005000^GONADORELIN HCL 250MCG/ML INJ
+"DATA",176.112,22270,1)
+315006
+"DATA",176.112,22271,0)
+4004713^BENZTHIAZIDE 25MG TAB
+"DATA",176.112,22271,1)
+315005
+"DATA",176.112,22272,0)
+4010034^BENZOCAINE 3.25%/LICORICE EXT 8.125MG/MENTHOL 0.0325% LOZENGE
+"DATA",176.112,22272,1)
+315004
+"DATA",176.112,22273,0)
+4009558^BENZOCAINE 2.5%/CLOVE OIL 2.5% LIQUID
+"DATA",176.112,22273,1)
+315003
+"DATA",176.112,22274,0)
+4007112^BENZALKONIUM CL 0.02%/CHLOROXYLENOL 0.1%/HC 1% SOLN,OTIC
+"DATA",176.112,22274,1)
+315002
+"DATA",176.112,22275,0)
+4006417^B-DONNA 0.1MG/ERGOTAMINE 0.3MG/PHENOBARB 20MG TAB
+"DATA",176.112,22275,1)
+315000
+"DATA",176.112,22276,0)
+4008768^B-TRACIN 400UNT/DIPERODON 1%/N-MYCIN 5MG/POLYMYX 5000UNT/GM OINT
+"DATA",176.112,22276,1)
+314994
+"DATA",176.112,22277,0)
+4007909^AT SO4 0.065MG/KAOLIN 200MG/PHENOBARB 8MG TAB
+"DATA",176.112,22277,1)
+314993
+"DATA",176.112,22278,0)
+4001291^CODEINE 30MG/ASA 380MG/CAFN 30MG TAB
+"DATA",176.112,22278,1)
+314988
+"DATA",176.112,22279,0)
+4001288^PROPOXYPHENE HCL 65MG/ASA 227MG/CAFN 32MG CAP
+"DATA",176.112,22279,1)
+314987
+"DATA",176.112,22280,0)
+4006445^CODEINE 30MG/ASA 200MG/BUTALBITAL 50MG/CAFN 40MG TAB
+"DATA",176.112,22280,1)
+314986
+"DATA",176.112,22281,0)
+4007153^VIT C 60MG/CYANOCOBALAMIN 5MCG/FE FUMARATE 200MG CAP,SA
+"DATA",176.112,22281,1)
+314982
+"DATA",176.112,22282,0)
+4002776^VIT C 150MG/FE FUMARATE 75MG/FA 1MG/INTRINSIC FACTOR CAP,SA
+"DATA",176.112,22282,1)
+314974
+"DATA",176.112,22283,0)
+4008557^ASCORBIC ACID 150MG/FERROUS FUMARATE 200MG TAB
+"DATA",176.112,22283,1)
+314973
+"DATA",176.112,22284,0)
+4010517^ASCORBIC ACID 1GM/BIOFLAVONOIDS 25MG TAB
+"DATA",176.112,22284,1)
+314971
+"DATA",176.112,22285,0)
+4007581^VIT C 100MG/CTM 4MG/P-PROPANOL 50MG/PYRILAMINE 25MG CAP
+"DATA",176.112,22285,1)
+314969
+"DATA",176.112,22286,0)
+4004729^AMYLASE 20000UNT/LIPASE 5000UNT/PROTEASE 20000UNT CAP,EC
+"DATA",176.112,22286,1)
+314965
+"DATA",176.112,22287,0)
+4002884^AMITRIPTYLINE HCL 10MG/PERPHENAZINE 2MG TAB,UD
+"DATA",176.112,22287,1)
+314961
+"DATA",176.112,22288,0)
+4002880^AMITRIPTYLINE HCL 10MG/PERPHENAZINE 2MG TAB
+"DATA",176.112,22288,1)
+314961
+"DATA",176.112,22289,0)
+4004479^ALLERGENIC EXTRACT, INSECT, YELLOW JACKET 20000PNU/ML INJ
+"DATA",176.112,22289,1)
+314958
+"DATA",176.112,22290,0)
+4004472^ALLERGENIC EXTRACT, TREE, SYCAMORE 10000PNU/ML INJ
+"DATA",176.112,22290,1)
+314956
+"DATA",176.112,22291,0)
+4007277^ALLERGENIC EXTRACT, SHORT RAGWEED ALTERNARIA 40000 PNU/ML INJ
+"DATA",176.112,22291,1)
+314955
+"DATA",176.112,22292,0)
+4004525^ALLERGENIC EXTRACT, WEED, SHEEP SORREL 10000PNU/ML INJ
+"DATA",176.112,22292,1)
+314954
+"DATA",176.112,22293,0)
+4004516^ALLERGENIC EXTRACT, GRASS, RYE, GIANT WILD 10000PNU/ML INJ
+"DATA",176.112,22293,1)
+314953
+"DATA",176.112,22294,0)
+4004466^ALLERGENIC EXTRACT, TREE, OAK MIX 20000PNU/ML INJ
+"DATA",176.112,22294,1)
+314952
+"DATA",176.112,22295,0)
+4004552^ALLERGENIC EXTRACT, MOLD, PULLULARIA PULLULANS 10000PNU/ML INJ
+"DATA",176.112,22295,1)
+314951
+"DATA",176.112,22296,0)
+4004550^ALLERGENIC EXTRACT, MOLD, MUCOR RACEMOSUS 10000PNU/ML INJ
+"DATA",176.112,22296,1)
+314950
+"DATA",176.112,22297,0)
+4004497^ALLERGENIC EXTRACT, HOUSE DUST 2% INJ
+"DATA",176.112,22297,1)
+314949
+"DATA",176.112,22298,0)
+4004524^ALLERGENIC EXTRACT, FALSE RAGWEED 20000PNU/ML INJ
+"DATA",176.112,22298,1)
+314947
+"DATA",176.112,22299,0)
+4004536^ALLERGENIC EXTRACT, TREE, COTTONWOOD, WESTERN 20000PNU/ML INJ
+"DATA",176.112,22299,1)
+314946
+"DATA",176.112,22300,0)
+4004513^ALLERGENIC EXTRACT, CORN 10000PNU/ML INJ
+"DATA",176.112,22300,1)
+314945
+"DATA",176.112,22301,0)
+4004510^ALLERGENIC EXTRACT, BLUEGRASS, CANADA 10000PNU/ML INJ
+"DATA",176.112,22301,1)
+314944
+"DATA",176.112,22302,0)
+4004545^ALLERGENIC EXTRACT, MOLD, BOTRYTIS CINEREA 10000PNU/ML INJ
+"DATA",176.112,22302,1)
+314943
+"DATA",176.112,22303,0)
+4004532^ALLERGENIC EXTRACT, TREE, OREGON ASH 10000PNU/ML INJ
+"DATA",176.112,22303,1)
+314942
+"DATA",176.112,22304,0)
+4007264^ALLERGENIC EXTRACT, ALTERNARIA MOLD 5% INJ
+"DATA",176.112,22304,1)
+314941
+"DATA",176.112,22305,0)
+4007261^ALLERGENIC EXTRACT, ALTERNARIA MOLD 20000 PNU/ML INJ
+"DATA",176.112,22305,1)
+314940
+"DATA",176.112,22306,0)
+4004493^ALLERGENIC EXTRACT, 4 MOLD MIX 10000PNU/ML INJ
+"DATA",176.112,22306,1)
+314939
+"DATA",176.112,22307,0)
+4007286^ALLERGENIC EXTRACT 1.5ML INJ
+"DATA",176.112,22307,1)
+314938
+"DATA",176.112,22308,0)
+4008193^POVIDONE IODINE 0.5%/ALCOHOL MOUTHWASH
+"DATA",176.112,22308,1)
+314935
+"DATA",176.112,22309,0)
+4010238^BENZOCAINE 6.3%/PHENOL 0.5%/POVIDONE IODINE 0.04% LIQUID,DENT
+"DATA",176.112,22309,1)
+314933
+"DATA",176.112,22310,0)
+4007357^CTM 4MG/EPHEDRINE 8MG/GG 100MG/HYDRIODIC AC 1.7ML/5ML LIQUID
+"DATA",176.112,22310,1)
+314929
+"DATA",176.112,22311,0)
+4007527^DM 10MG/GG 66.7MG/PSEUDEFED 20MG/5ML LIQUID
+"DATA",176.112,22311,1)
+314923
+"DATA",176.112,22312,0)
+4007191^APAP 90MG/AL ACETATE 325MG/CTM 4MG/P-PROPANOL 25MG TAB
+"DATA",176.112,22312,1)
+314914
+"DATA",176.112,22313,0)
+4009003^APAP 650MG/CTM 4MG/DM 20MG/PSEUDEFED 60MG/PKT PWDR,ORAL
+"DATA",176.112,22313,1)
+314913
+"DATA",176.112,22314,0)
+4005644^APAP 500MG/CTM 8MG/P-EPHRINE 40MG TAB,SA
+"DATA",176.112,22314,1)
+314911
+"DATA",176.112,22315,0)
+4010228^ACETAMINOPHEN 250MG/DEXTROMETHORPHAN 7.5MG/5ML LIQUID
+"DATA",176.112,22315,1)
+314910
+"DATA",176.112,22316,0)
+4006623^CODEINE 60MG/APAP 325MG/BUTALBITAL 50MG CAP
+"DATA",176.112,22316,1)
+314908
+"DATA",176.112,22317,0)
+4008106^HYDROCODONE 5MG/APAP 325MG/BUTALBITAL 50MG/CAFN 40MG CAP
+"DATA",176.112,22317,1)
+314907
+"DATA",176.112,22318,0)
+4004250^MEPERIDINE HCL 50MG/ACETAMINOPHEN 300MG TAB
+"DATA",176.112,22318,1)
+314906
+"DATA",176.112,22319,0)
+4002432^CODEINE 45MG/ACETAMINOPHEN 300MG TAB
+"DATA",176.112,22319,1)
+314905
+"DATA",176.112,22320,0)
+4007615^CODEINE 8MG/APAP 150MG/CAFN 30MG/SALICYLAMIDE 230MG TAB
+"DATA",176.112,22320,1)
+314903
+"DATA",176.112,22321,0)
+4007629^CODEINE 15MG/APAP 150MG/ASA 180MG CAP
+"DATA",176.112,22321,1)
+314902
+"DATA",176.112,22322,0)
+4015296^ZIPRASIDONE HCL 20MG CAP
+"DATA",176.112,22322,1)
+314286
+"DATA",176.112,22323,0)
+4014850^ZONISAMIDE 100MG CAP,UD
+"DATA",176.112,22323,1)
+314285
+"DATA",176.112,22324,0)
+4014849^ZONISAMIDE 100MG CAP
+"DATA",176.112,22324,1)
+314285
+"DATA",176.112,22325,0)
+4014041^WARFARIN NA 3MG TAB,UD
+"DATA",176.112,22325,1)
+314280
+"DATA",176.112,22326,0)
+4005206^WARFARIN NA 3MG TAB
+"DATA",176.112,22326,1)
+314280
+"DATA",176.112,22327,0)
+4013990^WARFARIN NA 5MG TAB,UD
+"DATA",176.112,22327,1)
+314279
+"DATA",176.112,22328,0)
+4005199^WARFARIN NA 5MG TAB
+"DATA",176.112,22328,1)
+314279
+"DATA",176.112,22329,0)
+4003642^VERAPAMIL HCL 120MG TAB,SA
+"DATA",176.112,22329,1)
+314278
+"DATA",176.112,22330,0)
+4013986^VERAPAMIL HCL 120MG TAB,SA,UD
+"DATA",176.112,22330,1)
+314278
+"DATA",176.112,22331,0)
+4012178^VENLAFAXINE HCL 50MG TAB
+"DATA",176.112,22331,1)
+314277
+"DATA",176.112,22332,0)
+4008351^VITAMIN A 5000UNT/VITAMIN D 400UNT CAP
+"DATA",176.112,22332,1)
+314276
+"DATA",176.112,22333,0)
+4003639^VERAPAMIL HCL 240MG CAP,SA
+"DATA",176.112,22333,1)
+314273
+"DATA",176.112,22334,0)
+4015072^UNOPROSTONE ISOPROPYL 0.15% SOLN,OPH
+"DATA",176.112,22334,1)
+314271
+"DATA",176.112,22335,0)
+4015449^TAZAROTENE 0.05% CREAM,TOP
+"DATA",176.112,22335,1)
+314268
+"DATA",176.112,22336,0)
+4015337^THYROID 15MG TAB
+"DATA",176.112,22336,1)
+314267
+"DATA",176.112,22337,0)
+4015331^TACROLIMUS 0.1% OINT,TOP
+"DATA",176.112,22337,1)
+314266
+"DATA",176.112,22338,0)
+4015139^TESTOSTERONE CYPIONATE 200MG/ML INJ,1ML (IN OIL)
+"DATA",176.112,22338,1)
+314265
+"DATA",176.112,22339,0)
+4016427^TESTOSTERONE ENANTHATE 200MG/ML INJ,1ML (IN OIL)
+"DATA",176.112,22339,1)
+314265
+"DATA",176.112,22340,0)
+4001129^TESTOSTERONE CYPIONATE 200MG/ML INJ (IN OIL)
+"DATA",176.112,22340,1)
+314265
+"DATA",176.112,22341,0)
+4001126^TESTOSTERONE ENANTHATE 200MG/ML INJ (IN OIL)
+"DATA",176.112,22341,1)
+314265
+"DATA",176.112,22342,0)
+4009930^THIOPENTAL NA 1GM/VIL/WATER 40ML INJ
+"DATA",176.112,22342,1)
+314259
+"DATA",176.112,22343,0)
+4009931^THIOPENTAL NA 2.5GM/VIL/WATER 100ML INJ
+"DATA",176.112,22343,1)
+314259
+"DATA",176.112,22344,0)
+4009932^THIOPENTAL NA 5GM/VIL/WATER 200ML INJ
+"DATA",176.112,22344,1)
+314259
+"DATA",176.112,22345,0)
+4006097^THIOPENTAL NA 250MG/VIL INJ
+"DATA",176.112,22345,1)
+314259
+"DATA",176.112,22346,0)
+4006106^THIOPENTAL NA 25MG/ML INJ
+"DATA",176.112,22346,1)
+314259
+"DATA",176.112,22347,0)
+4006095^THIOPENTAL NA 500MG/VIL INJ
+"DATA",176.112,22347,1)
+314259
+"DATA",176.112,22348,0)
+4009933^THIOPENTAL NA 500MG/VIL/WATER 20ML INJ
+"DATA",176.112,22348,1)
+314259
+"DATA",176.112,22349,0)
+4006101^THIOPENTAL NA 20MG/ML INJ
+"DATA",176.112,22349,1)
+314258
+"DATA",176.112,22350,0)
+4006107^THIOPENTAL NA 400MG/VIL INJ
+"DATA",176.112,22350,1)
+314258
+"DATA",176.112,22351,0)
+4013149^TIAGABINE HCL 12MG TAB
+"DATA",176.112,22351,1)
+314257
+"DATA",176.112,22352,0)
+4006804^TRIFLUOPERAZINE HCL 2MG/ML INJ
+"DATA",176.112,22352,1)
+314256
+"DATA",176.112,22353,0)
+4013095^TILUDRONATE DISODIUM 200MG TAB
+"DATA",176.112,22353,1)
+314255
+"DATA",176.112,22354,0)
+4012997^TRANDOLAPRIL 2MG/VERAPAMIL HCL 240MG TAB,SA
+"DATA",176.112,22354,1)
+314254
+"DATA",176.112,22355,0)
+4003417^TRIAZOLAM 0.5MG TAB
+"DATA",176.112,22355,1)
+314253
+"DATA",176.112,22356,0)
+4010293^TERBINAFINE HCL 1% CREAM,TOP
+"DATA",176.112,22356,1)
+314250
+"DATA",176.112,22357,0)
+4009955^TYROSINE 500MG TAB
+"DATA",176.112,22357,1)
+314249
+"DATA",176.112,22358,0)
+4002773^TRIDIHEXETHYL CL 25MG TAB
+"DATA",176.112,22358,1)
+314248
+"DATA",176.112,22359,0)
+4010406^TRICLOSAN 0.1%/ZINC OXIDE 10.8% PWDR,TOP
+"DATA",176.112,22359,1)
+314247
+"DATA",176.112,22360,0)
+4008693^TOLNAFTATE 1% PWDR AEROSOL,TOP
+"DATA",176.112,22360,1)
+314245
+"DATA",176.112,22361,0)
+4006545^TOLAZOLINE HCL 25MG TAB
+"DATA",176.112,22361,1)
+314244
+"DATA",176.112,22362,0)
+4006891^THYROGLOBULIN 65MG TAB
+"DATA",176.112,22362,1)
+314243
+"DATA",176.112,22363,0)
+4001062^THIAMINE HCL 10MG TAB
+"DATA",176.112,22363,1)
+314242
+"DATA",176.112,22364,0)
+4003702^THEOPHYLLINE,ANHYDROUS 450MG TAB,SA
+"DATA",176.112,22364,1)
+314241
+"DATA",176.112,22365,0)
+4003671^THEOPHYLLINE 250MG TAB,SA
+"DATA",176.112,22365,1)
+314240
+"DATA",176.112,22366,0)
+4003684^THEOPHYLLINE,ANHYDROUS 250MG TAB,SA
+"DATA",176.112,22366,1)
+314240
+"DATA",176.112,22367,0)
+4005531^TROPICAMIDE 1% SOLN,OPH
+"DATA",176.112,22367,1)
+314238
+"DATA",176.112,22368,0)
+4003148^TRIMEPRAZINE TARTRATE 2.5MG TAB
+"DATA",176.112,22368,1)
+314237
+"DATA",176.112,22369,0)
+4001980^TRIFLUPROMAZINE HCL 25MG TAB
+"DATA",176.112,22369,1)
+314236
+"DATA",176.112,22370,0)
+4004782^TRIETHANOLAMINE POLYPEPTIDE OLEATE CONDENSATE 10% LIQUID,OTIC
+"DATA",176.112,22370,1)
+314235
+"DATA",176.112,22371,0)
+4006663^SUCRALFATE 1GM TAB
+"DATA",176.112,22371,1)
+314234
+"DATA",176.112,22372,0)
+4015118^SUCRALFATE 1GM TAB UD
+"DATA",176.112,22372,1)
+314234
+"DATA",176.112,22373,0)
+4014737^SOMATROPIN 13.5MG INJ,SUSP,SA
+"DATA",176.112,22373,1)
+314232
+"DATA",176.112,22374,0)
+4014738^SOMATROPIN 18MG INJ,SUSP,SA
+"DATA",176.112,22374,1)
+314232
+"DATA",176.112,22375,0)
+4014739^SOMATROPIN 22.5MG INJ,SUSP,SA
+"DATA",176.112,22375,1)
+314232
+"DATA",176.112,22376,0)
+4014685^SIMVASTATIN 10MG TAB,UD
+"DATA",176.112,22376,1)
+314231
+"DATA",176.112,22377,0)
+4010151^SIMVASTATIN 10MG TAB
+"DATA",176.112,22377,1)
+314231
+"DATA",176.112,22378,0)
+4014191^SIROLIMUS 1MG/ML SOLN,ORAL
+"DATA",176.112,22378,1)
+314230
+"DATA",176.112,22379,0)
+4014194^SIROLIMUS 1MG/ML SOLN,ORAL,5ML
+"DATA",176.112,22379,1)
+314230
+"DATA",176.112,22380,0)
+4014193^SIROLIMUS 1MG/ML SOLN,ORAL,2ML
+"DATA",176.112,22380,1)
+314230
+"DATA",176.112,22381,0)
+4014192^SIROLIMUS 1MG/ML SOLN,ORAL,1ML
+"DATA",176.112,22381,1)
+314230
+"DATA",176.112,22382,0)
+4013189^SILDENAFIL CITRATE 100MG TAB
+"DATA",176.112,22382,1)
+314229
+"DATA",176.112,22383,0)
+4013187^SILDENAFIL CITRATE 25MG TAB
+"DATA",176.112,22383,1)
+314228
+"DATA",176.112,22384,0)
+4010265^SUMATRIPTAN 20MG/SPRAY SOLN,NASAL,0.1ML
+"DATA",176.112,22384,1)
+314227
+"DATA",176.112,22385,0)
+4012896^OXYBENZONE 5% (PF-50) CREAM
+"DATA",176.112,22385,1)
+314224
+"DATA",176.112,22386,0)
+4012895^OXYBENZONE 5% CREAM,TOP
+"DATA",176.112,22386,1)
+314224
+"DATA",176.112,22387,0)
+4004161^SELENIUM SULFIDE 2.5% LOTION
+"DATA",176.112,22387,1)
+314222
+"DATA",176.112,22388,0)
+4008954^SIMETHICONE 125MG TAB,CHEW
+"DATA",176.112,22388,1)
+314221
+"DATA",176.112,22389,0)
+4003527^SODIUM CHLORIDE 0.9%/BENZYL ALCOHOL 0.9% INJ
+"DATA",176.112,22389,1)
+314217
+"DATA",176.112,22390,0)
+4008953^SIMETHICONE 80MG TAB,CHEW
+"DATA",176.112,22390,1)
+314216
+"DATA",176.112,22391,0)
+4014763^RIVASTIGMINE TARTRATE 4.5MG CAP
+"DATA",176.112,22391,1)
+314215
+"DATA",176.112,22392,0)
+4014764^RIVASTIGMINE TARTRATE 4.5MG CAP,UD
+"DATA",176.112,22392,1)
+314215
+"DATA",176.112,22393,0)
+4014759^RIVASTIGMINE TARTRATE 1.5MG CAP
+"DATA",176.112,22393,1)
+314214
+"DATA",176.112,22394,0)
+4014760^RIVASTIGMINE TARTRATE 1.5MG CAP,UD
+"DATA",176.112,22394,1)
+314214
+"DATA",176.112,22395,0)
+4013003^ROPIVACAINE HCL 0.2% INJ,VIL,20ML
+"DATA",176.112,22395,1)
+314212
+"DATA",176.112,22396,0)
+4013004^ROPIVACAINE HCL 0.2% INJ,STERILE-PAK,20ML
+"DATA",176.112,22396,1)
+314212
+"DATA",176.112,22397,0)
+4013005^ROPIVACAINE HCL 0.2% INJ,AMP,20ML
+"DATA",176.112,22397,1)
+314212
+"DATA",176.112,22398,0)
+4013007^ROPIVACAINE HCL 0.2% INJ,BTL,200ML
+"DATA",176.112,22398,1)
+314212
+"DATA",176.112,22399,0)
+4014122^ROPIVACAINE HCL 0.2% INJ,AMP,10ML
+"DATA",176.112,22399,1)
+314212
+"DATA",176.112,22400,0)
+4013006^ROPIVACAINE HCL 0.2% INJ,BTL,100ML
+"DATA",176.112,22400,1)
+314212
+"DATA",176.112,22401,0)
+4012173^RISPERIDONE 4MG TAB
+"DATA",176.112,22401,1)
+314211
+"DATA",176.112,22402,0)
+4014031^RISPERIDONE 4MG TAB,UD
+"DATA",176.112,22402,1)
+314211
+"DATA",176.112,22403,0)
+4013824^ROFECOXIB 25MG TAB,UD
+"DATA",176.112,22403,1)
+314210
+"DATA",176.112,22404,0)
+4013823^ROFECOXIB 25MG TAB
+"DATA",176.112,22404,1)
+314210
+"DATA",176.112,22405,0)
+4013272^RIZATRIPTAN BENZOATE 10MG TAB
+"DATA",176.112,22405,1)
+314209
+"DATA",176.112,22406,0)
+4017332^RIZATRIPTAN BENZOATE 10MG TAB,PKG,9
+"DATA",176.112,22406,1)
+314209
+"DATA",176.112,22407,0)
+4013273^RIZATRIPTAN BENZOATE 10MG TAB,PKG,6
+"DATA",176.112,22407,1)
+314209
+"DATA",176.112,22408,0)
+4026469^RIZATRIPTAN BENZOATE 10MG TAB,PKG,12
+"DATA",176.112,22408,1)
+314209
+"DATA",176.112,22409,0)
+4013120^ROPINIROLE HCL 1MG TAB
+"DATA",176.112,22409,1)
+314208
+"DATA",176.112,22410,0)
+4013971^QUINIDINE SO4 300MG TAB,UD
+"DATA",176.112,22410,1)
+314205
+"DATA",176.112,22411,0)
+4000680^QUINIDINE SO4 300MG TAB
+"DATA",176.112,22411,1)
+314205
+"DATA",176.112,22412,0)
+4000679^QUINIDINE SO4 100MG TAB
+"DATA",176.112,22412,1)
+314204
+"DATA",176.112,22413,0)
+4010100^QUINAPRIL HCL 40MG TAB
+"DATA",176.112,22413,1)
+314203
+"DATA",176.112,22414,0)
+4003926^PHENTERMINE 37.5MG TAB,SA
+"DATA",176.112,22414,1)
+314201
+"DATA",176.112,22415,0)
+4014681^PANTOPRAZOLE NA 40MG TAB,EC
+"DATA",176.112,22415,1)
+314200
+"DATA",176.112,22416,0)
+4017265^PANTOPRAZOLE NA 40MG TAB,EC,UD
+"DATA",176.112,22416,1)
+314200
+"DATA",176.112,22417,0)
+4010279^PAROXETINE HCL 20MG TAB
+"DATA",176.112,22417,1)
+314199
+"DATA",176.112,22418,0)
+4016937^PAROXETINE MESYLATE 20MG TAB
+"DATA",176.112,22418,1)
+314199
+"DATA",176.112,22419,0)
+4013991^PAROXETINE HCL 20MG TAB,UD
+"DATA",176.112,22419,1)
+314199
+"DATA",176.112,22420,0)
+4013731^POLYVINYL ALCOHOL 0.5% SOLN,OPH
+"DATA",176.112,22420,1)
+314198
+"DATA",176.112,22421,0)
+4013243^PALIVIZUMAB 100MG/VIL INJ
+"DATA",176.112,22421,1)
+314197
+"DATA",176.112,22422,0)
+4014572^PALIVIZUMAB 50MG/VIL INJ
+"DATA",176.112,22422,1)
+314197
+"DATA",176.112,22423,0)
+4013093^PRAMIPEXOLE DIHYDROCHLORIDE 1.5MG TAB
+"DATA",176.112,22423,1)
+314196
+"DATA",176.112,22424,0)
+4005008^PHENDIMETRAZINE TARTRATE 105MG CAP,SA
+"DATA",176.112,22424,1)
+314193
+"DATA",176.112,22425,0)
+4003101^PROCHLORPERAZINE 5MG/ML INJ
+"DATA",176.112,22425,1)
+314192
+"DATA",176.112,22426,0)
+4003086^PROCHLORPERAZINE EDISYLATE 5MG/ML INJ
+"DATA",176.112,22426,1)
+314192
+"DATA",176.112,22427,0)
+4006546^PHENTOLAMINE MESYLATE 5MG/VIL INJ,CONC
+"DATA",176.112,22427,1)
+314190
+"DATA",176.112,22428,0)
+4008195^POVIDONE IODINE 7.5% SKIN CLEANSER LIQUID,TOP
+"DATA",176.112,22428,1)
+314188
+"DATA",176.112,22429,0)
+4008176^POVIDONE IODINE 7.5% SURGICAL SCRUB,TOP
+"DATA",176.112,22429,1)
+314188
+"DATA",176.112,22430,0)
+4010136^PAMIDRONATE DISODIUM 90MG/VIL INJ
+"DATA",176.112,22430,1)
+314187
+"DATA",176.112,22431,0)
+4005772^PAROMOMYCIN SO4 250MG CAP
+"DATA",176.112,22431,1)
+314184
+"DATA",176.112,22432,0)
+4000876^POTASSIUM CHLORIDE 20MEQ/PKT PWDR,EFFERVSC
+"DATA",176.112,22432,1)
+314183
+"DATA",176.112,22433,0)
+4000885^POTASSIUM CHLORIDE 20MEQ TAB,EFFERVSC
+"DATA",176.112,22433,1)
+314183
+"DATA",176.112,22434,0)
+4000884^POTASSIUM CHLORIDE 20MEQ/PKT GRNL,EFFERVSC
+"DATA",176.112,22434,1)
+314183
+"DATA",176.112,22435,0)
+4000860^POTASSIUM CHLORIDE 20MEQ/PKT PWDR
+"DATA",176.112,22435,1)
+314183
+"DATA",176.112,22436,0)
+4000882^POTASSIUM CHLORIDE 40MEQ/15ML (SF) LIQUID
+"DATA",176.112,22436,1)
+314182
+"DATA",176.112,22437,0)
+4000855^POTASSIUM CHLORIDE 40MEQ/15ML LIQUID
+"DATA",176.112,22437,1)
+314182
+"DATA",176.112,22438,0)
+4001934^PROPARACAINE HCL 0.5% SOLN,OPH
+"DATA",176.112,22438,1)
+314178
+"DATA",176.112,22439,0)
+4004096^PREDNISOLONE NA PHOSPHATE 0.25%/SULFACETAMIDE NA 10% SOLN,OPH
+"DATA",176.112,22439,1)
+314177
+"DATA",176.112,22440,0)
+4005509^PHYSOSTIGMINE SALICYLATE 0.25% SOLN,OPH
+"DATA",176.112,22440,1)
+314176
+"DATA",176.112,22441,0)
+4004293^PHENYLEPHRINE HCL 10% VISCOUS SOLN,OPH
+"DATA",176.112,22441,1)
+314175
+"DATA",176.112,22442,0)
+4004291^PHENYLEPHRINE HCL 10% SOLN,OPH
+"DATA",176.112,22442,1)
+314175
+"DATA",176.112,22443,0)
+4005730^PHENSUXIMIDE 500MG CAP
+"DATA",176.112,22443,1)
+314174
+"DATA",176.112,22444,0)
+4004737^AMYLASE 8125UNT/LIPASE 650UNT/PROTEASE 8125UNT TAB
+"DATA",176.112,22444,1)
+314173
+"DATA",176.112,22445,0)
+4006642^POTASSIUM BICARB 5MEQ/POTASSIUM CHLORIDE 20MEQ TAB,EFFERVSC
+"DATA",176.112,22445,1)
+314172
+"DATA",176.112,22446,0)
+4006645^POTASSIUM BICARBONATE 5MEQ/POTASSIUM CHLORIDE 20MEQ TAB,EFFERVSC
+"DATA",176.112,22446,1)
+314172
+"DATA",176.112,22447,0)
+4006388^PENTAERYTHRITOL TETRANITRATE 60MG CAP,SA
+"DATA",176.112,22447,1)
+314171
+"DATA",176.112,22448,0)
+4002168^PYRIDOSTIGMINE BR 180MG TAB,SA
+"DATA",176.112,22448,1)
+314170
+"DATA",176.112,22449,0)
+4003087^PROCHLORPERAZINE MALEATE 10MG CAP,SA
+"DATA",176.112,22449,1)
+314168
+"DATA",176.112,22450,0)
+4002187^PROCARBAZINE HCL 50MG CAP
+"DATA",176.112,22450,1)
+314167
+"DATA",176.112,22451,0)
+4001719^PROCAINAMIDE HCL 250MG TAB
+"DATA",176.112,22451,1)
+314166
+"DATA",176.112,22452,0)
+4003045^PREDNISOLONE NA PHOSPHATE 1% SOLN,OPH
+"DATA",176.112,22452,1)
+314165
+"DATA",176.112,22453,0)
+4006484^PROCYCLIDINE HCL 5MG TAB
+"DATA",176.112,22453,1)
+314164
+"DATA",176.112,22454,0)
+4000879^POTASSIUM CHLORIDE 8MEQ TAB
+"DATA",176.112,22454,1)
+314163
+"DATA",176.112,22455,0)
+4007535^PENTAMIDINE ISETHIONATE 300MG/VIL SOLN,INHL
+"DATA",176.112,22455,1)
+314161
+"DATA",176.112,22456,0)
+4006391^PENTAERYTHRITOL TETRANITRATE 20MG TAB,ORAL
+"DATA",176.112,22456,1)
+314160
+"DATA",176.112,22457,0)
+4015264^OSELTAMIVIR PO4 60MG/5ML SUSP,ORAL
+"DATA",176.112,22457,1)
+314157
+"DATA",176.112,22458,0)
+4015104^OXYCODONE HCL 15MG TAB
+"DATA",176.112,22458,1)
+314156
+"DATA",176.112,22459,0)
+4015557^OLANZAPINE 5MG TAB,RAPID DISINTEGRATING
+"DATA",176.112,22459,1)
+314155
+"DATA",176.112,22460,0)
+4015076^OLANZAPINE 5MG TAB,RAPID DISINTERGRATING
+"DATA",176.112,22460,1)
+314155
+"DATA",176.112,22461,0)
+4012955^OLANZAPINE 10MG TAB
+"DATA",176.112,22461,1)
+314154
+"DATA",176.112,22462,0)
+4014814^OLANZAPINE 10MG TAB,UD
+"DATA",176.112,22462,1)
+314154
+"DATA",176.112,22463,0)
+4013783^ORLISTAT 120MG CAP
+"DATA",176.112,22463,1)
+314153
+"DATA",176.112,22464,0)
+4008960^OCTREOTIDE ACETATE 0.2MG/ML INJ
+"DATA",176.112,22464,1)
+314152
+"DATA",176.112,22465,0)
+4013407^OXYBUTYNIN CL 10MG TAB,SA
+"DATA",176.112,22465,1)
+314151
+"DATA",176.112,22466,0)
+4016080^OXYCODONE HCL 20MG TAB,SA,UD
+"DATA",176.112,22466,1)
+314149
+"DATA",176.112,22467,0)
+4005153^OXYCODONE HCL 20MG TAB,SA
+"DATA",176.112,22467,1)
+314149
+"DATA",176.112,22468,0)
+4003170^ETHINYL ESTRADIOL 0.05MG/NORGESTREL 0.5MG TAB
+"DATA",176.112,22468,1)
+314146
+"DATA",176.112,22469,0)
+4003387^ETHINYL ESTRADIOL 0.05MG/FE FUMARATE 75MG/NORGESTREL 0.5MG TAB
+"DATA",176.112,22469,1)
+314146
+"DATA",176.112,22470,0)
+4005712^OXTRIPHYLLINE 400MG TAB,SA
+"DATA",176.112,22470,1)
+314145
+"DATA",176.112,22471,0)
+4006696^ORPHENADRINE HCL 50MG TAB
+"DATA",176.112,22471,1)
+314144
+"DATA",176.112,22472,0)
+4015304^NATEGLINIDE 60MG TAB
+"DATA",176.112,22472,1)
+314142
+"DATA",176.112,22473,0)
+4014175^NITROGLYCERIN 0.4MG/HR PATCH
+"DATA",176.112,22473,1)
+314139
+"DATA",176.112,22474,0)
+4001232^NITROGLYCERIN 10MG/24HRS PATCH
+"DATA",176.112,22474,1)
+314139
+"DATA",176.112,22475,0)
+4010288^NEDOCROMIL NA 1.75MG/ACTUAT INHL,ORAL
+"DATA",176.112,22475,1)
+314138
+"DATA",176.112,22476,0)
+4010469^NONOXYNOL-9 8% FOAM,VAG
+"DATA",176.112,22476,1)
+314136
+"DATA",176.112,22477,0)
+4013171^NARATRIPTAN HCL 2.5MG TAB,UD
+"DATA",176.112,22477,1)
+314135
+"DATA",176.112,22478,0)
+4012777^NALMEFENE HCL 100MCG/ML INJ,AMP,1ML
+"DATA",176.112,22478,1)
+314133
+"DATA",176.112,22479,0)
+4004591^NIFEDIPINE 10MG TAB
+"DATA",176.112,22479,1)
+314132
+"DATA",176.112,22480,0)
+4006372^NIACIN 250MG CAP,SA
+"DATA",176.112,22480,1)
+314131
+"DATA",176.112,22481,0)
+4005540^NEOMYCIN SO4 40MG/POLYMYXIN B 200000UNT/ML CONC,IRRG
+"DATA",176.112,22481,1)
+314124
+"DATA",176.112,22482,0)
+4001247^NITROGLYCERIN 5MG TAB,BUCC,SA
+"DATA",176.112,22482,1)
+314122
+"DATA",176.112,22483,0)
+4001234^NITROGLYCERIN 1MG TAB,BUCC,SA
+"DATA",176.112,22483,1)
+314121
+"DATA",176.112,22484,0)
+4001250^NITROGLYCERIN 0.4MG/SPRAY AEROSOL
+"DATA",176.112,22484,1)
+314120
+"DATA",176.112,22485,0)
+4005636^NICOTINE POLACRILEX 2MG TAB,CHEWG GUM
+"DATA",176.112,22485,1)
+314119
+"DATA",176.112,22486,0)
+4008458^NICARDIPINE HCL 60MG CAP,SA
+"DATA",176.112,22486,1)
+314118
+"DATA",176.112,22487,0)
+4008456^NICARDIPINE HCL 30MG CAP,SA
+"DATA",176.112,22487,1)
+314117
+"DATA",176.112,22488,0)
+4006383^NIACIN 25MG TAB
+"DATA",176.112,22488,1)
+314116
+"DATA",176.112,22489,0)
+4001008^MORPHINE SO4 200MG TAB,SA
+"DATA",176.112,22489,1)
+314115
+"DATA",176.112,22490,0)
+4015285^MAGNESIUM OXIDE 200MG TAB
+"DATA",176.112,22490,1)
+314113
+"DATA",176.112,22491,0)
+4012918^MIRTAZAPINE 30MG TAB
+"DATA",176.112,22491,1)
+314111
+"DATA",176.112,22492,0)
+4014507^MIRTAZAPINE 30MG TAB,UD
+"DATA",176.112,22492,1)
+314111
+"DATA",176.112,22493,0)
+4000792^METHYLTESTOSTERONE 25MG TAB,ORAL
+"DATA",176.112,22493,1)
+314110
+"DATA",176.112,22494,0)
+4000796^METHYLTESTOSTERONE 10MG TAB,SUBLINGUAL
+"DATA",176.112,22494,1)
+314109
+"DATA",176.112,22495,0)
+4014324^MINOCYCLINE HCL 75MG CAP
+"DATA",176.112,22495,1)
+314108
+"DATA",176.112,22496,0)
+4002055^METHYPRYLON 300MG CAP
+"DATA",176.112,22496,1)
+314107
+"DATA",176.112,22497,0)
+4002394^METRONIDAZOLE 250MG TAB
+"DATA",176.112,22497,1)
+314106
+"DATA",176.112,22498,0)
+4014035^METRONIDAZOLE 250MG TAB,UD
+"DATA",176.112,22498,1)
+314106
+"DATA",176.112,22499,0)
+4000786^METHADONE HCL 90MG/20ML SOLN,ORAL
+"DATA",176.112,22499,1)
+314103
+"DATA",176.112,22500,0)
+4000781^METHADONE HCL 65MG/20ML SOLN,ORAL
+"DATA",176.112,22500,1)
+314102
+"DATA",176.112,22501,0)
+4000773^METHADONE HCL 25MG/20ML SOLN,ORAL
+"DATA",176.112,22501,1)
+314101
+"DATA",176.112,22502,0)
+4000768^METHADONE HCL 5MG TAB,EFFERVSC
+"DATA",176.112,22502,1)
+314100
+"DATA",176.112,22503,0)
+4000758^METHADONE HCL 5MG TAB
+"DATA",176.112,22503,1)
+314100
+"DATA",176.112,22504,0)
+4003438^METHYLPREDNISOLONE NA SUCCINATE 500MG/VIL INJ
+"DATA",176.112,22504,1)
+314099
+"DATA",176.112,22505,0)
+4003430^METHYLPREDNISOLONE NA SUCCINATE 125MG/VIL INJ
+"DATA",176.112,22505,1)
+314099
+"DATA",176.112,22506,0)
+4005292^MICONAZOLE NITRATE 2% OINT,TOP
+"DATA",176.112,22506,1)
+314098
+"DATA",176.112,22507,0)
+4008075^FOLLICLE STIMULATING 75UNT/LUTEINIZING HORMONE 75UNT/VIL INJ
+"DATA",176.112,22507,1)
+314097
+"DATA",176.112,22508,0)
+4008073^FOLLICLE STIMULATING 75UNT/LUTEINIZING HORMONE 75UNT/AMP INJ
+"DATA",176.112,22508,1)
+314097
+"DATA",176.112,22509,0)
+4003767^MITOMYCIN 5MG/VIL INJ
+"DATA",176.112,22509,1)
+314096
+"DATA",176.112,22510,0)
+4003770^MITOMYCIN 40MG/MANNITOL 80MG/VIL INJ
+"DATA",176.112,22510,1)
+314096
+"DATA",176.112,22511,0)
+4003768^MITOMYCIN 20MG/VIL INJ
+"DATA",176.112,22511,1)
+314096
+"DATA",176.112,22512,0)
+4003769^MITOMYCIN 0.5MG/ML INJ
+"DATA",176.112,22512,1)
+314096
+"DATA",176.112,22513,0)
+4002357^MEDROXYPROGESTERONE ACETATE 150MG/ML INJ,SUSP
+"DATA",176.112,22513,1)
+314095
+"DATA",176.112,22514,0)
+4007476^MAGNESIUM CHLORIDE 535MG TAB,SA
+"DATA",176.112,22514,1)
+314093
+"DATA",176.112,22515,0)
+4008975^MAGNESIUM 64MG TAB,SA
+"DATA",176.112,22515,1)
+314093
+"DATA",176.112,22516,0)
+4009059^MESALAMINE 250MG CAP,SA
+"DATA",176.112,22516,1)
+314092
+"DATA",176.112,22517,0)
+4003450^METHSCOPOLAMINE BR 2.5MG TAB
+"DATA",176.112,22517,1)
+314088
+"DATA",176.112,22518,0)
+4013961^MILK OF MAGNESIA,15ML
+"DATA",176.112,22518,1)
+314087
+"DATA",176.112,22519,0)
+4013963^MILK OF MAGNESIA,30ML
+"DATA",176.112,22519,1)
+314087
+"DATA",176.112,22520,0)
+4013972^MILK OF MAGNESIA,10ML
+"DATA",176.112,22520,1)
+314087
+"DATA",176.112,22521,0)
+4009213^MAGNESIUM HYDROXIDE 1200MG/5ML SUSP,ORAL
+"DATA",176.112,22521,1)
+314087
+"DATA",176.112,22522,0)
+4005188^MOLINDONE HCL 50MG TAB
+"DATA",176.112,22522,1)
+314082
+"DATA",176.112,22523,0)
+4009347^MAGALDRATE 540MG/SIMETHICONE 20MG/5ML SUSP,ORAL
+"DATA",176.112,22523,1)
+314081
+"DATA",176.112,22524,0)
+4014980^LEVOFLOXACIN 0.5% SOLN,OPH
+"DATA",176.112,22524,1)
+314080
+"DATA",176.112,22525,0)
+4014755^LINEZOLID 400MG TAB
+"DATA",176.112,22525,1)
+314079
+"DATA",176.112,22526,0)
+4014756^LINEZOLID 400MG TAB,UD
+"DATA",176.112,22526,1)
+314079
+"DATA",176.112,22527,0)
+4014149^LOXAPINE SUCCINATE 10MG CAP,UD
+"DATA",176.112,22527,1)
+314078
+"DATA",176.112,22528,0)
+4002788^LOXAPINE SUCCINATE 10MG CAP
+"DATA",176.112,22528,1)
+314078
+"DATA",176.112,22529,0)
+4002794^LOXAPINE HCL 10MG CAP
+"DATA",176.112,22529,1)
+314078
+"DATA",176.112,22530,0)
+4014012^LISINOPRIL 20MG TAB,UD
+"DATA",176.112,22530,1)
+314077
+"DATA",176.112,22531,0)
+4008592^LISINOPRIL 20MG TAB
+"DATA",176.112,22531,1)
+314077
+"DATA",176.112,22532,0)
+4014011^LISINOPRIL 10MG TAB,UD
+"DATA",176.112,22532,1)
+314076
+"DATA",176.112,22533,0)
+4008593^LISINOPRIL 10MG TAB
+"DATA",176.112,22533,1)
+314076
+"DATA",176.112,22534,0)
+4002796^LOXAPINE HCL 50MG CAP
+"DATA",176.112,22534,1)
+314075
+"DATA",176.112,22535,0)
+4013952^LOXAPINE SUCCINATE 50MG CAP,UD
+"DATA",176.112,22535,1)
+314075
+"DATA",176.112,22536,0)
+4002790^LOXAPINE SUCCINATE 50MG CAP
+"DATA",176.112,22536,1)
+314075
+"DATA",176.112,22537,0)
+4012749^LOSARTAN 50MG TAB
+"DATA",176.112,22537,1)
+314073
+"DATA",176.112,22538,0)
+4013415^LOSARTAN POTASSIUM 50MG TAB,UD
+"DATA",176.112,22538,1)
+314073
+"DATA",176.112,22539,0)
+4012903^LATANOPROST 0.005% SOLN,OPH
+"DATA",176.112,22539,1)
+314072
+"DATA",176.112,22540,0)
+4004411^LIDOCAINE HCL 2% JELLY,5ML TUBE
+"DATA",176.112,22540,1)
+314068
+"DATA",176.112,22541,0)
+4004389^LIDOCAINE HCL 2% JELLY
+"DATA",176.112,22541,1)
+314068
+"DATA",176.112,22542,0)
+4008014^LOPERAMIDE HCL 1MG/5ML LIQUID
+"DATA",176.112,22542,1)
+314067
+"DATA",176.112,22543,0)
+4013290^LOPERAMIDE HCL 1MG/5ML LIQUID,20ML
+"DATA",176.112,22543,1)
+314067
+"DATA",176.112,22544,0)
+4008017^LOPERAMIDE HCL 1MG/5ML LIQUID,5ML
+"DATA",176.112,22544,1)
+314067
+"DATA",176.112,22545,0)
+4013289^LOPERAMIDE HCL 1MG/5ML LIQUID,10ML
+"DATA",176.112,22545,1)
+314067
+"DATA",176.112,22546,0)
+4006868^LACTOSE 200MG CAP
+"DATA",176.112,22546,1)
+314063
+"DATA",176.112,22547,0)
+4003102^LIOTHYRONINE NA 5MCG TAB
+"DATA",176.112,22547,1)
+314062
+"DATA",176.112,22548,0)
+4002332^LEVOTHYROXINE NA 0.5MG TAB
+"DATA",176.112,22548,1)
+314061
+"DATA",176.112,22549,0)
+4003407^KETOPROFEN 100MG CAP,SA
+"DATA",176.112,22549,1)
+314059
+"DATA",176.112,22550,0)
+4003406^KETOPROFEN 200MG CAP,SA
+"DATA",176.112,22550,1)
+314058
+"DATA",176.112,22551,0)
+4015402^IMIPRAMINE HCL 25MG TAB,UD
+"DATA",176.112,22551,1)
+314057
+"DATA",176.112,22552,0)
+4002532^IMIPRAMINE HCL 25MG TAB
+"DATA",176.112,22552,1)
+314057
+"DATA",176.112,22553,0)
+4002308^ISOSORBIDE DINITRATE 5MG TAB,ORAL
+"DATA",176.112,22553,1)
+314055
+"DATA",176.112,22554,0)
+4014726^ISOSORBIDE DINITRATE 5MG TAB,ORAL,UD
+"DATA",176.112,22554,1)
+314055
+"DATA",176.112,22555,0)
+4002289^INTERFERON ALFA-2A,RECOMBINANT 36 MILLION UNT/ML INJ
+"DATA",176.112,22555,1)
+314050
+"DATA",176.112,22556,0)
+4002414^IBUPROFEN 50MG TAB,CHEW
+"DATA",176.112,22556,1)
+314047
+"DATA",176.112,22557,0)
+4008414^IPRATROPIUM BR 0.02% SOLN,INHL,2.5ML
+"DATA",176.112,22557,1)
+314046
+"DATA",176.112,22558,0)
+4016803^IPRATROPIUM BR 0.02% SOLN,INHL,2.5ML,UD
+"DATA",176.112,22558,1)
+314046
+"DATA",176.112,22559,0)
+4004243^ISOPROTERENOL SO4 80MCG/SPRAY INHL,ORAL
+"DATA",176.112,22559,1)
+314044
+"DATA",176.112,22560,0)
+4004246^ISOPROTERENOL SO4 0.2% AEROSOL,INHL
+"DATA",176.112,22560,1)
+314044
+"DATA",176.112,22561,0)
+4004259^ISOETHARINE HCL 0.5% SOLN,INHL
+"DATA",176.112,22561,1)
+314043
+"DATA",176.112,22562,0)
+4004257^ISOETHARINE HCL 0.2% SOLN,INHL
+"DATA",176.112,22562,1)
+314042
+"DATA",176.112,22563,0)
+4004256^ISOETHARINE HCL 0.125% SOLN,INHL
+"DATA",176.112,22563,1)
+314041
+"DATA",176.112,22564,0)
+4002313^ISOSORBIDE DINITRATE 40MG CAP,SA
+"DATA",176.112,22564,1)
+314040
+"DATA",176.112,22565,0)
+4004251^ISOETHARINE MESYLATE 340MCG/SPRAY INHL,ORAL
+"DATA",176.112,22565,1)
+314039
+"DATA",176.112,22566,0)
+4001432^INSULIN,PROTAMINE ZINC,BEEF/PORK 40UNT/ML INJ
+"DATA",176.112,22566,1)
+314038
+"DATA",176.112,22567,0)
+4014154^HYDROCORTISONE ACETATE 30MG SUPP,RTL
+"DATA",176.112,22567,1)
+314037
+"DATA",176.112,22568,0)
+4014052^HYDRALAZINE HCL 25MG TAB,UD
+"DATA",176.112,22568,1)
+314036
+"DATA",176.112,22569,0)
+4002634^HYDRALAZINE HCL 25MG TAB
+"DATA",176.112,22569,1)
+314036
+"DATA",176.112,22570,0)
+4014007^HALOPERIDOL 10MG TAB,UD
+"DATA",176.112,22570,1)
+314035
+"DATA",176.112,22571,0)
+4003621^HALOPERIDOL 10MG TAB
+"DATA",176.112,22571,1)
+314035
+"DATA",176.112,22572,0)
+4014006^HALOPERIDOL 2MG TAB,UD
+"DATA",176.112,22572,1)
+314034
+"DATA",176.112,22573,0)
+4003619^HALOPERIDOL 2MG TAB
+"DATA",176.112,22573,1)
+314034
+"DATA",176.112,22574,0)
+4013216^HALOFANTRINE HCL 250MG TAB
+"DATA",176.112,22574,1)
+314032
+"DATA",176.112,22575,0)
+4008162^HYDROCODONE 7MG/ASPIRIN 325MG TAB
+"DATA",176.112,22575,1)
+314031
+"DATA",176.112,22576,0)
+4002730^HYDROCHLOROTHIAZIDE 25MG/TRIAMTERENE 50MG TAB
+"DATA",176.112,22576,1)
+314029
+"DATA",176.112,22577,0)
+4003276^HYDROMORPHONE HCL 1MG TAB
+"DATA",176.112,22577,1)
+314028
+"DATA",176.112,22578,0)
+4006717^HYOSCYAMINE SO4 0.125MG/ML DROPS,ORAL
+"DATA",176.112,22578,1)
+314023
+"DATA",176.112,22579,0)
+4004042^HYDROCORTISONE ACETATE 0.5%/PRAMOXINE HCL 1% LOTION
+"DATA",176.112,22579,1)
+314022
+"DATA",176.112,22580,0)
+4002937^HYDROCORTISONE 0.5% SOLN,TOP
+"DATA",176.112,22580,1)
+314021
+"DATA",176.112,22581,0)
+4002654^HYDROCHLOROTHIAZIDE 100MG/ML SOLN,ORAL
+"DATA",176.112,22581,1)
+314020
+"DATA",176.112,22582,0)
+4006535^HYDRALAZINE 50MG/RESERPINE 0.2MG TAB
+"DATA",176.112,22582,1)
+314019
+"DATA",176.112,22583,0)
+4002847^HYDROCHLOROTHIAZIDE 50MG/RESERPINE 0.1MG TAB
+"DATA",176.112,22583,1)
+314018
+"DATA",176.112,22584,0)
+4004602^HYDROCHLOROTHIAZIDE 50MG/METOPROLOL 100MG TAB
+"DATA",176.112,22584,1)
+314017
+"DATA",176.112,22585,0)
+4005447^HYDRALAZINE 25MG/HYDROCHLOROTHIAZIDE 15MG TAB
+"DATA",176.112,22585,1)
+314015
+"DATA",176.112,22586,0)
+4007003^HYDROQUINONE 3.3% SOLN,TOP
+"DATA",176.112,22586,1)
+314014
+"DATA",176.112,22587,0)
+4024599^HEPARIN NA 10000UNIT/ML SOLN,CARPUJECT,0.5ML
+"DATA",176.112,22587,1)
+314013
+"DATA",176.112,22588,0)
+4001350^HEPARIN NA (PORK) 10000UNT/ML INJ
+"DATA",176.112,22588,1)
+314013
+"DATA",176.112,22589,0)
+4001362^HEPARIN NA (BEEF) 10000UNT/ML INJ
+"DATA",176.112,22589,1)
+314013
+"DATA",176.112,22590,0)
+4001353^HEPARIN NA 10000UNT/ML INJ
+"DATA",176.112,22590,1)
+314013
+"DATA",176.112,22591,0)
+4007684^HEMORRHOIDAL-HC 10MG SUPP,RTL
+"DATA",176.112,22591,1)
+314012
+"DATA",176.112,22592,0)
+4002922^HYDROCORTISONE ACETATE 10MG SUPP,RTL
+"DATA",176.112,22592,1)
+314012
+"DATA",176.112,22593,0)
+4008647^HAMAMELIS WATER 50% OINT,TOP
+"DATA",176.112,22593,1)
+314011
+"DATA",176.112,22594,0)
+4014270^GATIFLOXACIN 400MG TAB
+"DATA",176.112,22594,1)
+314009
+"DATA",176.112,22595,0)
+4009093^GOSERELIN ACETATE 10.8MG INJ,IMPLANT
+"DATA",176.112,22595,1)
+314008
+"DATA",176.112,22596,0)
+4008897^GANCICLOVIR 250MG CAP
+"DATA",176.112,22596,1)
+314007
+"DATA",176.112,22597,0)
+4005067^GLIPIZIDE 5MG TAB,SA
+"DATA",176.112,22597,1)
+314006
+"DATA",176.112,22598,0)
+4005613^GUAIFENESIN 180MG/THEOPHYLLINE 300MG CAP,SA
+"DATA",176.112,22598,1)
+314004
+"DATA",176.112,22599,0)
+4006505^GRAMICIDIN 0.025MG/N-MYCIN 2.5MG/POLYMYX 5000UNT/ML SOLN,OPH
+"DATA",176.112,22599,1)
+314002
+"DATA",176.112,22600,0)
+4003458^GLYBURIDE 1.5MG TAB
+"DATA",176.112,22600,1)
+314000
+"DATA",176.112,22601,0)
+4007436^GENTIAN VIOLET 2% SOLN,TOP
+"DATA",176.112,22601,1)
+313997
+"DATA",176.112,22602,0)
+4004137^GENTAMICIN SO4 80MG/VIL INJ
+"DATA",176.112,22602,1)
+313996
+"DATA",176.112,22603,0)
+4004126^GENTAMICIN SO4 40MG/ML INJ
+"DATA",176.112,22603,1)
+313996
+"DATA",176.112,22604,0)
+4015433^FLUOXETINE HCL 90MG CAP,EC
+"DATA",176.112,22604,1)
+313995
+"DATA",176.112,22605,0)
+4014498^FLUVOXAMINE MALEATE 50MG TAB,UD
+"DATA",176.112,22605,1)
+313994
+"DATA",176.112,22606,0)
+4012721^FLUVOXAMINE MALEATE 50MG TAB
+"DATA",176.112,22606,1)
+313994
+"DATA",176.112,22607,0)
+4014346^FENTANYL CITRATE 800MCG LOZENGE
+"DATA",176.112,22607,1)
+313993
+"DATA",176.112,22608,0)
+4014345^FENTANYL CITRATE 600MCG LOZENGE
+"DATA",176.112,22608,1)
+313992
+"DATA",176.112,22609,0)
+4014109^FLUOXETINE HCL 10MG TAB
+"DATA",176.112,22609,1)
+313990
+"DATA",176.112,22610,0)
+4014107^FLUOXETINE HCL 40MG CAP
+"DATA",176.112,22610,1)
+313989
+"DATA",176.112,22611,0)
+4002370^FUROSEMIDE 40MG TAB
+"DATA",176.112,22611,1)
+313988
+"DATA",176.112,22612,0)
+4013942^FUROSEMIDE 40MG TAB,UD
+"DATA",176.112,22612,1)
+313988
+"DATA",176.112,22613,0)
+4013940^FOSINOPRIL NA 10MG TAB,UD
+"DATA",176.112,22613,1)
+313987
+"DATA",176.112,22614,0)
+4010117^FOSINOPRIL NA 10MG TAB
+"DATA",176.112,22614,1)
+313987
+"DATA",176.112,22615,0)
+4002350^FLURAZEPAM HCL 15MG TAB
+"DATA",176.112,22615,1)
+313986
+"DATA",176.112,22616,0)
+4010119^FOSINOPRIL NA 40MG TAB
+"DATA",176.112,22616,1)
+313982
+"DATA",176.112,22617,0)
+4008238^FERROUS SO4 159MG CAP,SA
+"DATA",176.112,22617,1)
+313981
+"DATA",176.112,22618,0)
+4004831^FERROUS FUMARATE 106MG TAB
+"DATA",176.112,22618,1)
+313980
+"DATA",176.112,22619,0)
+4001718^FLUDROCORTISONE ACETATE 0.1MG TAB
+"DATA",176.112,22619,1)
+313979
+"DATA",176.112,22620,0)
+4004179^FLUOCINOLONE ACETONIDE 0.1% CREAM,TOP
+"DATA",176.112,22620,1)
+313978
+"DATA",176.112,22621,0)
+4014935^EFLORNITHINE HCL 13.9% CREAM,TOP
+"DATA",176.112,22621,1)
+313975
+"DATA",176.112,22622,0)
+4001588^ERYTHROMYCIN 125MG/5ML SUSP
+"DATA",176.112,22622,1)
+313968
+"DATA",176.112,22623,0)
+4003246^EPINEPHRINE HCL 1MG/ML SOLN,NASAL
+"DATA",176.112,22623,1)
+313967
+"DATA",176.112,22624,0)
+4008383^EPHEDRINE 25MG/THEOPHYLLINE 104MG CAP
+"DATA",176.112,22624,1)
+313966
+"DATA",176.112,22625,0)
+4006937^EPHEDRINE 12.5MG/GUAIFENESIN 200MG CAP
+"DATA",176.112,22625,1)
+313965
+"DATA",176.112,22626,0)
+4004642^ESTROGENS,CONJUGATED 0.625MG/GM CREAM,VAG
+"DATA",176.112,22626,1)
+313964
+"DATA",176.112,22627,0)
+4003243^EPINEPHRINE BITARTRATE 2% SOLN,OPH
+"DATA",176.112,22627,1)
+313963
+"DATA",176.112,22628,0)
+4003245^EPINEPHRINE HCL 2% SOLN,OPH
+"DATA",176.112,22628,1)
+313963
+"DATA",176.112,22629,0)
+4005517^EPINEPHRYL BORATE 2% SOLN,OPH
+"DATA",176.112,22629,1)
+313963
+"DATA",176.112,22630,0)
+4015323^DEXTRAN-70 0.1%/HYDROXYPROPYL METHYCLELLULOS 0.8% SLN,OPH,0.5ML
+"DATA",176.112,22630,1)
+313962
+"DATA",176.112,22631,0)
+4014344^DIDANOSINE 200MG TAB,CHEWABLE
+"DATA",176.112,22631,1)
+313961
+"DATA",176.112,22632,0)
+4014056^DIPHENHYDRAMINE HCL 12.5MG/5ML (ALC-F) LIQUID
+"DATA",176.112,22632,1)
+313960
+"DATA",176.112,22633,0)
+4002553^DIPHENHYDRAMINE HCL 12.5MG/5ML ELIXIR
+"DATA",176.112,22633,1)
+313960
+"DATA",176.112,22634,0)
+4002554^DIPHENHYDRAMINE HCL 12.5MG/5ML SYRUP
+"DATA",176.112,22634,1)
+313960
+"DATA",176.112,22635,0)
+4014164^DIPHENHYDRAMINE HCL 12.5MG/5ML (AL-F/SF) LIQUID
+"DATA",176.112,22635,1)
+313960
+"DATA",176.112,22636,0)
+4005444^DIETHYLPROPION HCL 75MG TAB,SA
+"DATA",176.112,22636,1)
+313958
+"DATA",176.112,22637,0)
+4013217^DORZOLAMIDE HCL 2%/TIMOLOL MALEATE 0.5% SOLN,OPH
+"DATA",176.112,22637,1)
+313954
+"DATA",176.112,22638,0)
+4003400^DIHYDROCODEINE 16MG/APAP 356MG/CAFN 30MG CAP
+"DATA",176.112,22638,1)
+313952
+"DATA",176.112,22639,0)
+4008475^DEXTRANOMER PASTE,TOP,10GM,STERILE
+"DATA",176.112,22639,1)
+313951
+"DATA",176.112,22640,0)
+4008144^PANTHENOL 250MG/ML INJ
+"DATA",176.112,22640,1)
+313950
+"DATA",176.112,22641,0)
+4003579^DEXPANTHENOL 250MG/ML INJ
+"DATA",176.112,22641,1)
+313950
+"DATA",176.112,22642,0)
+4012904^DOCETAXEL 20MG/VIL INJ
+"DATA",176.112,22642,1)
+313949
+"DATA",176.112,22643,0)
+4012905^DOCETAXEL 80MG/VIL INJ
+"DATA",176.112,22643,1)
+313949
+"DATA",176.112,22644,0)
+4005545^DEXAMETHASONE 0.1%/N-MYCIN 5MG/POLYMYX 10000UNT/GM OINT,OPH
+"DATA",176.112,22644,1)
+313947
+"DATA",176.112,22645,0)
+4002435^DICLOXACILLIN NA 62.5MG/5ML SUSP
+"DATA",176.112,22645,1)
+313945
+"DATA",176.112,22646,0)
+4005546^DEXAMETHASONE 0.1%/N-MYCIN 3.5MG/POLYMYX 10000UNT/ML SOLN,OPH
+"DATA",176.112,22646,1)
+313943
+"DATA",176.112,22647,0)
+4006958^DANTROLENE NA 100MG CAP
+"DATA",176.112,22647,1)
+313942
+"DATA",176.112,22648,0)
+4015373^CICLOPIROX OLAMINE 0.77% GEL,TOP
+"DATA",176.112,22648,1)
+313941
+"DATA",176.112,22649,0)
+4015322^CLOBETASOL PROPIONATE 0.05% FOAM,TOP
+"DATA",176.112,22649,1)
+313940
+"DATA",176.112,22650,0)
+4015307^CASPOFUNGIN ACETATE 70MG/VIL INJ
+"DATA",176.112,22650,1)
+313939
+"DATA",176.112,22651,0)
+4014153^CERIVASTATIN NA 0.4MG TAB
+"DATA",176.112,22651,1)
+313936
+"DATA",176.112,22652,0)
+4014125^CHLORPHENIRAMINE 1MG/PSEUDOEPHEDRINE 15MG TAB,CHEWABLE
+"DATA",176.112,22652,1)
+313935
+"DATA",176.112,22653,0)
+4013664^CALCITRIOL 1MCG/ML SOLN,ORAL
+"DATA",176.112,22653,1)
+313932
+"DATA",176.112,22654,0)
+4000946^CEFAZOLIN NA 1GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,22654,1)
+313929
+"DATA",176.112,22655,0)
+4000940^CEFAZOLIN NA 1GM/VIL INJ
+"DATA",176.112,22655,1)
+313929
+"DATA",176.112,22656,0)
+4000945^CEFAZOLIN NA 1GM/BAG INJ
+"DATA",176.112,22656,1)
+313929
+"DATA",176.112,22657,0)
+4007934^CODEINE 10MG/CTM 2MG/P-EPHRINE 10MG/5ML LIQUID
+"DATA",176.112,22657,1)
+313927
+"DATA",176.112,22658,0)
+4001428^CEFUROXIME AXETIL 250MG/5ML SUSP,ORAL
+"DATA",176.112,22658,1)
+313926
+"DATA",176.112,22659,0)
+4004888^CEFOTETAN DISODIUM 1GM/50ML IV INJ,BAG
+"DATA",176.112,22659,1)
+313925
+"DATA",176.112,22660,0)
+4004837^CTM 2MG/P-EPHRINE 5MG/PYRILAMINE 12.5MG/5ML SUSP
+"DATA",176.112,22660,1)
+313923
+"DATA",176.112,22661,0)
+4012988^CEFEPIME HCL 2GM/VIL INJ
+"DATA",176.112,22661,1)
+313922
+"DATA",176.112,22662,0)
+4012309^CALCIPOTRIENE 0.005% CREAM,TOP
+"DATA",176.112,22662,1)
+313921
+"DATA",176.112,22663,0)
+4000943^CEFAZOLIN NA 5GM/VIL INJ
+"DATA",176.112,22663,1)
+313920
+"DATA",176.112,22664,0)
+4000944^CEFAZOLIN NA 20GM/VIL INJ
+"DATA",176.112,22664,1)
+313920
+"DATA",176.112,22665,0)
+4000941^CEFAZOLIN NA 10GM/VIL INJ
+"DATA",176.112,22665,1)
+313920
+"DATA",176.112,22666,0)
+4006361^CALCITONIN,SALMON 200UNT/ACCTUAT SOLN,NASAL,SPRAY
+"DATA",176.112,22666,1)
+313919
+"DATA",176.112,22667,0)
+4016538^AMYLASE 66400UNT/LIPASE 20000UNT/PROTEASE 75000UNT CAP,EC
+"DATA",176.112,22667,1)
+313913
+"DATA",176.112,22668,0)
+4004748^AMYLASE 66400UNT/LIPASE 20000UNT/PROTEASE 75000UNT CAP
+"DATA",176.112,22668,1)
+313913
+"DATA",176.112,22669,0)
+4002629^CHLORTETRACYCLINE HCL 1% OINT,OPH
+"DATA",176.112,22669,1)
+313912
+"DATA",176.112,22670,0)
+4006500^CYCLIZINE HCL 50MG TAB
+"DATA",176.112,22670,1)
+313911
+"DATA",176.112,22671,0)
+4003388^CYCLANDELATE 100MG TAB
+"DATA",176.112,22671,1)
+313910
+"DATA",176.112,22672,0)
+4005425^CLIOQUINOL 3%/HYDROCORTISONE 1% GEL,TOP
+"DATA",176.112,22672,1)
+313908
+"DATA",176.112,22673,0)
+4007133^CLIOQUINOL 3%/HC 1%/PRAMOXINE 0.5% OINT,TOP
+"DATA",176.112,22673,1)
+313907
+"DATA",176.112,22674,0)
+4005427^CLIOQUINOL 1%/HYDROCORTISONE 0.5% CREAM,TOP
+"DATA",176.112,22674,1)
+313906
+"DATA",176.112,22675,0)
+4007654^CHLORTHALIDONE 15MG/CLONIDINE HCL 0.2MG TAB
+"DATA",176.112,22675,1)
+313905
+"DATA",176.112,22676,0)
+4002515^CHLORPROMAZINE HCL 30MG/ML CONC,ORAL
+"DATA",176.112,22676,1)
+313904
+"DATA",176.112,22677,0)
+4003139^CHLORPHENIRAMINE 4MG/PHENYLPROPANOLAMINE 25MG TAB
+"DATA",176.112,22677,1)
+313903
+"DATA",176.112,22678,0)
+4008777^CHLOROXYLENOL 0.5%/RESORCINOL 2%/SULFUR 5% LOTION
+"DATA",176.112,22678,1)
+313902
+"DATA",176.112,22679,0)
+4003883^CEPHAPIRIN NA 500MG/VIL INJ
+"DATA",176.112,22679,1)
+313899
+"DATA",176.112,22680,0)
+4003884^CEPHAPIRIN NA 1GM/VIL INJ
+"DATA",176.112,22680,1)
+313899
+"DATA",176.112,22681,0)
+4005534^CYCLOPENTOLATE HCL 0.5% SOLN,OPH
+"DATA",176.112,22681,1)
+313897
+"DATA",176.112,22682,0)
+4000846^CYANOCOBALAMIN 500MCG TAB
+"DATA",176.112,22682,1)
+313896
+"DATA",176.112,22683,0)
+4002473^CLONIDINE 0.1MG/24HRS PATCH
+"DATA",176.112,22683,1)
+313894
+"DATA",176.112,22684,0)
+4009077^CLOFAZIMINE 100MG CAP
+"DATA",176.112,22684,1)
+313893
+"DATA",176.112,22685,0)
+4004778^CHOLINE MAGNESIUM TRISALICYLATE 750MG TAB
+"DATA",176.112,22685,1)
+313892
+"DATA",176.112,22686,0)
+4003132^CHLORPHENIRAMINE 12MG/PHENYLPROPANOLAMINE 75MG TAB,SA
+"DATA",176.112,22686,1)
+313891
+"DATA",176.112,22687,0)
+4001407^CEFTAZIDIME 500MG/VIL INJ
+"DATA",176.112,22687,1)
+313890
+"DATA",176.112,22688,0)
+4001408^CEFTAZIDIME 1GM/VIL INJ
+"DATA",176.112,22688,1)
+313890
+"DATA",176.112,22689,0)
+4001411^CEFTAZIDIME 1GM/BAG INJ
+"DATA",176.112,22689,1)
+313890
+"DATA",176.112,22690,0)
+4001416^CEFTAZIDIME 1GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,22690,1)
+313890
+"DATA",176.112,22691,0)
+4001984^CEPHRADINE 250MG/5ML SUSP
+"DATA",176.112,22691,1)
+313889
+"DATA",176.112,22692,0)
+4001280^CEFACLOR MONOHYDRATE 250MG/5ML SUSP
+"DATA",176.112,22692,1)
+313888
+"DATA",176.112,22693,0)
+4001278^CEFACLOR 250MG/5ML SUSP
+"DATA",176.112,22693,1)
+313888
+"DATA",176.112,22694,0)
+4006199^CARBINOXAMINE MALEATE 4MG/PSEUDOEPHEDRINE 60MG TAB
+"DATA",176.112,22694,1)
+313886
+"DATA",176.112,22695,0)
+4008083^CALCIUM CARBONATE 420MG TAB,CHEWABLE
+"DATA",176.112,22695,1)
+313884
+"DATA",176.112,22696,0)
+4009342^CALAMINE 1%/DIPHENHYDRAMINE HCL 2% LIQUID,TOP
+"DATA",176.112,22696,1)
+313883
+"DATA",176.112,22697,0)
+4013754^BETAMETHASONE VALERATE 0.12% AEROSOL,TOP
+"DATA",176.112,22697,1)
+313874
+"DATA",176.112,22698,0)
+4013230^BASILIXIMAB 20MG/VIL INJ
+"DATA",176.112,22698,1)
+313873
+"DATA",176.112,22699,0)
+4008449^BISACODYL 10MG TAB,EC
+"DATA",176.112,22699,1)
+313872
+"DATA",176.112,22700,0)
+4003421^BENZPHETAMINE HCL 25MG TAB
+"DATA",176.112,22700,1)
+313871
+"DATA",176.112,22701,0)
+4004628^BELLADONNA ALKALOIDS 0.38MG/PHENOBARBITAL 50MG CAP,SA
+"DATA",176.112,22701,1)
+313869
+"DATA",176.112,22702,0)
+4004627^BELLADONNA ALKALOIDS 0.1121MG/PHENOBARBITAL 16.2MG TAB
+"DATA",176.112,22702,1)
+313868
+"DATA",176.112,22703,0)
+4013001^BENTOQUATAM 5% SUSP,TOP
+"DATA",176.112,22703,1)
+313867
+"DATA",176.112,22704,0)
+4012785^BENAZEPRIL HCL 5MG/HYDROCHLOROTHIAZIDE 6.25MG TAB
+"DATA",176.112,22704,1)
+313866
+"DATA",176.112,22705,0)
+4008886^BORIC ACID 10% OINT,OPH
+"DATA",176.112,22705,1)
+313865
+"DATA",176.112,22706,0)
+4008447^BISACODYL 5MG SUPP,RTL
+"DATA",176.112,22706,1)
+313863
+"DATA",176.112,22707,0)
+4004711^BILE SALTS 150MG/PANCREATIN 300MG/PEPSIN 250MG TAB
+"DATA",176.112,22707,1)
+313862
+"DATA",176.112,22708,0)
+4009575^BETA CAROTENE 25000UNT CAP
+"DATA",176.112,22708,1)
+313861
+"DATA",176.112,22709,0)
+4004956^BIPERIDEN HCL 2MG TAB
+"DATA",176.112,22709,1)
+313860
+"DATA",176.112,22710,0)
+4009256^BEPRIDIL HCL 400MG TAB
+"DATA",176.112,22710,1)
+313859
+"DATA",176.112,22711,0)
+4009478^BENZALKONIUM CL 0.1% SOLN
+"DATA",176.112,22711,1)
+313858
+"DATA",176.112,22712,0)
+4005057^BACAMPICILLIN HCL 125MG/5ML SUSP
+"DATA",176.112,22712,1)
+313855
+"DATA",176.112,22713,0)
+4015143^ALENDRONATE 35MG TAB
+"DATA",176.112,22713,1)
+313854
+"DATA",176.112,22714,0)
+4015052^ALUMINUM HYDROXIDE 400MG CAP
+"DATA",176.112,22714,1)
+313853
+"DATA",176.112,22715,0)
+4014957^ADAPALENE 0.1% CREAM,TOP
+"DATA",176.112,22715,1)
+313852
+"DATA",176.112,22716,0)
+4014027^AMOXICILLIN TRIHYDRATE 200MG/5ML SUSP
+"DATA",176.112,22716,1)
+313850
+"DATA",176.112,22717,0)
+4013908^AMITRIPTYLINE HCL 25MG TAB,UD
+"DATA",176.112,22717,1)
+313849
+"DATA",176.112,22718,0)
+4001968^AMITRIPTYLINE HCL 25MG TAB
+"DATA",176.112,22718,1)
+313849
+"DATA",176.112,22719,0)
+4013673^ALITRETINOIN 0.1% GEL,TOP
+"DATA",176.112,22719,1)
+313847
+"DATA",176.112,22720,0)
+4009245^ACETYLCHOLINE CL 1% SOLN,OPH
+"DATA",176.112,22720,1)
+313846
+"DATA",176.112,22721,0)
+4009247^ACETYLCHOLINE CL 1% SOLN,OPH,2ML
+"DATA",176.112,22721,1)
+313846
+"DATA",176.112,22722,0)
+4000644^ATROPINE SO4 0.3MG/ML INJ
+"DATA",176.112,22722,1)
+313845
+"DATA",176.112,22723,0)
+4006774^ATROPINE SO4 0.21MG/PHENOBARBITAL 16.2MG TAB
+"DATA",176.112,22723,1)
+313844
+"DATA",176.112,22724,0)
+4016071^ATROPINE SO4 0.025MG/DIPHENOXYLATE HCL 2.5MG TAB,UD
+"DATA",176.112,22724,1)
+313842
+"DATA",176.112,22725,0)
+4002627^ATROPINE SO4 0.025MG/DIPHENOXYLATE HCL 2.5MG TAB
+"DATA",176.112,22725,1)
+313842
+"DATA",176.112,22726,0)
+4001048^ASCORBIC ACID 100MG TAB,CHEWABLE
+"DATA",176.112,22726,1)
+313841
+"DATA",176.112,22727,0)
+4008202^ASA 600MG/PROMETH 6.2MG/PSEUDEFED 60MG TAB
+"DATA",176.112,22727,1)
+313840
+"DATA",176.112,22728,0)
+4001223^APOMORPHINE HCL 6MG TAB,SOLUBLE
+"DATA",176.112,22728,1)
+313839
+"DATA",176.112,22729,0)
+4006260^AMINOPHYLLINE DIHYDRATE 2MG/ML/NACL 0.4% INJ
+"DATA",176.112,22729,1)
+313836
+"DATA",176.112,22730,0)
+4006875^AMINOPHYLLINE 100MG/PHENOBARBITAL 15MG TAB,EC
+"DATA",176.112,22730,1)
+313835
+"DATA",176.112,22731,0)
+4010235^ALOE 100MG/CASCARA SAGRADA 150MG TAB
+"DATA",176.112,22731,1)
+313833
+"DATA",176.112,22732,0)
+4003537^ALPROSTADIL 125MCG SUPP,URETHRAL
+"DATA",176.112,22732,1)
+313829
+"DATA",176.112,22733,0)
+4006435^APAP 360MG/BUTALBITAL 50MG/CAFN 40MG CAP
+"DATA",176.112,22733,1)
+313826
+"DATA",176.112,22734,0)
+4010236^APAP 217MG/DM 6.7MG/GG 67MG/5ML LIQUID
+"DATA",176.112,22734,1)
+313825
+"DATA",176.112,22735,0)
+4010032^APAP 150MG/CAFN 30MG/SALICYLAMIDE 230MG TAB
+"DATA",176.112,22735,1)
+313824
+"DATA",176.112,22736,0)
+4009063^ANISTREPLASE 30UNT/VIL INJ
+"DATA",176.112,22736,1)
+313823
+"DATA",176.112,22737,0)
+4008403^AMMONIA,AROMATIC 0.33ML AMP,INHL
+"DATA",176.112,22737,1)
+313822
+"DATA",176.112,22738,0)
+4007177^ACETAMINOPHEN 160MG TAB,CHEW
+"DATA",176.112,22738,1)
+313820
+"DATA",176.112,22739,0)
+4001348^AMPICILLIN NA 2GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,22739,1)
+313819
+"DATA",176.112,22740,0)
+4001346^AMPICILLIN NA 500MG/VIL INJ,ADD-VANTAGE
+"DATA",176.112,22740,1)
+313819
+"DATA",176.112,22741,0)
+4001325^AMPICILLIN NA 500MG/BAG INJ
+"DATA",176.112,22741,1)
+313819
+"DATA",176.112,22742,0)
+4001345^AMPICILLIN NA 250MG/VIL INJ,ADD-VANTAGE
+"DATA",176.112,22742,1)
+313819
+"DATA",176.112,22743,0)
+4001342^AMPICILLIN NA 2GM/VIL INJ
+"DATA",176.112,22743,1)
+313819
+"DATA",176.112,22744,0)
+4001340^AMPICILLIN NA 250MG/VIL INJ
+"DATA",176.112,22744,1)
+313819
+"DATA",176.112,22745,0)
+4001341^AMPICILLIN NA 1GM/VIL INJ
+"DATA",176.112,22745,1)
+313819
+"DATA",176.112,22746,0)
+4001326^AMPICILLIN NA 1GM/BAG INJ
+"DATA",176.112,22746,1)
+313819
+"DATA",176.112,22747,0)
+4001347^AMPICILLIN NA 1GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,22747,1)
+313819
+"DATA",176.112,22748,0)
+4001332^AMPICILLIN NA 500MG/VIL INJ
+"DATA",176.112,22748,1)
+313819
+"DATA",176.112,22749,0)
+4009038^UNDECYLENIC ACID 2%/ZINC UNDECYLENATE 20% PWDR,TOP
+"DATA",176.112,22749,1)
+313817
+"DATA",176.112,22750,0)
+4010408^MENTHOL 3%/ME NICOTINATE 0.5%/ME SALICYLATE 30% GEL,TOP
+"DATA",176.112,22750,1)
+313816
+"DATA",176.112,22751,0)
+4008747^CAMPHOR 3%/MENTHOL 1.25%/ME SALICYLATE 10% LIQUID,TOP
+"DATA",176.112,22751,1)
+313815
+"DATA",176.112,22752,0)
+4009917^ALGINIC AC 200MG/CA CARB 80MG/MG TRISIL 20MG/NA BICARB 70MG TAB
+"DATA",176.112,22752,1)
+313814
+"DATA",176.112,22753,0)
+4006591^ALBUTEROL SO4 8MG TAB,SA
+"DATA",176.112,22753,1)
+313813
+"DATA",176.112,22754,0)
+4006520^ACYCLOVIR NA 500MG/VIL INJ
+"DATA",176.112,22754,1)
+313812
+"DATA",176.112,22755,0)
+4006522^ACYCLOVIR NA 1000MG/VIL INJ
+"DATA",176.112,22755,1)
+313812
+"DATA",176.112,22756,0)
+4006528^ACYCLOVIR NA 50MG/ML INJ
+"DATA",176.112,22756,1)
+313812
+"DATA",176.112,22757,0)
+4006611^AZATADINE 1MG/PSEUDOEPHEDRINE 120MG TAB,SA
+"DATA",176.112,22757,1)
+313811
+"DATA",176.112,22758,0)
+4000633^ATROPINE SO4 2% SOLN,OPH
+"DATA",176.112,22758,1)
+313810
+"DATA",176.112,22759,0)
+4000643^ATROPINE SO4 0.2% INHL
+"DATA",176.112,22759,1)
+313808
+"DATA",176.112,22760,0)
+4005762^ASPIRIN 65MG SUPP,RTL
+"DATA",176.112,22760,1)
+313807
+"DATA",176.112,22761,0)
+4008671^ASPIRIN 356MG/CAFFEINE 30MG CAP
+"DATA",176.112,22761,1)
+313806
+"DATA",176.112,22762,0)
+4007638^ASPIRIN 324MG/PHENYLTOLOXAMINE CITRATE 20MG TAB
+"DATA",176.112,22762,1)
+313805
+"DATA",176.112,22763,0)
+4001038^ASCORBIC ACID 500MG TAB,CHEWABLE
+"DATA",176.112,22763,1)
+313803
+"DATA",176.112,22764,0)
+4006703^ASA 385MG/CAFN 60MG/ORPHENADRINE CITRATE 50MG TAB
+"DATA",176.112,22764,1)
+313802
+"DATA",176.112,22765,0)
+4003881^AMPICILLIN 389MG/PROBENECID 111MG CAP
+"DATA",176.112,22765,1)
+313801
+"DATA",176.112,22766,0)
+4001328^AMPICILLIN 250MG CAP
+"DATA",176.112,22766,1)
+313800
+"DATA",176.112,22767,0)
+4001331^AMPICILLIN TRIHYDRATE 250MG CAP
+"DATA",176.112,22767,1)
+313800
+"DATA",176.112,22768,0)
+4001334^AMPICILLIN 125MG/5ML SUSP
+"DATA",176.112,22768,1)
+313799
+"DATA",176.112,22769,0)
+4001327^AMPICILLIN TRIHYDRATE 125MG/5ML SUSP
+"DATA",176.112,22769,1)
+313799
+"DATA",176.112,22770,0)
+4001651^AMOXICILLIN TRIHYDRATE 50MG/5ML SUSP
+"DATA",176.112,22770,1)
+313798
+"DATA",176.112,22771,0)
+4001641^AMOXICILLIN 125MG/5ML SUSP
+"DATA",176.112,22771,1)
+313797
+"DATA",176.112,22772,0)
+4001643^AMOXICILLIN TRIHYDRATE 125MG/5ML SUSP
+"DATA",176.112,22772,1)
+313797
+"DATA",176.112,22773,0)
+4002882^AMITRIPTYLINE HCL 10MG/PERPHENAZINE 4MG TAB
+"DATA",176.112,22773,1)
+313796
+"DATA",176.112,22774,0)
+4003376^AMINOPHYLLINE 100MG/ML SOLN,RTL
+"DATA",176.112,22774,1)
+313795
+"DATA",176.112,22775,0)
+4003363^AMINOPHYLLINE DIHYDRATE 100MG TAB
+"DATA",176.112,22775,1)
+313794
+"DATA",176.112,22776,0)
+4003365^AMINOPHYLLINE 100MG TAB
+"DATA",176.112,22776,1)
+313794
+"DATA",176.112,22777,0)
+4008379^ALUMINUM HYDROXIDE 525MG/MAGNESIUM HYDROXIDE 480MG/4GM WHIP
+"DATA",176.112,22777,1)
+313793
+"DATA",176.112,22778,0)
+4016632^ALUMINUM HYDROXIDE 225MG/MAGNESIUM HYDROX 200MG/5ML SUSP,ORAL,ML
+"DATA",176.112,22778,1)
+313792
+"DATA",176.112,22779,0)
+4008375^ALUMINUM HYDROXIDE 225MG/MAGNESIUM HYDROXIDE 200MG/5ML SUSP,ORAL
+"DATA",176.112,22779,1)
+313792
+"DATA",176.112,22780,0)
+4006732^ALLANTOIN 2%/AMINACRINE 0.2%/SULFISOXAZOLE 10% CREAM,VAG
+"DATA",176.112,22780,1)
+313789
+"DATA",176.112,22781,0)
+4008860^AL OH 400MG/MG OH 400MG/SIMETHICONE 40MG TAB,CHEWABLE
+"DATA",176.112,22781,1)
+313788
+"DATA",176.112,22782,0)
+4004860^ACETIC ACID 2%/HYDROCORTISONE 1% SOLN,OTIC
+"DATA",176.112,22782,1)
+313786
+"DATA",176.112,22783,0)
+4008918^ACETAMINOPHEN 325MG/PAMABROM 25MG TAB
+"DATA",176.112,22783,1)
+313784
+"DATA",176.112,22784,0)
+4007158^ACETAMINOPHEN 325MG TAB
+"DATA",176.112,22784,1)
+313782
+"DATA",176.112,22785,0)
+4007182^ACETAMINOPHEN 325MG TAB,UD
+"DATA",176.112,22785,1)
+313782
+"DATA",176.112,22786,0)
+4010249^ZOLPIDEM TARTRATE 5MG TAB
+"DATA",176.112,22786,1)
+313780
+"DATA",176.112,22787,0)
+4016131^ZOLPIDEM TARTRATE 5MG TAB,UD
+"DATA",176.112,22787,1)
+313780
+"DATA",176.112,22788,0)
+4010250^ZOLPIDEM TARTRATE 10MG TAB
+"DATA",176.112,22788,1)
+313779
+"DATA",176.112,22789,0)
+4016132^ZOLPIDEM TARTRATE 10MG TAB,UD
+"DATA",176.112,22789,1)
+313779
+"DATA",176.112,22790,0)
+4015299^ZIPRASIDONE HCL 80MG CAP
+"DATA",176.112,22790,1)
+313778
+"DATA",176.112,22791,0)
+4015298^ZIPRASIDONE HCL 60MG CAP
+"DATA",176.112,22791,1)
+313777
+"DATA",176.112,22792,0)
+4015297^ZIPRASIDONE HCL 40MG CAP
+"DATA",176.112,22792,1)
+313776
+"DATA",176.112,22793,0)
+4006985^ZINC SO4 220MG TAB
+"DATA",176.112,22793,1)
+313774
+"DATA",176.112,22794,0)
+4013926^ZINC SO4 220MG CAP,UD
+"DATA",176.112,22794,1)
+313773
+"DATA",176.112,22795,0)
+4006984^ZINC SO4 220MG CAP
+"DATA",176.112,22795,1)
+313773
+"DATA",176.112,22796,0)
+4006993^ZINC SO4 200MG TAB
+"DATA",176.112,22796,1)
+313772
+"DATA",176.112,22797,0)
+4006989^ZINC SO4 137MG TAB
+"DATA",176.112,22797,1)
+313771
+"DATA",176.112,22798,0)
+4006991^ZINC SO4 110MG TAB
+"DATA",176.112,22798,1)
+313770
+"DATA",176.112,22799,0)
+4009597^ZINC 50MG TAB
+"DATA",176.112,22799,1)
+313768
+"DATA",176.112,22800,0)
+4009595^ZINC 15MG TAB
+"DATA",176.112,22800,1)
+313766
+"DATA",176.112,22801,0)
+4009639^ZINC 10MG LOZENGE
+"DATA",176.112,22801,1)
+313765
+"DATA",176.112,22802,0)
+4014196^ZALEPLON 5MG CAP
+"DATA",176.112,22802,1)
+313762
+"DATA",176.112,22803,0)
+4014197^ZALEPLON 10MG CAP
+"DATA",176.112,22803,1)
+313761
+"DATA",176.112,22804,0)
+4009361^ZALCITABINE (ddC) 0.75MG TAB
+"DATA",176.112,22804,1)
+313760
+"DATA",176.112,22805,0)
+4009360^ZALCITABINE (ddC) 0.375MG TAB
+"DATA",176.112,22805,1)
+313759
+"DATA",176.112,22806,0)
+4014178^ZAFIRLUKAST 10MG TAB
+"DATA",176.112,22806,1)
+313758
+"DATA",176.112,22807,0)
+4008261^YOHIMBINE HCL 5MG/ZINC SO4 220MG TAB
+"DATA",176.112,22807,1)
+313756
+"DATA",176.112,22808,0)
+4007962^XENON 5% GAS
+"DATA",176.112,22808,1)
+313751
+"DATA",176.112,22809,0)
+4007365^WATER/METHYLPARABEN 0.12%/PROPYLPARABEN 0.012% INJ
+"DATA",176.112,22809,1)
+313745
+"DATA",176.112,22810,0)
+4007364^WATER/METHYLPARABEN 0.05%/PROPYLPARABEN 0.005% INJ
+"DATA",176.112,22810,1)
+313744
+"DATA",176.112,22811,0)
+4003517^WATER/BENZYL ALCOHOL 1.5% INJ
+"DATA",176.112,22811,1)
+313742
+"DATA",176.112,22812,0)
+4003516^WATER/BENZYL ALCOHOL 0.9% INJ
+"DATA",176.112,22812,1)
+313741
+"DATA",176.112,22813,0)
+4014043^WARFARIN NA 7.5MG TAB,UD
+"DATA",176.112,22813,1)
+313739
+"DATA",176.112,22814,0)
+4005200^WARFARIN NA 7.5MG TAB
+"DATA",176.112,22814,1)
+313739
+"DATA",176.112,22815,0)
+4005207^WARFARIN NA 6MG TAB
+"DATA",176.112,22815,1)
+313738
+"DATA",176.112,22816,0)
+4014042^WARFARIN NA 6MG TAB,UD
+"DATA",176.112,22816,1)
+313738
+"DATA",176.112,22817,0)
+4005205^WARFARIN NA 5MG/VIL INJ
+"DATA",176.112,22817,1)
+313737
+"DATA",176.112,22818,0)
+4013989^WARFARIN NA 2MG TAB,UD
+"DATA",176.112,22818,1)
+313735
+"DATA",176.112,22819,0)
+4005197^WARFARIN NA 2MG TAB
+"DATA",176.112,22819,1)
+313735
+"DATA",176.112,22820,0)
+4014040^WARFARIN NA 2.5MG TAB,UD
+"DATA",176.112,22820,1)
+313734
+"DATA",176.112,22821,0)
+4005198^WARFARIN NA 2.5MG TAB
+"DATA",176.112,22821,1)
+313734
+"DATA",176.112,22822,0)
+4014039^WARFARIN NA 1MG TAB,UD
+"DATA",176.112,22822,1)
+313733
+"DATA",176.112,22823,0)
+4005203^WARFARIN NA 1MG TAB
+"DATA",176.112,22823,1)
+313733
+"DATA",176.112,22824,0)
+4014044^WARFARIN NA 10MG TAB,UD
+"DATA",176.112,22824,1)
+313732
+"DATA",176.112,22825,0)
+4005201^WARFARIN NA 10MG TAB
+"DATA",176.112,22825,1)
+313732
+"DATA",176.112,22826,0)
+4007761^VITAMIN E 600UNT CAP
+"DATA",176.112,22826,1)
+313724
+"DATA",176.112,22827,0)
+4007772^VITAMIN E 50MG/ML DROPS,ORAL
+"DATA",176.112,22827,1)
+313722
+"DATA",176.112,22828,0)
+4015462^VITAMIN E 500UNT TAB
+"DATA",176.112,22828,1)
+313721
+"DATA",176.112,22829,0)
+4014989^VITAMIN E 400UNT/15ML LIQUID
+"DATA",176.112,22829,1)
+313720
+"DATA",176.112,22830,0)
+4007766^VITAMIN E 4000UNT CAP
+"DATA",176.112,22830,1)
+313718
+"DATA",176.112,22831,0)
+4007775^VITAMIN E 400 UNT TAB
+"DATA",176.112,22831,1)
+313717
+"DATA",176.112,22832,0)
+4007769^VITAMIN E 28000UNT OIL,TOP
+"DATA",176.112,22832,1)
+313714
+"DATA",176.112,22833,0)
+4007760^VITAMIN E 200UNT CAP
+"DATA",176.112,22833,1)
+313713
+"DATA",176.112,22834,0)
+4007774^VITAMIN E 14% CREAM,TOP
+"DATA",176.112,22834,1)
+313711
+"DATA",176.112,22835,0)
+4006864^VITAMIN D 50000UNT CAP
+"DATA",176.112,22835,1)
+313707
+"DATA",176.112,22836,0)
+4006866^VITAMIN D 400UNT TAB
+"DATA",176.112,22836,1)
+313706
+"DATA",176.112,22837,0)
+4013809^VITAMIN D 400 UNT CAP
+"DATA",176.112,22837,1)
+313705
+"DATA",176.112,22838,0)
+4006865^VITAMIN D 25000UNT CAP
+"DATA",176.112,22838,1)
+313704
+"DATA",176.112,22839,0)
+4008350^VITAMIN A/VITAMIN D TAB
+"DATA",176.112,22839,1)
+313661
+"DATA",176.112,22840,0)
+4008353^VITAMIN A 10000UNT/VITAMIN D 400UNT CAP
+"DATA",176.112,22840,1)
+313659
+"DATA",176.112,22841,0)
+4008349^VITAMIN A/VITAMIN D CAP
+"DATA",176.112,22841,1)
+313659
+"DATA",176.112,22842,0)
+4004054^VITAMIN A PALMITATE 50000UNT CAP,SA
+"DATA",176.112,22842,1)
+313657
+"DATA",176.112,22843,0)
+4004050^VITAMIN A PALMITATE 50000UNT CAP
+"DATA",176.112,22843,1)
+313656
+"DATA",176.112,22844,0)
+4004052^VITAMIN A 50000UNT CAP
+"DATA",176.112,22844,1)
+313656
+"DATA",176.112,22845,0)
+4004051^VITAMIN A 25000UNT CAP
+"DATA",176.112,22845,1)
+313654
+"DATA",176.112,22846,0)
+4004049^VITAMIN A PALMITATE 25000UNT CAP
+"DATA",176.112,22846,1)
+313654
+"DATA",176.112,22847,0)
+4004065^VITAMIN A PALMITATE 15000 UNT TAB
+"DATA",176.112,22847,1)
+313653
+"DATA",176.112,22848,0)
+4004064^VITAMIN A 8000UNT CAP
+"DATA",176.112,22848,1)
+313652
+"DATA",176.112,22849,0)
+4004056^VITAMIN A 5000UNT/0.1ML DROPS,ORAL
+"DATA",176.112,22849,1)
+313651
+"DATA",176.112,22850,0)
+4004053^VITAMIN A 50000UNT/ML INJ
+"DATA",176.112,22850,1)
+313650
+"DATA",176.112,22851,0)
+4004060^VITAMIN A 400UNT CAP
+"DATA",176.112,22851,1)
+313649
+"DATA",176.112,22852,0)
+4008352^VITAMIN A 4000UNT/VITAMIN D 400UNT CAP
+"DATA",176.112,22852,1)
+313648
+"DATA",176.112,22853,0)
+4008843^VITAMIN A 3333UNT/VITAMIN E 50UNT/GM LOTION
+"DATA",176.112,22853,1)
+313647
+"DATA",176.112,22854,0)
+4004063^VITAMIN A 3333.3UNT/ML LOTION
+"DATA",176.112,22854,1)
+313646
+"DATA",176.112,22855,0)
+4008348^VITAMIN A 25000UNT/VITAMIN D 1000UNT CAP
+"DATA",176.112,22855,1)
+313644
+"DATA",176.112,22856,0)
+4004057^VITAMIN A 25000UNT TAB
+"DATA",176.112,22856,1)
+313643
+"DATA",176.112,22857,0)
+4004059^VITAMIN A 200UNT CAP
+"DATA",176.112,22857,1)
+313642
+"DATA",176.112,22858,0)
+4013808^VITAMIN A 15000UNT CAP
+"DATA",176.112,22858,1)
+313641
+"DATA",176.112,22859,0)
+4008347^VITAMIN A 1250UNT/VITAMIN D 130UNT CAP
+"DATA",176.112,22859,1)
+313640
+"DATA",176.112,22860,0)
+4004061^VITAMIN A 1000UNT CAP
+"DATA",176.112,22860,1)
+313639
+"DATA",176.112,22861,0)
+4004058^VITAMIN A 10000UNT CAP
+"DATA",176.112,22861,1)
+313638
+"DATA",176.112,22862,0)
+4004249^VIT C 75MG/FE GLUCONATE 500MG/B12 W/INTRINSIC FACTOR 0.5UNT TAB
+"DATA",176.112,22862,1)
+313637
+"DATA",176.112,22863,0)
+4001765^VIT C 75MG/CUPRIC SO4 1MG/FE FUMARATE 160MG/FA 1.5MG TAB
+"DATA",176.112,22863,1)
+313636
+"DATA",176.112,22864,0)
+4001773^VIT C 500MG/VIT A 5000UNT/VIT E 50UNT/ZN SO4 80MG CAP
+"DATA",176.112,22864,1)
+313635
+"DATA",176.112,22865,0)
+4006283^VIT C 500MG/FERROUS SO4 525MG/FA 800MCG TAB,SA
+"DATA",176.112,22865,1)
+313634
+"DATA",176.112,22866,0)
+4007189^VIT C 300MG/FE FUMARATE 60MG/FA 1MG CAP
+"DATA",176.112,22866,1)
+313633
+"DATA",176.112,22867,0)
+4008682^VIT C 200MG/DOSS 20MG/FE FUMARATE 335MG TAB
+"DATA",176.112,22867,1)
+313631
+"DATA",176.112,22868,0)
+4001764^VIT C 150MG/CUPRIC SO4 1MG/B12 7.5MCG/FE FUMARATE 160MG/FA 1.5MG
+"DATA",176.112,22868,1)
+313630
+"DATA",176.112,22869,0)
+4001772^VIT C 100MG/MG SO4 70MG/VIT E 200UNT/ZINC 70MG TAB
+"DATA",176.112,22869,1)
+313629
+"DATA",176.112,22870,0)
+4008685^VIT C 100MG/HESPERIDIN 100MG CAP
+"DATA",176.112,22870,1)
+313628
+"DATA",176.112,22871,0)
+4007152^VIT C 100MG/CYANOCOBALAMIN 25MCG/FE FUMARATE 600MG TAB
+"DATA",176.112,22871,1)
+313627
+"DATA",176.112,22872,0)
+4001767^VIT C 100MG/CA CARBONATE 625MG/FE FUMARATE 122MG/FA 1MG TAB
+"DATA",176.112,22872,1)
+313626
+"DATA",176.112,22873,0)
+4001761^VIT C 100MG/B12 15MCG/FE FUMARATE 275MG/FA 1MG CAP,SA
+"DATA",176.112,22873,1)
+313625
+"DATA",176.112,22874,0)
+4002095^TRIPLE VITAMINS DROPS,ORAL
+"DATA",176.112,22874,1)
+313599
+"DATA",176.112,22875,0)
+4002153^VIT A 1500UNT/VIT C 35MG/VIT D 400UNT/ML DROPS,ORAL
+"DATA",176.112,22875,1)
+313599
+"DATA",176.112,22876,0)
+4001322^VINCRISTINE SO4 1MG/ML (PF) INJ
+"DATA",176.112,22876,1)
+313597
+"DATA",176.112,22877,0)
+4001323^VINCRISTINE SO4 1MG/MANNITOL 100MG/ML (PF) INJ
+"DATA",176.112,22877,1)
+313597
+"DATA",176.112,22878,0)
+4001324^VINCRISTINE SO4 1MG/MANNITOL 100MG/ML INJ
+"DATA",176.112,22878,1)
+313597
+"DATA",176.112,22879,0)
+4001321^VINCRISTINE SO4 1MG/ML INJ
+"DATA",176.112,22879,1)
+313597
+"DATA",176.112,22880,0)
+4005812^VIDARABINE 3% OINT,OPH
+"DATA",176.112,22880,1)
+313596
+"DATA",176.112,22881,0)
+4014742^VERTEPORFIN 15MG/VIL INJ
+"DATA",176.112,22881,1)
+313595
+"DATA",176.112,22882,0)
+4013985^VERAPAMIL HCL 80MG TAB,UD
+"DATA",176.112,22882,1)
+313594
+"DATA",176.112,22883,0)
+4003632^VERAPAMIL HCL 80MG TAB
+"DATA",176.112,22883,1)
+313594
+"DATA",176.112,22884,0)
+4003643^VERAPAMIL HCL 360MG CAP,SA
+"DATA",176.112,22884,1)
+313593
+"DATA",176.112,22885,0)
+4014329^VERAPAMIL HCL 300MG CAP,SA
+"DATA",176.112,22885,1)
+313592
+"DATA",176.112,22886,0)
+4015080^VERAPAMIL HCL 200MG CAP,SA
+"DATA",176.112,22886,1)
+313591
+"DATA",176.112,22887,0)
+4003635^VERAPAMIL HCL 2.5MG/ML INJ
+"DATA",176.112,22887,1)
+313590
+"DATA",176.112,22888,0)
+4003640^VERAPAMIL HCL 2.5MG/ML (PF) INJ
+"DATA",176.112,22888,1)
+313590
+"DATA",176.112,22889,0)
+4009939^VERAPAMIL HCL 2.5MG/ML/NACL 0.85% INJ
+"DATA",176.112,22889,1)
+313590
+"DATA",176.112,22890,0)
+4015274^VERAPAMIL HCL 180MG CAP,SA,UD
+"DATA",176.112,22890,1)
+313588
+"DATA",176.112,22891,0)
+4003641^VERAPAMIL HCL 180MG CAP,SA
+"DATA",176.112,22891,1)
+313588
+"DATA",176.112,22892,0)
+4003638^VERAPAMIL HCL 120MG CAP,SA
+"DATA",176.112,22892,1)
+313587
+"DATA",176.112,22893,0)
+4012179^VENLAFAXINE HCL 75MG TAB
+"DATA",176.112,22893,1)
+313586
+"DATA",176.112,22894,0)
+4012182^VENLAFAXINE HCL 75MG CAP,SA
+"DATA",176.112,22894,1)
+313585
+"DATA",176.112,22895,0)
+4012186^VENLAFAXINE HCL 75MG CAP,SA,UD
+"DATA",176.112,22895,1)
+313585
+"DATA",176.112,22896,0)
+4015320^VENLAFAXINE HCL 37.5MG TAB,UD
+"DATA",176.112,22896,1)
+313584
+"DATA",176.112,22897,0)
+4012177^VENLAFAXINE HCL 37.5MG TAB
+"DATA",176.112,22897,1)
+313584
+"DATA",176.112,22898,0)
+4012181^VENLAFAXINE HCL 37.5MG CAP,SA
+"DATA",176.112,22898,1)
+313583
+"DATA",176.112,22899,0)
+4012185^VENLAFAXINE HCL 37.5MG CAP,SA,UD
+"DATA",176.112,22899,1)
+313583
+"DATA",176.112,22900,0)
+4012176^VENLAFAXINE HCL 25MG TAB
+"DATA",176.112,22900,1)
+313582
+"DATA",176.112,22901,0)
+4012183^VENLAFAXINE HCL 150MG CAP,SA
+"DATA",176.112,22901,1)
+313581
+"DATA",176.112,22902,0)
+4012184^VENLAFAXINE HCL 150MG CAP,SA,UD
+"DATA",176.112,22902,1)
+313581
+"DATA",176.112,22903,0)
+4012180^VENLAFAXINE HCL 100MG TAB
+"DATA",176.112,22903,1)
+313580
+"DATA",176.112,22904,0)
+4005086^VECURONIUM BROMIDE 2MG/ML INJ
+"DATA",176.112,22904,1)
+313579
+"DATA",176.112,22905,0)
+4005819^VASOPRESSIN 20UNT/ML INJ
+"DATA",176.112,22905,1)
+313578
+"DATA",176.112,22906,0)
+4005821^VASOPRESSIN 10UNT/0.5ML INJ,VIL,0.5ML
+"DATA",176.112,22906,1)
+313578
+"DATA",176.112,22907,0)
+4014946^VANCOMYCIN HCL 5MG/ML INJ,BAG,200ML
+"DATA",176.112,22907,1)
+313574
+"DATA",176.112,22908,0)
+4000927^VANCOMYCIN HCL 5MG/ML INJ,BAG,100ML
+"DATA",176.112,22908,1)
+313574
+"DATA",176.112,22909,0)
+4000924^VANCOMYCIN HCL 1GM/VIL INJ
+"DATA",176.112,22909,1)
+313572
+"DATA",176.112,22910,0)
+4013312^VANCOMYCIN HCL 10GM/VIL INJ
+"DATA",176.112,22910,1)
+313572
+"DATA",176.112,22911,0)
+4000919^VANCOMYCIN HCL 500MG/VIL INJ
+"DATA",176.112,22911,1)
+313572
+"DATA",176.112,22912,0)
+4000922^VANCOMYCIN HCL 250MG CAP
+"DATA",176.112,22912,1)
+313571
+"DATA",176.112,22913,0)
+4000921^VANCOMYCIN HCL 125MG CAP
+"DATA",176.112,22913,1)
+313570
+"DATA",176.112,22914,0)
+4013394^VALRUBICIN 40MG/ML SOLN,INTRAVESICAL
+"DATA",176.112,22914,1)
+313567
+"DATA",176.112,22915,0)
+4015493^VALGANCICLOVIR HCL 450MG TAB
+"DATA",176.112,22915,1)
+313566
+"DATA",176.112,22916,0)
+4012847^VALACYCLOVIR HCL 500MG TAB
+"DATA",176.112,22916,1)
+313565
+"DATA",176.112,22917,0)
+4012848^VALACYCLOVIR HCL 1GM TAB
+"DATA",176.112,22917,1)
+313564
+"DATA",176.112,22918,0)
+4008079^UROFOLLITROPIN 75UNT/VIL INJ
+"DATA",176.112,22918,1)
+313561
+"DATA",176.112,22919,0)
+4008077^UROFOLLITROPIN 75UNT/AMP INJ
+"DATA",176.112,22919,1)
+313561
+"DATA",176.112,22920,0)
+4006056^UREA 22% CREAM,TOP
+"DATA",176.112,22920,1)
+313554
+"DATA",176.112,22921,0)
+4009040^UNDECYLENIC ACID 5%/ZINC UNDECYLENATE 20% OINT,TOP
+"DATA",176.112,22921,1)
+313552
+"DATA",176.112,22922,0)
+4009044^UNDECYLENIC ACID 5%/ZINC UNDECYLENATE 20% CREAM,TOP
+"DATA",176.112,22922,1)
+313551
+"DATA",176.112,22923,0)
+4009039^UNDECYLENIC ACID 3%/ZINC UNDECYLENATE 20% CREAM,TOP
+"DATA",176.112,22923,1)
+313550
+"DATA",176.112,22924,0)
+4009041^UNDECYLENIC ACID 10%/ZINC UNDECYLENATE 20% OINT,TOP
+"DATA",176.112,22924,1)
+313548
+"DATA",176.112,22925,0)
+4008694^UNDECYLENATE 20% CREAM,TOP
+"DATA",176.112,22925,1)
+313544
+"DATA",176.112,22926,0)
+4004195^TYROPANOATE NA 750MG CAP
+"DATA",176.112,22926,1)
+313541
+"DATA",176.112,22927,0)
+4002031^TUBERCULIN,PURIFIED PROTEIN DERIVATIVE 5UNT/0.1ML INJ
+"DATA",176.112,22927,1)
+313532
+"DATA",176.112,22928,0)
+4002028^TUBERCULIN,PURIFIED PROTEIN DERIVATIVE 50UNT/ML INJ
+"DATA",176.112,22928,1)
+313532
+"DATA",176.112,22929,0)
+4002034^TUBERCULIN,PURIFIED PROTEIN DERIVATIVE 250UNT/ML INJ
+"DATA",176.112,22929,1)
+313531
+"DATA",176.112,22930,0)
+4002029^TUBERCULIN,PURIFIED PROTEIN DERIVATIVE 250UNT/0.1ML INJ
+"DATA",176.112,22930,1)
+313530
+"DATA",176.112,22931,0)
+4002032^TUBERCULIN,PURIFIED PROTEIN DERIVATIVE 1UNT/ML INJ
+"DATA",176.112,22931,1)
+313528
+"DATA",176.112,22932,0)
+4002027^TUBERCULIN,PURIFIED PROTEIN DERIVATIVE 10UNT/ML INJ
+"DATA",176.112,22932,1)
+313527
+"DATA",176.112,22933,0)
+4009736^TRYPTOPHAN 500MG TAB
+"DATA",176.112,22933,1)
+313525
+"DATA",176.112,22934,0)
+4013182^TROVAFLOXACIN MESYLATE 200MG TAB
+"DATA",176.112,22934,1)
+313523
+"DATA",176.112,22935,0)
+4013184^TROVAFLOXACIN MESYLATE 200MG TAB,UD
+"DATA",176.112,22935,1)
+313523
+"DATA",176.112,22936,0)
+4013181^TROVAFLOXACIN MESYLATE 100MG TAB
+"DATA",176.112,22936,1)
+313522
+"DATA",176.112,22937,0)
+4013183^TROVAFLOXACIN MESYLATE 100MG TAB,UD
+"DATA",176.112,22937,1)
+313522
+"DATA",176.112,22938,0)
+4005530^TROPICAMIDE 0.5% SOLN,OPH
+"DATA",176.112,22938,1)
+313521
+"DATA",176.112,22939,0)
+4009408^TROLAMINE SALICYLATE 10% LOTION,TOP
+"DATA",176.112,22939,1)
+313519
+"DATA",176.112,22940,0)
+4009407^TROLAMINE SALICYLATE 10% CREAM,TOP
+"DATA",176.112,22940,1)
+313518
+"DATA",176.112,22941,0)
+4007628^TRIPROLIDINE HCL 2.5MG TAB
+"DATA",176.112,22941,1)
+313517
+"DATA",176.112,22942,0)
+4004605^TRIPELENNAMINE HCL 50MG TAB
+"DATA",176.112,22942,1)
+313505
+"DATA",176.112,22943,0)
+4004604^TRIPELENNAMINE HCL 25MG TAB
+"DATA",176.112,22943,1)
+313504
+"DATA",176.112,22944,0)
+4004603^TRIPELENNAMINE HCL 100MG TAB,SA
+"DATA",176.112,22944,1)
+313503
+"DATA",176.112,22945,0)
+4003395^TRIMIPRAMINE MALEATE 50MG CAP
+"DATA",176.112,22945,1)
+313499
+"DATA",176.112,22946,0)
+4003394^TRIMIPRAMINE MALEATE 25MG CAP
+"DATA",176.112,22946,1)
+313498
+"DATA",176.112,22947,0)
+4003397^TRIMIPRAMINE MALEATE 100MG TAB
+"DATA",176.112,22947,1)
+313497
+"DATA",176.112,22948,0)
+4003396^TRIMIPRAMINE MALEATE 100MG CAP
+"DATA",176.112,22948,1)
+313496
+"DATA",176.112,22949,0)
+4014736^TRIMETHOPRIM HCL 50MG/5ML SOLN
+"DATA",176.112,22949,1)
+313494
+"DATA",176.112,22950,0)
+4004663^TRIMETHOBENZAMIDE HCL 200MG/BENZOCAINE 2% SUPP,RTL
+"DATA",176.112,22950,1)
+313493
+"DATA",176.112,22951,0)
+4004666^TRIMETHOBENZAMIDE HCL 200MG SUPP,RTL
+"DATA",176.112,22951,1)
+313492
+"DATA",176.112,22952,0)
+4004664^TRIMETHOBENZAMIDE HCL 100MG/ML INJ
+"DATA",176.112,22952,1)
+313491
+"DATA",176.112,22953,0)
+4004665^TRIMETHOBENZAMIDE HCL 100MG/BENZOCAINE 2% SUPP,RTL
+"DATA",176.112,22953,1)
+313490
+"DATA",176.112,22954,0)
+4004667^TRIMETHOBENZAMIDE HCL 100MG SUPP,RTL
+"DATA",176.112,22954,1)
+313489
+"DATA",176.112,22955,0)
+4004661^TRIMETHOBENZAMIDE HCL 100MG CAP
+"DATA",176.112,22955,1)
+313488
+"DATA",176.112,22956,0)
+4006116^TRIMETHADIONE 40MG/ML SOLN,ORAL
+"DATA",176.112,22956,1)
+313487
+"DATA",176.112,22957,0)
+4006117^TRIMETHADIONE 150MG TAB
+"DATA",176.112,22957,1)
+313486
+"DATA",176.112,22958,0)
+4003146^TRIMEPRAZINE TARTRATE 5MG CAP,SA
+"DATA",176.112,22958,1)
+313485
+"DATA",176.112,22959,0)
+4009677^TRILOSTANE 60MG CAP
+"DATA",176.112,22959,1)
+313483
+"DATA",176.112,22960,0)
+4009676^TRILOSTANE 30MG CAP
+"DATA",176.112,22960,1)
+313482
+"DATA",176.112,22961,0)
+4002724^TRIHEXYPHENIDYL HCL 5MG CAP,SA
+"DATA",176.112,22961,1)
+313480
+"DATA",176.112,22962,0)
+4006517^TRIFLURIDINE 1% SOLN,OPH
+"DATA",176.112,22962,1)
+313477
+"DATA",176.112,22963,0)
+4001981^TRIFLUPROMAZINE HCL 50MG TAB
+"DATA",176.112,22963,1)
+313476
+"DATA",176.112,22964,0)
+4001979^TRIFLUPROMAZINE HCL 10MG TAB
+"DATA",176.112,22964,1)
+313475
+"DATA",176.112,22965,0)
+4006805^TRIFLUOPERAZINE HCL 1MG TAB,SA
+"DATA",176.112,22965,1)
+313474
+"DATA",176.112,22966,0)
+4006803^TRIFLUOPERAZINE HCL 10MG/ML LIQUID,ORAL
+"DATA",176.112,22966,1)
+313473
+"DATA",176.112,22967,0)
+4002961^TRIENTINE HCL 250MG CAP
+"DATA",176.112,22967,1)
+313472
+"DATA",176.112,22968,0)
+4013135^TRICLOSAN 0.25% SOLN,TOP
+"DATA",176.112,22968,1)
+313470
+"DATA",176.112,22969,0)
+4001622^TRIAMCINOLONE HEXACETONIDE 5MG/ML INJ,SUSP
+"DATA",176.112,22969,1)
+313465
+"DATA",176.112,22970,0)
+4001626^TRIAMCINOLONE DIACETATE 10MG/ML INJ,SUSP
+"DATA",176.112,22970,1)
+313463
+"DATA",176.112,22971,0)
+4001605^TRIAMCINOLONE ACETONIDE 10MG/ML INJ,SUSP
+"DATA",176.112,22971,1)
+313463
+"DATA",176.112,22972,0)
+4001633^TRIAMCINOLONE ACETONIDE 55MCG/ACTUATION,AQ,INHL,NASAL,16.5GM
+"DATA",176.112,22972,1)
+313461
+"DATA",176.112,22973,0)
+4001628^TRIAMCINOLONE ACETONIDE 3MG/ML INJ,SUSP
+"DATA",176.112,22973,1)
+313460
+"DATA",176.112,22974,0)
+4001620^TRIAMCINOLONE ACETONIDE 100MCG/SPRAY AEROSOL,INHL
+"DATA",176.112,22974,1)
+313458
+"DATA",176.112,22975,0)
+4001632^TRIAMCINOLONE ACETONIDE 1% OINT,TOP
+"DATA",176.112,22975,1)
+313457
+"DATA",176.112,22976,0)
+4001630^TRIAMCINOLONE ACETONIDE 0.25% OINT,TOP
+"DATA",176.112,22976,1)
+313456
+"DATA",176.112,22977,0)
+4001627^TRIAMCINOLONE ACETONIDE 0.1% GEL,TOP
+"DATA",176.112,22977,1)
+313455
+"DATA",176.112,22978,0)
+4001624^TRIAMCINOLONE ACETONIDE 0.05% CREAM,TOP
+"DATA",176.112,22978,1)
+313454
+"DATA",176.112,22979,0)
+4005222^TRETINOIN,MICROSPHERE 0.1% GEL,TOP
+"DATA",176.112,22979,1)
+313453
+"DATA",176.112,22980,0)
+4005215^TRETINOIN 0.05% LIQUID,TOP
+"DATA",176.112,22980,1)
+313452
+"DATA",176.112,22981,0)
+4005218^TRETINOIN 0.025% GEL,TOP
+"DATA",176.112,22981,1)
+313451
+"DATA",176.112,22982,0)
+4005219^TRETINOIN 0.01% GEL,TOP
+"DATA",176.112,22982,1)
+313450
+"DATA",176.112,22983,0)
+4006653^TRAZODONE HCL 50MG TAB
+"DATA",176.112,22983,1)
+313449
+"DATA",176.112,22984,0)
+4013981^TRAZODONE HCL 50MG TAB,UD
+"DATA",176.112,22984,1)
+313449
+"DATA",176.112,22985,0)
+4003142^TRANYLCYPROMINE SO4 10MG TAB
+"DATA",176.112,22985,1)
+313447
+"DATA",176.112,22986,0)
+4012999^TRANDOLAPRIL 4MG/VERAPAMIL HCL 240MG TAB,SA
+"DATA",176.112,22986,1)
+313445
+"DATA",176.112,22987,0)
+4012998^TRANDOLAPRIL 2MG/VERAPAMIL HCL 180MG TAB,SA
+"DATA",176.112,22987,1)
+313444
+"DATA",176.112,22988,0)
+4012996^TRANDOLAPRIL 1MG/VERAPAMIL HCL 240MG TAB,SA
+"DATA",176.112,22988,1)
+313443
+"DATA",176.112,22989,0)
+4012746^TRAMADOL HCL 50MG TAB
+"DATA",176.112,22989,1)
+313442
+"DATA",176.112,22990,0)
+4014688^TRAMADOL HCL 50MG TAB,UD
+"DATA",176.112,22990,1)
+313442
+"DATA",176.112,22991,0)
+4013172^TOREMIFENE CITRATE 60MG TAB
+"DATA",176.112,22991,1)
+313428
+"DATA",176.112,22992,0)
+4015292^TOLTERODINE TARTRATE 4MG CAP,SA
+"DATA",176.112,22992,1)
+313426
+"DATA",176.112,22993,0)
+4013210^TOLTERODINE TARTRATE 2MG TAB
+"DATA",176.112,22993,1)
+313425
+"DATA",176.112,22994,0)
+4013209^TOLTERODINE TARTRATE 2MG TAB,UD
+"DATA",176.112,22994,1)
+313425
+"DATA",176.112,22995,0)
+4015291^TOLTERODINE TARTRATE 2MG CAP,SA
+"DATA",176.112,22995,1)
+313424
+"DATA",176.112,22996,0)
+4008689^TOLNAFTATE 1% SOLN,TOP
+"DATA",176.112,22996,1)
+313423
+"DATA",176.112,22997,0)
+4008690^TOLNAFTATE 1% PWDR,TOP
+"DATA",176.112,22997,1)
+313422
+"DATA",176.112,22998,0)
+4008692^TOLNAFTATE 1% LIQUID AEROSOL,TOP
+"DATA",176.112,22998,1)
+313421
+"DATA",176.112,22999,0)
+4008691^TOLNAFTATE 1% GEL,TOP
+"DATA",176.112,22999,1)
+313420
+"DATA",176.112,23000,0)
+4002662^TOLBUTAMIDE 250MG TAB
+"DATA",176.112,23000,1)
+313419
+"DATA",176.112,23001,0)
+4002367^TOLAZAMIDE 250MG CAP
+"DATA",176.112,23001,1)
+313418
+"DATA",176.112,23002,0)
+4010523^TOCOPHERYL ACID SUCCINATE,D-ALPHA 400UNT TAB
+"DATA",176.112,23002,1)
+313417
+"DATA",176.112,23003,0)
+4005549^TOBRAMYCIN SO4 10MG/ML INJ
+"DATA",176.112,23003,1)
+313416
+"DATA",176.112,23004,0)
+4005547^TOBRAMYCIN 0.3% SOLN,OPH
+"DATA",176.112,23004,1)
+313415
+"DATA",176.112,23005,0)
+4005548^TOBRAMYCIN 0.3% OINT,OPH
+"DATA",176.112,23005,1)
+313414
+"DATA",176.112,23006,0)
+4013029^TIZANIDINE HCL 4MG TAB
+"DATA",176.112,23006,1)
+313413
+"DATA",176.112,23007,0)
+4014666^TIZANIDINE HCL 2MG TAB
+"DATA",176.112,23007,1)
+313412
+"DATA",176.112,23008,0)
+4014973^TINZAPARIN NA 20000 UNT/ML INJ
+"DATA",176.112,23008,1)
+313410
+"DATA",176.112,23009,0)
+4013431^TIMOLOL MALEATE 0.5% SOLN,OPH,0.3ML
+"DATA",176.112,23009,1)
+313409
+"DATA",176.112,23010,0)
+4002852^TIMOLOL MALEATE 0.5% SOLN,OPH
+"DATA",176.112,23010,1)
+313409
+"DATA",176.112,23011,0)
+4002856^TIMOLOL HEMIHYDRATE 0.5% SOLN,OPH
+"DATA",176.112,23011,1)
+313409
+"DATA",176.112,23012,0)
+4014943^TIMOLOL MALEATE 0.5% SOLN,OPH,0.2ML
+"DATA",176.112,23012,1)
+313409
+"DATA",176.112,23013,0)
+4002854^TIMOLOL MALEATE 0.5% GEL,OPH
+"DATA",176.112,23013,1)
+313408
+"DATA",176.112,23014,0)
+4010128^TICLOPIDINE HCL 250MG TAB
+"DATA",176.112,23014,1)
+313406
+"DATA",176.112,23015,0)
+4007367^TICARCILLIN DISODIUM 40MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,23015,1)
+313405
+"DATA",176.112,23016,0)
+4004692^TICARCILLIN DISODIUM 1GM/VIL INJ
+"DATA",176.112,23016,1)
+313404
+"DATA",176.112,23017,0)
+4004693^TICARCILLIN DISODIUM 3GM/VIL INJ
+"DATA",176.112,23017,1)
+313404
+"DATA",176.112,23018,0)
+4004694^TICARCILLIN DISODIUM 6GM/VIL INJ
+"DATA",176.112,23018,1)
+313404
+"DATA",176.112,23019,0)
+4007368^TICARCILLIN DISODIUM 30MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,23019,1)
+313403
+"DATA",176.112,23020,0)
+4004696^TICARCILLIN DISODIUM 30GM/VIL INJ
+"DATA",176.112,23020,1)
+313402
+"DATA",176.112,23021,0)
+4004695^TICARCILLIN DISODIUM 20GM/VIL INJ
+"DATA",176.112,23021,1)
+313401
+"DATA",176.112,23022,0)
+4013151^TIAGABINE HCL 20MG TAB
+"DATA",176.112,23022,1)
+313399
+"DATA",176.112,23023,0)
+4013150^TIAGABINE HCL 16MG TAB
+"DATA",176.112,23023,1)
+313398
+"DATA",176.112,23024,0)
+4013387^THYROTROPIN ALFA 1.1MG/VIL INJ
+"DATA",176.112,23024,1)
+313397
+"DATA",176.112,23025,0)
+4000712^THYROID STRONG 65MG TAB
+"DATA",176.112,23025,1)
+313396
+"DATA",176.112,23026,0)
+4000688^THYROID 65MG TAB
+"DATA",176.112,23026,1)
+313396
+"DATA",176.112,23027,0)
+4000714^THYROID STRONG 200MG TAB
+"DATA",176.112,23027,1)
+313395
+"DATA",176.112,23028,0)
+4000698^THYROID 200MG TAB
+"DATA",176.112,23028,1)
+313395
+"DATA",176.112,23029,0)
+4000694^THYROID 90MG TAB
+"DATA",176.112,23029,1)
+313393
+"DATA",176.112,23030,0)
+4000700^THYROID 65MG TAB,EC
+"DATA",176.112,23030,1)
+313392
+"DATA",176.112,23031,0)
+4015338^THYROID 60MG TAB
+"DATA",176.112,23031,1)
+313391
+"DATA",176.112,23032,0)
+4000699^THYROID 32MG TAB,EC
+"DATA",176.112,23032,1)
+313390
+"DATA",176.112,23033,0)
+4000697^THYROID 325MG TAB
+"DATA",176.112,23033,1)
+313389
+"DATA",176.112,23034,0)
+4000707^THYROID 325MG CAP
+"DATA",176.112,23034,1)
+313388
+"DATA",176.112,23035,0)
+4014880^THYROID 30MG TAB
+"DATA",176.112,23035,1)
+313387
+"DATA",176.112,23036,0)
+4000703^THYROID 260MG TAB
+"DATA",176.112,23036,1)
+313386
+"DATA",176.112,23037,0)
+4000696^THYROID 240MG TAB
+"DATA",176.112,23037,1)
+313385
+"DATA",176.112,23038,0)
+4000693^THYROID 16MG TAB
+"DATA",176.112,23038,1)
+313384
+"DATA",176.112,23039,0)
+4000701^THYROID 130MG TAB,EC
+"DATA",176.112,23039,1)
+313383
+"DATA",176.112,23040,0)
+4000708^THYROID 125MG TAB
+"DATA",176.112,23040,1)
+313382
+"DATA",176.112,23041,0)
+4006892^THYROGLOBULIN 32MG TAB
+"DATA",176.112,23041,1)
+313380
+"DATA",176.112,23042,0)
+4006896^THYROGLOBULIN 30MG TAB
+"DATA",176.112,23042,1)
+313379
+"DATA",176.112,23043,0)
+4006894^THYROGLOBULIN 200MG TAB
+"DATA",176.112,23043,1)
+313378
+"DATA",176.112,23044,0)
+4006897^THYROGLOBULIN 180MG TAB
+"DATA",176.112,23044,1)
+313377
+"DATA",176.112,23045,0)
+4006895^THYROGLOBULIN 130MG TAB
+"DATA",176.112,23045,1)
+313376
+"DATA",176.112,23046,0)
+4006893^THYROGLOBULIN 100MG TAB
+"DATA",176.112,23046,1)
+313375
+"DATA",176.112,23047,0)
+4005132^THROMBIN 5000UNT/VIL PWDR,TOP
+"DATA",176.112,23047,1)
+313373
+"DATA",176.112,23048,0)
+4005135^THROMBIN 50000UNT/VIL PWDR,TOP
+"DATA",176.112,23048,1)
+313372
+"DATA",176.112,23049,0)
+4005133^THROMBIN 10000UNT/VIL PWDR,TOP
+"DATA",176.112,23049,1)
+313370
+"DATA",176.112,23050,0)
+4005073^THIOTHIXENE HCL 5MG/ML SOLN,ORAL
+"DATA",176.112,23050,1)
+313368
+"DATA",176.112,23051,0)
+4005075^THIOTHIXENE HCL 5MG/ML INJ
+"DATA",176.112,23051,1)
+313367
+"DATA",176.112,23052,0)
+4005071^THIOTHIXENE HCL 5MG CAP
+"DATA",176.112,23052,1)
+313366
+"DATA",176.112,23053,0)
+4005079^THIOTHIXENE HCL 5MG CAP,UD
+"DATA",176.112,23053,1)
+313366
+"DATA",176.112,23054,0)
+4005074^THIOTHIXENE HCL 2MG/ML INJ
+"DATA",176.112,23054,1)
+313365
+"DATA",176.112,23055,0)
+4005078^THIOTHIXENE HCL 2MG CAP,UD
+"DATA",176.112,23055,1)
+313364
+"DATA",176.112,23056,0)
+4005070^THIOTHIXENE HCL 2MG CAP
+"DATA",176.112,23056,1)
+313364
+"DATA",176.112,23057,0)
+4005076^THIOTHIXENE HCL 20MG CAP
+"DATA",176.112,23057,1)
+313363
+"DATA",176.112,23058,0)
+4005077^THIOTHIXENE HCL 1MG CAP,UD
+"DATA",176.112,23058,1)
+313362
+"DATA",176.112,23059,0)
+4005069^THIOTHIXENE HCL 1MG CAP
+"DATA",176.112,23059,1)
+313362
+"DATA",176.112,23060,0)
+4005072^THIOTHIXENE HCL 10MG CAP
+"DATA",176.112,23060,1)
+313361
+"DATA",176.112,23061,0)
+4002764^THIOTEPA 15MG/VIL INJ
+"DATA",176.112,23061,1)
+313360
+"DATA",176.112,23062,0)
+4002686^THIORIDAZINE HCL 50MG TAB,EC
+"DATA",176.112,23062,1)
+313359
+"DATA",176.112,23063,0)
+4002677^THIORIDAZINE HCL 30MG/ML SOLN,ORAL
+"DATA",176.112,23063,1)
+313358
+"DATA",176.112,23064,0)
+4002682^THIORIDAZINE HCL 25MG/5ML SUSP,ORAL
+"DATA",176.112,23064,1)
+313357
+"DATA",176.112,23065,0)
+4002685^THIORIDAZINE HCL 25MG TAB,EC
+"DATA",176.112,23065,1)
+313356
+"DATA",176.112,23066,0)
+4002673^THIORIDAZINE HCL 10MG TAB
+"DATA",176.112,23066,1)
+313354
+"DATA",176.112,23067,0)
+4013980^THIORIDAZINE HCL 10MG TAB,UD
+"DATA",176.112,23067,1)
+313354
+"DATA",176.112,23068,0)
+4002687^THIORIDAZINE HCL 100MG TAB,EC
+"DATA",176.112,23068,1)
+313354
+"DATA",176.112,23069,0)
+4002678^THIORIDAZINE HCL 100MG/ML CONC,ORAL
+"DATA",176.112,23069,1)
+313353
+"DATA",176.112,23070,0)
+4002683^THIORIDAZINE HCL 100MG/5ML SUSP,ORAL
+"DATA",176.112,23070,1)
+313352
+"DATA",176.112,23071,0)
+4006104^THIOPENTAL NA 5GM/VIL INJ
+"DATA",176.112,23071,1)
+313349
+"DATA",176.112,23072,0)
+4006099^THIOPENTAL NA 1GM/VIL INJ
+"DATA",176.112,23072,1)
+313349
+"DATA",176.112,23073,0)
+4006102^THIOPENTAL NA 2.5GM/VIL INJ
+"DATA",176.112,23073,1)
+313341
+"DATA",176.112,23074,0)
+4009484^THIMEROSAL 0.1% SOLN,TOP
+"DATA",176.112,23074,1)
+313336
+"DATA",176.112,23075,0)
+4009486^THIMEROSAL 0.1% TINCTURE,TOP
+"DATA",176.112,23075,1)
+313336
+"DATA",176.112,23076,0)
+4007664^THIETHYLPERAZINE MALEATE 5MG/ML INJ
+"DATA",176.112,23076,1)
+313335
+"DATA",176.112,23077,0)
+4007662^THIETHYLPERAZINE MALEATE 10MG TAB
+"DATA",176.112,23077,1)
+313334
+"DATA",176.112,23078,0)
+4007663^THIETHYLPERAZINE MALEATE 10MG SUPP,RTL
+"DATA",176.112,23078,1)
+313333
+"DATA",176.112,23079,0)
+4001061^THIAMINE HCL 5MG TAB
+"DATA",176.112,23079,1)
+313329
+"DATA",176.112,23080,0)
+4001056^THIAMINE HCL 25MG/ML INJ
+"DATA",176.112,23080,1)
+313328
+"DATA",176.112,23081,0)
+4001060^THIAMINE HCL 25MG TAB
+"DATA",176.112,23081,1)
+313327
+"DATA",176.112,23082,0)
+4001059^THIAMINE HCL 250MG TAB
+"DATA",176.112,23082,1)
+313326
+"DATA",176.112,23083,0)
+4001055^THIAMINE HCL 200MG/ML INJ
+"DATA",176.112,23083,1)
+313325
+"DATA",176.112,23084,0)
+4001054^THIAMINE HCL 100MG/ML INJ
+"DATA",176.112,23084,1)
+313324
+"DATA",176.112,23085,0)
+4013979^THIAMINE HCL 100MG TAB,UD
+"DATA",176.112,23085,1)
+313323
+"DATA",176.112,23086,0)
+4001057^THIAMINE HCL 100MG TAB
+"DATA",176.112,23086,1)
+313323
+"DATA",176.112,23087,0)
+4002971^THIABENDAZOLE 500MG/5ML SUSP
+"DATA",176.112,23087,1)
+313322
+"DATA",176.112,23088,0)
+4003665^THEOPHYLLINE,ANHYDROUS 60MG CAP,SA
+"DATA",176.112,23088,1)
+313312
+"DATA",176.112,23089,0)
+4003648^THEOPHYLLINE,ANHYDROUS 300MG CAP,SA
+"DATA",176.112,23089,1)
+313310
+"DATA",176.112,23090,0)
+4003661^THEOPHYLLINE 300MG CAP,SA
+"DATA",176.112,23090,1)
+313310
+"DATA",176.112,23091,0)
+4003656^THEOPHYLLINE,ANHYDROUS 225MG TAB
+"DATA",176.112,23091,1)
+313309
+"DATA",176.112,23092,0)
+4003673^THEOPHYLLINE 80MG/15ML LIQUID
+"DATA",176.112,23092,1)
+313306
+"DATA",176.112,23093,0)
+4003659^THEOPHYLLINE 100MG/18.75ML SOLN,ORAL
+"DATA",176.112,23093,1)
+313306
+"DATA",176.112,23094,0)
+4003664^THEOPHYLLINE,ANHYDROUS 80MG/15ML LIQUID
+"DATA",176.112,23094,1)
+313306
+"DATA",176.112,23095,0)
+4003703^THEOPHYLLINE,ANHYDROUS 80MG/15ML (SF) ELIXIR
+"DATA",176.112,23095,1)
+313306
+"DATA",176.112,23096,0)
+4003689^THEOPHYLLINE,ANHYDROUS 80MG/15ML SYRUP
+"DATA",176.112,23096,1)
+313306
+"DATA",176.112,23097,0)
+4003658^THEOPHYLLINE 80MG/15ML ELIXIR
+"DATA",176.112,23097,1)
+313306
+"DATA",176.112,23098,0)
+4003683^THEOPHYLLINE 80MG/15ML SYRUP
+"DATA",176.112,23098,1)
+313306
+"DATA",176.112,23099,0)
+4003700^THEOPHYLLINE 75MG CAP,SA
+"DATA",176.112,23099,1)
+313304
+"DATA",176.112,23100,0)
+4003693^THEOPHYLLINE,ANHYDROUS 75MG SPRINKLE CAP,SA
+"DATA",176.112,23100,1)
+313304
+"DATA",176.112,23101,0)
+4003687^THEOPHYLLINE 65MG CAP,SA
+"DATA",176.112,23101,1)
+313302
+"DATA",176.112,23102,0)
+4003692^THEOPHYLLINE,ANHYDROUS 50MG SPRINKLE CAP,SA
+"DATA",176.112,23102,1)
+313301
+"DATA",176.112,23103,0)
+4003660^THEOPHYLLINE 50MG CAP,SA
+"DATA",176.112,23103,1)
+313301
+"DATA",176.112,23104,0)
+4003672^THEOPHYLLINE 500MG TAB,SA
+"DATA",176.112,23104,1)
+313298
+"DATA",176.112,23105,0)
+4006303^THEOPHYLLINE 4MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,23105,1)
+313297
+"DATA",176.112,23106,0)
+4003653^THEOPHYLLINE 400MG TAB,SA
+"DATA",176.112,23106,1)
+313291
+"DATA",176.112,23107,0)
+4006304^THEOPHYLLINE 3.2MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,23107,1)
+313285
+"DATA",176.112,23108,0)
+4006302^THEOPHYLLINE 2MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,23108,1)
+313284
+"DATA",176.112,23109,0)
+4003675^THEOPHYLLINE,ANHYDROUS 260MG CAP,SA
+"DATA",176.112,23109,1)
+313280
+"DATA",176.112,23110,0)
+4003681^THEOPHYLLINE 260MG CAP,SA
+"DATA",176.112,23110,1)
+313280
+"DATA",176.112,23111,0)
+4003701^THEOPHYLLINE 250MG CAP
+"DATA",176.112,23111,1)
+313278
+"DATA",176.112,23112,0)
+4003695^THEOPHYLLINE 200MG CAP,SA
+"DATA",176.112,23112,1)
+313272
+"DATA",176.112,23113,0)
+4003691^THEOPHYLLINE,ANHYDROUS 200MG SPRINKLE CAP,SA
+"DATA",176.112,23113,1)
+313272
+"DATA",176.112,23114,0)
+4003647^THEOPHYLLINE,ANHYDROUS 200MG CAP,SA
+"DATA",176.112,23114,1)
+313272
+"DATA",176.112,23115,0)
+4003688^THEOPHYLLINE 160MG/15ML LIQUID,ORAL
+"DATA",176.112,23115,1)
+313271
+"DATA",176.112,23116,0)
+4006301^THEOPHYLLINE 1.6MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,23116,1)
+313264
+"DATA",176.112,23117,0)
+4006300^THEOPHYLLINE 0.8MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,23117,1)
+313263
+"DATA",176.112,23118,0)
+4006299^THEOPHYLLINE 0.4MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,23118,1)
+313262
+"DATA",176.112,23119,0)
+4009233^TETRAHYDROZOLINE HCL 0.05%/ZINC SULFATE 0.25% SOLN,OPH
+"DATA",176.112,23119,1)
+313257
+"DATA",176.112,23120,0)
+4007440^TETRAHYDROZOLINE HCL 0.05% SOLN,OPH
+"DATA",176.112,23120,1)
+313256
+"DATA",176.112,23121,0)
+4001907^TETRACYCLINE HCL 500MG TAB
+"DATA",176.112,23121,1)
+313254
+"DATA",176.112,23122,0)
+4001917^TETRACYCLINE HCL 250MG/ML INJ IM
+"DATA",176.112,23122,1)
+313253
+"DATA",176.112,23123,0)
+4001916^TETRACYCLINE HCL 250MG/ML INJ IV
+"DATA",176.112,23123,1)
+313253
+"DATA",176.112,23124,0)
+4001909^TETRACYCLINE HCL 250MG TAB
+"DATA",176.112,23124,1)
+313252
+"DATA",176.112,23125,0)
+4001911^TETRACYCLINE HCL 125MG/5ML SUSP
+"DATA",176.112,23125,1)
+313251
+"DATA",176.112,23126,0)
+4001920^TETRACYCLINE 125MG/5ML SUSP
+"DATA",176.112,23126,1)
+313251
+"DATA",176.112,23127,0)
+4001915^TETRACYCLINE HCL 100MG/ML INJ IM
+"DATA",176.112,23127,1)
+313250
+"DATA",176.112,23128,0)
+4001913^TETRACYCLINE HCL 1% SUSP,OPH
+"DATA",176.112,23128,1)
+313249
+"DATA",176.112,23129,0)
+4001912^TETRACYCLINE HCL 1% OINT,OPH
+"DATA",176.112,23129,1)
+313248
+"DATA",176.112,23130,0)
+4004337^TETRACAINE HCL 2% GEL,TOP
+"DATA",176.112,23130,1)
+313247
+"DATA",176.112,23131,0)
+4004339^TETRACAINE HCL 1% CREAM,TOP
+"DATA",176.112,23131,1)
+313246
+"DATA",176.112,23132,0)
+4004334^TETRACAINE HCL 0.5% SOLN,OPH
+"DATA",176.112,23132,1)
+313245
+"DATA",176.112,23133,0)
+4004340^TETRACAINE HCL 0.5% SOLN,OPH,1ML
+"DATA",176.112,23133,1)
+313245
+"DATA",176.112,23134,0)
+4003313^TETANUS IMMUNE GLOBULIN,HUMAN 250UNT/ML INJ
+"DATA",176.112,23134,1)
+313243
+"DATA",176.112,23135,0)
+4003316^TETANUS IMMUNE GLOBULIN,HUMAN 250UNT/SYRINGE INJ
+"DATA",176.112,23135,1)
+313243
+"DATA",176.112,23136,0)
+4003315^TETANUS IMMUNE GLOBULIN,HUMAN 250UNT/ML INJ,SYRINGE,1ML
+"DATA",176.112,23136,1)
+313243
+"DATA",176.112,23137,0)
+4001125^TESTOSTERONE PROPIONATE 50MG/ML INJ (IN OIL)
+"DATA",176.112,23137,1)
+313239
+"DATA",176.112,23138,0)
+4001127^TESTOSTERONE CYPIONATE 50MG/ML INJ (IN OIL)
+"DATA",176.112,23138,1)
+313239
+"DATA",176.112,23139,0)
+4001133^TESTOSTERONE 25MG/ML INJ,SUSP
+"DATA",176.112,23139,1)
+313238
+"DATA",176.112,23140,0)
+4001135^TESTOSTERONE PROPIONATE 25MG/ML INJ (IN OIL)
+"DATA",176.112,23140,1)
+313238
+"DATA",176.112,23141,0)
+4001143^TESTOSTERONE 6HG/24HRS PATCH
+"DATA",176.112,23141,1)
+313235
+"DATA",176.112,23142,0)
+4001145^TESTOSTERONE 6MG/24HRS PATCH W/STRIP
+"DATA",176.112,23142,1)
+313235
+"DATA",176.112,23143,0)
+4001146^TESTOSTERONE 5MG/24HRS PATCH
+"DATA",176.112,23143,1)
+313234
+"DATA",176.112,23144,0)
+4001142^TESTOSTERONE 4MG/24HRS PATCH
+"DATA",176.112,23144,1)
+313233
+"DATA",176.112,23145,0)
+4001131^TESTOSTERONE ENANTHATE 100MG/ML INJ (IN OIL)
+"DATA",176.112,23145,1)
+313232
+"DATA",176.112,23146,0)
+4001128^TESTOSTERONE CYPIONATE 100MG/ML INJ (IN OIL)
+"DATA",176.112,23146,1)
+313232
+"DATA",176.112,23147,0)
+4001130^TESTOSTERONE PROPIONATE 100MG/ML INJ (IN OIL)
+"DATA",176.112,23147,1)
+313232
+"DATA",176.112,23148,0)
+4025004^TESTOSTERONE 1% 75GM/PUMP GEL,TOP
+"DATA",176.112,23148,1)
+313231
+"DATA",176.112,23149,0)
+4014744^TESTOSTERONE 1% 5GM/PKT GEL,TOP
+"DATA",176.112,23149,1)
+313231
+"DATA",176.112,23150,0)
+4014743^TESTOSTERONE 1% 2.5GM/PKT GEL,TOP
+"DATA",176.112,23150,1)
+313231
+"DATA",176.112,23151,0)
+4009147^TERCONAZOLE 0.8% CREAM,VAG
+"DATA",176.112,23151,1)
+313227
+"DATA",176.112,23152,0)
+4009145^TERCONAZOLE 0.4% CREAM,VAG
+"DATA",176.112,23152,1)
+313226
+"DATA",176.112,23153,0)
+4004614^TERBUTALINE SO4 2.5MG TAB
+"DATA",176.112,23153,1)
+313225
+"DATA",176.112,23154,0)
+4004617^TERBUTALINE SO4 1MG/ML INJ
+"DATA",176.112,23154,1)
+313224
+"DATA",176.112,23155,0)
+4004616^TERBUTALINE SO4 0.2MG/SPRAY INHL,ORAL
+"DATA",176.112,23155,1)
+313223
+"DATA",176.112,23156,0)
+4010294^TERBINAFINE HCL 250MG TAB
+"DATA",176.112,23156,1)
+313222
+"DATA",176.112,23157,0)
+4008761^TERAZOSIN HCL 5MG TAB
+"DATA",176.112,23157,1)
+313220
+"DATA",176.112,23158,0)
+4013975^TERAZOSIN HCL 5MG CAP,UD
+"DATA",176.112,23158,1)
+313219
+"DATA",176.112,23159,0)
+4008765^TERAZOSIN HCL 5MG CAP
+"DATA",176.112,23159,1)
+313219
+"DATA",176.112,23160,0)
+4008760^TERAZOSIN HCL 2MG TAB
+"DATA",176.112,23160,1)
+313218
+"DATA",176.112,23161,0)
+4008764^TERAZOSIN HCL 2MG CAP
+"DATA",176.112,23161,1)
+313217
+"DATA",176.112,23162,0)
+4013976^TERAZOSIN HCL 2MG CAP,UD
+"DATA",176.112,23162,1)
+313217
+"DATA",176.112,23163,0)
+4008759^TERAZOSIN HCL 1MG TAB
+"DATA",176.112,23163,1)
+313216
+"DATA",176.112,23164,0)
+4008763^TERAZOSIN HCL 1MG CAP
+"DATA",176.112,23164,1)
+313215
+"DATA",176.112,23165,0)
+4014050^TERAZOSIN HCL 1MG CAP,UD
+"DATA",176.112,23165,1)
+313215
+"DATA",176.112,23166,0)
+4008762^TERAZOSIN HCL 10MG TAB
+"DATA",176.112,23166,1)
+313214
+"DATA",176.112,23167,0)
+4010255^TENIPOSIDE 10MG/ML INJ,CONC
+"DATA",176.112,23167,1)
+313213
+"DATA",176.112,23168,0)
+4010256^TENIPOSIDE 10MG/ML INJ
+"DATA",176.112,23168,1)
+313213
+"DATA",176.112,23169,0)
+4014838^TENECTEPLASE,RECOMBINANT 50MG/VIL INJ
+"DATA",176.112,23169,1)
+313212
+"DATA",176.112,23170,0)
+4014180^TEMOZOLOMIDE 5MG CAP
+"DATA",176.112,23170,1)
+313211
+"DATA",176.112,23171,0)
+4014183^TEMOZOLOMIDE 250MG CAP
+"DATA",176.112,23171,1)
+313210
+"DATA",176.112,23172,0)
+4014181^TEMOZOLOMIDE 20MG CAP
+"DATA",176.112,23172,1)
+313209
+"DATA",176.112,23173,0)
+4013100^TAZAROTENE 0.1% GEL,TOP
+"DATA",176.112,23173,1)
+313201
+"DATA",176.112,23174,0)
+4015450^TAZAROTENE 0.1% CREAM,TOP
+"DATA",176.112,23174,1)
+313200
+"DATA",176.112,23175,0)
+4013099^TAZAROTENE 0.05% GEL,TOP
+"DATA",176.112,23175,1)
+313199
+"DATA",176.112,23176,0)
+4004891^TAMOXIFEN CITRATE 20MG TAB
+"DATA",176.112,23176,1)
+313195
+"DATA",176.112,23177,0)
+4004269^TALBUTAL 120MG TAB
+"DATA",176.112,23177,1)
+313191
+"DATA",176.112,23178,0)
+4013778^TACROLIMUS 0.5MG CAP
+"DATA",176.112,23178,1)
+313190
+"DATA",176.112,23179,0)
+4015258^TACROLIMUS 0.03% OINT,TOP
+"DATA",176.112,23179,1)
+313189
+"DATA",176.112,23180,0)
+4012141^TACRINE HCL 40MG CAP
+"DATA",176.112,23180,1)
+313188
+"DATA",176.112,23181,0)
+4012140^TACRINE HCL 30MG CAP
+"DATA",176.112,23181,1)
+313187
+"DATA",176.112,23182,0)
+4012139^TACRINE HCL 20MG CAP
+"DATA",176.112,23182,1)
+313186
+"DATA",176.112,23183,0)
+4012138^TACRINE HCL 10MG CAP
+"DATA",176.112,23183,1)
+313185
+"DATA",176.112,23184,0)
+4004981^SUPROFEN 200MG CAP
+"DATA",176.112,23184,1)
+313172
+"DATA",176.112,23185,0)
+4004982^SUPROFEN 1% SOLN,OPH
+"DATA",176.112,23185,1)
+313171
+"DATA",176.112,23186,0)
+4010258^SUMATRIPTAN SUCCINATE 6MG/0.5ML INJ,VIL,0.5ML
+"DATA",176.112,23186,1)
+313165
+"DATA",176.112,23187,0)
+4010261^SUMATRIPTAN SUCCINATE 50MG TAB
+"DATA",176.112,23187,1)
+313161
+"DATA",176.112,23188,0)
+4015136^SUMATRIPTAN SUCCINATE 100MG TAB
+"DATA",176.112,23188,1)
+313160
+"DATA",176.112,23189,0)
+4010264^SUMATRIPTAN 5MG/SPRAY SOLN,NASAL,0.1ML
+"DATA",176.112,23189,1)
+313159
+"DATA",176.112,23190,0)
+4008778^SULFURATED LIME 6% SOLN,TOP
+"DATA",176.112,23190,1)
+313157
+"DATA",176.112,23191,0)
+4008727^SULFUR 5% SOAP,BAR
+"DATA",176.112,23191,1)
+313152
+"DATA",176.112,23192,0)
+4008723^SULFUR 5% SHAMPOO
+"DATA",176.112,23192,1)
+313151
+"DATA",176.112,23193,0)
+4008719^SULFUR 2% CREAM,TOP
+"DATA",176.112,23193,1)
+313149
+"DATA",176.112,23194,0)
+4008724^SULFUR 10% OINT,TOP
+"DATA",176.112,23194,1)
+313148
+"DATA",176.112,23195,0)
+4008729^SULFUR 10% BAR,TOP
+"DATA",176.112,23195,1)
+313147
+"DATA",176.112,23196,0)
+4002046^SULFISOXAZOLE DIOLAMINE 4% SOLN,OPH
+"DATA",176.112,23196,1)
+313144
+"DATA",176.112,23197,0)
+4002045^SULFISOXAZOLE DIOLAMINE 4% OINT,OPH
+"DATA",176.112,23197,1)
+313143
+"DATA",176.112,23198,0)
+4002716^SULFASALAZINE 500MG TAB,EC
+"DATA",176.112,23198,1)
+313142
+"DATA",176.112,23199,0)
+4013732^SULFASALAZINE 500MG TAB,SA
+"DATA",176.112,23199,1)
+313142
+"DATA",176.112,23200,0)
+4001176^SULFAPYRIDINE 500MG TAB
+"DATA",176.112,23200,1)
+313141
+"DATA",176.112,23201,0)
+4006741^SULFANILAMIDE 15% CREAM,VAG
+"DATA",176.112,23201,1)
+313140
+"DATA",176.112,23202,0)
+4006743^SULFANILAMIDE 10% CREAM,VAG
+"DATA",176.112,23202,1)
+313139
+"DATA",176.112,23203,0)
+4006742^SULFANILAMIDE 1.05GM SUPP,VAG
+"DATA",176.112,23203,1)
+313138
+"DATA",176.112,23204,0)
+4001956^SULFAMETHOXAZOLE 80MG/TRIMETHOPRIM 16MG/ML INJ
+"DATA",176.112,23204,1)
+313137
+"DATA",176.112,23205,0)
+4001957^SULFAMETHOXAZOLE 800MG/TRIMETHOPRIM 160MG TAB,SA
+"DATA",176.112,23205,1)
+313136
+"DATA",176.112,23206,0)
+4002049^SULFAMETHOXAZOLE 500MG/5ML SUSP
+"DATA",176.112,23206,1)
+313135
+"DATA",176.112,23207,0)
+4001955^SULFAMETHOXAZOLE 200MG/TRIMETHOPRIM 40MG/5ML SUSP
+"DATA",176.112,23207,1)
+313134
+"DATA",176.112,23208,0)
+4002050^SULFAMETHOXAZOLE 1GM TAB
+"DATA",176.112,23208,1)
+313133
+"DATA",176.112,23209,0)
+4007589^SULFACYTINE 250MG TAB
+"DATA",176.112,23209,1)
+313132
+"DATA",176.112,23210,0)
+4004085^SULFACETAMIDE NA 30% SOLN,OPH
+"DATA",176.112,23210,1)
+313131
+"DATA",176.112,23211,0)
+4004083^SULFACETAMIDE NA 15% SOLN,OPH
+"DATA",176.112,23211,1)
+313130
+"DATA",176.112,23212,0)
+4005566^SULFACETAMIDE NA 10%/SULFUR 5% LOTION
+"DATA",176.112,23212,1)
+313129
+"DATA",176.112,23213,0)
+4004081^SULFACETAMIDE NA 10% SOLN,OPH
+"DATA",176.112,23213,1)
+313128
+"DATA",176.112,23214,0)
+4004087^SULFACETAMIDE NA 10% SOLN,OPH,1ML
+"DATA",176.112,23214,1)
+313128
+"DATA",176.112,23215,0)
+4004086^SULFACETAMIDE NA 10%/METHYLCELLULOSE 0.5% SOLN,OPH
+"DATA",176.112,23215,1)
+313128
+"DATA",176.112,23216,0)
+4004082^SULFACETAMIDE NA 10% OINT,OPH
+"DATA",176.112,23216,1)
+313127
+"DATA",176.112,23217,0)
+4004084^SULFACETAMIDE NA 10% LOTION
+"DATA",176.112,23217,1)
+313126
+"DATA",176.112,23218,0)
+4009067^SULCONAZOLE NITRATE 1% SOLN,TOP
+"DATA",176.112,23218,1)
+313125
+"DATA",176.112,23219,0)
+4008155^SUFENTANIL CITRATE 50MCG/ML INJ,AMP,2ML
+"DATA",176.112,23219,1)
+313124
+"DATA",176.112,23220,0)
+4008153^SUFENTANIL CITRATE 50MCG/ML INJ,AMP,5ML
+"DATA",176.112,23220,1)
+313124
+"DATA",176.112,23221,0)
+4008154^SUFENTANIL CITRATE 50MCG/ML INJ,AMP,1ML
+"DATA",176.112,23221,1)
+313124
+"DATA",176.112,23222,0)
+4008152^SUFENTANIL CITRATE 50MCG/ML INJ
+"DATA",176.112,23222,1)
+313124
+"DATA",176.112,23223,0)
+4025919^SUCRALFATE 500MG/5ML SUSP,ORAL,10ML
+"DATA",176.112,23223,1)
+313123
+"DATA",176.112,23224,0)
+4006664^SUCRALFATE 500MG/5ML SUSP,ORAL
+"DATA",176.112,23224,1)
+313123
+"DATA",176.112,23225,0)
+4001945^SUCCINYLCHOLINE CHLORIDE 1000MG/VIL INJ
+"DATA",176.112,23225,1)
+313121
+"DATA",176.112,23226,0)
+4007913^STRYCHNINE SO4 2.138MG TAB
+"DATA",176.112,23226,1)
+313120
+"DATA",176.112,23227,0)
+4001065^STREPTOMYCIN SO4 5GM/VIL INJ
+"DATA",176.112,23227,1)
+313115
+"DATA",176.112,23228,0)
+4001064^STREPTOMYCIN SO4 1GM/VIL INJ
+"DATA",176.112,23228,1)
+313115
+"DATA",176.112,23229,0)
+4008207^STREPTOCOCCUS FAECALIS 10000000UNT/ML SUSP
+"DATA",176.112,23229,1)
+313112
+"DATA",176.112,23230,0)
+4012480^STAVUDINE (d4T) 40MG CAP
+"DATA",176.112,23230,1)
+313110
+"DATA",176.112,23231,0)
+4012479^STAVUDINE (d4T) 30MG CAP
+"DATA",176.112,23231,1)
+313109
+"DATA",176.112,23232,0)
+4012478^STAVUDINE (d4T) 20MG CAP
+"DATA",176.112,23232,1)
+313108
+"DATA",176.112,23233,0)
+4012477^STAVUDINE (d4T) 15MG CAP
+"DATA",176.112,23233,1)
+313107
+"DATA",176.112,23234,0)
+4007296^STANNOUS FLUORIDE 30% LIQUID,DENT
+"DATA",176.112,23234,1)
+313105
+"DATA",176.112,23235,0)
+4007298^STANNOUS FLUORIDE 120GM/BTL PWDR
+"DATA",176.112,23235,1)
+313104
+"DATA",176.112,23236,0)
+4007297^STANNOUS FLUORIDE 1.3% LIQUID,DENT
+"DATA",176.112,23236,1)
+313102
+"DATA",176.112,23237,0)
+4007299^STANNOUS FLUORIDE 0.4% LIQUID,DENT
+"DATA",176.112,23237,1)
+313101
+"DATA",176.112,23238,0)
+4014591^SPIRONOLACTONE 25MG TAB,UD
+"DATA",176.112,23238,1)
+313096
+"DATA",176.112,23239,0)
+4002693^SPIRONOLACTONE 25MG TAB
+"DATA",176.112,23239,1)
+313096
+"DATA",176.112,23240,0)
+4003513^SPECTINOMYCIN HCL 2GM/VIL INJ,SUSP
+"DATA",176.112,23240,1)
+313093
+"DATA",176.112,23241,0)
+4015335^SORBITOL 70% SOLN,30ML
+"DATA",176.112,23241,1)
+313092
+"DATA",176.112,23242,0)
+4007228^SORBITOL 70% SOLN
+"DATA",176.112,23242,1)
+313092
+"DATA",176.112,23243,0)
+4007226^SORBITOL 3.3% SOLN,IRRG
+"DATA",176.112,23243,1)
+313091
+"DATA",176.112,23244,0)
+4007227^SORBITOL 3% SOLN,IRRG
+"DATA",176.112,23244,1)
+313090
+"DATA",176.112,23245,0)
+4009968^SOMATROPIN 8MG/VIL INJ
+"DATA",176.112,23245,1)
+313089
+"DATA",176.112,23246,0)
+4015855^SOMATROPIN 12MG/VIL INJ
+"DATA",176.112,23246,1)
+313089
+"DATA",176.112,23247,0)
+4009252^SOMATREM 10MG/VIL INJ
+"DATA",176.112,23247,1)
+313088
+"DATA",176.112,23248,0)
+4009151^SODIUM THIOSULFATE 100MG/ML INJ
+"DATA",176.112,23248,1)
+313081
+"DATA",176.112,23249,0)
+4007465^SODIUM THIOSALICYLATE 50MG/ML INJ
+"DATA",176.112,23249,1)
+313079
+"DATA",176.112,23250,0)
+4007466^SODIUM THIOSALICYLATE 100MG/ML INJ
+"DATA",176.112,23250,1)
+313078
+"DATA",176.112,23251,0)
+4007517^SODIUM SALICYLATE 650MG TAB
+"DATA",176.112,23251,1)
+313076
+"DATA",176.112,23252,0)
+4007516^SODIUM SALICYLATE 325MG TAB
+"DATA",176.112,23252,1)
+313075
+"DATA",176.112,23253,0)
+4004264^SODIUM POLYSTYRENE SULFONATE PWDR
+"DATA",176.112,23253,1)
+313072
+"DATA",176.112,23254,0)
+4004267^SODIUM POLYSTYRENE SULFONATE 50GM/200ML SUSP,RTL
+"DATA",176.112,23254,1)
+313072
+"DATA",176.112,23255,0)
+4004266^SODIUM POLYSTYRENE SULFONATE 30GM/120ML RTL
+"DATA",176.112,23255,1)
+313072
+"DATA",176.112,23256,0)
+4004265^SODIUM POLYSTYRENE SULFONATE 15GM/60ML SUSP
+"DATA",176.112,23256,1)
+313072
+"DATA",176.112,23257,0)
+4002276^SODIUM NITROPRUSSIDE 50MG/5ML INJ
+"DATA",176.112,23257,1)
+313068
+"DATA",176.112,23258,0)
+4002278^SODIUM NITROPRUSSIDE 50MG/10ML INJ
+"DATA",176.112,23258,1)
+313067
+"DATA",176.112,23259,0)
+4008736^SODIUM LAURYL SO4 15%/LAURAMIDE DEA SHAMPOO
+"DATA",176.112,23259,1)
+313062
+"DATA",176.112,23260,0)
+4010192^SODIUM LACTATE 5%/UREA 5% LOTION
+"DATA",176.112,23260,1)
+313061
+"DATA",176.112,23261,0)
+4010405^SODIUM HYPOCHLORITE 0.5% SOLN,TOP
+"DATA",176.112,23261,1)
+313049
+"DATA",176.112,23262,0)
+4010404^SODIUM HYPOCHLORITE 0.25% SOLN,TOP
+"DATA",176.112,23262,1)
+313048
+"DATA",176.112,23263,0)
+4007902^SODIUM FLUORIDE 2.76%/NA PHOSPHATE,DIBASIC 1.53% PASTE
+"DATA",176.112,23263,1)
+313046
+"DATA",176.112,23264,0)
+4004937^SODIUM FLUORIDE 2.7% PASTE,DENT
+"DATA",176.112,23264,1)
+313045
+"DATA",176.112,23265,0)
+4004926^SODIUM FLUORIDE 2.2MG/5ML SOLN
+"DATA",176.112,23265,1)
+313044
+"DATA",176.112,23266,0)
+4004919^SODIUM FLUORIDE 2.2MG TAB
+"DATA",176.112,23266,1)
+313043
+"DATA",176.112,23267,0)
+4004942^SODIUM FLUORIDE 2.2MG LOZENGE
+"DATA",176.112,23267,1)
+313041
+"DATA",176.112,23268,0)
+4004938^SODIUM FLUORIDE 2% SOLN
+"DATA",176.112,23268,1)
+313040
+"DATA",176.112,23269,0)
+4004932^SODIUM FLUORIDE 1MG TAB,CHEWABLE
+"DATA",176.112,23269,1)
+313039
+"DATA",176.112,23270,0)
+4004946^SODIUM FLUORIDE 1MG TAB
+"DATA",176.112,23270,1)
+313038
+"DATA",176.112,23271,0)
+4004927^SODIUM FLUORIDE 11MG/ML SOLN,DENT
+"DATA",176.112,23271,1)
+313037
+"DATA",176.112,23272,0)
+4004939^SODIUM FLUORIDE 0.5MG TAB,CHEWABLE
+"DATA",176.112,23272,1)
+313036
+"DATA",176.112,23273,0)
+4004925^SODIUM FLUORIDE 1.1MG TAB,CHEWABLE
+"DATA",176.112,23273,1)
+313036
+"DATA",176.112,23274,0)
+4004941^SODIUM FLUORIDE 1.105MG/0.6ML LIQUID
+"DATA",176.112,23274,1)
+313035
+"DATA",176.112,23275,0)
+4014111^SODIUM FLUORIDE 1.1% CREAM,ORAL
+"DATA",176.112,23275,1)
+313034
+"DATA",176.112,23276,0)
+4004936^SODIUM FLUORIDE 0.25MG/0.6ML LIQUID
+"DATA",176.112,23276,1)
+313031
+"DATA",176.112,23277,0)
+4004943^SODIUM FLUORIDE 0.2% GEL,DENT
+"DATA",176.112,23277,1)
+313030
+"DATA",176.112,23278,0)
+4004949^SODIUM FLUORIDE 0.02% LIQUID,DENT
+"DATA",176.112,23278,1)
+313029
+"DATA",176.112,23279,0)
+4004950^SODIUM FLUORIDE 0.02% MOUTHWASH
+"DATA",176.112,23279,1)
+313029
+"DATA",176.112,23280,0)
+4007237^SODIUM CITRATE 46.7% INJ
+"DATA",176.112,23280,1)
+313026
+"DATA",176.112,23281,0)
+4007236^SODIUM CITRATE 3.5MEQ/ML INJ,CONC
+"DATA",176.112,23281,1)
+313024
+"DATA",176.112,23282,0)
+4001087^SODIUM CHLORIDE 5% OINT,OPH
+"DATA",176.112,23282,1)
+313017
+"DATA",176.112,23283,0)
+4001097^SODIUM CHLORIDE 23.4% INJ,CONC
+"DATA",176.112,23283,1)
+313016
+"DATA",176.112,23284,0)
+4001093^SODIUM CHLORIDE 23.4% (PF) INJ,CONC
+"DATA",176.112,23284,1)
+313016
+"DATA",176.112,23285,0)
+4001078^SODIUM CHLORIDE 4MEQ/ML INJ,CONC
+"DATA",176.112,23285,1)
+313016
+"DATA",176.112,23286,0)
+4001081^SODIUM CHLORIDE 2MEQ/ML INJ
+"DATA",176.112,23286,1)
+313015
+"DATA",176.112,23287,0)
+4001109^SODIUM CHLORIDE 250MG TAB,OPH
+"DATA",176.112,23287,1)
+313014
+"DATA",176.112,23288,0)
+4001073^SODIUM CHLORIDE 2.5MEQ/ML INJ,CONC
+"DATA",176.112,23288,1)
+313012
+"DATA",176.112,23289,0)
+4001095^SODIUM CHLORIDE 1GM TAB
+"DATA",176.112,23289,1)
+313009
+"DATA",176.112,23290,0)
+4001099^SODIUM CHLORIDE 1.079GM TAB
+"DATA",176.112,23290,1)
+313005
+"DATA",176.112,23291,0)
+4014929^SODIUM CHLORIDE 0.9% INJ,BAG,500ML
+"DATA",176.112,23291,1)
+313002
+"DATA",176.112,23292,0)
+4001068^SODIUM CHLORIDE 0.9% INJ
+"DATA",176.112,23292,1)
+313002
+"DATA",176.112,23293,0)
+4014930^SODIUM CHLORIDE 0.9% INJ,BAG,1000ML
+"DATA",176.112,23293,1)
+313002
+"DATA",176.112,23294,0)
+4014926^SODIUM CHLORIDE 0.9% INJ,BAG,100ML
+"DATA",176.112,23294,1)
+313002
+"DATA",176.112,23295,0)
+4014927^SODIUM CHLORIDE 0.9% INJ,BAG,150ML
+"DATA",176.112,23295,1)
+313002
+"DATA",176.112,23296,0)
+4014928^SODIUM CHLORIDE 0.9% INJ,BAG,250ML
+"DATA",176.112,23296,1)
+313002
+"DATA",176.112,23297,0)
+4014925^SODIUM CHLORIDE 0.9% INJ,BAG,50ML
+"DATA",176.112,23297,1)
+313002
+"DATA",176.112,23298,0)
+4008100^SODIUM CHLORIDE 0.9% W/LOW DISSOLVED OXYGEN
+"DATA",176.112,23298,1)
+313002
+"DATA",176.112,23299,0)
+4003304^SODIUM CHLORIDE 0.9%/METHYLPARABEN/PROPYLPARABEN INJ
+"DATA",176.112,23299,1)
+313002
+"DATA",176.112,23300,0)
+4001092^SODIUM CHLORIDE 0.9% (PF) INJ
+"DATA",176.112,23300,1)
+313002
+"DATA",176.112,23301,0)
+4001086^SODIUM CHLORIDE (PF) 0.9% INJ
+"DATA",176.112,23301,1)
+313002
+"DATA",176.112,23302,0)
+4003528^SODIUM CHLORIDE 0.9%/BENZYL ALCOHOL 2% INJ
+"DATA",176.112,23302,1)
+313002
+"DATA",176.112,23303,0)
+4001096^SODIUM CHLORIDE 0.9% SOLN,NASAL
+"DATA",176.112,23303,1)
+313000
+"DATA",176.112,23304,0)
+4001101^SODIUM CHLORIDE 0.9% INHL 3ML
+"DATA",176.112,23304,1)
+312997
+"DATA",176.112,23305,0)
+4001105^SODIUM CHLORIDE 0.9% INHL 2.5ML
+"DATA",176.112,23305,1)
+312997
+"DATA",176.112,23306,0)
+4001119^SODIUM CHLORIDE 0.9% INHL 15ML
+"DATA",176.112,23306,1)
+312997
+"DATA",176.112,23307,0)
+4001104^SODIUM CHLORIDE 0.9% INHL 5ML
+"DATA",176.112,23307,1)
+312997
+"DATA",176.112,23308,0)
+4001102^SODIUM CHLORIDE 0.9% INHL 4ML/5ML
+"DATA",176.112,23308,1)
+312997
+"DATA",176.112,23309,0)
+4001070^SODIUM CHLORIDE 0.9% INHL 3ML/5ML
+"DATA",176.112,23309,1)
+312997
+"DATA",176.112,23310,0)
+4001103^SODIUM CHLORIDE 0.9% INHL 2ML/3ML
+"DATA",176.112,23310,1)
+312997
+"DATA",176.112,23311,0)
+4014566^SODIUM CHLORIDE 0.65% GEL,NASAL
+"DATA",176.112,23311,1)
+312991
+"DATA",176.112,23312,0)
+4001076^SODIUM CHLORIDE 0.45% SOLN,IRRG
+"DATA",176.112,23312,1)
+312990
+"DATA",176.112,23313,0)
+4001100^SODIUM CHLORIDE 0.45% INHL 5ML
+"DATA",176.112,23313,1)
+312988
+"DATA",176.112,23314,0)
+4001069^SODIUM CHLORIDE 0.45% INHL 3ML
+"DATA",176.112,23314,1)
+312988
+"DATA",176.112,23315,0)
+4009224^SODIUM BIPHOSPHATE 480MG/SODIUM PHOSPHATE 180MG/ML LIQUID
+"DATA",176.112,23315,1)
+312983
+"DATA",176.112,23316,0)
+4009223^NA BIPHOSPHATE 4.8GM/NA PHOSPHATE 1.8GM/10ML LIQUID,ORAL
+"DATA",176.112,23316,1)
+312983
+"DATA",176.112,23317,0)
+4007862^SODIUM BIPHOSPHATE 1%/SODIUM FLUORIDE 2.9% PASTE,DENT
+"DATA",176.112,23317,1)
+312982
+"DATA",176.112,23318,0)
+4007861^SODIUM BIPHOSPHATE 0.2%/SODIUM FLUORIDE 2.73% PASTE,DENT
+"DATA",176.112,23318,1)
+312981
+"DATA",176.112,23319,0)
+4006065^SODIUM BICARBONATE 84MG/ML INJ
+"DATA",176.112,23319,1)
+312978
+"DATA",176.112,23320,0)
+4006063^SODIUM BICARBONATE 50MG/ML INJ
+"DATA",176.112,23320,1)
+312976
+"DATA",176.112,23321,0)
+4006068^SODIUM BICARBONATE 42MG/ML SOLN,INHL
+"DATA",176.112,23321,1)
+312975
+"DATA",176.112,23322,0)
+4006067^SODIUM BICARBONATE 42MG/ML INJ
+"DATA",176.112,23322,1)
+312974
+"DATA",176.112,23323,0)
+4006066^SODIUM BICARBONATE 40MG/ML INJ
+"DATA",176.112,23323,1)
+312973
+"DATA",176.112,23324,0)
+4010582^SODIUM BICARBONATE 200MG/SODIUM CITRATE 470MG/ML SOLN,ORAL
+"DATA",176.112,23324,1)
+312972
+"DATA",176.112,23325,0)
+4004029^SODIUM BICARBONATE 0.46GM/TARTARIC ACID 0.42GM GRNL,EFFERVSC
+"DATA",176.112,23325,1)
+312971
+"DATA",176.112,23326,0)
+4001024^SODIUM ASCORBATE 250MG/ML INJ
+"DATA",176.112,23326,1)
+312969
+"DATA",176.112,23327,0)
+4001027^ASCORBIC ACID 250MG/ML INJ
+"DATA",176.112,23327,1)
+312969
+"DATA",176.112,23328,0)
+4007140^SODIUM AMINOSALICYLATE DIHYDRATE 500MG TAB
+"DATA",176.112,23328,1)
+312968
+"DATA",176.112,23329,0)
+4007141^SODIUM AMINOSALICYLATE DIHYDRATE 1GM TAB
+"DATA",176.112,23329,1)
+312967
+"DATA",176.112,23330,0)
+4006286^SODIUM ACETATE 5MEQ/ML INJ
+"DATA",176.112,23330,1)
+312966
+"DATA",176.112,23331,0)
+4006289^SODIUM ACETATE 4MEQ/ML (PF) INJ
+"DATA",176.112,23331,1)
+312965
+"DATA",176.112,23332,0)
+4006287^SODIUM ACETATE 4MEQ/ML INJ
+"DATA",176.112,23332,1)
+312965
+"DATA",176.112,23333,0)
+4001890^SINCALIDE 5MCG/ML INJ
+"DATA",176.112,23333,1)
+312963
+"DATA",176.112,23334,0)
+4015123^SIMVASTATIN 5MG TAB,UD
+"DATA",176.112,23334,1)
+312962
+"DATA",176.112,23335,0)
+4010150^SIMVASTATIN 5MG TAB
+"DATA",176.112,23335,1)
+312962
+"DATA",176.112,23336,0)
+4015124^SIMVASTATIN 20MG TAB,UD
+"DATA",176.112,23336,1)
+312961
+"DATA",176.112,23337,0)
+4010152^SIMVASTATIN 20MG TAB
+"DATA",176.112,23337,1)
+312961
+"DATA",176.112,23338,0)
+4008956^SIMETHICONE 95MG TAB
+"DATA",176.112,23338,1)
+312960
+"DATA",176.112,23339,0)
+4008955^SIMETHICONE 60MG TAB
+"DATA",176.112,23339,1)
+312959
+"DATA",176.112,23340,0)
+4008952^SIMETHICONE 40MG TAB,CHEW
+"DATA",176.112,23340,1)
+312958
+"DATA",176.112,23341,0)
+4014119^SIMETHICONE 166MG TAB,CHEW
+"DATA",176.112,23341,1)
+312957
+"DATA",176.112,23342,0)
+4008399^SILVER PROTEIN,MILD 20% SOLN,OPH
+"DATA",176.112,23342,1)
+312956
+"DATA",176.112,23343,0)
+4000959^SILVER NITRATE 50% SOLN,TOP
+"DATA",176.112,23343,1)
+312955
+"DATA",176.112,23344,0)
+4000958^SILVER NITRATE 25% SOLN,TOP
+"DATA",176.112,23344,1)
+312954
+"DATA",176.112,23345,0)
+4000962^SILVER NITRATE 0.5% SOLN,TOP
+"DATA",176.112,23345,1)
+312952
+"DATA",176.112,23346,0)
+4013188^SILDENAFIL CITRATE 50MG TAB
+"DATA",176.112,23346,1)
+312950
+"DATA",176.112,23347,0)
+4013177^SIBUTRAMINE HCL 5MG CAP
+"DATA",176.112,23347,1)
+312949
+"DATA",176.112,23348,0)
+4013179^SIBUTRAMINE HCL 15MG CAP
+"DATA",176.112,23348,1)
+312948
+"DATA",176.112,23349,0)
+4013178^SIBUTRAMINE HCL 10MG CAP
+"DATA",176.112,23349,1)
+312947
+"DATA",176.112,23350,0)
+4014963^SEVELAMER HCL 800MG TAB
+"DATA",176.112,23350,1)
+312944
+"DATA",176.112,23351,0)
+4027279^SEVELAMER CARBONATE 800MG TAB
+"DATA",176.112,23351,1)
+312944
+"DATA",176.112,23352,0)
+4013386^SEVELAMER HCL 403MG CAP
+"DATA",176.112,23352,1)
+312943
+"DATA",176.112,23353,0)
+4014964^SEVELAMER HCL 400MG TAB
+"DATA",176.112,23353,1)
+312942
+"DATA",176.112,23354,0)
+4014033^SERTRALINE HCL 50MG TAB,UD
+"DATA",176.112,23354,1)
+312941
+"DATA",176.112,23355,0)
+4010123^SERTRALINE HCL 50MG TAB
+"DATA",176.112,23355,1)
+312941
+"DATA",176.112,23356,0)
+4010125^SERTRALINE HCL 25MG TAB
+"DATA",176.112,23356,1)
+312940
+"DATA",176.112,23357,0)
+4014733^SERTRALINE HCL 100MG/5ML SOLN
+"DATA",176.112,23357,1)
+312939
+"DATA",176.112,23358,0)
+4014032^SERTRALINE HCL 100MG TAB,UD
+"DATA",176.112,23358,1)
+312938
+"DATA",176.112,23359,0)
+4010124^SERTRALINE HCL 100MG TAB
+"DATA",176.112,23359,1)
+312938
+"DATA",176.112,23360,0)
+4009265^SERMORELIN ACETATE 1MG/VIL INJ
+"DATA",176.112,23360,1)
+312937
+"DATA",176.112,23361,0)
+4009264^SERMORELIN ACETATE 0.5MG/VIL INJ
+"DATA",176.112,23361,1)
+312936
+"DATA",176.112,23362,0)
+4016297^SENNOSIDES 8.6MG TAB,UD
+"DATA",176.112,23362,1)
+312935
+"DATA",176.112,23363,0)
+4015174^SENNOSIDES 8.6MG TAB
+"DATA",176.112,23363,1)
+312935
+"DATA",176.112,23364,0)
+4008848^SENNA CONC 625MG SUPP,RTL
+"DATA",176.112,23364,1)
+312932
+"DATA",176.112,23365,0)
+4008853^SENNA CONC 374MG TAB
+"DATA",176.112,23365,1)
+312931
+"DATA",176.112,23366,0)
+4008852^SENNA CONC 326MG/5GM GRANULES
+"DATA",176.112,23366,1)
+312930
+"DATA",176.112,23367,0)
+4008849^SENNA CONC 187MG TAB
+"DATA",176.112,23367,1)
+312929
+"DATA",176.112,23368,0)
+4013992^SENNA CONC 187MG TAB,UD
+"DATA",176.112,23368,1)
+312929
+"DATA",176.112,23369,0)
+4008855^SENNA 165MG/5ML LIQUID
+"DATA",176.112,23369,1)
+312927
+"DATA",176.112,23370,0)
+4004170^SELENIUM SULFIDE 2.25% LOTION
+"DATA",176.112,23370,1)
+312923
+"DATA",176.112,23371,0)
+4004172^SELENIUM SULFIDE 1% LOTION
+"DATA",176.112,23371,1)
+312922
+"DATA",176.112,23372,0)
+4004168^SELENIUM 50MCG TAB
+"DATA",176.112,23372,1)
+312921
+"DATA",176.112,23373,0)
+4004171^SELENIUM 200MCG TAB
+"DATA",176.112,23373,1)
+312920
+"DATA",176.112,23374,0)
+4004173^SELENIUM 100MCG TAB
+"DATA",176.112,23374,1)
+312919
+"DATA",176.112,23375,0)
+4008995^SELEGILINE HCL 5MG TAB
+"DATA",176.112,23375,1)
+312918
+"DATA",176.112,23376,0)
+4015127^SELEGILINE HCL 5MG TAB,UD
+"DATA",176.112,23376,1)
+312918
+"DATA",176.112,23377,0)
+4000903^SECOBARBITAL NA 200MG SUPP,RTL
+"DATA",176.112,23377,1)
+312915
+"DATA",176.112,23378,0)
+4000904^SECOBARBITAL NA 100MG CAP
+"DATA",176.112,23378,1)
+312914
+"DATA",176.112,23379,0)
+4005529^SCOPOLAMINE HBR 0.5MG PELLET
+"DATA",176.112,23379,1)
+312911
+"DATA",176.112,23380,0)
+4005523^SCOPOLAMINE HBR 0.25% SOLN,OPH
+"DATA",176.112,23380,1)
+312910
+"DATA",176.112,23381,0)
+4013254^SCOPOLAMINE 0.33MG/24HRS PATCH
+"DATA",176.112,23381,1)
+312909
+"DATA",176.112,23382,0)
+4001158^SCARLET RED 5% OINT,TOP
+"DATA",176.112,23382,1)
+312908
+"DATA",176.112,23383,0)
+4001160^SCARLET RED 0.1% PWDR,TOP
+"DATA",176.112,23383,1)
+312906
+"DATA",176.112,23384,0)
+4009268^SARGRAMOSTIM 500MCG/VIL (PF) INJ
+"DATA",176.112,23384,1)
+312903
+"DATA",176.112,23385,0)
+4009270^SARGRAMOSTIM 500MCG/ML INJ
+"DATA",176.112,23385,1)
+312903
+"DATA",176.112,23386,0)
+4014152^SALSALATE 500MG TAB,UD
+"DATA",176.112,23386,1)
+312899
+"DATA",176.112,23387,0)
+4006693^SALSALATE 500MG TAB
+"DATA",176.112,23387,1)
+312899
+"DATA",176.112,23388,0)
+4006695^SALSALATE 500MG TAB,SA
+"DATA",176.112,23388,1)
+312898
+"DATA",176.112,23389,0)
+4012509^SALMETEROL XINAFOATE 21MCG/ACTUAT INHL,ORAL,13GM
+"DATA",176.112,23389,1)
+312897
+"DATA",176.112,23390,0)
+4012510^SALMETEROL XINAFOATE 21MCG/ACTUAT INHL,ORAL,6.5GM
+"DATA",176.112,23390,1)
+312897
+"DATA",176.112,23391,0)
+4005835^SALICYLIC ACID 60% CREAM,TOP
+"DATA",176.112,23391,1)
+312894
+"DATA",176.112,23392,0)
+4005833^SALICYLIC ACID 6% GEL,TOP
+"DATA",176.112,23392,1)
+312893
+"DATA",176.112,23393,0)
+4005839^SALICYLIC ACID 50% PLASTER,TOP
+"DATA",176.112,23393,1)
+312892
+"DATA",176.112,23394,0)
+4005861^SALICYLIC ACID 5% GEL,TOP
+"DATA",176.112,23394,1)
+312891
+"DATA",176.112,23395,0)
+4005856^SALICYLIC ACID 40% PLASTER
+"DATA",176.112,23395,1)
+312890
+"DATA",176.112,23396,0)
+4008716^SALICYLIC ACID 3%/SULFUR 10% BAR,TOP
+"DATA",176.112,23396,1)
+312889
+"DATA",176.112,23397,0)
+4014115^SALICYLIC ACID 3% OINT,TOP
+"DATA",176.112,23397,1)
+312888
+"DATA",176.112,23398,0)
+4005841^SALICYLIC ACID 26% LIQUID,TOP
+"DATA",176.112,23398,1)
+312887
+"DATA",176.112,23399,0)
+4005858^SALICYLIC ACID 24%/FLEXIBLE COLLODION SOLN,TOP
+"DATA",176.112,23399,1)
+312886
+"DATA",176.112,23400,0)
+4012109^SALICYLIC ACID 2%/ZN PYRITHIONE 1% SHAMPOO
+"DATA",176.112,23400,1)
+312885
+"DATA",176.112,23401,0)
+4008710^SALICYLIC ACID 2%/SULFUR 2% SOAP
+"DATA",176.112,23401,1)
+312884
+"DATA",176.112,23402,0)
+4008714^SALICYLIC ACID 2%/SULFUR 2% LIQUID,TOP
+"DATA",176.112,23402,1)
+312883
+"DATA",176.112,23403,0)
+4005860^SALICYLIC ACID 2% BAR,TOP
+"DATA",176.112,23403,1)
+312882
+"DATA",176.112,23404,0)
+4005857^SALICYLIC ACID 17%/FLEXIBLE COLLODION SOLN,TOP
+"DATA",176.112,23404,1)
+312881
+"DATA",176.112,23405,0)
+4005838^SALICYLIC ACID 17% SOLN,TOP
+"DATA",176.112,23405,1)
+312881
+"DATA",176.112,23406,0)
+4013591^SALICYLIC ACID 17% GEL,TOP
+"DATA",176.112,23406,1)
+312880
+"DATA",176.112,23407,0)
+4005843^SALICYLIC ACID 12.2% LIQUID,TOP
+"DATA",176.112,23407,1)
+312879
+"DATA",176.112,23408,0)
+4006413^SALICYLIC ACID 1%/NA THIOSULFATE 25% LOTION
+"DATA",176.112,23408,1)
+312877
+"DATA",176.112,23409,0)
+4008783^SALICYLAMIDE 667MG TAB
+"DATA",176.112,23409,1)
+312875
+"DATA",176.112,23410,0)
+4008784^SALICYLAMIDE 325MG TAB
+"DATA",176.112,23410,1)
+312874
+"DATA",176.112,23411,0)
+4013375^SACROSIDASE 8500 UNT/ML SOLN,ORAL
+"DATA",176.112,23411,1)
+312872
+"DATA",176.112,23412,0)
+4013874^ROSIGLITAZONE MALEATE 8MG TAB
+"DATA",176.112,23412,1)
+312861
+"DATA",176.112,23413,0)
+4013873^ROSIGLITAZONE MALEATE 4MG TAB
+"DATA",176.112,23413,1)
+312860
+"DATA",176.112,23414,0)
+4013872^ROSIGLITAZONE MALEATE 2MG TAB
+"DATA",176.112,23414,1)
+312859
+"DATA",176.112,23415,0)
+4008204^ROSE BENGAL 1% SOLN,OPH
+"DATA",176.112,23415,1)
+312853
+"DATA",176.112,23416,0)
+4013015^ROPIVACAINE HCL 1% INJ,VIL,10ML
+"DATA",176.112,23416,1)
+312852
+"DATA",176.112,23417,0)
+4013018^ROPIVACAINE HCL 1% INJ,AMP,20ML
+"DATA",176.112,23417,1)
+312852
+"DATA",176.112,23418,0)
+4013016^ROPIVACAINE HCL 1% INJ,VIL,20ML
+"DATA",176.112,23418,1)
+312852
+"DATA",176.112,23419,0)
+4013011^ROPIVACAINE HCL 0.75% INJ,VIL,10ML
+"DATA",176.112,23419,1)
+312851
+"DATA",176.112,23420,0)
+4013013^ROPIVACAINE HCL 0.75% INJ,AMP,20ML
+"DATA",176.112,23420,1)
+312851
+"DATA",176.112,23421,0)
+4013014^ROPIVACAINE HCL 0.75% INJ,VIL,20ML
+"DATA",176.112,23421,1)
+312851
+"DATA",176.112,23422,0)
+4013010^ROPIVACAINE HCL 0.5% INJ,AMP,30ML
+"DATA",176.112,23422,1)
+312850
+"DATA",176.112,23423,0)
+4013008^ROPIVACAINE HCL 0.5% INJ,VIL,30ML
+"DATA",176.112,23423,1)
+312850
+"DATA",176.112,23424,0)
+4013122^ROPINIROLE HCL 5MG TAB
+"DATA",176.112,23424,1)
+312849
+"DATA",176.112,23425,0)
+4013121^ROPINIROLE HCL 2MG TAB
+"DATA",176.112,23425,1)
+312847
+"DATA",176.112,23426,0)
+4013119^ROPINIROLE HCL 0.5MG TAB
+"DATA",176.112,23426,1)
+312846
+"DATA",176.112,23427,0)
+4013118^ROPINIROLE HCL 0.25MG TAB
+"DATA",176.112,23427,1)
+312845
+"DATA",176.112,23428,0)
+4014457^ROFECOXIB 50MG TAB,UD
+"DATA",176.112,23428,1)
+312844
+"DATA",176.112,23429,0)
+4014456^ROFECOXIB 50MG TAB
+"DATA",176.112,23429,1)
+312844
+"DATA",176.112,23430,0)
+4013826^ROFECOXIB 25MG/5ML SUSP,ORAL
+"DATA",176.112,23430,1)
+312843
+"DATA",176.112,23431,0)
+4013825^ROFECOXIB 12.5MG/5ML SUSP,ORAL
+"DATA",176.112,23431,1)
+312842
+"DATA",176.112,23432,0)
+4013822^ROFECOXIB 12.5MG TAB,UD
+"DATA",176.112,23432,1)
+312841
+"DATA",176.112,23433,0)
+4013819^ROFECOXIB 12.5MG TAB
+"DATA",176.112,23433,1)
+312841
+"DATA",176.112,23434,0)
+4017333^RIZATRIPTAN BENZOATE 5MG TAB,PKG,9
+"DATA",176.112,23434,1)
+312840
+"DATA",176.112,23435,0)
+4013271^RIZATRIPTAN BENZOATE 5MG TAB,PKG,6
+"DATA",176.112,23435,1)
+312840
+"DATA",176.112,23436,0)
+4013270^RIZATRIPTAN BENZOATE 5MG TAB
+"DATA",176.112,23436,1)
+312840
+"DATA",176.112,23437,0)
+4026470^RIZATRIPTAN BENZOATE 5MG TAB,PKG,12
+"DATA",176.112,23437,1)
+312840
+"DATA",176.112,23438,0)
+4013274^RIZATRIPTAN BENZOATE 5MG TAB,ORALLY DISINTEGRATING,PKG,6
+"DATA",176.112,23438,1)
+312839
+"DATA",176.112,23439,0)
+4017335^RIZATRIPTAN BENZOATE 5MG TAB,ORALLY DISINTEGRATING,PKG,9
+"DATA",176.112,23439,1)
+312839
+"DATA",176.112,23440,0)
+4026471^RIZATRIPTAN BENZOATE 5MG TAB,ORALLY DISINTEGRATING,PKG,12
+"DATA",176.112,23440,1)
+312839
+"DATA",176.112,23441,0)
+4015527^RIZATRIPTAN BENZOATE 5MG TAB,ORALLY DISINTEGRATING,PKG,3
+"DATA",176.112,23441,1)
+312839
+"DATA",176.112,23442,0)
+4026472^RIZATRIPTAN BENZOATE 10MG TAB,ORALLY DISINTEGRATING,PKG,12
+"DATA",176.112,23442,1)
+312837
+"DATA",176.112,23443,0)
+4013275^RIZATRIPTAN BENZOATE 10MG TAB,ORALLY DISINTEGRATING,PKG,6
+"DATA",176.112,23443,1)
+312837
+"DATA",176.112,23444,0)
+4015526^RIZATRIPTAN BENZOATE 10MG,ORALLY DISINTEGRATING,PKG,3
+"DATA",176.112,23444,1)
+312837
+"DATA",176.112,23445,0)
+4017334^RIZATRIPTAN BENZOATE 10MG TAB,ORALLY DISINTEGRATING,PKG,9
+"DATA",176.112,23445,1)
+312837
+"DATA",176.112,23446,0)
+4014765^RIVASTIGMINE TARTRATE 6MG CAP
+"DATA",176.112,23446,1)
+312836
+"DATA",176.112,23447,0)
+4014766^RIVASTIGMINE TARTRATE 6MG CAP,UD
+"DATA",176.112,23447,1)
+312836
+"DATA",176.112,23448,0)
+4014762^RIVASTIGMINE TARTRATE 3MG CAP,UD
+"DATA",176.112,23448,1)
+312835
+"DATA",176.112,23449,0)
+4014761^RIVASTIGMINE TARTRATE 3MG CAP
+"DATA",176.112,23449,1)
+312835
+"DATA",176.112,23450,0)
+4015386^RIVASTIGMINE TARTRATE 2MG/ML SOLN,ORAL
+"DATA",176.112,23450,1)
+312834
+"DATA",176.112,23451,0)
+4005667^RITODRINE HCL 10MG TAB
+"DATA",176.112,23451,1)
+312833
+"DATA",176.112,23452,0)
+4012172^RISPERIDONE 3MG TAB
+"DATA",176.112,23452,1)
+312832
+"DATA",176.112,23453,0)
+4014029^RISPERIDONE 3MG TAB,UD
+"DATA",176.112,23453,1)
+312832
+"DATA",176.112,23454,0)
+4012171^RISPERIDONE 2MG TAB
+"DATA",176.112,23454,1)
+312831
+"DATA",176.112,23455,0)
+4013973^RISPERIDONE 2MG TAB,UD
+"DATA",176.112,23455,1)
+312831
+"DATA",176.112,23456,0)
+4012170^RISPERIDONE 1MG TAB
+"DATA",176.112,23456,1)
+312830
+"DATA",176.112,23457,0)
+4014030^RISPERIDONE 1MG TAB,UD
+"DATA",176.112,23457,1)
+312830
+"DATA",176.112,23458,0)
+4014022^RISPERIDONE 0.5MG TAB
+"DATA",176.112,23458,1)
+312829
+"DATA",176.112,23459,0)
+4014021^RISPERIDONE 0.25MG TAB
+"DATA",176.112,23459,1)
+312828
+"DATA",176.112,23460,0)
+4012145^RIMANTADINE HCL 100MG TAB
+"DATA",176.112,23460,1)
+312822
+"DATA",176.112,23461,0)
+4005656^RIFAMPIN 600MG/VIL INJ
+"DATA",176.112,23461,1)
+312821
+"DATA",176.112,23462,0)
+4008250^RIBOFLAVIN PO4 SODIUM 50MG/ML INJ
+"DATA",176.112,23462,1)
+312819
+"DATA",176.112,23463,0)
+4008300^RIBAVIRIN 6GM/VIL INHL
+"DATA",176.112,23463,1)
+312818
+"DATA",176.112,23464,0)
+4014055^RIBAVIRIN 200MG CAP
+"DATA",176.112,23464,1)
+312817
+"DATA",176.112,23465,0)
+4005136^RHO (D) IMMUNE GLOBULIN,HUMAN 300MCG/VIL INJ
+"DATA",176.112,23465,1)
+312814
+"DATA",176.112,23466,0)
+4005139^RHO (D) IMMUNE GLOBULIN,HUMAN 15% INJ
+"DATA",176.112,23466,1)
+312811
+"DATA",176.112,23467,0)
+4005137^RHO (D) IMMUNE GLOBULIN,HUMAN 11.5% INJ
+"DATA",176.112,23467,1)
+312810
+"DATA",176.112,23468,0)
+4010229^RESORCINOL 2%/SULFUR 8% CREAM,TOP
+"DATA",176.112,23468,1)
+312793
+"DATA",176.112,23469,0)
+4005700^RESCINNAMINE 0.5MG TAB
+"DATA",176.112,23469,1)
+312792
+"DATA",176.112,23470,0)
+4005699^RESCINNAMINE 0.25MG TAB
+"DATA",176.112,23470,1)
+312791
+"DATA",176.112,23471,0)
+4001939^RAUWOLFIA SERPENTINA 50MG TAB,EC
+"DATA",176.112,23471,1)
+312776
+"DATA",176.112,23472,0)
+4001940^RAUWOLFIA SERPENTINA 100MG TAB,EC
+"DATA",176.112,23472,1)
+312775
+"DATA",176.112,23473,0)
+4014108^RANITIDINE HCL 75MG TAB
+"DATA",176.112,23473,1)
+312773
+"DATA",176.112,23474,0)
+4007039^RANITIDINE HCL 25MG/ML INJ
+"DATA",176.112,23474,1)
+312772
+"DATA",176.112,23475,0)
+4010307^RANITIDINE HCL 1MG/ML/NACL 0.45% INJ
+"DATA",176.112,23475,1)
+312771
+"DATA",176.112,23476,0)
+4007045^RANITIDINE HCL 150MG TAB,EFFERVSC
+"DATA",176.112,23476,1)
+312770
+"DATA",176.112,23477,0)
+4007046^RANITIDINE HCL 150MG GRANULES,EFFERVSC
+"DATA",176.112,23477,1)
+312770
+"DATA",176.112,23478,0)
+4007042^RANITIDINE HCL 0.5MG/ML/NACL 0.45% INJ
+"DATA",176.112,23478,1)
+312769
+"DATA",176.112,23479,0)
+4013163^RALOXIFENE HCL 60MG TAB
+"DATA",176.112,23479,1)
+312768
+"DATA",176.112,23480,0)
+4003356^RABIES VACCINE 2.5UNT/VIL INJ
+"DATA",176.112,23480,1)
+312767
+"DATA",176.112,23481,0)
+4006995^RABIES IMMUNE GLOBULIN,HUMAN 150UNT/ML INJ
+"DATA",176.112,23481,1)
+312766
+"DATA",176.112,23482,0)
+4014188^RABEPRAZOLE NA 20MG TAB,EC
+"DATA",176.112,23482,1)
+312765
+"DATA",176.112,23483,0)
+4014189^RABEPRAZOLE NA 20MG TAB,EC,UD
+"DATA",176.112,23483,1)
+312765
+"DATA",176.112,23484,0)
+4005660^QUININE SO4 300MG CAP
+"DATA",176.112,23484,1)
+312764
+"DATA",176.112,23485,0)
+4005665^QUININE SO4 162.5MG TAB
+"DATA",176.112,23485,1)
+312763
+"DATA",176.112,23486,0)
+4005662^QUININE SO4 130MG TAB
+"DATA",176.112,23486,1)
+312762
+"DATA",176.112,23487,0)
+4000687^QUINIDINE SO4 325MG CAP
+"DATA",176.112,23487,1)
+312761
+"DATA",176.112,23488,0)
+4000676^QUINIDINE GLUCONATE 324MG TAB,SA
+"DATA",176.112,23488,1)
+312760
+"DATA",176.112,23489,0)
+4000685^QUINIDINE SO4 324MG TAB,SA
+"DATA",176.112,23489,1)
+312760
+"DATA",176.112,23490,0)
+4000684^QUINIDINE SO4 300MG TAB,SA
+"DATA",176.112,23490,1)
+312759
+"DATA",176.112,23491,0)
+4000678^QUINIDINE SO4 300MG CAP
+"DATA",176.112,23491,1)
+312758
+"DATA",176.112,23492,0)
+4013970^QUINIDINE SO4 200MG TAB,UD
+"DATA",176.112,23492,1)
+312757
+"DATA",176.112,23493,0)
+4000674^QUINIDINE SO4 200MG TAB
+"DATA",176.112,23493,1)
+312757
+"DATA",176.112,23494,0)
+4000677^QUINIDINE SO4 200MG CAP
+"DATA",176.112,23494,1)
+312756
+"DATA",176.112,23495,0)
+4000686^QUINIDINE SO4 195MG CAP
+"DATA",176.112,23495,1)
+312755
+"DATA",176.112,23496,0)
+4000681^QUINIDINE POLYGALACTURONATE 275MG TAB
+"DATA",176.112,23496,1)
+312754
+"DATA",176.112,23497,0)
+4000682^QUINIDINE GLUCONATE 330MG TAB,SA
+"DATA",176.112,23497,1)
+312753
+"DATA",176.112,23498,0)
+4002727^QUINETHAZONE 50MG TAB
+"DATA",176.112,23498,1)
+312752
+"DATA",176.112,23499,0)
+4007706^QUINESTROL 100MCG TAB
+"DATA",176.112,23499,1)
+312751
+"DATA",176.112,23500,0)
+4010097^QUINAPRIL HCL 5MG TAB
+"DATA",176.112,23500,1)
+312750
+"DATA",176.112,23501,0)
+4010099^QUINAPRIL HCL 20MG TAB
+"DATA",176.112,23501,1)
+312749
+"DATA",176.112,23502,0)
+4010098^QUINAPRIL HCL 10MG TAB
+"DATA",176.112,23502,1)
+312748
+"DATA",176.112,23503,0)
+4004194^QUINACRINE HCL 100MG TAB
+"DATA",176.112,23503,1)
+312747
+"DATA",176.112,23504,0)
+4015276^QUETIAPINE FUMARATE 300MG TAB
+"DATA",176.112,23504,1)
+312745
+"DATA",176.112,23505,0)
+4014493^QUETIAPINE FUMARATE 25MG TAB,UD
+"DATA",176.112,23505,1)
+312744
+"DATA",176.112,23506,0)
+4013115^QUETIAPINE FUMARATE 25MG TAB
+"DATA",176.112,23506,1)
+312744
+"DATA",176.112,23507,0)
+4014494^QUETIAPINE FUMARATE 100MG TAB,UD
+"DATA",176.112,23507,1)
+312743
+"DATA",176.112,23508,0)
+4013116^QUETIAPINE FUMARATE 100MG TAB
+"DATA",176.112,23508,1)
+312743
+"DATA",176.112,23509,0)
+4007859^PYROGALLOL 25% OINT,TOP
+"DATA",176.112,23509,1)
+312741
+"DATA",176.112,23510,0)
+4006890^PYRILAMINE MALEATE 25MG TAB
+"DATA",176.112,23510,1)
+312740
+"DATA",176.112,23511,0)
+4001149^PYRIDOXINE HCL 150MG CAP
+"DATA",176.112,23511,1)
+312738
+"DATA",176.112,23512,0)
+4006982^PYRIDOXINE HCL 100MG/THIAMINE 100MG/ML INJ
+"DATA",176.112,23512,1)
+312737
+"DATA",176.112,23513,0)
+4001147^PYRIDOXINE HCL 100MG/ML INJ
+"DATA",176.112,23513,1)
+312736
+"DATA",176.112,23514,0)
+4002167^PYRIDOSTIGMINE BR 60MG TAB
+"DATA",176.112,23514,1)
+312734
+"DATA",176.112,23515,0)
+4007803^PYRANTEL PAMOATE 250MG/5ML SUSP
+"DATA",176.112,23515,1)
+312733
+"DATA",176.112,23516,0)
+4012132^PSYLLIUM 3.25GM/SENNA 0.74GM/5GM PWDR,ORAL
+"DATA",176.112,23516,1)
+312719
+"DATA",176.112,23517,0)
+4009537^PSYLLIUM 2.5GM/SUCROSE 2.4GM/5GM GRANULES
+"DATA",176.112,23517,1)
+312718
+"DATA",176.112,23518,0)
+4005159^PSEUDOEPHEDRINE HCL 60MG/TRIPROLIDINE HCL 2.5MG TAB
+"DATA",176.112,23518,1)
+312717
+"DATA",176.112,23519,0)
+4005164^PSEUDOEPHEDRINE 60MG/TRIPROLIDINE 2.5MG TAB
+"DATA",176.112,23519,1)
+312717
+"DATA",176.112,23520,0)
+4005161^PSEUDOEPHEDRINE HCL 60MG/TRIPROLIDINE HCL 2.5MG CAP
+"DATA",176.112,23520,1)
+312716
+"DATA",176.112,23521,0)
+4005174^PSEUDOEPHEDRINE HCL 60MG CAP,SA
+"DATA",176.112,23521,1)
+312715
+"DATA",176.112,23522,0)
+4005160^PSEUDOEPHEDRINE HCL 30MG/TRIPROLIDINE HCL 1.25MG TAB
+"DATA",176.112,23522,1)
+312714
+"DATA",176.112,23523,0)
+4005180^PSEUDOEPHEDRINE HCL 240MG TAB,SA
+"DATA",176.112,23523,1)
+312712
+"DATA",176.112,23524,0)
+4005162^PSEUDOEPHEDRINE HCL 120MG/TRIPROLIDINE HCL 5MG CAP,SA
+"DATA",176.112,23524,1)
+312710
+"DATA",176.112,23525,0)
+4005173^PSEUDOEPHEDRINE HCL 120MG CAP,SA
+"DATA",176.112,23525,1)
+312709
+"DATA",176.112,23526,0)
+4004908^PROTIRELIN 0.5MG/ML INJ
+"DATA",176.112,23526,1)
+312706
+"DATA",176.112,23527,0)
+4005724^PROTEOLYTIC ENZYME 10000UNT TAB
+"DATA",176.112,23527,1)
+312701
+"DATA",176.112,23528,0)
+4008257^PROPYLIODONE 60% SUSP
+"DATA",176.112,23528,1)
+312694
+"DATA",176.112,23529,0)
+4007529^PROPYLENE GLYCOL 10%/SODIUM CHLORIDE 3% SOLN,ORAL
+"DATA",176.112,23529,1)
+312692
+"DATA",176.112,23530,0)
+4002378^PROPRANOLOL HCL 90MG TAB
+"DATA",176.112,23530,1)
+312691
+"DATA",176.112,23531,0)
+4002383^PROPRANOLOL HCL 80MG TAB,SA
+"DATA",176.112,23531,1)
+312690
+"DATA",176.112,23532,0)
+4002379^PROPRANOLOL HCL 80MG CAP,SA
+"DATA",176.112,23532,1)
+312689
+"DATA",176.112,23533,0)
+4002384^PROPRANOLOL HCL 60MG CAP,SA
+"DATA",176.112,23533,1)
+312688
+"DATA",176.112,23534,0)
+4002387^PROPRANOLOL HCL 40MG/5ML SOLN,ORAL
+"DATA",176.112,23534,1)
+312687
+"DATA",176.112,23535,0)
+4014341^PROPRANOLOL HCL 40MG TAB,UD
+"DATA",176.112,23535,1)
+312686
+"DATA",176.112,23536,0)
+4002375^PROPRANOLOL HCL 40MG TAB
+"DATA",176.112,23536,1)
+312686
+"DATA",176.112,23537,0)
+4002386^PROPRANOLOL HCL 20MG/5ML SOLN,ORAL
+"DATA",176.112,23537,1)
+312685
+"DATA",176.112,23538,0)
+4002381^PROPRANOLOL HCL 160MG CAP,SA
+"DATA",176.112,23538,1)
+312684
+"DATA",176.112,23539,0)
+4002380^PROPRANOLOL HCL 120MG CAP,SA
+"DATA",176.112,23539,1)
+312683
+"DATA",176.112,23540,0)
+4008472^PROPOXYPHENE N 100MG/ASPIRIN 325MG TAB
+"DATA",176.112,23540,1)
+312682
+"DATA",176.112,23541,0)
+4002363^PROPOXYPHENE N 100MG/ACETAMINOPHEN 650MG CAP
+"DATA",176.112,23541,1)
+312681
+"DATA",176.112,23542,0)
+4008471^PROPOXYPHENE HCL 65MG/ASPIRIN 325MG CAP
+"DATA",176.112,23542,1)
+312680
+"DATA",176.112,23543,0)
+4001289^PROPOXYPHENE HCL 65MG/ASA 389MG/CAFN 32MG TAB
+"DATA",176.112,23543,1)
+312679
+"DATA",176.112,23544,0)
+4002361^PROPOXYPHENE HCL 65MG/ACETAMINOPHEN 325MG CAP
+"DATA",176.112,23544,1)
+312678
+"DATA",176.112,23545,0)
+4001207^PROPOXYPHENE HCL 65MG CAP
+"DATA",176.112,23545,1)
+312677
+"DATA",176.112,23546,0)
+4015494^PROPOXYPHENE HCL 65MG CAP,UD
+"DATA",176.112,23546,1)
+312677
+"DATA",176.112,23547,0)
+4001286^PROPOXYPHENE HCL 32MG/ASA 389MG/CAFN 32MG CAP
+"DATA",176.112,23547,1)
+312676
+"DATA",176.112,23548,0)
+4001208^PROPOXYPHENE HCL 32MG CAP
+"DATA",176.112,23548,1)
+312675
+"DATA",176.112,23549,0)
+4009068^PROPOFOL 10MG/ML INJ,EMULSION
+"DATA",176.112,23549,1)
+312674
+"DATA",176.112,23550,0)
+4003616^PROPANTHELINE BR 7.5MG TAB
+"DATA",176.112,23550,1)
+312673
+"DATA",176.112,23551,0)
+4009022^PROPAFENONE HCL 300MG TAB
+"DATA",176.112,23551,1)
+312672
+"DATA",176.112,23552,0)
+4015267^PROPAFENONE HCL 300MG TAB,UD
+"DATA",176.112,23552,1)
+312672
+"DATA",176.112,23553,0)
+4003317^PROMETHAZINE HCL 6.25MG/PSEUDOEPHEDRINE HCL 60MG TAB
+"DATA",176.112,23553,1)
+312668
+"DATA",176.112,23554,0)
+4002495^PROMETHAZINE HCL 50MG/ML INJ
+"DATA",176.112,23554,1)
+312667
+"DATA",176.112,23555,0)
+4002497^PROMETHAZINE HBR 50MG/ML INJ
+"DATA",176.112,23555,1)
+312667
+"DATA",176.112,23556,0)
+4002490^PROMETHAZINE HCL 25MG/ML INJ
+"DATA",176.112,23556,1)
+312666
+"DATA",176.112,23557,0)
+4013969^PROMETHAZINE HCL 25MG TAB,UD
+"DATA",176.112,23557,1)
+312664
+"DATA",176.112,23558,0)
+4002489^PROMETHAZINE HCL 25MG TAB
+"DATA",176.112,23558,1)
+312664
+"DATA",176.112,23559,0)
+4002491^PROMETHAZINE HCL 25MG SUPP,RTL
+"DATA",176.112,23559,1)
+312663
+"DATA",176.112,23560,0)
+4002496^PROMETHAZINE HCL 12.5MG SUPP,RTL
+"DATA",176.112,23560,1)
+312661
+"DATA",176.112,23561,0)
+4003161^PROMAZINE HCL 50MG/ML INJ
+"DATA",176.112,23561,1)
+312656
+"DATA",176.112,23562,0)
+4003159^PROMAZINE HCL 50MG TAB,EC
+"DATA",176.112,23562,1)
+312655
+"DATA",176.112,23563,0)
+4003167^PROMAZINE HCL 50MG TAB
+"DATA",176.112,23563,1)
+312654
+"DATA",176.112,23564,0)
+4003165^PROMAZINE HCL 30MG/ML CONC,ORAL
+"DATA",176.112,23564,1)
+312653
+"DATA",176.112,23565,0)
+4003166^PROMAZINE HCL 25MG/ML INJ
+"DATA",176.112,23565,1)
+312652
+"DATA",176.112,23566,0)
+4003160^PROMAZINE HCL 25MG TAB,EC
+"DATA",176.112,23566,1)
+312651
+"DATA",176.112,23567,0)
+4003169^PROMAZINE HCL 25MG TAB
+"DATA",176.112,23567,1)
+312650
+"DATA",176.112,23568,0)
+4003163^PROMAZINE HCL 10MG TAB,EC
+"DATA",176.112,23568,1)
+312648
+"DATA",176.112,23569,0)
+4003168^PROMAZINE HCL 10MG TAB
+"DATA",176.112,23569,1)
+312647
+"DATA",176.112,23570,0)
+4003162^PROMAZINE HCL 100MG TAB,EC
+"DATA",176.112,23570,1)
+312646
+"DATA",176.112,23571,0)
+4000917^PROGESTERONE 8% (90MG) GEL,VAG,APPLICATOR
+"DATA",176.112,23571,1)
+312645
+"DATA",176.112,23572,0)
+4000915^PROGESTERONE 50MG/ML INJ,SOLN
+"DATA",176.112,23572,1)
+312644
+"DATA",176.112,23573,0)
+4000910^PROGESTERONE 50MG/ML INJ,SUSP
+"DATA",176.112,23573,1)
+312644
+"DATA",176.112,23574,0)
+4000909^PROGESTERONE 50MG/ML INJ,SOLN,SA
+"DATA",176.112,23574,1)
+312644
+"DATA",176.112,23575,0)
+4000912^PROGESTERONE 50MG/ML INJ,REPOSITORY
+"DATA",176.112,23575,1)
+312644
+"DATA",176.112,23576,0)
+4000908^PROGESTERONE 50MG/ML INJ
+"DATA",176.112,23576,1)
+312644
+"DATA",176.112,23577,0)
+4000907^PROGESTERONE 50MG/ML (IN OIL) INJ,SOLN
+"DATA",176.112,23577,1)
+312644
+"DATA",176.112,23578,0)
+4000913^PROGESTERONE 50MG/ML INJ (IN OIL)
+"DATA",176.112,23578,1)
+312644
+"DATA",176.112,23579,0)
+4014113^PROGESTERONE 4% GEL,VAG,APPLICATOR
+"DATA",176.112,23579,1)
+312643
+"DATA",176.112,23580,0)
+4014575^PROGESTERONE 200MG CAP
+"DATA",176.112,23580,1)
+312641
+"DATA",176.112,23581,0)
+4003089^PROCHLORPERAZINE MALEATE 30MG CAP,SA
+"DATA",176.112,23581,1)
+312638
+"DATA",176.112,23582,0)
+4003088^PROCHLORPERAZINE MALEATE 15MG CAP,SA
+"DATA",176.112,23582,1)
+312637
+"DATA",176.112,23583,0)
+4003094^PROCHLORPERAZINE MALEATE 5MG TAB
+"DATA",176.112,23583,1)
+312635
+"DATA",176.112,23584,0)
+4015132^PROCHLORPERAZINE 5MG TAB,UD
+"DATA",176.112,23584,1)
+312635
+"DATA",176.112,23585,0)
+4003097^PROCHLORPERAZINE 5MG TAB
+"DATA",176.112,23585,1)
+312635
+"DATA",176.112,23586,0)
+4003100^PROCHLORPERAZINE 10MG SUPP,RTL
+"DATA",176.112,23586,1)
+312634
+"DATA",176.112,23587,0)
+4004310^PROCAINE HCL 250MG CAP
+"DATA",176.112,23587,1)
+312633
+"DATA",176.112,23588,0)
+4004312^PROCAINE HCL 1.25% INJ
+"DATA",176.112,23588,1)
+312632
+"DATA",176.112,23589,0)
+4001729^PROCAINAMIDE HCL 750MG TAB,SA
+"DATA",176.112,23589,1)
+312631
+"DATA",176.112,23590,0)
+4001731^PROCAINAMIDE HCL 500MG CAP,SA
+"DATA",176.112,23590,1)
+312630
+"DATA",176.112,23591,0)
+4001721^PROCAINAMIDE HCL 500MG TAB
+"DATA",176.112,23591,1)
+312629
+"DATA",176.112,23592,0)
+4004991^PRIMIDONE 250MG/5ML SUSP,ORAL
+"DATA",176.112,23592,1)
+312627
+"DATA",176.112,23593,0)
+4007104^PRILOCAINE HCL 4%/EPINEPHRINE 1:200000 INJ
+"DATA",176.112,23593,1)
+312626
+"DATA",176.112,23594,0)
+4002614^PREDNISONE 5MG TAB
+"DATA",176.112,23594,1)
+312617
+"DATA",176.112,23595,0)
+4013968^PREDNISONE 5MG TAB,UD
+"DATA",176.112,23595,1)
+312617
+"DATA",176.112,23596,0)
+4002622^PREDNISONE 25MG TAB
+"DATA",176.112,23596,1)
+312616
+"DATA",176.112,23597,0)
+4002616^PREDNISONE 20MG TAB
+"DATA",176.112,23597,1)
+312615
+"DATA",176.112,23598,0)
+4015125^PREDNISONE 20MG TAB,UD
+"DATA",176.112,23598,1)
+312615
+"DATA",176.112,23599,0)
+4017255^PREDNISOLONE NA PHOSPHATE 6.7MG/5ML SOLN,ORAL
+"DATA",176.112,23599,1)
+312614
+"DATA",176.112,23600,0)
+4003041^PREDNISOLONE NA PHOSPHATE 5MG/5ML LIQUID,ORAL
+"DATA",176.112,23600,1)
+312614
+"DATA",176.112,23601,0)
+4004092^PREDNISOLONE NA PHOSPHATE 0.5%/SULFACETAMIDE NA 10% SOLN,OPH
+"DATA",176.112,23601,1)
+312612
+"DATA",176.112,23602,0)
+4004097^PREDNISOLONE ACETATE 0.5%/SULFACETAMIDE NA 10% SOLN,OPH
+"DATA",176.112,23602,1)
+312612
+"DATA",176.112,23603,0)
+4003038^PREDNISOLONE NA PHOSPHATE 0.5% SOLN,OPH
+"DATA",176.112,23603,1)
+312611
+"DATA",176.112,23604,0)
+4003037^PREDNISOLONE ACETATE 0.125% SUSP,OPH
+"DATA",176.112,23604,1)
+312610
+"DATA",176.112,23605,0)
+4003042^PREDNISOLONE ACETATE 100MG/ML INJ,SUSP
+"DATA",176.112,23605,1)
+312609
+"DATA",176.112,23606,0)
+4004093^PREDNISOLONE ACETATE 0.5%/SULFACETAMIDE NA 10% SUSP,OPH
+"DATA",176.112,23606,1)
+312608
+"DATA",176.112,23607,0)
+4004094^PREDNISOLONE ACETATE 0.5%/SULFACETAMIDE NA 10% OINT,OPH
+"DATA",176.112,23607,1)
+312607
+"DATA",176.112,23608,0)
+4004091^PREDNISOLONE ACETATE 0.25%/SULFACETAMIDE NA 10% SUSP,OPH
+"DATA",176.112,23608,1)
+312606
+"DATA",176.112,23609,0)
+4004090^PREDNISOLONE ACETATE 0.25%/SULFACETAMIDE NA 10% OINT,OPH
+"DATA",176.112,23609,1)
+312605
+"DATA",176.112,23610,0)
+4003046^PREDNISOLONE ACETATE 0.25% SUSP,OPH
+"DATA",176.112,23610,1)
+312604
+"DATA",176.112,23611,0)
+4004095^PREDNISOLONE ACETATE 0.2%/SULFACETAMIDE NA 20% SUSP,OPH
+"DATA",176.112,23611,1)
+312603
+"DATA",176.112,23612,0)
+4004088^PREDNISOLONE ACETATE 0.2%/SULFACETAMIDE NA 10% SUSP,OPH
+"DATA",176.112,23612,1)
+312602
+"DATA",176.112,23613,0)
+4004098^PREDNISOLONE ACETATE 0.2%/SULFACETAMIDE NA 10% SOLN,OPH
+"DATA",176.112,23613,1)
+312601
+"DATA",176.112,23614,0)
+4004089^PREDNISOLONE ACETATE 0.2%/SULFACETAMIDE NA 10% OINT,OPH
+"DATA",176.112,23614,1)
+312600
+"DATA",176.112,23615,0)
+4006862^PRAZOSIN HCL 2MG CAP
+"DATA",176.112,23615,1)
+312594
+"DATA",176.112,23616,0)
+4014813^PRAZOSIN HCL 2MG CAP,UD
+"DATA",176.112,23616,1)
+312594
+"DATA",176.112,23617,0)
+4006861^PRAZOSIN HCL 1MG CAP
+"DATA",176.112,23617,1)
+312593
+"DATA",176.112,23618,0)
+4013967^PRAZOSIN HCL 1MG CAP,UD
+"DATA",176.112,23618,1)
+312593
+"DATA",176.112,23619,0)
+4005721^PRAZEPAM 5MG CAP
+"DATA",176.112,23619,1)
+312592
+"DATA",176.112,23620,0)
+4005723^PRAZEPAM 20MG CAP
+"DATA",176.112,23620,1)
+312591
+"DATA",176.112,23621,0)
+4005720^PRAZEPAM 10MG TAB
+"DATA",176.112,23621,1)
+312590
+"DATA",176.112,23622,0)
+4005722^PRAZEPAM 10MG CAP
+"DATA",176.112,23622,1)
+312589
+"DATA",176.112,23623,0)
+4010091^PRAVASTATIN NA 40MG TAB
+"DATA",176.112,23623,1)
+312588
+"DATA",176.112,23624,0)
+4027226^PRAVASTATIN NA 40MG TAB,UD
+"DATA",176.112,23624,1)
+312588
+"DATA",176.112,23625,0)
+4010090^PRAVASTATIN NA 20MG TAB
+"DATA",176.112,23625,1)
+312587
+"DATA",176.112,23626,0)
+4025053^PRAVASTATIN NA 20MG TAB,UD
+"DATA",176.112,23626,1)
+312587
+"DATA",176.112,23627,0)
+4010089^PRAVASTATIN NA 10MG TAB
+"DATA",176.112,23627,1)
+312586
+"DATA",176.112,23628,0)
+4013224^PRAMOXINE HCL 1%/ZINC OXIDE 12.5% OINT,RTL
+"DATA",176.112,23628,1)
+312585
+"DATA",176.112,23629,0)
+4009135^PRAMOXINE HCL 1% AEROSOL,RTL
+"DATA",176.112,23629,1)
+312582
+"DATA",176.112,23630,0)
+4013094^PRAMIPEXOLE DIHYDROCHLORIDE 0.5MG TAB
+"DATA",176.112,23630,1)
+312580
+"DATA",176.112,23631,0)
+4013730^PRAMIPEXOLE DIHYDROCHLORIDE 0.5MG TAB,UD
+"DATA",176.112,23631,1)
+312580
+"DATA",176.112,23632,0)
+4004987^PRALIDOXIME CL 500MG TAB
+"DATA",176.112,23632,1)
+312578
+"DATA",176.112,23633,0)
+4004986^PRALIDOXIME CL 1GM/20ML INJ
+"DATA",176.112,23633,1)
+312576
+"DATA",176.112,23634,0)
+4008178^POVIDONE IODINE 5% SOLN,TOP
+"DATA",176.112,23634,1)
+312571
+"DATA",176.112,23635,0)
+4008199^POVIDONE IODINE 5% SOLN,OPH
+"DATA",176.112,23635,1)
+312570
+"DATA",176.112,23636,0)
+4008175^POVIDONE IODINE 10% SOLN,TOP
+"DATA",176.112,23636,1)
+312564
+"DATA",176.112,23637,0)
+4014057^POVIDONE IODINE 10% OINT,0.9GM,UD
+"DATA",176.112,23637,1)
+312563
+"DATA",176.112,23638,0)
+4008177^POVIDONE IODINE 10% OINT,TOP
+"DATA",176.112,23638,1)
+312563
+"DATA",176.112,23639,0)
+4008171^POVIDONE IODINE 10% GEL,TOP
+"DATA",176.112,23639,1)
+312562
+"DATA",176.112,23640,0)
+4008180^POVIDONE IODINE 10% DOUCHE
+"DATA",176.112,23640,1)
+312561
+"DATA",176.112,23641,0)
+4008181^POVIDONE IODINE 0.75% SOLN,TOP
+"DATA",176.112,23641,1)
+312557
+"DATA",176.112,23642,0)
+4008179^POVIDONE IODINE 0.3% DOUCHE,VAG
+"DATA",176.112,23642,1)
+312556
+"DATA",176.112,23643,0)
+4008192^POVIDONE IODINE 0.23% DOUCHE
+"DATA",176.112,23643,1)
+312555
+"DATA",176.112,23644,0)
+4009590^POTASSIUM,CHELATED 99MG TAB
+"DATA",176.112,23644,1)
+312554
+"DATA",176.112,23645,0)
+4006188^POTASSIUM PHOSPHATE 500MG TAB
+"DATA",176.112,23645,1)
+312553
+"DATA",176.112,23646,0)
+4006923^POTASSIUM PHOSPHATE 155MG/SODIUM PHOSPHATE 350MG TAB
+"DATA",176.112,23646,1)
+312551
+"DATA",176.112,23647,0)
+4006190^POTASSIUM PHOSPHATE 1.45GM CAP FOR SOLN
+"DATA",176.112,23647,1)
+312550
+"DATA",176.112,23648,0)
+4007586^POTASSIUM PARA-AMINOBENZOATE 2GM/PKG PWDR,ORAL
+"DATA",176.112,23648,1)
+312548
+"DATA",176.112,23649,0)
+4009814^POTASSIUM NITRATE 5% TOOTHPASTE
+"DATA",176.112,23649,1)
+312544
+"DATA",176.112,23650,0)
+4004806^POTASSIUM IODIDE 300MG TAB,EC
+"DATA",176.112,23650,1)
+312542
+"DATA",176.112,23651,0)
+4004804^POTASSIUM IODIDE 1GM/ML SOLN,ORAL
+"DATA",176.112,23651,1)
+312541
+"DATA",176.112,23652,0)
+4004803^POTASSIUM IODIDE 130MG TAB
+"DATA",176.112,23652,1)
+312539
+"DATA",176.112,23653,0)
+4010054^POTASSIUM HYDROXIDE 5% SOLN
+"DATA",176.112,23653,1)
+312538
+"DATA",176.112,23654,0)
+4003581^POTASSIUM GLUCONATE 5MEQ TAB
+"DATA",176.112,23654,1)
+312536
+"DATA",176.112,23655,0)
+4003582^POTASSIUM GLUCONATE 20MEQ/15ML ELIXIR
+"DATA",176.112,23655,1)
+312535
+"DATA",176.112,23656,0)
+4003583^POTASSIUM GLUCONATE 20MEQ/15ML LIQUID
+"DATA",176.112,23656,1)
+312535
+"DATA",176.112,23657,0)
+4003587^POTASSIUM GLUCONATE 20MEQ/15ML (SF) ELIXIR
+"DATA",176.112,23657,1)
+312535
+"DATA",176.112,23658,0)
+4007594^POTASSIUM CITRATE 5MEQ/POTASSIUM GLUCONATE 15MEQ/15ML LIQUID
+"DATA",176.112,23658,1)
+312532
+"DATA",176.112,23659,0)
+4007060^POTASSIUM CITRATE 260MG TAB
+"DATA",176.112,23659,1)
+312530
+"DATA",176.112,23660,0)
+4025739^POTASSIUM CHLORIDE 8MEQ TAB,SA,UD
+"DATA",176.112,23660,1)
+312529
+"DATA",176.112,23661,0)
+4000865^POTASSIUM CHLORIDE 8MEQ TAB,SA
+"DATA",176.112,23661,1)
+312529
+"DATA",176.112,23662,0)
+4000869^POTASSIUM CHLORIDE 8MEQ TAB,EC
+"DATA",176.112,23662,1)
+312528
+"DATA",176.112,23663,0)
+4000857^POTASSIUM CHLORIDE 6.7MEQ TAB,SA
+"DATA",176.112,23663,1)
+312527
+"DATA",176.112,23664,0)
+4000868^POTASSIUM CHLORIDE 6.7MEQ TAB,EC
+"DATA",176.112,23664,1)
+312526
+"DATA",176.112,23665,0)
+4000867^POTASSIUM CHLORIDE 4MEQ TAB,EC
+"DATA",176.112,23665,1)
+312525
+"DATA",176.112,23666,0)
+4000897^POTASSIUM CHLORIDE 20MEQ/50ML INJ,BAG
+"DATA",176.112,23666,1)
+312523
+"DATA",176.112,23667,0)
+4000896^POTASSIUM CHLORIDE 40MEQ/100ML INJ,BAG
+"DATA",176.112,23667,1)
+312523
+"DATA",176.112,23668,0)
+4000871^POTASSIUM CHLORIDE 30MEQ/15ML LIQUID
+"DATA",176.112,23668,1)
+312522
+"DATA",176.112,23669,0)
+4000898^POTASSIUM CHLORIDE 30MEQ/100ML INJ,BAG
+"DATA",176.112,23669,1)
+312521
+"DATA",176.112,23670,0)
+4003901^POTASSIUM CHLORIDE 3.3MEQ/POTASSIUM GLUCONATE 16.7MEQ/PKT PWDR
+"DATA",176.112,23670,1)
+312520
+"DATA",176.112,23671,0)
+4003902^POTASSIUM CHLORIDE 3.3MEQ/POTASSIUM GLUCONATE 16.7MEQ/15ML LIQ
+"DATA",176.112,23671,1)
+312519
+"DATA",176.112,23672,0)
+4000866^POTASSIUM CHLORIDE 25MEQ/PKT PWDR
+"DATA",176.112,23672,1)
+312518
+"DATA",176.112,23673,0)
+4000888^POTASSIUM CHLORIDE 25MEQ TAB,EFFERVSC
+"DATA",176.112,23673,1)
+312517
+"DATA",176.112,23674,0)
+4000887^POTASSIUM CHLORIDE 25MEQ TAB
+"DATA",176.112,23674,1)
+312517
+"DATA",176.112,23675,0)
+4007220^POTASSIUM CHLORIDE 20MEQ/L/NACL 0.9% INJ
+"DATA",176.112,23675,1)
+312516
+"DATA",176.112,23676,0)
+4027374^POTASSIUM CHLORIDE 20MEQ/15ML (AF/SF) LIQUID
+"DATA",176.112,23676,1)
+312515
+"DATA",176.112,23677,0)
+4000886^POTASSIUM CHLORIDE 20MEQ/15ML ELIXIR
+"DATA",176.112,23677,1)
+312515
+"DATA",176.112,23678,0)
+4000854^POTASSIUM CHLORIDE 20MEQ/15ML LIQUID
+"DATA",176.112,23678,1)
+312515
+"DATA",176.112,23679,0)
+4000881^POTASSIUM CHLORIDE 20MEQ/15ML (SF) LIQUID
+"DATA",176.112,23679,1)
+312515
+"DATA",176.112,23680,0)
+4000890^POTASSIUM CHLORIDE 20MEQ/15ML SOLN
+"DATA",176.112,23680,1)
+312515
+"DATA",176.112,23681,0)
+4000895^POTASSIUM CHLORIDE 20MEQ/100ML INJ,BAG
+"DATA",176.112,23681,1)
+312514
+"DATA",176.112,23682,0)
+4000893^POTASSIUM CHLORIDE 10MEQ/50ML INJ,BAG
+"DATA",176.112,23682,1)
+312514
+"DATA",176.112,23683,0)
+4000877^POTASSIUM CHLORIDE 2.4MEQ TAB,EC
+"DATA",176.112,23683,1)
+312512
+"DATA",176.112,23684,0)
+4000861^POTASSIUM CHLORIDE 15MEQ/PKT PWDR
+"DATA",176.112,23684,1)
+312511
+"DATA",176.112,23685,0)
+4000873^POTASSIUM CHLORIDE 15MEQ/15ML LIQUID
+"DATA",176.112,23685,1)
+312510
+"DATA",176.112,23686,0)
+4000870^POTASSIUM CHLORIDE 13MEQ TAB,EC
+"DATA",176.112,23686,1)
+312509
+"DATA",176.112,23687,0)
+4007219^POTASSIUM CHLORIDE 10MEQ/L/NACL 0.9% INJ
+"DATA",176.112,23687,1)
+312508
+"DATA",176.112,23688,0)
+4000894^POTASSIUM CHLORIDE 10MEQ/100ML INJ,BAG
+"DATA",176.112,23688,1)
+312507
+"DATA",176.112,23689,0)
+4000878^POTASSIUM CHLORIDE 10MEQ TAB
+"DATA",176.112,23689,1)
+312505
+"DATA",176.112,23690,0)
+4000859^POTASSIUM CHLORIDE 10MEQ CAP,SA
+"DATA",176.112,23690,1)
+312504
+"DATA",176.112,23691,0)
+4000875^POTASSIUM CHLORIDE 0.67MEQ/ML INJ
+"DATA",176.112,23691,1)
+312503
+"DATA",176.112,23692,0)
+4006649^POTASSIUM BICARBONATE 6.5MEQ TAB
+"DATA",176.112,23692,1)
+312499
+"DATA",176.112,23693,0)
+4006651^POTASSIUM BICARBONATE 25MEQ/POTASSIUM CITRATE 25MEQ TAB,EFFERVSC
+"DATA",176.112,23693,1)
+312498
+"DATA",176.112,23694,0)
+4006652^POTASSIUM BICARBONATE 25MEQ/POTASSIUM CITRATE 15MEQ TAB,EFFERVSC
+"DATA",176.112,23694,1)
+312497
+"DATA",176.112,23695,0)
+4006647^POTASSIUM BICARBONATE 25MEQ/PKT PWDR,EFFERVSC
+"DATA",176.112,23695,1)
+312496
+"DATA",176.112,23696,0)
+4006646^POTASSIUM BICARBONATE 25MEQ TAB,EFFERVSC
+"DATA",176.112,23696,1)
+312495
+"DATA",176.112,23697,0)
+4006648^POTASSIUM BICARBONATE 20MEQ TAB,EFFERVSC
+"DATA",176.112,23697,1)
+312494
+"DATA",176.112,23698,0)
+4010544^POTASSIUM BICARBONATE 180MG/SODIUM BICARBONATE 360MG TAB
+"DATA",176.112,23698,1)
+312493
+"DATA",176.112,23699,0)
+4006644^POTASSIUM BICARB 5MEQ/POTASSIUM CHLORIDE 15MEQ/PKT GRNL,EFFERVSC
+"DATA",176.112,23699,1)
+312492
+"DATA",176.112,23700,0)
+4006643^POTASSIUM BICARB 5MEQ/POTASSIUM CHLORIDE 15MEQ TAB,EFFERVSC
+"DATA",176.112,23700,1)
+312491
+"DATA",176.112,23701,0)
+4006641^POTASSIUM BICARB 20MEQ/POTASSIUM CHLORIDE 30MEQ TAB,EFFERVSC
+"DATA",176.112,23701,1)
+312490
+"DATA",176.112,23702,0)
+4005910^POTASSIUM ACETATE 0.2MEQ/ML INJ
+"DATA",176.112,23702,1)
+312489
+"DATA",176.112,23703,0)
+4009937^POTASSIUM 8MEQ TAB,SA
+"DATA",176.112,23703,1)
+312488
+"DATA",176.112,23704,0)
+4009165^POLYVINYL ALCOHOL 3% SOLN,OPH
+"DATA",176.112,23704,1)
+312486
+"DATA",176.112,23705,0)
+4009319^POLYVINYL ALCOHOL 1% (PF) SOLN,OPH
+"DATA",176.112,23705,1)
+312484
+"DATA",176.112,23706,0)
+4009318^POLYVINYL ALCOHOL 1% SOLN,OPH
+"DATA",176.112,23706,1)
+312484
+"DATA",176.112,23707,0)
+4007680^POLYTHIAZIDE 0.5MG/PRAZOSIN 5MG CAP
+"DATA",176.112,23707,1)
+312483
+"DATA",176.112,23708,0)
+4007679^POLYTHIAZIDE 0.5MG/PRAZOSIN 2MG CAP
+"DATA",176.112,23708,1)
+312482
+"DATA",176.112,23709,0)
+4007678^POLYTHIAZIDE 0.5MG/PRAZOSIN 1MG CAP
+"DATA",176.112,23709,1)
+312481
+"DATA",176.112,23710,0)
+4014740^POLYSORBATE 80 0.5% SOLN,OPH
+"DATA",176.112,23710,1)
+312480
+"DATA",176.112,23711,0)
+4006469^POLYMYXIN B SO4 25000UNT/ML INJ
+"DATA",176.112,23711,1)
+312479
+"DATA",176.112,23712,0)
+4007877^PODOPHYLLIN 25% SOLN,TOP
+"DATA",176.112,23712,1)
+312468
+"DATA",176.112,23713,0)
+4007879^PODOPHYLLIN 25%/BENZOIN TINCTURE,TOP
+"DATA",176.112,23713,1)
+312468
+"DATA",176.112,23714,0)
+4009333^PODOFILOX 0.5% GEL,TOP
+"DATA",176.112,23714,1)
+312466
+"DATA",176.112,23715,0)
+4004572^PLICAMYCIN 2500MCG/VIL INJ
+"DATA",176.112,23715,1)
+312463
+"DATA",176.112,23716,0)
+4009060^PIRBUTEROL ACETATE 0.2MG/ACTUATION INHL,ORAL
+"DATA",176.112,23716,1)
+312458
+"DATA",176.112,23717,0)
+4009062^PIRBUTEROL ACETATE 0.2MG/ACTUATION INHL,AUTOHALER,2.8GM
+"DATA",176.112,23717,1)
+312458
+"DATA",176.112,23718,0)
+4009061^PIRBUTEROL ACETATE 0.2MG/ACTUATION INHL,AUTOHALER,14GM
+"DATA",176.112,23718,1)
+312458
+"DATA",176.112,23719,0)
+4006290^PIPOBROMAN 25MG TAB
+"DATA",176.112,23719,1)
+312457
+"DATA",176.112,23720,0)
+4009495^PIPERONYL BUTOXIDE 4%/PYRETHRINS 0.3% LIQUID,TOP
+"DATA",176.112,23720,1)
+312456
+"DATA",176.112,23721,0)
+4009494^PIPERONYL BUTOXIDE 3%/PYRETHRINS 0.3% LIQUID,TOP
+"DATA",176.112,23721,1)
+312454
+"DATA",176.112,23722,0)
+4009499^PIPERONYL BUTOXIDE 2%/PYRETHRINS 0.4% LIQUID,TOP
+"DATA",176.112,23722,1)
+312453
+"DATA",176.112,23723,0)
+4009497^PIPERONYL BUTOXIDE 2%/PYRETHRINS 0.2% LIQUID,TOP
+"DATA",176.112,23723,1)
+312452
+"DATA",176.112,23724,0)
+4010573^PIPERONYL BUTOX 2.2%/PYRETHRINS 0.18%/PETROLEUM DIST 5.52% LIQ
+"DATA",176.112,23724,1)
+312451
+"DATA",176.112,23725,0)
+4006886^PIPERAZINE CITRATE 250MG TAB
+"DATA",176.112,23725,1)
+312448
+"DATA",176.112,23726,0)
+4012159^PIPERACILLIN NA 2GM/TAZOBACTAM NA 0.25GM/VIL INJ
+"DATA",176.112,23726,1)
+312447
+"DATA",176.112,23727,0)
+4012162^PIPERACILLIN NA 36GM/TAZOBACTAM NA 4.5GM/VIL INJ
+"DATA",176.112,23727,1)
+312447
+"DATA",176.112,23728,0)
+4012160^PIPERACILLIN NA 3GM/TAZOBACTAM NA 0.375GM/VIL INJ
+"DATA",176.112,23728,1)
+312447
+"DATA",176.112,23729,0)
+4012161^PIPERACILLIN NA 4GM/TAZOBACTAM NA 0.5GM/VIL INJ
+"DATA",176.112,23729,1)
+312447
+"DATA",176.112,23730,0)
+4012163^PIPERACILLIN NA 2GM/TAZOBACTAM NA 0.25GM/50ML INJ,BAG,50ML
+"DATA",176.112,23730,1)
+312446
+"DATA",176.112,23731,0)
+4012165^PIPERACILLIN NA 4GM/TAZOBACTAM NA 0.5GM/100ML INJ,BAG,100ML
+"DATA",176.112,23731,1)
+312446
+"DATA",176.112,23732,0)
+4007124^PIPERACILLIN NA 4GM/VIL INJ
+"DATA",176.112,23732,1)
+312444
+"DATA",176.112,23733,0)
+4007123^PIPERACILLIN NA 2GM/VIL INJ
+"DATA",176.112,23733,1)
+312444
+"DATA",176.112,23734,0)
+4007125^PIPERACILLIN NA 3GM/VIL INJ
+"DATA",176.112,23734,1)
+312444
+"DATA",176.112,23735,0)
+4012164^PIPERACILLIN NA 3GM/TAZOBACTAM 0.375GM/50ML INJ,BAG,50ML
+"DATA",176.112,23735,1)
+312443
+"DATA",176.112,23736,0)
+4007407^PIPERACILLIN NA 30MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,23736,1)
+312442
+"DATA",176.112,23737,0)
+4014079^PIOGLITAZONE HCL 45MG TAB
+"DATA",176.112,23737,1)
+312441
+"DATA",176.112,23738,0)
+4014078^PIOGLITAZONE HCL 30MG TAB
+"DATA",176.112,23738,1)
+312440
+"DATA",176.112,23739,0)
+4014948^PIMOZIDE 1MG TAB
+"DATA",176.112,23739,1)
+312439
+"DATA",176.112,23740,0)
+4004123^PILOCARPINE HCL 4% SOLN,OPH,1ML
+"DATA",176.112,23740,1)
+312438
+"DATA",176.112,23741,0)
+4004109^PILOCARPINE HCL 4% SOLN,OPH
+"DATA",176.112,23741,1)
+312438
+"DATA",176.112,23742,0)
+4004119^PILOCARPINE 4% SOLN,OPH
+"DATA",176.112,23742,1)
+312438
+"DATA",176.112,23743,0)
+4004103^PILOCARPINE NITRATE 4% SOLN,OPH
+"DATA",176.112,23743,1)
+312438
+"DATA",176.112,23744,0)
+4004107^PILOCARPINE HCL 2% SOLN,OPH
+"DATA",176.112,23744,1)
+312437
+"DATA",176.112,23745,0)
+4004118^PILOCARPINE 2% SOLN,OPH
+"DATA",176.112,23745,1)
+312437
+"DATA",176.112,23746,0)
+4004122^PILOCARPINE HCL 2% SOLN,OPH,1ML
+"DATA",176.112,23746,1)
+312437
+"DATA",176.112,23747,0)
+4004102^PILOCARPINE NITRATE 2% SOLN,OPH
+"DATA",176.112,23747,1)
+312437
+"DATA",176.112,23748,0)
+4004121^PILOCARPINE HCL 1% SOLN,OPH,1ML
+"DATA",176.112,23748,1)
+312436
+"DATA",176.112,23749,0)
+4004104^PILOCARPINE HCL 1% SOLN,OPH
+"DATA",176.112,23749,1)
+312436
+"DATA",176.112,23750,0)
+4004117^PILOCARPINE 1% SOLN,OPH
+"DATA",176.112,23750,1)
+312436
+"DATA",176.112,23751,0)
+4004101^PILOCARPINE NITRATE 1% SOLN,OPH
+"DATA",176.112,23751,1)
+312436
+"DATA",176.112,23752,0)
+4004112^PILOCARPINE HCL 8% SOLN,OPH
+"DATA",176.112,23752,1)
+312435
+"DATA",176.112,23753,0)
+4004111^PILOCARPINE HCL 6% SOLN,OPH
+"DATA",176.112,23753,1)
+312434
+"DATA",176.112,23754,0)
+4004120^PILOCARPINE HCL 5MG TAB
+"DATA",176.112,23754,1)
+312433
+"DATA",176.112,23755,0)
+4004110^PILOCARPINE HCL 5% SOLN,OPH
+"DATA",176.112,23755,1)
+312432
+"DATA",176.112,23756,0)
+4004114^PILOCARPINE HCL 4% GEL,OPH
+"DATA",176.112,23756,1)
+312431
+"DATA",176.112,23757,0)
+4004108^PILOCARPINE HCL 3% SOLN,OPH
+"DATA",176.112,23757,1)
+312430
+"DATA",176.112,23758,0)
+4004113^PILOCARPINE HCL 10% SOLN,OPH
+"DATA",176.112,23758,1)
+312429
+"DATA",176.112,23759,0)
+4004106^PILOCARPINE HCL 0.5% SOLN,OPH
+"DATA",176.112,23759,1)
+312428
+"DATA",176.112,23760,0)
+4004105^PILOCARPINE HCL 0.25% SOLN,OPH
+"DATA",176.112,23760,1)
+312427
+"DATA",176.112,23761,0)
+4002262^PHYTONADIONE 1MG/0.5ML INJ
+"DATA",176.112,23761,1)
+312424
+"DATA",176.112,23762,0)
+4002263^PHYTONADIONE 10MG/ML INJ
+"DATA",176.112,23762,1)
+312423
+"DATA",176.112,23763,0)
+4015465^PHYTONADIONE 0.1MG TAB
+"DATA",176.112,23763,1)
+312422
+"DATA",176.112,23764,0)
+4005513^PHYSOSTIGMINE SO4 0.25% OINT,OPH
+"DATA",176.112,23764,1)
+312421
+"DATA",176.112,23765,0)
+4005511^PHYSOSTIGMINE SALICYLATE 1MG TAB
+"DATA",176.112,23765,1)
+312420
+"DATA",176.112,23766,0)
+4005510^PHYSOSTIGMINE SALICYLATE 0.5% SOLN,OPH
+"DATA",176.112,23766,1)
+312419
+"DATA",176.112,23767,0)
+4005503^PHYSOSTIGMINE SALICYLATE 0.25%/PILOCARPINE HCL 2% SOLN,OPH
+"DATA",176.112,23767,1)
+312418
+"DATA",176.112,23768,0)
+4002499^PHENYTOIN NA,EXTENDED 100MG CAP
+"DATA",176.112,23768,1)
+312408
+"DATA",176.112,23769,0)
+4002508^PHENYTOIN NA,EXTENDED 100MG CAP,SA
+"DATA",176.112,23769,1)
+312408
+"DATA",176.112,23770,0)
+4002506^PHENYTOIN NA 100MG CAP
+"DATA",176.112,23770,1)
+312406
+"DATA",176.112,23771,0)
+4002500^PHENYTOIN 50MG TAB,CHEWABLE
+"DATA",176.112,23771,1)
+312405
+"DATA",176.112,23772,0)
+4014048^PHENYTOIN 50MG TAB,CHEWABLE,UD
+"DATA",176.112,23772,1)
+312405
+"DATA",176.112,23773,0)
+4002504^PHENYTOIN 30MG/5ML SUSP,ORAL
+"DATA",176.112,23773,1)
+312404
+"DATA",176.112,23774,0)
+4002503^PHENYTOIN 125MG/5ML SUSP,ORAL
+"DATA",176.112,23774,1)
+312403
+"DATA",176.112,23775,0)
+4015483^PHENYTOIN 125MG/5ML SUSP,ORAL,4ML
+"DATA",176.112,23775,1)
+312403
+"DATA",176.112,23776,0)
+4007353^PHENYLEPHRINE HCL 10%/SCOPOLAMINE HBR 0.3% SOLN,OPH
+"DATA",176.112,23776,1)
+312401
+"DATA",176.112,23777,0)
+4004080^PHENYLEPHRINE HCL 0.25%/PYRILAMINE MALEATE 0.15% SOLN,NASAL
+"DATA",176.112,23777,1)
+312399
+"DATA",176.112,23778,0)
+4014985^PHENYLEPHRINE HCL 0.25% SUPP,RTL
+"DATA",176.112,23778,1)
+312398
+"DATA",176.112,23779,0)
+4009248^PHENYLEPHRINE HCL 0.125%/SULFACETAMIDE NA 15% SOLN,OPH
+"DATA",176.112,23779,1)
+312397
+"DATA",176.112,23780,0)
+4009666^PHENYLEPHRINE HCL 0.12%/ZINC SO4 0.25% SOLN,OPH
+"DATA",176.112,23780,1)
+312396
+"DATA",176.112,23781,0)
+4004294^PHENYLEPHRINE HCL 0.12% SOLN,OPH
+"DATA",176.112,23781,1)
+312395
+"DATA",176.112,23782,0)
+4004078^PHENYLEPHRINE HCL 0.12%/PYRILAMINE MALEATE 0.1% SOLN,OPH
+"DATA",176.112,23782,1)
+312395
+"DATA",176.112,23783,0)
+4002449^PHENYLEPHRINE 5MG/PROMETHAZINE 6.25MG/5ML SYRUP
+"DATA",176.112,23783,1)
+312394
+"DATA",176.112,23784,0)
+4002450^PHENYLEPHRINE 5MG/PROMETHAZINE 6.25MG/5ML LIQUID
+"DATA",176.112,23784,1)
+312394
+"DATA",176.112,23785,0)
+4004592^PHENYLBUTAZONE 100MG TAB
+"DATA",176.112,23785,1)
+312392
+"DATA",176.112,23786,0)
+4004593^PHENYLBUTAZONE 100MG CAP
+"DATA",176.112,23786,1)
+312391
+"DATA",176.112,23787,0)
+4010516^PHENYLALANINE 500MG TAB
+"DATA",176.112,23787,1)
+312390
+"DATA",176.112,23788,0)
+4003921^PHENTERMINE 30MG CAP,SA
+"DATA",176.112,23788,1)
+312389
+"DATA",176.112,23789,0)
+4003915^PHENTERMINE HCL 30MG CAP,SA
+"DATA",176.112,23789,1)
+312389
+"DATA",176.112,23790,0)
+4003913^PHENTERMINE RESIN COMPLEX 30MG CAP,SA
+"DATA",176.112,23790,1)
+312389
+"DATA",176.112,23791,0)
+4003927^PHENTERMINE RESIN COMPLEX 30MG CAP
+"DATA",176.112,23791,1)
+312388
+"DATA",176.112,23792,0)
+4003914^PHENTERMINE HCL 30MG CAP
+"DATA",176.112,23792,1)
+312388
+"DATA",176.112,23793,0)
+4003922^PHENTERMINE 30MG CAP
+"DATA",176.112,23793,1)
+312388
+"DATA",176.112,23794,0)
+4003912^PHENTERMINE RESIN COMPLEX 15MG CAP,SA
+"DATA",176.112,23794,1)
+312387
+"DATA",176.112,23795,0)
+4003917^PHENTERMINE HCL 37.5MG TAB
+"DATA",176.112,23795,1)
+312386
+"DATA",176.112,23796,0)
+4003925^PHENTERMINE HCL 37.5MG CAP,SA
+"DATA",176.112,23796,1)
+312385
+"DATA",176.112,23797,0)
+4003918^PHENTERMINE HCL 37.5MG CAP
+"DATA",176.112,23797,1)
+312384
+"DATA",176.112,23798,0)
+4003923^PHENTERMINE HCL 30MG TAB
+"DATA",176.112,23798,1)
+312383
+"DATA",176.112,23799,0)
+4003920^PHENTERMINE HCL 18.75MG CAP
+"DATA",176.112,23799,1)
+312382
+"DATA",176.112,23800,0)
+4003919^PHENTERMINE HCL 15MG CAP
+"DATA",176.112,23800,1)
+312381
+"DATA",176.112,23801,0)
+4005109^PHENPROCOUMON 3MG TAB
+"DATA",176.112,23801,1)
+312380
+"DATA",176.112,23802,0)
+4003558^PHENOLSULFONPHTHALEIN 6MG/ML INJ
+"DATA",176.112,23802,1)
+312379
+"DATA",176.112,23803,0)
+4008916^PHENOLPHTHALEIN,YELLOW 97.2MG TAB
+"DATA",176.112,23803,1)
+312378
+"DATA",176.112,23804,0)
+4008917^PHENOLPHTHALEIN 90MG TAB
+"DATA",176.112,23804,1)
+312377
+"DATA",176.112,23805,0)
+4008910^PHENOLPHTHALEIN 80MG TAB
+"DATA",176.112,23805,1)
+312376
+"DATA",176.112,23806,0)
+4008911^PHENOLPHTHALEIN 120MG TAB
+"DATA",176.112,23806,1)
+312374
+"DATA",176.112,23807,0)
+4008026^PHENOL 3%/RESORCINOL 10% GEL,TOP
+"DATA",176.112,23807,1)
+312373
+"DATA",176.112,23808,0)
+4014186^PHENOL 0.5% SPRAY,ORAL TOP
+"DATA",176.112,23808,1)
+312372
+"DATA",176.112,23809,0)
+4000723^PHENOBARBITAL NA 32MG/ML INJ
+"DATA",176.112,23809,1)
+312371
+"DATA",176.112,23810,0)
+4000721^PHENOBARBITAL NA 130MG/ML INJ
+"DATA",176.112,23810,1)
+312370
+"DATA",176.112,23811,0)
+4000733^PHENOBARBITAL 90MG TAB
+"DATA",176.112,23811,1)
+312368
+"DATA",176.112,23812,0)
+4000726^PHENOBARBITAL 8MG TAB
+"DATA",176.112,23812,1)
+312367
+"DATA",176.112,23813,0)
+4000718^PHENOBARBITAL 65MG TAB
+"DATA",176.112,23813,1)
+312366
+"DATA",176.112,23814,0)
+4005729^PHENOBARBITAL 32MG/PHENYTOIN NA 100MG CAP
+"DATA",176.112,23814,1)
+312365
+"DATA",176.112,23815,0)
+4000727^PHENOBARBITAL 32MG TAB,EC
+"DATA",176.112,23815,1)
+312364
+"DATA",176.112,23816,0)
+4000716^PHENOBARBITAL 32MG TAB
+"DATA",176.112,23816,1)
+312363
+"DATA",176.112,23817,0)
+4014879^PHENOBARBITAL 30MG TAB
+"DATA",176.112,23817,1)
+312362
+"DATA",176.112,23818,0)
+4015133^PHENOBARBITAL 30MG TAB,UD
+"DATA",176.112,23818,1)
+312362
+"DATA",176.112,23819,0)
+4007505^PHENOBARBITAL 16MG/SODIUM NITRITE 65MG TAB
+"DATA",176.112,23819,1)
+312360
+"DATA",176.112,23820,0)
+4005728^PHENOBARBITAL 16MG/PHENYTOIN NA 100MG CAP
+"DATA",176.112,23820,1)
+312359
+"DATA",176.112,23821,0)
+4014878^PHENOBARBITAL 15MG TAB
+"DATA",176.112,23821,1)
+312357
+"DATA",176.112,23822,0)
+4007914^PHENOBARB 15MG/KI 160MG/NA BICARB 130MG/THEOBROMINE 160MG TAB
+"DATA",176.112,23822,1)
+312356
+"DATA",176.112,23823,0)
+4007665^PHENMETRAZINE HCL 75MG TAB,SA
+"DATA",176.112,23823,1)
+312355
+"DATA",176.112,23824,0)
+4007729^PHENIRAMINE MALEATE 12.5MG/PHENYLEPHRINE HCL 5MG TAB
+"DATA",176.112,23824,1)
+312354
+"DATA",176.112,23825,0)
+4007730^PHENIRAMINE MALEATE 0.5%/PHENYLEPHRINE HCL 0.125% SOLN,OPH
+"DATA",176.112,23825,1)
+312353
+"DATA",176.112,23826,0)
+4004952^PHENIRAMINE 25MG/P-PROPANOL 50MG/PYRILAMINE 25MG TAB,SA
+"DATA",176.112,23826,1)
+312350
+"DATA",176.112,23827,0)
+4004953^PHENIRAMINE 10MG/P-PROPANOL 20MG/PYRILAMINE 10MG/ML DROPS,ORAL
+"DATA",176.112,23827,1)
+312348
+"DATA",176.112,23828,0)
+4005719^PHENELZINE SO4 15MG TAB
+"DATA",176.112,23828,1)
+312347
+"DATA",176.112,23829,0)
+4005011^PHENDIMETRAZINE TARTRATE 35MG TAB,SA
+"DATA",176.112,23829,1)
+312346
+"DATA",176.112,23830,0)
+4005014^PHENDIMETRAZINE TARTRATE 35MG CAP,SA
+"DATA",176.112,23830,1)
+312345
+"DATA",176.112,23831,0)
+4005009^PHENDIMETRAZINE TARTRATE 35MG CAP
+"DATA",176.112,23831,1)
+312344
+"DATA",176.112,23832,0)
+4005010^PHENDIMETRAZINE TARTRATE 17.5MG TAB
+"DATA",176.112,23832,1)
+312343
+"DATA",176.112,23833,0)
+4005013^PHENDIMETRAZINE HCL 37.5MG TAB,SA
+"DATA",176.112,23833,1)
+312342
+"DATA",176.112,23834,0)
+4005012^PHENDIMETRAZINE HCL 30MG CAP,SA
+"DATA",176.112,23834,1)
+312341
+"DATA",176.112,23835,0)
+4002052^PHENAZOPYRIDINE HCL 50MG/SULFISOXAZOLE 500MG TAB
+"DATA",176.112,23835,1)
+312340
+"DATA",176.112,23836,0)
+4005015^PHENAZOPYRIDINE HCL 50MG/SULFAMETHIZOLE 500MG TAB
+"DATA",176.112,23836,1)
+312339
+"DATA",176.112,23837,0)
+4006858^PHENAZOPYRIDINE HCL 200MG TAB,SA
+"DATA",176.112,23837,1)
+312338
+"DATA",176.112,23838,0)
+4006859^PHENAZOPYRIDINE HCL 200MG TAB,EC
+"DATA",176.112,23838,1)
+312337
+"DATA",176.112,23839,0)
+4002051^PHENAZOPYRIDINE HCL 100MG/SULFAMETHOXAZOLE 500MG TAB
+"DATA",176.112,23839,1)
+312336
+"DATA",176.112,23840,0)
+4009422^PETROLEUM 1.5%/PIPERONYL BUTOXIDE 3%/PYRETHRINS 0.3% GEL,TOP
+"DATA",176.112,23840,1)
+312333
+"DATA",176.112,23841,0)
+4009420^PETROLEUM 1.2%/PIPERONYL BUTOXIDE 3%/PYRETHRINS 0.3% GEL,TOP
+"DATA",176.112,23841,1)
+312332
+"DATA",176.112,23842,0)
+4009421^PETROLEUM 0.8%/PIPERONYL BUTOXIDE 2%/PYRETHRINS 0.2% LIQUID,TOP
+"DATA",176.112,23842,1)
+312331
+"DATA",176.112,23843,0)
+4006549^PERPHENAZINE 8MG TAB,SA
+"DATA",176.112,23843,1)
+312325
+"DATA",176.112,23844,0)
+4006554^PERPHENAZINE 4MG TAB,SA
+"DATA",176.112,23844,1)
+312324
+"DATA",176.112,23845,0)
+4006551^PERPHENAZINE 16MG/5ML LIQUID,ORAL
+"DATA",176.112,23845,1)
+312323
+"DATA",176.112,23846,0)
+4014697^PERMIROLAST POTASSIUM 0.1% SOLN,OPH
+"DATA",176.112,23846,1)
+312321
+"DATA",176.112,23847,0)
+4014954^PERMETHRIN 1% LOTION,TOP
+"DATA",176.112,23847,1)
+312320
+"DATA",176.112,23848,0)
+4006506^PERMETHRIN 1% LIQUID,TOP
+"DATA",176.112,23848,1)
+312319
+"DATA",176.112,23849,0)
+4014210^PERINDOPRIL ERBUMINE 8MG TAB
+"DATA",176.112,23849,1)
+312313
+"DATA",176.112,23850,0)
+4014209^PERINDOPRIL ERBUMINE 4MG TAB
+"DATA",176.112,23850,1)
+312312
+"DATA",176.112,23851,0)
+4014208^PERINDOPRIL ERBUMINE 2MG TAB
+"DATA",176.112,23851,1)
+312311
+"DATA",176.112,23852,0)
+4009173^PERGOLIDE MESYLATE 1MG TAB
+"DATA",176.112,23852,1)
+312310
+"DATA",176.112,23853,0)
+4009172^PERGOLIDE MESYLATE 0.25MG TAB
+"DATA",176.112,23853,1)
+312309
+"DATA",176.112,23854,0)
+4009171^PERGOLIDE MESYLATE 0.05MG TAB
+"DATA",176.112,23854,1)
+312308
+"DATA",176.112,23855,0)
+4013965^PENTOXIFYLLINE 400MG TAB,SA,UD
+"DATA",176.112,23855,1)
+312301
+"DATA",176.112,23856,0)
+4004907^PENTOXIFYLLINE 400MG TAB,SA
+"DATA",176.112,23856,1)
+312301
+"DATA",176.112,23857,0)
+4003295^PENTOBARBITAL NA 60MG SUPP,RTL
+"DATA",176.112,23857,1)
+312299
+"DATA",176.112,23858,0)
+4003296^PENTOBARBITAL NA 50MG CAP
+"DATA",176.112,23858,1)
+312298
+"DATA",176.112,23859,0)
+4003298^PENTOBARBITAL NA 30MG SUPP,RTL
+"DATA",176.112,23859,1)
+312297
+"DATA",176.112,23860,0)
+4003297^PENTOBARBITAL NA 200MG SUPP,RTL
+"DATA",176.112,23860,1)
+312296
+"DATA",176.112,23861,0)
+4003294^PENTOBARBITAL NA 120MG SUPP,RTL
+"DATA",176.112,23861,1)
+312295
+"DATA",176.112,23862,0)
+4003299^PENTOBARBITAL NA 100MG TAB
+"DATA",176.112,23862,1)
+312294
+"DATA",176.112,23863,0)
+4005096^PENTOBARB 30MG/B-DONNA 0.125MG/CAFN/ERGOTAMINE 1MG TAB
+"DATA",176.112,23863,1)
+312292
+"DATA",176.112,23864,0)
+4004350^PENTAZOCINE HCL 50MG/NALOXONE HCL 0.5MG TAB
+"DATA",176.112,23864,1)
+312289
+"DATA",176.112,23865,0)
+4004349^PENTAZOCINE HCL 25MG/ACETAMINOPHEN 650MG TAB
+"DATA",176.112,23865,1)
+312288
+"DATA",176.112,23866,0)
+4004347^PENTAZOCINE HCL 12.5MG/ASPIRIN 325MG TAB
+"DATA",176.112,23866,1)
+312287
+"DATA",176.112,23867,0)
+4007534^PENTAMIDINE ISETHIONATE 300MG/VIL INJ
+"DATA",176.112,23867,1)
+312286
+"DATA",176.112,23868,0)
+4005045^PENTAGASTRIN 0.25MG/ML INJ
+"DATA",176.112,23868,1)
+312285
+"DATA",176.112,23869,0)
+4006393^PENTAERYTHRITOL TETRANITRATE 80MG TAB,SA
+"DATA",176.112,23869,1)
+312284
+"DATA",176.112,23870,0)
+4006392^PENTAERYTHRITOL TETRANITRATE 80MG CAP,SA
+"DATA",176.112,23870,1)
+312283
+"DATA",176.112,23871,0)
+4006396^PENTAERYTHRITOL TETRANITRATE 45MG CAP,SA
+"DATA",176.112,23871,1)
+312282
+"DATA",176.112,23872,0)
+4006395^PENTAERYTHRITOL TETRANITRATE 40MG TAB,ORAL
+"DATA",176.112,23872,1)
+312281
+"DATA",176.112,23873,0)
+4006389^PENTAERYTHRITOL TETRANITRATE 30MG CAP,SA
+"DATA",176.112,23873,1)
+312280
+"DATA",176.112,23874,0)
+4006394^PENTAERYTHRITOL TETRANITRATE 30MG CAP
+"DATA",176.112,23874,1)
+312279
+"DATA",176.112,23875,0)
+4007911^PENTAERYTHRITOL TETRANITRATE 10MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,23875,1)
+312278
+"DATA",176.112,23876,0)
+4006390^PENTAERYTHRITOL TETRANITRATE 10MG TAB,ORAL
+"DATA",176.112,23876,1)
+312277
+"DATA",176.112,23877,0)
+4000806^PENICILLIN V K 250MG/5ML SOLN,ORAL
+"DATA",176.112,23877,1)
+312276
+"DATA",176.112,23878,0)
+4000805^PENICILLIN V K 125MG/5ML SOLN,ORAL
+"DATA",176.112,23878,1)
+312275
+"DATA",176.112,23879,0)
+4000821^PENICILLIN V K 125MG TAB
+"DATA",176.112,23879,1)
+312274
+"DATA",176.112,23880,0)
+4000827^PENICILLIN G 500000UNT TAB
+"DATA",176.112,23880,1)
+312266
+"DATA",176.112,23881,0)
+4000830^PENICILLIN G 400000UNT TAB
+"DATA",176.112,23881,1)
+312263
+"DATA",176.112,23882,0)
+4000829^PENICILLIN G 250000UNT TAB
+"DATA",176.112,23882,1)
+312260
+"DATA",176.112,23883,0)
+4012951^PENCICLOVIR 1% CREAM.TOP
+"DATA",176.112,23883,1)
+312255
+"DATA",176.112,23884,0)
+4008938^PENBUTOLOL SO4 20MG TAB
+"DATA",176.112,23884,1)
+312254
+"DATA",176.112,23885,0)
+4010156^PEGADEMASE BOVINE 250UNT/ML INJ IM
+"DATA",176.112,23885,1)
+312249
+"DATA",176.112,23886,0)
+4016939^PAROXETINE MESYLATE 40MG TAB
+"DATA",176.112,23886,1)
+312244
+"DATA",176.112,23887,0)
+4010282^PAROXETINE HCL 40MG TAB
+"DATA",176.112,23887,1)
+312244
+"DATA",176.112,23888,0)
+4016938^PAROXETINE MESYLATE 30MG TAB
+"DATA",176.112,23888,1)
+312243
+"DATA",176.112,23889,0)
+4010280^PAROXETINE HCL 30MG TAB
+"DATA",176.112,23889,1)
+312243
+"DATA",176.112,23890,0)
+4010283^PAROXETINE HCL 10MG/5ML SUSP,ORAL
+"DATA",176.112,23890,1)
+312242
+"DATA",176.112,23891,0)
+4010281^PAROXETINE HCL 10MG TAB
+"DATA",176.112,23891,1)
+312241
+"DATA",176.112,23892,0)
+4016936^PAROXETINE MESYLATE 10MG TAB
+"DATA",176.112,23892,1)
+312241
+"DATA",176.112,23893,0)
+4027383^PAROXETINE HCL 10MG TAB,UD
+"DATA",176.112,23893,1)
+312241^^^PAROXETINE HCL 10MG TAB UD^Y
+"DATA",176.112,23894,0)
+4006273^PARGYLINE HCL 25MG TAB
+"DATA",176.112,23894,1)
+312240
+"DATA",176.112,23895,0)
+4006272^PARGYLINE HCL 10MG TAB
+"DATA",176.112,23895,1)
+312239
+"DATA",176.112,23896,0)
+4009459^PAREGORIC 3.7ML/KAOLIN 5.5GM/PECTIN 162MG/30ML SUSP,ORAL
+"DATA",176.112,23896,1)
+312237
+"DATA",176.112,23897,0)
+4001187^PARAMETHASONE ACETATE 2MG TAB
+"DATA",176.112,23897,1)
+312235
+"DATA",176.112,23898,0)
+4001186^PARAMETHASONE ACETATE 1MG TAB
+"DATA",176.112,23898,1)
+312234
+"DATA",176.112,23899,0)
+4006122^PARAMETHADIONE 300MG/ML SOLN
+"DATA",176.112,23899,1)
+312233
+"DATA",176.112,23900,0)
+4004033^PARALDEHYDE 100% INJ
+"DATA",176.112,23900,1)
+312231
+"DATA",176.112,23901,0)
+4010519^PARACHLOROMETOXYLENOL 2% SHAMPOO
+"DATA",176.112,23901,1)
+312228
+"DATA",176.112,23902,0)
+4009626^PARA-AMINOSODIUM SALICYLATE 500MG TAB
+"DATA",176.112,23902,1)
+312227
+"DATA",176.112,23903,0)
+4007754^PARA-AMINOBENZOIC ACID 8% LOTION
+"DATA",176.112,23903,1)
+312225
+"DATA",176.112,23904,0)
+4007753^PARA-AMINOBENZOIC ACID 100MG TAB
+"DATA",176.112,23904,1)
+312223
+"DATA",176.112,23905,0)
+4000749^PAPAVERINE HCL 60MG TAB
+"DATA",176.112,23905,1)
+312222
+"DATA",176.112,23906,0)
+4000748^PAPAVERINE HCL 30MG TAB
+"DATA",176.112,23906,1)
+312221
+"DATA",176.112,23907,0)
+4000754^PAPAVERINE HCL 300MG TAB
+"DATA",176.112,23907,1)
+312220
+"DATA",176.112,23908,0)
+4000756^PAPAVERINE HCL 200MG TAB,SA
+"DATA",176.112,23908,1)
+312219
+"DATA",176.112,23909,0)
+4000752^PAPAVERINE HCL 200MG TAB
+"DATA",176.112,23909,1)
+312218
+"DATA",176.112,23910,0)
+4000757^PAPAVERINE HCL 200MG CAP
+"DATA",176.112,23910,1)
+312217
+"DATA",176.112,23911,0)
+4000753^PAPAVERINE HCL 150MG CAP,SA
+"DATA",176.112,23911,1)
+312216
+"DATA",176.112,23912,0)
+4000755^PAPAVERINE HCL 150MG CAP
+"DATA",176.112,23912,1)
+312215
+"DATA",176.112,23913,0)
+4000751^PAPAVERINE HCL 100MG TAB
+"DATA",176.112,23913,1)
+312214
+"DATA",176.112,23914,0)
+4007210^PAPAIN 10000UNT/UREA 10% OINT,TOP
+"DATA",176.112,23914,1)
+312213
+"DATA",176.112,23915,0)
+4009589^PANTOTHENIC ACID 500MG TAB
+"DATA",176.112,23915,1)
+312211
+"DATA",176.112,23916,0)
+4009587^PANTOTHENIC ACID 250MG TAB
+"DATA",176.112,23916,1)
+312210
+"DATA",176.112,23917,0)
+4003576^PANCRELIPASE 8000UNT CAP
+"DATA",176.112,23917,1)
+312207
+"DATA",176.112,23918,0)
+4003577^PANCRELIPASE 425MG TAB
+"DATA",176.112,23918,1)
+312206
+"DATA",176.112,23919,0)
+4003575^PANCRELIPASE 400MG TAB
+"DATA",176.112,23919,1)
+312205
+"DATA",176.112,23920,0)
+4010134^PAMIDRONATE DISODIUM 30MG/VIL INJ
+"DATA",176.112,23920,1)
+312202
+"DATA",176.112,23921,0)
+4010251^PACLITAXEL 6MG/ML INJ,CONC,IV
+"DATA",176.112,23921,1)
+312199
+"DATA",176.112,23922,0)
+4010253^PACLITAXEL 100MG/17ML INJ,CONC
+"DATA",176.112,23922,1)
+312199
+"DATA",176.112,23923,0)
+4010254^PACLITAXEL 300MG/50ML INJ,VIL,50ML
+"DATA",176.112,23923,1)
+312199
+"DATA",176.112,23924,0)
+4010252^PACLITAXEL 30MG/5ML INJ,CONC
+"DATA",176.112,23924,1)
+312199
+"DATA",176.112,23925,0)
+4007127^P-EPHRINE 5MG/P-PROPANOL 40MG/PSEUDEFED 40MG CAP
+"DATA",176.112,23925,1)
+312196
+"DATA",176.112,23926,0)
+4007558^P-EPHRINE 5MG/K GUAIACOLSULF 44MG/PROMETH 5MG/5ML SYRUP
+"DATA",176.112,23926,1)
+312194
+"DATA",176.112,23927,0)
+4007559^P-EPHRINE 5MG/K GUAIACOLSULF 44MG/PROMETH 5MG/5ML LIQUID
+"DATA",176.112,23927,1)
+312194
+"DATA",176.112,23928,0)
+4007917^P-EPHRINE 0.12%/PREDNISOLONE 0.5%/SULFACETAMIDE 10% SUSP,OPH
+"DATA",176.112,23928,1)
+312193
+"DATA",176.112,23929,0)
+4003310^OXYTOCIN 0.02UNT/ML/DEXTROSE 5% INJ
+"DATA",176.112,23929,1)
+312191
+"DATA",176.112,23930,0)
+4005685^OXYTETRACYCLINE HCL 250MG TAB
+"DATA",176.112,23930,1)
+312190
+"DATA",176.112,23931,0)
+4005678^OXYTETRACYCLINE HCL 125MG CAP
+"DATA",176.112,23931,1)
+312189
+"DATA",176.112,23932,0)
+4005683^OXYTETRACYCLINE HCL 500MG/VIL INJ IV
+"DATA",176.112,23932,1)
+312188
+"DATA",176.112,23933,0)
+4005680^OXYTETRACYCLINE 50MG/ML INJ IM
+"DATA",176.112,23933,1)
+312188
+"DATA",176.112,23934,0)
+4005686^OXYTETRACYCLINE HCL 100MG/VIL INJ IM
+"DATA",176.112,23934,1)
+312188
+"DATA",176.112,23935,0)
+4005687^OXYTETRACYCLINE HCL 50MG/ML INJ IM
+"DATA",176.112,23935,1)
+312188
+"DATA",176.112,23936,0)
+4005688^OXYTETRACYCLINE 5MG/POLYMYXIN B SO4 10000UNT/GM OINT,OPH
+"DATA",176.112,23936,1)
+312186
+"DATA",176.112,23937,0)
+4005689^OXYTETRACYCLINE 30MG/POLYMYXIN B SO4 10000UNT/GM PWDR,TOP
+"DATA",176.112,23937,1)
+312185
+"DATA",176.112,23938,0)
+4005692^OXYTETRACYCLINE 250MG/AZOPHEN 50MG/SULFAMETHIZOLE 250MG CAP
+"DATA",176.112,23938,1)
+312184
+"DATA",176.112,23939,0)
+4005682^OXYTETRACYCLINE HCL 250MG/VIL INJ IV
+"DATA",176.112,23939,1)
+312183
+"DATA",176.112,23940,0)
+4005681^OXYTETRACYCLINE 125MG/ML INJ IM
+"DATA",176.112,23940,1)
+312183
+"DATA",176.112,23941,0)
+4005690^OXYTETRACYCLINE 100MG/POLYMYXIN B SO4 100000UNT TAB,VAG
+"DATA",176.112,23941,1)
+312182
+"DATA",176.112,23942,0)
+4009991^OXYQUINOLINE K SO4 64.8MG TAB
+"DATA",176.112,23942,1)
+312181
+"DATA",176.112,23943,0)
+4006529^OXYPHENONIUM BR 5MG TAB
+"DATA",176.112,23943,1)
+312180
+"DATA",176.112,23944,0)
+4004618^OXYPHENCYCLIMINE HCL 10MG TAB
+"DATA",176.112,23944,1)
+312179
+"DATA",176.112,23945,0)
+4007687^OXYPHENBUTAZONE 100MG TAB
+"DATA",176.112,23945,1)
+312178
+"DATA",176.112,23946,0)
+4007652^OXYMORPHONE HCL 5MG SUPP,RTL
+"DATA",176.112,23946,1)
+312177
+"DATA",176.112,23947,0)
+4008933^OXYMETAZOLINE 0.025% SOLN,OPH
+"DATA",176.112,23947,1)
+312176
+"DATA",176.112,23948,0)
+4007814^OXYGEN 99.9% GAS
+"DATA",176.112,23948,1)
+312175
+"DATA",176.112,23949,0)
+4007810^OXYGEN 99.6% GAS
+"DATA",176.112,23949,1)
+312174
+"DATA",176.112,23950,0)
+4007811^OXYGEN 99.5% GAS
+"DATA",176.112,23950,1)
+312173
+"DATA",176.112,23951,0)
+4007813^OXYGEN 99% GAS
+"DATA",176.112,23951,1)
+312172
+"DATA",176.112,23952,0)
+4007815^OXYGEN 98.5% GAS
+"DATA",176.112,23952,1)
+312171
+"DATA",176.112,23953,0)
+4003066^OXYCODONE HCL 5MG/ASPIRIN 325MG TAB
+"DATA",176.112,23953,1)
+312169
+"DATA",176.112,23954,0)
+4003070^OXYCODONE HCL 5MG/ACETAMINOPHEN 325MG/5ML SOLN,ORAL
+"DATA",176.112,23954,1)
+312168
+"DATA",176.112,23955,0)
+4003069^OXYCODONE HCL 5MG/ACETAMINOPHEN 325MG CAP
+"DATA",176.112,23955,1)
+312167
+"DATA",176.112,23956,0)
+4005149^OXYCODONE HCL 5MG/5ML SOLN,ORAL
+"DATA",176.112,23956,1)
+312166
+"DATA",176.112,23957,0)
+4005154^OXYCODONE HCL 40MG TAB,SA
+"DATA",176.112,23957,1)
+312165
+"DATA",176.112,23958,0)
+4005150^OXYCODONE HCL 20MG/ML SOLN,ORAL
+"DATA",176.112,23958,1)
+312163
+"DATA",176.112,23959,0)
+4014655^OXYCODONE HCL 2.5MG/ACETAMINOPHEN 325MG TAB
+"DATA",176.112,23959,1)
+312162
+"DATA",176.112,23960,0)
+4014981^OXYCODONE HCL 160MG TAB,SA
+"DATA",176.112,23960,1)
+312160
+"DATA",176.112,23961,0)
+4014657^OXYCODONE HCL 10MG/ACETAMINOPHEN 650MG TAB
+"DATA",176.112,23961,1)
+312159
+"DATA",176.112,23962,0)
+4016079^OXYCODONE HCL 10MG TAB,SA,UD
+"DATA",176.112,23962,1)
+312158
+"DATA",176.112,23963,0)
+4005152^OXYCODONE HCL 10MG TAB,SA
+"DATA",176.112,23963,1)
+312158
+"DATA",176.112,23964,0)
+4013406^OXYBUTYNIN CL 5MG TAB,SA
+"DATA",176.112,23964,1)
+312155
+"DATA",176.112,23965,0)
+4014163^OXYBUTYNIN CL 15MG TAB,SA
+"DATA",176.112,23965,1)
+312154
+"DATA",176.112,23966,0)
+4005713^OXTRIPHYLLINE 600MG TAB,SA
+"DATA",176.112,23966,1)
+312146
+"DATA",176.112,23967,0)
+4005711^OXTRIPHYLLINE 200MG TAB,EC
+"DATA",176.112,23967,1)
+312144
+"DATA",176.112,23968,0)
+4005716^OXTRIPHYLLINE 200MG TAB
+"DATA",176.112,23968,1)
+312143
+"DATA",176.112,23969,0)
+4005710^OXTRIPHYLLINE 100MG TAB,EC
+"DATA",176.112,23969,1)
+312141
+"DATA",176.112,23970,0)
+4008964^OXICONAZOLE 1% LOTION
+"DATA",176.112,23970,1)
+312140
+"DATA",176.112,23971,0)
+4008963^OXICONAZOLE 1% CREAM,TOP
+"DATA",176.112,23971,1)
+312139
+"DATA",176.112,23972,0)
+4014466^OXCARBAZEPINE 600MG TAB,UD
+"DATA",176.112,23972,1)
+312138
+"DATA",176.112,23973,0)
+4014465^OXCARBAZEPINE 600MG TAB
+"DATA",176.112,23973,1)
+312138
+"DATA",176.112,23974,0)
+4014464^OXCARBAZEPINE 300MG TAB,UD
+"DATA",176.112,23974,1)
+312137
+"DATA",176.112,23975,0)
+4014463^OXCARBAZEPINE 300MG TAB
+"DATA",176.112,23975,1)
+312137
+"DATA",176.112,23976,0)
+4014461^OXCARBAZEPINE 150MG TAB
+"DATA",176.112,23976,1)
+312136
+"DATA",176.112,23977,0)
+4014462^OXCARBAZEPINE 150MG TAB,UD
+"DATA",176.112,23977,1)
+312136
+"DATA",176.112,23978,0)
+4003158^OXAZEPAM 30MG TAB
+"DATA",176.112,23978,1)
+312135
+"DATA",176.112,23979,0)
+4003153^OXAZEPAM 15MG CAP
+"DATA",176.112,23979,1)
+312134
+"DATA",176.112,23980,0)
+4015103^OXAZEPAM 15MG CAP,UD
+"DATA",176.112,23980,1)
+312134
+"DATA",176.112,23981,0)
+4003157^OXAZEPAM 10MG TAB
+"DATA",176.112,23981,1)
+312133
+"DATA",176.112,23982,0)
+4015486^OXAPROZIN 600MG TAB,UD
+"DATA",176.112,23982,1)
+312132
+"DATA",176.112,23983,0)
+4010344^OXAPROZIN 600MG TAB
+"DATA",176.112,23983,1)
+312132
+"DATA",176.112,23984,0)
+4003860^OXACILLIN NA 500MG TAB
+"DATA",176.112,23984,1)
+312131
+"DATA",176.112,23985,0)
+4003852^OXACILLIN NA 4GM/VIL INJ
+"DATA",176.112,23985,1)
+312130
+"DATA",176.112,23986,0)
+4003856^OXACILLIN NA 500MG/VIL INJ
+"DATA",176.112,23986,1)
+312130
+"DATA",176.112,23987,0)
+4003853^OXACILLIN NA 2GM/VIL INJ
+"DATA",176.112,23987,1)
+312130
+"DATA",176.112,23988,0)
+4003855^OXACILLIN NA 250MG/VIL INJ
+"DATA",176.112,23988,1)
+312130
+"DATA",176.112,23989,0)
+4003857^OXACILLIN NA 1GM/VIL INJ
+"DATA",176.112,23989,1)
+312130
+"DATA",176.112,23990,0)
+4003862^OXACILLIN NA 250MG/5ML SUSP
+"DATA",176.112,23990,1)
+312129
+"DATA",176.112,23991,0)
+4003859^OXACILLIN NA 250MG/5ML SOLN,ORAL
+"DATA",176.112,23991,1)
+312129
+"DATA",176.112,23992,0)
+4007369^OXACILLIN NA 20MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,23992,1)
+312128
+"DATA",176.112,23993,0)
+4003861^OXACILLIN NA 180MG/VIL INJ
+"DATA",176.112,23993,1)
+312127
+"DATA",176.112,23994,0)
+4003851^OXACILLIN NA 10GM/VIL INJ
+"DATA",176.112,23994,1)
+312127
+"DATA",176.112,23995,0)
+4006879^OX BILE EXTRACT 325MG TAB,EC
+"DATA",176.112,23995,1)
+312126
+"DATA",176.112,23996,0)
+4006878^OX BILE EXTRACT 325MG TAB
+"DATA",176.112,23996,1)
+312125
+"DATA",176.112,23997,0)
+4005242^ETHINYL ESTRADIOL 0.05MG/NORETHINDRONE 1MG TAB
+"DATA",176.112,23997,1)
+312124
+"DATA",176.112,23998,0)
+4005779^ETHINYL ESTRADIOL 0.05MG/FE FUMARATE 75MG/NORETHINDRONE 1MG TAB
+"DATA",176.112,23998,1)
+312124
+"DATA",176.112,23999,0)
+4014307^OSELTAMIVIR PO4 75MG CAP
+"DATA",176.112,23999,1)
+312122
+"DATA",176.112,24000,0)
+4006698^ORPHENADRINE CITRATE 30MG/ML INJ
+"DATA",176.112,24000,1)
+312113
+"DATA",176.112,24001,0)
+4006697^ORPHENADRINE CITRATE 100MG TAB,SA
+"DATA",176.112,24001,1)
+312112
+"DATA",176.112,24002,0)
+4006699^ORPHENADRINE CITRATE 100MG TAB
+"DATA",176.112,24002,1)
+312111
+"DATA",176.112,24003,0)
+4013166^OPRELVEKIN 5MG/VIL INJ
+"DATA",176.112,24003,1)
+312109
+"DATA",176.112,24004,0)
+4001274^OPIUM ALKALOIDS HCL 20MG/ML INJ
+"DATA",176.112,24004,1)
+312108
+"DATA",176.112,24005,0)
+4003303^OPIUM 60MG/BELLADONNA EXTRACT 16.2MG SUPP,RTL
+"DATA",176.112,24005,1)
+312107
+"DATA",176.112,24006,0)
+4003301^OPIUM 60MG/BELLADONNA EXTRACT 15MG SUPP,RTL
+"DATA",176.112,24006,1)
+312106
+"DATA",176.112,24007,0)
+4015043^OPIUM 30MG/BELLADONNA EXTRACT 16.2MG SUPP,RTL
+"DATA",176.112,24007,1)
+312104
+"DATA",176.112,24008,0)
+4003302^OPIUM 30MG/BELLADONNA EXTRACT 15MG SUPP,RTL
+"DATA",176.112,24008,1)
+312103
+"DATA",176.112,24009,0)
+4007461^OPIUM 2.43MG/ASA 324MG/CAFN 32MG/IPECAC 2.43MG CAP
+"DATA",176.112,24009,1)
+312100
+"DATA",176.112,24010,0)
+4010564^OPIUM 18MG/HOMATROPINE 0.9MG/PECTIN 144MG/30ML SUSP
+"DATA",176.112,24010,1)
+312099
+"DATA",176.112,24011,0)
+4007462^OPIUM 1.5MG/ASA 150MG/CAFN 8MG/IPECAC 1.5MG TAB
+"DATA",176.112,24011,1)
+312097
+"DATA",176.112,24012,0)
+4013560^ONDANSETRON HCL 8MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,24012,1)
+312087
+"DATA",176.112,24013,0)
+4015956^ONDANSETRON HCL 8MG TAB,UD
+"DATA",176.112,24013,1)
+312086
+"DATA",176.112,24014,0)
+4009290^ONDANSETRON HCL 8MG TAB
+"DATA",176.112,24014,1)
+312086
+"DATA",176.112,24015,0)
+4009292^ONDANSETRON HCL 4MG/5ML SOLN,ORAL
+"DATA",176.112,24015,1)
+312085
+"DATA",176.112,24016,0)
+4014179^ONDANSETRON HCL 24MG TAB
+"DATA",176.112,24016,1)
+312084
+"DATA",176.112,24017,0)
+4009291^ONDANSETRON HCL 0.64MG/ML/DEXTROSE 5% INJ,BAG,50ML
+"DATA",176.112,24017,1)
+312083
+"DATA",176.112,24018,0)
+4009322^OLSALAZINE NA 250MG CAP
+"DATA",176.112,24018,1)
+312082
+"DATA",176.112,24019,0)
+4013028^OLOPATADINE HCL 0.1% SOLN,OPH
+"DATA",176.112,24019,1)
+312081
+"DATA",176.112,24020,0)
+4014899^OLANZAPINE 7.5MG TAB,UD
+"DATA",176.112,24020,1)
+312079
+"DATA",176.112,24021,0)
+4012954^OLANZAPINE 7.5MG TAB
+"DATA",176.112,24021,1)
+312079
+"DATA",176.112,24022,0)
+4012953^OLANZAPINE 5MG TAB
+"DATA",176.112,24022,1)
+312078
+"DATA",176.112,24023,0)
+4014900^OLANZAPINE 5MG TAB,UD
+"DATA",176.112,24023,1)
+312078
+"DATA",176.112,24024,0)
+4015394^OLANZAPINE 15MG TAB,UD
+"DATA",176.112,24024,1)
+312077
+"DATA",176.112,24025,0)
+4014455^OLANZAPINE 15MG TAB
+"DATA",176.112,24025,1)
+312077
+"DATA",176.112,24026,0)
+4015558^OLANZAPINE 10MG,TAB RAPID DISINTEGRATING
+"DATA",176.112,24026,1)
+312076
+"DATA",176.112,24027,0)
+4015077^OLANZAPINE 10MG TAB,RAPID DISINTERGRATING
+"DATA",176.112,24027,1)
+312076
+"DATA",176.112,24028,0)
+4015556^OLANZAPINE 10MG,TAB,RAPID DISINTEGRATING TAB
+"DATA",176.112,24028,1)
+312076
+"DATA",176.112,24029,0)
+4009306^OFLOXACIN 0.3% SOLN,OPH
+"DATA",176.112,24029,1)
+312075
+"DATA",176.112,24030,0)
+4008961^OCTREOTIDE ACETATE 1MG/ML INJ
+"DATA",176.112,24030,1)
+312071
+"DATA",176.112,24031,0)
+4008959^OCTREOTIDE ACETATE 0.5MG/ML INJ
+"DATA",176.112,24031,1)
+312070
+"DATA",176.112,24032,0)
+4008958^OCTREOTIDE ACETATE 0.1MG/ML INJ
+"DATA",176.112,24032,1)
+312069
+"DATA",176.112,24033,0)
+4008957^OCTREOTIDE ACETATE 0.05MG/ML INJ
+"DATA",176.112,24033,1)
+312068
+"DATA",176.112,24034,0)
+4010268^OATMEAL,COLLOIDAL 51%/SALICYLIC ACID 2% CLEANSING BAR
+"DATA",176.112,24034,1)
+312066
+"DATA",176.112,24035,0)
+4012333^OATMEAL,COLLOIDAL 5% BATH OIL
+"DATA",176.112,24035,1)
+312065
+"DATA",176.112,24036,0)
+4009954^OAT BRAN 800MG TAB
+"DATA",176.112,24036,1)
+312063
+"DATA",176.112,24037,0)
+4001508^NYSTATIN 500000UNT TAB
+"DATA",176.112,24037,1)
+312059
+"DATA",176.112,24038,0)
+4001509^NYSTATIN 500000UNT CAP
+"DATA",176.112,24038,1)
+312058
+"DATA",176.112,24039,0)
+4005691^NYSTATIN 250000UNT/OXYTETRACYCLINE 250MG CAP
+"DATA",176.112,24039,1)
+312057
+"DATA",176.112,24040,0)
+4001510^NYSTATIN 200000UNT LOZENGE
+"DATA",176.112,24040,1)
+312056
+"DATA",176.112,24041,0)
+4001511^NYSTATIN 100000 UNT/ML SUSP,ORAL,5ML
+"DATA",176.112,24041,1)
+312055
+"DATA",176.112,24042,0)
+4001505^NYSTATIN 100000UNT/ML SUSP,ORAL
+"DATA",176.112,24042,1)
+312055
+"DATA",176.112,24043,0)
+4001504^NYSTATIN 100000UNT/GM OINT,TOP
+"DATA",176.112,24043,1)
+312051
+"DATA",176.112,24044,0)
+4002586^NYLIDRIN HCL 6MG TAB
+"DATA",176.112,24044,1)
+312048
+"DATA",176.112,24045,0)
+4002587^NYLIDRIN HCL 12MG TAB
+"DATA",176.112,24045,1)
+312047
+"DATA",176.112,24046,0)
+4001214^NORTRIPTYLINE HCL 10MG/5ML SOLN,ORAL
+"DATA",176.112,24046,1)
+312036
+"DATA",176.112,24047,0)
+4005240^ETHINYL ESTRADIOL 0.035MG/NORETHINDRONE 1MG TAB
+"DATA",176.112,24047,1)
+312033
+"DATA",176.112,24048,0)
+4009075^NORFLOXACIN 0.3% SOLN,OPH
+"DATA",176.112,24048,1)
+312032
+"DATA",176.112,24049,0)
+4005024^NORETHINDRONE ACETATE 5MG TAB
+"DATA",176.112,24049,1)
+312031
+"DATA",176.112,24050,0)
+4005026^NORETHINDRONE 5MG TAB
+"DATA",176.112,24050,1)
+312031
+"DATA",176.112,24051,0)
+4010468^NONOXYNOL-9 3% GEL,VAG
+"DATA",176.112,24051,1)
+312029
+"DATA",176.112,24052,0)
+4010465^NONOXYNOL-9 12.5% FOAM,VAG
+"DATA",176.112,24052,1)
+312028
+"DATA",176.112,24053,0)
+4014682^NIZATIDINE 150MG CAP,UD
+"DATA",176.112,24053,1)
+312025
+"DATA",176.112,24054,0)
+4008417^NIZATIDINE 150MG CAP
+"DATA",176.112,24054,1)
+312025
+"DATA",176.112,24055,0)
+4007923^NITROUS OXIDE 99.9% GAS
+"DATA",176.112,24055,1)
+312023
+"DATA",176.112,24056,0)
+4007922^NITROUS OXIDE 99% GAS
+"DATA",176.112,24056,1)
+312022
+"DATA",176.112,24057,0)
+4001246^NITROGLYCERIN 9MG TAB,SA
+"DATA",176.112,24057,1)
+312021
+"DATA",176.112,24058,0)
+4014338^NITROGLYCERIN 9MG CAP,SA,UD
+"DATA",176.112,24058,1)
+312020
+"DATA",176.112,24059,0)
+4001228^NITROGLYCERIN 9MG CAP,SA
+"DATA",176.112,24059,1)
+312020
+"DATA",176.112,24060,0)
+4001245^NITROGLYCERIN 6.5MG TAB,SA
+"DATA",176.112,24060,1)
+312019
+"DATA",176.112,24061,0)
+4014590^NITROGLYCERIN 6.5MG CAP,SA,UD
+"DATA",176.112,24061,1)
+312018
+"DATA",176.112,24062,0)
+4001230^NITROGLYCERIN 6.5MG CAP,SA
+"DATA",176.112,24062,1)
+312018
+"DATA",176.112,24063,0)
+4001236^NITROGLYCERIN 3MG TAB,BUCC,SA
+"DATA",176.112,24063,1)
+312017
+"DATA",176.112,24064,0)
+4001235^NITROGLYCERIN 2MG TAB,BUCC,SA
+"DATA",176.112,24064,1)
+312016
+"DATA",176.112,24065,0)
+4001244^NITROGLYCERIN 2.6MG TAB,SA
+"DATA",176.112,24065,1)
+312015
+"DATA",176.112,24066,0)
+4001248^NITROGLYCERIN 2.5MG TAB,BUCC,SA
+"DATA",176.112,24066,1)
+312014
+"DATA",176.112,24067,0)
+4014278^NITROGLYCERIN 2.5MG CAP,SA,UD
+"DATA",176.112,24067,1)
+312013
+"DATA",176.112,24068,0)
+4001229^NITROGLYCERIN 2.5MG CAP,SA
+"DATA",176.112,24068,1)
+312013
+"DATA",176.112,24069,0)
+4001253^NITROGLYCERIN 13MG CAP,SA
+"DATA",176.112,24069,1)
+312012
+"DATA",176.112,24070,0)
+4001251^NITROGLYCERIN 10MG/ML INJ
+"DATA",176.112,24070,1)
+312011
+"DATA",176.112,24071,0)
+4001249^NITROGLYCERIN 1.5MG TAB,BUCC,SA
+"DATA",176.112,24071,1)
+312010
+"DATA",176.112,24072,0)
+4001262^NITROGLYCERIN 0.8MG/HR PATCH
+"DATA",176.112,24072,1)
+312009
+"DATA",176.112,24073,0)
+4014176^NITROGLYCERIN 0.6MG/HR PATCH
+"DATA",176.112,24073,1)
+312008
+"DATA",176.112,24074,0)
+4001241^NITROGLYCERIN 15MG/24HRS PATCH
+"DATA",176.112,24074,1)
+312008
+"DATA",176.112,24075,0)
+4001243^NITROGLYCERIN 0.5MG/ML INJ
+"DATA",176.112,24075,1)
+312007
+"DATA",176.112,24076,0)
+4001259^NITROGLYCERIN 0.4MG/ML/D5W INJ
+"DATA",176.112,24076,1)
+312006
+"DATA",176.112,24077,0)
+4001265^NITROGLYCERIN 0.4MG/ML/D5W INJ,BTL,250ML
+"DATA",176.112,24077,1)
+312006
+"DATA",176.112,24078,0)
+4001264^NITROGLYCERIN 0.4MG/ML/D5W INJ,BTL,500ML
+"DATA",176.112,24078,1)
+312006
+"DATA",176.112,24079,0)
+4001233^NITROGLYCERIN 7.5MG/24HRS PATCH
+"DATA",176.112,24079,1)
+312005
+"DATA",176.112,24080,0)
+4015289^NITROGLYCERIN 0.3MG/HR PATCH
+"DATA",176.112,24080,1)
+312005
+"DATA",176.112,24081,0)
+4001258^NITROGLYCERIN 0.2MG/ML/D5W INJ
+"DATA",176.112,24081,1)
+312004
+"DATA",176.112,24082,0)
+4001261^NITROGLYCERIN 0.2MG/ML/D5W INJ,BTL,250ML
+"DATA",176.112,24082,1)
+312004
+"DATA",176.112,24083,0)
+4001231^NITROGLYCERIN 5MG/24HRS PATCH
+"DATA",176.112,24083,1)
+312003
+"DATA",176.112,24084,0)
+4001260^NITROGLYCERIN 0.2MG/HR PATCH
+"DATA",176.112,24084,1)
+312003
+"DATA",176.112,24085,0)
+4001257^NITROGLYCERIN 0.1MG/ML/D5W INJ
+"DATA",176.112,24085,1)
+312002
+"DATA",176.112,24086,0)
+4015288^NITROGLYCERIN 0.1MG/HR PATCH
+"DATA",176.112,24086,1)
+312001
+"DATA",176.112,24087,0)
+4001240^NITROGLYCERIN 2.5MG/24HRS PATCH
+"DATA",176.112,24087,1)
+312001
+"DATA",176.112,24088,0)
+4001227^NITROGLYCERIN 0.15MG TAB,SUBLINGUAL
+"DATA",176.112,24088,1)
+312000
+"DATA",176.112,24089,0)
+4008028^NITROGEN 99% GAS
+"DATA",176.112,24089,1)
+311998
+"DATA",176.112,24090,0)
+4006978^NITROFURAZONE 0.2% LOTION
+"DATA",176.112,24090,1)
+311997
+"DATA",176.112,24091,0)
+4006976^NITROFURAZONE 0.2% CREAM,TOP
+"DATA",176.112,24091,1)
+311996
+"DATA",176.112,24092,0)
+4006848^NITROFURANTOIN 50MG CAP
+"DATA",176.112,24092,1)
+311995
+"DATA",176.112,24093,0)
+4006845^NITROFURANTOIN MACROCRYSTALLINE 50MG CAP
+"DATA",176.112,24093,1)
+311995
+"DATA",176.112,24094,0)
+4006855^NITROFURANTOIN MACROCRYSTALLINE 50MG CAP,UD
+"DATA",176.112,24094,1)
+311995
+"DATA",176.112,24095,0)
+4006850^NITROFURANTOIN MACROCRYSTALLINE 25MG CAP
+"DATA",176.112,24095,1)
+311994
+"DATA",176.112,24096,0)
+4015832^NITROFURANTOIN MONOHYDRATE/MACROCRYSTALLINE 100MG CAP,SA
+"DATA",176.112,24096,1)
+311993
+"DATA",176.112,24097,0)
+4006854^NITROFURANTOIN MACROCRYSTALLINE 100MG CAP,SA
+"DATA",176.112,24097,1)
+311993
+"DATA",176.112,24098,0)
+4006849^NITROFURANTOIN 100MG CAP
+"DATA",176.112,24098,1)
+311992
+"DATA",176.112,24099,0)
+4006846^NITROFURANTOIN MACROCRYSTALLINE 100MG CAP
+"DATA",176.112,24099,1)
+311992
+"DATA",176.112,24100,0)
+4006851^NITROFURANTOIN 50MG TAB
+"DATA",176.112,24100,1)
+311991
+"DATA",176.112,24101,0)
+4006853^NITROFURANTOIN 50MG CAP,SA
+"DATA",176.112,24101,1)
+311990
+"DATA",176.112,24102,0)
+4006852^NITROFURANTOIN 25MG/5ML SUSP,ORAL
+"DATA",176.112,24102,1)
+311989
+"DATA",176.112,24103,0)
+4006847^NITROFURANTOIN 100MG TAB
+"DATA",176.112,24103,1)
+311988
+"DATA",176.112,24104,0)
+4012843^NISOLDIPINE 40MG TAB,SA
+"DATA",176.112,24104,1)
+311986
+"DATA",176.112,24105,0)
+4012842^NISOLDIPINE 30MG TAB,SA
+"DATA",176.112,24105,1)
+311985
+"DATA",176.112,24106,0)
+4012841^NISOLDIPINE 20MG TAB,SA
+"DATA",176.112,24106,1)
+311984
+"DATA",176.112,24107,0)
+4012840^NISOLDIPINE 10MG TAB,SA
+"DATA",176.112,24107,1)
+311983
+"DATA",176.112,24108,0)
+4015392^NILUTAMIDE 150MG TAB
+"DATA",176.112,24108,1)
+311982
+"DATA",176.112,24109,0)
+4007716^NICOTINYL ALCOHOL TARTRATE 50MG TAB
+"DATA",176.112,24109,1)
+311978
+"DATA",176.112,24110,0)
+4007715^NICOTINYL ALCOHOL TARTRATE 150MG TAB,SA
+"DATA",176.112,24110,1)
+311977
+"DATA",176.112,24111,0)
+4007717^NICOTINYL ALCOHOL TARTRATE 150MG TAB,EC
+"DATA",176.112,24111,1)
+311976
+"DATA",176.112,24112,0)
+4005637^NICOTINE POLACRILEX 4MG TAB,CHEWG GUM
+"DATA",176.112,24112,1)
+311975
+"DATA",176.112,24113,0)
+4010103^NICOTINE 23MG/24HRS PATCH
+"DATA",176.112,24113,1)
+311974
+"DATA",176.112,24114,0)
+4010107^NICOTINE 22MG/24HRS PATCH
+"DATA",176.112,24114,1)
+311973
+"DATA",176.112,24115,0)
+4010108^NICOTINE 11MG/24HRS PATCH
+"DATA",176.112,24115,1)
+311972
+"DATA",176.112,24116,0)
+4007504^NICOTINAMIDE HYDRIODIDE 25MG/POTASSIUM IODIDE 135MG TAB,SA
+"DATA",176.112,24116,1)
+311971
+"DATA",176.112,24117,0)
+4004361^NICLOSAMIDE 500MG TAB,CHEWABLE
+"DATA",176.112,24117,1)
+311970
+"DATA",176.112,24118,0)
+4008457^NICARDIPINE HCL 45MG CAP,SA
+"DATA",176.112,24118,1)
+311969
+"DATA",176.112,24119,0)
+4006745^NIACINAMIDE 50MG TAB
+"DATA",176.112,24119,1)
+311968
+"DATA",176.112,24120,0)
+4006748^NIACINAMIDE 500MG CAP
+"DATA",176.112,24120,1)
+311967
+"DATA",176.112,24121,0)
+4006746^NIACINAMIDE 100MG TAB
+"DATA",176.112,24121,1)
+311965
+"DATA",176.112,24122,0)
+4006379^NIACIN 750MG TAB,SA
+"DATA",176.112,24122,1)
+311963
+"DATA",176.112,24123,0)
+4008226^NIACIN 50MG/PHENIRAMINE 12.5MG TAB
+"DATA",176.112,24123,1)
+311962
+"DATA",176.112,24124,0)
+4006378^NIACIN 500MG TAB,SA
+"DATA",176.112,24124,1)
+311960
+"DATA",176.112,24125,0)
+4006376^NIACIN 500MG CAP,SA
+"DATA",176.112,24125,1)
+311959
+"DATA",176.112,24126,0)
+4006371^NIACIN 400MG CAP,SA
+"DATA",176.112,24126,1)
+311958
+"DATA",176.112,24127,0)
+4008165^NIACIN 3.3MG/NIACINAMIDE 3.3MG/PHENOBARB 160MG TAB
+"DATA",176.112,24127,1)
+311957
+"DATA",176.112,24128,0)
+4006377^NIACIN 250MG TAB,SA
+"DATA",176.112,24128,1)
+311955
+"DATA",176.112,24129,0)
+4007972^NIACIN 200MG/PENTYLENETETRAZOL 75MG TAB,SA
+"DATA",176.112,24129,1)
+311954
+"DATA",176.112,24130,0)
+4006374^NIACIN 200MG TAB,SA
+"DATA",176.112,24130,1)
+311953
+"DATA",176.112,24131,0)
+4006382^NIACIN 125MG TAB,SA
+"DATA",176.112,24131,1)
+311952
+"DATA",176.112,24132,0)
+4006370^NIACIN 125MG CAP,SA
+"DATA",176.112,24132,1)
+311951
+"DATA",176.112,24133,0)
+4006375^NIACIN 125MG CAP
+"DATA",176.112,24133,1)
+311950
+"DATA",176.112,24134,0)
+4006385^NIACIN 1000MG TAB,SA
+"DATA",176.112,24134,1)
+311949
+"DATA",176.112,24135,0)
+4009423^NIACIN 0.15MG/RIBOFLAVIN 0.02MG/THIAMINE 0.06MG TAB
+"DATA",176.112,24135,1)
+311948
+"DATA",176.112,24136,0)
+4013752^NEVIRAPINE 50MG/5ML SUSP,ORAL
+"DATA",176.112,24136,1)
+311943
+"DATA",176.112,24137,0)
+4002174^NEOSTIGMINE METHYLSULFATE 1MG/ML INJ
+"DATA",176.112,24137,1)
+311936
+"DATA",176.112,24138,0)
+4002172^NEOSTIGMINE METHYLSULFATE 0.5MG/ML INJ
+"DATA",176.112,24138,1)
+311935
+"DATA",176.112,24139,0)
+4005541^NEOMYCIN SO4 3.5MG/POLYMYXIN B SO4 10000UNT/GM CREAM,TOP
+"DATA",176.112,24139,1)
+311933
+"DATA",176.112,24140,0)
+4001181^NEOMYCIN SO4 125MG/5ML SOLN
+"DATA",176.112,24140,1)
+311932
+"DATA",176.112,24141,0)
+4003515^NEOMYCIN SO4 0.5%/PREDNISOLONE ACETATE 0.5% OINT,TOP
+"DATA",176.112,24141,1)
+311931
+"DATA",176.112,24142,0)
+4001185^NEOMYCIN SO4 0.5% CREAM,TOP
+"DATA",176.112,24142,1)
+311930
+"DATA",176.112,24143,0)
+4005539^NEOMYCIN SO4 0.35%/POLYMYXIN B 10000UNT/GM OINT,OPH
+"DATA",176.112,24143,1)
+311929
+"DATA",176.112,24144,0)
+4001183^NEOMYCIN SO4 0.35% OINT,TOP
+"DATA",176.112,24144,1)
+311928
+"DATA",176.112,24145,0)
+4012990^NELFINAVIR MESYLATE 50MG/GM PWDR,ORAL
+"DATA",176.112,24145,1)
+311925
+"DATA",176.112,24146,0)
+4012991^NELFINAVIR MESYLATE 250MG TAB
+"DATA",176.112,24146,1)
+311924
+"DATA",176.112,24147,0)
+4013891^NEFAZODONE 50MG TAB
+"DATA",176.112,24147,1)
+311923
+"DATA",176.112,24148,0)
+4014669^NEDOCROMIL NA 2% SOLN,OPH
+"DATA",176.112,24148,1)
+311922
+"DATA",176.112,24149,0)
+4015305^NATEGLINIDE 120MG TAB
+"DATA",176.112,24149,1)
+311919
+"DATA",176.112,24150,0)
+4013170^NARATRIPTAN HCL 1MG TAB,UD
+"DATA",176.112,24150,1)
+311918
+"DATA",176.112,24151,0)
+4006838^NAPROXEN NA 375MG TAB,SA
+"DATA",176.112,24151,1)
+311916
+"DATA",176.112,24152,0)
+4006839^NAPROXEN NA 500MG TAB,SA
+"DATA",176.112,24152,1)
+311915
+"DATA",176.112,24153,0)
+4006837^NAPROXEN 500MG TAB,EC
+"DATA",176.112,24153,1)
+311915
+"DATA",176.112,24154,0)
+4006834^NAPROXEN 125MG/5ML SUSP,ORAL
+"DATA",176.112,24154,1)
+311913
+"DATA",176.112,24155,0)
+4005498^NAPHAZOLINE HCL 0.1% SOLN,OPH
+"DATA",176.112,24155,1)
+311912
+"DATA",176.112,24156,0)
+4010207^NAPHAZOLINE HCL 0.05%/P-EPHRINE 0.5%/PYRILAMINE 0.2% SOLN,NASAL
+"DATA",176.112,24156,1)
+311911
+"DATA",176.112,24157,0)
+4005502^NAPHAZOLINE HCL 0.025%/PHENIRAMINE 0.3% SOLN,OPH
+"DATA",176.112,24157,1)
+311910
+"DATA",176.112,24158,0)
+4009249^NAPHAZOLINE HCL 0.02%/ZINC SO4 0.25% SOLN,OPH
+"DATA",176.112,24158,1)
+311909
+"DATA",176.112,24159,0)
+4005500^NAPHAZOLINE HCL 0.02% SOLN,OPH
+"DATA",176.112,24159,1)
+311908
+"DATA",176.112,24160,0)
+4005499^NAPHAZOLINE HCL 0.012% SOLN,OPH
+"DATA",176.112,24160,1)
+311907
+"DATA",176.112,24161,0)
+4005101^NANDROLONE DECANOATE 50MG/ML INJ
+"DATA",176.112,24161,1)
+311906
+"DATA",176.112,24162,0)
+4005100^NANDROLONE PHENPROPIONATE 50MG/ML INJ
+"DATA",176.112,24162,1)
+311906
+"DATA",176.112,24163,0)
+4005103^NANDROLONE DECANOATE 200MG/ML INJ
+"DATA",176.112,24163,1)
+311905
+"DATA",176.112,24164,0)
+4005102^NANDROLONE DECANOATE 100MG/ML INJ
+"DATA",176.112,24164,1)
+311904
+"DATA",176.112,24165,0)
+4007552^NALBUPHINE HCL 20MG/ML (PF) INJ,AMP,1ML
+"DATA",176.112,24165,1)
+311901
+"DATA",176.112,24166,0)
+4007547^NALBUPHINE HCL 20MG/ML INJ
+"DATA",176.112,24166,1)
+311901
+"DATA",176.112,24167,0)
+4007549^NALBUPHINE HCL 20MG/ML (PF) INJ
+"DATA",176.112,24167,1)
+311901
+"DATA",176.112,24168,0)
+4007546^NALBUPHINE HCL 10MG/ML INJ
+"DATA",176.112,24168,1)
+311900
+"DATA",176.112,24169,0)
+4007551^NALBUPHINE HCL 10MG/ML (PF) INJ,AMP,1ML
+"DATA",176.112,24169,1)
+311900
+"DATA",176.112,24170,0)
+4007548^NALBUPHINE HCL 10MG/ML (PF) INJ
+"DATA",176.112,24170,1)
+311900
+"DATA",176.112,24171,0)
+4003178^NAFCILLIN NA MONOHYDRATE 500MG TAB
+"DATA",176.112,24171,1)
+311899
+"DATA",176.112,24172,0)
+4003179^NAFCILLIN NA MONOHYDRATE 250MG/5ML SOLN,ORAL
+"DATA",176.112,24172,1)
+311898
+"DATA",176.112,24173,0)
+4003176^NAFCILLIN NA MONOHYDRATE 250MG CAP
+"DATA",176.112,24173,1)
+311897
+"DATA",176.112,24174,0)
+4003192^NAFCILLIN NA 2GM/50ML INJ,BAG
+"DATA",176.112,24174,1)
+311896
+"DATA",176.112,24175,0)
+4016298^NAFCILLIN NA 2GM/100ML INJ,BAG
+"DATA",176.112,24175,1)
+311895
+"DATA",176.112,24176,0)
+4003191^NAFCILLIN NA 1GM/50ML INJ,BAG
+"DATA",176.112,24176,1)
+311895
+"DATA",176.112,24177,0)
+4007366^NAFCILLIN NA 20MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,24177,1)
+311895
+"DATA",176.112,24178,0)
+4010093^NABUMETONE 750MG TAB
+"DATA",176.112,24178,1)
+311893
+"DATA",176.112,24179,0)
+4010092^NABUMETONE 500MG TAB
+"DATA",176.112,24179,1)
+311892
+"DATA",176.112,24180,0)
+4008469^NABILONE 1MG CAP
+"DATA",176.112,24180,1)
+311891
+"DATA",176.112,24181,0)
+4004099^N-MYCIN 0.35%/POLYMYX 10000UNT/ML/PREDNISOLONE 0.5% SUSP,OPH
+"DATA",176.112,24181,1)
+311888
+"DATA",176.112,24182,0)
+4013287^MYCOPHENOLATE MOFETIL HYDROCHLORIDE 500MG/VIL INJ,IV
+"DATA",176.112,24182,1)
+311881
+"DATA",176.112,24183,0)
+4013827^MYCOPHENOLATE MOFETIL 1000MG/5ML SUSP,ORAL
+"DATA",176.112,24183,1)
+311880
+"DATA",176.112,24184,0)
+4008425^MUPIROCIN CA 2% OINT,NASAL,1GM
+"DATA",176.112,24184,1)
+311878
+"DATA",176.112,24185,0)
+4008426^MUPIROCIN CA 2% CREAM,TOP
+"DATA",176.112,24185,1)
+311877
+"DATA",176.112,24186,0)
+4014242^MOXIFLOXACIN HCL 400MG TAB
+"DATA",176.112,24186,1)
+311787
+"DATA",176.112,24187,0)
+4014243^MOXIFLOXACIN HCL 400MG TAB,PKT,5
+"DATA",176.112,24187,1)
+311787
+"DATA",176.112,24188,0)
+4000981^MORPHINE SO4 8MG/ML INJ
+"DATA",176.112,24188,1)
+311785
+"DATA",176.112,24189,0)
+4000997^MORPHINE SO4 60MG TAB,SA
+"DATA",176.112,24189,1)
+311784
+"DATA",176.112,24190,0)
+4016126^MORPHINE SO4 60MG TAB,SA,UD
+"DATA",176.112,24190,1)
+311784
+"DATA",176.112,24191,0)
+4001001^MORPHINE SO4 3MG/ML INJ
+"DATA",176.112,24191,1)
+311781
+"DATA",176.112,24192,0)
+4016075^MORPHINE SO4 30MG TAB,SA,UD
+"DATA",176.112,24192,1)
+311779
+"DATA",176.112,24193,0)
+4000983^MORPHINE SO4 30MG TAB,SA
+"DATA",176.112,24193,1)
+311779
+"DATA",176.112,24194,0)
+4001007^MORPHINE SO4 30MG CAP
+"DATA",176.112,24194,1)
+311778
+"DATA",176.112,24195,0)
+4000979^MORPHINE SO4 2MG/ML INJ
+"DATA",176.112,24195,1)
+311777
+"DATA",176.112,24196,0)
+4000988^MORPHINE SO4 20MG/5ML SOLN,ORAL
+"DATA",176.112,24196,1)
+311775
+"DATA",176.112,24197,0)
+4000975^MORPHINE SO4 15MG/ML INJ
+"DATA",176.112,24197,1)
+311771
+"DATA",176.112,24198,0)
+4001006^MORPHINE SO4 15MG CAP
+"DATA",176.112,24198,1)
+311769
+"DATA",176.112,24199,0)
+4000987^MORPHINE SO4 10MG/5ML SOLN,ORAL
+"DATA",176.112,24199,1)
+311766
+"DATA",176.112,24200,0)
+4000999^MORPHINE SO4 100MG TAB,SA
+"DATA",176.112,24200,1)
+311764
+"DATA",176.112,24201,0)
+4016077^MORPHINE SO4 100MG TAB,SA,UD
+"DATA",176.112,24201,1)
+311764
+"DATA",176.112,24202,0)
+4009260^MORICIZINE HCL 300MG TAB
+"DATA",176.112,24202,1)
+311762
+"DATA",176.112,24203,0)
+4009259^MORICIZINE HCL 250MG TAB
+"DATA",176.112,24203,1)
+311761
+"DATA",176.112,24204,0)
+4009258^MORICIZINE HCL 200MG TAB
+"DATA",176.112,24204,1)
+311760
+"DATA",176.112,24205,0)
+4014570^MONTELUKAST NA 4MG TAB,CHEW
+"DATA",176.112,24205,1)
+311759
+"DATA",176.112,24206,0)
+4014571^MONTELUKAST NA 4MG TAB,CHEW,UD
+"DATA",176.112,24206,1)
+311759
+"DATA",176.112,24207,0)
+4013284^MOMETASONE FUROATE MONOHYDRATE 50MCG/ACTUAT SUSP,NASAL,17GM
+"DATA",176.112,24207,1)
+311754
+"DATA",176.112,24208,0)
+4008536^MOMETASONE FUROATE 0.1% CREAM,TOP
+"DATA",176.112,24208,1)
+311753
+"DATA",176.112,24209,0)
+4008068^MOLYBDENUM 25MCG/ML INJ
+"DATA",176.112,24209,1)
+311752
+"DATA",176.112,24210,0)
+4005185^MOLINDONE HCL 5MG TAB
+"DATA",176.112,24210,1)
+311743
+"DATA",176.112,24211,0)
+4005187^MOLINDONE HCL 25MG TAB
+"DATA",176.112,24211,1)
+311742
+"DATA",176.112,24212,0)
+4005190^MOLINDONE HCL 20MG/ML LIQUID,ORAL
+"DATA",176.112,24212,1)
+311741
+"DATA",176.112,24213,0)
+4005186^MOLINDONE HCL 10MG TAB
+"DATA",176.112,24213,1)
+311740
+"DATA",176.112,24214,0)
+4005189^MOLINDONE HCL 100MG TAB
+"DATA",176.112,24214,1)
+311739
+"DATA",176.112,24215,0)
+4012780^MOEXIPRIL HCL 7.5MG TAB
+"DATA",176.112,24215,1)
+311735
+"DATA",176.112,24216,0)
+4012781^MOEXIPRIL HCL 15MG TAB
+"DATA",176.112,24216,1)
+311734
+"DATA",176.112,24217,0)
+4009374^MIVACURIUM CL 0.5MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,24217,1)
+311732
+"DATA",176.112,24218,0)
+4003809^MITOTANE 500MG TAB,EC
+"DATA",176.112,24218,1)
+311731
+"DATA",176.112,24219,0)
+4008345^MISOPROSTOL 100MCG TAB
+"DATA",176.112,24219,1)
+311727
+"DATA",176.112,24220,0)
+4013771^MIRTAZAPINE 45MG TAB
+"DATA",176.112,24220,1)
+311726
+"DATA",176.112,24221,0)
+4027384^MIRTAZAPINE 45MG TAB,UD
+"DATA",176.112,24221,1)
+311726^^^MIRTAZAPINE 45MG TAB UD^Y
+"DATA",176.112,24222,0)
+4012917^MIRTAZAPINE 15MG TAB
+"DATA",176.112,24222,1)
+311725
+"DATA",176.112,24223,0)
+4014506^MIRTAZAPINE 15MG TAB,UD
+"DATA",176.112,24223,1)
+311725
+"DATA",176.112,24224,0)
+4013324^MINOXIDIL 5% SOLN,TOP
+"DATA",176.112,24224,1)
+311724
+"DATA",176.112,24225,0)
+4003454^MINOXIDIL 2% SOLN,TOP
+"DATA",176.112,24225,1)
+311723
+"DATA",176.112,24226,0)
+4009119^MINERAL OIL,LIGHT 100% STERILE,TOP
+"DATA",176.112,24226,1)
+311715
+"DATA",176.112,24227,0)
+4009120^MINERAL OIL,HEAVY 100% LIQUID
+"DATA",176.112,24227,1)
+311714
+"DATA",176.112,24228,0)
+4009128^MINERAL OIL 50% EMULSION
+"DATA",176.112,24228,1)
+311711
+"DATA",176.112,24229,0)
+4009368^MINERAL OIL 42.5%/PETROLATUM 57.3% OINT,OPH
+"DATA",176.112,24229,1)
+311710
+"DATA",176.112,24230,0)
+4009367^MINERAL OIL 42.5%/PETROLATUM 56.8% OINT,OPH
+"DATA",176.112,24230,1)
+311709
+"DATA",176.112,24231,0)
+4009397^MINERAL OIL 4.2GM/PHENOLPHTHALEIN 0.2GM/15ML EMULSION
+"DATA",176.112,24231,1)
+311707
+"DATA",176.112,24232,0)
+4009398^MINERAL OIL 1.4GM/PHENOLPHTHALEIN 67MG/5ML EMULSION
+"DATA",176.112,24232,1)
+311707
+"DATA",176.112,24233,0)
+4009396^MINERAL OIL 2.75GM//PHENOLPHTHALEIN 50MG/5ML LIQUID
+"DATA",176.112,24233,1)
+311706
+"DATA",176.112,24234,0)
+4010299^MILRINONE LACTATE 0.2MG/ML/DEXTROSE 5% INJ,BAG,200ML
+"DATA",176.112,24234,1)
+311705
+"DATA",176.112,24235,0)
+4010298^MILRINONE LACTATE 0.2MG/ML/DEXTROSE 5% INJ,BAG,100ML
+"DATA",176.112,24235,1)
+311705
+"DATA",176.112,24236,0)
+4014966^MIFEPRISTONE 200MG TAB,PKT,3
+"DATA",176.112,24236,1)
+311704
+"DATA",176.112,24237,0)
+4012966^MIDODRINE HCL 5MG TAB
+"DATA",176.112,24237,1)
+311703
+"DATA",176.112,24238,0)
+4002279^MIDAZOLAM HCL 5MG/ML INJ
+"DATA",176.112,24238,1)
+311702
+"DATA",176.112,24239,0)
+4026200^MIDAZOLAM HCL 5MG/ML (PF) INJ
+"DATA",176.112,24239,1)
+311702
+"DATA",176.112,24240,0)
+4026201^MIDAZOLAM HCL 1MG/ML (PF) INJ
+"DATA",176.112,24240,1)
+311700
+"DATA",176.112,24241,0)
+4002280^MIDAZOLAM HCL 1MG/ML INJ
+"DATA",176.112,24241,1)
+311700
+"DATA",176.112,24242,0)
+4005293^MICONAZOLE NITRATE 2% SPRAY,TOP
+"DATA",176.112,24242,1)
+311695
+"DATA",176.112,24243,0)
+4005287^MICONAZOLE NITRATE 2% PWDR,TOP
+"DATA",176.112,24243,1)
+311694
+"DATA",176.112,24244,0)
+4005281^MICONAZOLE NITRATE 2% CREAM,VAG
+"DATA",176.112,24244,1)
+311693
+"DATA",176.112,24245,0)
+4027326^MICONAZOLE NITRATE 2% TINCTURE,TOP
+"DATA",176.112,24245,1)
+311692
+"DATA",176.112,24246,0)
+4005283^MICONAZOLE NITRATE 2% CREAM,TOP
+"DATA",176.112,24246,1)
+311692
+"DATA",176.112,24247,0)
+4005286^MICONAZOLE 10MG/ML INJ
+"DATA",176.112,24247,1)
+311690
+"DATA",176.112,24248,0)
+4004576^MEZLOCILLIN NA 4GM/VIL INJ
+"DATA",176.112,24248,1)
+311689
+"DATA",176.112,24249,0)
+4004579^MEZLOCILLIN NA 4GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,24249,1)
+311689
+"DATA",176.112,24250,0)
+4004578^MEZLOCILLIN NA 3GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,24250,1)
+311689
+"DATA",176.112,24251,0)
+4004575^MEZLOCILLIN NA 3GM/VIL INJ
+"DATA",176.112,24251,1)
+311689
+"DATA",176.112,24252,0)
+4007668^MEXILETINE HCL 200MG CAP
+"DATA",176.112,24252,1)
+311686
+"DATA",176.112,24253,0)
+4014277^MEXILETINE HCL 200MG CAP,UD
+"DATA",176.112,24253,1)
+311686
+"DATA",176.112,24254,0)
+4007666^MEXILETINE HCL 100MG CAP
+"DATA",176.112,24254,1)
+311685
+"DATA",176.112,24255,0)
+4006542^METYRAPONE 250MG TAB
+"DATA",176.112,24255,1)
+311684
+"DATA",176.112,24256,0)
+4002397^METRONIDAZOLE 5MG/ML (RTU) INJ
+"DATA",176.112,24256,1)
+311683
+"DATA",176.112,24257,0)
+4007243^METRONIDAZOLE 5MG/ML/NACL 0.7% INJ
+"DATA",176.112,24257,1)
+311683
+"DATA",176.112,24258,0)
+4002396^METRONIDAZOLE HCL 500MG/VIL INJ
+"DATA",176.112,24258,1)
+311683
+"DATA",176.112,24259,0)
+4002398^METRONIDAZOLE HCL 5MG/ML (RTU) INJ
+"DATA",176.112,24259,1)
+311683
+"DATA",176.112,24260,0)
+4002399^METRONIDAZOLE 5MG/ML INJ
+"DATA",176.112,24260,1)
+311683
+"DATA",176.112,24261,0)
+4002402^METRONIDAZOLE 5MG/ML (PF) INJ
+"DATA",176.112,24261,1)
+311683
+"DATA",176.112,24262,0)
+4002400^METRONIDAZOLE HCL 5MG/ML INJ
+"DATA",176.112,24262,1)
+311683
+"DATA",176.112,24263,0)
+4014325^METRONIDAZOLE 750MG TAB,SA
+"DATA",176.112,24263,1)
+311682
+"DATA",176.112,24264,0)
+4014034^METRONIDAZOLE 500MG TAB,UD
+"DATA",176.112,24264,1)
+311681
+"DATA",176.112,24265,0)
+4002395^METRONIDAZOLE 500MG TAB
+"DATA",176.112,24265,1)
+311681
+"DATA",176.112,24266,0)
+4002407^METRONIDAZOLE 1% CREAM,TOP
+"DATA",176.112,24266,1)
+311680
+"DATA",176.112,24267,0)
+4002401^METRONIDAZOLE 0.75% GEL,TOP
+"DATA",176.112,24267,1)
+311679
+"DATA",176.112,24268,0)
+4002406^METRONIDAZOLE 0.75% CREAM,TOP
+"DATA",176.112,24268,1)
+311678
+"DATA",176.112,24269,0)
+4014276^METOPROLOL TARTRATE 50MG TAB,UD
+"DATA",176.112,24269,1)
+311676
+"DATA",176.112,24270,0)
+4004608^METOPROLOL TARTRATE 50MG TAB
+"DATA",176.112,24270,1)
+311676
+"DATA",176.112,24271,0)
+4015119^METOPROLOL TARTRATE 100MG TAB,UD
+"DATA",176.112,24271,1)
+311675
+"DATA",176.112,24272,0)
+4004609^METOPROLOL TARTRATE 100MG TAB
+"DATA",176.112,24272,1)
+311675
+"DATA",176.112,24273,0)
+4004613^METOPROLOL SUCCINATE 200MG TAB,SA
+"DATA",176.112,24273,1)
+311673
+"DATA",176.112,24274,0)
+4013960^METOLAZONE 5MG TAB,UD
+"DATA",176.112,24274,1)
+311671
+"DATA",176.112,24275,0)
+4003904^METOLAZONE 5MG TAB
+"DATA",176.112,24275,1)
+311671
+"DATA",176.112,24276,0)
+4002755^METOCLOPRAMIDE HCL 5MG/ML INJ
+"DATA",176.112,24276,1)
+311670
+"DATA",176.112,24277,0)
+4007555^METOCLOPRAMIDE HCL 5MG/ML/NACL 0.85% INJ
+"DATA",176.112,24277,1)
+311670
+"DATA",176.112,24278,0)
+4002757^METOCLOPRAMIDE HCL 5MG TAB
+"DATA",176.112,24278,1)
+311668
+"DATA",176.112,24279,0)
+4014687^METOCLOPRAMIDE HCL 5MG TAB,UD
+"DATA",176.112,24279,1)
+311668
+"DATA",176.112,24280,0)
+4002758^METOCLOPRAMIDE HCL 10MG/ML CONC,ORAL
+"DATA",176.112,24280,1)
+311667
+"DATA",176.112,24281,0)
+4002753^METOCLOPRAMIDE HCL 10MG TAB
+"DATA",176.112,24281,1)
+311666
+"DATA",176.112,24282,0)
+4013959^METOCLOPRAMIDE HCL 10MG TAB,UD
+"DATA",176.112,24282,1)
+311666
+"DATA",176.112,24283,0)
+4009323^METIPRANOLOL HCL 0.3% SOLN,OPH
+"DATA",176.112,24283,1)
+311665
+"DATA",176.112,24284,0)
+4002053^METHYPRYLON 50MG TAB
+"DATA",176.112,24284,1)
+311664
+"DATA",176.112,24285,0)
+4002054^METHYPRYLON 200MG TAB
+"DATA",176.112,24285,1)
+311663
+"DATA",176.112,24286,0)
+4000794^METHYLTESTOSTERONE 5MG TAB,SUBLINGUAL
+"DATA",176.112,24286,1)
+311662
+"DATA",176.112,24287,0)
+4000797^METHYLTESTOSTERONE 5MG TAB,BUCC
+"DATA",176.112,24287,1)
+311661
+"DATA",176.112,24288,0)
+4000795^METHYLTESTOSTERONE 10MG TAB,BUCC
+"DATA",176.112,24288,1)
+311660
+"DATA",176.112,24289,0)
+4003427^METHYLPREDNISOLONE NA SUCCINATE 40MG/VIL INJ
+"DATA",176.112,24289,1)
+311659
+"DATA",176.112,24290,0)
+4003439^METHYLPREDNISOLONE NA SUCCINATE 2000MG/VIL INJ
+"DATA",176.112,24290,1)
+311658
+"DATA",176.112,24291,0)
+4003434^METHYLPREDNISOLONE ACETATE 40MG/BTL PWDR,RTL
+"DATA",176.112,24291,1)
+311657
+"DATA",176.112,24292,0)
+4003525^METHYLPREDNISOLONE ACETATE 0.25%/NEOMYCIN SO4 0.5% CREAM,TOP
+"DATA",176.112,24292,1)
+311655
+"DATA",176.112,24293,0)
+4015437^METHYLPHENIDATE HCL 36MG TAB,SA
+"DATA",176.112,24293,1)
+311653
+"DATA",176.112,24294,0)
+4004069^METHYLPHENIDATE HCL 20MG TAB,SA
+"DATA",176.112,24294,1)
+311652
+"DATA",176.112,24295,0)
+4015436^METHYLPHENIDATE HCL 18MG TAB,SA
+"DATA",176.112,24295,1)
+311651
+"DATA",176.112,24296,0)
+4014659^METHYLPHENIDATE HCL 10MG TAB,SA
+"DATA",176.112,24296,1)
+311650
+"DATA",176.112,24297,0)
+4006425^METHYLERGONOVINE MALEATE 0.2MG TAB
+"DATA",176.112,24297,1)
+311649
+"DATA",176.112,24298,0)
+4006410^METHYLENE BLUE 55MG TAB
+"DATA",176.112,24298,1)
+311647
+"DATA",176.112,24299,0)
+4006409^METHYLENE BLUE 1GM TAB
+"DATA",176.112,24299,1)
+311646
+"DATA",176.112,24300,0)
+4002709^METHYLDOPA 250MG TAB,SA
+"DATA",176.112,24300,1)
+311645
+"DATA",176.112,24301,0)
+4008287^METHYLCELLULOSE 500MG CAP
+"DATA",176.112,24301,1)
+311644
+"DATA",176.112,24302,0)
+4008289^METHYLCELLULOSE 1.8% SOLN,ORAL
+"DATA",176.112,24302,1)
+311643
+"DATA",176.112,24303,0)
+4008285^METHYLCELLULOSE 1% SOLN,OPH
+"DATA",176.112,24303,1)
+311642
+"DATA",176.112,24304,0)
+4008284^METHYLCELLULOSE 0.5% SOLN,OPH
+"DATA",176.112,24304,1)
+311641
+"DATA",176.112,24305,0)
+4008283^METHYLCELLULOSE 0.25% SOLN,OPH
+"DATA",176.112,24305,1)
+311640
+"DATA",176.112,24306,0)
+4015284^METHYLBENZETHONIUM CL 0.1% LIQUID,ORAL
+"DATA",176.112,24306,1)
+311639
+"DATA",176.112,24307,0)
+4009221^METHYL SALICYLATE 30% OINT,TOP
+"DATA",176.112,24307,1)
+311636
+"DATA",176.112,24308,0)
+4009219^METHYL SALICYLATE 10% CREAM,TOP
+"DATA",176.112,24308,1)
+311635
+"DATA",176.112,24309,0)
+4009412^METHYL ANTHRANILATE 5%/TITANIUM DIOXIDE 5% CREAM,TOP
+"DATA",176.112,24309,1)
+311633
+"DATA",176.112,24310,0)
+4006284^METHYCLOTHIAZIDE 5MG/PARGYLINE HCL 25MG TAB
+"DATA",176.112,24310,1)
+311632
+"DATA",176.112,24311,0)
+4006270^METHOXYFLURANE 99.9% INHL
+"DATA",176.112,24311,1)
+311630
+"DATA",176.112,24312,0)
+4007120^METHOTRIMEPRAZINE 20MG/ML INJ
+"DATA",176.112,24312,1)
+311628
+"DATA",176.112,24313,0)
+4002742^METHOTREXATE NA 50MG/VIL (PF) INJ
+"DATA",176.112,24313,1)
+311627
+"DATA",176.112,24314,0)
+4002746^METHOTREXATE NA 20MG/VIL INJ
+"DATA",176.112,24314,1)
+311627
+"DATA",176.112,24315,0)
+4002739^METHOTREXATE NA 50MG/VIL INJ
+"DATA",176.112,24315,1)
+311627
+"DATA",176.112,24316,0)
+4002745^METHOTREXATE NA 25MG/ML (PF) INJ
+"DATA",176.112,24316,1)
+311627
+"DATA",176.112,24317,0)
+4002747^METHOTREXATE NA 25MG/ML INJ
+"DATA",176.112,24317,1)
+311627
+"DATA",176.112,24318,0)
+4002741^METHOTREXATE NA 250MG/VIL INJ
+"DATA",176.112,24318,1)
+311627
+"DATA",176.112,24319,0)
+4002748^METHOTREXATE NA 250MG/VIL (PF) INJ
+"DATA",176.112,24319,1)
+311627
+"DATA",176.112,24320,0)
+4002740^METHOTREXATE NA 100MG/VIL INJ
+"DATA",176.112,24320,1)
+311627
+"DATA",176.112,24321,0)
+4002743^METHOTREXATE NA 100MG/VIL (PF) INJ
+"DATA",176.112,24321,1)
+311627
+"DATA",176.112,24322,0)
+4007419^METHOTREXATE NA 25MG/ML/NACL 0.49% (PF) INJ
+"DATA",176.112,24322,1)
+311627
+"DATA",176.112,24323,0)
+4002744^METHOTREXATE NA 200MG/VIL (PF) INJ
+"DATA",176.112,24323,1)
+311627
+"DATA",176.112,24324,0)
+4002738^METHOTREXATE NA 25MG/VIL INJ
+"DATA",176.112,24324,1)
+311626
+"DATA",176.112,24325,0)
+4002749^METHOTREXATE NA 1GM/VIL INJ
+"DATA",176.112,24325,1)
+311625
+"DATA",176.112,24326,0)
+4007418^METHOTREXATE NA 15MG/ML/NACL 0.9% INJ
+"DATA",176.112,24326,1)
+311624
+"DATA",176.112,24327,0)
+4000930^METHOHEXITAL NA 2.5GM/VIL INJ
+"DATA",176.112,24327,1)
+311623
+"DATA",176.112,24328,0)
+4000929^METHOHEXITAL NA 500MG/VIL INJ
+"DATA",176.112,24328,1)
+311623
+"DATA",176.112,24329,0)
+4000928^METHOHEXITAL NA 5GM/VIL INJ
+"DATA",176.112,24329,1)
+311623
+"DATA",176.112,24330,0)
+4007454^METHIONINE 500MG TAB
+"DATA",176.112,24330,1)
+311622
+"DATA",176.112,24331,0)
+4007456^METHIONINE 500MG CAP
+"DATA",176.112,24331,1)
+311621
+"DATA",176.112,24332,0)
+4003850^METHICILLIN NA 4GM/VIL INJ
+"DATA",176.112,24332,1)
+311620
+"DATA",176.112,24333,0)
+4003849^METHICILLIN NA 6GM/VIL INJ
+"DATA",176.112,24333,1)
+311620
+"DATA",176.112,24334,0)
+4003848^METHICILLIN NA 1GM/VIL INJ
+"DATA",176.112,24334,1)
+311620
+"DATA",176.112,24335,0)
+4003847^METHICILLIN NA 10GM/VIL INJ
+"DATA",176.112,24335,1)
+311619
+"DATA",176.112,24336,0)
+4006767^METHENAMINE MANDELATE 500MG/NA BIPHOSPHATE 500MG TAB
+"DATA",176.112,24336,1)
+311616
+"DATA",176.112,24337,0)
+4006925^METHENAMINE MANDELATE 500MG/K PHOSPHATE 250MG TAB
+"DATA",176.112,24337,1)
+311615
+"DATA",176.112,24338,0)
+4006766^METHENAMINE MANDELATE 350MG/NA BIPHOSPHATE 200MG TAB
+"DATA",176.112,24338,1)
+311613
+"DATA",176.112,24339,0)
+4002573^METHENAMINE MANDELATE 250MG/5ML SUSP,ORAL
+"DATA",176.112,24339,1)
+311612
+"DATA",176.112,24340,0)
+4002576^METHENAMINE MANDELATE 250MG TAB,EC
+"DATA",176.112,24340,1)
+311611
+"DATA",176.112,24341,0)
+4002578^METHENAMINE MANDELATE 1GM TAB,EC
+"DATA",176.112,24341,1)
+311609
+"DATA",176.112,24342,0)
+4006768^METHENAMINE 325MG/NA BIPHOSPHATE 325MG TAB
+"DATA",176.112,24342,1)
+311608
+"DATA",176.112,24343,0)
+4005867^METHDILAZINE HCL 8MG TAB
+"DATA",176.112,24343,1)
+311607
+"DATA",176.112,24344,0)
+4005866^METHDILAZINE HCL 3.6MG TAB,CHEWABLE
+"DATA",176.112,24344,1)
+311605
+"DATA",176.112,24345,0)
+4006258^METHARBITAL 100MG TAB
+"DATA",176.112,24345,1)
+311604
+"DATA",176.112,24346,0)
+4003631^METHANTHELINE BR 50MG TAB
+"DATA",176.112,24346,1)
+311603
+"DATA",176.112,24347,0)
+4007094^METHANDROSTENOLONE 2.5MG TAB
+"DATA",176.112,24347,1)
+311602
+"DATA",176.112,24348,0)
+4007488^METHANDRIOL DIPROPIONATE 50MG/ML INJ
+"DATA",176.112,24348,1)
+311601
+"DATA",176.112,24349,0)
+4006111^METHAMPHETAMINE HCL 5MG TAB,SA
+"DATA",176.112,24349,1)
+311600
+"DATA",176.112,24350,0)
+4006113^METHAMPHETAMINE HCL 15MG TAB,SA
+"DATA",176.112,24350,1)
+311599
+"DATA",176.112,24351,0)
+4006112^METHAMPHETAMINE HCL 10MG TAB,SA
+"DATA",176.112,24351,1)
+311598
+"DATA",176.112,24352,0)
+4000787^METHADONE HCL 95MG/20ML SOLN,ORAL
+"DATA",176.112,24352,1)
+311597
+"DATA",176.112,24353,0)
+4000785^METHADONE HCL 85MG/20ML SOLN,ORAL
+"DATA",176.112,24353,1)
+311596
+"DATA",176.112,24354,0)
+4000784^METHADONE HCL 80MG/20ML SOLN,ORAL
+"DATA",176.112,24354,1)
+311595
+"DATA",176.112,24355,0)
+4000783^METHADONE HCL 75MG/20ML SOLN,ORAL
+"DATA",176.112,24355,1)
+311594
+"DATA",176.112,24356,0)
+4000782^METHADONE HCL 70MG/20ML SOLN,ORAL
+"DATA",176.112,24356,1)
+311593
+"DATA",176.112,24357,0)
+4000780^METHADONE HCL 60MG/20ML SOLN,ORAL
+"DATA",176.112,24357,1)
+311592
+"DATA",176.112,24358,0)
+4000769^METHADONE HCL 5MG/20ML SOLN,ORAL
+"DATA",176.112,24358,1)
+311591
+"DATA",176.112,24359,0)
+4000779^METHADONE HCL 55MG/20ML SOLN,ORAL
+"DATA",176.112,24359,1)
+311590
+"DATA",176.112,24360,0)
+4000778^METHADONE HCL 50MG/20ML SOLN,ORAL
+"DATA",176.112,24360,1)
+311589
+"DATA",176.112,24361,0)
+4000777^METHADONE HCL 45MG/20ML SOLN,ORAL
+"DATA",176.112,24361,1)
+311588
+"DATA",176.112,24362,0)
+4000775^METHADONE HCL 35MG/20ML SOLN,ORAL
+"DATA",176.112,24362,1)
+311587
+"DATA",176.112,24363,0)
+4000774^METHADONE HCL 30MG/20ML SOLN,ORAL
+"DATA",176.112,24363,1)
+311586
+"DATA",176.112,24364,0)
+4000772^METHADONE HCL 20MG/20ML SOLN,ORAL
+"DATA",176.112,24364,1)
+311585
+"DATA",176.112,24365,0)
+4000763^METHADONE HCL 1MG/ML SOLN,ORAL
+"DATA",176.112,24365,1)
+311585
+"DATA",176.112,24366,0)
+4000767^METHADONE HCL 2.5MG TAB,EFFERVSC
+"DATA",176.112,24366,1)
+311584
+"DATA",176.112,24367,0)
+4000771^METHADONE HCL 15MG/20ML SOLN,ORAL
+"DATA",176.112,24367,1)
+311583
+"DATA",176.112,24368,0)
+4000762^METHADONE HCL 10MG/ML SOLN,ORAL
+"DATA",176.112,24368,1)
+311582
+"DATA",176.112,24369,0)
+4000764^METHADONE HCL 10MG/5ML SOLN,ORAL
+"DATA",176.112,24369,1)
+311581
+"DATA",176.112,24370,0)
+4000776^METHADONE HCL 40MG/20ML SOLN,ORAL
+"DATA",176.112,24370,1)
+311581
+"DATA",176.112,24371,0)
+4000770^METHADONE HCL 10MG/20ML SOLN,ORAL
+"DATA",176.112,24371,1)
+311580
+"DATA",176.112,24372,0)
+4000759^METHADONE HCL 10MG TAB
+"DATA",176.112,24372,1)
+311579
+"DATA",176.112,24373,0)
+4016066^METHADONE HCL 10MG TAB,UD
+"DATA",176.112,24373,1)
+311579
+"DATA",176.112,24374,0)
+4000788^METHADONE HCL 100MG/20ML SOLN,ORAL
+"DATA",176.112,24374,1)
+311578
+"DATA",176.112,24375,0)
+4000789^METHADONE HCL 0.58MG/ML SOLN,ORAL
+"DATA",176.112,24375,1)
+311577
+"DATA",176.112,24376,0)
+4004862^METHACYCLINE HCL 300MG CAP
+"DATA",176.112,24376,1)
+311576
+"DATA",176.112,24377,0)
+4004861^METHACYCLINE HCL 150MG CAP
+"DATA",176.112,24377,1)
+311575
+"DATA",176.112,24378,0)
+4012897^METHACHOLINE CL 20MG/ML SOLN,INHL
+"DATA",176.112,24378,1)
+311574
+"DATA",176.112,24379,0)
+4010049^METHACHOLINE CL 0.25%/METHYL SALICYLATE 10% OINT,TOP
+"DATA",176.112,24379,1)
+311573
+"DATA",176.112,24380,0)
+4012736^METFORMIN HCL 850MG TAB
+"DATA",176.112,24380,1)
+311572
+"DATA",176.112,24381,0)
+4016501^METFORMIN HCL 850MG TAB,UD
+"DATA",176.112,24381,1)
+311572
+"DATA",176.112,24382,0)
+4014984^METFORMIN HCL 500MG TAB,SA
+"DATA",176.112,24382,1)
+311571
+"DATA",176.112,24383,0)
+4016500^METFORMIN HCL 500MG TAB,UD
+"DATA",176.112,24383,1)
+311570
+"DATA",176.112,24384,0)
+4012735^METFORMIN HCL 500MG TAB
+"DATA",176.112,24384,1)
+311570
+"DATA",176.112,24385,0)
+4016502^METFORMIN HCL 1000MG TAB,UD
+"DATA",176.112,24385,1)
+311569
+"DATA",176.112,24386,0)
+4013341^METFORMIN HCL 1000MG TAB
+"DATA",176.112,24386,1)
+311569
+"DATA",176.112,24387,0)
+4002977^METARAMINOL BITARTRATE 10MG/ML INJ
+"DATA",176.112,24387,1)
+311568
+"DATA",176.112,24388,0)
+4006456^METAPROTERENOL SO4 5% SOLN,INHL
+"DATA",176.112,24388,1)
+311567
+"DATA",176.112,24389,0)
+4006461^METAPROTERENOL SO4 15MG/ML SOLN,INHL
+"DATA",176.112,24389,1)
+311566
+"DATA",176.112,24390,0)
+4006455^METAPROTERENOL SO4 0.65MG/SPRAY INHL,ORAL
+"DATA",176.112,24390,1)
+311564
+"DATA",176.112,24391,0)
+4006460^METAPROTERENOL SO4 0.6% SOLN,INHL
+"DATA",176.112,24391,1)
+311563
+"DATA",176.112,24392,0)
+4006462^METAPROTERENOL SO4 0.4% SOLN,INHL
+"DATA",176.112,24392,1)
+311562
+"DATA",176.112,24393,0)
+4007885^METACRESYL ACETATE 25% SOLN,OTIC
+"DATA",176.112,24393,1)
+311561
+"DATA",176.112,24394,0)
+4012136^METACRESYL ACETATE 2.17% CREAM
+"DATA",176.112,24394,1)
+311560
+"DATA",176.112,24395,0)
+4007884^METACRESYL ACETATE 100% SOLN
+"DATA",176.112,24395,1)
+311559
+"DATA",176.112,24396,0)
+4005226^MESTRANOL 0.1MG/NORETHINDRONE 2MG TAB
+"DATA",176.112,24396,1)
+311558
+"DATA",176.112,24397,0)
+4003606^MESTRANOL 0.15MG/NORETHYNODREL 9.85MG TAB
+"DATA",176.112,24397,1)
+311557
+"DATA",176.112,24398,0)
+4003605^MESTRANOL 0.075MG/NORETHYNODREL 5MG TAB
+"DATA",176.112,24398,1)
+311556
+"DATA",176.112,24399,0)
+4007658^MESORIDAZINE BESYLATE 50MG TAB
+"DATA",176.112,24399,1)
+311555
+"DATA",176.112,24400,0)
+4007660^MESORIDAZINE BESYLATE 25MG/ML LIQUID,ORAL
+"DATA",176.112,24400,1)
+311554
+"DATA",176.112,24401,0)
+4007657^MESORIDAZINE BESYLATE 25MG TAB
+"DATA",176.112,24401,1)
+311553
+"DATA",176.112,24402,0)
+4007656^MESORIDAZINE BESYLATE 10MG TAB
+"DATA",176.112,24402,1)
+311552
+"DATA",176.112,24403,0)
+4007659^MESORIDAZINE BESYLATE 100MG TAB
+"DATA",176.112,24403,1)
+311551
+"DATA",176.112,24404,0)
+4009058^MESALAMINE 400MG TAB,SA
+"DATA",176.112,24404,1)
+311550
+"DATA",176.112,24405,0)
+4024851^MESALAMINE 400MG TAB,EC
+"DATA",176.112,24405,1)
+311550
+"DATA",176.112,24406,0)
+4012980^MEROPENEM 1GM/VIL INJ,100ML
+"DATA",176.112,24406,1)
+311549
+"DATA",176.112,24407,0)
+4012978^MEROPENEM 500MG/VIL INJ,100ML
+"DATA",176.112,24407,1)
+311549
+"DATA",176.112,24408,0)
+4012982^MEROPENEM 1GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,24408,1)
+311549
+"DATA",176.112,24409,0)
+4012979^MEROPENEM 1GM/VIL INJ
+"DATA",176.112,24409,1)
+311549
+"DATA",176.112,24410,0)
+4012977^MEROPENEM 500MG/VIL INJ
+"DATA",176.112,24410,1)
+311549
+"DATA",176.112,24411,0)
+4012981^MEROPENEM 500MG/VIL INJ,ADD-VANTAGE
+"DATA",176.112,24411,1)
+311549
+"DATA",176.112,24412,0)
+4009958^MERCURY,AMMONIATED 5% OINT,TOP
+"DATA",176.112,24412,1)
+311542
+"DATA",176.112,24413,0)
+4009482^MERCURIC OXIDE,YELLOW 2% OINT,OPH
+"DATA",176.112,24413,1)
+311541
+"DATA",176.112,24414,0)
+4009798^MERBROMIN 2% SOLN,TOP
+"DATA",176.112,24414,1)
+311540
+"DATA",176.112,24415,0)
+4002772^MEPROBAMATE 400MG/TRIDIHEXETHYL CL 25MG TAB
+"DATA",176.112,24415,1)
+311539
+"DATA",176.112,24416,0)
+4003061^MEPROBAMATE 400MG CAP,SA
+"DATA",176.112,24416,1)
+311538
+"DATA",176.112,24417,0)
+4002771^MEPROBAMATE 200MG/TRIDIHEXETHYL CL 25MG TAB
+"DATA",176.112,24417,1)
+311537
+"DATA",176.112,24418,0)
+4004873^MEPROBAMATE 200MG/PENTAERYTHRITOL TETRANITRATE 20MG TAB
+"DATA",176.112,24418,1)
+311536
+"DATA",176.112,24419,0)
+4004872^MEPROBAMATE 200MG/PENTAERYTHRITOL TETRANITRATE 10MG TAB
+"DATA",176.112,24419,1)
+311535
+"DATA",176.112,24420,0)
+4003062^MEPROBAMATE 200MG CAP,SA
+"DATA",176.112,24420,1)
+311534
+"DATA",176.112,24421,0)
+4003220^MEPERIDINE HCL 50MG/PROMETHAZINE HCL 25MG CAP
+"DATA",176.112,24421,1)
+311531
+"DATA",176.112,24422,0)
+4014105^MEPERIDINE HCL 50MG/ML INJ,CARPUJECT,LUER LOCK,1ML
+"DATA",176.112,24422,1)
+311528
+"DATA",176.112,24423,0)
+4003229^MEPERIDINE HCL 25MG/0.5ML INJ
+"DATA",176.112,24423,1)
+311528
+"DATA",176.112,24424,0)
+4003222^MEPERIDINE HCL 50MG/ML INJ
+"DATA",176.112,24424,1)
+311528
+"DATA",176.112,24425,0)
+4003219^MEPERIDINE HCL 25MG/PROMETHAZINE HCL 25MG/ML INJ
+"DATA",176.112,24425,1)
+311526
+"DATA",176.112,24426,0)
+4003225^MEPERIDINE HCL 25MG/ML INJ
+"DATA",176.112,24426,1)
+311524
+"DATA",176.112,24427,0)
+4003223^MEPERIDINE HCL 100MG/ML INJ
+"DATA",176.112,24427,1)
+311519
+"DATA",176.112,24428,0)
+4009512^MENTHOL 8.4MG COUGH DROP
+"DATA",176.112,24428,1)
+311512
+"DATA",176.112,24429,0)
+4009532^MENTHOL 8%/METHYL SALICYLATE 30% CREAM,TOP
+"DATA",176.112,24429,1)
+311511
+"DATA",176.112,24430,0)
+4009527^MENTHOL 7.6%/METHYL SALICYLATE 29% OINT,TOP
+"DATA",176.112,24430,1)
+311510
+"DATA",176.112,24431,0)
+4009507^MENTHOL 7% GEL,TOP
+"DATA",176.112,24431,1)
+311509
+"DATA",176.112,24432,0)
+4013675^MENTHOL 5MG (SF) LOZENGE
+"DATA",176.112,24432,1)
+311508
+"DATA",176.112,24433,0)
+4009509^MENTHOL 5MG LOZENGE
+"DATA",176.112,24433,1)
+311508
+"DATA",176.112,24434,0)
+4009508^MENTHOL 3.6MG LOZENGE
+"DATA",176.112,24434,1)
+311507
+"DATA",176.112,24435,0)
+4009530^MENTHOL 3%/METHYL SALICYLATE 14% LOTION
+"DATA",176.112,24435,1)
+311506
+"DATA",176.112,24436,0)
+4009531^MENTHOL 3%/METHYL SALICYLATE 14% LIQUID,TOP
+"DATA",176.112,24436,1)
+311505
+"DATA",176.112,24437,0)
+4009525^MENTHOL 2%/METHYL SALICYLATE 10% OINT,TOP
+"DATA",176.112,24437,1)
+311504
+"DATA",176.112,24438,0)
+4009526^MENTHOL 2%/METHYL SALICYLATE 10% CREAM,TOP
+"DATA",176.112,24438,1)
+311503
+"DATA",176.112,24439,0)
+4009506^MENTHOL 2% GEL,TOP
+"DATA",176.112,24439,1)
+311502
+"DATA",176.112,24440,0)
+4009510^MENTHOL 15% OINT,TOP
+"DATA",176.112,24440,1)
+311501
+"DATA",176.112,24441,0)
+4009528^MENTHOL 10%/METHYL SALICYLATE 30% CREAM,TOP
+"DATA",176.112,24441,1)
+311500
+"DATA",176.112,24442,0)
+4009522^MENTHOL 10%/METHYL SALICYLATE 15% OINT,TOP
+"DATA",176.112,24442,1)
+311499
+"DATA",176.112,24443,0)
+4027521^MENTHOL/METHYL SALICYLATE (10-15%) LOW CONC. CREAM,TOP
+"DATA",176.112,24443,1)
+311498^^^MENTHOL/M-SALICYLATE 10-15% TOP CREAM^Y
+"DATA",176.112,24444,0)
+4009533^MENTHOL 10%/METHYL SALICYLATE 15% CREAM,TOP
+"DATA",176.112,24444,1)
+311498
+"DATA",176.112,24445,0)
+4010407^MENTHOL 1.25%/ME NICOTINATE 0.7%/ME SALICYLATE 30% OINT,TOP
+"DATA",176.112,24445,1)
+311497
+"DATA",176.112,24446,0)
+4010554^MENTHOL 1%/SULFUR 2% CONDITIONER
+"DATA",176.112,24446,1)
+311496
+"DATA",176.112,24447,0)
+4009414^MENTHOL 0.5%/PRAMOXINE 1% LOTION
+"DATA",176.112,24447,1)
+311495
+"DATA",176.112,24448,0)
+4009524^MENTHOL 0.4%/METHYL SALICYLATE 10% OINT,TOP
+"DATA",176.112,24448,1)
+311493
+"DATA",176.112,24449,0)
+4009725^MENTHOL 0.12%/PHENOL 1.45% LOZENGE
+"DATA",176.112,24449,1)
+311492
+"DATA",176.112,24450,0)
+4009724^MENTHOL 0.12%/PHENOL 0.72% LOZENGE
+"DATA",176.112,24450,1)
+311491
+"DATA",176.112,24451,0)
+4007892^MENADIONE 25MG/ML INJ,SUSP
+"DATA",176.112,24451,1)
+311489
+"DATA",176.112,24452,0)
+4002175^MENADIOL NA DIPHOSPHATE 5MG TAB
+"DATA",176.112,24452,1)
+311488
+"DATA",176.112,24453,0)
+4006471^MELPHALAN HCL 50MG/VIL INJ
+"DATA",176.112,24453,1)
+311487
+"DATA",176.112,24454,0)
+4014676^MELOXICAM 7.5MG TAB
+"DATA",176.112,24454,1)
+311486
+"DATA",176.112,24455,0)
+4014677^MELOXICAM 7.5MG TAB,UD
+"DATA",176.112,24455,1)
+311486
+"DATA",176.112,24456,0)
+4003765^MEGESTROL ACETATE 40MG TAB
+"DATA",176.112,24456,1)
+311485
+"DATA",176.112,24457,0)
+4014592^MEGESTROL ACETATE 40MG TAB,UD
+"DATA",176.112,24457,1)
+311485
+"DATA",176.112,24458,0)
+4025016^MEGESTROL ACETATE 200MG/5ML SUSP,ORAL,10ML
+"DATA",176.112,24458,1)
+311484
+"DATA",176.112,24459,0)
+4003766^MEGESTROL ACETATE 200MG/5ML SUSP,ORAL
+"DATA",176.112,24459,1)
+311484
+"DATA",176.112,24460,0)
+4009065^MEFLOQUINE HCL 250MG TAB
+"DATA",176.112,24460,1)
+311483
+"DATA",176.112,24461,0)
+4004100^MEDRYSONE 1% SUSP,OPH
+"DATA",176.112,24461,1)
+311482
+"DATA",176.112,24462,0)
+4002356^MEDROXYPROGESTERONE ACETATE 400MG/ML INJ,SUSP
+"DATA",176.112,24462,1)
+311481
+"DATA",176.112,24463,0)
+4002354^MEDROXYPROGESTERONE ACETATE 100MG/ML INJ,SUSP
+"DATA",176.112,24463,1)
+311479
+"DATA",176.112,24464,0)
+4002440^MECLIZINE HCL 50MG TAB
+"DATA",176.112,24464,1)
+311472
+"DATA",176.112,24465,0)
+4002442^MECLIZINE HCL 30MG CAP
+"DATA",176.112,24465,1)
+311471
+"DATA",176.112,24466,0)
+4014014^MECLIZINE HCL 25MG TAB,UD
+"DATA",176.112,24466,1)
+311470
+"DATA",176.112,24467,0)
+4002438^MECLIZINE HCL 25MG TAB
+"DATA",176.112,24467,1)
+311470
+"DATA",176.112,24468,0)
+4002439^MECLIZINE HCL 25MG TAB,CHEWABLE
+"DATA",176.112,24468,1)
+311469
+"DATA",176.112,24469,0)
+4002444^MECLIZINE HCL 25MG CAP
+"DATA",176.112,24469,1)
+311468
+"DATA",176.112,24470,0)
+4002441^MECLIZINE HCL 15MG CAP
+"DATA",176.112,24470,1)
+311467
+"DATA",176.112,24471,0)
+4002437^MECLIZINE HCL 12.5MG TAB
+"DATA",176.112,24471,1)
+311466
+"DATA",176.112,24472,0)
+4014013^MECLIZINE HCL 12.5MG TAB,UD
+"DATA",176.112,24472,1)
+311466
+"DATA",176.112,24473,0)
+4002843^MECAMYLAMINE HCL 2.5MG TAB
+"DATA",176.112,24473,1)
+311465
+"DATA",176.112,24474,0)
+4008157^MEBENDAZOLE 100MG TAB
+"DATA",176.112,24474,1)
+311464
+"DATA",176.112,24475,0)
+4006885^MANNITOL HEXANITRATE 30MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,24475,1)
+311454
+"DATA",176.112,24476,0)
+4006884^MANNITOL HEXANITRATE 30MG TAB
+"DATA",176.112,24476,1)
+311453
+"DATA",176.112,24477,0)
+4006007^MANNITOL 50MG/ML INJ
+"DATA",176.112,24477,1)
+311452
+"DATA",176.112,24478,0)
+4006012^MANNITOL 5% SOLN,IRRG
+"DATA",176.112,24478,1)
+311451
+"DATA",176.112,24479,0)
+4006013^MANNITOL 250MG/ML (PF) INJ
+"DATA",176.112,24479,1)
+311450
+"DATA",176.112,24480,0)
+4006011^MANNITOL 250MG/ML INJ
+"DATA",176.112,24480,1)
+311450
+"DATA",176.112,24481,0)
+4006010^MANNITOL 200MG/ML INJ
+"DATA",176.112,24481,1)
+311449
+"DATA",176.112,24482,0)
+4006009^MANNITOL 150MG/ML INJ
+"DATA",176.112,24482,1)
+311448
+"DATA",176.112,24483,0)
+4006014^MANNITOL 100MG/ML INJ,BAG,1000ML
+"DATA",176.112,24483,1)
+311447
+"DATA",176.112,24484,0)
+4006008^MANNITOL 100MG/ML INJ
+"DATA",176.112,24484,1)
+311447
+"DATA",176.112,24485,0)
+4006248^MANNITOL 0.54%/SORBITOL 2.7% SOLN,IRRG
+"DATA",176.112,24485,1)
+311446
+"DATA",176.112,24486,0)
+4005119^MANGANESE SO4 0.5MG/ML INJ
+"DATA",176.112,24486,1)
+311444
+"DATA",176.112,24487,0)
+4005120^MANGANESE SO4 0.308MG/ML INJ
+"DATA",176.112,24487,1)
+311443
+"DATA",176.112,24488,0)
+4005121^MANGANESE 15MG TAB
+"DATA",176.112,24488,1)
+311442
+"DATA",176.112,24489,0)
+4000966^MAGNESIUM SO4 2MEQ/ML INJ
+"DATA",176.112,24489,1)
+311437
+"DATA",176.112,24490,0)
+4003590^MAGNESIUM SALICYLATE 650MG TAB
+"DATA",176.112,24490,1)
+311436
+"DATA",176.112,24491,0)
+4007101^MAGNESIUM SALICYLATE 600MG/PHENYLTOLOXAMINE CITRATE 30MG TAB
+"DATA",176.112,24491,1)
+311435
+"DATA",176.112,24492,0)
+4007100^MAGNESIUM SALICYLATE 600MG/PHENYLTOLOXAMINE CITRATE 25MG TAB
+"DATA",176.112,24492,1)
+311434
+"DATA",176.112,24493,0)
+4007102^MAGNESIUM SALICYLATE 325MG/PHENYLTOLOXAMINE CITRATE 30MG TAB
+"DATA",176.112,24493,1)
+311433
+"DATA",176.112,24494,0)
+4003592^MAGNESIUM SALICYLATE 325MG TAB
+"DATA",176.112,24494,1)
+311432
+"DATA",176.112,24495,0)
+4015107^MAGNESIUM OXIDE 500MG TAB
+"DATA",176.112,24495,1)
+311431
+"DATA",176.112,24496,0)
+4009934^MAGNESIUM OXIDE 420MG TAB
+"DATA",176.112,24496,1)
+311430
+"DATA",176.112,24497,0)
+4014859^MAGNESIUM OXIDE 250MG TAB
+"DATA",176.112,24497,1)
+311429
+"DATA",176.112,24498,0)
+4009214^MAGNESIUM HYDROXIDE 325MG TAB
+"DATA",176.112,24498,1)
+311428
+"DATA",176.112,24499,0)
+4009210^MAGNESIUM HYDROXIDE 311MG TAB,CHEWABLE
+"DATA",176.112,24499,1)
+311427
+"DATA",176.112,24500,0)
+4009861^MAGNESIUM HYDROXIDE 300MG/MINERAL OIL 1.25ML/5ML SUSP,ORAL
+"DATA",176.112,24500,1)
+311426
+"DATA",176.112,24501,0)
+4009951^MAGNESIUM GLUCONATE 500MG TAB
+"DATA",176.112,24501,1)
+311425
+"DATA",176.112,24502,0)
+4026079^MAGNESIUM GLUCONATE 556MG (MAG 30MG) TAB
+"DATA",176.112,24502,1)
+311425
+"DATA",176.112,24503,0)
+4008976^MAGNESIUM 29MG TAB
+"DATA",176.112,24503,1)
+311425
+"DATA",176.112,24504,0)
+4008145^MAGNESIUM CHLORIDE 200MG/ML/SODIUM CHLORIDE 0.9% INJ
+"DATA",176.112,24504,1)
+311423
+"DATA",176.112,24505,0)
+4007475^MAGNESIUM CHLORIDE 200MG/ML INJ
+"DATA",176.112,24505,1)
+311422
+"DATA",176.112,24506,0)
+4009796^MAGNESIUM CARBONATE 260MG CAP
+"DATA",176.112,24506,1)
+311420
+"DATA",176.112,24507,0)
+4009352^MAGALDRATE 540MG/SIMETHICONE 40MG/5ML SUSP,ORAL
+"DATA",176.112,24507,1)
+311415
+"DATA",176.112,24508,0)
+4009343^MAGALDRATE 540MG/5ML SUSP
+"DATA",176.112,24508,1)
+311414
+"DATA",176.112,24509,0)
+4009351^MAGALDRATE 480MG/SIMETHICONE 20MG/5ML SUSP,ORAL
+"DATA",176.112,24509,1)
+311413
+"DATA",176.112,24510,0)
+4009348^MAGALDRATE 480MG/SIMETHICONE 20MG TAB,CHEW
+"DATA",176.112,24510,1)
+311412
+"DATA",176.112,24511,0)
+4009346^MAGALDRATE 480MG/5ML SUSP,ORAL
+"DATA",176.112,24511,1)
+311411
+"DATA",176.112,24512,0)
+4009345^MAGALDRATE 480MG TAB,ORAL
+"DATA",176.112,24512,1)
+311410
+"DATA",176.112,24513,0)
+4009344^MAGALDRATE 480MG TAB,CHEW
+"DATA",176.112,24513,1)
+311409
+"DATA",176.112,24514,0)
+4009349^MAGALDRATE 1080MG/SIMETHICONE 30MG/5ML SUSP,ORAL
+"DATA",176.112,24514,1)
+311408
+"DATA",176.112,24515,0)
+4009350^MAGALDRATE 1080MG/SIMETHICONE 20MG TAB,CHEW
+"DATA",176.112,24515,1)
+311407
+"DATA",176.112,24516,0)
+4004344^MAFENIDE ACETATE 8.5% CREAM,TOP
+"DATA",176.112,24516,1)
+311406
+"DATA",176.112,24517,0)
+4009586^LYSINE HCL 334MG TAB
+"DATA",176.112,24517,1)
+311394
+"DATA",176.112,24518,0)
+4006422^LYPRESSIN 0.185MG/ML INHL
+"DATA",176.112,24518,1)
+311393
+"DATA",176.112,24519,0)
+4002793^LOXAPINE HCL 5MG CAP
+"DATA",176.112,24519,1)
+311386
+"DATA",176.112,24520,0)
+4014150^LOXAPINE SUCCINATE 5MG CAP,UD
+"DATA",176.112,24520,1)
+311386
+"DATA",176.112,24521,0)
+4002787^LOXAPINE SUCCINATE 5MG CAP
+"DATA",176.112,24521,1)
+311386
+"DATA",176.112,24522,0)
+4002795^LOXAPINE HCL 25MG CAP
+"DATA",176.112,24522,1)
+311385
+"DATA",176.112,24523,0)
+4014151^LOXAPINE SUCCINATE 25MG CAP,UD
+"DATA",176.112,24523,1)
+311385
+"DATA",176.112,24524,0)
+4002789^LOXAPINE SUCCINATE 25MG CAP
+"DATA",176.112,24524,1)
+311385
+"DATA",176.112,24525,0)
+4002792^LOXAPINE HCL 50MG/ML INJ
+"DATA",176.112,24525,1)
+311384
+"DATA",176.112,24526,0)
+4013168^LOTEPREDNOL ETABONATE 0.5% SUSP,OPH
+"DATA",176.112,24526,1)
+311382
+"DATA",176.112,24527,0)
+4013169^LOTEPREDNOL ETABONATE 0.2% SUSP,OPH
+"DATA",176.112,24527,1)
+311381
+"DATA",176.112,24528,0)
+4013414^LOSARTAN POTASSIUM 25MG TAB,UD
+"DATA",176.112,24528,1)
+311380
+"DATA",176.112,24529,0)
+4012748^LOSARTAN 25MG TAB
+"DATA",176.112,24529,1)
+311380
+"DATA",176.112,24530,0)
+4013413^LOSARTAN POTASSIUM 100MG TAB
+"DATA",176.112,24530,1)
+311379
+"DATA",176.112,24531,0)
+4002461^LORAZEPAM 2MG/ML CONC,ORAL
+"DATA",176.112,24531,1)
+311376
+"DATA",176.112,24532,0)
+4012737^LORATADINE 5MG/PSEUDOEPHEDRINE HCL 120MG TAB,SA
+"DATA",176.112,24532,1)
+311375
+"DATA",176.112,24533,0)
+4010305^LORATADINE 10MG TAB,RAPID DISINTEGRATING
+"DATA",176.112,24533,1)
+311373
+"DATA",176.112,24534,0)
+4010303^LORATADINE 10MG TAB
+"DATA",176.112,24534,1)
+311372
+"DATA",176.112,24535,0)
+4024612^LORATADINE 10MG TAB,UD
+"DATA",176.112,24535,1)
+311372
+"DATA",176.112,24536,0)
+4010173^LORACARBEF 200MG/5ML SUSP,ORAL
+"DATA",176.112,24536,1)
+311371
+"DATA",176.112,24537,0)
+4010172^LORACARBEF 100MG/5ML SUSP,ORAL
+"DATA",176.112,24537,1)
+311370
+"DATA",176.112,24538,0)
+4014960^LOPINAVIR 400MG/RITONAVIR 100MG/5ML SOLN,ORAL
+"DATA",176.112,24538,1)
+311369
+"DATA",176.112,24539,0)
+4014959^LOPINAVIR 133.3MG/RITONAVIR 33.3MG CAP
+"DATA",176.112,24539,1)
+311368
+"DATA",176.112,24540,0)
+4014206^LOPERAMIDE HCL 2MG/SIMETHICONE 125MG TAB,CHEW
+"DATA",176.112,24540,1)
+311367
+"DATA",176.112,24541,0)
+4010122^LOMEFLOXACIN HCL 400MG TAB
+"DATA",176.112,24541,1)
+311364
+"DATA",176.112,24542,0)
+4012155^LODOXAMIDE TROMETHAMINE 0.1% SOLN,OPH
+"DATA",176.112,24542,1)
+311361
+"DATA",176.112,24543,0)
+4003386^ETHINYL ESTRADIOL 0.03MG/FE FUMARATE 75MG/NORGESTREL 0.3MG TAB
+"DATA",176.112,24543,1)
+311359
+"DATA",176.112,24544,0)
+4003171^ETHINYL ESTRADIOL 0.03MG/NORGESTREL 0.3MG TAB
+"DATA",176.112,24544,1)
+311359
+"DATA",176.112,24545,0)
+4000900^LIVER EXTRACT 20MCG/ML INJ
+"DATA",176.112,24545,1)
+311358
+"DATA",176.112,24546,0)
+4008009^LIVER 100MG/PHENOBARBITAL 50MG TAB
+"DATA",176.112,24546,1)
+311357
+"DATA",176.112,24547,0)
+4008124^LITHIUM CARBONATE 300MG/NACL 40MG TAB,SA
+"DATA",176.112,24547,1)
+311356
+"DATA",176.112,24548,0)
+4015117^LITHIUM CARBONATE 150MG CAP,UD
+"DATA",176.112,24548,1)
+311355
+"DATA",176.112,24549,0)
+4003125^LITHIUM CARBONATE 150MG CAP
+"DATA",176.112,24549,1)
+311355
+"DATA",176.112,24550,0)
+4013951^LISINOPRIL 5MG TAB,UD
+"DATA",176.112,24550,1)
+311354
+"DATA",176.112,24551,0)
+4008591^LISINOPRIL 5MG TAB
+"DATA",176.112,24551,1)
+311354
+"DATA",176.112,24552,0)
+4014010^LISINOPRIL 2.5MG TAB,UD
+"DATA",176.112,24552,1)
+311353
+"DATA",176.112,24553,0)
+4008595^LISINOPRIL 2.5MG TAB
+"DATA",176.112,24553,1)
+311353
+"DATA",176.112,24554,0)
+4003104^LIOTHYRONINE NA 50MCG TAB
+"DATA",176.112,24554,1)
+311350
+"DATA",176.112,24555,0)
+4003103^LIOTHYRONINE NA 25MCG TAB
+"DATA",176.112,24555,1)
+311349
+"DATA",176.112,24556,0)
+4014758^LINEZOLID 600MG TAB,UD
+"DATA",176.112,24556,1)
+311347
+"DATA",176.112,24557,0)
+4014757^LINEZOLID 600MG TAB
+"DATA",176.112,24557,1)
+311347
+"DATA",176.112,24558,0)
+4014769^LINEZOLID 2MG/ML INJ,BAG,200ML
+"DATA",176.112,24558,1)
+311346
+"DATA",176.112,24559,0)
+4014770^LINEZOLID 2MG/ML INJ,BAG,300ML
+"DATA",176.112,24559,1)
+311346
+"DATA",176.112,24560,0)
+4014768^LINEZOLID 2MG/ML INJ,BAG,100ML
+"DATA",176.112,24560,1)
+311346
+"DATA",176.112,24561,0)
+4014754^LINEZOLID 100MG/5ML SUSP,ORAL
+"DATA",176.112,24561,1)
+311345
+"DATA",176.112,24562,0)
+4004037^LINDANE 1% LIQUID,TOP
+"DATA",176.112,24562,1)
+311343
+"DATA",176.112,24563,0)
+4003500^LINCOMYCIN HCL 500MG CAP
+"DATA",176.112,24563,1)
+311342
+"DATA",176.112,24564,0)
+4003499^LINCOMYCIN HCL 250MG CAP
+"DATA",176.112,24564,1)
+311341
+"DATA",176.112,24565,0)
+4008201^LILIUM LONGIFLORIUM 50% INJ
+"DATA",176.112,24565,1)
+311340
+"DATA",176.112,24566,0)
+4008200^LILIUM LONGIFLORIUM 100% LIQUID,ORAL
+"DATA",176.112,24566,1)
+311339
+"DATA",176.112,24567,0)
+4004375^LIDOCAINE HCL 4% SOLN,TOP
+"DATA",176.112,24567,1)
+311336
+"DATA",176.112,24568,0)
+4005915^LIDOCAINE HCL 2%/EPINEPHRINE 1:200000 INJ
+"DATA",176.112,24568,1)
+311333
+"DATA",176.112,24569,0)
+4004396^LIDOCAINE HCL 2% SOLN,TOP URH
+"DATA",176.112,24569,1)
+311332
+"DATA",176.112,24570,0)
+4004399^LIDOCAINE HCL 2% SOLN,ORAL
+"DATA",176.112,24570,1)
+311331
+"DATA",176.112,24571,0)
+4004374^LIDOCAINE HCL 2% LIQUID,VISCOUS
+"DATA",176.112,24571,1)
+311331
+"DATA",176.112,24572,0)
+4004385^LIDOCAINE HCL 100MG/ML INJ
+"DATA",176.112,24572,1)
+311326
+"DATA",176.112,24573,0)
+4015605^LIDOCAINE HCL 1.5% (PF) INJ
+"DATA",176.112,24573,1)
+311325
+"DATA",176.112,24574,0)
+4004377^LIDOCAINE HCL 1.5% INJ
+"DATA",176.112,24574,1)
+311325
+"DATA",176.112,24575,0)
+4005953^LIDOCAINE HCL 1.5%/DEXTROSE 7.5% INJ
+"DATA",176.112,24575,1)
+311325
+"DATA",176.112,24576,0)
+4004379^LIDOCAINE HCL 0.5% INJ
+"DATA",176.112,24576,1)
+311324
+"DATA",176.112,24577,0)
+4015604^LIDOCAINE HCL 0.5% (PF) INJ
+"DATA",176.112,24577,1)
+311324
+"DATA",176.112,24578,0)
+4014384^LIDOCAINE 4% CREAM,TOP
+"DATA",176.112,24578,1)
+311322
+"DATA",176.112,24579,0)
+4004373^LIDOCAINE 3% CREAM,TOP
+"DATA",176.112,24579,1)
+311321
+"DATA",176.112,24580,0)
+4013745^LIDOCAINE 2.5%/PRILOCAINE 2.5% FILM,TOP
+"DATA",176.112,24580,1)
+311320
+"DATA",176.112,24581,0)
+4004404^LIDOCAINE 2.5% OINT,TOP
+"DATA",176.112,24581,1)
+311319
+"DATA",176.112,24582,0)
+4006403^LEVOTHYROXINE NA 60MCG/LIOTHYRONINE NA 15MCG TAB
+"DATA",176.112,24582,1)
+311316
+"DATA",176.112,24583,0)
+4006399^LEVOTHYROXINE NA 50MCG/LIOTHYRONINE NA 12.5MCG TAB
+"DATA",176.112,24583,1)
+311315
+"DATA",176.112,24584,0)
+4006402^LEVOTHYROXINE NA 30MCG/LIOTHYRONINE NA 7.5MCG TAB
+"DATA",176.112,24584,1)
+311314
+"DATA",176.112,24585,0)
+4006406^LEVOTHYROXINE NA 30MCG/LIOTHYRONINE NA 2.5MCG TAB
+"DATA",176.112,24585,1)
+311313
+"DATA",176.112,24586,0)
+4006398^LEVOTHYROXINE NA 25MCG/LIOTHYRONINE NA 6.25MCG TAB
+"DATA",176.112,24586,1)
+311312
+"DATA",176.112,24587,0)
+4006405^LEVOTHYROXINE NA 180MCG/LIOTHYRONINE NA 45MCG TAB
+"DATA",176.112,24587,1)
+311311
+"DATA",176.112,24588,0)
+4006401^LEVOTHYROXINE NA 150MCG/LIOTHYRONINE NA 37.5MCG TAB
+"DATA",176.112,24588,1)
+311310
+"DATA",176.112,24589,0)
+4006404^LEVOTHYROXINE NA 120MCG/LIOTHYRONINE NA 30MCG TAB
+"DATA",176.112,24589,1)
+311309
+"DATA",176.112,24590,0)
+4006397^LEVOTHYROXINE NA 12.5MCG/LIOTHYRONINE NA 3.1MCG TAB
+"DATA",176.112,24590,1)
+311308
+"DATA",176.112,24591,0)
+4006400^LEVOTHYROXINE NA 100MCG/LIOTHYRONINE NA 25MCG TAB
+"DATA",176.112,24591,1)
+311306
+"DATA",176.112,24592,0)
+4002331^LEVOTHYROXINE NA 0.175MG TAB
+"DATA",176.112,24592,1)
+311303
+"DATA",176.112,24593,0)
+4002333^LEVOTHYROXINE NA 0.112MG TAB
+"DATA",176.112,24593,1)
+311302
+"DATA",176.112,24594,0)
+4002180^LEVORPHANOL TARTRATE 2MG/ML INJ
+"DATA",176.112,24594,1)
+311300
+"DATA",176.112,24595,0)
+4012147^LEVOMETHADYL ACETATE HCL 10MG/ML CONC,ORAL
+"DATA",176.112,24595,1)
+311297
+"DATA",176.112,24596,0)
+4015135^LEVOFLOXACIN 750MG TAB
+"DATA",176.112,24596,1)
+311296
+"DATA",176.112,24597,0)
+4007246^LEVOCARNITINE 750MG TAB
+"DATA",176.112,24597,1)
+311295
+"DATA",176.112,24598,0)
+4007250^LEVOCARNITINE 250MG TAB
+"DATA",176.112,24598,1)
+311294
+"DATA",176.112,24599,0)
+4012302^LEVOCABASTINE HCL 0.05% SUSP,OPH
+"DATA",176.112,24599,1)
+311293
+"DATA",176.112,24600,0)
+4007951^LEVOBUNOLOL HCL 0.5% SOLN,OPH
+"DATA",176.112,24600,1)
+311292
+"DATA",176.112,24601,0)
+4007952^LEVOBUNOLOL HCL 0.25% SOLN,OPH
+"DATA",176.112,24601,1)
+311291
+"DATA",176.112,24602,0)
+4014583^LEVETIRACETAM 750MG TAB
+"DATA",176.112,24602,1)
+311290
+"DATA",176.112,24603,0)
+4014582^LEVETIRACETAM 500MG TAB
+"DATA",176.112,24603,1)
+311289
+"DATA",176.112,24604,0)
+4014581^LEVETIRACETAM 250MG TAB
+"DATA",176.112,24604,1)
+311288
+"DATA",176.112,24605,0)
+4013777^LEVALBUTEROL HCL 0.42MG/ML SOLN,INHL,3ML
+"DATA",176.112,24605,1)
+311287
+"DATA",176.112,24606,0)
+4013776^LEVALBUTEROL HCL 0.21MG/ML SOLN,INHL,3ML
+"DATA",176.112,24606,1)
+311286
+"DATA",176.112,24607,0)
+4024555^LEUPROLIDE ACETATE 14MG/KIT INJ,SUSP,SA
+"DATA",176.112,24607,1)
+311283
+"DATA",176.112,24608,0)
+4007346^LEUPROLIDE ACETATE 1MG/0.2ML INJ
+"DATA",176.112,24608,1)
+311283
+"DATA",176.112,24609,0)
+4026626^LEUCOVORIN CALCIUM 10MG/ML (PF) INJ
+"DATA",176.112,24609,1)
+311282
+"DATA",176.112,24610,0)
+4006490^LEUCOVORIN CALCIUM 100MG/VIL (PF) INJ
+"DATA",176.112,24610,1)
+311282
+"DATA",176.112,24611,0)
+4006495^LEUCOVORIN CALCIUM 100MG/VIL INJ
+"DATA",176.112,24611,1)
+311282
+"DATA",176.112,24612,0)
+4006496^LEUCOVORIN CALCIUM 200MG/VIL INJ
+"DATA",176.112,24612,1)
+311282
+"DATA",176.112,24613,0)
+4006489^LEUCOVORIN CALCIUM 50MG/VIL (PF) INJ
+"DATA",176.112,24613,1)
+311282
+"DATA",176.112,24614,0)
+4006494^LEUCOVORIN CALCIUM 50MG/VIL INJ
+"DATA",176.112,24614,1)
+311282
+"DATA",176.112,24615,0)
+4009464^LECITHIN 1200MG TAB
+"DATA",176.112,24615,1)
+311281
+"DATA",176.112,24616,0)
+4025396^LANSOPRAZOLE 30MG CAP,EC,UD
+"DATA",176.112,24616,1)
+311277
+"DATA",176.112,24617,0)
+4025395^LANSOPRAZOLE 30MG CAP,EC
+"DATA",176.112,24617,1)
+311277
+"DATA",176.112,24618,0)
+4014009^LANSOPRAZOLE 30MG CAP,SA,UD
+"DATA",176.112,24618,1)
+311277
+"DATA",176.112,24619,0)
+4012776^LANSOPRAZOLE 30MG CAP,SA
+"DATA",176.112,24619,1)
+311277
+"DATA",176.112,24620,0)
+4013746^LAMOTRIGINE 5MG TAB,CHEW
+"DATA",176.112,24620,1)
+311265
+"DATA",176.112,24621,0)
+4013747^LAMOTRIGINE 25MG TAB,CHEW
+"DATA",176.112,24621,1)
+311264
+"DATA",176.112,24622,0)
+4013923^LACTULOSE 10GM/PKT PWDR
+"DATA",176.112,24622,1)
+311263
+"DATA",176.112,24623,0)
+4006869^LACTOSE 250MG CAP
+"DATA",176.112,24623,1)
+311260
+"DATA",176.112,24624,0)
+4008422^LACTOBACILLUS 1GM/PKT GRANULES
+"DATA",176.112,24624,1)
+311258
+"DATA",176.112,24625,0)
+4009790^LACTIC ACID 5% LOTION
+"DATA",176.112,24625,1)
+311254
+"DATA",176.112,24626,0)
+4013452^AMMONIUM LACTATE 5% LOTION
+"DATA",176.112,24626,1)
+311254
+"DATA",176.112,24627,0)
+4010504^LACTIC ACID 2%/PHENOL 1%/SALICYLIC ACID 3% OINT
+"DATA",176.112,24627,1)
+311253
+"DATA",176.112,24628,0)
+4010503^LACTIC ACID 2%/PHENOL 1%/SALICYLIC ACID 3% LOTION
+"DATA",176.112,24628,1)
+311252
+"DATA",176.112,24629,0)
+4007931^LACTIC ACID 17%/SALICYLIC ACID 17% LIQUID,TOP
+"DATA",176.112,24629,1)
+311251
+"DATA",176.112,24630,0)
+4006955^LACTIC ACID 16.7%/SALICYLIC ACID 16.7%/FLEXIBLE COLLODION,TOP
+"DATA",176.112,24630,1)
+311250
+"DATA",176.112,24631,0)
+4009789^LACTIC ACID 10% LOTION
+"DATA",176.112,24631,1)
+311249
+"DATA",176.112,24632,0)
+4013813^LACTASE 9000UNT TAB
+"DATA",176.112,24632,1)
+311248
+"DATA",176.112,24633,0)
+4010222^LACTASE 5000UNT/ML DROPS,ORAL
+"DATA",176.112,24633,1)
+311247
+"DATA",176.112,24634,0)
+4010224^LACTASE 4500 UNT TAB
+"DATA",176.112,24634,1)
+311246
+"DATA",176.112,24635,0)
+4010223^LACTASE 3000UNT TAB
+"DATA",176.112,24635,1)
+311245
+"DATA",176.112,24636,0)
+4014216^LACTASE 125MG CAP
+"DATA",176.112,24636,1)
+311244
+"DATA",176.112,24637,0)
+4006600^LABETALOL HCL 300MG TAB
+"DATA",176.112,24637,1)
+311242
+"DATA",176.112,24638,0)
+4026315^LABETALOL HCL 200MG TAB,UD
+"DATA",176.112,24638,1)
+311241
+"DATA",176.112,24639,0)
+4006601^LABETALOL HCL 200MG TAB
+"DATA",176.112,24639,1)
+311241
+"DATA",176.112,24640,0)
+4015126^LABETALOL HCL 100MG TAB,UD
+"DATA",176.112,24640,1)
+311240
+"DATA",176.112,24641,0)
+4006598^LABETALOL HCL 100MG TAB
+"DATA",176.112,24641,1)
+311240
+"DATA",176.112,24642,0)
+4014217^L-ARGININE 700MG CAP
+"DATA",176.112,24642,1)
+311239
+"DATA",176.112,24643,0)
+4027424^KETOTIFEN 0.025% SOLN,OPH
+"DATA",176.112,24643,1)
+311237^^^KETOTIFEN 0.025% OPH SOLN^Y
+"DATA",176.112,24644,0)
+4014123^KETOTIFEN FUMARATE 0.025% SOLN,OPH
+"DATA",176.112,24644,1)
+311237
+"DATA",176.112,24645,0)
+4009103^KETOROLAC TROMETHAMINE 0.5% SOLN,OPH
+"DATA",176.112,24645,1)
+311231
+"DATA",176.112,24646,0)
+4009112^KETOROLAC TROMETHAMINE 0.5% (PF) SOLN,OPH,0.4ML
+"DATA",176.112,24646,1)
+311231
+"DATA",176.112,24647,0)
+4003408^KETOPROFEN 150MG CAP,SA
+"DATA",176.112,24647,1)
+311230
+"DATA",176.112,24648,0)
+4003410^KETOPROFEN 12.5MG CAP
+"DATA",176.112,24648,1)
+311229
+"DATA",176.112,24649,0)
+4010026^KAOLIN 5.85GM/PECTIN 260MG/ZN PHENOLSULFONATE 73.125MG/30ML SUSP
+"DATA",176.112,24649,1)
+311220
+"DATA",176.112,24650,0)
+4009454^KAOLIN 5.85GM/PECTIN 130MG/30ML SUSP,ORAL
+"DATA",176.112,24650,1)
+311219
+"DATA",176.112,24651,0)
+4009455^KAOLIN 5.2GM/PECTIN 260MG/30ML SUSP,ORAL
+"DATA",176.112,24651,1)
+311218
+"DATA",176.112,24652,0)
+4003822^KANAMYCIN SO4 500MG CAP
+"DATA",176.112,24652,1)
+311215
+"DATA",176.112,24653,0)
+4003821^KANAMYCIN SO4 1GM/3ML INJ
+"DATA",176.112,24653,1)
+311214
+"DATA",176.112,24654,0)
+4006922^K PHOSPHATE 155MG/NA BIPHOSPHATE 130MG/NA PHOSPHATE 852MG TAB
+"DATA",176.112,24654,1)
+311213
+"DATA",176.112,24655,0)
+4004714^K PARA-AMINOBENZOATE 0.3GM/K SALICYLATE 0.3GM TAB,EC
+"DATA",176.112,24655,1)
+311212
+"DATA",176.112,24656,0)
+4001213^K ACETATE 5.2MEQ/K BICARB 5MEQ/K CITRATE 4.7MEQ/5ML SOLN
+"DATA",176.112,24656,1)
+311210
+"DATA",176.112,24657,0)
+4014091^IVERMECTIN 3MG TAB
+"DATA",176.112,24657,1)
+311207
+"DATA",176.112,24658,0)
+4014577^ITRACONAZOLE 10MG/ML INJ,AMP,25ML
+"DATA",176.112,24658,1)
+311205
+"DATA",176.112,24659,0)
+4010300^ITRACONAZOLE 100MG CAP
+"DATA",176.112,24659,1)
+311204
+"DATA",176.112,24660,0)
+4014684^ISOSORBIDE MONONITRATE 60MG TAB,SA,UD
+"DATA",176.112,24660,1)
+311198
+"DATA",176.112,24661,0)
+4010130^ISOSORBIDE MONONITRATE 60MG TAB,SA
+"DATA",176.112,24661,1)
+311198
+"DATA",176.112,24662,0)
+4010129^ISOSORBIDE MONONITRATE 20MG TAB,ORAL
+"DATA",176.112,24662,1)
+311197
+"DATA",176.112,24663,0)
+4010131^ISOSORBIDE MONONITRATE 120MG TAB,SA
+"DATA",176.112,24663,1)
+311196
+"DATA",176.112,24664,0)
+4002318^ISOSORBIDE DINITRATE 5MG TAB,CHEWABLE
+"DATA",176.112,24664,1)
+311195
+"DATA",176.112,24665,0)
+4002311^ISOSORBIDE DINITRATE 40MG TAB,SA
+"DATA",176.112,24665,1)
+311194
+"DATA",176.112,24666,0)
+4002319^ISOSORBIDE DINITRATE 2.5MG TAB,ORAL
+"DATA",176.112,24666,1)
+311193
+"DATA",176.112,24667,0)
+4010133^ISOSORBIDE MONONITRATE 10MG TAB,ORAL
+"DATA",176.112,24667,1)
+311192
+"DATA",176.112,24668,0)
+4002316^ISOSORBIDE DINITRATE 10MG TAB,CHEWABLE
+"DATA",176.112,24668,1)
+311191
+"DATA",176.112,24669,0)
+4005497^ISOSORBIDE 45% SOLN,ORAL
+"DATA",176.112,24669,1)
+311190
+"DATA",176.112,24670,0)
+4004236^ISOPROTERENOL HCL 15MG TAB,SUBLINGUAL
+"DATA",176.112,24670,1)
+311188
+"DATA",176.112,24671,0)
+4004237^ISOPROTERENOL HCL 130MCG/SPRAY INHL,ORAL
+"DATA",176.112,24671,1)
+311187
+"DATA",176.112,24672,0)
+4004235^ISOPROTERENOL HCL 10MG TAB,SUBLINGUAL
+"DATA",176.112,24672,1)
+311186
+"DATA",176.112,24673,0)
+4004234^ISOPROTERENOL HCL 1% SOLN,INHL
+"DATA",176.112,24673,1)
+311185
+"DATA",176.112,24674,0)
+4004233^ISOPROTERENOL HCL 0.5% SOLN,INHL
+"DATA",176.112,24674,1)
+311184
+"DATA",176.112,24675,0)
+4004244^ISOPROTERENOL HCL 0.125MG/SPRAY AEROSOL,INHL
+"DATA",176.112,24675,1)
+311182
+"DATA",176.112,24676,0)
+4004239^ISOPROTERENOL HCL 0.062% SOLN,INHL
+"DATA",176.112,24676,1)
+311181
+"DATA",176.112,24677,0)
+4004238^ISOPROTERENOL HCL 0.031% SOLN,INHL
+"DATA",176.112,24677,1)
+311180
+"DATA",176.112,24678,0)
+4007064^ISOPROPAMIDE IODIDE 6.8MG/PROCHLORPERAZINE 10MG CAP,SA
+"DATA",176.112,24678,1)
+311179
+"DATA",176.112,24679,0)
+4007066^ISOPROPAMIDE IODIDE 5MG/PROCHLORPERAZINE 10MG TAB
+"DATA",176.112,24679,1)
+311178
+"DATA",176.112,24680,0)
+4007062^ISOPROPAMIDE IODIDE 5MG/PROCHLORPERAZINE 10MG CAP,SA
+"DATA",176.112,24680,1)
+311177
+"DATA",176.112,24681,0)
+4007063^ISOPROPAMIDE IODIDE 5MG/PROCHLORPERAZINE 10MG CAP
+"DATA",176.112,24681,1)
+311176
+"DATA",176.112,24682,0)
+4003106^ISOPROPAMIDE IODIDE 5MG TAB
+"DATA",176.112,24682,1)
+311175
+"DATA",176.112,24683,0)
+4001194^ISONIAZID 50MG TAB
+"DATA",176.112,24683,1)
+311171
+"DATA",176.112,24684,0)
+4007136^ISONIAZID 300MG/PYRIDOXINE HCL 30MG TAB
+"DATA",176.112,24684,1)
+311170
+"DATA",176.112,24685,0)
+4005658^ISONIAZID 300MG TAB/RIFAMPIN 300MG CAP
+"DATA",176.112,24685,1)
+311169
+"DATA",176.112,24686,0)
+4007138^ISONIAZID 100MG/PYRIDOXINE HCL 5MG TAB
+"DATA",176.112,24686,1)
+311168
+"DATA",176.112,24687,0)
+4007137^ISONIAZID 100MG/PYRIDOXINE HCL 10MG TAB
+"DATA",176.112,24687,1)
+311167
+"DATA",176.112,24688,0)
+4001192^ISONIAZID 100MG TAB
+"DATA",176.112,24688,1)
+311166
+"DATA",176.112,24689,0)
+4014005^ISONIAZID 100MG TAB,UD
+"DATA",176.112,24689,1)
+311166
+"DATA",176.112,24690,0)
+4007391^ISOLEUCINE 1.38GM/LEUCINE 1.38GM/VALINE 1.24GM/100ML INJ
+"DATA",176.112,24690,1)
+311164
+"DATA",176.112,24691,0)
+4003054^ISOFLUROPHATE 0.025% OINT,OPH
+"DATA",176.112,24691,1)
+311162
+"DATA",176.112,24692,0)
+4007817^ISOFLURANE 99.9% LIQUID,INHL
+"DATA",176.112,24692,1)
+311161
+"DATA",176.112,24693,0)
+4004262^ISOETHARINE MESYLATE 0.01% AEROSOL
+"DATA",176.112,24693,1)
+311160
+"DATA",176.112,24694,0)
+4004252^ISOETHARINE HCL 1% SOLN,INHL
+"DATA",176.112,24694,1)
+311159
+"DATA",176.112,24695,0)
+4004253^ISOETHARINE HCL 0.25% SOLN,INHL
+"DATA",176.112,24695,1)
+311158
+"DATA",176.112,24696,0)
+4004263^ISOETHARINE HCL 0.17% SOLN,INHL
+"DATA",176.112,24696,1)
+311157
+"DATA",176.112,24697,0)
+4004255^ISOETHARINE HCL 0.167% SOLN,INHL
+"DATA",176.112,24697,1)
+311156
+"DATA",176.112,24698,0)
+4004261^ISOETHARINE HCL 0.14% SOLN,INHL
+"DATA",176.112,24698,1)
+311155
+"DATA",176.112,24699,0)
+4004258^ISOETHARINE HCL 0.1% SOLN,INHL
+"DATA",176.112,24699,1)
+311154
+"DATA",176.112,24700,0)
+4004260^ISOETHARINE HCL 0.08% SOLN,INHL
+"DATA",176.112,24700,1)
+311153
+"DATA",176.112,24701,0)
+4004254^ISOETHARINE HCL 0.062% SOLN,INHL
+"DATA",176.112,24701,1)
+311152
+"DATA",176.112,24702,0)
+4005483^IRON DEXTRAN COMPLEX 50MG/ML INJ
+"DATA",176.112,24702,1)
+311144
+"DATA",176.112,24703,0)
+4005484^IRON DEXTRAN COMPLEX 100MG/ML INJ
+"DATA",176.112,24703,1)
+311143
+"DATA",176.112,24704,0)
+4015270^IRON CARBONYL 45MG TAB
+"DATA",176.112,24704,1)
+311142
+"DATA",176.112,24705,0)
+4001740^IPODATE NA 500MG CAP,SA
+"DATA",176.112,24705,1)
+311139
+"DATA",176.112,24706,0)
+4001739^IPODATE NA 500MG CAP
+"DATA",176.112,24706,1)
+311138
+"DATA",176.112,24707,0)
+4013348^IOXILAN 350mgI/ml INJ
+"DATA",176.112,24707,1)
+311134
+"DATA",176.112,24708,0)
+4013347^IOXILAN 300mgI/ml INJ
+"DATA",176.112,24708,1)
+311133
+"DATA",176.112,24709,0)
+4002011^IOPAMIDOL 261MG/ML INJ
+"DATA",176.112,24709,1)
+311115
+"DATA",176.112,24710,0)
+4004321^IOHEXOL 435MG/ML INJ
+"DATA",176.112,24710,1)
+311110
+"DATA",176.112,24711,0)
+4007593^IODOQUINOL 3%/LANOLIN DERIVATIVES SHAMPOO
+"DATA",176.112,24711,1)
+311107
+"DATA",176.112,24712,0)
+4012933^IODIXANOL 320mgI/ml INJ
+"DATA",176.112,24712,1)
+311100
+"DATA",176.112,24713,0)
+4012932^IODIXANOL 270mgI/ml INJ
+"DATA",176.112,24713,1)
+311099
+"DATA",176.112,24714,0)
+4007482^IODINE 7%/K IODIDE 5% TINCTURE
+"DATA",176.112,24714,1)
+311098
+"DATA",176.112,24715,0)
+4007326^IODINE 7% TINCTURE,TOP
+"DATA",176.112,24715,1)
+311097
+"DATA",176.112,24716,0)
+4007919^IODINE 6.2%/KI 4.45%/ZN P-PHENOSULFONATE 4.2% LIQUID
+"DATA",176.112,24716,1)
+311096
+"DATA",176.112,24717,0)
+4007324^IODINE 37% INJ
+"DATA",176.112,24717,1)
+311095
+"DATA",176.112,24718,0)
+4007325^IODINE 2% TINCTURE,TOP
+"DATA",176.112,24718,1)
+311093
+"DATA",176.112,24719,0)
+4010015^IODINE 1%/NA IODIDE 2.4% SOLN,TOP
+"DATA",176.112,24719,1)
+311092
+"DATA",176.112,24720,0)
+4003928^IOCETAMIC ACID 750MG TAB
+"DATA",176.112,24720,1)
+311091
+"DATA",176.112,24721,0)
+4007212^INVERT SUGAR 40% SOLN
+"DATA",176.112,24721,1)
+311089
+"DATA",176.112,24722,0)
+4007218^INVERT SUGAR 10%/NACL 0.45%/KCL 40MEQ/L INJ
+"DATA",176.112,24722,1)
+311088
+"DATA",176.112,24723,0)
+4007863^INTRINSIC FACTOR 60MG CAP
+"DATA",176.112,24723,1)
+311083
+"DATA",176.112,24724,0)
+4015303^INTERFERON GAMMA-1B 2 MILLION UNT/0.5ML INJ
+"DATA",176.112,24724,1)
+311082
+"DATA",176.112,24725,0)
+4013136^INTERFERON ALFACON-1 9MCG/0.3ML INJ,VIL
+"DATA",176.112,24725,1)
+311081
+"DATA",176.112,24726,0)
+4013137^INTERFERON ALFACON-1 15MCG/0.5ML INJ,VIL
+"DATA",176.112,24726,1)
+311081
+"DATA",176.112,24727,0)
+4013283^INTERFERON ALFA-2B,RECOMBINANT 10MILLION UNT/0.2ML INJ,PEN,1.5ML
+"DATA",176.112,24727,1)
+311078
+"DATA",176.112,24728,0)
+4006572^INTERFERON ALFA-2B,RECOMBINANT 50 MILLION UNT/VIL INJ
+"DATA",176.112,24728,1)
+311078
+"DATA",176.112,24729,0)
+4006569^INTERFERON ALFA-2B,RECOMBINANT 5 MILLION UNT/VIL INJ
+"DATA",176.112,24729,1)
+311077
+"DATA",176.112,24730,0)
+4014218^INTERFERON ALFA-2B,RECOMBINANT 3 MILLION UNT/VIL INJ,6 PKT
+"DATA",176.112,24730,1)
+311075
+"DATA",176.112,24731,0)
+4006571^INTERFERON ALFA-2B,RECOMBINANT 3 MILLION UNT/VIL INJ
+"DATA",176.112,24731,1)
+311075
+"DATA",176.112,24732,0)
+4006570^INTERFERON ALFA-2B,RECOMBINANT 25 MILLION UNT/VIL INJ
+"DATA",176.112,24732,1)
+311074
+"DATA",176.112,24733,0)
+4013282^INTERFERON ALFA-2B,RECOMBINANT 5MILLION UNT/0.2ML INJ,PEN,1.5ML
+"DATA",176.112,24733,1)
+311074
+"DATA",176.112,24734,0)
+4002290^INTERFERON ALFA-2A,RECOMBINANT 9 MILLION UNT/0.9ML INJ
+"DATA",176.112,24734,1)
+311069
+"DATA",176.112,24735,0)
+4002287^INTERFERON ALFA-2A,RECOMBINANT 6 MILLION UNT/ML INJ
+"DATA",176.112,24735,1)
+311068
+"DATA",176.112,24736,0)
+4002286^INTERFERON ALFA-2A,RECOMBINANT 3 MILLION UNT/ML INJ
+"DATA",176.112,24736,1)
+311066
+"DATA",176.112,24737,0)
+4001454^INSULIN,ULTRALENTE,BEEF/PURIFIED 100UNT/ML INJ
+"DATA",176.112,24737,1)
+311064
+"DATA",176.112,24738,0)
+4001460^INSULIN,ULTRALENTE,BEEF 100UNT/ML INJ
+"DATA",176.112,24738,1)
+311064
+"DATA",176.112,24739,0)
+4001451^INSULIN,ULTRALENTE,BEEF/PORK 40UNT/ML INJ
+"DATA",176.112,24739,1)
+311063
+"DATA",176.112,24740,0)
+4001450^INSULIN,ULTRALENTE,BEEF/PORK 100UNT/ML INJ
+"DATA",176.112,24740,1)
+311062
+"DATA",176.112,24741,0)
+4001453^INSULIN,SEMILENTE,PORK/PURIFIED 100UNT/ML INJ
+"DATA",176.112,24741,1)
+311061
+"DATA",176.112,24742,0)
+4001449^INSULIN,SEMILENTE,BEEF/PORK 40UNT/ML INJ
+"DATA",176.112,24742,1)
+311060
+"DATA",176.112,24743,0)
+4001448^INSULIN,SEMILENTE,BEEF/PORK 100UNT/ML INJ
+"DATA",176.112,24743,1)
+311059
+"DATA",176.112,24744,0)
+4001455^INSULIN,REGULAR,PORK 40UNT/ML INJ
+"DATA",176.112,24744,1)
+311058
+"DATA",176.112,24745,0)
+4001456^INSULIN,REGULAR,PORK 100UNT/ML INJ
+"DATA",176.112,24745,1)
+311057
+"DATA",176.112,24746,0)
+4001434^INSULIN,REGULAR,PORK/PURIFIED 100UNT/ML INJ
+"DATA",176.112,24746,1)
+311057
+"DATA",176.112,24747,0)
+4001435^INSULIN,REGULAR,BEEF/PURIFIED 100UNT/ML INJ
+"DATA",176.112,24747,1)
+311056
+"DATA",176.112,24748,0)
+4001437^INSULIN,REGULAR,BEEF/PORK 40UNT/ML INJ
+"DATA",176.112,24748,1)
+311055
+"DATA",176.112,24749,0)
+4001433^INSULIN,REGULAR,BEEF/PORK 100UNT/ML INJ
+"DATA",176.112,24749,1)
+311054
+"DATA",176.112,24750,0)
+4001429^INSULIN,PROTAMINE ZINC,BEEF/PORK 100UNT/ML INJ
+"DATA",176.112,24750,1)
+311053
+"DATA",176.112,24751,0)
+4001439^INSULIN,NPH,PORK/PURIFIED 100UNT/ML INJ
+"DATA",176.112,24751,1)
+311052
+"DATA",176.112,24752,0)
+4001440^INSULIN,NPH,BEEF/PURIFIED 100UNT/ML INJ
+"DATA",176.112,24752,1)
+311051
+"DATA",176.112,24753,0)
+4001457^INSULIN,NPH,BEEF 100UNT/ML INJ
+"DATA",176.112,24753,1)
+311051
+"DATA",176.112,24754,0)
+4001442^INSULIN,NPH,BEEF/PORK 40UNT/ML INJ
+"DATA",176.112,24754,1)
+311050
+"DATA",176.112,24755,0)
+4001438^INSULIN,NPH,BEEF/PORK 100UNT/ML INJ
+"DATA",176.112,24755,1)
+311049
+"DATA",176.112,24756,0)
+4001462^INSULIN,NPH 70UNT/REGULAR 30UNT/ML HUMAN INJ
+"DATA",176.112,24756,1)
+311048
+"DATA",176.112,24757,0)
+4001458^INSULIN,LENTE,BEEF 100UNT/ML INJ
+"DATA",176.112,24757,1)
+311043
+"DATA",176.112,24758,0)
+4001445^INSULIN,LENTE,BEEF/PURIFIED 100UNT/ML INJ
+"DATA",176.112,24758,1)
+311043
+"DATA",176.112,24759,0)
+4001446^INSULIN,LENTE,BEEF/PORK 40UNT/ML INJ
+"DATA",176.112,24759,1)
+311042
+"DATA",176.112,24760,0)
+4014841^INSULIN,GLARGINE,HUMAN 100 UNT/ML INJ,CARTRIDGE,3ML
+"DATA",176.112,24760,1)
+311041
+"DATA",176.112,24761,0)
+4014840^INSULIN,GLARGINE,HUMAN 100 UNT/ML INJ
+"DATA",176.112,24761,1)
+311041
+"DATA",176.112,24762,0)
+4014956^INSULIN,ASPART,HUMAN 100 UNT/ML INJ,CARTRIDGE,3ML
+"DATA",176.112,24762,1)
+311040
+"DATA",176.112,24763,0)
+4014955^INSULIN,ASPART,HUMAN 100 UNT/ML INJ
+"DATA",176.112,24763,1)
+311040
+"DATA",176.112,24764,0)
+4017028^INSULIN,ASPART,HUMAN 100 UNIT/ML INJ,PENFILL,3ML
+"DATA",176.112,24764,1)
+311040
+"DATA",176.112,24765,0)
+4001436^INSULIN,REGULAR,HUMAN 100UNT/ML INJ
+"DATA",176.112,24765,1)
+311034
+"DATA",176.112,24766,0)
+4016733^INSULIN REG HUMAN 100 U/ML INJ INNOLET 3ML
+"DATA",176.112,24766,1)
+311034
+"DATA",176.112,24767,0)
+4001463^INSULIN,REGULAR,HUMAN BUFFERED 100UNT/ML INJ
+"DATA",176.112,24767,1)
+311034
+"DATA",176.112,24768,0)
+4001482^INSULIN REG HUMAN 100 U/ML INJ PEN 1.5ML
+"DATA",176.112,24768,1)
+311034
+"DATA",176.112,24769,0)
+4016562^INSULIN NPH HUMAN 100 U/ML INJ SYRINGE 1.5ML
+"DATA",176.112,24769,1)
+311028
+"DATA",176.112,24770,0)
+4001441^INSULIN,NPH,HUMAN 100UNT/ML INJ
+"DATA",176.112,24770,1)
+311028
+"DATA",176.112,24771,0)
+4016563^INSULIN NPH HUMAN 100 U/ML INJ INNOLET 3ML
+"DATA",176.112,24771,1)
+311028
+"DATA",176.112,24772,0)
+4013285^INFLIXIMAB 100MG/VIL (PF) INJ
+"DATA",176.112,24772,1)
+310994
+"DATA",176.112,24773,0)
+4002669^INDOMETHACIN NA 1MG/VIL INJ
+"DATA",176.112,24773,1)
+310993
+"DATA",176.112,24774,0)
+4002667^INDOMETHACIN 75MG CAP,SA
+"DATA",176.112,24774,1)
+310992
+"DATA",176.112,24775,0)
+4002668^INDOMETHACIN 25MG/5ML SUSP,ORAL
+"DATA",176.112,24775,1)
+310991
+"DATA",176.112,24776,0)
+4003556^INDOCYANINE GREEN 50MG/VIL INJ
+"DATA",176.112,24776,1)
+310990
+"DATA",176.112,24777,0)
+4003555^INDOCYANINE GREEN 25MG/VIL INJ
+"DATA",176.112,24777,1)
+310989
+"DATA",176.112,24778,0)
+4012901^INDINAVIR SULFATE 400MG CAP
+"DATA",176.112,24778,1)
+310988
+"DATA",176.112,24779,0)
+4014074^INDINAVIR SULFATE 400MG CAP,UD
+"DATA",176.112,24779,1)
+310988
+"DATA",176.112,24780,0)
+4013666^INDINAVIR SULFATE 333MG CAP
+"DATA",176.112,24780,1)
+310987
+"DATA",176.112,24781,0)
+4012902^INDINAVIR SULFATE 200MG CAP
+"DATA",176.112,24781,1)
+310986
+"DATA",176.112,24782,0)
+4009373^INDIGO CARMINE 8MG/ML INJ
+"DATA",176.112,24782,1)
+310985
+"DATA",176.112,24783,0)
+4009372^INDIGO CARMINE 8MG/ML (PF) INJ
+"DATA",176.112,24783,1)
+310985
+"DATA",176.112,24784,0)
+4014965^INAMRINONE LACTATE 5MG/ML INJ
+"DATA",176.112,24784,1)
+310984
+"DATA",176.112,24785,0)
+4004247^AMRINONE LACTATE 5MG/ML INJ
+"DATA",176.112,24785,1)
+310984
+"DATA",176.112,24786,0)
+4013096^IMIQUIMOD 5% CREAM,TOP,PKT,0.25GM
+"DATA",176.112,24786,1)
+310982
+"DATA",176.112,24787,0)
+4002541^IMIPRAMINE HCL 50MG TAB,EC
+"DATA",176.112,24787,1)
+310981
+"DATA",176.112,24788,0)
+4002538^IMIPRAMINE HCL 12.5MG/ML INJ
+"DATA",176.112,24788,1)
+310980
+"DATA",176.112,24789,0)
+4002539^IMIPRAMINE HCL 10MG TAB,EC
+"DATA",176.112,24789,1)
+310979
+"DATA",176.112,24790,0)
+4008968^IFOSFAMIDE 3GM/VIL/MESNA 400MG/AMP PKG INJ
+"DATA",176.112,24790,1)
+310977
+"DATA",176.112,24791,0)
+4008967^IFOSFAMIDE 1GM/VIL/MESNA 200MG/AMP PKG INJ
+"DATA",176.112,24791,1)
+310975
+"DATA",176.112,24792,0)
+4008966^IFOSFAMIDE 1GM/VIL INJ
+"DATA",176.112,24792,1)
+310973
+"DATA",176.112,24793,0)
+4016486^IFOSFAMIDE 3GM/VIL INJ
+"DATA",176.112,24793,1)
+310973
+"DATA",176.112,24794,0)
+4003144^IDOXURIDINE 0.5% OINT,OPH
+"DATA",176.112,24794,1)
+310972
+"DATA",176.112,24795,0)
+4003145^IDOXURIDINE 0.1% SOLN,OPH
+"DATA",176.112,24795,1)
+310971
+"DATA",176.112,24796,0)
+4009311^IDARUBICIN HCL 10MG/VIL INJ
+"DATA",176.112,24796,1)
+310970
+"DATA",176.112,24797,0)
+4009310^IDARUBICIN HCL 5MG/VIL INJ
+"DATA",176.112,24797,1)
+310970
+"DATA",176.112,24798,0)
+4009313^IDARUBICIN HCL 1MG/ML (PF) INJ,SOLN
+"DATA",176.112,24798,1)
+310970
+"DATA",176.112,24799,0)
+4009312^IDARUBICIN HCL 20MG/VIL INJ
+"DATA",176.112,24799,1)
+310970
+"DATA",176.112,24800,0)
+4010529^IBUPROFEN 200MG/PSEUDOEPHEDRINE 30MG TAB
+"DATA",176.112,24800,1)
+310967
+"DATA",176.112,24801,0)
+4010528^IBUPROFEN 200MG/PSEUDOEPHEDRINE 30MG CAP
+"DATA",176.112,24801,1)
+310966
+"DATA",176.112,24802,0)
+4014851^IBUPROFEN 200MG TAB,UD
+"DATA",176.112,24802,1)
+310965
+"DATA",176.112,24803,0)
+4002412^IBUPROFEN 200MG TAB
+"DATA",176.112,24803,1)
+310965
+"DATA",176.112,24804,0)
+4014207^IBUPROFEN 200MG CAP
+"DATA",176.112,24804,1)
+310964
+"DATA",176.112,24805,0)
+4002415^IBUPROFEN 100MG TAB,CHEW
+"DATA",176.112,24805,1)
+310963
+"DATA",176.112,24806,0)
+4007908^HYOSCYAMUS EXTRACT 30MG/PHENOBARBITAL 30MG CAP
+"DATA",176.112,24806,1)
+310955
+"DATA",176.112,24807,0)
+4007676^HYOSCYAMUS 32MG/AZOPHEN 50MG/SULFAMETHIZOLE 250MG TAB
+"DATA",176.112,24807,1)
+310954
+"DATA",176.112,24808,0)
+4006726^HYOSCYAMINE SO4 0.375MG/PHENOBARBITAL 45MG CAP,SA
+"DATA",176.112,24808,1)
+310952
+"DATA",176.112,24809,0)
+4006715^HYOSCYAMINE SO4 0.375MG CAP,SA
+"DATA",176.112,24809,1)
+310950
+"DATA",176.112,24810,0)
+4006728^HYOSCYAMINE SO4 0.125MG/PHENOBARBITAL 15MG/ML DROPS,ORAL
+"DATA",176.112,24810,1)
+310949
+"DATA",176.112,24811,0)
+4006725^HYOSCYAMINE SO4 0.125MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,24811,1)
+310947
+"DATA",176.112,24812,0)
+4006714^HYOSCYAMINE SO4 0.125MG TAB
+"DATA",176.112,24812,1)
+310945
+"DATA",176.112,24813,0)
+4002605^HYDROXYZINE PAMOATE 25MG/5ML SUSP
+"DATA",176.112,24813,1)
+310943
+"DATA",176.112,24814,0)
+4002609^HYDROXYZINE HCL 25MG CAP
+"DATA",176.112,24814,1)
+310942
+"DATA",176.112,24815,0)
+4002606^HYDROXYZINE PAMOATE 25MG CAP
+"DATA",176.112,24815,1)
+310942
+"DATA",176.112,24816,0)
+4014093^HYDROXYZINE PAMOATE 25MG CAP,UD
+"DATA",176.112,24816,1)
+310942
+"DATA",176.112,24817,0)
+4002603^HYDROXYZINE PAMOATE 50MG CAP
+"DATA",176.112,24817,1)
+310939
+"DATA",176.112,24818,0)
+4016551^HYDROXYZINE PAMOATE 50MG CAP,UD
+"DATA",176.112,24818,1)
+310939
+"DATA",176.112,24819,0)
+4002608^HYDROXYZINE HCL 50MG CAP
+"DATA",176.112,24819,1)
+310939
+"DATA",176.112,24820,0)
+4005693^HYDROXYZINE HCL 25MG/OXYPHENCYCLIMINE HCL 5MG TAB
+"DATA",176.112,24820,1)
+310938
+"DATA",176.112,24821,0)
+4013950^HYDROXYZINE HCL 25MG TAB,UD
+"DATA",176.112,24821,1)
+310936
+"DATA",176.112,24822,0)
+4002598^HYDROXYZINE HCL 25MG TAB
+"DATA",176.112,24822,1)
+310936
+"DATA",176.112,24823,0)
+4002607^HYDROXYZINE PAMOATE 25MG TAB
+"DATA",176.112,24823,1)
+310936
+"DATA",176.112,24824,0)
+4002610^HYDROXYZINE HCL 100MG/ML INJ
+"DATA",176.112,24824,1)
+310935
+"DATA",176.112,24825,0)
+4017194^HYPROMELLOSE 2.5% SOLN,OPH
+"DATA",176.112,24825,1)
+310934
+"DATA",176.112,24826,0)
+4008678^HYDROXYPROPYL METHYLCELLULOSE 2.5% SOLN,OPH
+"DATA",176.112,24826,1)
+310934
+"DATA",176.112,24827,0)
+4017192^HYPROMELLOSE 0.3% SOLN,OPH
+"DATA",176.112,24827,1)
+310933
+"DATA",176.112,24828,0)
+4014308^HYDROXYPROPYL METHYLCELLULOSE 0.3% SOLN,OPH
+"DATA",176.112,24828,1)
+310933
+"DATA",176.112,24829,0)
+4014190^HYDROXYPROPYL METHYLCELLULOSE 0.3% GEL,OPH
+"DATA",176.112,24829,1)
+310932
+"DATA",176.112,24830,0)
+4017191^HYPROMELLOSE 0.3% GEL,OPH
+"DATA",176.112,24830,1)
+310932
+"DATA",176.112,24831,0)
+4001688^HYDROXYPROGESTERONE CAPROATE 125MG/ML INJ
+"DATA",176.112,24831,1)
+310931
+"DATA",176.112,24832,0)
+4001690^HYDROXYPROGESTERONE CAPROATE 125MG/ML INJ,REPOSITORY
+"DATA",176.112,24832,1)
+310931
+"DATA",176.112,24833,0)
+4003141^HYDROXYAMPHETAMINE HBR 1% SOLN,OPH
+"DATA",176.112,24833,1)
+310929
+"DATA",176.112,24834,0)
+4002982^HYDROXOCOBALAMIN 1000MCG/ML INJ,SUSP
+"DATA",176.112,24834,1)
+310928
+"DATA",176.112,24835,0)
+4007005^HYDROQUINONE 4% GEL,TOP
+"DATA",176.112,24835,1)
+310926
+"DATA",176.112,24836,0)
+4003274^HYDROMORPHONE HCL 3MG/ML INJ
+"DATA",176.112,24836,1)
+310920
+"DATA",176.112,24837,0)
+4003278^HYDROMORPHONE HCL 3MG TAB
+"DATA",176.112,24837,1)
+310919
+"DATA",176.112,24838,0)
+4003273^HYDROMORPHONE HCL 1MG/ML INJ
+"DATA",176.112,24838,1)
+310914
+"DATA",176.112,24839,0)
+4010524^HYDROGEN PEROXIDE 3%/NA BICARBONATE 59% GEL,DENTAL
+"DATA",176.112,24839,1)
+310911
+"DATA",176.112,24840,0)
+4009866^HYDROGEN PEROXIDE 1.5%/POVIDONE IODINE 5% RINSE,ORAL
+"DATA",176.112,24840,1)
+310910
+"DATA",176.112,24841,0)
+4007301^HYDROFLUORIC ACID 0.28%/NAFL 1.088%/STANNOUS FLUORIDE 0.4% LIQ
+"DATA",176.112,24841,1)
+310905
+"DATA",176.112,24842,0)
+4008143^HYDROFLUORIC ACID 0.2%/NAFL 2.6%/PHOSPHORIC ACID 1.3% SOLN,TOP
+"DATA",176.112,24842,1)
+310904
+"DATA",176.112,24843,0)
+4002900^HYDROCORTISONE NA SUCCINATE 125MG/ML INJ,SOLN
+"DATA",176.112,24843,1)
+310900
+"DATA",176.112,24844,0)
+4002936^HYDROCORTISONE NA SUCCINATE 1000MG/VIL INJ,SOLN
+"DATA",176.112,24844,1)
+310900
+"DATA",176.112,24845,0)
+4002934^HYDROCORTISONE NA SUCCINATE 250MG/VIL INJ,SOLN
+"DATA",176.112,24845,1)
+310900
+"DATA",176.112,24846,0)
+4002935^HYDROCORTISONE NA SUCCINATE 500MG/VIL INJ,SOLN
+"DATA",176.112,24846,1)
+310900
+"DATA",176.112,24847,0)
+4002897^HYDROCORTISONE CYPIONATE 10MG/5ML SUSP,ORAL
+"DATA",176.112,24847,1)
+310899
+"DATA",176.112,24848,0)
+4015105^HYDROCORTISONE BUTYRATE 0.1% SOLN,TOP
+"DATA",176.112,24848,1)
+310898
+"DATA",176.112,24849,0)
+4002914^HYDROCORTISONE ACETATE 25MG SUPP,RTL
+"DATA",176.112,24849,1)
+310896
+"DATA",176.112,24850,0)
+4007686^HEMORRHOIDAL-HC 25MG SUPP,RTL
+"DATA",176.112,24850,1)
+310896
+"DATA",176.112,24851,0)
+4004041^HYDROCORTISONE ACETATE 2.5%/PRAMOXINE HCL 1% LOTION
+"DATA",176.112,24851,1)
+310894
+"DATA",176.112,24852,0)
+4004046^HYDROCORTISONE ACETATE 2.5%/PRAMOXINE HCL 1% CREAM,TOP
+"DATA",176.112,24852,1)
+310893
+"DATA",176.112,24853,0)
+4002931^HYDROCORTISONE ACETATE 2.5% SUSP,OPH
+"DATA",176.112,24853,1)
+310892
+"DATA",176.112,24854,0)
+4002904^HYDROCORTISONE 2.5% CREAM,TOP
+"DATA",176.112,24854,1)
+310891
+"DATA",176.112,24855,0)
+4002928^HYDROCORTISONE ACETATE 2.5% CREAM,TOP
+"DATA",176.112,24855,1)
+310891
+"DATA",176.112,24856,0)
+4002913^HYDROCORTISONE ACETATE 15MG SUPP,RTL
+"DATA",176.112,24856,1)
+310890
+"DATA",176.112,24857,0)
+4002901^HYDROCORTISONE ACETATE 10% FOAM,RTL
+"DATA",176.112,24857,1)
+310889
+"DATA",176.112,24858,0)
+4004769^HYDROCORTISONE 1%/UREA 10% CREAM,TOP
+"DATA",176.112,24858,1)
+310888
+"DATA",176.112,24859,0)
+4004768^HYDROCORTISONE ACETATE 1%/UREA 10% CREAM,TOP
+"DATA",176.112,24859,1)
+310888
+"DATA",176.112,24860,0)
+4004043^HYDROCORTISONE ACETATE 1%/PRAMOXINE HCL 1% LOTION
+"DATA",176.112,24860,1)
+310886
+"DATA",176.112,24861,0)
+4004040^HYDROCORTISONE ACETATE 1%/PRAMOXINE HCL 1% CREAM,TOP
+"DATA",176.112,24861,1)
+310885
+"DATA",176.112,24862,0)
+4002930^HYDROCORTISONE ACETATE 0.5% SUSP,OPH
+"DATA",176.112,24862,1)
+310882
+"DATA",176.112,24863,0)
+4002920^HYDROCORTISONE ACETATE 0.5% PASTE
+"DATA",176.112,24863,1)
+310881
+"DATA",176.112,24864,0)
+4003507^HYDROCORTISONE 2.5%/NEOMYCIN SO4 0.5% OINT,TOP
+"DATA",176.112,24864,1)
+310880
+"DATA",176.112,24865,0)
+4002949^HYDROCORTISONE 2.5% CREAM,RTL W/APPLICATOR
+"DATA",176.112,24865,1)
+310879
+"DATA",176.112,24866,0)
+4002915^HYDROCORTISONE 100MG/60ML ENEMA
+"DATA",176.112,24866,1)
+310878
+"DATA",176.112,24867,0)
+4002894^HYDROCORTISONE 100% PWDR,TOP
+"DATA",176.112,24867,1)
+310877
+"DATA",176.112,24868,0)
+4005677^HYDROCORTISONE 1.5%/OXYTETRACYCLINE 5MG/ML SUSP,OPH
+"DATA",176.112,24868,1)
+310876
+"DATA",176.112,24869,0)
+4003511^HYDROCORTISONE 1.5%/NEOMYCIN SO4 5MG/ML SUSP,OPH
+"DATA",176.112,24869,1)
+310875
+"DATA",176.112,24870,0)
+4003505^HYDROCORTISONE 1.5%/NEOMYCIN SO4 5MG/GM OINT,OPH
+"DATA",176.112,24870,1)
+310874
+"DATA",176.112,24871,0)
+4003506^HYDROCORTISONE 1%/NEOMYCIN SO4 0.5% OINT,TOP
+"DATA",176.112,24871,1)
+310873
+"DATA",176.112,24872,0)
+4005571^HYDROCORTISONE 1%/IODOQUINOL 3% OINT,TOP
+"DATA",176.112,24872,1)
+310872
+"DATA",176.112,24873,0)
+4005570^HYDROCORTISONE 1%/IODOQUINOL 3% CREAM,TOP
+"DATA",176.112,24873,1)
+310871
+"DATA",176.112,24874,0)
+4005568^HYDROCORTISONE 1%/IODOQUINOL 1% CREAM,TOP
+"DATA",176.112,24874,1)
+310870
+"DATA",176.112,24875,0)
+4002944^HYDROCORTISONE 1% SOLN,TOP
+"DATA",176.112,24875,1)
+310869
+"DATA",176.112,24876,0)
+4009415^HYDROCORTISONE 1%/ALCOHOL 33% SOLN,TOP
+"DATA",176.112,24876,1)
+310869
+"DATA",176.112,24877,0)
+4002907^HYDROCORTISONE 1% LIQUID,TOP
+"DATA",176.112,24877,1)
+310869
+"DATA",176.112,24878,0)
+4002948^HYDROCORTISONE 1% CREAM,RTL W/APPLICATOR
+"DATA",176.112,24878,1)
+310868
+"DATA",176.112,24879,0)
+4003504^HYDROCORTISONE 0.5%/NEOMYCIN SO4 0.5% OINT,TOP
+"DATA",176.112,24879,1)
+310867
+"DATA",176.112,24880,0)
+4003510^HYDROCORTISONE 0.5%/NEOMYCIN SO4 0.5% CREAM,TOP
+"DATA",176.112,24880,1)
+310866
+"DATA",176.112,24881,0)
+4003508^HYDROCORTISONE 0.5%/NEOMYCIN S04 5MG/ML SUSP,OPH
+"DATA",176.112,24881,1)
+310865
+"DATA",176.112,24882,0)
+4004359^HYDROCORTISONE 0.5%/LIDOCAINE 3% CREAM,TOP
+"DATA",176.112,24882,1)
+310864
+"DATA",176.112,24883,0)
+4005569^HYDROCORTISONE 0.5%/IODOQUINOL 3% CREAM,TOP
+"DATA",176.112,24883,1)
+310863
+"DATA",176.112,24884,0)
+4005567^HYDROCORTISONE 0.5%/IODOQUINOL 1% CREAM,TOP
+"DATA",176.112,24884,1)
+310862
+"DATA",176.112,24885,0)
+4002927^HYDROCORTISONE 0.5% OINT,TOP
+"DATA",176.112,24885,1)
+310861
+"DATA",176.112,24886,0)
+4008698^HYDROCORTISONE 0.5%/ALOE OINT,TOP
+"DATA",176.112,24886,1)
+310861
+"DATA",176.112,24887,0)
+4002942^HYDROCORTISONE ACETATE 0.5% OINT,TOP
+"DATA",176.112,24887,1)
+310861
+"DATA",176.112,24888,0)
+4002906^HYDROCORTISONE 0.5% AEROSOL,TOP
+"DATA",176.112,24888,1)
+310858
+"DATA",176.112,24889,0)
+4003509^HYDROCORTISONE 0.25%/NEOMYCIN SO4 0.5% CREAM,TOP
+"DATA",176.112,24889,1)
+310857
+"DATA",176.112,24890,0)
+4003909^HYDROCODONE RESIN 5MG/PHENYLTOLOXAMINE RESIN 10MG CAP,SA
+"DATA",176.112,24890,1)
+310856
+"DATA",176.112,24891,0)
+4008661^HYDROCODONE POLISTIREX 10MG/CHLORPHENIRAMINE 8MG/5ML SUSP,SA
+"DATA",176.112,24891,1)
+310855
+"DATA",176.112,24892,0)
+4013147^HYDROCODONE BITARTRATE 7.5MG/IBUPROFEN 200MG TAB
+"DATA",176.112,24892,1)
+310854
+"DATA",176.112,24893,0)
+4004961^HYDROCODONE 7MG/ACETAMINOPHEN 500MG TAB
+"DATA",176.112,24893,1)
+310853
+"DATA",176.112,24894,0)
+4005633^HYDROCODONE 5MG/PSEUDOEPHEDRINE 60MG TAB
+"DATA",176.112,24894,1)
+310852
+"DATA",176.112,24895,0)
+4005635^HYDROCODONE 5MG/PSEUDOEPHEDRINE 30MG/5ML LIQUID
+"DATA",176.112,24895,1)
+310851
+"DATA",176.112,24896,0)
+4003911^HYDROCODONE 5MG/PHENYLTOLOXAMINE 10MG/5ML SUSP
+"DATA",176.112,24896,1)
+310850
+"DATA",176.112,24897,0)
+4005182^HYDROCODONE 5MG/HOMATROPINE 1.5MG TAB
+"DATA",176.112,24897,1)
+310848
+"DATA",176.112,24898,0)
+4005209^HYDROCODONE 5MG/GUAIFENESIN 300MG TAB
+"DATA",176.112,24898,1)
+310847
+"DATA",176.112,24899,0)
+4005208^HYDROCODONE 5MG/GUAIFENESIN 100MG/5ML SYRUP
+"DATA",176.112,24899,1)
+310845
+"DATA",176.112,24900,0)
+4005210^HYDROCODONE 5MG/GUAIFENESIN 100MG/5ML (SF & AF) LIQUID
+"DATA",176.112,24900,1)
+310845
+"DATA",176.112,24901,0)
+4005672^HYDROCODONE 5MG/GG 200MG/PSEUDEFED 60MG/5ML SYRUP
+"DATA",176.112,24901,1)
+310843
+"DATA",176.112,24902,0)
+4005673^HYDROCODONE 5MG/GG 200MG/PSEUDEFED 60MG/5ML LIQUID
+"DATA",176.112,24902,1)
+310843
+"DATA",176.112,24903,0)
+4005442^HYDROCODONE 5MG/GG 200MG/PHENINDAMINE 25MG TAB
+"DATA",176.112,24903,1)
+310842
+"DATA",176.112,24904,0)
+4008161^HYDROCODONE 5MG/ASPIRIN 500MG TAB
+"DATA",176.112,24904,1)
+310840
+"DATA",176.112,24905,0)
+4007712^HYDROCODONE 5MG/ASA 224MG/CAFN 32MG TAB
+"DATA",176.112,24905,1)
+310839
+"DATA",176.112,24906,0)
+4008107^HYDROCODONE 5MG/APAP 325MG/BUTALBITAL 30MG/CAFN 40MG CAP
+"DATA",176.112,24906,1)
+310838
+"DATA",176.112,24907,0)
+4005184^HYDROCODONE 5MG/APAP 250MG/CAFN 30MG/CTM 2MG/P-EPHRINE 10MG TAB
+"DATA",176.112,24907,1)
+310837
+"DATA",176.112,24908,0)
+4006941^HYDROCODONE 5MG/APAP 150MG/ASA 230MG/CAFN 30MG TAB
+"DATA",176.112,24908,1)
+310836
+"DATA",176.112,24909,0)
+4004963^HYDROCODONE 3MG/ACETAMINOPHEN 500MG TAB
+"DATA",176.112,24909,1)
+310834
+"DATA",176.112,24910,0)
+4005675^HYDROCODONE 2.5MG/GG 100MG/PSEUDEFED 30MG/5ML LIQUID
+"DATA",176.112,24910,1)
+310832
+"DATA",176.112,24911,0)
+4005674^HYDROCODONE 2.5MG/GG 100MG/PSEUDEFED 15MG/5ML LIQUID
+"DATA",176.112,24911,1)
+310831
+"DATA",176.112,24912,0)
+4007114^HYDROCODONE 2.5MG/CTM 4MG/P-EPHRINE 10MG/5ML SYRUP
+"DATA",176.112,24912,1)
+310828
+"DATA",176.112,24913,0)
+4007116^HYDROCODONE 2.5MG/CTM 4MG/P-EPHRINE 10MG/5ML LIQUID
+"DATA",176.112,24913,1)
+310828
+"DATA",176.112,24914,0)
+4008113^HYDROCODONE 2.5MG/CTM 2MG/MENTHOL/PSEUDEFED 30MG/5ML SYRUP
+"DATA",176.112,24914,1)
+310827
+"DATA",176.112,24915,0)
+4008112^HYDROCODONE 2.5MG/CTM 2MG/MENTHOL/PSEUDEFED 30MG/5ML LIQUID
+"DATA",176.112,24915,1)
+310827
+"DATA",176.112,24916,0)
+4009845^HYDROCODONE 2.5MG/CTM 2MG/PSEUDEFED 30MG/5ML LIQUID
+"DATA",176.112,24916,1)
+310827
+"DATA",176.112,24917,0)
+4008662^HYDROCODONE 2.5MG/CHLORPHENIRAMINE 2MG/5ML LIQUID
+"DATA",176.112,24917,1)
+310825
+"DATA",176.112,24918,0)
+4004960^HYDROCODONE 2.5MG/ACETAMINOPHEN 325MG TAB
+"DATA",176.112,24918,1)
+310824
+"DATA",176.112,24919,0)
+4007118^HYDROCODONE 10MG/CTM 12MG/P-EPHRINE 30MG/5ML LIQUID
+"DATA",176.112,24919,1)
+310821
+"DATA",176.112,24920,0)
+4007119^HYDROCODONE 1.67MG/CTM 2MG/P-EPHRINE 5MG/5ML SYRUP
+"DATA",176.112,24920,1)
+310819
+"DATA",176.112,24921,0)
+4007115^HYDROCODONE 1.67MG/CTM 2MG/P-EPHRINE 5MG/5ML LIQUID
+"DATA",176.112,24921,1)
+310819
+"DATA",176.112,24922,0)
+4002728^HYDROCHLOROTHIAZIDE 50MG/TRIAMTERENE 75MG TAB
+"DATA",176.112,24922,1)
+310818
+"DATA",176.112,24923,0)
+4013983^HYDROCHLOROTHIAZIDE 50MG/TRIAMTERENE 75MG TAB,UD
+"DATA",176.112,24923,1)
+310818
+"DATA",176.112,24924,0)
+4002732^HYDROCHLOROTHIAZIDE 50MG/TRIAMTERENE 75MG CAP
+"DATA",176.112,24924,1)
+310817
+"DATA",176.112,24925,0)
+4004993^HYDROCHLOROTHIAZIDE 50MG/PROPRANOLOL HCL 80MG CAP,SA
+"DATA",176.112,24925,1)
+310816
+"DATA",176.112,24926,0)
+4004995^HYDROCHLOROTHIAZIDE 50MG/PROPRANOLOL HCL 160MG CAP,SA
+"DATA",176.112,24926,1)
+310815
+"DATA",176.112,24927,0)
+4004994^HYDROCHLOROTHIAZIDE 50MG/PROPRANOLOL HCL 120MG CAP,SA
+"DATA",176.112,24927,1)
+310814
+"DATA",176.112,24928,0)
+4002655^HYDROCHLOROTHIAZIDE 50MG/5ML SOLN,ORAL
+"DATA",176.112,24928,1)
+310813
+"DATA",176.112,24929,0)
+4002731^HYDROCHLOROTHIAZIDE 25MG/TRIAMTERENE 37.5MG TAB
+"DATA",176.112,24929,1)
+310812
+"DATA",176.112,24930,0)
+4013982^HYDROCHLOROTHIAZIDE 25MG/TRIAMTERENE 37.5MG TAB,UD
+"DATA",176.112,24930,1)
+310812
+"DATA",176.112,24931,0)
+4002862^HYDROCHLOROTHIAZIDE 25MG/TIMOLOL MALEATE 10MG TAB
+"DATA",176.112,24931,1)
+310811
+"DATA",176.112,24932,0)
+4002846^HYDROCHLOROTHIAZIDE 25MG/RESERPINE 0.1MG TAB
+"DATA",176.112,24932,1)
+310810
+"DATA",176.112,24933,0)
+4014662^HYDROCHLOROTHIAZIDE 25MG/QUINAPRIL HCL 20MG TAB
+"DATA",176.112,24933,1)
+310809
+"DATA",176.112,24934,0)
+4004997^HYDROCHLOROTHIAZIDE 25MG/PROPRANOLOL HCL 80MG TAB
+"DATA",176.112,24934,1)
+310808
+"DATA",176.112,24935,0)
+4004996^HYDROCHLOROTHIAZIDE 25MG/PROPRANOLOL HCL 40MG TAB
+"DATA",176.112,24935,1)
+310807
+"DATA",176.112,24936,0)
+4004998^HYDROCHLOROTHIAZIDE 25MG/PROPRANOLOL HCL 30MG TAB
+"DATA",176.112,24936,1)
+310806
+"DATA",176.112,24937,0)
+4013144^HYDROCHLOROTHIAZIDE 25MG/MOEXIPRIL HCL 15MG TAB
+"DATA",176.112,24937,1)
+310805
+"DATA",176.112,24938,0)
+4004600^HYDROCHLOROTHIAZIDE 25MG/METOPROLOL 50MG TAB
+"DATA",176.112,24938,1)
+310804
+"DATA",176.112,24939,0)
+4004601^HYDROCHLOROTHIAZIDE 25MG/METOPROLOL 100MG TAB
+"DATA",176.112,24939,1)
+310803
+"DATA",176.112,24940,0)
+4013404^HYDROCHLOROTHIAZIDE 25MG/LORSARTAN POTASSIUM 100MG TAB,UD
+"DATA",176.112,24940,1)
+310802
+"DATA",176.112,24941,0)
+4013403^HYDROCHLOROTHIAZIDE 25MG/LORSARTAN POTASSIUM 100MG TAB
+"DATA",176.112,24941,1)
+310802
+"DATA",176.112,24942,0)
+4025622^HYDROCHLOROTHIAZIDE 25MG/LOSARTAN POTASSIUM 100MG TAB
+"DATA",176.112,24942,1)
+310802
+"DATA",176.112,24943,0)
+4025623^HYDROCHLOROTHIAZIDE 25MG/LOSARTAN POTASSIUM 100MG TAB,UD
+"DATA",176.112,24943,1)
+310802
+"DATA",176.112,24944,0)
+4009006^HYDROCHLOROTHIAZIDE 25MG/LABETALOL 300MG TAB
+"DATA",176.112,24944,1)
+310801
+"DATA",176.112,24945,0)
+4009005^HYDROCHLOROTHIAZIDE 25MG/LABETALOL 200MG TAB
+"DATA",176.112,24945,1)
+310800
+"DATA",176.112,24946,0)
+4009004^HYDROCHLOROTHIAZIDE 25MG/LABETALOL 100MG TAB
+"DATA",176.112,24946,1)
+310799
+"DATA",176.112,24947,0)
+4013949^HYDROCHLOROTHIAZIDE 25MG TAB,UD
+"DATA",176.112,24947,1)
+310798
+"DATA",176.112,24948,0)
+4002651^HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,24948,1)
+310798
+"DATA",176.112,24949,0)
+4014660^HYDROCHLOROTHIAZIDE 12.5MG/QUINAPRIL HCL 20MG TAB
+"DATA",176.112,24949,1)
+310797
+"DATA",176.112,24950,0)
+4014661^HYDROCHLOROTHIAZIDE 12.5MG/QUINAPRIL HCL 10MG TAB
+"DATA",176.112,24950,1)
+310796
+"DATA",176.112,24951,0)
+4013143^HYDROCHLOROTHIAZIDE 12.5MG/MOEXIPRIL HCL 7.5MG TAB
+"DATA",176.112,24951,1)
+310795
+"DATA",176.112,24952,0)
+4012772^HYDROCHLOROTHIAZIDE 12.5MG/LOSARTAN POTASSIUM 50MG TAB
+"DATA",176.112,24952,1)
+310794
+"DATA",176.112,24953,0)
+4013421^HYDROCHLOROTHIAZIDE 12.5MG/LOSARTAN POTASSIUM 50MG TAB,UD
+"DATA",176.112,24953,1)
+310794
+"DATA",176.112,24954,0)
+4013775^HYDROCHLOROTHIAZIDE 12.5MG/IRBESARTAN 300MG TAB,UD
+"DATA",176.112,24954,1)
+310793
+"DATA",176.112,24955,0)
+4013774^HYDROCHLOROTHIAZIDE 12.5MG/IRBESARTAN 300MG TAB
+"DATA",176.112,24955,1)
+310793
+"DATA",176.112,24956,0)
+4013772^HYDROCHLOROTHIAZIDE 12.5MG/IRBESARTAN 150MG TAB
+"DATA",176.112,24956,1)
+310792
+"DATA",176.112,24957,0)
+4013773^HYDROCHLOROTHIAZIDE 12.5MG/IRBESARTAN 150MG TAB,UD
+"DATA",176.112,24957,1)
+310792
+"DATA",176.112,24958,0)
+4007478^HYDROCHLORIC ACID 2MG/ML LIQUID,ORAL
+"DATA",176.112,24958,1)
+310791
+"DATA",176.112,24959,0)
+4002635^HYDRALAZINE HCL 50MG TAB
+"DATA",176.112,24959,1)
+310789
+"DATA",176.112,24960,0)
+4014602^HYDRALAZINE HCL 50MG TAB,UD
+"DATA",176.112,24960,1)
+310789
+"DATA",176.112,24961,0)
+4002639^HYDRALAZINE HCL 50MG CAP
+"DATA",176.112,24961,1)
+310788
+"DATA",176.112,24962,0)
+4005449^HYDRALAZINE 50MG/HYDROCHLOROTHIAZIDE 50MG TAB
+"DATA",176.112,24962,1)
+310787
+"DATA",176.112,24963,0)
+4005446^HYDRALAZINE 50MG/HYDROCHLOROTHIAZIDE 50MG CAP
+"DATA",176.112,24963,1)
+310786
+"DATA",176.112,24964,0)
+4006534^HYDRALAZINE 25MG/RESERPINE 0.1MG TAB
+"DATA",176.112,24964,1)
+310785
+"DATA",176.112,24965,0)
+4005445^HYDRALAZINE 25MG/HYDROCHLOROTHIAZIDE 25MG CAP
+"DATA",176.112,24965,1)
+310784
+"DATA",176.112,24966,0)
+4002697^HYDRALAZINE 25MG/HCTZ 15MG/RESERPINE 0.1MG TAB
+"DATA",176.112,24966,1)
+310783
+"DATA",176.112,24967,0)
+4005448^HYDRALAZINE 100MG/HYDROCHLOROTHIAZIDE 50MG CAP
+"DATA",176.112,24967,1)
+310782
+"DATA",176.112,24968,0)
+4005520^HOMATROPINE METHYLBROMIDE 5MG TAB
+"DATA",176.112,24968,1)
+310777
+"DATA",176.112,24969,0)
+4005521^HOMATROPINE METHYLBROMIDE 10MG TAB
+"DATA",176.112,24969,1)
+310776
+"DATA",176.112,24970,0)
+4005522^HOMATROPINE HBR 5% SOLN,OPH,1ML
+"DATA",176.112,24970,1)
+310775
+"DATA",176.112,24971,0)
+4005519^HOMATROPINE HBR 5% SOLN,OPH
+"DATA",176.112,24971,1)
+310775
+"DATA",176.112,24972,0)
+4005518^HOMATROPINE HBR 2% SOLN,OPH
+"DATA",176.112,24972,1)
+310774
+"DATA",176.112,24973,0)
+4005828^HISTOPLASMIN 1:100 SKIN TEST INJ
+"DATA",176.112,24973,1)
+310773
+"DATA",176.112,24974,0)
+4000971^HISTAMINE PO4 2.75MG/ML INJ
+"DATA",176.112,24974,1)
+310772
+"DATA",176.112,24975,0)
+4000973^HISTAMINE PO4 0.275MG/ML INJ
+"DATA",176.112,24975,1)
+310771
+"DATA",176.112,24976,0)
+4006267^HEXOCYCLIUM METHYLSULFATE 50MG TAB,SA
+"DATA",176.112,24976,1)
+310769
+"DATA",176.112,24977,0)
+4006266^HEXOCYCLIUM METHYLSULFATE 25MG TAB
+"DATA",176.112,24977,1)
+310768
+"DATA",176.112,24978,0)
+4006709^HEXOBARBITAL 260MG TAB
+"DATA",176.112,24978,1)
+310767
+"DATA",176.112,24979,0)
+4006708^HEXOBARBITAL 250MG TAB
+"DATA",176.112,24979,1)
+310766
+"DATA",176.112,24980,0)
+4004823^HEXAFLUORENIUM BROMIDE 20MG/ML INJ
+"DATA",176.112,24980,1)
+310765
+"DATA",176.112,24981,0)
+4004330^HEXACHLOROPHENE 450MG/UNT SOAP
+"DATA",176.112,24981,1)
+310763
+"DATA",176.112,24982,0)
+4004324^HEXACHLOROPHENE 3% LIQUID,TOP
+"DATA",176.112,24982,1)
+310761
+"DATA",176.112,24983,0)
+4004325^HEXACHLOROPHENE 3% EMULSION,TOP
+"DATA",176.112,24983,1)
+310761
+"DATA",176.112,24984,0)
+4004327^HEXACHLOROPHENE 3% SOAP/DETERGENT
+"DATA",176.112,24984,1)
+310761
+"DATA",176.112,24985,0)
+4004328^HEXACHLOROPHENE 1% SOLN,TOP
+"DATA",176.112,24985,1)
+310760
+"DATA",176.112,24986,0)
+4007850^HEXACHLOROPHENE 0.5%/HC 0.5%/MENTHOL 0.125% CREAM,TOP
+"DATA",176.112,24986,1)
+310759
+"DATA",176.112,24987,0)
+4004329^HEXACHLOROPHENE 0.25% SOLN,TOP
+"DATA",176.112,24987,1)
+310758
+"DATA",176.112,24988,0)
+4006763^HETASTARCH 6% INJ
+"DATA",176.112,24988,1)
+310757
+"DATA",176.112,24989,0)
+4016450^HETASTARCH 6%/W ELECTROLYTES INJ,BAG,500ML
+"DATA",176.112,24989,1)
+310757
+"DATA",176.112,24990,0)
+4007224^HETASTARCH 6%/NACL 0.9% INJ
+"DATA",176.112,24990,1)
+310757
+"DATA",176.112,24991,0)
+4007225^HETASTARCH 6%/NACL 0.9% INJ,BAG,250ML
+"DATA",176.112,24991,1)
+310757
+"DATA",176.112,24992,0)
+4003023^HEPATITIS B VACCINE (RECOMBINANT) 40MCG/ML INJ,SUSP
+"DATA",176.112,24992,1)
+310756
+"DATA",176.112,24993,0)
+4003021^HEPATITIS B VACCINE (RECOMBINANT) 10MCG/0.5ML INJ
+"DATA",176.112,24993,1)
+310753
+"DATA",176.112,24994,0)
+4003024^HEPATITIS B VACCINE (RECOMBINANT) 20MCG/ML INJ
+"DATA",176.112,24994,1)
+310753
+"DATA",176.112,24995,0)
+4003022^HEPATITIS B VACCINE (RECOMBINANT) 10MCG/ML INJ,SUSP
+"DATA",176.112,24995,1)
+310752
+"DATA",176.112,24996,0)
+4012764^HEPATITIS A VACCINE,INACTIVATED 1440 EL.U./ML INJ,VIL,10ML
+"DATA",176.112,24996,1)
+310748
+"DATA",176.112,24997,0)
+4012756^HEPATITIS A VACCINE,INACTIVATED 1440 EL.U./ML INJ,VIL,1ML
+"DATA",176.112,24997,1)
+310748
+"DATA",176.112,24998,0)
+4012762^HEPATITIS A VACCINE,INACTIVATED 720 EL.U./0.5ML INJ,VIL,0.5ML
+"DATA",176.112,24998,1)
+310748
+"DATA",176.112,24999,0)
+4012758^HEPATITIS A VACCINE,INACTIVATED 25UNT/0.5ML INJ,VIL,0.5ML
+"DATA",176.112,24999,1)
+310747
+"DATA",176.112,25000,0)
+4012760^HEPATITIS A VACCINE,INACTIVATED 50UNT/ML INJ,VIL,1ML
+"DATA",176.112,25000,1)
+310747
+"DATA",176.112,25001,0)
+4012755^HEPATITIS A VACCINE,INACTIVATED 360 EL.U./0.5ML INJ,VIL,0.5ML
+"DATA",176.112,25001,1)
+310745
+"DATA",176.112,25002,0)
+4001370^HEPARIN NA 8.3UNT/ML INJ
+"DATA",176.112,25002,1)
+310743
+"DATA",176.112,25003,0)
+4001373^HEPARIN NA 6000UNT/ML INJ
+"DATA",176.112,25003,1)
+310742
+"DATA",176.112,25004,0)
+4003351^HEPARIN NA 50UNT/ML/NACL 0.45% INJ
+"DATA",176.112,25004,1)
+310741
+"DATA",176.112,25005,0)
+4003353^HEPARIN NA 50UNT/ML/NACL 0.9% INJ
+"DATA",176.112,25005,1)
+310741
+"DATA",176.112,25006,0)
+4006254^HEPARIN NA 50UNT/ML/DEXTROSE 5% INJ
+"DATA",176.112,25006,1)
+310741
+"DATA",176.112,25007,0)
+4001361^HEPARIN NA (BEEF) 5000UNT/ML INJ
+"DATA",176.112,25007,1)
+310740
+"DATA",176.112,25008,0)
+4001354^HEPARIN NA 5000UNT/ML INJ
+"DATA",176.112,25008,1)
+310740
+"DATA",176.112,25009,0)
+4001364^HEPARIN NA (PORK) 5000UNT/ML INJ
+"DATA",176.112,25009,1)
+310740
+"DATA",176.112,25010,0)
+4006257^HEPARIN NA 40UNT/ML/DEXTROSE 5% INJ
+"DATA",176.112,25010,1)
+310739
+"DATA",176.112,25011,0)
+4001372^HEPARIN NA 4000UNT/ML INJ
+"DATA",176.112,25011,1)
+310738
+"DATA",176.112,25012,0)
+4001368^HEPARIN NA 40000UNT/ML INJ
+"DATA",176.112,25012,1)
+310737
+"DATA",176.112,25013,0)
+4001366^HEPARIN NA (PORK) 40000UNT/ML INJ
+"DATA",176.112,25013,1)
+310737
+"DATA",176.112,25014,0)
+4001371^HEPARIN NA 3000UNT/ML INJ
+"DATA",176.112,25014,1)
+310736
+"DATA",176.112,25015,0)
+4001381^HEPARIN NA 250UNT/ML INJ
+"DATA",176.112,25015,1)
+310735
+"DATA",176.112,25016,0)
+4001357^HEPARIN NA 2500UNT/ML INJ
+"DATA",176.112,25016,1)
+310734
+"DATA",176.112,25017,0)
+4001367^HEPARIN NA 2000UNT/ML INJ
+"DATA",176.112,25017,1)
+310733
+"DATA",176.112,25018,0)
+4001383^HEPARIN NA 20000 UNT/ML INJ,VIL,5ML
+"DATA",176.112,25018,1)
+310732
+"DATA",176.112,25019,0)
+4001351^HEPARIN NA 20000UNT/ML INJ
+"DATA",176.112,25019,1)
+310732
+"DATA",176.112,25020,0)
+4001365^HEPARIN NA (PORK) 20000UNT/ML INJ
+"DATA",176.112,25020,1)
+310732
+"DATA",176.112,25021,0)
+4001380^HEPARIN NA 2.5UNT/ML INJ
+"DATA",176.112,25021,1)
+310731
+"DATA",176.112,25022,0)
+4001355^HEPARIN NA 15000UNT/ML INJ
+"DATA",176.112,25022,1)
+310730
+"DATA",176.112,25023,0)
+4001379^HEPARIN NA 10UNT/ML INJ
+"DATA",176.112,25023,1)
+310723
+"DATA",176.112,25024,0)
+4017068^HEPARIN NA 10UNIT/ML LOCK FLUSH SOLN,1ML
+"DATA",176.112,25024,1)
+310723
+"DATA",176.112,25025,0)
+4017069^HEPARIN NA 10UNIT/ML FLUSH SOLN,10ML
+"DATA",176.112,25025,1)
+310723
+"DATA",176.112,25026,0)
+4001358^HEPARIN NA 10UNT/ML LOCK FLUSH SOLN
+"DATA",176.112,25026,1)
+310723
+"DATA",176.112,25027,0)
+4001376^HEPARIN NA 10UNT/ML (PF) LOCK FLUSH SOLN
+"DATA",176.112,25027,1)
+310723
+"DATA",176.112,25028,0)
+4006256^HEPARIN NA 10UNT/ML/DEXTROSE 5% INJ
+"DATA",176.112,25028,1)
+310723
+"DATA",176.112,25029,0)
+4003354^HEPARIN NA 10UNT/ML/NACL 0.9% INJ
+"DATA",176.112,25029,1)
+310723
+"DATA",176.112,25030,0)
+4003349^HEPARIN NA 10UNT/ML/NACL 0.9% LOCK FLUSH SOLN
+"DATA",176.112,25030,1)
+310723
+"DATA",176.112,25031,0)
+4001374^HEPARIN NA (PORK) 10UNT/ML LOCK FLUSH SOLN
+"DATA",176.112,25031,1)
+310723
+"DATA",176.112,25032,0)
+4017186^HEPARIN NA 10UNIT/ML LOCK FLUSH SOLN,10ML
+"DATA",176.112,25032,1)
+310723
+"DATA",176.112,25033,0)
+4003348^HEPARIN NA 100UNT/ML/NACL 0.9% LOCK FLUSH SOLN
+"DATA",176.112,25033,1)
+310713
+"DATA",176.112,25034,0)
+4001396^HEPARIN NA 100UNT/ML INJ,CARTRIDGE,3ML
+"DATA",176.112,25034,1)
+310713
+"DATA",176.112,25035,0)
+4001378^HEPARIN NA 100UNT/ML INJ
+"DATA",176.112,25035,1)
+310713
+"DATA",176.112,25036,0)
+4006253^HEPARIN NA 100UNT/ML/DEXTROSE 5% INJ
+"DATA",176.112,25036,1)
+310713
+"DATA",176.112,25037,0)
+4003350^HEPARIN NA 100UNT/ML/NACL 0.45% INJ
+"DATA",176.112,25037,1)
+310713
+"DATA",176.112,25038,0)
+4001375^HEPARIN NA (PORK) 100UNT/ML LOCK FLUSH SOLN
+"DATA",176.112,25038,1)
+310713
+"DATA",176.112,25039,0)
+4001377^HEPARIN NA 100UNT/ML (PF) LOCK FLUSH SOLN
+"DATA",176.112,25039,1)
+310713
+"DATA",176.112,25040,0)
+4001359^HEPARIN NA 100UNT/ML LOCK FLUSH SOLN
+"DATA",176.112,25040,1)
+310713
+"DATA",176.112,25041,0)
+4001360^HEPARIN NA (BEEF) 1000UNT/ML INJ
+"DATA",176.112,25041,1)
+310710
+"DATA",176.112,25042,0)
+4001349^HEPARIN NA 1000UNT/ML INJ
+"DATA",176.112,25042,1)
+310710
+"DATA",176.112,25043,0)
+4001352^HEPARIN NA 1000UNT/ML (PF) INJ
+"DATA",176.112,25043,1)
+310710
+"DATA",176.112,25044,0)
+4001363^HEPARIN NA (PORK) 1000UNT/ML INJ
+"DATA",176.112,25044,1)
+310710
+"DATA",176.112,25045,0)
+4002294^HEMOPHILUS B POLYSACCHARIDE VACCINE 25MCG/0.5ML INJ
+"DATA",176.112,25045,1)
+310702
+"DATA",176.112,25046,0)
+4008029^HELIUM 99% GAS
+"DATA",176.112,25046,1)
+310693
+"DATA",176.112,25047,0)
+4007900^HELIUM 40.7%/OXYGEN 59.2% GAS
+"DATA",176.112,25047,1)
+310692
+"DATA",176.112,25048,0)
+4007899^HELIUM 20%/OXYGEN 80% GAS
+"DATA",176.112,25048,1)
+310691
+"DATA",176.112,25049,0)
+4005435^HC 1%/N-MYCIN 5MG/POLYMYX 10000UNT/GM OINT,OPH
+"DATA",176.112,25049,1)
+310688
+"DATA",176.112,25050,0)
+4005433^HC 1%/N-MYCIN 3.5MG/POLYMYX 10000UNT/ML SUSP,OTIC
+"DATA",176.112,25050,1)
+310687
+"DATA",176.112,25051,0)
+4005439^HC 1%/N-MYCIN 3.5MG/POLYMYX 10000UNT/ML SOLN,OPH
+"DATA",176.112,25051,1)
+310685
+"DATA",176.112,25052,0)
+4006412^HC 0.5%/SAL AC 2%/NA THIOSULFATE 8% LOTION
+"DATA",176.112,25052,1)
+310684
+"DATA",176.112,25053,0)
+4007484^HC 0.25%/SAL AC 2.35%/SULFUR 4% LOTION
+"DATA",176.112,25053,1)
+310682
+"DATA",176.112,25054,0)
+4005431^HC 0.1%/N-MYCIN 5MG/POLYMYX 10000UNT/ML SUSP,OTIC
+"DATA",176.112,25054,1)
+310681
+"DATA",176.112,25055,0)
+4005430^HC 1%/N-MYCIN 5MG/POLYMYX 10000UNT/ML SUSP,OTIC
+"DATA",176.112,25055,1)
+310681
+"DATA",176.112,25056,0)
+4005438^HC 0.1%/N-MYCIN 3.5MG/POLYMYX 10000UNT/ML SUSP,OPH
+"DATA",176.112,25056,1)
+310680
+"DATA",176.112,25057,0)
+4008646^HAMAMELIS WATER 50% CREAM,TOP
+"DATA",176.112,25057,1)
+310676
+"DATA",176.112,25058,0)
+4005044^HALOTHANE 100% LIQUID,INHL
+"DATA",176.112,25058,1)
+310675
+"DATA",176.112,25059,0)
+4005865^HALOPROGIN 1% LIQUID,TOP
+"DATA",176.112,25059,1)
+310674
+"DATA",176.112,25060,0)
+4013337^HALOPERIDOL LACTATE 5MG/5ML LIQUID,10ML
+"DATA",176.112,25060,1)
+310673
+"DATA",176.112,25061,0)
+4013338^HALOPERIDOL LACTATE 5MG/5ML LIQUID,15ML
+"DATA",176.112,25061,1)
+310673
+"DATA",176.112,25062,0)
+4013339^HALOPERIDOL LACTATE 5MG/5ML LIQUID,20ML
+"DATA",176.112,25062,1)
+310673
+"DATA",176.112,25063,0)
+4013336^HALOPERIDOL LACTATE 5MG/5ML LIQUID,5ML
+"DATA",176.112,25063,1)
+310673
+"DATA",176.112,25064,0)
+4003620^HALOPERIDOL 5MG TAB
+"DATA",176.112,25064,1)
+310672
+"DATA",176.112,25065,0)
+4013948^HALOPERIDOL 5MG TAB,UD
+"DATA",176.112,25065,1)
+310672
+"DATA",176.112,25066,0)
+4014001^HALOPERIDOL 1MG TAB,UD
+"DATA",176.112,25066,1)
+310671
+"DATA",176.112,25067,0)
+4003618^HALOPERIDOL 1MG TAB
+"DATA",176.112,25067,1)
+310671
+"DATA",176.112,25068,0)
+4003617^HALOPERIDOL 0.5MG TAB
+"DATA",176.112,25068,1)
+310670
+"DATA",176.112,25069,0)
+4013947^HALOPERIDOL 0.5MG TAB,UD
+"DATA",176.112,25069,1)
+310670
+"DATA",176.112,25070,0)
+4001658^HALCINONIDE 0.1% SOLN,TOP
+"DATA",176.112,25070,1)
+310669
+"DATA",176.112,25071,0)
+4007437^GUANIDINE HCL 125MG TAB
+"DATA",176.112,25071,1)
+310668
+"DATA",176.112,25072,0)
+4006541^GUANETHIDINE MONOSULFATE 50MG TAB
+"DATA",176.112,25072,1)
+310667
+"DATA",176.112,25073,0)
+4006540^GUANETHIDINE MONOSULFATE 25MG TAB
+"DATA",176.112,25073,1)
+310666
+"DATA",176.112,25074,0)
+4006539^GUANETHIDINE MONOSULFATE 10MG TAB
+"DATA",176.112,25074,1)
+310665
+"DATA",176.112,25075,0)
+4006538^GUANETHIDINE 10MG/HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,25075,1)
+310664
+"DATA",176.112,25076,0)
+4003462^GUANADREL SO4 25MG TAB
+"DATA",176.112,25076,1)
+310663
+"DATA",176.112,25077,0)
+4003461^GUANADREL SO4 10MG TAB
+"DATA",176.112,25077,1)
+310662
+"DATA",176.112,25078,0)
+4003198^GUANABENZ ACETATE 16MG TAB
+"DATA",176.112,25078,1)
+310661
+"DATA",176.112,25079,0)
+4005610^GUAIFENESIN 90MG/THEOPHYLLINE,ANHYDROUS 150MG CAP,SA
+"DATA",176.112,25079,1)
+310660
+"DATA",176.112,25080,0)
+4005619^GUAIFENESIN 90MG/THEOPHYLLINE 150MG/15ML SYRUP
+"DATA",176.112,25080,1)
+310658
+"DATA",176.112,25081,0)
+4005609^GUAIFENESIN 90MG/THEOPHYLLINE 150MG/15ML LIQUID
+"DATA",176.112,25081,1)
+310658
+"DATA",176.112,25082,0)
+4005621^GUAIFENESIN 90MG/THEOPHYLLINE 150MG/15ML ELIXIR
+"DATA",176.112,25082,1)
+310658
+"DATA",176.112,25083,0)
+4014326^GUAIFENESIN 800MG TAB,SA
+"DATA",176.112,25083,1)
+310656
+"DATA",176.112,25084,0)
+4005418^GUAIFENESIN 600MG/PSEUDOEPHEDRINE 90MG TAB,SA
+"DATA",176.112,25084,1)
+310655
+"DATA",176.112,25085,0)
+4006809^GUAIFENESIN 600MG/PHENYLPROPANOLAMINE 75MG TAB,SA
+"DATA",176.112,25085,1)
+310652
+"DATA",176.112,25086,0)
+4007866^GUAIFENESIN 600MG TAB,SA
+"DATA",176.112,25086,1)
+310651
+"DATA",176.112,25087,0)
+4014323^GUAIFENESIN 575MG TAB,SA
+"DATA",176.112,25087,1)
+310650
+"DATA",176.112,25088,0)
+4006816^GUAIFENESIN 50MG/PHENYLPROPANOLAMINE 6.25MG/ML DROPS,ORAL
+"DATA",176.112,25088,1)
+310649
+"DATA",176.112,25089,0)
+4005406^GUAIFENESIN 500MG/PSEUDOEPHEDRINE 60MG TAB,SA
+"DATA",176.112,25089,1)
+310648
+"DATA",176.112,25090,0)
+4005407^GUAIFENESIN 500MG/PSEUDOEPHEDRINE 120MG TAB,SA
+"DATA",176.112,25090,1)
+310647
+"DATA",176.112,25091,0)
+4005411^GUAIFENESIN 500MG/PSEUDOEPHEDRINE 120MG CAP,SA
+"DATA",176.112,25091,1)
+310646
+"DATA",176.112,25092,0)
+4005414^GUAIFENESIN 40MG/PSEUDOEPHEDRINE 7.5MG/ML DROPS,ORAL
+"DATA",176.112,25092,1)
+310645
+"DATA",176.112,25093,0)
+4005402^GUAIFENESIN 400MG/PSEUDOEPHEDRINE 60MG TAB,SA
+"DATA",176.112,25093,1)
+310644
+"DATA",176.112,25094,0)
+4005412^GUAIFENESIN 400MG/PSEUDOEPHEDRINE 60MG TAB
+"DATA",176.112,25094,1)
+310643
+"DATA",176.112,25095,0)
+4006806^GUAIFENESIN 400MG/PHENYLPROPANOLAMINE 75MG TAB,SA
+"DATA",176.112,25095,1)
+310641
+"DATA",176.112,25096,0)
+4006807^GUAIFENESIN 400MG/PHENYLPROPANOLAMINE 75MG CAP,SA
+"DATA",176.112,25096,1)
+310640
+"DATA",176.112,25097,0)
+4005168^GUAIFENESIN 400MG/PHENYLEPHRINE 75MG TAB,SA
+"DATA",176.112,25097,1)
+310639
+"DATA",176.112,25098,0)
+4006812^GUAIFENESIN 30MG/PHENYLPROPANOLAMINE 9MG/ML DROPS,ORAL
+"DATA",176.112,25098,1)
+310638
+"DATA",176.112,25099,0)
+4005171^GUAIFENESIN 300MG/PHENYLEPHRINE HCL 10MG CAP,SA
+"DATA",176.112,25099,1)
+310637
+"DATA",176.112,25100,0)
+4005170^GUAIFENESIN 300MG/PHENYLEPHRINE HCL 10MG SPRINKLE CAP,SA
+"DATA",176.112,25100,1)
+310637
+"DATA",176.112,25101,0)
+4005165^GUAIFENESIN 300MG/PHENYLEPHRINE 20MG TAB,SA
+"DATA",176.112,25101,1)
+310636
+"DATA",176.112,25102,0)
+4005410^GUAIFENESIN 250MG/PSEUDOEPHEDRINE 30MG/5ML LIQUID
+"DATA",176.112,25102,1)
+310634
+"DATA",176.112,25103,0)
+4005405^GUAIFENESIN 250MG/PSEUDOEPHEDRINE 30MG TAB
+"DATA",176.112,25103,1)
+310633
+"DATA",176.112,25104,0)
+4005401^GUAIFENESIN 250MG/PSEUDOEPHEDRINE 30MG CAP
+"DATA",176.112,25104,1)
+310632
+"DATA",176.112,25105,0)
+4005396^GUAIFENESIN 250MG/PSEUDOEPHEDRINE 120MG CAP,SA
+"DATA",176.112,25105,1)
+310631
+"DATA",176.112,25106,0)
+4005408^GUAIFENESIN 200MG/PSEUDOEPHEDRINE 60MG CAP
+"DATA",176.112,25106,1)
+310629
+"DATA",176.112,25107,0)
+4005413^GUAIFENESIN 200MG/PSEUDOEPHEDRINE 30MG/5ML LIQUID
+"DATA",176.112,25107,1)
+310627
+"DATA",176.112,25108,0)
+4005166^GUAIFENESIN 200MG/PHENYLEPHRINE 40MG CAP,SA
+"DATA",176.112,25108,1)
+310626
+"DATA",176.112,25109,0)
+4007870^GUAIFENESIN 200MG/5ML (SF & AF) LIQUID
+"DATA",176.112,25109,1)
+310625
+"DATA",176.112,25110,0)
+4005708^GUAIFENESIN 150MG/OXTRIPHYLLINE 300MG/15ML ELIXIR
+"DATA",176.112,25110,1)
+310624
+"DATA",176.112,25111,0)
+4005709^GUAIFENESIN 150MG/OXTRIPHYLLINE 300MG/15ML LIQUID
+"DATA",176.112,25111,1)
+310624
+"DATA",176.112,25112,0)
+4005397^GUAIFENESIN 125MG/PSEUDOEPHEDRINE 60MG CAP,SA
+"DATA",176.112,25112,1)
+310622
+"DATA",176.112,25113,0)
+4005612^GUAIFENESIN 100MG/THEOPHYLLINE NA GLYCINATE 300MG TAB
+"DATA",176.112,25113,1)
+310619
+"DATA",176.112,25114,0)
+4005615^GUAIFENESIN 100MG/THEOPHYLLINE 125MG TAB
+"DATA",176.112,25114,1)
+310617
+"DATA",176.112,25115,0)
+4005620^GUAIFENESIN 100MG/THEOPHYLLINE 100MG/15ML LIQUID
+"DATA",176.112,25115,1)
+310616
+"DATA",176.112,25116,0)
+4005400^GUAIFENESIN 100MG/PSEUDOEPHEDRINE 60MG TAB
+"DATA",176.112,25116,1)
+310615
+"DATA",176.112,25117,0)
+4005417^GUAIFENESIN 100MG/PSEUDOEPHEDRINE 30MG TAB
+"DATA",176.112,25117,1)
+310612
+"DATA",176.112,25118,0)
+4006810^GUAIFENESIN 100MG/PHENYLPROPANOLAMINE 25MG/5ML LIQUID
+"DATA",176.112,25118,1)
+310610
+"DATA",176.112,25119,0)
+4006811^GUAIFENESIN 100MG/PHENYLPROPANOLAMINE 12.5MG/5ML LIQUID
+"DATA",176.112,25119,1)
+310608
+"DATA",176.112,25120,0)
+4006814^GUAIFENESIN 100MG/PHENYLPROPANOLAMINE 12.5MG/5ML SYRUP
+"DATA",176.112,25120,1)
+310608
+"DATA",176.112,25121,0)
+4005169^GUAIFENESIN 100MG/PHENYLEPHRINE 5MG/5ML LIQUID
+"DATA",176.112,25121,1)
+310607
+"DATA",176.112,25122,0)
+4005707^GUAIFENESIN 100MG/OXTRIPHYLLINE 200MG TAB
+"DATA",176.112,25122,1)
+310606
+"DATA",176.112,25123,0)
+4007871^GUAIFENESIN 100MG/5ML (SF) LIQUID
+"DATA",176.112,25123,1)
+310604
+"DATA",176.112,25124,0)
+4007868^GUAIFENESIN 100MG/5ML SYRUP
+"DATA",176.112,25124,1)
+310604
+"DATA",176.112,25125,0)
+4024650^GUAIFENESIN 100MG/5ML (SF & AF) LIQUID,5ML
+"DATA",176.112,25125,1)
+310604
+"DATA",176.112,25126,0)
+4007873^GUAIFENESIN 100MG/5ML (SF & AF) LIQUID
+"DATA",176.112,25126,1)
+310604
+"DATA",176.112,25127,0)
+4015903^GUAIFENESIN 100MG/5ML (AF) LIQUID
+"DATA",176.112,25127,1)
+310604
+"DATA",176.112,25128,0)
+4010050^GUAIACOL 2%/METHYL SALICYLATE 8% CREAM,TOP
+"DATA",176.112,25128,1)
+310602
+"DATA",176.112,25129,0)
+4004155^GRISEOFULVIN,MICROSIZE 250MG CAP
+"DATA",176.112,25129,1)
+310601
+"DATA",176.112,25130,0)
+4004156^GRISEOFULVIN,MICROSIZE 500MG TAB
+"DATA",176.112,25130,1)
+310600
+"DATA",176.112,25131,0)
+4004160^GRISEOFULVIN 500MG TAB
+"DATA",176.112,25131,1)
+310600
+"DATA",176.112,25132,0)
+4012306^GRANISETRON HCL 1MG TAB
+"DATA",176.112,25132,1)
+310599
+"DATA",176.112,25133,0)
+4006504^GRAMICIDIN 0.025MG/N-MYCIN 5MG/POLYMYX 10000UNT/ML SOLN,OPH
+"DATA",176.112,25133,1)
+310596
+"DATA",176.112,25134,0)
+4006503^GRAMICIDIN 0.025MG/N-MYCIN 2.5MG/POLYMYX 10000UNT/ML SOLN,OPH
+"DATA",176.112,25134,1)
+310595
+"DATA",176.112,25135,0)
+4006502^GRAMICIDIN 0.025MG/N-MYCIN 1.75MG/POLYMYX 10000UNT/ML SOLN,OPH
+"DATA",176.112,25135,1)
+310594
+"DATA",176.112,25136,0)
+4009092^GOSERELIN ACETATE 3.6MG INJ,IMPLANT
+"DATA",176.112,25136,1)
+310592
+"DATA",176.112,25137,0)
+4001717^GONADOTROPIN,CHORIONIC 5000UNT/ML INJ
+"DATA",176.112,25137,1)
+310587
+"DATA",176.112,25138,0)
+4001713^GONADOTROPIN,CHORIONIC 200UNT/ML INJ
+"DATA",176.112,25138,1)
+310586
+"DATA",176.112,25139,0)
+4004999^GONADORELIN HCL 50MCG/ML INJ
+"DATA",176.112,25139,1)
+310584
+"DATA",176.112,25140,0)
+4005002^GONADORELIN ACETATE 3.2MG/VIL INJ
+"DATA",176.112,25140,1)
+310583
+"DATA",176.112,25141,0)
+4005001^GONADORELIN ACETATE 0.8MG/VIL INJ
+"DATA",176.112,25141,1)
+310582
+"DATA",176.112,25142,0)
+4003058^GOLD NA THIOMALATE 25MG/ML INJ
+"DATA",176.112,25142,1)
+310580
+"DATA",176.112,25143,0)
+4010218^GLYCOLIC ACID 12% LOTION
+"DATA",176.112,25143,1)
+310576
+"DATA",176.112,25144,0)
+4006247^GLYCINE 15% SOLN,IRRG
+"DATA",176.112,25144,1)
+310572
+"DATA",176.112,25145,0)
+4006246^GLYCINE 1.5% SOLN,IRRG
+"DATA",176.112,25145,1)
+310571
+"DATA",176.112,25146,0)
+4004864^GLYCEROL,IODINATED 60MG/5ML ELIXIR
+"DATA",176.112,25146,1)
+310570
+"DATA",176.112,25147,0)
+4004866^GLYCEROL,IODINATED 60MG/5ML SOLN
+"DATA",176.112,25147,1)
+310570
+"DATA",176.112,25148,0)
+4004863^GLYCEROL,IODINATED 50MG/ML SOLN
+"DATA",176.112,25148,1)
+310568
+"DATA",176.112,25149,0)
+4004865^GLYCEROL,IODINATED 30MG TAB
+"DATA",176.112,25149,1)
+310565
+"DATA",176.112,25150,0)
+4005028^GLYCERIN 99.5% SOLN,OPH
+"DATA",176.112,25150,1)
+310553
+"DATA",176.112,25151,0)
+4005037^GLYCERIN 96% LIQUID
+"DATA",176.112,25151,1)
+310552
+"DATA",176.112,25152,0)
+4007945^GLYCERIN 50%/KAOLIN 33%/NA FLUORIDE 17% CREAM
+"DATA",176.112,25152,1)
+310548
+"DATA",176.112,25153,0)
+4005029^GLYCERIN 50% SOLN,ORAL
+"DATA",176.112,25153,1)
+310547
+"DATA",176.112,25154,0)
+4005031^GLYCERIN 25% INJECTION
+"DATA",176.112,25154,1)
+310545
+"DATA",176.112,25155,0)
+4005032^GLYCERIN 10% INJ
+"DATA",176.112,25155,1)
+310543
+"DATA",176.112,25156,0)
+4005038^GLYCERIN 0.25% SOLN,OPH
+"DATA",176.112,25156,1)
+310541
+"DATA",176.112,25157,0)
+4003460^GLYBURIDE 6MG TAB
+"DATA",176.112,25157,1)
+310539
+"DATA",176.112,25158,0)
+4014903^GLYBURIDE 5MG/METFORMIN HCL 500MG TAB
+"DATA",176.112,25158,1)
+310538
+"DATA",176.112,25159,0)
+4013946^GLYBURIDE 5MG TAB,UD
+"DATA",176.112,25159,1)
+310537
+"DATA",176.112,25160,0)
+4003457^GLYBURIDE 5MG TAB
+"DATA",176.112,25160,1)
+310537
+"DATA",176.112,25161,0)
+4003459^GLYBURIDE 3MG TAB
+"DATA",176.112,25161,1)
+310536
+"DATA",176.112,25162,0)
+4014902^GLYBURIDE 2.5MG/METFORMIN HCL 500MG TAB
+"DATA",176.112,25162,1)
+310535
+"DATA",176.112,25163,0)
+4013945^GLYBURIDE 2.5MG TAB,UD
+"DATA",176.112,25163,1)
+310534
+"DATA",176.112,25164,0)
+4003456^GLYBURIDE 2.5MG TAB
+"DATA",176.112,25164,1)
+310534
+"DATA",176.112,25165,0)
+4014901^GLYBURIDE 1.25MG/METFORMIN HCL 250MG TAB
+"DATA",176.112,25165,1)
+310533
+"DATA",176.112,25166,0)
+4006795^GLUTETHIMIDE 500MG TAB
+"DATA",176.112,25166,1)
+310532
+"DATA",176.112,25167,0)
+4006797^GLUTETHIMIDE 500MG CAP
+"DATA",176.112,25167,1)
+310531
+"DATA",176.112,25168,0)
+4006796^GLUTETHIMIDE 250MG TAB
+"DATA",176.112,25168,1)
+310530
+"DATA",176.112,25169,0)
+4009209^GLUCOSE 5GM TAB,CHEW
+"DATA",176.112,25169,1)
+310520
+"DATA",176.112,25170,0)
+4013310^GLUCOSE 4GM TAB,CHEW
+"DATA",176.112,25170,1)
+310519
+"DATA",176.112,25171,0)
+4000931^GLUCAGON 1MG/VIL INJ
+"DATA",176.112,25171,1)
+310497
+"DATA",176.112,25172,0)
+4000932^GLUCAGON 10MG/VIL INJ
+"DATA",176.112,25172,1)
+310496
+"DATA",176.112,25173,0)
+4003321^GLOBULIN,IMMUNE (IV) 6GM/VIL/NACL 0.9% INJ
+"DATA",176.112,25173,1)
+310495
+"DATA",176.112,25174,0)
+4003320^GLOBULIN,IMMUNE (IV) 3GM/VIL/NACL 0.9% INJ
+"DATA",176.112,25174,1)
+310495
+"DATA",176.112,25175,0)
+4003331^GLOBULIN,IMMUNE (IV) 1GM/VIL INJ
+"DATA",176.112,25175,1)
+310495
+"DATA",176.112,25176,0)
+4003323^GLOBULIN,IMMUNE (IV) 3GM/BTL INJ
+"DATA",176.112,25176,1)
+310495
+"DATA",176.112,25177,0)
+4003332^GLOBULIN,IMMUNE (IV) 6GM/VIL INJ
+"DATA",176.112,25177,1)
+310495
+"DATA",176.112,25178,0)
+4003319^GLOBULIN,IMMUNE (IV) 1GM/VIL/NACL 0.9% INJ
+"DATA",176.112,25178,1)
+310495
+"DATA",176.112,25179,0)
+4003325^GLOBULIN,IMMUNE (IV) 5GM/VIL INJ
+"DATA",176.112,25179,1)
+310494
+"DATA",176.112,25180,0)
+4003327^GLOBULIN,IMMUNE (IV) 10GM/VIL INJ
+"DATA",176.112,25180,1)
+310494
+"DATA",176.112,25181,0)
+4003330^GLOBULIN,IMMUNE (IV) 10% INJ
+"DATA",176.112,25181,1)
+310494
+"DATA",176.112,25182,0)
+4003324^GLOBULIN,IMMUNE (IV) 2.5GM/VIL INJ
+"DATA",176.112,25182,1)
+310494
+"DATA",176.112,25183,0)
+4013944^GLIPIZIDE 5MG TAB,UD
+"DATA",176.112,25183,1)
+310490
+"DATA",176.112,25184,0)
+4005065^GLIPIZIDE 5MG TAB
+"DATA",176.112,25184,1)
+310490
+"DATA",176.112,25185,0)
+4014239^GLIPIZIDE 2.5MG TAB,SA
+"DATA",176.112,25185,1)
+310489
+"DATA",176.112,25186,0)
+4014683^GLIPIZIDE 10MG TAB,UD
+"DATA",176.112,25186,1)
+310488
+"DATA",176.112,25187,0)
+4005066^GLIPIZIDE 10MG TAB
+"DATA",176.112,25187,1)
+310488
+"DATA",176.112,25188,0)
+4012946^GLATIRAMER ACETATE 20MG/VIL INJ
+"DATA",176.112,25188,1)
+310487
+"DATA",176.112,25189,0)
+4010332^GINKGO EXT 60MG TAB
+"DATA",176.112,25189,1)
+310486
+"DATA",176.112,25190,0)
+4007435^GENTIAN VIOLET 1% SOLN,TOP
+"DATA",176.112,25190,1)
+310481
+"DATA",176.112,25191,0)
+4004144^GENTAMICIN SO4 2.4MG/ML INJ
+"DATA",176.112,25191,1)
+310478
+"DATA",176.112,25192,0)
+4005924^GENTAMICIN SO4 1.6MG/ML/NACL 0.9% INJ
+"DATA",176.112,25192,1)
+310477
+"DATA",176.112,25193,0)
+4004134^GENTAMICIN SO4 1.6MG/ML INJ
+"DATA",176.112,25193,1)
+310477
+"DATA",176.112,25194,0)
+4005919^GENTAMICIN SO4 1.4MG/ML/NACL 0.9% INJ
+"DATA",176.112,25194,1)
+310476
+"DATA",176.112,25195,0)
+4005918^GENTAMICIN SO4 1.2MG/ML/NACL 0.9% INJ
+"DATA",176.112,25195,1)
+310475
+"DATA",176.112,25196,0)
+4004133^GENTAMICIN SO4 1.2MG/ML INJ
+"DATA",176.112,25196,1)
+310475
+"DATA",176.112,25197,0)
+4004138^GENTAMICIN SO4 60MG/VIL INJ
+"DATA",176.112,25197,1)
+310475
+"DATA",176.112,25198,0)
+4005921^GENTAMICIN SO4 0.9MG/ML/NACL 0.9% INJ
+"DATA",176.112,25198,1)
+310474
+"DATA",176.112,25199,0)
+4004142^GENTAMICIN SO4 0.8MG/ML INJ
+"DATA",176.112,25199,1)
+310473
+"DATA",176.112,25200,0)
+4007410^GENTAMICIN SO4 0.8MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,25200,1)
+310473
+"DATA",176.112,25201,0)
+4005920^GENTAMICIN SO4 0.8MG/ML/NACL 0.9% INJ
+"DATA",176.112,25201,1)
+310473
+"DATA",176.112,25202,0)
+4005923^GENTAMICIN SO4 0.6MG/ML/NACL 0.9% INJ
+"DATA",176.112,25202,1)
+310472
+"DATA",176.112,25203,0)
+4004132^GENTAMICIN SO4 0.6MG/ML INJ
+"DATA",176.112,25203,1)
+310472
+"DATA",176.112,25204,0)
+4004140^GENTAMICIN SO4 0.5% SOLN,OPH
+"DATA",176.112,25204,1)
+310471
+"DATA",176.112,25205,0)
+4004139^GENTAMICIN SO4 0.5% OINT,OPH
+"DATA",176.112,25205,1)
+310470
+"DATA",176.112,25206,0)
+4009094^GENTAMICIN SO4 0.3%/PREDNISOLONE 1% SUSP,OPH
+"DATA",176.112,25206,1)
+310469
+"DATA",176.112,25207,0)
+4009095^GENTAMICIN SO4 0.3%/PREDNISOLONE 0.6% OINT,OPH
+"DATA",176.112,25207,1)
+310468
+"DATA",176.112,25208,0)
+4004124^GENTAMICIN SO4 0.3% SOLN,OPH
+"DATA",176.112,25208,1)
+310467
+"DATA",176.112,25209,0)
+4004125^GENTAMICIN SO4 0.3% OINT,OPH
+"DATA",176.112,25209,1)
+310466
+"DATA",176.112,25210,0)
+4004130^GENTAMICIN SO4 0.1% OINT,TOP
+"DATA",176.112,25210,1)
+310465
+"DATA",176.112,25211,0)
+4005239^ETHINYL ESTRADIOL 0.035MG/NORETHINDRONE 0.5MG TAB
+"DATA",176.112,25211,1)
+310463
+"DATA",176.112,25212,0)
+4005775^GEMFIBROZIL 600MG TAB
+"DATA",176.112,25212,1)
+310459
+"DATA",176.112,25213,0)
+4013943^GEMFIBROZIL 600MG TAB,UD
+"DATA",176.112,25213,1)
+310459
+"DATA",176.112,25214,0)
+4009577^GELATIN 650MG CAP
+"DATA",176.112,25214,1)
+310447
+"DATA",176.112,25215,0)
+4014269^GATIFLOXACIN 200MG TAB
+"DATA",176.112,25215,1)
+310445
+"DATA",176.112,25216,0)
+4008896^GANCICLOVIR 500MG/VIL INJ
+"DATA",176.112,25216,1)
+310442
+"DATA",176.112,25217,0)
+4015301^GALANTAMINE HYDROBROMIDE 8MG TAB
+"DATA",176.112,25217,1)
+310437
+"DATA",176.112,25218,0)
+4015300^GALANTAMINE HYDROBROMIDE 4MG TAB
+"DATA",176.112,25218,1)
+310436
+"DATA",176.112,25219,0)
+4014205^GABAPENTIN 800MG TAB
+"DATA",176.112,25219,1)
+310434
+"DATA",176.112,25220,0)
+4014204^GABAPENTIN 600MG TAB
+"DATA",176.112,25220,1)
+310433
+"DATA",176.112,25221,0)
+4012168^GABAPENTIN 400MG CAP
+"DATA",176.112,25221,1)
+310432
+"DATA",176.112,25222,0)
+4014004^GABAPENTIN 400MG CAP,UD
+"DATA",176.112,25222,1)
+310432
+"DATA",176.112,25223,0)
+4014003^GABAPENTIN 300MG CAP,UD
+"DATA",176.112,25223,1)
+310431
+"DATA",176.112,25224,0)
+4012167^GABAPENTIN 300MG CAP
+"DATA",176.112,25224,1)
+310431
+"DATA",176.112,25225,0)
+4012166^GABAPENTIN 100MG CAP
+"DATA",176.112,25225,1)
+310430
+"DATA",176.112,25226,0)
+4014002^GABAPENTIN 100MG CAP,UD
+"DATA",176.112,25226,1)
+310430
+"DATA",176.112,25227,0)
+4013941^FUROSEMIDE 20MG TAB,UD
+"DATA",176.112,25227,1)
+310429
+"DATA",176.112,25228,0)
+4002369^FUROSEMIDE 20MG TAB
+"DATA",176.112,25228,1)
+310429
+"DATA",176.112,25229,0)
+4006961^FURAZOLIDONE 50MG/15ML SUSP,ORAL
+"DATA",176.112,25229,1)
+310428
+"DATA",176.112,25230,0)
+4014987^FOSINOPRIL NA 20MG/HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,25230,1)
+310423
+"DATA",176.112,25231,0)
+4010118^FOSINOPRIL NA 20MG TAB
+"DATA",176.112,25231,1)
+310422
+"DATA",176.112,25232,0)
+4014940^FOSINOPRIL NA 20MG TAB,UD
+"DATA",176.112,25232,1)
+310422
+"DATA",176.112,25233,0)
+4014986^FOSINOPRIL NA 10MG/HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,25233,1)
+310421
+"DATA",176.112,25234,0)
+4010126^FOSCARNET NA 24MG/ML INJ,IV
+"DATA",176.112,25234,1)
+310419
+"DATA",176.112,25235,0)
+4007649^FORMALDEHYDE 7.7% SOLN
+"DATA",176.112,25235,1)
+310418
+"DATA",176.112,25236,0)
+4007648^FORMALDEHYDE 3.85% SOLN
+"DATA",176.112,25236,1)
+310417
+"DATA",176.112,25237,0)
+4007647^FORMALDEHYDE 10% SOLN
+"DATA",176.112,25237,1)
+310416
+"DATA",176.112,25238,0)
+4013377^FOMIVIRSEN NA 6.6MG/ML INJ,OPH,0.25ML
+"DATA",176.112,25238,1)
+310415
+"DATA",176.112,25239,0)
+4013167^FOMEPIZOLE 1GM/ML INJ
+"DATA",176.112,25239,1)
+310414
+"DATA",176.112,25240,0)
+4024782^FOLLITROPIN ALFA 450UNT/ML INJ,SYR,1.5ML
+"DATA",176.112,25240,1)
+310413
+"DATA",176.112,25241,0)
+4013154^FOLLITROPIN ALFA 150UNT/AMP INJ
+"DATA",176.112,25241,1)
+310413
+"DATA",176.112,25242,0)
+4009876^FOLIC ACID 1MG/IRON 82MG TAB
+"DATA",176.112,25242,1)
+310411
+"DATA",176.112,25243,0)
+4001200^FOLIC ACID 1MG TAB
+"DATA",176.112,25243,1)
+310410
+"DATA",176.112,25244,0)
+4015268^FOLIC ACID 1MG TAB,UD
+"DATA",176.112,25244,1)
+310410
+"DATA",176.112,25245,0)
+4001202^FOLIC ACID 10MG/ML INJ
+"DATA",176.112,25245,1)
+310409
+"DATA",176.112,25246,0)
+4012723^FLUVOXAMINE MALEATE 25MG TAB
+"DATA",176.112,25246,1)
+310408
+"DATA",176.112,25247,0)
+4014497^FLUVOXAMINE MALEATE 25MG TAB,UD
+"DATA",176.112,25247,1)
+310408
+"DATA",176.112,25248,0)
+4014499^FLUVOXAMINE MALEATE 100MG TAB,UD
+"DATA",176.112,25248,1)
+310407
+"DATA",176.112,25249,0)
+4012722^FLUVOXAMINE MALEATE 100MG TAB
+"DATA",176.112,25249,1)
+310407
+"DATA",176.112,25250,0)
+4015324^FLUVASTATIN NA 80MG TAB,SA
+"DATA",176.112,25250,1)
+310406
+"DATA",176.112,25251,0)
+4012304^FLUVASTATIN NA 40MG CAP
+"DATA",176.112,25251,1)
+310405
+"DATA",176.112,25252,0)
+4012303^FLUVASTATIN NA 20MG CAP
+"DATA",176.112,25252,1)
+310404
+"DATA",176.112,25253,0)
+4010140^FLUTICASONE PROPIONATE 50MCG/SPRAY SOLN,NASAL,9GM
+"DATA",176.112,25253,1)
+310403
+"DATA",176.112,25254,0)
+4010141^FLUTICASONE PROPIONATE 50MCG/SPRAY SOLN,NASAL,16GM
+"DATA",176.112,25254,1)
+310403
+"DATA",176.112,25255,0)
+4010146^FLUTICASONE PROPIONATE 50MCG/BLISTER INHL,ORAL,ROTADISK
+"DATA",176.112,25255,1)
+310402
+"DATA",176.112,25256,0)
+4010148^FLUTICASONE PROPIONATE 250MCG/BLISTER INHL,ORAL,ROTADISK
+"DATA",176.112,25256,1)
+310401
+"DATA",176.112,25257,0)
+4010147^FLUTICASONE PROPIONATE 100MCG/BLISTER INHL,ORAL,ROTADISK
+"DATA",176.112,25257,1)
+310400
+"DATA",176.112,25258,0)
+4015722^FLUTICASONE 250MCG/SALMETEROL 50MCG INHL,ORAL,DISKUS,28
+"DATA",176.112,25258,1)
+310398
+"DATA",176.112,25259,0)
+4015415^FLUTICASONE 250MCG/SALMETEROL 50MCG INHL,ORAL,DISKUS
+"DATA",176.112,25259,1)
+310398
+"DATA",176.112,25260,0)
+4015721^FLUTICASONE 250MCG/SALMETEROL 50MCG INHL,ORAL,DISKUS,60
+"DATA",176.112,25260,1)
+310398
+"DATA",176.112,25261,0)
+4015719^FLUTICASONE 100MCG/SALMETEROL 50MCG INHL,ORAL,DISKUS,60
+"DATA",176.112,25261,1)
+310397
+"DATA",176.112,25262,0)
+4015414^FLUTICASONE 100MCG/SALMETEROL 50MCG INHL,ORAL,DISKUS
+"DATA",176.112,25262,1)
+310397
+"DATA",176.112,25263,0)
+4015720^FLUTICASONE 100MCG/SALMETEROL 50MCG INHL,ORAL,DISKUS,28
+"DATA",176.112,25263,1)
+310397
+"DATA",176.112,25264,0)
+4007954^FLURBIPROFEN NA 0.03% SOLN,OPH
+"DATA",176.112,25264,1)
+310396
+"DATA",176.112,25265,0)
+4002351^FLURAZEPAM HCL 30MG TAB
+"DATA",176.112,25265,1)
+310395
+"DATA",176.112,25266,0)
+4001893^FLUPHENAZINE HCL 5MG/ML LIQUID,ORAL
+"DATA",176.112,25266,1)
+310391
+"DATA",176.112,25267,0)
+4014300^FLUPHENAZINE HCL 5MG TAB,UD
+"DATA",176.112,25267,1)
+310390
+"DATA",176.112,25268,0)
+4001898^FLUPHENAZINE HCL 5MG TAB
+"DATA",176.112,25268,1)
+310390
+"DATA",176.112,25269,0)
+4001901^FLUPHENAZINE HCL 2.5MG TAB,EC
+"DATA",176.112,25269,1)
+310389
+"DATA",176.112,25270,0)
+4001900^FLUPHENAZINE HCL 1MG TAB,SA
+"DATA",176.112,25270,1)
+310388
+"DATA",176.112,25271,0)
+4008622^FLUOXETINE HCL 20MG/5ML SOLN
+"DATA",176.112,25271,1)
+310386
+"DATA",176.112,25272,0)
+4013939^FLUOXETINE HCL 20MG CAP,UD
+"DATA",176.112,25272,1)
+310385
+"DATA",176.112,25273,0)
+4008621^FLUOXETINE HCL 20MG CAP
+"DATA",176.112,25273,1)
+310385
+"DATA",176.112,25274,0)
+4014110^FLUOXETINE HCL 10MG CAP,UD
+"DATA",176.112,25274,1)
+310384
+"DATA",176.112,25275,0)
+4008623^FLUOXETINE HCL 10MG CAP
+"DATA",176.112,25275,1)
+310384
+"DATA",176.112,25276,0)
+4002256^FLUOROURACIL 5% SOLN,TOP
+"DATA",176.112,25276,1)
+310380
+"DATA",176.112,25277,0)
+4002255^FLUOROURACIL 2% SOLN,TOP
+"DATA",176.112,25277,1)
+310379
+"DATA",176.112,25278,0)
+4002258^FLUOROURACIL 1% SOLN,TOP
+"DATA",176.112,25278,1)
+310378
+"DATA",176.112,25279,0)
+4015341^FLUOROMETHOLONE ACETATE 0.1% SUSP,OPH
+"DATA",176.112,25279,1)
+310377
+"DATA",176.112,25280,0)
+4004145^FLUOROMETHOLONE 0.1% SUSP,OPH
+"DATA",176.112,25280,1)
+310377
+"DATA",176.112,25281,0)
+4004146^FLUOROMETHOLONE 0.25% SUSP,OPH
+"DATA",176.112,25281,1)
+310376
+"DATA",176.112,25282,0)
+4009250^FLUOROMETHOLONE 0.1%/SULFACETAMIDE NA 10% SUSP,OPH
+"DATA",176.112,25282,1)
+310375
+"DATA",176.112,25283,0)
+4004147^FLUOROMETHOLONE 0.1% OINT,OPH
+"DATA",176.112,25283,1)
+310374
+"DATA",176.112,25284,0)
+4004933^FLUORIDE 0.125MG/GTT DROPS,ORAL
+"DATA",176.112,25284,1)
+310371
+"DATA",176.112,25285,0)
+4005485^FLUORESCEIN NA 2% SOLN,OPH
+"DATA",176.112,25285,1)
+310369
+"DATA",176.112,25286,0)
+4005491^FLUORESCEIN NA 2% SOLN,OPH,1ML
+"DATA",176.112,25286,1)
+310369
+"DATA",176.112,25287,0)
+4005486^FLUORESCEIN NA 10% INJ
+"DATA",176.112,25287,1)
+310367
+"DATA",176.112,25288,0)
+4007881^FLUORESCEIN NA 0.25%/PROPARACAINE 0.5% SOLN,OPH
+"DATA",176.112,25288,1)
+310365
+"DATA",176.112,25289,0)
+4004766^FLUOCINONIDE 0.05% SOLN,TOP
+"DATA",176.112,25289,1)
+310364
+"DATA",176.112,25290,0)
+4004767^FLUOCINONIDE 0.05% LOTION
+"DATA",176.112,25290,1)
+310363
+"DATA",176.112,25291,0)
+4004763^FLUOCINONIDE 0.05% GEL,TOP
+"DATA",176.112,25291,1)
+310362
+"DATA",176.112,25292,0)
+4004762^FLUOCINOLONE ACETONIDE 0.025%/NEOMYCIN SO4 0.5% CREAM,TOP
+"DATA",176.112,25292,1)
+310360
+"DATA",176.112,25293,0)
+4008027^FLUOCINOLONE ACETONIDE 0.01%/PYRITHIONE ZN 2% SHAMPOO
+"DATA",176.112,25293,1)
+310359
+"DATA",176.112,25294,0)
+4004180^FLUOCINOLONE ACETONIDE 0.01% OIL,TOP
+"DATA",176.112,25294,1)
+310358
+"DATA",176.112,25295,0)
+4004182^FLUOCINOLONE ACETONIDE 0.01% LOTION
+"DATA",176.112,25295,1)
+310357
+"DATA",176.112,25296,0)
+4004776^FLUNISOLIDE 250MCG/SPRAY INHL,ORAL
+"DATA",176.112,25296,1)
+310356
+"DATA",176.112,25297,0)
+4004774^FLUNISOLIDE 250MCG/SPRAY/MENTHOL INHL,ORAL
+"DATA",176.112,25297,1)
+310356
+"DATA",176.112,25298,0)
+4001935^FLUMETHIAZIDE 400MG/KCL 5.4MEQ/RAUWOLFIA SERP 50MG TAB,EC
+"DATA",176.112,25298,1)
+310355
+"DATA",176.112,25299,0)
+4009362^FLUDARABINE PO4 50MG/VIL INJ
+"DATA",176.112,25299,1)
+310354
+"DATA",176.112,25300,0)
+4009055^FLUCONAZOLE 40MG/ML SUSP,ORAL
+"DATA",176.112,25300,1)
+310353
+"DATA",176.112,25301,0)
+4009054^FLUCONAZOLE 10MG/ML SUSP,ORAL
+"DATA",176.112,25301,1)
+310352
+"DATA",176.112,25302,0)
+4002275^FLOXURIDINE 100MG/ML INJ
+"DATA",176.112,25302,1)
+310351
+"DATA",176.112,25303,0)
+4027873^FLOXURIDINE 500MG/VIL INJ
+"DATA",176.112,25303,1)
+310351
+"DATA",176.112,25304,0)
+4006706^FLECAINIDE ACETATE 50MG TAB
+"DATA",176.112,25304,1)
+310350
+"DATA",176.112,25305,0)
+4006707^FLECAINIDE ACETATE 150MG TAB
+"DATA",176.112,25305,1)
+310349
+"DATA",176.112,25306,0)
+4003151^FLAVOXATE HCL 100MG TAB
+"DATA",176.112,25306,1)
+310347
+"DATA",176.112,25307,0)
+4015471^FLAVOXATE HCL 100MG TAB,UD
+"DATA",176.112,25307,1)
+310347
+"DATA",176.112,25308,0)
+4010120^FINASTERIDE 5MG TAB
+"DATA",176.112,25308,1)
+310346
+"DATA",176.112,25309,0)
+4013999^FINASTERIDE 5MG TAB,UD
+"DATA",176.112,25309,1)
+310346
+"DATA",176.112,25310,0)
+4013176^FEXOFENADINE HCL 60MG/PSEUDOEPHEDRINE HCL 120MG TAB,SA
+"DATA",176.112,25310,1)
+310337
+"DATA",176.112,25311,0)
+4014490^FEXOFENADINE HCL 60MG TAB
+"DATA",176.112,25311,1)
+310336
+"DATA",176.112,25312,0)
+4014491^FEXOFENADINE HCL 60MG TAB,UD
+"DATA",176.112,25312,1)
+310336
+"DATA",176.112,25313,0)
+4012993^FEXOFENADINE HCL 60MG CAP
+"DATA",176.112,25313,1)
+310335
+"DATA",176.112,25314,0)
+4014489^FEXOFENADINE HCL 30MG TAB
+"DATA",176.112,25314,1)
+310334
+"DATA",176.112,25315,0)
+4014487^FEXOFENADINE HCL 180MG TAB
+"DATA",176.112,25315,1)
+310333
+"DATA",176.112,25316,0)
+4014486^FEXOFENADINE HCL 120MG TAB
+"DATA",176.112,25316,1)
+310332
+"DATA",176.112,25317,0)
+4013021^FERUMOXSIL 175MCG/ML (IRON) SUSP,ORAL
+"DATA",176.112,25317,1)
+310330
+"DATA",176.112,25318,0)
+4013033^FERUMOXIDES 11.2MG/ML (IRON) INJ
+"DATA",176.112,25318,1)
+310329
+"DATA",176.112,25319,0)
+4008236^FERROUS SO4 525MG TAB,SA
+"DATA",176.112,25319,1)
+310327
+"DATA",176.112,25320,0)
+4007818^FERROUS SO4 500MG/FOLIC ACID 900MCG TAB
+"DATA",176.112,25320,1)
+310326
+"DATA",176.112,25321,0)
+4008232^FERROUS SO4 325MG TAB
+"DATA",176.112,25321,1)
+310325
+"DATA",176.112,25322,0)
+4013938^FERROUS SO4 325MG TAB,UD
+"DATA",176.112,25322,1)
+310325
+"DATA",176.112,25323,0)
+4015895^FERROUS SO4 325MG TAB,EC,UD
+"DATA",176.112,25323,1)
+310324
+"DATA",176.112,25324,0)
+4008241^FERROUS SO4 325MG TAB,EC
+"DATA",176.112,25324,1)
+310324
+"DATA",176.112,25325,0)
+4014272^FERROUS SO4 300MG/5ML LIQUID,5ML
+"DATA",176.112,25325,1)
+310323
+"DATA",176.112,25326,0)
+4008243^FERROUS SO4 60MG/ML DROPS,ORAL
+"DATA",176.112,25326,1)
+310323
+"DATA",176.112,25327,0)
+4008233^FERROUS SO4 250MG CAP,SA
+"DATA",176.112,25327,1)
+310322
+"DATA",176.112,25328,0)
+4015708^FERROUS SO4 250MG CAP,SA,UD
+"DATA",176.112,25328,1)
+310322
+"DATA",176.112,25329,0)
+4008239^FERROUS SO4 250MG CAP
+"DATA",176.112,25329,1)
+310321
+"DATA",176.112,25330,0)
+4008563^FERROUS SO4 200MG/ALUMINUM-MAGNESIUM HYDROXIDE 200MG TAB
+"DATA",176.112,25330,1)
+310319
+"DATA",176.112,25331,0)
+4008248^FERROUS SO4 160MG TAB,SA
+"DATA",176.112,25331,1)
+310318
+"DATA",176.112,25332,0)
+4008247^FERROUS SO4 160MG TAB
+"DATA",176.112,25332,1)
+310317
+"DATA",176.112,25333,0)
+4008240^FERROUS SO4 75MG/0.6ML DROPS,ORAL
+"DATA",176.112,25333,1)
+310316
+"DATA",176.112,25334,0)
+4008244^FERROUS SO4 125MG/ML DROPS,ORAL
+"DATA",176.112,25334,1)
+310316
+"DATA",176.112,25335,0)
+4008574^FERROUS GLUCONATE 80MG TAB,SA
+"DATA",176.112,25335,1)
+310315
+"DATA",176.112,25336,0)
+4007098^FERROUS FUMARATE 324MG/FOLIC ACID 1MG TAB
+"DATA",176.112,25336,1)
+310313
+"DATA",176.112,25337,0)
+4004827^FERROUS FUMARATE 275MG CAP,SA
+"DATA",176.112,25337,1)
+310312
+"DATA",176.112,25338,0)
+4007099^FERROUS FUMARATE 250MG/FOLIC ACID 1MG TAB
+"DATA",176.112,25338,1)
+310311
+"DATA",176.112,25339,0)
+4004832^FERROUS FUMARATE 195MG TAB
+"DATA",176.112,25339,1)
+310310
+"DATA",176.112,25340,0)
+4008569^FERROUS FUMARATE 150MG/DOCUSATE NA 100MG TAB,SA
+"DATA",176.112,25340,1)
+310309
+"DATA",176.112,25341,0)
+4008568^FERROUS FUMARATE 150MG/DOCUSATE NA 100MG CAP,SA
+"DATA",176.112,25341,1)
+310308
+"DATA",176.112,25342,0)
+4004833^FERROUS FUMARATE 100MG/5ML SUSP
+"DATA",176.112,25342,1)
+310307
+"DATA",176.112,25343,0)
+4004829^FERROUS FUMARATE 100MG TAB
+"DATA",176.112,25343,1)
+310305
+"DATA",176.112,25344,0)
+4007838^FERRIC SO4 190MG/ML SOLN,TOP
+"DATA",176.112,25344,1)
+310301
+"DATA",176.112,25345,0)
+4007906^FERRIC CACODYLATE 64MG/ML INJ
+"DATA",176.112,25345,1)
+310300
+"DATA",176.112,25346,0)
+4007468^FERRIC AMMONIUM CITRATE 150MG/ML INJ
+"DATA",176.112,25346,1)
+310299
+"DATA",176.112,25347,0)
+4006330^FENTANYL CITRATE 400MCG LOZENGE
+"DATA",176.112,25347,1)
+310297
+"DATA",176.112,25348,0)
+4006329^FENTANYL CITRATE 300MCG LOZENGE
+"DATA",176.112,25348,1)
+310296
+"DATA",176.112,25349,0)
+4006328^FENTANYL CITRATE 200MCG LOZENGE
+"DATA",176.112,25349,1)
+310295
+"DATA",176.112,25350,0)
+4014348^FENTANYL CITRATE 1600MCG LOZENGE
+"DATA",176.112,25350,1)
+310294
+"DATA",176.112,25351,0)
+4014347^FENTANYL CITRATE 1200MCG LOZENGE
+"DATA",176.112,25351,1)
+310293
+"DATA",176.112,25352,0)
+4006327^FENTANYL CITRATE 100MCG LOZENGE
+"DATA",176.112,25352,1)
+310292
+"DATA",176.112,25353,0)
+4013937^FENOPROFEN CA 600MG TAB,UD
+"DATA",176.112,25353,1)
+310291
+"DATA",176.112,25354,0)
+4007067^FENOPROFEN CA 600MG TAB
+"DATA",176.112,25354,1)
+310291
+"DATA",176.112,25355,0)
+4014090^FENOFIBRATE 200MG CAP
+"DATA",176.112,25355,1)
+310289
+"DATA",176.112,25356,0)
+4014460^FENOFIBRATE 134MG CAP
+"DATA",176.112,25356,1)
+310288
+"DATA",176.112,25357,0)
+4012144^FELBAMATE 600MG/5ML SUSP,ORAL
+"DATA",176.112,25357,1)
+310285
+"DATA",176.112,25358,0)
+4002998^FAMOTIDINE 40MG/5ML SUSP,ORAL
+"DATA",176.112,25358,1)
+310274
+"DATA",176.112,25359,0)
+4013936^FAMOTIDINE 20MG TAB,UD
+"DATA",176.112,25359,1)
+310273
+"DATA",176.112,25360,0)
+4003000^FAMOTIDINE 20MG TAB
+"DATA",176.112,25360,1)
+310273
+"DATA",176.112,25361,0)
+4013750^FAMOTIDINE 10MG TAB,CHEW
+"DATA",176.112,25361,1)
+310272
+"DATA",176.112,25362,0)
+4017202^FACTOR VIIa,RECOMBINANT 2400MCG/VIAL INJ
+"DATA",176.112,25362,1)
+310271
+"DATA",176.112,25363,0)
+4013821^FACTOR VIIa,RECOMBINANT 4800MCG/VIAL INJ
+"DATA",176.112,25363,1)
+310271
+"DATA",176.112,25364,0)
+4014370^EXEMESTANE 25MG TAB
+"DATA",176.112,25364,1)
+310261
+"DATA",176.112,25365,0)
+4008141^EUCALYPTUS OIL 100% LIQUID,DENT
+"DATA",176.112,25365,1)
+310250
+"DATA",176.112,25366,0)
+4007920^EUCALYPTOL 93%/MENTHOL 3%/THYMOL 4% LIQUID
+"DATA",176.112,25366,1)
+310249
+"DATA",176.112,25367,0)
+4003818^ETOPOSIDE PHOSPHATE 100MG/VIL INJ
+"DATA",176.112,25367,1)
+310248
+"DATA",176.112,25368,0)
+4003815^ETOPOSIDE 20MG/ML INJ,VIL,5ML
+"DATA",176.112,25368,1)
+310248
+"DATA",176.112,25369,0)
+4003819^ETOPOSIDE 20MG/ML INJ,VIL,7.5ML
+"DATA",176.112,25369,1)
+310248
+"DATA",176.112,25370,0)
+4003817^ETOPOSIDE 20MG/ML INJ,VIL,50ML
+"DATA",176.112,25370,1)
+310248
+"DATA",176.112,25371,0)
+4003814^ETOPOSIDE 20MG/ML INJ,VIL,25ML
+"DATA",176.112,25371,1)
+310248
+"DATA",176.112,25372,0)
+4003816^ETOPOSIDE 20MG/ML INJ,VIL,12.5ML
+"DATA",176.112,25372,1)
+310248
+"DATA",176.112,25373,0)
+4003811^ETOPOSIDE 100MG/VIL INJ
+"DATA",176.112,25373,1)
+310248
+"DATA",176.112,25374,0)
+4003813^ETOPOSIDE 20MG/ML INJ,VIL,10ML
+"DATA",176.112,25374,1)
+310248
+"DATA",176.112,25375,0)
+4009277^ETODOLAC 500MG TAB,SA
+"DATA",176.112,25375,1)
+310246
+"DATA",176.112,25376,0)
+4006963^ETIDRONATE DISODIUM 400MG TAB
+"DATA",176.112,25376,1)
+310244
+"DATA",176.112,25377,0)
+4007107^ETIDOCAINE HCL 1.5%/EPINEPHRINE 1:200000 INJ
+"DATA",176.112,25377,1)
+310243
+"DATA",176.112,25378,0)
+4007106^ETIDOCAINE HCL 1%/EPINEPHRINE 1:200000 INJ
+"DATA",176.112,25378,1)
+310242
+"DATA",176.112,25379,0)
+4004248^ETHYLNOREPINEPHRINE HCL 2MG/ML INJ
+"DATA",176.112,25379,1)
+310241
+"DATA",176.112,25380,0)
+4005097^ETHYLESTRENOL 2MG TAB
+"DATA",176.112,25380,1)
+310239
+"DATA",176.112,25381,0)
+4005727^ETHOPROPAZINE HCL 50MG TAB
+"DATA",176.112,25381,1)
+310236
+"DATA",176.112,25382,0)
+4005726^ETHOPROPAZINE HCL 10MG TAB
+"DATA",176.112,25382,1)
+310235
+"DATA",176.112,25383,0)
+4005241^ETHINYL ESTRADIOL 0.05MG/NORETHINDRONE 2.5MG TAB
+"DATA",176.112,25383,1)
+310234
+"DATA",176.112,25384,0)
+4003200^ETHINYL ESTRADIOL 0.03MG/LEVONORGESTREL 0.05MG TAB
+"DATA",176.112,25384,1)
+310230
+"DATA",176.112,25385,0)
+4005243^ETHINYL ESTRADIOL 0.02MG/NORETHINDRONE 1MG TAB
+"DATA",176.112,25385,1)
+310227
+"DATA",176.112,25386,0)
+4003449^ETHINYL ESTRADIOL 0.02MG/FLUOXYMESTERONE 1MG TAB
+"DATA",176.112,25386,1)
+310226
+"DATA",176.112,25387,0)
+4007742^ETHINAMATE 500MG CAP
+"DATA",176.112,25387,1)
+310225
+"DATA",176.112,25388,0)
+4006265^ETHCHLORVYNOL 750MG CAP,SA
+"DATA",176.112,25388,1)
+310224
+"DATA",176.112,25389,0)
+4006264^ETHCHLORVYNOL 500MG CAP,SA
+"DATA",176.112,25389,1)
+310223
+"DATA",176.112,25390,0)
+4007034^ETHAVERINE HCL 150MG TAB
+"DATA",176.112,25390,1)
+310222
+"DATA",176.112,25391,0)
+4007033^ETHAVERINE HCL 100MG CAP,SA
+"DATA",176.112,25391,1)
+310221
+"DATA",176.112,25392,0)
+4007032^ETHAVERINE HCL 100MG CAP
+"DATA",176.112,25392,1)
+310220
+"DATA",176.112,25393,0)
+4002770^ETHAMBUTOL HCL 400MG TAB
+"DATA",176.112,25393,1)
+310219
+"DATA",176.112,25394,0)
+4002769^ETHAMBUTOL HCL 100MG TAB
+"DATA",176.112,25394,1)
+310218
+"DATA",176.112,25395,0)
+4006085^ESTROPIPATE 6MG TAB
+"DATA",176.112,25395,1)
+310216
+"DATA",176.112,25396,0)
+4006084^ESTROPIPATE 3MG TAB
+"DATA",176.112,25396,1)
+310215
+"DATA",176.112,25397,0)
+4006081^ESTROPIPATE 1.5MG/GM CREAM,VAG
+"DATA",176.112,25397,1)
+310214
+"DATA",176.112,25398,0)
+4006083^ESTROPIPATE 1.5MG TAB
+"DATA",176.112,25398,1)
+310213
+"DATA",176.112,25399,0)
+4006082^ESTROPIPATE 0.75MG TAB
+"DATA",176.112,25399,1)
+310212
+"DATA",176.112,25400,0)
+4005005^ESTRONE NA SULFATE 2.5MG TAB
+"DATA",176.112,25400,1)
+310211
+"DATA",176.112,25401,0)
+4005006^ESTRONE NA SULFATE 0.625MG TAB
+"DATA",176.112,25401,1)
+310210
+"DATA",176.112,25402,0)
+4005004^ESTRONE 5MG/ML INJ,SUSP
+"DATA",176.112,25402,1)
+310209
+"DATA",176.112,25403,0)
+4015329^ESTROGENS,CONJUGATED SYNTHETIC A 1.25MG TAB
+"DATA",176.112,25403,1)
+310206
+"DATA",176.112,25404,0)
+4015328^ESTROGENS,CONJUGATED SYNTHETIC A 0.9MG TAB
+"DATA",176.112,25404,1)
+310205
+"DATA",176.112,25405,0)
+4015327^ESTROGENS,CONJUGATED SYNTHETIC A 0.625MG TAB
+"DATA",176.112,25405,1)
+310204
+"DATA",176.112,25406,0)
+4004639^ESTROGENS,CONJUGATED 5MG/ML INJ,SOLN
+"DATA",176.112,25406,1)
+310203
+"DATA",176.112,25407,0)
+4004647^ESTROGENS,CONJUGATED 2MG/ML INJ (IN OIL)
+"DATA",176.112,25407,1)
+310202
+"DATA",176.112,25408,0)
+4004648^ESTROGENS,CONJUGATED 2MG/ML INJ,SOLN
+"DATA",176.112,25408,1)
+310202
+"DATA",176.112,25409,0)
+4004646^ESTROGENS,CONJUGATED 2MG/ML INJ,SUSP
+"DATA",176.112,25409,1)
+310202
+"DATA",176.112,25410,0)
+4004652^ESTROGENS,CONJUGATED 200000UNT/ML INJ,SUSP
+"DATA",176.112,25410,1)
+310200
+"DATA",176.112,25411,0)
+4004651^ESTROGENS,CONJUGATED 1.25MG TAB,EC
+"DATA",176.112,25411,1)
+310199
+"DATA",176.112,25412,0)
+4014505^ESTROGENS,CONJUGATED 0.625MG TAB,UD
+"DATA",176.112,25412,1)
+310197
+"DATA",176.112,25413,0)
+4004636^ESTROGENS,CONJUGATED 0.625MG TAB
+"DATA",176.112,25413,1)
+310197
+"DATA",176.112,25414,0)
+4004653^ESTROGENS,CONJUGATED 0.625MG TAB,SA
+"DATA",176.112,25414,1)
+310196
+"DATA",176.112,25415,0)
+4004649^ESTROGENS 2MG/ML INJ,SUSP
+"DATA",176.112,25415,1)
+310195
+"DATA",176.112,25416,0)
+4002209^ESTRAMUSTINE PO4 SODIUM 140MG CAP
+"DATA",176.112,25416,1)
+310194
+"DATA",176.112,25417,0)
+4001698^ESTRADIOL VALERATE 8MG/TESTOSTERONE ENANTHATE 180MG/ML INJ,SA
+"DATA",176.112,25417,1)
+310193
+"DATA",176.112,25418,0)
+4001695^ESTRADIOL VALERATE 8MG/TESTOSTERONE ENANTHATE 180MG/ML INJ
+"DATA",176.112,25418,1)
+310193
+"DATA",176.112,25419,0)
+4001662^ESTRADIOL VALERATE 40MG/ML INJ (IN OIL)
+"DATA",176.112,25419,1)
+310191
+"DATA",176.112,25420,0)
+4001664^ESTRADIOL VALERATE 20MG/ML INJ (IN OIL)
+"DATA",176.112,25420,1)
+310190
+"DATA",176.112,25421,0)
+4001663^ESTRADIOL VALERATE 10MG/ML INJ (IN OIL)
+"DATA",176.112,25421,1)
+310189
+"DATA",176.112,25422,0)
+4001667^ESTRADIOL CYPIONATE 5MG/ML INJ (IN OIL)
+"DATA",176.112,25422,1)
+310187
+"DATA",176.112,25423,0)
+4001665^ESTRADIOL CYPIONATE 3MG/ML INJ (IN OIL)
+"DATA",176.112,25423,1)
+310186
+"DATA",176.112,25424,0)
+4001666^ESTRADIOL CYPIONATE 1MG/ML INJ (IN OIL)
+"DATA",176.112,25424,1)
+310185
+"DATA",176.112,25425,0)
+4015051^ESTRADIOL CYP 5MG/MEDROXYPROGESTERONE ACE 25MG INJ,SUSP,0.5ML
+"DATA",176.112,25425,1)
+310184
+"DATA",176.112,25426,0)
+4001670^ESTRADIOL 0.01% CREAM,VAG
+"DATA",176.112,25426,1)
+310169
+"DATA",176.112,25427,0)
+4008208^ESCHERICHIA COLI 10000000UNT/ML SUSP,ORAL
+"DATA",176.112,25427,1)
+310166
+"DATA",176.112,25428,0)
+4001596^ERYTHROMYCIN ESTOLATE 250MG TAB
+"DATA",176.112,25428,1)
+310165
+"DATA",176.112,25429,0)
+4001585^ERYTHROMYCIN ESTOLATE 250MG TAB,CHEWABLE
+"DATA",176.112,25429,1)
+310162
+"DATA",176.112,25430,0)
+4001584^ERYTHROMYCIN ESTOLATE 125MG TAB,CHEWABLE
+"DATA",176.112,25430,1)
+310161
+"DATA",176.112,25431,0)
+4001581^ERYTHROMYCIN ESTOLATE 125MG CAP
+"DATA",176.112,25431,1)
+310160
+"DATA",176.112,25432,0)
+4001597^ERYTHROMYCIN 500MG TAB,SA
+"DATA",176.112,25432,1)
+310157
+"DATA",176.112,25433,0)
+4001571^ERYTHROMYCIN 500MG TAB,EC
+"DATA",176.112,25433,1)
+310157
+"DATA",176.112,25434,0)
+4001579^ERYTHROMYCIN 333MG TAB
+"DATA",176.112,25434,1)
+310156
+"DATA",176.112,25435,0)
+4001562^ERYTHROMYCIN 250MG TAB,EC
+"DATA",176.112,25435,1)
+310155
+"DATA",176.112,25436,0)
+4001567^ERYTHROMYCIN 250MG CAP,EC
+"DATA",176.112,25436,1)
+310154
+"DATA",176.112,25437,0)
+4001592^ERYTHROMYCIN 250MG CAP,SA
+"DATA",176.112,25437,1)
+310154
+"DATA",176.112,25438,0)
+4001590^ERYTHROMYCIN 2% GEL,TOP
+"DATA",176.112,25438,1)
+310152
+"DATA",176.112,25439,0)
+4001566^ERYTHROMYCIN 125MG CAP,EC
+"DATA",176.112,25439,1)
+310151
+"DATA",176.112,25440,0)
+4001568^ERYTHROMYCIN 1.5% SOLN,TOP
+"DATA",176.112,25440,1)
+310150
+"DATA",176.112,25441,0)
+4001600^ERYTHROMYCIN 0.5% OINT,OPH,PKG,1GM
+"DATA",176.112,25441,1)
+310149
+"DATA",176.112,25442,0)
+4001577^ERYTHROMYCIN 0.5% OINT,OPH
+"DATA",176.112,25442,1)
+310149
+"DATA",176.112,25443,0)
+4006473^ERYTHRITYL TETRANITRATE 5MG TAB
+"DATA",176.112,25443,1)
+310148
+"DATA",176.112,25444,0)
+4006472^ERYTHRITYL TETRANITRATE 10MG TAB,CHEWABLE
+"DATA",176.112,25444,1)
+310147
+"DATA",176.112,25445,0)
+4006474^ERYTHRITYL TETRANITRATE 10MG TAB
+"DATA",176.112,25445,1)
+310146
+"DATA",176.112,25446,0)
+4005094^ERGOTAMINE TARTRATE 0.36MG/SPRAY,ORAL
+"DATA",176.112,25446,1)
+310145
+"DATA",176.112,25447,0)
+4007355^ERGOTAMINE 0.3MG/HYOSCYAMINE 0.1MG/PHENOBARB 20MG TAB
+"DATA",176.112,25447,1)
+310144
+"DATA",176.112,25448,0)
+4002391^ERGOLOID MESYLATES 1MG/ML LIQUID
+"DATA",176.112,25448,1)
+310143
+"DATA",176.112,25449,0)
+4004224^ERGOCALCIFEROL 50000UNT TAB
+"DATA",176.112,25449,1)
+310142
+"DATA",176.112,25450,0)
+4004223^ERGOCALCIFEROL 500000UNT/ML INJ
+"DATA",176.112,25450,1)
+310141
+"DATA",176.112,25451,0)
+4014647^EPROSARTAN MESYLATE 600MG TAB
+"DATA",176.112,25451,1)
+310140
+"DATA",176.112,25452,0)
+4014646^EPROSARTAN MESYLATE 400MG TAB
+"DATA",176.112,25452,1)
+310139
+"DATA",176.112,25453,0)
+4014383^EPIRUBICIN HCL 2MG/ML INJ
+"DATA",176.112,25453,1)
+310136
+"DATA",176.112,25454,0)
+4005516^EPINEPHRYL BORATE 0.5% SOLN,OPH
+"DATA",176.112,25454,1)
+310134
+"DATA",176.112,25455,0)
+4003241^EPINEPHRINE HCL 0.5% SOLN,OPH
+"DATA",176.112,25455,1)
+310134
+"DATA",176.112,25456,0)
+4008136^EPINEPHRINE,RACEMIC HCL 2.25% SOLN,INHL
+"DATA",176.112,25456,1)
+310133
+"DATA",176.112,25457,0)
+4003240^EPINEPHRINE 1MG/ML INJ
+"DATA",176.112,25457,1)
+310132
+"DATA",176.112,25458,0)
+4003266^EPINEPHRINE HCL 1MG/ML INJ,AMP,1ML
+"DATA",176.112,25458,1)
+310132
+"DATA",176.112,25459,0)
+4003247^EPINEPHRINE HCL 1MG/ML INJ
+"DATA",176.112,25459,1)
+310132
+"DATA",176.112,25460,0)
+4003260^EPINEPHRINE HCL 0.5% AEROSOL,INHL,ORAL
+"DATA",176.112,25460,1)
+310129
+"DATA",176.112,25461,0)
+4003242^EPINEPHRINE HCL 0.25% SOLN,OPH
+"DATA",176.112,25461,1)
+310127
+"DATA",176.112,25462,0)
+4003254^EPINEPHRINE HCL 0.2% SOLN,DENT
+"DATA",176.112,25462,1)
+310125
+"DATA",176.112,25463,0)
+4007808^EPINEPHRINE BITARTRATE 1%/PILOCARPINE HCL 6% SOLN,OPH
+"DATA",176.112,25463,1)
+310124
+"DATA",176.112,25464,0)
+4007807^EPINEPHRINE BITARTRATE 1%/PILOCARPINE HCL 4% SOLN,OPH
+"DATA",176.112,25464,1)
+310123
+"DATA",176.112,25465,0)
+4007806^EPINEPHRINE BITARTRATE 1%/PILOCARPINE HCL 3% SOLN,OPH
+"DATA",176.112,25465,1)
+310122
+"DATA",176.112,25466,0)
+4007804^EPINEPHRINE BITARTRATE 1%/PILOCARPINE HCL 1% SOLN,OPH
+"DATA",176.112,25466,1)
+310121
+"DATA",176.112,25467,0)
+4007901^EPINEPHRINE 8%/ZINC CHLORIDE 2% SOLN
+"DATA",176.112,25467,1)
+310120
+"DATA",176.112,25468,0)
+4003262^EPINEPHRINE 7MG/ML SOLN,ORAL
+"DATA",176.112,25468,1)
+310119
+"DATA",176.112,25469,0)
+4003257^EPINEPHRINE 5MG/ML INJ,SUSP
+"DATA",176.112,25469,1)
+310118
+"DATA",176.112,25470,0)
+4003270^EPINEPHRINE 5MG/ML INJ,SUSP,AMP,0.3ML
+"DATA",176.112,25470,1)
+310118
+"DATA",176.112,25471,0)
+4003263^EPINEPHRINE 0.2MG/SPRAY INHL,ORAL
+"DATA",176.112,25471,1)
+310117
+"DATA",176.112,25472,0)
+4003248^EPINEPHRINE HCL 0.1MG/ML INJ
+"DATA",176.112,25472,1)
+310116
+"DATA",176.112,25473,0)
+4003249^EPINEPHRINE 0.1MG/ML INJ
+"DATA",176.112,25473,1)
+310116
+"DATA",176.112,25474,0)
+4003264^EPINEPHRINE 0.16MG/SPRAY SUSP,INHL,ORAL
+"DATA",176.112,25474,1)
+310115
+"DATA",176.112,25475,0)
+4007292^EPHEDRINE SO4 8MG/SECOBARBITAL 16MG TAB
+"DATA",176.112,25475,1)
+310113
+"DATA",176.112,25476,0)
+4000953^EPHEDRINE SO4 5MG/ML INJ
+"DATA",176.112,25476,1)
+310111
+"DATA",176.112,25477,0)
+4000948^EPHEDRINE SO4 50MG/ML INJ
+"DATA",176.112,25477,1)
+310110
+"DATA",176.112,25478,0)
+4000952^EPHEDRINE SO4 25MG TAB
+"DATA",176.112,25478,1)
+310109
+"DATA",176.112,25479,0)
+4010005^EPHEDRINE SO4 10MG/ML/NACL 0.9% SOLN,INHL
+"DATA",176.112,25479,1)
+310107
+"DATA",176.112,25480,0)
+4007143^EPHEDRINE 48MG/PHENOBARB 25MG/THEOPHYLLINE 180MG TAB,SA
+"DATA",176.112,25480,1)
+310103
+"DATA",176.112,25481,0)
+4007146^EPHEDRINE 36MG/PHENOBARB 12MG/THEOPHYLLINE 177MG/15ML SUSP
+"DATA",176.112,25481,1)
+310102
+"DATA",176.112,25482,0)
+4005062^EPHEDRINE 25MG/HYDROXYZINE 10MG/THEOPHYLLINE 130MG TAB
+"DATA",176.112,25482,1)
+310100
+"DATA",176.112,25483,0)
+4007142^EPHEDRINE 24MG/PHENOBARB 8MG/THEOPHYLLINE 130MG TAB
+"DATA",176.112,25483,1)
+310099
+"DATA",176.112,25484,0)
+4007145^EPHEDRINE 24MG/PHENOBARB 8MG/THEOPHYLLINE 118MG TAB
+"DATA",176.112,25484,1)
+310098
+"DATA",176.112,25485,0)
+4004972^EPHEDRINE 24MG/PHENOBARB 24MG/KI 320MG/THEOPHYLLINE 130MG TAB
+"DATA",176.112,25485,1)
+310097
+"DATA",176.112,25486,0)
+4009868^EPHEDRINE 24MG/GG 100MG/THEOPHYLLINE 100MG TAB
+"DATA",176.112,25486,1)
+310096
+"DATA",176.112,25487,0)
+4006780^EPHEDRINE 24MG/GG 100MG/PHENOBARB 8MG/THEOPHYLLINE 100MG TAB
+"DATA",176.112,25487,1)
+310095
+"DATA",176.112,25488,0)
+4008526^ENCAINIDE HCL 50MG CAP
+"DATA",176.112,25488,1)
+310073
+"DATA",176.112,25489,0)
+4008525^ENCAINIDE HCL 35MG CAP
+"DATA",176.112,25489,1)
+310072
+"DATA",176.112,25490,0)
+4008524^ENCAINIDE HCL 25MG CAP
+"DATA",176.112,25490,1)
+310071
+"DATA",176.112,25491,0)
+4009427^ENALAPRIL MALEATE 5MG/HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,25491,1)
+310070
+"DATA",176.112,25492,0)
+4013721^ENALAPRIL MALEATE 5MG/FELODIPINE 5MG TAB,SA,UD
+"DATA",176.112,25492,1)
+310069
+"DATA",176.112,25493,0)
+4012940^ENALAPRIL MALEATE 5MG/FELODIPINE 5MG TAB,SA
+"DATA",176.112,25493,1)
+310069
+"DATA",176.112,25494,0)
+4013402^ENALAPRIL MALEATE 5MG/FELODIPINE 2.5MG TAB,SA,UD
+"DATA",176.112,25494,1)
+310068
+"DATA",176.112,25495,0)
+4013401^ENALAPRIL MALEATE 5MG/FELODIPINE 2.5MG TAB,SA
+"DATA",176.112,25495,1)
+310068
+"DATA",176.112,25496,0)
+4013995^ENALAPRIL MALEATE 5MG TAB,UD
+"DATA",176.112,25496,1)
+310067
+"DATA",176.112,25497,0)
+4002966^ENALAPRIL MALEATE 5MG TAB
+"DATA",176.112,25497,1)
+310067
+"DATA",176.112,25498,0)
+4002968^ENALAPRIL MALEATE 20MG TAB
+"DATA",176.112,25498,1)
+310066
+"DATA",176.112,25499,0)
+4013998^ENALAPRIL MALEATE 20MG TAB,UD
+"DATA",176.112,25499,1)
+310066
+"DATA",176.112,25500,0)
+4002969^ENALAPRIL MALEATE 2.5MG TAB
+"DATA",176.112,25500,1)
+310065
+"DATA",176.112,25501,0)
+4013996^ENALAPRIL MALEATE 2.5MG TAB,UD
+"DATA",176.112,25501,1)
+310065
+"DATA",176.112,25502,0)
+4009426^ENALAPRIL MALEATE 10MG/HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,25502,1)
+310064
+"DATA",176.112,25503,0)
+4002967^ENALAPRIL MALEATE 10MG TAB
+"DATA",176.112,25503,1)
+310063
+"DATA",176.112,25504,0)
+4013997^ENALAPRIL MALEATE 10MG TAB,UD
+"DATA",176.112,25504,1)
+310063
+"DATA",176.112,25505,0)
+4013164^EMEDASTINE DIFUMARATE 0.05% SOLN,OPH
+"DATA",176.112,25505,1)
+310056
+"DATA",176.112,25506,0)
+4010232^EFLORNITHINE HCL 200MG/ML INJ
+"DATA",176.112,25506,1)
+310054
+"DATA",176.112,25507,0)
+4010542^EDTA 0.1%/THIMEROSAL 0.004% SOLN,OPH
+"DATA",176.112,25507,1)
+310052
+"DATA",176.112,25508,0)
+4005043^ECHOTHIOPHATE IODIDE 0.25% SOLN,OPH
+"DATA",176.112,25508,1)
+310050
+"DATA",176.112,25509,0)
+4005042^ECHOTHIOPHATE IODIDE 0.125% SOLN,OPH
+"DATA",176.112,25509,1)
+310049
+"DATA",176.112,25510,0)
+4005040^ECHOTHIOPHATE IODIDE 0.03% SOLN,OPH
+"DATA",176.112,25510,1)
+310048
+"DATA",176.112,25511,0)
+4004819^DYPHYLLINE 300MG/GUAIFENESIN 300MG/15ML LIQUID
+"DATA",176.112,25511,1)
+310045
+"DATA",176.112,25512,0)
+4004822^DYPHYLLINE 300MG/GUAIFENESIN 300MG/15ML SYRUP
+"DATA",176.112,25512,1)
+310045
+"DATA",176.112,25513,0)
+4004820^DYPHYLLINE 200MG/GUAIFENESIN 200MG CAP
+"DATA",176.112,25513,1)
+310044
+"DATA",176.112,25514,0)
+4004821^DYPHYLLINE 200MG/GUAIFENESIN 100MG CAP
+"DATA",176.112,25514,1)
+310043
+"DATA",176.112,25515,0)
+4004812^DYPHYLLINE 125MG/ML INJ
+"DATA",176.112,25515,1)
+310041
+"DATA",176.112,25516,0)
+4004824^DYPHYLLINE 100MG/EPHEDRINE 16MG/GG 200MG/PHENOBARB 16MG TAB
+"DATA",176.112,25516,1)
+310039
+"DATA",176.112,25517,0)
+4003557^DYE FDC (BLUE #2) 8MG/ML INJ
+"DATA",176.112,25517,1)
+310036
+"DATA",176.112,25518,0)
+4007681^DYE EVANS BLUE 5MG/ML INJ
+"DATA",176.112,25518,1)
+310035
+"DATA",176.112,25519,0)
+4007109^DYCLONINE HCL 1% SOLN,TOP
+"DATA",176.112,25519,1)
+310034
+"DATA",176.112,25520,0)
+4007108^DYCLONINE HCL 0.5% SOLN,TOP
+"DATA",176.112,25520,1)
+310033
+"DATA",176.112,25521,0)
+4001961^DOXYCYCLINE MONOHYDRATE 25MG/5ML LIQUID
+"DATA",176.112,25521,1)
+310030
+"DATA",176.112,25522,0)
+4001963^DOXYCYCLINE HYCLATE 50MG TAB
+"DATA",176.112,25522,1)
+310029
+"DATA",176.112,25523,0)
+4013353^DOXYCYCLINE HYCLATE 20MG CAP
+"DATA",176.112,25523,1)
+310028
+"DATA",176.112,25524,0)
+4001964^DOXYCYCLINE HYCLATE 100MG/VIL INJ
+"DATA",176.112,25524,1)
+310027
+"DATA",176.112,25525,0)
+4001965^DOXYCYCLINE HYCLATE 200MG/VIL INJ
+"DATA",176.112,25525,1)
+310027
+"DATA",176.112,25526,0)
+4001962^DOXYCYCLINE CA 50MG/5ML SUSP
+"DATA",176.112,25526,1)
+310026
+"DATA",176.112,25527,0)
+4007415^DOXORUBICIN HCL 5MG/ML/NACL 0.9% INJ
+"DATA",176.112,25527,1)
+310025
+"DATA",176.112,25528,0)
+4003567^DOXORUBICIN HCL 20MG/VIL (RDF) INJ
+"DATA",176.112,25528,1)
+310024
+"DATA",176.112,25529,0)
+4003560^DOXORUBICIN HCL 50MG/VIL INJ
+"DATA",176.112,25529,1)
+310024
+"DATA",176.112,25530,0)
+4003568^DOXORUBICIN HCL 50MG/VIL (RDF) INJ
+"DATA",176.112,25530,1)
+310024
+"DATA",176.112,25531,0)
+4003564^DOXORUBICIN HCL 50MG/VIL (PF) INJ
+"DATA",176.112,25531,1)
+310024
+"DATA",176.112,25532,0)
+4003561^DOXORUBICIN HCL 20MG/VIL INJ
+"DATA",176.112,25532,1)
+310024
+"DATA",176.112,25533,0)
+4003563^DOXORUBICIN HCL 20MG/VIL (PF) INJ
+"DATA",176.112,25533,1)
+310024
+"DATA",176.112,25534,0)
+4003565^DOXORUBICIN HCL 200MG/VIL (PF) INJ
+"DATA",176.112,25534,1)
+310024
+"DATA",176.112,25535,0)
+4003569^DOXORUBICIN HCL 150MG/VIL (RDF) INJ
+"DATA",176.112,25535,1)
+310024
+"DATA",176.112,25536,0)
+4003566^DOXORUBICIN HCL 10MG/VIL (RDF) INJ
+"DATA",176.112,25536,1)
+310024
+"DATA",176.112,25537,0)
+4003562^DOXORUBICIN HCL 10MG/VIL (PF) INJ
+"DATA",176.112,25537,1)
+310024
+"DATA",176.112,25538,0)
+4003570^DOXORUBICIN HCL 100MG/VIL INJ
+"DATA",176.112,25538,1)
+310024
+"DATA",176.112,25539,0)
+4007417^DOXORUBICIN HCL 2MG/ML/NACL 0.9% (PF) INJ
+"DATA",176.112,25539,1)
+310024
+"DATA",176.112,25540,0)
+4007416^DOXORUBICIN HCL 2MG/ML/NACL 0.9% INJ
+"DATA",176.112,25540,1)
+310024
+"DATA",176.112,25541,0)
+4003571^DOXORUBICIN HCL 2MG/ML INJ
+"DATA",176.112,25541,1)
+310024
+"DATA",176.112,25542,0)
+4003559^DOXORUBICIN HCL 10MG/VIL INJ
+"DATA",176.112,25542,1)
+310024
+"DATA",176.112,25543,0)
+4014668^DOXERCALCIFEROL 0.0025MG CAP
+"DATA",176.112,25543,1)
+310023
+"DATA",176.112,25544,0)
+4025139^DOXERCALCIFEROL 2.5MCG CAP
+"DATA",176.112,25544,1)
+310023
+"DATA",176.112,25545,0)
+4002479^DOXEPIN HCL 50MG CAP
+"DATA",176.112,25545,1)
+310022
+"DATA",176.112,25546,0)
+4015269^DOXEPIN HCL 50MG CAP,UD
+"DATA",176.112,25546,1)
+310022
+"DATA",176.112,25547,0)
+4002485^DOXEPIN HCL 5% CREAM,TOP
+"DATA",176.112,25547,1)
+310021
+"DATA",176.112,25548,0)
+4002478^DOXEPIN HCL 25MG CAP
+"DATA",176.112,25548,1)
+310020
+"DATA",176.112,25549,0)
+4013935^DOXEPIN HCL 25MG CAP,UD
+"DATA",176.112,25549,1)
+310020
+"DATA",176.112,25550,0)
+4002484^DOXEPIN HCL 10MG/ML SOLN,ORAL
+"DATA",176.112,25550,1)
+310019
+"DATA",176.112,25551,0)
+4002482^DOXEPIN HCL 10MG/ML SUSP,ORAL
+"DATA",176.112,25551,1)
+310019
+"DATA",176.112,25552,0)
+4012741^DORZOLAMIDE HCL 2% SOLN,OPH
+"DATA",176.112,25552,1)
+310015
+"DATA",176.112,25553,0)
+4012187^DORNASE ALFA,rDNA 1MG/ML AMP 2.5ML SOLN,INHL
+"DATA",176.112,25553,1)
+310014
+"DATA",176.112,25554,0)
+4006167^DOPAMINE HCL 3.2MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,25554,1)
+310013
+"DATA",176.112,25555,0)
+4006166^DOPAMINE HCL 1.6MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,25555,1)
+310012
+"DATA",176.112,25556,0)
+4006165^DOPAMINE HCL 0.8MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,25556,1)
+310011
+"DATA",176.112,25557,0)
+4013934^DONEPEZIL HCL 5MG TAB,UD
+"DATA",176.112,25557,1)
+310010
+"DATA",176.112,25558,0)
+4012972^DONEPEZIL HCL 5MG TAB
+"DATA",176.112,25558,1)
+310010
+"DATA",176.112,25559,0)
+4012973^DONEPEZIL HCL 10MG TAB
+"DATA",176.112,25559,1)
+310009
+"DATA",176.112,25560,0)
+4013994^DONEPEZIL HCL 10MG TAB,UD
+"DATA",176.112,25560,1)
+310009
+"DATA",176.112,25561,0)
+4013125^DOLASETRON MESYLATE 50MG TAB
+"DATA",176.112,25561,1)
+310007
+"DATA",176.112,25562,0)
+4013126^DOLASETRON MESYLATE 100MG TAB
+"DATA",176.112,25562,1)
+310006
+"DATA",176.112,25563,0)
+4014674^DOFETILIDE 500MCG CAP
+"DATA",176.112,25563,1)
+310005
+"DATA",176.112,25564,0)
+4014675^DOFETILIDE 500MCG CAP,UD
+"DATA",176.112,25564,1)
+310005
+"DATA",176.112,25565,0)
+4014672^DOFETILIDE 250MCG CAP
+"DATA",176.112,25565,1)
+310004
+"DATA",176.112,25566,0)
+4014673^DOFETILIDE 250MCG CAP,UD
+"DATA",176.112,25566,1)
+310004
+"DATA",176.112,25567,0)
+4014671^DOFETILIDE 125MCG CAP,UD
+"DATA",176.112,25567,1)
+310003
+"DATA",176.112,25568,0)
+4014670^DOFETILIDE 125MCG CAP
+"DATA",176.112,25568,1)
+310003
+"DATA",176.112,25569,0)
+4008549^DOCUSATE NA 83MG/PHENOLPHTHALEIN 90MG CAP
+"DATA",176.112,25569,1)
+310002
+"DATA",176.112,25570,0)
+4008057^DOCUSATE NA 50MG/5ML SOLN,ORAL
+"DATA",176.112,25570,1)
+309999
+"DATA",176.112,25571,0)
+4008049^DOCUSATE NA 50MG/5ML SYRUP
+"DATA",176.112,25571,1)
+309999
+"DATA",176.112,25572,0)
+4008065^DOCUSATE NA 50MG/5ML LIQUID,BTL,30ML
+"DATA",176.112,25572,1)
+309999
+"DATA",176.112,25573,0)
+4008059^DOCUSATE NA 50MG/5ML LIQUID
+"DATA",176.112,25573,1)
+309999
+"DATA",176.112,25574,0)
+4008060^DOCUSATE NA 300MG CAP
+"DATA",176.112,25574,1)
+309997
+"DATA",176.112,25575,0)
+4008063^DOCUSATE NA 283MG/CAP FOR ENEMA
+"DATA",176.112,25575,1)
+309996
+"DATA",176.112,25576,0)
+4008051^DOCUSATE NA 250MG CAP
+"DATA",176.112,25576,1)
+309995
+"DATA",176.112,25577,0)
+4014000^DOCUSATE NA 250MG CAP,UD
+"DATA",176.112,25577,1)
+309995
+"DATA",176.112,25578,0)
+4008056^DOCUSATE K 240MG CAP
+"DATA",176.112,25578,1)
+309994
+"DATA",176.112,25579,0)
+4008053^DOCUSATE NA 240MG CAP
+"DATA",176.112,25579,1)
+309994
+"DATA",176.112,25580,0)
+4008055^DOCUSATE CA 240MG CAP
+"DATA",176.112,25580,1)
+309994
+"DATA",176.112,25581,0)
+4008551^DOCUSATE NA 230MG/PHENOLPHTHALEIN,YELLOW 130MG CAP
+"DATA",176.112,25581,1)
+309993
+"DATA",176.112,25582,0)
+4008066^DOCUSATE NA 200MG/5ML ENEMA,RTL
+"DATA",176.112,25582,1)
+309992
+"DATA",176.112,25583,0)
+4008548^DOCUSATE NA 100MG/PHENOLPHTHALEIN 65MG TAB
+"DATA",176.112,25583,1)
+309991
+"DATA",176.112,25584,0)
+4008550^DOCUSATE NA 100MG/PHENOLPHTHALEIN 65MG CAP
+"DATA",176.112,25584,1)
+309990
+"DATA",176.112,25585,0)
+4013993^DOCUSATE NA 100MG CAP,UD
+"DATA",176.112,25585,1)
+309989
+"DATA",176.112,25586,0)
+4008050^DOCUSATE K 100MG CAP
+"DATA",176.112,25586,1)
+309989
+"DATA",176.112,25587,0)
+4008047^DOCUSATE NA 100MG CAP
+"DATA",176.112,25587,1)
+309989
+"DATA",176.112,25588,0)
+4008547^DOCUSATE CA 60MG/PHENOLPHTHALEIN 65MG CAP
+"DATA",176.112,25588,1)
+309988
+"DATA",176.112,25589,0)
+4001316^DOBUTAMINE HCL 4MG/ML/DEXTROSE 5% INJ,BAG,250ML
+"DATA",176.112,25589,1)
+309987
+"DATA",176.112,25590,0)
+4001315^DOBUTAMINE HCL 2MG/ML/DEXTROSE 5% INJ,BAG,250ML
+"DATA",176.112,25590,1)
+309986
+"DATA",176.112,25591,0)
+4001314^DOBUTAMINE HCL 1MG/ML/DEXTROSE 5% INJ,BAG,250ML
+"DATA",176.112,25591,1)
+309985
+"DATA",176.112,25592,0)
+4001318^DOBUTAMINE HCL 1MG/ML/DEXTROSE 5% INJ,BAG,500ML
+"DATA",176.112,25592,1)
+309985
+"DATA",176.112,25593,0)
+4001319^DOBUTAMINE HCL 0.5MG/ML/DEXTROSE 5% INJ,BAG,250ML
+"DATA",176.112,25593,1)
+309984
+"DATA",176.112,25594,0)
+4001317^DOBUTAMINE HCL 0.5MG/ML/DEXTROSE 5% INJ,BAG,500ML
+"DATA",176.112,25594,1)
+309984
+"DATA",176.112,25595,0)
+4001320^DOBUTAMINE HCL 0.25MG/ML/DEXTROSE 5% INJ,BAG,500ML
+"DATA",176.112,25595,1)
+309983
+"DATA",176.112,25596,0)
+4007728^DM 7.5MG/K GUAIACOLSULF 44MG/PROMETH 5MG/5ML LIQUID
+"DATA",176.112,25596,1)
+309982
+"DATA",176.112,25597,0)
+4007528^DM 20MG/GG 400MG/PSEUDEFED 60MG TAB
+"DATA",176.112,25597,1)
+309979
+"DATA",176.112,25598,0)
+4007522^DM 10MG/GG 50MG/PSEUDEFED 30MG/5ML LIQUID
+"DATA",176.112,25598,1)
+309972
+"DATA",176.112,25599,0)
+4007431^DL-METHIONINE 75MG/5ML SOLN,ORAL
+"DATA",176.112,25599,1)
+309969
+"DATA",176.112,25600,0)
+4007429^DL-METHIONINE 500MG TAB
+"DATA",176.112,25600,1)
+309968
+"DATA",176.112,25601,0)
+4007430^DL-METHIONINE 200MG CAP
+"DATA",176.112,25601,1)
+309967
+"DATA",176.112,25602,0)
+4002448^DISOPYRAMIDE PO4 150MG CAP,SA
+"DATA",176.112,25602,1)
+309961
+"DATA",176.112,25603,0)
+4016127^DISOPYRAMIDE PO4 150MG CAP,SA,UD
+"DATA",176.112,25603,1)
+309961
+"DATA",176.112,25604,0)
+4002446^DISOPYRAMIDE PO4 150MG CAP
+"DATA",176.112,25604,1)
+309960
+"DATA",176.112,25605,0)
+4002447^DISOPYRAMIDE PO4 100MG CAP,SA
+"DATA",176.112,25605,1)
+309959
+"DATA",176.112,25606,0)
+4002445^DISOPYRAMIDE PO4 100MG CAP
+"DATA",176.112,25606,1)
+309958
+"DATA",176.112,25607,0)
+4012819^DIRITHROMYCIN 250MG TAB,EC
+"DATA",176.112,25607,1)
+309956
+"DATA",176.112,25608,0)
+4013933^DIPYRIDAMOLE 75MG TAB,UD
+"DATA",176.112,25608,1)
+309955
+"DATA",176.112,25609,0)
+4002648^DIPYRIDAMOLE 75MG TAB
+"DATA",176.112,25609,1)
+309955
+"DATA",176.112,25610,0)
+4002649^DIPYRIDAMOLE 75MG TAB,EC
+"DATA",176.112,25610,1)
+309954
+"DATA",176.112,25611,0)
+4002650^DIPYRIDAMOLE 5MG/ML INJ
+"DATA",176.112,25611,1)
+309953
+"DATA",176.112,25612,0)
+4002646^DIPYRIDAMOLE 25MG TAB
+"DATA",176.112,25612,1)
+309952
+"DATA",176.112,25613,0)
+4014094^DIPYRIDAMOLE 25MG TAB,UD
+"DATA",176.112,25613,1)
+309952
+"DATA",176.112,25614,0)
+4007953^DIPIVEFRIN HCL 0.1% SOLN,OPH
+"DATA",176.112,25614,1)
+309950
+"DATA",176.112,25615,0)
+4001996^DIPHTHERIA TOXOID 2UNT/TETANUS TOXOID 5UNT/0.5ML ADSORBED INJ
+"DATA",176.112,25615,1)
+309945
+"DATA",176.112,25616,0)
+4002003^DIPHTHERIA TOXOID 12.5UNT/TETANUS TOXOID 5UNT/0.5ML INJ
+"DATA",176.112,25616,1)
+309943
+"DATA",176.112,25617,0)
+4003126^DIPHENYLPYRALINE HCL 5MG CAP,SA
+"DATA",176.112,25617,1)
+309941
+"DATA",176.112,25618,0)
+4003152^DIPHENIDOL HCL 25MG TAB
+"DATA",176.112,25618,1)
+309940
+"DATA",176.112,25619,0)
+4002568^DIPHENHYDRAMINE HCL 50MG/ML INJ,VIL,10ML
+"DATA",176.112,25619,1)
+309938
+"DATA",176.112,25620,0)
+4002555^DIPHENHYDRAMINE HCL 50MG/ML INJ
+"DATA",176.112,25620,1)
+309938
+"DATA",176.112,25621,0)
+4013932^DIPHENHYDRAMINE HCL 50MG CAP,UD
+"DATA",176.112,25621,1)
+309937
+"DATA",176.112,25622,0)
+4002557^DIPHENHYDRAMINE HCL 50MG CAP
+"DATA",176.112,25622,1)
+309937
+"DATA",176.112,25623,0)
+4002556^DIPHENHYDRAMINE HCL 25MG CAP
+"DATA",176.112,25623,1)
+309936
+"DATA",176.112,25624,0)
+4013931^DIPHENHYDRAMINE HCL 25MG CAP,UD
+"DATA",176.112,25624,1)
+309936
+"DATA",176.112,25625,0)
+4017252^DIPHENHYDRAMINE HCL 25MG CAP, DYE-FREE
+"DATA",176.112,25625,1)
+309936
+"DATA",176.112,25626,0)
+4002558^DIPHENHYDRAMINE HCL 10MG/ML INJ
+"DATA",176.112,25626,1)
+309933
+"DATA",176.112,25627,0)
+4002563^DIPHENHYDRAMINE HCL 1% LOTION
+"DATA",176.112,25627,1)
+309931
+"DATA",176.112,25628,0)
+4009710^DIPHENHYDRAMINE 25MG/PSEUDOEPHEDRINE 60MG CAP
+"DATA",176.112,25628,1)
+309930
+"DATA",176.112,25629,0)
+4007855^DIPHENHYDRAMINE 2%/PHENOL 1% CREAM,TOP
+"DATA",176.112,25629,1)
+309929
+"DATA",176.112,25630,0)
+4007011^DIPERODON 0.5%/HC 0.5%/ZN OXIDE 5% OINT,TOP
+"DATA",176.112,25630,1)
+309926
+"DATA",176.112,25631,0)
+4007007^DIOXYBENZONE 3%/PABA 5%/HYDROQUINONE 4% GEL,TOP
+"DATA",176.112,25631,1)
+309925
+"DATA",176.112,25632,0)
+4007006^DIOXYBENZONE 3%/PABA 5%/HYDROQUINONE 4% CREAM,TOP
+"DATA",176.112,25632,1)
+309924
+"DATA",176.112,25633,0)
+4003523^DINOPROSTONE 0.5MG/3GM APPLICATOR,VAG
+"DATA",176.112,25633,1)
+309922
+"DATA",176.112,25634,0)
+4003521^DINOPROSTONE 0.5MG/2.5ML APPPLICATOR,VAG
+"DATA",176.112,25634,1)
+309921
+"DATA",176.112,25635,0)
+4003498^DINOPROST TROMETHAMINE 5MG/ML INJ
+"DATA",176.112,25635,1)
+309920
+"DATA",176.112,25636,0)
+4015412^DIMETHICONE 3% LOTION,TOP
+"DATA",176.112,25636,1)
+309918
+"DATA",176.112,25637,0)
+4015087^DIMETHICONE 1.5% CREAM,TOP
+"DATA",176.112,25637,1)
+309917
+"DATA",176.112,25638,0)
+4014708^DIMETHICONE 1.3% CREAM,TOP
+"DATA",176.112,25638,1)
+309916
+"DATA",176.112,25639,0)
+4003554^DIMERCAPROL 100MG/ML INJ
+"DATA",176.112,25639,1)
+309915
+"DATA",176.112,25640,0)
+4003343^DIMENHYDRINATE 50MG/ML INJ
+"DATA",176.112,25640,1)
+309914
+"DATA",176.112,25641,0)
+4003347^DIMENHYDRINATE 50MG TAB,CHEWABLE
+"DATA",176.112,25641,1)
+309913
+"DATA",176.112,25642,0)
+4003345^DIMENHYDRINATE 50MG CAP
+"DATA",176.112,25642,1)
+309912
+"DATA",176.112,25643,0)
+4007692^DIMENHYDRINATE 25MG/NIACIN 50MG TAB
+"DATA",176.112,25643,1)
+309911
+"DATA",176.112,25644,0)
+4007691^DIMENHYDRINATE 25MG/NIACIN 50MG CAP
+"DATA",176.112,25644,1)
+309910
+"DATA",176.112,25645,0)
+4013127^DILTIAZEM MALATE 180MG/ENALAPRIL MALEATE 5MG TAB,SA
+"DATA",176.112,25645,1)
+309907
+"DATA",176.112,25646,0)
+4009732^DIHYDROXYALUMINUM SODIUM CARBONATE 334MG TAB,CHEWABLE
+"DATA",176.112,25646,1)
+309899
+"DATA",176.112,25647,0)
+4009840^DIHYDROXYACETONE 5% LIQUID,TOP
+"DATA",176.112,25647,1)
+309898
+"DATA",176.112,25648,0)
+4004226^DIHYDROTACHYSTEROL 0.25MG/ML SOLN,ORAL
+"DATA",176.112,25648,1)
+309897
+"DATA",176.112,25649,0)
+4006421^DIHYDROERGOTAMINE MESYLATE 4MG/ML SOLN,NASAL,SPRAY
+"DATA",176.112,25649,1)
+309896
+"DATA",176.112,25650,0)
+4007424^DIHYDROCODEINE BITARTRATE 16MG CAP
+"DATA",176.112,25650,1)
+309895
+"DATA",176.112,25651,0)
+4007128^DIHYDROCODEINE 20MG/APAP 250MG/SALICYLAMIDE 250MG CAP
+"DATA",176.112,25651,1)
+309893
+"DATA",176.112,25652,0)
+4007752^DIHYDROCODEINE 16MG/ASA 356MG/CAFN 30MG/PROMETH 6.25MG CAP
+"DATA",176.112,25652,1)
+309892
+"DATA",176.112,25653,0)
+4003414^DIHYDROCODEINE 16MG/ASA 356MG/CAFN 30MG CAP
+"DATA",176.112,25653,1)
+309891
+"DATA",176.112,25654,0)
+4015562^DIGOXIN IMMUNE FAB (OVINE) 38MG/VIL INJ
+"DATA",176.112,25654,1)
+309890
+"DATA",176.112,25655,0)
+4000747^DIGITOXIN 0.2MG TAB
+"DATA",176.112,25655,1)
+309887
+"DATA",176.112,25656,0)
+4000746^DIGITOXIN 0.15MG TAB
+"DATA",176.112,25656,1)
+309886
+"DATA",176.112,25657,0)
+4000745^DIGITOXIN 0.05MG TAB
+"DATA",176.112,25657,1)
+309885
+"DATA",176.112,25658,0)
+4007082^DIGITALIS,POWDERED 32MG TAB
+"DATA",176.112,25658,1)
+309884
+"DATA",176.112,25659,0)
+4007081^DIGITALIS,POWDERED 100MG TAB
+"DATA",176.112,25659,1)
+309883
+"DATA",176.112,25660,0)
+4007080^DIGITALIS 100MG TAB
+"DATA",176.112,25660,1)
+309883
+"DATA",176.112,25661,0)
+4007079^DIGITALIS 100MG TAB,EC
+"DATA",176.112,25661,1)
+309882
+"DATA",176.112,25662,0)
+4002960^DIFLUNISAL 500MG TAB,EC
+"DATA",176.112,25662,1)
+309879
+"DATA",176.112,25663,0)
+4000739^DIETHYLSTILBESTROL DIPHOSPHATE 50MG/ML INJ
+"DATA",176.112,25663,1)
+309878
+"DATA",176.112,25664,0)
+4000740^DIETHYLSTILBESTROL DIPHOSPHATE 50MG TAB
+"DATA",176.112,25664,1)
+309877
+"DATA",176.112,25665,0)
+4000743^DIETHYLSTILBESTROL 5MG TAB,EC
+"DATA",176.112,25665,1)
+309876
+"DATA",176.112,25666,0)
+4000741^DIETHYLSTILBESTROL 0.5MG TAB
+"DATA",176.112,25666,1)
+309875
+"DATA",176.112,25667,0)
+4000801^DIETHYLSTILBESTROL 0.25MG/METHYLTESTOSTERONE 5MG TAB
+"DATA",176.112,25667,1)
+309874
+"DATA",176.112,25668,0)
+4009943^DIDANOSINE 50MG TAB,CHEWABLE
+"DATA",176.112,25668,1)
+309873
+"DATA",176.112,25669,0)
+4009942^DIDANOSINE 25MG TAB,CHEWABLE
+"DATA",176.112,25669,1)
+309872
+"DATA",176.112,25670,0)
+4009948^DIDANOSINE 250MG/PKG SOLN,ORAL
+"DATA",176.112,25670,1)
+309871
+"DATA",176.112,25671,0)
+4009947^DIDANOSINE 167MG/PKG SOLN,ORAL
+"DATA",176.112,25671,1)
+309869
+"DATA",176.112,25672,0)
+4009945^DIDANOSINE 150MG TAB,CHEWABLE
+"DATA",176.112,25672,1)
+309868
+"DATA",176.112,25673,0)
+4009946^DIDANOSINE 100MG/PKG SOLN,ORAL
+"DATA",176.112,25673,1)
+309867
+"DATA",176.112,25674,0)
+4009944^DIDANOSINE 100MG TAB,CHEWABLE
+"DATA",176.112,25674,1)
+309866
+"DATA",176.112,25675,0)
+4007088^DICYCLOMINE HCL 20MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,25675,1)
+309865
+"DATA",176.112,25676,0)
+4002585^DICYCLOMINE HCL 20MG CAP
+"DATA",176.112,25676,1)
+309864
+"DATA",176.112,25677,0)
+4007087^DICYCLOMINE HCL 10MG/PHENOBARBITAL 15MG CAP
+"DATA",176.112,25677,1)
+309863
+"DATA",176.112,25678,0)
+4006118^DICUMAROL 50MG TAB
+"DATA",176.112,25678,1)
+309861
+"DATA",176.112,25679,0)
+4002436^DICLOXACILLIN NA 125MG CAP
+"DATA",176.112,25679,1)
+309860
+"DATA",176.112,25680,0)
+4008585^DICLOFENAC POTASSIUM 25MG TAB
+"DATA",176.112,25680,1)
+309859
+"DATA",176.112,25681,0)
+4013381^DICLOFENAC NA 75MG/MISOPROSTOL 200MCG TAB
+"DATA",176.112,25681,1)
+309858
+"DATA",176.112,25682,0)
+4008582^DICLOFENAC NA 75MG TAB,EC
+"DATA",176.112,25682,1)
+309857
+"DATA",176.112,25683,0)
+4008588^DICLOFENAC NA 75MG TAB,EC,UD
+"DATA",176.112,25683,1)
+309857
+"DATA",176.112,25684,0)
+4013380^DICLOFENAC NA 50MG/MISOPROSTOL 200MCG TAB
+"DATA",176.112,25684,1)
+309856
+"DATA",176.112,25685,0)
+4008589^DICLOFENAC NA 25MG TAB,EC,UD
+"DATA",176.112,25685,1)
+309855
+"DATA",176.112,25686,0)
+4008580^DICLOFENAC NA 25MG TAB,EC
+"DATA",176.112,25686,1)
+309855
+"DATA",176.112,25687,0)
+4008583^DICLOFENAC NA 0.1% SOLN,OPH
+"DATA",176.112,25687,1)
+309853
+"DATA",176.112,25688,0)
+4007472^DICHLOROTETRAFLUOROETHANE 75%/ETHYL CHLORIDE 25% AEROSOL,TOP
+"DATA",176.112,25688,1)
+309852
+"DATA",176.112,25689,0)
+4007474^DICHLOROTETRAFLUOROETHANE 100% AEROSOL,TOP
+"DATA",176.112,25689,1)
+309851
+"DATA",176.112,25690,0)
+4007473^DICHLORODIFLUOROMETHANE 15%/TRICHLOROFLOUROMETHANE 85% AEROSOL
+"DATA",176.112,25690,1)
+309850
+"DATA",176.112,25691,0)
+4008696^DIBUCAINE 1% CREAM,TOP
+"DATA",176.112,25691,1)
+309847
+"DATA",176.112,25692,0)
+4007048^DIBUCAINE 0.5%/HYDROCORTISONE 0.5% CREAM,RTL
+"DATA",176.112,25692,1)
+309846
+"DATA",176.112,25693,0)
+4002214^DIAZEPAM 5MG/ML INJ
+"DATA",176.112,25693,1)
+309845
+"DATA",176.112,25694,0)
+4002218^DIAZEPAM 5MG/ML CONC,ORAL
+"DATA",176.112,25694,1)
+309844
+"DATA",176.112,25695,0)
+4002219^DIAZEPAM 5MG/5ML SOLN,ORAL
+"DATA",176.112,25695,1)
+309843
+"DATA",176.112,25696,0)
+4002211^DIAZEPAM 5MG CAP
+"DATA",176.112,25696,1)
+309842
+"DATA",176.112,25697,0)
+4002210^DIAZEPAM 2MG CAP
+"DATA",176.112,25697,1)
+309841
+"DATA",176.112,25698,0)
+4002213^DIAZEPAM 15MG CAP,SA
+"DATA",176.112,25698,1)
+309840
+"DATA",176.112,25699,0)
+4002212^DIAZEPAM 10MG CAP
+"DATA",176.112,25699,1)
+309839
+"DATA",176.112,25700,0)
+4001547^DIATRIZOATE NA 42% LIQUID,ORAL
+"DATA",176.112,25700,1)
+309837
+"DATA",176.112,25701,0)
+4001554^DIATRIZOATE NA 20% INJ
+"DATA",176.112,25701,1)
+309836
+"DATA",176.112,25702,0)
+4001545^DIATRIZOATE NA 20% SOLN
+"DATA",176.112,25702,1)
+309836
+"DATA",176.112,25703,0)
+4001544^DIATRIZOATE MEGLUMINE 66%/DIATRIZOATE NA 10% SOLN,ORAL/RTL
+"DATA",176.112,25703,1)
+309835
+"DATA",176.112,25704,0)
+4001534^DIATRIZOATE MEGLUMINE 66%/DIATRIZOATE NA 10% SOLN,ORAL
+"DATA",176.112,25704,1)
+309835
+"DATA",176.112,25705,0)
+4001551^DIATRIZOATE MEGLUMINE 30%/EDETATE CA DISODIUM 0.05MG/ML INJ
+"DATA",176.112,25705,1)
+309830
+"DATA",176.112,25706,0)
+4001537^DIATRIZOATE MEGLUMINE 28.5%/DIATRIZOATE NA 29.1% INJ
+"DATA",176.112,25706,1)
+309829
+"DATA",176.112,25707,0)
+4005049^DEXTROTHYROXINE NA 6MG TAB
+"DATA",176.112,25707,1)
+309816
+"DATA",176.112,25708,0)
+4005932^DEXTROSE 5%/NACL 0.45% INJ
+"DATA",176.112,25708,1)
+309806
+"DATA",176.112,25709,0)
+4006042^DEXTROSE 5%/KCL 40MEQ/L INJ
+"DATA",176.112,25709,1)
+309786
+"DATA",176.112,25710,0)
+4006041^DEXTROSE 5%/KCL 30MEQ/L INJ
+"DATA",176.112,25710,1)
+309785
+"DATA",176.112,25711,0)
+4006043^DEXTROSE 5%/KCL 27MEQ/L INJ
+"DATA",176.112,25711,1)
+309784
+"DATA",176.112,25712,0)
+4006040^DEXTROSE 5%/KCL 20MEQ/L INJ
+"DATA",176.112,25712,1)
+309783
+"DATA",176.112,25713,0)
+4006044^DEXTROSE 5%/KCL 10MEQ/L INJ
+"DATA",176.112,25713,1)
+309782
+"DATA",176.112,25714,0)
+4014921^DEXTROSE 5% INJ,BAG,150ML
+"DATA",176.112,25714,1)
+309778
+"DATA",176.112,25715,0)
+4014919^DEXTROSE 5% INJ,BAG,50ML
+"DATA",176.112,25715,1)
+309778
+"DATA",176.112,25716,0)
+4014922^DEXTROSE 5% INJ,BAG,250ML
+"DATA",176.112,25716,1)
+309778
+"DATA",176.112,25717,0)
+4014920^DEXTROSE 5% INJ,BAG 100ML
+"DATA",176.112,25717,1)
+309778
+"DATA",176.112,25718,0)
+4014924^DEXTROSE 5% INJ,BAG,1000ML
+"DATA",176.112,25718,1)
+309778
+"DATA",176.112,25719,0)
+4004204^DEXTROSE 5% INJ
+"DATA",176.112,25719,1)
+309778
+"DATA",176.112,25720,0)
+4014923^DEXTROSE 5% INJ,BAG,500ML
+"DATA",176.112,25720,1)
+309778
+"DATA",176.112,25721,0)
+4004218^DEXTROSE 25GM/60GM SQUEEZE TUBE
+"DATA",176.112,25721,1)
+309774
+"DATA",176.112,25722,0)
+4005942^DEXTROSE 2.5%/NACL 0.9% INJ
+"DATA",176.112,25722,1)
+309773
+"DATA",176.112,25723,0)
+4005945^DEXTROSE 2.5%/NACL 0.2% INJ
+"DATA",176.112,25723,1)
+309771
+"DATA",176.112,25724,0)
+4004214^DEXTROSE 11.5% INJ
+"DATA",176.112,25724,1)
+309767
+"DATA",176.112,25725,0)
+4006229^DEXTROSE 10%/NACL 0.2%/KCL 20MEQ/L INJ
+"DATA",176.112,25725,1)
+309762
+"DATA",176.112,25726,0)
+4008432^DEXTROMETHORPHAN HBR 7.5MG LOZENGE
+"DATA",176.112,25726,1)
+309758
+"DATA",176.112,25727,0)
+4008439^DEXTROMETHORPHAN HBR 5MG LOZENGE
+"DATA",176.112,25727,1)
+309757
+"DATA",176.112,25728,0)
+4008440^DEXTROMETHORPHAN HBR 30MG CAP
+"DATA",176.112,25728,1)
+309756
+"DATA",176.112,25729,0)
+4008438^DEXTROMETHORPHAN HBR 2.5MG LOZENGE
+"DATA",176.112,25729,1)
+309755
+"DATA",176.112,25730,0)
+4008433^DEXTROMETHORPHAN HBR 15MG TAB,CHEWABLE
+"DATA",176.112,25730,1)
+309754
+"DATA",176.112,25731,0)
+4005466^DEXTROMETHORPHAN 5MG/GUAIFENESIN 100MG/5ML LIQUID
+"DATA",176.112,25731,1)
+309750
+"DATA",176.112,25732,0)
+4005463^DEXTROMETHORPHAN 30MG/GUAIFENESIN 600MG TAB,SA
+"DATA",176.112,25732,1)
+309749
+"DATA",176.112,25733,0)
+4005456^DEXTROMETHORPHAN 30MG/GUAIFENESIN 200MG CAP
+"DATA",176.112,25733,1)
+309747
+"DATA",176.112,25734,0)
+4008434^DEXTROMETHORPHAN 30MG/5ML LIQUID
+"DATA",176.112,25734,1)
+309746
+"DATA",176.112,25735,0)
+4009714^DEXTROMETHORPHAN 15MG/PSEUDOEPHEDRINE 30MG TAB,CHEWABLE
+"DATA",176.112,25735,1)
+309743
+"DATA",176.112,25736,0)
+4008343^DEXTROMETHORPHAN 15MG/PHENYLEPHRINE 10MG/5ML (SF) SUSP
+"DATA",176.112,25736,1)
+309741
+"DATA",176.112,25737,0)
+4005472^DEXTROMETHORPHAN 15MG/GUAIFENESIN 300MG SPRINKLE CAP,SA
+"DATA",176.112,25737,1)
+309740
+"DATA",176.112,25738,0)
+4005460^DEXTROMETHORPHAN 15MG/GUAIFENESIN 200MG/5ML LIQUID
+"DATA",176.112,25738,1)
+309739
+"DATA",176.112,25739,0)
+4005457^DEXTROMETHORPHAN 15MG/GUAIFENESIN 100MG/5ML SYRUP
+"DATA",176.112,25739,1)
+309737
+"DATA",176.112,25740,0)
+4005458^DEXTROMETHORPHAN 15MG/GUAIFENESIN 100MG/5ML LIQUID
+"DATA",176.112,25740,1)
+309737
+"DATA",176.112,25741,0)
+4005469^DEXTROMETHORPHAN 15MG/GUAIFENESIN 100MG/5ML (SF) LIQUID
+"DATA",176.112,25741,1)
+309737
+"DATA",176.112,25742,0)
+4008632^DEXTROMETHORPHAN 10MG/PHENYLPROPANOLAMINE 12.5MG/5ML LIQUID
+"DATA",176.112,25742,1)
+309734
+"DATA",176.112,25743,0)
+4005462^DEXTROMETHORPHAN 10MG/GUAIFENESIN 67MG/5ML LIQUID
+"DATA",176.112,25743,1)
+309733
+"DATA",176.112,25744,0)
+4014058^DEXTROMETHORPHAN 10MG/GUAIFENESIN 200MG/5ML LIQUID
+"DATA",176.112,25744,1)
+309732
+"DATA",176.112,25745,0)
+4005459^DEXTROMETHORPHAN 10MG/GUAIFENESIN 200MG TAB
+"DATA",176.112,25745,1)
+309731
+"DATA",176.112,25746,0)
+4005464^DEXTROMETHORPHAN 10MG/GUAIFENESIN 150MG/5ML LIQUID
+"DATA",176.112,25746,1)
+309730
+"DATA",176.112,25747,0)
+4005461^DEXTROMETHORPHAN 10MG/GUAIFENESIN 100MG/5ML SYRUP
+"DATA",176.112,25747,1)
+309728
+"DATA",176.112,25748,0)
+4005473^DEXTROMETHORPHAN 10MG/GUAIFENESIN 100MG/5ML (ALC-F) LIQUID
+"DATA",176.112,25748,1)
+309728
+"DATA",176.112,25749,0)
+4005471^DEXTROMETHORPHAN HBR 10MG/GUAIFENESIN 100MG/5ML (SF & AF) SYRUP
+"DATA",176.112,25749,1)
+309728
+"DATA",176.112,25750,0)
+4005468^DEXTROMETHORPHAN 10MG/GUAIFENESIN 100MG/5ML (SF) LIQUID
+"DATA",176.112,25750,1)
+309728
+"DATA",176.112,25751,0)
+4005465^DEXTROMETHORPHAN 10MG/GUAIFENESIN 100MG TAB
+"DATA",176.112,25751,1)
+309727
+"DATA",176.112,25752,0)
+4003108^DEXTROAMPHETAMINE SO4 5MG CAP,SA
+"DATA",176.112,25752,1)
+309725
+"DATA",176.112,25753,0)
+4003116^DEXTROAMPHETAMINE SO4 15MG TAB
+"DATA",176.112,25753,1)
+309724
+"DATA",176.112,25754,0)
+4003110^DEXTROAMPHETAMINE SO4 15MG CAP,SA
+"DATA",176.112,25754,1)
+309723
+"DATA",176.112,25755,0)
+4003112^DEXTROAMPHETAMINE SO4 15MG CAP
+"DATA",176.112,25755,1)
+309722
+"DATA",176.112,25756,0)
+4003109^DEXTROAMPHETAMINE SO4 10MG CAP,SA
+"DATA",176.112,25756,1)
+309721
+"DATA",176.112,25757,0)
+4003115^DEXTROAMPHETAMINE ADIPATE 5MG/DEXTROAMPHETAMINE SO4 5MG CAP
+"DATA",176.112,25757,1)
+309719
+"DATA",176.112,25758,0)
+4003891^DEXTRAN-70,6%/NACL 0.9% INJ
+"DATA",176.112,25758,1)
+309716
+"DATA",176.112,25759,0)
+4003892^DEXTRAN-70,6%/DEXTROSE 5% INJ
+"DATA",176.112,25759,1)
+309716
+"DATA",176.112,25760,0)
+4003893^DEXTRAN-70,32%/DEXTROSE 10% INJ
+"DATA",176.112,25760,1)
+309715
+"DATA",176.112,25761,0)
+4008679^DEXTRAN-70,0.1%/HYDROXYPROPYL METHYLCELLULOSE 0.3% SOLN,OPH
+"DATA",176.112,25761,1)
+309714
+"DATA",176.112,25762,0)
+4010402^DEXTRAN-70,0.1%/HYDROXYPROPYL METHYLCELLULOS 0.3% SLN,OPH,0.45ML
+"DATA",176.112,25762,1)
+309714
+"DATA",176.112,25763,0)
+4010401^DEXTRAN-70,0.1%/HYDROXYPROPYL METHYLCELLULOSE 0.3% SLN,OPH,0.6ML
+"DATA",176.112,25763,1)
+309714
+"DATA",176.112,25764,0)
+4012783^DEXRAZOXANE HCL 250MG/VIL INJ
+"DATA",176.112,25764,1)
+309711
+"DATA",176.112,25765,0)
+4012784^DEXRAZOXANE HCL 500MG/VIL INJ
+"DATA",176.112,25765,1)
+309711
+"DATA",176.112,25766,0)
+4014741^DEXMEDETOMIDINE HCL 100MCG/ML INJ
+"DATA",176.112,25766,1)
+309710
+"DATA",176.112,25767,0)
+4006558^DEXCHLORPHENIRAMINE MALEATE 6MG TAB,SA
+"DATA",176.112,25767,1)
+309709
+"DATA",176.112,25768,0)
+4006560^DEXCHLORPHENIRAMINE MALEATE 2MG TAB
+"DATA",176.112,25768,1)
+309706
+"DATA",176.112,25769,0)
+4008291^DEXBROMPHENIRAMINE MALEATE 6MG TAB,SA
+"DATA",176.112,25769,1)
+309704
+"DATA",176.112,25770,0)
+4006793^DEXBROMPHENIRAMINE 6MG/PSEUDOEPHEDRINE 120MG TAB,SA
+"DATA",176.112,25770,1)
+309703
+"DATA",176.112,25771,0)
+4006794^DEXBROMPHENIRAMINE 2MG/PSEUDOEPHEDRINE 60MG TAB
+"DATA",176.112,25771,1)
+309702
+"DATA",176.112,25772,0)
+4002821^DEXAMETHASONE NA PHOSPHATE 84MCG/SPRAY INHL,NASAL
+"DATA",176.112,25772,1)
+309700
+"DATA",176.112,25773,0)
+4002818^DEXAMETHASONE NA PHOSPHATE 84MCG/ACTUATION INHL,ORAL
+"DATA",176.112,25773,1)
+309699
+"DATA",176.112,25774,0)
+4002819^DEXAMETHASONE NA PHOSPHATE 4MG/ML INJ,SOLN
+"DATA",176.112,25774,1)
+309698
+"DATA",176.112,25775,0)
+4003053^DEXAMETHASONE NA PHOSPHATE 4MG/LIDOCAINE HCL 10MG/ML INJ
+"DATA",176.112,25775,1)
+309697
+"DATA",176.112,25776,0)
+4002827^DEXAMETHASONE NA PHOSPHATE 10MG/ML INJ,SOLN
+"DATA",176.112,25776,1)
+309696
+"DATA",176.112,25777,0)
+4003051^DEXAMETHASONE NA PHOSPHATE 0.1%/NEOMYCIN SO4 0.35% SOLN,OPH
+"DATA",176.112,25777,1)
+309695
+"DATA",176.112,25778,0)
+4003049^DEXAMETHASONE NA PHOSPHATE 0.1%/NEOMYCIN SO4 0.35% CREAM,TOP
+"DATA",176.112,25778,1)
+309694
+"DATA",176.112,25779,0)
+4002836^DEXAMETHASONE NA PHOSPHATE 0.1% SOLN,OTIC
+"DATA",176.112,25779,1)
+309693
+"DATA",176.112,25780,0)
+4002834^DEXAMETHASONE 0.1% SUSP,OPH
+"DATA",176.112,25780,1)
+309692
+"DATA",176.112,25781,0)
+4002815^DEXAMETHASONE NA PHOSPHATE 0.1% CREAM,TOP
+"DATA",176.112,25781,1)
+309691
+"DATA",176.112,25782,0)
+4002814^DEXAMETHASONE NA PHOSPHATE 0.05% OINT,OPH
+"DATA",176.112,25782,1)
+309690
+"DATA",176.112,25783,0)
+4002833^DEXAMETHASONE ACETATE 8MG/ML INJ,SUSP
+"DATA",176.112,25783,1)
+309688
+"DATA",176.112,25784,0)
+4002823^DEXAMETHASONE ACETATE 8MG/ML INJ,SUSP,SA
+"DATA",176.112,25784,1)
+309688
+"DATA",176.112,25785,0)
+4002835^DEXAMETHASONE ACETATE 16MG/ML INJ,SUSP
+"DATA",176.112,25785,1)
+309687
+"DATA",176.112,25786,0)
+4002816^DEXAMETHASONE 0.5MG/5ML ELIXIR
+"DATA",176.112,25786,1)
+309686
+"DATA",176.112,25787,0)
+4002832^DEXAMETHASONE 0.5MG/5ML SOLN,ORAL
+"DATA",176.112,25787,1)
+309686
+"DATA",176.112,25788,0)
+4002829^DEXAMETHASONE 0.5MG/0.5ML SOLN,ORAL
+"DATA",176.112,25788,1)
+309684
+"DATA",176.112,25789,0)
+4024642^DEXAMETHASONE 1MG/1ML SOLN,ORAL
+"DATA",176.112,25789,1)
+309684
+"DATA",176.112,25790,0)
+4009096^DEXAMETHASONE 0.1%/TOBRAMYCIN 0.3% SUSP,OPH
+"DATA",176.112,25790,1)
+309683
+"DATA",176.112,25791,0)
+4009097^DEXAMETHASONE 0.1%/TOBRAMYCIN 0.3% OINT,OPH
+"DATA",176.112,25791,1)
+309682
+"DATA",176.112,25792,0)
+4005544^DEXAMETHASONE 0.1%/N-MYCIN 5MG/POLYMYX 10000UNT/ML SUSP,OPH
+"DATA",176.112,25792,1)
+309681
+"DATA",176.112,25793,0)
+4005542^DEXAMETHASONE 0.1%/N-MYCIN 3.5MG/POLYMYX 10000UNT/ML SUSP,OPH
+"DATA",176.112,25793,1)
+309680
+"DATA",176.112,25794,0)
+4005543^DEXAMETHASONE 0.1%/N-MYCIN 3.5MG/POLYMYX 10000UNT/GM OINT,OPH
+"DATA",176.112,25794,1)
+309679
+"DATA",176.112,25795,0)
+4002820^DEXAMETHASONE 0.1% GEL,TOP
+"DATA",176.112,25795,1)
+309678
+"DATA",176.112,25796,0)
+4002825^DEXAMETHASONE 0.012% AEROSOL,TOP
+"DATA",176.112,25796,1)
+309677
+"DATA",176.112,25797,0)
+4005105^DESOXYCORTICOSTERONE PIVALATE 25MG/ML INJ,SUSP
+"DATA",176.112,25797,1)
+309675
+"DATA",176.112,25798,0)
+4004899^DESOXIMETASONE 0.5% CREAM,TOP
+"DATA",176.112,25798,1)
+309674
+"DATA",176.112,25799,0)
+4005630^DESIPRAMINE HCL 50MG CAP
+"DATA",176.112,25799,1)
+309672
+"DATA",176.112,25800,0)
+4005629^DESIPRAMINE HCL 25MG CAP
+"DATA",176.112,25800,1)
+309671
+"DATA",176.112,25801,0)
+4013672^DENILEUKIN DIFTITOX 150MCG/ML INJ,VIL,2ML
+"DATA",176.112,25801,1)
+309669
+"DATA",176.112,25802,0)
+4002806^DEMECLOCYCLINE HCL 150MG TAB
+"DATA",176.112,25802,1)
+309668
+"DATA",176.112,25803,0)
+4002979^DEMECARIUM BR 0.25% SOLN,OPH
+"DATA",176.112,25803,1)
+309667
+"DATA",176.112,25804,0)
+4002978^DEMECARIUM BR 0.125% SOLN,OPH
+"DATA",176.112,25804,1)
+309666
+"DATA",176.112,25805,0)
+4014401^DELAVIRDINE MESYLATE 200MG TAB
+"DATA",176.112,25805,1)
+309662
+"DATA",176.112,25806,0)
+4012992^DELAVIRDINE MESYLATE 100MG TAB
+"DATA",176.112,25806,1)
+309661
+"DATA",176.112,25807,0)
+4025794^DAUNORUBICIN HCL 5MG/ML INJ
+"DATA",176.112,25807,1)
+309650
+"DATA",176.112,25808,0)
+4003398^DAUNORUBICIN HCL 20MG/VIL INJ
+"DATA",176.112,25808,1)
+309650
+"DATA",176.112,25809,0)
+4010137^DAPIPRAZOLE HCL 0.5% SOLN,OPH
+"DATA",176.112,25809,1)
+309649
+"DATA",176.112,25810,0)
+4006957^DANTROLENE NA 50MG CAP
+"DATA",176.112,25810,1)
+309648
+"DATA",176.112,25811,0)
+4006956^DANTROLENE NA 25MG CAP
+"DATA",176.112,25811,1)
+309647
+"DATA",176.112,25812,0)
+4009998^DANTHRON 50MG/DOCUSATE NA 100MG CAP
+"DATA",176.112,25812,1)
+309645
+"DATA",176.112,25813,0)
+4013069^DANAPAROID NA 750 UNT/0.6ML INJ,SYRINGE
+"DATA",176.112,25813,1)
+309644
+"DATA",176.112,25814,0)
+4013068^DANAPAROID NA 750 UNT/0.6ML INJ,AMP
+"DATA",176.112,25814,1)
+309644
+"DATA",176.112,25815,0)
+4004570^DACARBAZINE 100MG/VIL INJ
+"DATA",176.112,25815,1)
+309638
+"DATA",176.112,25816,0)
+4004571^DACARBAZINE 200MG/VIL INJ
+"DATA",176.112,25816,1)
+309638
+"DATA",176.112,25817,0)
+4012742^CYSTEAMINE BITARTRATE 50MG CAP
+"DATA",176.112,25817,1)
+309637
+"DATA",176.112,25818,0)
+4012743^CYSTEAMINE BITARTRATE 150MG CAP
+"DATA",176.112,25818,1)
+309636
+"DATA",176.112,25819,0)
+4013921^CYPROHEPTADINE HCL 4MG TAB,UD
+"DATA",176.112,25819,1)
+309635
+"DATA",176.112,25820,0)
+4002857^CYPROHEPTADINE HCL 4MG TAB
+"DATA",176.112,25820,1)
+309635
+"DATA",176.112,25821,0)
+4001190^CYCLOTHIAZIDE 2MG TAB
+"DATA",176.112,25821,1)
+309633
+"DATA",176.112,25822,0)
+4006454^CYCLOSPORINE MICROEMULSION 100MG/ML SOLN
+"DATA",176.112,25822,1)
+309632
+"DATA",176.112,25823,0)
+4024811^CYCLOSPORINE NON-MODIFIED 100MG/ML SOLN,ORAL
+"DATA",176.112,25823,1)
+309632
+"DATA",176.112,25824,0)
+4006448^CYCLOSPORINE 100MG/ML SOLN,ORAL
+"DATA",176.112,25824,1)
+309632
+"DATA",176.112,25825,0)
+4024807^CYCLOSPORINE MODIFIED 100MG/ML SOLN,ORAL
+"DATA",176.112,25825,1)
+309632
+"DATA",176.112,25826,0)
+4003759^CYCLOPHOSPHAMIDE 500MG/MANNITOL 375MG/VIL INJ
+"DATA",176.112,25826,1)
+309626
+"DATA",176.112,25827,0)
+4003760^CYCLOPHOSPHAMIDE 2GM/MANNITOL 1.5GM/VIL INJ
+"DATA",176.112,25827,1)
+309626
+"DATA",176.112,25828,0)
+4003599^CYCLOPHOSPHAMIDE 2GM/VIL INJ
+"DATA",176.112,25828,1)
+309626
+"DATA",176.112,25829,0)
+4003595^CYCLOPHOSPHAMIDE 500MG/VIL INJ
+"DATA",176.112,25829,1)
+309626
+"DATA",176.112,25830,0)
+4003762^CYCLOPHOSPHAMIDE 200MG/MANNITOL 150MG/VIL INJ
+"DATA",176.112,25830,1)
+309623
+"DATA",176.112,25831,0)
+4003763^CYCLOPHOSPHAMIDE 1GM/MANNITOL 750MG/VIL INJ
+"DATA",176.112,25831,1)
+309623
+"DATA",176.112,25832,0)
+4003761^CYCLOPHOSPHAMIDE 100MG/MANNITOL 75MG/VIL INJ
+"DATA",176.112,25832,1)
+309623
+"DATA",176.112,25833,0)
+4005536^CYCLOPENTOLATE HCL 2% SOLN,OPH
+"DATA",176.112,25833,1)
+309622
+"DATA",176.112,25834,0)
+4005533^CYCLOPENTOLATE HCL 1%/PHENYLEPHRINE HCL 10% SOLN,OPH
+"DATA",176.112,25834,1)
+309621
+"DATA",176.112,25835,0)
+4005535^CYCLOPENTOLATE HCL 1% SOLN,OPH
+"DATA",176.112,25835,1)
+309620
+"DATA",176.112,25836,0)
+4005532^CYCLOPENTOLATE HCL 0.2%/PHENYLEPHRINE HCL 1% SOLN,OPH
+"DATA",176.112,25836,1)
+309619
+"DATA",176.112,25837,0)
+4006499^CYCLIZINE LACTATE 50MG/ML INJ
+"DATA",176.112,25837,1)
+309618
+"DATA",176.112,25838,0)
+4003391^CYCLANDELATE 200MG CAP,SA
+"DATA",176.112,25838,1)
+309617
+"DATA",176.112,25839,0)
+4003392^CYCLANDELATE 100MG TAB,SA
+"DATA",176.112,25839,1)
+309616
+"DATA",176.112,25840,0)
+4003361^CYCLACILLIN 500MG TAB
+"DATA",176.112,25840,1)
+309615
+"DATA",176.112,25841,0)
+4003359^CYCLACILLIN 250MG/5ML SUSP
+"DATA",176.112,25841,1)
+309614
+"DATA",176.112,25842,0)
+4003360^CYCLACILLIN 250MG TAB
+"DATA",176.112,25842,1)
+309613
+"DATA",176.112,25843,0)
+4003358^CYCLACILLIN 125MG/5ML SUSP
+"DATA",176.112,25843,1)
+309612
+"DATA",176.112,25844,0)
+4000848^CYANOCOBALAMIN 500MCG/0.1ML ACTUAT GEL,NASAL,5ML
+"DATA",176.112,25844,1)
+309611
+"DATA",176.112,25845,0)
+4000849^CYANOCOBALAMIN 40MCG/THIAMINE HCL 5MG/ML INJ
+"DATA",176.112,25845,1)
+309610
+"DATA",176.112,25846,0)
+4000841^CYANOCOBALAMIN 30MCG/ML INJ
+"DATA",176.112,25846,1)
+309609
+"DATA",176.112,25847,0)
+4000838^CYANOCOBALAMIN 2MCG/ML INJ
+"DATA",176.112,25847,1)
+309608
+"DATA",176.112,25848,0)
+4005130^CYANOCOBALAMIN 25MCG/INTRINSIC FACTOR 0.5UNT TAB
+"DATA",176.112,25848,1)
+309607
+"DATA",176.112,25849,0)
+4014567^IRON (POLYSACCHARIDE COMPLEX) 150MG/FA 1MG/B12 25MCG CAP
+"DATA",176.112,25849,1)
+309606
+"DATA",176.112,25850,0)
+4006942^CYANOCOBALAMIN 25MCG/FOLIC ACID 1MG/IRON 150MG CAP
+"DATA",176.112,25850,1)
+309606
+"DATA",176.112,25851,0)
+4000845^CYANOCOBALAMIN 25MCG TAB
+"DATA",176.112,25851,1)
+309605
+"DATA",176.112,25852,0)
+4000844^CYANOCOBALAMIN 250MCG TAB
+"DATA",176.112,25852,1)
+309604
+"DATA",176.112,25853,0)
+4000850^CYANOCOBALAMIN 20MCG/THIAMINE HCL 5MG/ML INJ
+"DATA",176.112,25853,1)
+309603
+"DATA",176.112,25854,0)
+4000839^CYANOCOBALAMIN 20MCG/ML INJ
+"DATA",176.112,25854,1)
+309602
+"DATA",176.112,25855,0)
+4000852^CYANOCOBALAMIN 12.5MCG/THIAMINE 5.5MG/5ML LIQUID
+"DATA",176.112,25855,1)
+309601
+"DATA",176.112,25856,0)
+4000840^CYANOCOBALAMIN 10MCG/ML INJ
+"DATA",176.112,25856,1)
+309600
+"DATA",176.112,25857,0)
+4000837^CYANOCOBALAMIN 100MCG/ML INJ
+"DATA",176.112,25857,1)
+309599
+"DATA",176.112,25858,0)
+4009447^CYANOCOBALAMIN 100MCG/FA 5MG/LIVER 10MCG/ML INJ
+"DATA",176.112,25858,1)
+309598
+"DATA",176.112,25859,0)
+4009446^CYANOCOBALAMIN 100MCG/FA 1MG/LIVER 10MCG/ML INJ
+"DATA",176.112,25859,1)
+309597
+"DATA",176.112,25860,0)
+4009445^CYANOCOBALAMIN 100MCG/FA 0.4MG/LIVER 10MCG/ML INJ
+"DATA",176.112,25860,1)
+309596
+"DATA",176.112,25861,0)
+4000843^CYANOCOBALAMIN 100MCG TAB
+"DATA",176.112,25861,1)
+309595
+"DATA",176.112,25862,0)
+4000836^CYANOCOBALAMIN 1000MCG/ML INJ
+"DATA",176.112,25862,1)
+309594
+"DATA",176.112,25863,0)
+4000847^CYANOCOBALAMIN 1000MCG TAB
+"DATA",176.112,25863,1)
+309593
+"DATA",176.112,25864,0)
+4005116^CUPRIC CL 0.4MG/ML INJ
+"DATA",176.112,25864,1)
+309588
+"DATA",176.112,25865,0)
+4007371^CUPRIC SO4 0.4MG/ML INJ
+"DATA",176.112,25865,1)
+309588
+"DATA",176.112,25866,0)
+4004838^CTM 8MG/P-EPHRINE 25MG/PYRILAMINE 25MG TAB,SA
+"DATA",176.112,25866,1)
+309587
+"DATA",176.112,25867,0)
+4004836^CTM 8MG/P-EPHRINE 25MG/PYRILAMINE 25MG TAB
+"DATA",176.112,25867,1)
+309586
+"DATA",176.112,25868,0)
+4013083^CTM 8MG/METHSCOPOLAMINE 2.5MG/PSEUDEFED 120MG TAB,SA
+"DATA",176.112,25868,1)
+309585
+"DATA",176.112,25869,0)
+4006341^CTM 8MG/METHSCOPOLAMINE 2.5MG/P-EPHRINE 20MG TAB,SA
+"DATA",176.112,25869,1)
+309584
+"DATA",176.112,25870,0)
+4006335^CTM 8MG/METHSCOPOLAMINE 2.5MG/P-EPHRINE 20MG CAP,SA
+"DATA",176.112,25870,1)
+309583
+"DATA",176.112,25871,0)
+4007978^CTM 8MG/GG 200MG/PSEUDEFED 120MG TAB,SA
+"DATA",176.112,25871,1)
+309582
+"DATA",176.112,25872,0)
+4007980^CTM 8MG/GG 200MG/PSEUDEFED 120MG CAP,SA
+"DATA",176.112,25872,1)
+309581
+"DATA",176.112,25873,0)
+4007310^CTM 8MG/DM 5MG/P-EPHRINE 25MG TAB,SA
+"DATA",176.112,25873,1)
+309580
+"DATA",176.112,25874,0)
+4007580^CTM 4MG/P-PROPANOL 50MG/PYRILAMINE 25MG CAP,SA
+"DATA",176.112,25874,1)
+309579
+"DATA",176.112,25875,0)
+4007736^CTM 4MG/P-EPHRINE 20MG/P-TOLOXAMINE 50MG CAP,SA
+"DATA",176.112,25875,1)
+309578
+"DATA",176.112,25876,0)
+4006340^CTM 4MG/METHSCOPOLAMINE 1.25MG/P-EPHRINE 10MG TAB
+"DATA",176.112,25876,1)
+309576
+"DATA",176.112,25877,0)
+4006338^CTM 4MG/METHSCOPOLAMINE 1.25MG/P-EPHRINE 10MG CAP,SA
+"DATA",176.112,25877,1)
+309575
+"DATA",176.112,25878,0)
+4006920^CTM 4MG/GG 100MG/P-EPHRINE 5MG TAB
+"DATA",176.112,25878,1)
+309574
+"DATA",176.112,25879,0)
+4007313^CTM 4MG/DM 15MG/P-EPHRINE 10MG/5ML LIQUID
+"DATA",176.112,25879,1)
+309573
+"DATA",176.112,25880,0)
+4004839^CTM 2MG/P-EPHRINE 5MG/PYRILAMINE 12.5MG TAB
+"DATA",176.112,25880,1)
+309569
+"DATA",176.112,25881,0)
+4006337^CTM 2MG/METHSCOPOLAMINE 1.25MG/P-EPHRINE 10MG TAB,CHEWABLE
+"DATA",176.112,25881,1)
+309567
+"DATA",176.112,25882,0)
+4007793^CTM 2MG/EPHEDRINE 15MG/GG 100MG/PB 7.5MG/THEOPHYLLINE 120MG TAB
+"DATA",176.112,25882,1)
+309565
+"DATA",176.112,25883,0)
+4006917^CTM 2MG/DM 5MG/GG 75MG/P-EPHRINE 5MG LIQUID
+"DATA",176.112,25883,1)
+309564
+"DATA",176.112,25884,0)
+4005393^CTM 2MG/DM 10MG/PSEUDEFED 30MG/5ML LIQUID
+"DATA",176.112,25884,1)
+309563
+"DATA",176.112,25885,0)
+4006919^CTM 1MG/GG 20MG/P-EPHRINE 2MG/ML DROPS,ORAL
+"DATA",176.112,25885,1)
+309561
+"DATA",176.112,25886,0)
+4005390^CTM 1MG/DM 7.5MG/PSEUDEFED 15MG/5ML LIQUID
+"DATA",176.112,25886,1)
+309560
+"DATA",176.112,25887,0)
+4009992^CTM 1MG/DM 10MG/GG 25MG/P-EPHRINE 5MG/NA CITRATE 15MG/5ML LIQUID
+"DATA",176.112,25887,1)
+309559
+"DATA",176.112,25888,0)
+4007977^CTM 12MG/GG 150MG/PSEUDEFED 120MG CAP,SA
+"DATA",176.112,25888,1)
+309558
+"DATA",176.112,25889,0)
+4010349^CTM 0.06%/HC 0.5%/PHENIRAMINE 0.2%/PYRILAMINE 0.2% LOTION
+"DATA",176.112,25889,1)
+309557
+"DATA",176.112,25890,0)
+4012127^CTM 0.06%/HC 0.5%/ALCOHOL 35%/PYRILAMINE 0.44% LOTION
+"DATA",176.112,25890,1)
+309556
+"DATA",176.112,25891,0)
+4004843^CRYPTENAMINE TANNATES 2MG TAB
+"DATA",176.112,25891,1)
+309555
+"DATA",176.112,25892,0)
+4004842^CRYPTENAMINE ACETATES 260UNT/ML INJ
+"DATA",176.112,25892,1)
+309554
+"DATA",176.112,25893,0)
+4007789^CRYPTENAMINE 2MG/METHYCLOTHIAZIDE 2.5MG TAB
+"DATA",176.112,25893,1)
+309553
+"DATA",176.112,25894,0)
+4005829^CROTAMITON 10% CREAM,TOP
+"DATA",176.112,25894,1)
+309552
+"DATA",176.112,25895,0)
+4007072^CROMOLYN NA 4% SOLN,OPH
+"DATA",176.112,25895,1)
+309549
+"DATA",176.112,25896,0)
+4007070^CROMOLYN NA 20MG CAP,INHL
+"DATA",176.112,25896,1)
+309548
+"DATA",176.112,25897,0)
+4007078^CROMOLYN NA 100MG/5ML CONC,ORAL
+"DATA",176.112,25897,1)
+309547
+"DATA",176.112,25898,0)
+4007075^CROMOLYN NA 100MG CAP,ORAL
+"DATA",176.112,25898,1)
+309546
+"DATA",176.112,25899,0)
+4007918^CRESOL 35%/FORMALDEHYDE 1% LIQUID
+"DATA",176.112,25899,1)
+309544
+"DATA",176.112,25900,0)
+4002869^CORTISONE 25MG/ML INJ,SOLN
+"DATA",176.112,25900,1)
+309543
+"DATA",176.112,25901,0)
+4002865^CORTISONE ACETATE 25MG/ML INJ,SUSP
+"DATA",176.112,25901,1)
+309543
+"DATA",176.112,25902,0)
+4002870^CORTISONE 50MG/ML INJ,SOLN
+"DATA",176.112,25902,1)
+309542
+"DATA",176.112,25903,0)
+4005126^CORTICOTROPIN 80UNT/ML INJ,GEL
+"DATA",176.112,25903,1)
+309541
+"DATA",176.112,25904,0)
+4005108^CORTICOTROPIN 40UNT/ZN HYDROXIDE 2MG/ML INJ,SUSP
+"DATA",176.112,25904,1)
+309540
+"DATA",176.112,25905,0)
+4005125^CORTICOTROPIN 40UNT/ML INJ,GEL
+"DATA",176.112,25905,1)
+309538
+"DATA",176.112,25906,0)
+4005124^CORTICOTROPIN 40UNT/VIL INJ
+"DATA",176.112,25906,1)
+309538
+"DATA",176.112,25907,0)
+4009850^CORN STARCH/METHYLBENZETHONIUM CL 0.055% PWDR,TOP
+"DATA",176.112,25907,1)
+309536
+"DATA",176.112,25908,0)
+4001108^CONTACT LENS SALINE 0.9% SOLN
+"DATA",176.112,25908,1)
+309525
+"DATA",176.112,25909,0)
+4001113^CONTACT LENS SALINE 0.9% PF STERILE SOLN
+"DATA",176.112,25909,1)
+309525
+"DATA",176.112,25910,0)
+4004973^COLLAGENASE 250UNT/GM OINT,TOP
+"DATA",176.112,25910,1)
+309509
+"DATA",176.112,25911,0)
+4009179^COLLAGEN HEMOSTAT,ABSORBABLE 1GM POWDER,TOP
+"DATA",176.112,25911,1)
+309505
+"DATA",176.112,25912,0)
+4015391^COLLAGEN HEMOSTAT,ABSORBABLE 0.5GM POWDER,TOP
+"DATA",176.112,25912,1)
+309504
+"DATA",176.112,25913,0)
+4005786^COLISTIN SO4 25MG/5ML SUSP,ORAL
+"DATA",176.112,25913,1)
+309502
+"DATA",176.112,25914,0)
+4013229^COLISTIN 3MG/HC 1%/N-MYCIN 3.3MG/THONZONIUM 0.5MG/ML SUSP,OTIC
+"DATA",176.112,25914,1)
+309501
+"DATA",176.112,25915,0)
+4005810^COLISTIN 3MG/HC 1%/N-MYCIN 3.3MG/ML SUSP,OTIC
+"DATA",176.112,25915,1)
+309500
+"DATA",176.112,25916,0)
+4005818^COLISTIMETHATE NA 150MG/VIL INJ
+"DATA",176.112,25916,1)
+309499
+"DATA",176.112,25917,0)
+4003489^COLESTIPOL HCL 1GM TAB
+"DATA",176.112,25917,1)
+309496
+"DATA",176.112,25918,0)
+4014958^COLESEVELAM HCL 625MG TAB
+"DATA",176.112,25918,1)
+309494
+"DATA",176.112,25919,0)
+4000672^COLCHICINE 0.65MG TAB
+"DATA",176.112,25919,1)
+309491
+"DATA",176.112,25920,0)
+4000673^COLCHICINE 0.54MG TAB
+"DATA",176.112,25920,1)
+309490
+"DATA",176.112,25921,0)
+4000659^CODEINE PO4 60MG TAB,SOLUBLE
+"DATA",176.112,25921,1)
+309489
+"DATA",176.112,25922,0)
+4000656^CODEINE SO4 60MG TAB,SOLUBLE
+"DATA",176.112,25922,1)
+309489
+"DATA",176.112,25923,0)
+4000657^CODEINE PO4 15MG TAB,SOLUBLE
+"DATA",176.112,25923,1)
+309487
+"DATA",176.112,25924,0)
+4000654^CODEINE SO4 15MG TAB,SOLUBLE
+"DATA",176.112,25924,1)
+309487
+"DATA",176.112,25925,0)
+4009045^CODEINE POLISTIREX 10MG/CHLORPHENIRAMINE 4MG/5ML SUSP,SA
+"DATA",176.112,25925,1)
+309486
+"DATA",176.112,25926,0)
+4000664^CODEINE PO4 30MG/ML (PF) INJ
+"DATA",176.112,25926,1)
+309483
+"DATA",176.112,25927,0)
+4000653^CODEINE PO4 30MG/ML INJ
+"DATA",176.112,25927,1)
+309483
+"DATA",176.112,25928,0)
+4000661^CODEINE PO4 15MG/ML INJ
+"DATA",176.112,25928,1)
+309482
+"DATA",176.112,25929,0)
+4000662^CODEINE PO4 15MG/5ML SOLN,ORAL
+"DATA",176.112,25929,1)
+309481
+"DATA",176.112,25930,0)
+4006442^CODEINE 7.5MG/ASA 325MG/BUTALBITAL 50MG/CAFN 40MG CAP
+"DATA",176.112,25930,1)
+309477
+"DATA",176.112,25931,0)
+4002431^CODEINE 7.5MG/ACETAMINOPHEN 300MG TAB
+"DATA",176.112,25931,1)
+309476
+"DATA",176.112,25932,0)
+4002429^CODEINE 60MG/ACETAMINOPHEN 300MG CAP
+"DATA",176.112,25932,1)
+309475
+"DATA",176.112,25933,0)
+4001290^CODEINE 30MG/ASA 380MG/CAFN 30MG CAP
+"DATA",176.112,25933,1)
+309473
+"DATA",176.112,25934,0)
+4006444^CODEINE 30MG/ASA 325MG/BUTALBITAL 50MG/CAFN 40MG TAB
+"DATA",176.112,25934,1)
+309472
+"DATA",176.112,25935,0)
+4006443^CODEINE 30MG/ASA 325MG/BUTALBITAL 50MG/CAFN 40MG CAP
+"DATA",176.112,25935,1)
+309471
+"DATA",176.112,25936,0)
+4006621^CODEINE 30MG/APAP 500MG/BUTALBITAL 50MG CAP
+"DATA",176.112,25936,1)
+309470
+"DATA",176.112,25937,0)
+4007689^CODEINE 30MG/APAP 325MG/BUTALBITAL 50MG/CAFN 40MG TAB
+"DATA",176.112,25937,1)
+309469
+"DATA",176.112,25938,0)
+4007690^CODEINE 30MG/APAP 325MG/BUTALBITAL 50MG/CAFN 40MG CAP
+"DATA",176.112,25938,1)
+309468
+"DATA",176.112,25939,0)
+4006620^CODEINE 30MG/APAP 325MG/BUTALBITAL 50MG CAP
+"DATA",176.112,25939,1)
+309467
+"DATA",176.112,25940,0)
+4007617^CODEINE 30MG/APAP 150MG/CAFN 30MG/SALICYLAMIDE 230MG TAB
+"DATA",176.112,25940,1)
+309466
+"DATA",176.112,25941,0)
+4007630^CODEINE 30MG/APAP 150MG/ASA 180MG CAP
+"DATA",176.112,25941,1)
+309465
+"DATA",176.112,25942,0)
+4005603^CODEINE 30MG/AL OH 75MG/ASA 325MG/MG OH 75MG TAB
+"DATA",176.112,25942,1)
+309464
+"DATA",176.112,25943,0)
+4002427^CODEINE 30MG/ACETAMINOPHEN 650MG TAB
+"DATA",176.112,25943,1)
+309463
+"DATA",176.112,25944,0)
+4002424^CODEINE 30MG/ACETAMINOPHEN 300MG TAB
+"DATA",176.112,25944,1)
+309462
+"DATA",176.112,25945,0)
+4014275^CODEINE 30MG/ACETAMINOPHEN 300MG TAB,UD
+"DATA",176.112,25945,1)
+309462
+"DATA",176.112,25946,0)
+4002428^CODEINE 30MG/ACETAMINOPHEN 300MG CAP
+"DATA",176.112,25946,1)
+309461
+"DATA",176.112,25947,0)
+4004660^CODEINE 20MG/PSEUDOEPHEDRINE 60MG CAP
+"DATA",176.112,25947,1)
+309459
+"DATA",176.112,25948,0)
+4004722^CODEINE 2.5MG/GUAIFENESIN 75MG/5ML LIQUID
+"DATA",176.112,25948,1)
+309457
+"DATA",176.112,25949,0)
+4001292^CODEINE 16MG/ASA 389MG/CAFN 32MG TAB
+"DATA",176.112,25949,1)
+309454
+"DATA",176.112,25950,0)
+4004852^CODEINE 16MG/ASA 325MG/CARISOPRODOL 200MG TAB
+"DATA",176.112,25950,1)
+309453
+"DATA",176.112,25951,0)
+4004759^CODEINE 16MG/APAP 325MG/CTM 2MG/P-EPHRINE 10MG CAP
+"DATA",176.112,25951,1)
+309452
+"DATA",176.112,25952,0)
+4009964^CODEINE 15MG/PAPAVERINE HCL 15MG CAP
+"DATA",176.112,25952,1)
+309451
+"DATA",176.112,25953,0)
+4006446^CODEINE 15MG/ASA 325MG/BUTALBITAL 50MG/CAFN 40MG CAP
+"DATA",176.112,25953,1)
+309450
+"DATA",176.112,25954,0)
+4006624^CODEINE 15MG/APAP 500MG/BUTALBITAL 50MG CAP
+"DATA",176.112,25954,1)
+309449
+"DATA",176.112,25955,0)
+4006622^CODEINE 15MG/APAP 325MG/BUTALBITAL 50MG CAP
+"DATA",176.112,25955,1)
+309448
+"DATA",176.112,25956,0)
+4007616^CODEINE 15MG/APAP 150MG/CAFN 30MG/SALICYLAMIDE 230MG TAB
+"DATA",176.112,25956,1)
+309447
+"DATA",176.112,25957,0)
+4002426^CODEINE 15MG/ACETAMINOPHEN 300MG CAP
+"DATA",176.112,25957,1)
+309445
+"DATA",176.112,25958,0)
+4007195^CODEINE 12MG/APAP 325MG/GG 100MG/P-PROPANOL 25MG TAB
+"DATA",176.112,25958,1)
+309444
+"DATA",176.112,25959,0)
+4002455^CODEINE 10MG/PROMETHAZINE 6.25MG/5ML SOLN
+"DATA",176.112,25959,1)
+309438
+"DATA",176.112,25960,0)
+4002454^CODEINE 10MG/PROMETHAZINE 6.25MG/5ML SYRUP
+"DATA",176.112,25960,1)
+309438
+"DATA",176.112,25961,0)
+4002452^CODEINE 10MG/P-EPHRINE 5MG/PROMETH 6.25MG/5ML LIQUID
+"DATA",176.112,25961,1)
+309434
+"DATA",176.112,25962,0)
+4002451^CODEINE 10MG/P-EPHRINE 5MG/PROMETH 6.25MG/5ML SYRUP
+"DATA",176.112,25962,1)
+309434
+"DATA",176.112,25963,0)
+4007727^CODEINE 10MG/P-EPHRINE 5MG/K GUAIACOLSULF 44MG/PROMETH 5MG/5ML
+"DATA",176.112,25963,1)
+309432
+"DATA",176.112,25964,0)
+4007723^CODEINE 10MG/MENTHOL 1MG/PHENIRAMINE 12.5MG/P-EPHRINE 5MG/5ML LI
+"DATA",176.112,25964,1)
+309431
+"DATA",176.112,25965,0)
+4007726^CODEINE 10MG/K GUAIACOLSULF 44MG/PROMETH 5MG/5ML LIQUID
+"DATA",176.112,25965,1)
+309430
+"DATA",176.112,25966,0)
+4004720^CODEINE 10MG/GUAIFENESIN 100MG/5ML SYRUP
+"DATA",176.112,25966,1)
+309428
+"DATA",176.112,25967,0)
+4004724^CODEINE 10MG/GUAIFENESIN 100MG/5ML (SF & AF) LIQUID
+"DATA",176.112,25967,1)
+309428
+"DATA",176.112,25968,0)
+4004721^CODEINE 10MG/GUAIFENESIN 100MG/5ML LIQUID
+"DATA",176.112,25968,1)
+309428
+"DATA",176.112,25969,0)
+4001205^CODEINE 10MG/TERPIN HYDRATE 85MG/5ML ELIXIR
+"DATA",176.112,25969,1)
+309427
+"DATA",176.112,25970,0)
+4004870^CODEINE 10MG/GLYCEROL,IODINATED 30MG/5ML LIQUID
+"DATA",176.112,25970,1)
+309427
+"DATA",176.112,25971,0)
+4007571^CODEINE 10MG/GG 100MG/PSEUDEFED 30MG/TRIPROLIDINE 2MG/5ML LIQ
+"DATA",176.112,25971,1)
+309425
+"DATA",176.112,25972,0)
+4004655^CODEINE 10MG/GG 100MG/PSEUDEFED 30MG/5ML SYRUP
+"DATA",176.112,25972,1)
+309423
+"DATA",176.112,25973,0)
+4004658^CODEINE 10MG/GG 100MG/PSEUDEFED 30MG/5ML (SF) LIQUID
+"DATA",176.112,25973,1)
+309423
+"DATA",176.112,25974,0)
+4004657^CODEINE 10MG/GG 100MG/PSEUDEFED 30MG/5ML LIQUID
+"DATA",176.112,25974,1)
+309423
+"DATA",176.112,25975,0)
+4007740^CODEINE 10MG/GG 100MG/PHENIRAMINE 7.5MG/5ML LIQUID
+"DATA",176.112,25975,1)
+309421
+"DATA",176.112,25976,0)
+4007739^CODEINE 10MG/GG 100MG/PHENIRAMINE 7.5MG/5ML SYRUP
+"DATA",176.112,25976,1)
+309421
+"DATA",176.112,25977,0)
+4004815^CODEINE 10MG/CTM 2MG/PSEUDEFED 30MG/5ML ELIXIR
+"DATA",176.112,25977,1)
+309418
+"DATA",176.112,25978,0)
+4004814^CODEINE 10MG/CTM 2MG/PSEUDEFED 30MG/5ML LIQUID
+"DATA",176.112,25978,1)
+309418
+"DATA",176.112,25979,0)
+4008116^CODEINE 10MG/BPM 4MG/P-EPHRINE 10MG/5ML LIQUID
+"DATA",176.112,25979,1)
+309414
+"DATA",176.112,25980,0)
+4009567^COCOA BUTTER 2.1GM/ZINC OXIDE 0.25GM SUPP,RTL
+"DATA",176.112,25980,1)
+309411
+"DATA",176.112,25981,0)
+4001220^COCAINE HCL 4% SOLN,TOP
+"DATA",176.112,25981,1)
+309407
+"DATA",176.112,25982,0)
+4001219^COCAINE HCL 135MG TAB,SOLUBLE
+"DATA",176.112,25982,1)
+309406
+"DATA",176.112,25983,0)
+4001221^COCAINE HCL 10% SOLN,TOP
+"DATA",176.112,25983,1)
+309405
+"DATA",176.112,25984,0)
+4005572^COAL TAR,COLLOIDAL 30% EMULSION,TOP
+"DATA",176.112,25984,1)
+309403
+"DATA",176.112,25985,0)
+4005596^COAL TAR 1% SHAMPOO
+"DATA",176.112,25985,1)
+309402
+"DATA",176.112,25986,0)
+4005579^COAL TAR,COLLOIDAL 1% SHAMPOO
+"DATA",176.112,25986,1)
+309402
+"DATA",176.112,25987,0)
+4008739^COAL TAR SOLN 10%/NA LAURYL SO4 15% SHAMPOO
+"DATA",176.112,25987,1)
+309401
+"DATA",176.112,25988,0)
+4005580^COAL TAR DISTILLATE 25% OIL,TOP
+"DATA",176.112,25988,1)
+309399
+"DATA",176.112,25989,0)
+4005592^COAL TAR 9% SHAMPOO
+"DATA",176.112,25989,1)
+309398
+"DATA",176.112,25990,0)
+4007849^COAL TAR 5%/AMMONIATED HG 5%/METHENAMINE SULFOSALICYLATE 2% OINT
+"DATA",176.112,25990,1)
+309395
+"DATA",176.112,25991,0)
+4005595^COAL TAR 5% OIL,TOP
+"DATA",176.112,25991,1)
+309394
+"DATA",176.112,25992,0)
+4005587^COAL TAR 5% LOTION,TOP
+"DATA",176.112,25992,1)
+309393
+"DATA",176.112,25993,0)
+4005582^COAL TAR 5% GEL,TOP
+"DATA",176.112,25993,1)
+309392
+"DATA",176.112,25994,0)
+4007612^COAL TAR 20%/POLYSORBATE-80 5% LIQUID,TOP
+"DATA",176.112,25994,1)
+309391
+"DATA",176.112,25995,0)
+4007604^COAL TAR 2%/SALICYLIC ACID 4% SHAMPOO
+"DATA",176.112,25995,1)
+309390
+"DATA",176.112,25996,0)
+4015336^COAL TAR 2% CREAM,TOP
+"DATA",176.112,25996,1)
+309388
+"DATA",176.112,25997,0)
+4012122^COAL TAR 12.5%/MENTHOL 1.5% SHAMPOO
+"DATA",176.112,25997,1)
+309387
+"DATA",176.112,25998,0)
+4005583^COAL TAR 100% SOLN,TOP
+"DATA",176.112,25998,1)
+309386
+"DATA",176.112,25999,0)
+4010505^COAL TAR 10%/MENTHOL 1%/SALICYLIC ACID 3% SHAMPOO
+"DATA",176.112,25999,1)
+309385
+"DATA",176.112,26000,0)
+4005598^COAL TAR 1.75% GEL,TOP
+"DATA",176.112,26000,1)
+309384
+"DATA",176.112,26001,0)
+4005599^COAL TAR 1.5% LIQUID
+"DATA",176.112,26001,1)
+309383
+"DATA",176.112,26002,0)
+4005593^COAL TAR 0.5% SHAMPOO
+"DATA",176.112,26002,1)
+309381
+"DATA",176.112,26003,0)
+4005594^COAL TAR 0.5% GEL,TOP
+"DATA",176.112,26003,1)
+309380
+"DATA",176.112,26004,0)
+4009707^COAL TAR 0.4%/SALICYLIC ACID 1.5%/SULFUR 1.1% OINT,TOP
+"DATA",176.112,26004,1)
+309379
+"DATA",176.112,26005,0)
+4009031^CLOZAPINE 500MG/DAY TAB
+"DATA",176.112,26005,1)
+309378
+"DATA",176.112,26006,0)
+4009030^CLOZAPINE 400MG/DAY TAB
+"DATA",176.112,26006,1)
+309377
+"DATA",176.112,26007,0)
+4009029^CLOZAPINE 300MG/DAY TAB
+"DATA",176.112,26007,1)
+309376
+"DATA",176.112,26008,0)
+4009028^CLOZAPINE 250MG/DAY TAB
+"DATA",176.112,26008,1)
+309375
+"DATA",176.112,26009,0)
+4009027^CLOZAPINE 200MG/DAY TAB
+"DATA",176.112,26009,1)
+309374
+"DATA",176.112,26010,0)
+4009026^CLOZAPINE 150MG/DAY TAB
+"DATA",176.112,26010,1)
+309373
+"DATA",176.112,26011,0)
+4002691^CLOXACILLIN NA 125MG/5ML SOLN
+"DATA",176.112,26011,1)
+309372
+"DATA",176.112,26012,0)
+4002692^CLOXACILLIN NA 125MG/5ML SUSP
+"DATA",176.112,26012,1)
+309372
+"DATA",176.112,26013,0)
+4004366^CLOTRIMAZOLE 10MG TROCHE
+"DATA",176.112,26013,1)
+309371
+"DATA",176.112,26014,0)
+4004363^CLOTRIMAZOLE 1% SOLN,TOP
+"DATA",176.112,26014,1)
+309370
+"DATA",176.112,26015,0)
+4004371^CLOTRIMAZOLE 1% CREAM,VAG,APPLICATOR,5GM
+"DATA",176.112,26015,1)
+309368
+"DATA",176.112,26016,0)
+4004365^CLOTRIMAZOLE 1% CREAM,VAG
+"DATA",176.112,26016,1)
+309368
+"DATA",176.112,26017,0)
+4004362^CLOTRIMAZOLE 1% CREAM,TOP
+"DATA",176.112,26017,1)
+309367
+"DATA",176.112,26018,0)
+4013160^CLOPIDOGREL BISULFATE 75MG TAB,UD
+"DATA",176.112,26018,1)
+309362
+"DATA",176.112,26019,0)
+4013159^CLOPIDOGREL BISULFATE 75MG TAB
+"DATA",176.112,26019,1)
+309362
+"DATA",176.112,26020,0)
+4002476^CLONIDINE HCL 100MCG/ML INJ
+"DATA",176.112,26020,1)
+309360
+"DATA",176.112,26021,0)
+4014038^CLONIDINE HCL 0.3MG TAB,UD
+"DATA",176.112,26021,1)
+309359
+"DATA",176.112,26022,0)
+4002471^CLONIDINE HCL 0.3MG TAB
+"DATA",176.112,26022,1)
+309359
+"DATA",176.112,26023,0)
+4002472^CLONIDINE HCL 0.3MG CAP
+"DATA",176.112,26023,1)
+309358
+"DATA",176.112,26024,0)
+4002470^CLONIDINE HCL 0.2MG TAB
+"DATA",176.112,26024,1)
+309357
+"DATA",176.112,26025,0)
+4013920^CLONIDINE HCL 0.2MG TAB,UD
+"DATA",176.112,26025,1)
+309357
+"DATA",176.112,26026,0)
+4013919^CLONIDINE HCL 0.1MG TAB,UD
+"DATA",176.112,26026,1)
+309356
+"DATA",176.112,26027,0)
+4002469^CLONIDINE HCL 0.1MG TAB
+"DATA",176.112,26027,1)
+309356
+"DATA",176.112,26028,0)
+4002475^CLONIDINE 0.3MG/24HRS PATCH
+"DATA",176.112,26028,1)
+309355
+"DATA",176.112,26029,0)
+4007053^CLOBETASOL PROPIONATE 0.05% GEL,TOP
+"DATA",176.112,26029,1)
+309353
+"DATA",176.112,26030,0)
+4005423^CLIOQUINOL 3%/HYDROCORTISONE 1% LOTION
+"DATA",176.112,26030,1)
+309351
+"DATA",176.112,26031,0)
+4005424^CLIOQUINOL 3%/HYDROCORTISONE 0.5% LOTION
+"DATA",176.112,26031,1)
+309350
+"DATA",176.112,26032,0)
+4005420^CLIOQUINOL 3%/HYDROCORTISONE 0.5% CREAM,TOP
+"DATA",176.112,26032,1)
+309349
+"DATA",176.112,26033,0)
+4007131^CLIOQUINOL 3%/HC 1%/PRAMOXINE 1% CREAM,TOP
+"DATA",176.112,26033,1)
+309348
+"DATA",176.112,26034,0)
+4007132^CLIOQUINOL 3%/HC 1%/PRAMOXINE 0.5% CREAM,TOP
+"DATA",176.112,26034,1)
+309347
+"DATA",176.112,26035,0)
+4007135^CLIOQUINOL 3%/HC 0.5%/PRAMOXINE 1% LOTION
+"DATA",176.112,26035,1)
+309346
+"DATA",176.112,26036,0)
+4006737^CLIOQUINOL 3%/COAL TAR 5%/HC 0.5% CREAM,TOP
+"DATA",176.112,26036,1)
+309345
+"DATA",176.112,26037,0)
+4005426^CLIOQUINOL 0.75%/HYDROCORTISONE 0.25% LOTION
+"DATA",176.112,26037,1)
+309344
+"DATA",176.112,26038,0)
+4007134^CLIOQUINOL 0.3%/HC 0.5%/PRAMOXINE 0.1% CREAM,TOP
+"DATA",176.112,26038,1)
+309343
+"DATA",176.112,26039,0)
+4008277^CLINDAMYCIN PO4 9MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26039,1)
+309340
+"DATA",176.112,26040,0)
+4025637^CLINDAMYCIN PO4 6MG/ML INJ,BAG,50ML
+"DATA",176.112,26040,1)
+309339
+"DATA",176.112,26041,0)
+4008275^CLINDAMYCIN PO4 6MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26041,1)
+309339
+"DATA",176.112,26042,0)
+4008274^CLINDAMYCIN PO4 2MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26042,1)
+309338
+"DATA",176.112,26043,0)
+4003478^CLINDAMYCIN PO4 2% CREAM,VAG
+"DATA",176.112,26043,1)
+309337
+"DATA",176.112,26044,0)
+4015321^CLINDAMYCIN PO4 18MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26044,1)
+309336
+"DATA",176.112,26045,0)
+4003482^CLINDAMYCIN PO4 12MG/ML INJ,BAG,50ML
+"DATA",176.112,26045,1)
+309335
+"DATA",176.112,26046,0)
+4008276^CLINDAMYCIN PO4 12MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26046,1)
+309335
+"DATA",176.112,26047,0)
+4003477^CLINDAMYCIN PO4 12MG/ML INJ
+"DATA",176.112,26047,1)
+309335
+"DATA",176.112,26048,0)
+4003473^CLINDAMYCIN PO4 1% SOLN,TOP
+"DATA",176.112,26048,1)
+309333
+"DATA",176.112,26049,0)
+4003475^CLINDAMYCIN PO4 1% GEL,TOP
+"DATA",176.112,26049,1)
+309332
+"DATA",176.112,26050,0)
+4003471^CLINDAMYCIN PALMITATE HCL 75MG/5ML SOLN
+"DATA",176.112,26050,1)
+309330
+"DATA",176.112,26051,0)
+4003470^CLINDAMYCIN HCL 75MG CAP
+"DATA",176.112,26051,1)
+309329
+"DATA",176.112,26052,0)
+4006949^CLIDINIUM BR 5MG CAP
+"DATA",176.112,26052,1)
+309328
+"DATA",176.112,26053,0)
+4006948^CLIDINIUM BR 2.5MG CAP
+"DATA",176.112,26053,1)
+309327
+"DATA",176.112,26054,0)
+4010077^CLARITHROMYCIN 250MG/5ML SUSP,ORAL
+"DATA",176.112,26054,1)
+309322
+"DATA",176.112,26055,0)
+4014020^CLARITHROMYCIN 187.5MG/5ML SUSP,ORAL
+"DATA",176.112,26055,1)
+309321
+"DATA",176.112,26056,0)
+4008103^CITRIC ACID 640MG/SODIUM CITRATE 490MG/5ML SOLN,ORAL
+"DATA",176.112,26056,1)
+309320
+"DATA",176.112,26057,0)
+4008104^CITRIC ACID 334MG/SODIUM CITRATE 500MG/5ML SOLN,ORAL
+"DATA",176.112,26057,1)
+309319
+"DATA",176.112,26058,0)
+4013417^CITRIC ACID 334MG/SODIUM CITRATE 500MG/5ML SOLN,ORAL,30ML
+"DATA",176.112,26058,1)
+309319
+"DATA",176.112,26059,0)
+4013416^CITRIC ACID 334MG/SODIUM CITRATE 500MG/5ML SOLN,ORAL,15ML
+"DATA",176.112,26059,1)
+309319
+"DATA",176.112,26060,0)
+4007937^CITRIC ACID 334MG/POTASSIUM CITRATE 1100MG/5ML SOLN,ORAL
+"DATA",176.112,26060,1)
+309318
+"DATA",176.112,26061,0)
+4007936^CITRIC ACID 334MG/K CITRATE 550MG/NA CITRATE 500MG/5ML SOLN,ORAL
+"DATA",176.112,26061,1)
+309317
+"DATA",176.112,26062,0)
+4007935^CITRIC ACID 334MG/K CITRATE 550MG/NA CITRATE 500MG/5ML SYRUP
+"DATA",176.112,26062,1)
+309317
+"DATA",176.112,26063,0)
+4007150^CITRIC ACID 2.3GM/SIMETHICONE 0.3GM/NA BICARB 3.1GM/PKT GRANULES
+"DATA",176.112,26063,1)
+309316
+"DATA",176.112,26064,0)
+4006280^CITRIC AC 3.24%/MG OXIDE 0.38%/NA CARB 0.43% SOLN,IRRG
+"DATA",176.112,26064,1)
+309315
+"DATA",176.112,26065,0)
+4013294^CITALOPRAM HYDROBROMIDE 40MG TAB,UD
+"DATA",176.112,26065,1)
+309314
+"DATA",176.112,26066,0)
+4013293^CITALOPRAM HYDROBROMIDE 40MG TAB
+"DATA",176.112,26066,1)
+309314
+"DATA",176.112,26067,0)
+4014663^CITALOPRAM HYDROBROMIDE 10MG/5ML SOLN
+"DATA",176.112,26067,1)
+309313
+"DATA",176.112,26068,0)
+4017134^CISPLATIN 200MG/VIL (PF) INJ
+"DATA",176.112,26068,1)
+309311
+"DATA",176.112,26069,0)
+4003805^CISPLATIN 50MG/VIL INJ
+"DATA",176.112,26069,1)
+309311
+"DATA",176.112,26070,0)
+4003808^CISPLATIN 100MG/VIL (PF) INJ
+"DATA",176.112,26070,1)
+309311
+"DATA",176.112,26071,0)
+4003804^CISPLATIN 10MG/VIL INJ
+"DATA",176.112,26071,1)
+309311
+"DATA",176.112,26072,0)
+4003807^CISPLATIN 50MG/VIL (PF) INJ
+"DATA",176.112,26072,1)
+309311
+"DATA",176.112,26073,0)
+4027830^CISPLATIN 1MG/ML INJ
+"DATA",176.112,26073,1)
+309311
+"DATA",176.112,26074,0)
+4013474^CIPROFLOXACIN HCL 500MG/5ML SUSP
+"DATA",176.112,26074,1)
+309310
+"DATA",176.112,26075,0)
+4008323^CIPROFLOXACIN HCL 500MG TAB
+"DATA",176.112,26075,1)
+309309
+"DATA",176.112,26076,0)
+4013473^CIPROFLOXACIN HCL 250MG/5ML SUSP
+"DATA",176.112,26076,1)
+309308
+"DATA",176.112,26077,0)
+4008326^CIPROFLOXACIN HCL 0.3% SOLN,OPH
+"DATA",176.112,26077,1)
+309307
+"DATA",176.112,26078,0)
+4013305^CIPROFLOXACIN HCL 0.3% OINT,OPH
+"DATA",176.112,26078,1)
+309306
+"DATA",176.112,26079,0)
+4013175^CIPROFLOXACIN HCL 0.2%/HYDROCORTISONE 1% SUSP,OTIC
+"DATA",176.112,26079,1)
+309305
+"DATA",176.112,26080,0)
+4009253^CIPROFLOXACIN 2MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26080,1)
+309304
+"DATA",176.112,26081,0)
+4007408^CIMETIDINE HCL 6MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26081,1)
+309301
+"DATA",176.112,26082,0)
+4008792^CIMETIDINE HCL 6MG/ML/NACL 0.9% INJ,BAG,50ML
+"DATA",176.112,26082,1)
+309301
+"DATA",176.112,26083,0)
+4008791^CIMETIDINE HCL 6MG/ML/NACL 0.9% INJ
+"DATA",176.112,26083,1)
+309301
+"DATA",176.112,26084,0)
+4006823^CIMETIDINE HCL 6MG/ML INJ
+"DATA",176.112,26084,1)
+309301
+"DATA",176.112,26085,0)
+4008798^CIMETIDINE HCL 4.8MG/ML/NACL 0.9% INJ,BAG,250ML
+"DATA",176.112,26085,1)
+309300
+"DATA",176.112,26086,0)
+4007409^CIMETIDINE HCL 3MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26086,1)
+309299
+"DATA",176.112,26087,0)
+4008797^CIMETIDINE HCL 3.6MG/ML/NACL 0.9% INJ,BAG,250ML
+"DATA",176.112,26087,1)
+309298
+"DATA",176.112,26088,0)
+4008795^CIMETIDINE HCL 2.4MG/ML/NACL 0.9% INJ,BAG,500ML
+"DATA",176.112,26088,1)
+309297
+"DATA",176.112,26089,0)
+4008793^CIMETIDINE HCL 1.8MG/ML/NACL 0.9% INJ,BAG,500ML
+"DATA",176.112,26089,1)
+309296
+"DATA",176.112,26090,0)
+4008796^CIMETIDINE HCL 1.2MG/ML/NACL 0.9% INJ,BAG,1000ML
+"DATA",176.112,26090,1)
+309295
+"DATA",176.112,26091,0)
+4008794^CIMETIDINE HCL 0.9MG/ML/NACL 0.9% INJ,BAG,1000ML
+"DATA",176.112,26091,1)
+309294
+"DATA",176.112,26092,0)
+4002995^CILASTATIN NA 500MG/IMIPENEM 500MG/VIL INJ IM
+"DATA",176.112,26092,1)
+309293
+"DATA",176.112,26093,0)
+4002996^CILASTATIN NA 750MG/IMIPENEM 750MG/VIL INJ IM
+"DATA",176.112,26093,1)
+309293
+"DATA",176.112,26094,0)
+4002992^CILASTATIN NA 250MG/IMIPENEM 250MG/VIL INJ IV
+"DATA",176.112,26094,1)
+309292
+"DATA",176.112,26095,0)
+4014652^CICLOPIROX OLAMINE 8% SOLN,TOP
+"DATA",176.112,26095,1)
+309291
+"DATA",176.112,26096,0)
+4017051^CICLOPIROX 8% SOLN,TOP
+"DATA",176.112,26096,1)
+309291
+"DATA",176.112,26097,0)
+4013351^CICLOPIROX OLAMINE 0.77% LOTION,TOP
+"DATA",176.112,26097,1)
+309290
+"DATA",176.112,26098,0)
+4016576^CICLOPIROX 0.77% SUSP,TOP
+"DATA",176.112,26098,1)
+309290
+"DATA",176.112,26099,0)
+4013352^CICLOPIROX OLAMINE 0.77% CREAM,TOP
+"DATA",176.112,26099,1)
+309289
+"DATA",176.112,26100,0)
+4004848^CHYMOTRYPSIN 7200UNT TAB
+"DATA",176.112,26100,1)
+309288
+"DATA",176.112,26101,0)
+4004845^CHYMOTRYPSIN 40MG TAB,EC
+"DATA",176.112,26101,1)
+309287
+"DATA",176.112,26102,0)
+4004844^CHYMOTRYPSIN 20MG TAB,EC
+"DATA",176.112,26102,1)
+309286
+"DATA",176.112,26103,0)
+4005054^CHYMOPAPAIN 2nKatU/ML INTRADISCAL
+"DATA",176.112,26103,1)
+309284
+"DATA",176.112,26104,0)
+4024724^CHROMIUM PICOLINATE 200MCG CAP
+"DATA",176.112,26104,1)
+309282
+"DATA",176.112,26105,0)
+4006126^CHROMIUM PICOLINATE 200MG CAP
+"DATA",176.112,26105,1)
+309282
+"DATA",176.112,26106,0)
+4007390^CHROMIUM 4MCG/COPPER 0.4MG/MANGANESE 0.1MG/ZINC 1MG/ML INJ
+"DATA",176.112,26106,1)
+309280
+"DATA",176.112,26107,0)
+4007386^CHROMIUM 10MCG/COPPER 1MG/MANGANESE 0.5MG/ZINC 5MG/ML INJ
+"DATA",176.112,26107,1)
+309279
+"DATA",176.112,26108,0)
+4005113^CHROMIUM (AS CHLORIDE) 20MCG/ML INJ
+"DATA",176.112,26108,1)
+309278
+"DATA",176.112,26109,0)
+4005114^CHROMIUM (AS CHLORIDE) 10MCG/ML INJ
+"DATA",176.112,26109,1)
+309277
+"DATA",176.112,26110,0)
+4005115^CHROMIC CHLORIDE 20.5MCG/ML INJ
+"DATA",176.112,26110,1)
+309276
+"DATA",176.112,26111,0)
+4008409^CHOLINE SALICYLATE 870MG/5ML LIQUID,ORAL
+"DATA",176.112,26111,1)
+309274
+"DATA",176.112,26112,0)
+4004780^CHOLINE MAGNESIUM TRISALICYLATE 500MG/5ML LIQUID
+"DATA",176.112,26112,1)
+309273
+"DATA",176.112,26113,0)
+4004777^CHOLINE MAGNESIUM TRISALICYLATE 500MG TAB
+"DATA",176.112,26113,1)
+309272
+"DATA",176.112,26114,0)
+4004779^CHOLINE MAGNESIUM TRISALICYLATE 1GM TAB
+"DATA",176.112,26114,1)
+309271
+"DATA",176.112,26115,0)
+4003578^CHOLINE BITARTRATE 25MG/DEXPANTHENOL 50MG TAB
+"DATA",176.112,26115,1)
+309270
+"DATA",176.112,26116,0)
+4010583^CHOLINE 300MG TAB
+"DATA",176.112,26116,1)
+309269
+"DATA",176.112,26117,0)
+4006636^CHOLESTYRAMINE 4GM/9GM PWDR,PKT
+"DATA",176.112,26117,1)
+309268
+"DATA",176.112,26118,0)
+4006634^CHOLESTYRAMINE 4GM/9GM PWDR
+"DATA",176.112,26118,1)
+309268
+"DATA",176.112,26119,0)
+4006639^CHOLESTYRAMINE 4GM/5.5GM PWDR,PKT
+"DATA",176.112,26119,1)
+309267
+"DATA",176.112,26120,0)
+4006640^CHOLESTYRAMINE 4GM/5.7GM PWDR,PKT
+"DATA",176.112,26120,1)
+309267
+"DATA",176.112,26121,0)
+4006637^CHOLESTYRAMINE 4GM/5GM (LIGHT) PWDR,PKT
+"DATA",176.112,26121,1)
+309267
+"DATA",176.112,26122,0)
+4006635^CHOLESTYRAMINE 4GM/5GM PWDR
+"DATA",176.112,26122,1)
+309267
+"DATA",176.112,26123,0)
+4006638^CHOLESTYRAMINE 1GM TAB
+"DATA",176.112,26123,1)
+309266
+"DATA",176.112,26124,0)
+4009450^CHOLESTEROL 3%/PETROLATUM 86%/STEARYL ALCOHOL 3%/WAX 6% OINT,TOP
+"DATA",176.112,26124,1)
+309265
+"DATA",176.112,26125,0)
+4010520^CHOLECALCIFEROL 400UNT TAB
+"DATA",176.112,26125,1)
+309263
+"DATA",176.112,26126,0)
+4007655^CHLORTHALIDONE 15MG/CLONIDINE HCL 0.3MG TAB
+"DATA",176.112,26126,1)
+309261
+"DATA",176.112,26127,0)
+4007653^CHLORTHALIDONE 15MG/CLONIDINE HCL 0.1MG TAB
+"DATA",176.112,26127,1)
+309260
+"DATA",176.112,26128,0)
+4002630^CHLORTETRACYCLINE HCL 250MG CAP
+"DATA",176.112,26128,1)
+309259
+"DATA",176.112,26129,0)
+4002518^CHLORPROMAZINE HCL 75MG CAP,SA
+"DATA",176.112,26129,1)
+309258
+"DATA",176.112,26130,0)
+4002517^CHLORPROMAZINE HCL 30MG CAP,SA
+"DATA",176.112,26130,1)
+309257
+"DATA",176.112,26131,0)
+4002521^CHLORPROMAZINE HCL 300MG CAP,SA
+"DATA",176.112,26131,1)
+309256
+"DATA",176.112,26132,0)
+4002516^CHLORPROMAZINE HCL 25MG/ML INJ
+"DATA",176.112,26132,1)
+309255
+"DATA",176.112,26133,0)
+4002513^CHLORPROMAZINE HCL 200MG TAB
+"DATA",176.112,26133,1)
+309254
+"DATA",176.112,26134,0)
+4002520^CHLORPROMAZINE HCL 200MG CAP,SA
+"DATA",176.112,26134,1)
+309253
+"DATA",176.112,26135,0)
+4002519^CHLORPROMAZINE HCL 150MG CAP,SA
+"DATA",176.112,26135,1)
+309252
+"DATA",176.112,26136,0)
+4002514^CHLORPROMAZINE HCL 100MG/ML CONC,ORAL
+"DATA",176.112,26136,1)
+309250
+"DATA",176.112,26137,0)
+4002543^CHLORPHENIRAMINE MALEATE 8MG CAP,SA
+"DATA",176.112,26137,1)
+309249
+"DATA",176.112,26138,0)
+4002550^CHLORPHENIRAMINE MALEATE 6MG CAP,SA
+"DATA",176.112,26138,1)
+309248
+"DATA",176.112,26139,0)
+4014282^CHLORPHENIRAMINE MALEATE 4MG TAB,UD
+"DATA",176.112,26139,1)
+309247
+"DATA",176.112,26140,0)
+4002542^CHLORPHENIRAMINE MALEATE 4MG TAB
+"DATA",176.112,26140,1)
+309247
+"DATA",176.112,26141,0)
+4002551^CHLORPHENIRAMINE MALEATE 1MG/5ML LIQUID
+"DATA",176.112,26141,1)
+309246
+"DATA",176.112,26142,0)
+4002552^CHLORPHENIRAMINE MALEATE 16MG TAB,SA
+"DATA",176.112,26142,1)
+309245
+"DATA",176.112,26143,0)
+4002547^CHLORPHENIRAMINE MALEATE 12MG TAB,SA
+"DATA",176.112,26143,1)
+309244
+"DATA",176.112,26144,0)
+4002544^CHLORPHENIRAMINE MALEATE 12MG CAP,SA
+"DATA",176.112,26144,1)
+309243
+"DATA",176.112,26145,0)
+4002545^CHLORPHENIRAMINE MALEATE 10MG/ML INJ
+"DATA",176.112,26145,1)
+309242
+"DATA",176.112,26146,0)
+4002548^CHLORPHENIRAMINE MALEATE 100MG/ML INJ
+"DATA",176.112,26146,1)
+309241
+"DATA",176.112,26147,0)
+4005386^CHLORPHENIRAMINE 8MG/PSEUDOEPHEDRINE 120MG TAB,SA
+"DATA",176.112,26147,1)
+309240
+"DATA",176.112,26148,0)
+4005379^CHLORPHENIRAMINE 8MG/PSEUDOEPHEDRINE 120MG CAP,SA
+"DATA",176.112,26148,1)
+309239
+"DATA",176.112,26149,0)
+4003140^CHLORPHENIRAMINE 8MG/PHENYLPROPANOLAMINE 75MG TAB,SA
+"DATA",176.112,26149,1)
+309238
+"DATA",176.112,26150,0)
+4003131^CHLORPHENIRAMINE 8MG/PHENYLPROPANOLAMINE 75MG CAP,SA
+"DATA",176.112,26150,1)
+309237
+"DATA",176.112,26151,0)
+4003138^CHLORPHENIRAMINE 8MG/PHENYLPROPANOLAMINE 50MG CAP,SA
+"DATA",176.112,26151,1)
+309236
+"DATA",176.112,26152,0)
+4006342^CHLORPHENIRAMINE 8MG/PHENYLEPHRINE 20MG CAP,SA
+"DATA",176.112,26152,1)
+309235
+"DATA",176.112,26153,0)
+4005382^CHLORPHENIRAMINE 4MG/PSEUDOEPHEDRINE 60MG CAP,SA
+"DATA",176.112,26153,1)
+309234
+"DATA",176.112,26154,0)
+4005385^CHLORPHENIRAMINE 4MG/PSEUDOEPHEDRINE 60MG CAP
+"DATA",176.112,26154,1)
+309233
+"DATA",176.112,26155,0)
+4006349^CHLORPHENIRAMINE 4MG/PHENYLEPHRINE 20MG TAB,SA
+"DATA",176.112,26155,1)
+309232
+"DATA",176.112,26156,0)
+4006354^CHLORPHENIRAMINE 4MG/PHENYLEPHRINE 20MG TAB
+"DATA",176.112,26156,1)
+309231
+"DATA",176.112,26157,0)
+4006343^CHLORPHENIRAMINE 4MG/PHENYLEPHRINE 10MG/5ML SYRUP
+"DATA",176.112,26157,1)
+309229
+"DATA",176.112,26158,0)
+4006356^CHLORPHENIRAMINE 4MG/PHENYLEPHRINE 10MG/5ML LIQUID
+"DATA",176.112,26158,1)
+309229
+"DATA",176.112,26159,0)
+4006350^CHLORPHENIRAMINE 4MG/PHENYLEPHRINE 10MG/5ML ELIXIR
+"DATA",176.112,26159,1)
+309229
+"DATA",176.112,26160,0)
+4006346^CHLORPHENIRAMINE 4MG/PHENYLEPHRINE 10MG CAP
+"DATA",176.112,26160,1)
+309227
+"DATA",176.112,26161,0)
+4005381^CHLORPHENIRAMINE 2MG/PSEUDOEPHEDRINE 30MG/5ML SYRUP
+"DATA",176.112,26161,1)
+309223
+"DATA",176.112,26162,0)
+4005383^CHLORPHENIRAMINE 2MG/PSEUDOEPHEDRINE 30MG/5ML LIQUID
+"DATA",176.112,26162,1)
+309223
+"DATA",176.112,26163,0)
+4003135^CHLORPHENIRAMINE 2MG/PHENYLPROPANOLAMINE 18.7MG TAB
+"DATA",176.112,26163,1)
+309222
+"DATA",176.112,26164,0)
+4006347^CHLORPHENIRAMINE 2MG/PHENYLEPHRINE 5MG/5ML SYRUP
+"DATA",176.112,26164,1)
+309219
+"DATA",176.112,26165,0)
+4006353^CHLORPHENIRAMINE 2MG/PHENYLEPHRINE 5MG/5ML (SF) LIQUID
+"DATA",176.112,26165,1)
+309219
+"DATA",176.112,26166,0)
+4006351^CHLORPHENIRAMINE 2MG/PHENYLEPHRINE 5MG/5ML LIQUID
+"DATA",176.112,26166,1)
+309219
+"DATA",176.112,26167,0)
+4006348^CHLORPHENIRAMINE 2MG/PHENYLEPHRINE 5MG/5ML ELIXIR
+"DATA",176.112,26167,1)
+309219
+"DATA",176.112,26168,0)
+4006357^CHLORPHENIRAMINE 2MG/PHENYLEPHRINE 5MG TAB
+"DATA",176.112,26168,1)
+309218
+"DATA",176.112,26169,0)
+4010429^CHLORPHENIRAMINE 2MG/DEXTROMETHORPHAN 15MG/5ML LIQUID
+"DATA",176.112,26169,1)
+309216
+"DATA",176.112,26170,0)
+4003136^CHLORPHENIRAMINE 1MG/PHENYLPROPANOLAMINE 9.4MG TAB,CHEWABLE
+"DATA",176.112,26170,1)
+309214
+"DATA",176.112,26171,0)
+4006352^CHLORPHENIRAMINE 1MG/PHENYLEPHRINE 2.5MG TAB,CHEWABLE
+"DATA",176.112,26171,1)
+309211
+"DATA",176.112,26172,0)
+4003130^CHLORPHENIRAMINE 12MG/PHENYLPROPANOLAMINE 75MG CAP,SA
+"DATA",176.112,26172,1)
+309209
+"DATA",176.112,26173,0)
+4005378^CHLORPHENIRAMINE 10MG/PSEUDOEPHEDRINE 65MG CAP,SA
+"DATA",176.112,26173,1)
+309208
+"DATA",176.112,26174,0)
+4003133^CHLORPHENIRAMINE 10MG/PHENYLPROPANOLAMINE 75MG CAP,SA
+"DATA",176.112,26174,1)
+309207
+"DATA",176.112,26175,0)
+4005388^CHLORPHENIRAMINE 0.67MG/PSEUDOEPHEDRINE 10MG/5ML LIQUID
+"DATA",176.112,26175,1)
+309206
+"DATA",176.112,26176,0)
+4014185^CHLOROXYLENOL 3% LOTION,TOP
+"DATA",176.112,26176,1)
+309204
+"DATA",176.112,26177,0)
+4012416^CHLOROXYLENOL 0.8% SKIN CLEANSER
+"DATA",176.112,26177,1)
+309203
+"DATA",176.112,26178,0)
+4008114^CHLOROXYLENOL 0.1%/PRAMOXINE 1% SOLN,OTIC
+"DATA",176.112,26178,1)
+309201
+"DATA",176.112,26179,0)
+4007360^CHLOROXYLENOL 0.1%/HC 1%/PRAMOXINE 1% SOLN,OTIC
+"DATA",176.112,26179,1)
+309200
+"DATA",176.112,26180,0)
+4005671^CHLOROTRIANISENE 72MG CAP
+"DATA",176.112,26180,1)
+309199
+"DATA",176.112,26181,0)
+4001950^CHLOROTHIAZIDE 250MG/5ML SUSP,ORAL
+"DATA",176.112,26181,1)
+309198
+"DATA",176.112,26182,0)
+4004193^CHLOROQUINE PO4 500MG/PRIMAQUINE PO4 79MG TAB
+"DATA",176.112,26182,1)
+309196
+"DATA",176.112,26183,0)
+4004189^CHLOROQUINE HCL 50MG/ML INJ
+"DATA",176.112,26183,1)
+309195
+"DATA",176.112,26184,0)
+4009621^CHLOROPHYLLIN COPPER COMPLEX 0.5% OINT,TOP
+"DATA",176.112,26184,1)
+309194
+"DATA",176.112,26185,0)
+4009623^CHLOROPHYLLIN COPPER COMPLEX 0.2%/NACL 0.9% SOLN,TOP
+"DATA",176.112,26185,1)
+309193
+"DATA",176.112,26186,0)
+4009625^CHLOROPHYLLIN COPPER COMPLEX 0.0125%/NA PROPIONATE 5% OINT,TOP
+"DATA",176.112,26186,1)
+309192
+"DATA",176.112,26187,0)
+4009624^CHLOROPHYLLIN COPPER COMPLEX 0.0025%/NA PROPIONATE 1% SOLN,TOP
+"DATA",176.112,26187,1)
+309191
+"DATA",176.112,26188,0)
+4007209^CHLOROPHYLL 0.5%/PAPAIN 10%/UREA 10% OINT,TOP
+"DATA",176.112,26188,1)
+309190
+"DATA",176.112,26189,0)
+4008670^CHLORHEXIDINE GLUCONATE 4% SURGICAL SCRUB
+"DATA",176.112,26189,1)
+309186
+"DATA",176.112,26190,0)
+4008665^CHLORHEXIDINE GLUCONATE 4% LIQUID,TOP
+"DATA",176.112,26190,1)
+309186
+"DATA",176.112,26191,0)
+4008669^CHLORHEXIDINE GLUCONATE 2% SURGICAL SCRUB
+"DATA",176.112,26191,1)
+309183
+"DATA",176.112,26192,0)
+4008666^CHLORHEXIDINE GLUCONATE 0.5% LIQUID,TOP
+"DATA",176.112,26192,1)
+309181
+"DATA",176.112,26193,0)
+4006749^CHLORDIAZEPOXIDE HCL 5MG/CLIDINIUM BR 2.5MG CAP
+"DATA",176.112,26193,1)
+309180
+"DATA",176.112,26194,0)
+4002265^CHLORDIAZEPOXIDE HCL 100MG/AMP INJ
+"DATA",176.112,26194,1)
+309179
+"DATA",176.112,26195,0)
+4002164^CHLORDIAZEPOXIDE 5MG/ESTROGENS,ESTERIFIED 0.4MG TAB
+"DATA",176.112,26195,1)
+309178
+"DATA",176.112,26196,0)
+4002163^CHLORDIAZEPOXIDE 5MG/ESTROGENS,ESTERIFIED 0.2MG TAB
+"DATA",176.112,26196,1)
+309177
+"DATA",176.112,26197,0)
+4006498^CHLORCYCLIZINE HCL 2%/HYDROCORTISONE ACETATE 0.5% CREAM,TOP
+"DATA",176.112,26197,1)
+309176
+"DATA",176.112,26198,0)
+4004074^CHLORAMPHENICOL PALMITATE 150MG/5ML SUSP
+"DATA",176.112,26198,1)
+309175
+"DATA",176.112,26199,0)
+4004071^CHLORAMPHENICOL 0.5% SOLN,OPH
+"DATA",176.112,26199,1)
+309174
+"DATA",176.112,26200,0)
+4004076^CHLORAMPHENICOL 25MG/VIL SOLN,OPH
+"DATA",176.112,26200,1)
+309174
+"DATA",176.112,26201,0)
+4004072^CHLORAMPHENICOL 1% OINT,OPH
+"DATA",176.112,26201,1)
+309172
+"DATA",176.112,26202,0)
+4004075^CHLORAMPHENICOL 1% CREAM,TOP
+"DATA",176.112,26202,1)
+309171
+"DATA",176.112,26203,0)
+4005811^CHLORAMPHENICOL 0.25%/HYDROCORTISONE ACETATE 0.5% SUSP,OPH
+"DATA",176.112,26203,1)
+309170
+"DATA",176.112,26204,0)
+4001927^CHLORAL HYDRATE 250MG CAP
+"DATA",176.112,26204,1)
+309169
+"DATA",176.112,26205,0)
+4007854^CHLORAL HYDRATE 2%/SALICYLIC ACID 50% OINT,TOP
+"DATA",176.112,26205,1)
+309168
+"DATA",176.112,26206,0)
+4009009^CHARCOAL,ACTIVATED 50GM/240ML LIQUID
+"DATA",176.112,26206,1)
+309150
+"DATA",176.112,26207,0)
+4009763^CHARCOAL,ACTIVATED 25GM/SORBITOL 120ML LIQUID
+"DATA",176.112,26207,1)
+309150
+"DATA",176.112,26208,0)
+4009765^CHARCOAL,ACTIVATED 50GM/SORBITOL 240ML LIQUID
+"DATA",176.112,26208,1)
+309150
+"DATA",176.112,26209,0)
+4009014^CHARCOAL,ACTIVATED 25GM/120ML LIQUID
+"DATA",176.112,26209,1)
+309150
+"DATA",176.112,26210,0)
+4009764^CHARCOAL,ACTIVATED 30GM/SORBITOL 70% 150ML LIQUID
+"DATA",176.112,26210,1)
+309149
+"DATA",176.112,26211,0)
+4009016^CHARCOAL,ACTIVATED 30GM/120ML LIQUID
+"DATA",176.112,26211,1)
+309148
+"DATA",176.112,26212,0)
+4009013^CHARCOAL,ACTIVATED 250MG TAB
+"DATA",176.112,26212,1)
+309147
+"DATA",176.112,26213,0)
+4009015^CHARCOAL,ACTIVATED 15GM/75ML LIQUID
+"DATA",176.112,26213,1)
+309146
+"DATA",176.112,26214,0)
+4009008^CHARCOAL,ACTIVATED 15GM/120ML LIQUID
+"DATA",176.112,26214,1)
+309145
+"DATA",176.112,26215,0)
+4013807^CHARCOAL 250MG/SIMETHICONE 80MG TAB
+"DATA",176.112,26215,1)
+309143
+"DATA",176.112,26216,0)
+4010548^CHARCOAL 200MG/SIMETHICONE 40MG TAB
+"DATA",176.112,26216,1)
+309142
+"DATA",176.112,26217,0)
+4009987^CFN 30MG/PHENACETIN 150MG/SALICYLAMIDE 210MG/STYRAMATE 200MG TAB
+"DATA",176.112,26217,1)
+309141
+"DATA",176.112,26218,0)
+4014698^CEVIMELINE HCL 30MG CAP
+"DATA",176.112,26218,1)
+309140
+"DATA",176.112,26219,0)
+4012134^CETYLPYRIDINIUM CL 0.45%/DOMIPHEN 0.0005% MOUTHWASH
+"DATA",176.112,26219,1)
+309137
+"DATA",176.112,26220,0)
+4013906^CETYLPYRIDINIUM CL 0.07%/MENTHOL 2MG LOZENGE
+"DATA",176.112,26220,1)
+309136
+"DATA",176.112,26221,0)
+4009232^CETYLPYRIDINIUM CL 0.07% LOZENGE
+"DATA",176.112,26221,1)
+309135
+"DATA",176.112,26222,0)
+4013472^CETYLPYRIDINIUM CL 0.05%/DYCLONINE HCL 0.1% (SF) SPRAY
+"DATA",176.112,26222,1)
+309134
+"DATA",176.112,26223,0)
+4017338^CETYLPYRIDINIUM CL 0.05% (AF & SF) MOUTHWASH
+"DATA",176.112,26223,1)
+309133
+"DATA",176.112,26224,0)
+4009231^CETYLPYRIDINIUM CL 0.05% MOUTHWASH
+"DATA",176.112,26224,1)
+309133
+"DATA",176.112,26225,0)
+4016349^CETYLPYRIDINIUM CL 0.05% (AF) MOUTHWASH
+"DATA",176.112,26225,1)
+309133
+"DATA",176.112,26226,0)
+4012845^CETIRIZINE HCL 10MG TAB
+"DATA",176.112,26226,1)
+309130
+"DATA",176.112,26227,0)
+4009993^CETALKONIUM CHLORIDE 1:5500 MOUTHWASH
+"DATA",176.112,26227,1)
+309127
+"DATA",176.112,26228,0)
+4014949^CERIVASTATIN NA 0.8MG TAB
+"DATA",176.112,26228,1)
+309125
+"DATA",176.112,26229,0)
+4013226^CERIVASTATIN NA 0.3MG TAB
+"DATA",176.112,26229,1)
+309124
+"DATA",176.112,26230,0)
+4013225^CERIVASTATIN NA 0.2MG TAB
+"DATA",176.112,26230,1)
+309123
+"DATA",176.112,26231,0)
+4001983^CEPHRADINE 125MG/5ML SUSP
+"DATA",176.112,26231,1)
+309121
+"DATA",176.112,26232,0)
+4003886^CEPHAPIRIN NA 4GM/VIL INJ
+"DATA",176.112,26232,1)
+309120
+"DATA",176.112,26233,0)
+4003885^CEPHAPIRIN NA 2GM/VIL INJ
+"DATA",176.112,26233,1)
+309119
+"DATA",176.112,26234,0)
+4008273^CEPHALOTHIN NA 20MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26234,1)
+309117
+"DATA",176.112,26235,0)
+4007029^CEPHALEXIN HCL MONOHYDRATE 250MG TAB
+"DATA",176.112,26235,1)
+309115
+"DATA",176.112,26236,0)
+4007027^CEPHALEXIN 250MG TAB
+"DATA",176.112,26236,1)
+309115
+"DATA",176.112,26237,0)
+4016553^CEPHALEXIN 500MG CAP,UD
+"DATA",176.112,26237,1)
+309114
+"DATA",176.112,26238,0)
+4007022^CEPHALEXIN 500MG CAP
+"DATA",176.112,26238,1)
+309114
+"DATA",176.112,26239,0)
+4007026^CEPHALEXIN 250MG/5ML SUSP
+"DATA",176.112,26239,1)
+309113
+"DATA",176.112,26240,0)
+4007021^CEPHALEXIN 250MG CAP
+"DATA",176.112,26240,1)
+309112
+"DATA",176.112,26241,0)
+4007023^CEPHALEXIN 1GM TAB
+"DATA",176.112,26241,1)
+309111
+"DATA",176.112,26242,0)
+4007024^CEPHALEXIN 125MG/5ML SUSP
+"DATA",176.112,26242,1)
+309110
+"DATA",176.112,26243,0)
+4007426^CELLULOSE,OXIDIZED 100% PELLET
+"DATA",176.112,26243,1)
+309106
+"DATA",176.112,26244,0)
+4001418^CEFUROXIME NA 750MG/VIL INJ
+"DATA",176.112,26244,1)
+309103
+"DATA",176.112,26245,0)
+4001426^CEFUROXIME NA 7.5MG/ML INJ
+"DATA",176.112,26245,1)
+309102
+"DATA",176.112,26246,0)
+4001420^CEFUROXIME NA 7.5GM/VIL INJ
+"DATA",176.112,26246,1)
+309101
+"DATA",176.112,26247,0)
+4001425^CEFUROXIME NA 30MG/ML INJ
+"DATA",176.112,26247,1)
+309100
+"DATA",176.112,26248,0)
+4001419^CEFUROXIME NA 1.5GM/VIL INJ
+"DATA",176.112,26248,1)
+309099
+"DATA",176.112,26249,0)
+4001423^CEFUROXIME AXETIL 500MG TAB
+"DATA",176.112,26249,1)
+309098
+"DATA",176.112,26250,0)
+4001422^CEFUROXIME AXETIL 250MG TAB
+"DATA",176.112,26250,1)
+309097
+"DATA",176.112,26251,0)
+4001427^CEFUROXIME AXETIL 125MG/5ML SUSP,ORAL
+"DATA",176.112,26251,1)
+309096
+"DATA",176.112,26252,0)
+4001421^CEFUROXIME AXETIL 125MG TAB
+"DATA",176.112,26252,1)
+309095
+"DATA",176.112,26253,0)
+4008597^CEFTRIAXONE NA 40MG/ML/DEXTROSE 2.4% INJ
+"DATA",176.112,26253,1)
+309093
+"DATA",176.112,26254,0)
+4002281^CEFTRIAXONE NA 250MG/VIL INJ
+"DATA",176.112,26254,1)
+309092
+"DATA",176.112,26255,0)
+4008596^CEFTRIAXONE NA 20MG/ML/DEXTROSE 3.6% INJ
+"DATA",176.112,26255,1)
+309091
+"DATA",176.112,26256,0)
+4002285^CEFTRIAXONE NA 10GM/VIL INJ
+"DATA",176.112,26256,1)
+309090
+"DATA",176.112,26257,0)
+4003074^CEFTIZOXIME NA 1GM/VIL INJ
+"DATA",176.112,26257,1)
+309088
+"DATA",176.112,26258,0)
+4003075^CEFTIZOXIME NA 2GM/VIL INJ
+"DATA",176.112,26258,1)
+309088
+"DATA",176.112,26259,0)
+4012826^CEFTIBUTEN DIHYDRATE 90MG/5ML SUSP,ORAL
+"DATA",176.112,26259,1)
+309087
+"DATA",176.112,26260,0)
+4012825^CEFTIBUTEN DIHYDRATE 400MG CAP
+"DATA",176.112,26260,1)
+309086
+"DATA",176.112,26261,0)
+4012827^CEFTIBUTEN DIHYDRATE 180MG/5ML SUSP,ORAL
+"DATA",176.112,26261,1)
+309085
+"DATA",176.112,26262,0)
+4001415^CEFTAZIDIME 40MG/ML INJ,100ML
+"DATA",176.112,26262,1)
+309084
+"DATA",176.112,26263,0)
+4001417^CEFTAZIDIME 2GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,26263,1)
+309083
+"DATA",176.112,26264,0)
+4001412^CEFTAZIDIME 2GM/BAG INJ
+"DATA",176.112,26264,1)
+309083
+"DATA",176.112,26265,0)
+4001409^CEFTAZIDIME 2GM/VIL INJ
+"DATA",176.112,26265,1)
+309083
+"DATA",176.112,26266,0)
+4010074^CEFTAZIDIME 20MG/ML/NACL 0.9% INJ
+"DATA",176.112,26266,1)
+309082
+"DATA",176.112,26267,0)
+4001414^CEFTAZIDIME 20MG/ML INJ,50ML
+"DATA",176.112,26267,1)
+309082
+"DATA",176.112,26268,0)
+4010168^CEFPROZIL 250MG/5ML SUSP
+"DATA",176.112,26268,1)
+309081
+"DATA",176.112,26269,0)
+4010167^CEFPROZIL 125MG/5ML SUSP
+"DATA",176.112,26269,1)
+309080
+"DATA",176.112,26270,0)
+4010533^CEFPODOXIME PROXETIL 50MG/5ML SUSP,ORAL
+"DATA",176.112,26270,1)
+309079
+"DATA",176.112,26271,0)
+4016064^CEFPODOXIME PROXETIL 200MG TAB,UD
+"DATA",176.112,26271,1)
+309078
+"DATA",176.112,26272,0)
+4010536^CEFPODOXIME PROXETIL 200MG TAB
+"DATA",176.112,26272,1)
+309078
+"DATA",176.112,26273,0)
+4010534^CEFPODOXIME PROXETIL 100MG/5ML SUSP,ORAL
+"DATA",176.112,26273,1)
+309077
+"DATA",176.112,26274,0)
+4016063^CEFPODOXIME PROXETIL 100MG TAB,UD
+"DATA",176.112,26274,1)
+309076
+"DATA",176.112,26275,0)
+4010535^CEFPODOXIME PROXETIL 100MG TAB
+"DATA",176.112,26275,1)
+309076
+"DATA",176.112,26276,0)
+4002986^CEFOXITIN NA 2GM/VIL INJ
+"DATA",176.112,26276,1)
+309075
+"DATA",176.112,26277,0)
+4008281^CEFOXITIN NA 20MG/ML/DEXTROSE 3.9% INJ,BAG,50ML
+"DATA",176.112,26277,1)
+309074
+"DATA",176.112,26278,0)
+4002988^CEFOXITIN NA 20MG/ML INJ
+"DATA",176.112,26278,1)
+309074
+"DATA",176.112,26279,0)
+4002985^CEFOXITIN NA 1GM/VIL INJ
+"DATA",176.112,26279,1)
+309073
+"DATA",176.112,26280,0)
+4002987^CEFOXITIN NA 10GM/VIL INJ
+"DATA",176.112,26280,1)
+309072
+"DATA",176.112,26281,0)
+4004884^CEFOTETAN DISODIUM 2GM/VIL INJ
+"DATA",176.112,26281,1)
+309071
+"DATA",176.112,26282,0)
+4004887^CEFOTETAN DISODIUM 2GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,26282,1)
+309071
+"DATA",176.112,26283,0)
+4004889^CEFOTETAN DISODIUM 2GM/5OML IV INJ,BAG
+"DATA",176.112,26283,1)
+309070
+"DATA",176.112,26284,0)
+4004885^CEFOTETAN DISODIUM 10GM/VIL INJ
+"DATA",176.112,26284,1)
+309069
+"DATA",176.112,26285,0)
+4004903^CEFOTAXIME NA 500MG/VIL INJ
+"DATA",176.112,26285,1)
+309068
+"DATA",176.112,26286,0)
+4004901^CEFOTAXIME NA 2GM/VIL INJ
+"DATA",176.112,26286,1)
+309067
+"DATA",176.112,26287,0)
+4004900^CEFOTAXIME NA 1GM/VIL INJ
+"DATA",176.112,26287,1)
+309066
+"DATA",176.112,26288,0)
+4004902^CEFOTAXIME NA 10GM/VIL INJ
+"DATA",176.112,26288,1)
+309065
+"DATA",176.112,26289,0)
+4008579^CEFOPERAZONE NA 40MG/ML/DEXTROSE 3.6% INJ
+"DATA",176.112,26289,1)
+309063
+"DATA",176.112,26290,0)
+4005058^CEFOPERAZONE NA 1GM/VIL INJ
+"DATA",176.112,26290,1)
+309062
+"DATA",176.112,26291,0)
+4005059^CEFOPERAZONE NA 2GM/VIL INJ
+"DATA",176.112,26291,1)
+309062
+"DATA",176.112,26292,0)
+4005060^CEFOPERAZONE NA 10GM/VIL INJ
+"DATA",176.112,26292,1)
+309061
+"DATA",176.112,26293,0)
+4003127^CEFONICID NA 500MG/VIL INJ
+"DATA",176.112,26293,1)
+309060
+"DATA",176.112,26294,0)
+4003129^CEFONICID NA 10GM/VIL INJ
+"DATA",176.112,26294,1)
+309059
+"DATA",176.112,26295,0)
+4008631^CEFIXIME 100MG/5ML SUSP,ORAL
+"DATA",176.112,26295,1)
+309058
+"DATA",176.112,26296,0)
+4012986^CEFEPIME HCL 1GM/VIL INJ
+"DATA",176.112,26296,1)
+309057
+"DATA",176.112,26297,0)
+4012983^CEFEPIME HCL 500MG/VIL INJ
+"DATA",176.112,26297,1)
+309057
+"DATA",176.112,26298,0)
+4012985^CEFEPIME HCL 1GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,26298,1)
+309057
+"DATA",176.112,26299,0)
+4015354^CEFEPIME HCL 2GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,26299,1)
+309056
+"DATA",176.112,26300,0)
+4012984^CEFEPIME HCL 1GM/PB BTL INJ,100ML
+"DATA",176.112,26300,1)
+309055
+"DATA",176.112,26301,0)
+4012987^CEFEPIME HCL 2GM/PB BTL INJ,100ML
+"DATA",176.112,26301,1)
+309055
+"DATA",176.112,26302,0)
+4013204^CEFDINIR 125MG/5ML SUSP,ORAL
+"DATA",176.112,26302,1)
+309054
+"DATA",176.112,26303,0)
+4000939^CEFAZOLIN NA 500MG/VIL INJ
+"DATA",176.112,26303,1)
+309053
+"DATA",176.112,26304,0)
+4000938^CEFAZOLIN NA 250MG/VIL INJ
+"DATA",176.112,26304,1)
+309053
+"DATA",176.112,26305,0)
+4000942^CEFAZOLIN NA 500MG/BAG INJ
+"DATA",176.112,26305,1)
+309053
+"DATA",176.112,26306,0)
+4003073^CEFAZOLIN NA 20MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26306,1)
+309052
+"DATA",176.112,26307,0)
+4008278^CEFAZOLIN NA 20MG/ML/NACL 0.9% INJ
+"DATA",176.112,26307,1)
+309052
+"DATA",176.112,26308,0)
+4003072^CEFAZOLIN NA 10MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26308,1)
+309051
+"DATA",176.112,26309,0)
+4001307^CEFAMANDOLE NAFATE 10GM/VIL INJ
+"DATA",176.112,26309,1)
+309050
+"DATA",176.112,26310,0)
+4001306^CEFAMANDOLE NAFATE 2GM/VIL INJ
+"DATA",176.112,26310,1)
+309050
+"DATA",176.112,26311,0)
+4001309^CEFAMANDOLE NAFATE 2GM/BAG INJ
+"DATA",176.112,26311,1)
+309050
+"DATA",176.112,26312,0)
+4001305^CEFAMANDOLE NAFATE 1GM/VIL INJ
+"DATA",176.112,26312,1)
+309050
+"DATA",176.112,26313,0)
+4001308^CEFAMANDOLE NAFATE 1GM/BAG INJ
+"DATA",176.112,26313,1)
+309050
+"DATA",176.112,26314,0)
+4003863^CEFADROXIL MONOHYDRATE 500MG CAP
+"DATA",176.112,26314,1)
+309049
+"DATA",176.112,26315,0)
+4003868^CEFADROXIL 500MG CAP
+"DATA",176.112,26315,1)
+309049
+"DATA",176.112,26316,0)
+4003871^CEFADROXIL 250MG/5ML SUSP
+"DATA",176.112,26316,1)
+309048
+"DATA",176.112,26317,0)
+4003865^CEFADROXIL MONOHYDRATE 250MG/5ML SUSP
+"DATA",176.112,26317,1)
+309048
+"DATA",176.112,26318,0)
+4003866^CEFADROXIL MONOHYDRATE 1GM TAB
+"DATA",176.112,26318,1)
+309047
+"DATA",176.112,26319,0)
+4003869^CEFADROXIL 1GM TAB
+"DATA",176.112,26319,1)
+309047
+"DATA",176.112,26320,0)
+4003870^CEFADROXIL 250MG CAP
+"DATA",176.112,26320,1)
+309046
+"DATA",176.112,26321,0)
+4001275^CEFACLOR 250MG CAP
+"DATA",176.112,26321,1)
+309045
+"DATA",176.112,26322,0)
+4001281^CEFACLOR MONOHYDRATE 250MG CAP
+"DATA",176.112,26322,1)
+309045
+"DATA",176.112,26323,0)
+4001277^CEFACLOR 125MG/5ML SUSP
+"DATA",176.112,26323,1)
+309044
+"DATA",176.112,26324,0)
+4001279^CEFACLOR MONOHYDRATE 125MG/5ML SUSP
+"DATA",176.112,26324,1)
+309044
+"DATA",176.112,26325,0)
+4001283^CEFACLOR 375MG/5ML SUSP
+"DATA",176.112,26325,1)
+309042
+"DATA",176.112,26326,0)
+4001282^CEFACLOR 187MG/5ML SUSP
+"DATA",176.112,26326,1)
+309040
+"DATA",176.112,26327,0)
+4008466^CASTOR OIL 67% EMULSION,ORAL
+"DATA",176.112,26327,1)
+309036
+"DATA",176.112,26328,0)
+4007584^CASTOR OIL 650MG/PERUVIAN BALSAM 72.5MG/TRYPSIN 0.1MG/0.82ML SPR
+"DATA",176.112,26328,1)
+309035
+"DATA",176.112,26329,0)
+4008465^CASTOR OIL 60% EMULSION,ORAL
+"DATA",176.112,26329,1)
+309034
+"DATA",176.112,26330,0)
+4015306^CASPOFUNGIN ACETATE 50MG/VIL INJ
+"DATA",176.112,26330,1)
+309032
+"DATA",176.112,26331,0)
+4008407^CASCARA SAGRADA,AROMATIC FLUIDEXTRACT,5ML
+"DATA",176.112,26331,1)
+309029
+"DATA",176.112,26332,0)
+4008408^CASCARA SAGRADA,AROMATIC FLUIDEXTRACT
+"DATA",176.112,26332,1)
+309029
+"DATA",176.112,26333,0)
+4014637^CASCARA SAGRADA 450MG CAP
+"DATA",176.112,26333,1)
+309028
+"DATA",176.112,26334,0)
+4009395^CASCARA EXTRACT 222MG/5ML/MINERAL OIL 55% LIQUID,ORAL
+"DATA",176.112,26334,1)
+309027
+"DATA",176.112,26335,0)
+4008231^CASANTHRANOL 10MG/DOCUSATE NA 20MG/5ML LIQUID
+"DATA",176.112,26335,1)
+309025
+"DATA",176.112,26336,0)
+4008462^CARTEOLOL 1% SOLN,OPH
+"DATA",176.112,26336,1)
+309024
+"DATA",176.112,26337,0)
+4002201^CAROTENE,BETA 50MG CAP
+"DATA",176.112,26337,1)
+309016
+"DATA",176.112,26338,0)
+4002200^CAROTENE,BETA 25MG CAP
+"DATA",176.112,26338,1)
+309015
+"DATA",176.112,26339,0)
+4003794^CARMUSTINE 7.7MG IMPLANT WAFER
+"DATA",176.112,26339,1)
+309013
+"DATA",176.112,26340,0)
+4003793^CARMUSTINE 100MG/VIL INJ
+"DATA",176.112,26340,1)
+309012
+"DATA",176.112,26341,0)
+4010000^CARBROXYMETHYLCELLULOSE NA 400MG/DOCUSATE NA 100MG CAP
+"DATA",176.112,26341,1)
+309011
+"DATA",176.112,26342,0)
+4009160^CARBOXYMETHYLCELLULOSE NA 1% SOLN,OPH
+"DATA",176.112,26342,1)
+309009
+"DATA",176.112,26343,0)
+4015830^CARBOXYMETHYLCELLULOSE NA 1% OPTH,SOLN,0.4ML
+"DATA",176.112,26343,1)
+309009
+"DATA",176.112,26344,0)
+4009163^CARBOXYMETHYLCELLULOSE NA 1% SOLN,OPH,0.3ML
+"DATA",176.112,26344,1)
+309009
+"DATA",176.112,26345,0)
+4015829^CARBOXYMETHYLCELLULOSE NA 0.5% SOLN,OPH,0.4ML
+"DATA",176.112,26345,1)
+309008
+"DATA",176.112,26346,0)
+4009164^CARBOXYMETHYLCELLULOSE NA 0.5% SOLN,OPH,0.3ML
+"DATA",176.112,26346,1)
+309008
+"DATA",176.112,26347,0)
+4009161^CARBOXYMETHYLCELLULOSE NA 0.5% SOLN,OPH
+"DATA",176.112,26347,1)
+309008
+"DATA",176.112,26348,0)
+4009999^CARBOXYMETHYLCELLULOSE 400MG/CASANTHRANOL 30MG/DOCUSATE 100MG CP
+"DATA",176.112,26348,1)
+309007
+"DATA",176.112,26349,0)
+4008767^CARBOXYMETHYLCELLULOSE 200MG/DOSS 100MG/PHENOLPHTHALEIN 65MG CAP
+"DATA",176.112,26349,1)
+309006
+"DATA",176.112,26350,0)
+4007890^CARBON DIOXIDE 99% GAS
+"DATA",176.112,26350,1)
+309004
+"DATA",176.112,26351,0)
+4008024^CARBON DIOXIDE 9%/NITROGEN 91% GAS
+"DATA",176.112,26351,1)
+309003
+"DATA",176.112,26352,0)
+4007898^CARBON DIOXIDE 5%/OXYGEN 95% GAS
+"DATA",176.112,26352,1)
+309002
+"DATA",176.112,26353,0)
+4008023^CARBON DIOXIDE 5%/NITROGEN 95% GAS
+"DATA",176.112,26353,1)
+309001
+"DATA",176.112,26354,0)
+4007895^CARBON DIOXIDE 3%/OXYGEN 97% GAS
+"DATA",176.112,26354,1)
+309000
+"DATA",176.112,26355,0)
+4007896^CARBON DIOXIDE 2%/OXYGEN 98% GAS
+"DATA",176.112,26355,1)
+308999
+"DATA",176.112,26356,0)
+4007889^CARBON DIOXIDE 100% GAS
+"DATA",176.112,26356,1)
+308998
+"DATA",176.112,26357,0)
+4007897^CARBON DIOXIDE 10%/OXYGEN 90% GAS
+"DATA",176.112,26357,1)
+308997
+"DATA",176.112,26358,0)
+4006202^CARBINOXAMINE MALEATE 8MG/PSEUDOEPHEDRINE 120MG TAB,SA
+"DATA",176.112,26358,1)
+308996
+"DATA",176.112,26359,0)
+4004974^CARBINOXAMINE MALEATE 4MG TAB
+"DATA",176.112,26359,1)
+308994
+"DATA",176.112,26360,0)
+4006201^CARBINOXAMINE MALEATE 2MG/PSEUDOEPHEDRINE 25MG/ML DROPS,ORAL
+"DATA",176.112,26360,1)
+308993
+"DATA",176.112,26361,0)
+4007323^CARBINOXAMINE 4MG/GG 100MG/PSEUDEFED 60MG CAP
+"DATA",176.112,26361,1)
+308992
+"DATA",176.112,26362,0)
+4006192^CARBINOXAMINE 2MG/DM 4MG/PSEUDEFED 25MG/ML DROPS,ORAL
+"DATA",176.112,26362,1)
+308990
+"DATA",176.112,26363,0)
+4002953^CARBIDOPA 50MG/LEVODOPA 200MG TAB,SA
+"DATA",176.112,26363,1)
+308989
+"DATA",176.112,26364,0)
+4015955^CARBIDOPA 25MG/LEVODOPA 100MG TAB,SA,UD
+"DATA",176.112,26364,1)
+308988
+"DATA",176.112,26365,0)
+4002954^CARBIDOPA 25MG/LEVODOPA 100MG TAB,SA
+"DATA",176.112,26365,1)
+308988
+"DATA",176.112,26366,0)
+4004691^CARBENICILLIN INDANYL NA 382MG TAB
+"DATA",176.112,26366,1)
+308985
+"DATA",176.112,26367,0)
+4004685^CARBENICILLIN DISODIUM 1GM/VIL INJ
+"DATA",176.112,26367,1)
+308982
+"DATA",176.112,26368,0)
+4004686^CARBENICILLIN DISODIUM 2GM/VIL INJ
+"DATA",176.112,26368,1)
+308982
+"DATA",176.112,26369,0)
+4013918^CARBAMAZEPINE 200MG TAB,UD
+"DATA",176.112,26369,1)
+308979
+"DATA",176.112,26370,0)
+4002590^CARBAMAZEPINE 200MG TAB
+"DATA",176.112,26370,1)
+308979
+"DATA",176.112,26371,0)
+4002592^CARBAMAZEPINE 100MG/5ML SUSP
+"DATA",176.112,26371,1)
+308976
+"DATA",176.112,26372,0)
+4015459^CARBAMAZEPINE 100MG/5ML,10ML
+"DATA",176.112,26372,1)
+308976
+"DATA",176.112,26373,0)
+4002591^CARBAMAZEPINE 100MG TAB,CHEWABLE
+"DATA",176.112,26373,1)
+308973
+"DATA",176.112,26374,0)
+4015457^CARBAMAZEPINE 100MG CHEW TAB UD
+"DATA",176.112,26374,1)
+308973
+"DATA",176.112,26375,0)
+4005496^CARBACHOL 3% SOLN,OPH
+"DATA",176.112,26375,1)
+308970
+"DATA",176.112,26376,0)
+4005495^CARBACHOL 2.25% SOLN,OPH
+"DATA",176.112,26376,1)
+308969
+"DATA",176.112,26377,0)
+4005494^CARBACHOL 1.5% SOLN,OPH
+"DATA",176.112,26377,1)
+308968
+"DATA",176.112,26378,0)
+4005493^CARBACHOL 0.75% SOLN,OPH
+"DATA",176.112,26378,1)
+308967
+"DATA",176.112,26379,0)
+4005492^CARBACHOL 0.01% SOLN,INTRAOCULAR
+"DATA",176.112,26379,1)
+308966
+"DATA",176.112,26380,0)
+4014124^CAPTOPRIL 50MG TAB,UD
+"DATA",176.112,26380,1)
+308964
+"DATA",176.112,26381,0)
+4001736^CAPTOPRIL 50MG TAB
+"DATA",176.112,26381,1)
+308964
+"DATA",176.112,26382,0)
+4013916^CAPTOPRIL 12.5MG TAB,UD
+"DATA",176.112,26382,1)
+308963
+"DATA",176.112,26383,0)
+4001734^CAPTOPRIL 12.5MG TAB
+"DATA",176.112,26383,1)
+308963
+"DATA",176.112,26384,0)
+4014126^CAPTOPRIL 100MG TAB,UD
+"DATA",176.112,26384,1)
+308962
+"DATA",176.112,26385,0)
+4001737^CAPTOPRIL 100MG TAB
+"DATA",176.112,26385,1)
+308962
+"DATA",176.112,26386,0)
+4007452^CAPSICUM 7.5MG/CASCARA 60MG/GINGER 23MG/NUX VOMICA 15MG TAB
+"DATA",176.112,26386,1)
+308961
+"DATA",176.112,26387,0)
+4014711^CAPSAICIN 0.25% PATCH
+"DATA",176.112,26387,1)
+308960
+"DATA",176.112,26388,0)
+4007485^CANTHARIDIN 1%/PODOPHYLLIN 5%/SAL AC 30% LIQUID,TOP
+"DATA",176.112,26388,1)
+308959
+"DATA",176.112,26389,0)
+4007425^CAMPHOR 65%/PARACHLOROPHENOL 35% SOLN,DENT
+"DATA",176.112,26389,1)
+308944
+"DATA",176.112,26390,0)
+4009521^CAMPHOR 4.73%/EUCALYPTUS 1.2%/MENTHOL 2.6%/TURPENTINE 4.6% OINT
+"DATA",176.112,26390,1)
+308943
+"DATA",176.112,26391,0)
+4008749^CAMPHOR 2%/MENTHOL 1%/ME SALICYLATE 4.9% LIQUID,TOP
+"DATA",176.112,26391,1)
+308942
+"DATA",176.112,26392,0)
+4007921^CAMPHOR 16%/MENTHOL 8%/PHENOL 68.75% LIQUID,DENT
+"DATA",176.112,26392,1)
+308941
+"DATA",176.112,26393,0)
+4009864^CAMPHOR 10.8%/PHENOL 4.7% LIQUID,TOP
+"DATA",176.112,26393,1)
+308940
+"DATA",176.112,26394,0)
+4009865^CAMPHOR 10.8%/PHENOL 4.7% GEL,TOP
+"DATA",176.112,26394,1)
+308939
+"DATA",176.112,26395,0)
+4014974^CALCIUM POLYCARBOPHIL 625MG TAB,UD
+"DATA",176.112,26395,1)
+308934
+"DATA",176.112,26396,0)
+4008940^CALCIUM POLYCARBOPHIL 625MG TAB
+"DATA",176.112,26396,1)
+308934
+"DATA",176.112,26397,0)
+4008941^CALCIUM POLYCARBOPHIL 500MG TAB,CHEWABLE
+"DATA",176.112,26397,1)
+308933
+"DATA",176.112,26398,0)
+4014837^CALCIUM POLYCARBOPHIL 625MG TAB,CHEWABLE
+"DATA",176.112,26398,1)
+308933
+"DATA",176.112,26399,0)
+4008942^CALCIUM POLYCARBOPHIL 1GM TAB,CHEWABLE
+"DATA",176.112,26399,1)
+308932
+"DATA",176.112,26400,0)
+4009613^CALCIUM PHOSPHATE,DIBASIC 488MG TAB
+"DATA",176.112,26400,1)
+308931
+"DATA",176.112,26401,0)
+4007423^CALCIUM PANTOTHENATE 25MG/DANTHRON 75MG TAB
+"DATA",176.112,26401,1)
+308930
+"DATA",176.112,26402,0)
+4010024^CALCIUM LACTATE 650MG/THIAMINE 10MG TAB
+"DATA",176.112,26402,1)
+308929
+"DATA",176.112,26403,0)
+4009238^CALCIUM LACTATE 1.14GM TAB
+"DATA",176.112,26403,1)
+308928
+"DATA",176.112,26404,0)
+4007776^CALCIUM IODIZED 130MG/PEPTONE 65MG/THYROID 130MG TAB
+"DATA",176.112,26404,1)
+308927
+"DATA",176.112,26405,0)
+4007777^CALCIUM IODIZED 120MG/PEPTONE 60MG/THYROID 120MG TAB
+"DATA",176.112,26405,1)
+308926
+"DATA",176.112,26406,0)
+4007432^CALCIUM GLYCEROPHOSPHATE 5MG/CALCIUM LACTATE 5MG/ML INJ
+"DATA",176.112,26406,1)
+308925
+"DATA",176.112,26407,0)
+4003497^CALCIUM GLUCONATE 975MG TAB
+"DATA",176.112,26407,1)
+308923
+"DATA",176.112,26408,0)
+4003496^CALCIUM GLUCONATE 487.5MG TAB
+"DATA",176.112,26408,1)
+308922
+"DATA",176.112,26409,0)
+4007575^CALCIUM CREOSOTATE 259MG/IODINE 2MG TAB
+"DATA",176.112,26409,1)
+308920
+"DATA",176.112,26410,0)
+4008990^CALCIUM CITRATE 500MG TAB,EFFERVSC
+"DATA",176.112,26410,1)
+308919
+"DATA",176.112,26411,0)
+4008979^CALCIUM CITRATE 315MG/VITAMIN D 200UNT TAB
+"DATA",176.112,26411,1)
+308918
+"DATA",176.112,26412,0)
+4008082^CALCIUM CARBONATE 750MG TAB,CHEWABLE
+"DATA",176.112,26412,1)
+308915
+"DATA",176.112,26413,0)
+4015278^CALCIUM CARBONATE 600MG TAB,CHEWABLE
+"DATA",176.112,26413,1)
+308914
+"DATA",176.112,26414,0)
+4009862^CALCIUM CARBONATE 585MG/MAGNESIUM HYDROXIDE 120MG TAB,CHEWABLE
+"DATA",176.112,26414,1)
+308913
+"DATA",176.112,26415,0)
+4010214^CALCIUM CARBONATE 520MG/MAGNESIUM CARBONATE 400MG/5ML SUSP,ORAL
+"DATA",176.112,26415,1)
+308912
+"DATA",176.112,26416,0)
+4010216^CALCIUM CARBONATE 520MG/MAGNESIUM CARBONATE 400MG/5ML LIQUID
+"DATA",176.112,26416,1)
+308911
+"DATA",176.112,26417,0)
+4009612^CALCIUM 500MG (AS CARBONATE)/VITAMIN D 125UNT TAB
+"DATA",176.112,26417,1)
+308910
+"DATA",176.112,26418,0)
+4009609^CALCIUM CARBONATE 500MG/VITAMIN D 125UNT TAB
+"DATA",176.112,26418,1)
+308910
+"DATA",176.112,26419,0)
+4008923^CALCIUM CARBONATE 500MG/SIMETHICONE 20MG/5ML LIQUID
+"DATA",176.112,26419,1)
+308909
+"DATA",176.112,26420,0)
+4008921^CALCIUM CARBONATE 500MG/SIMETHICONE 20MG TAB,CHEWABLE
+"DATA",176.112,26420,1)
+308908
+"DATA",176.112,26421,0)
+4008089^CALCIUM CARBONATE 500MG TAB,CHEWABLE
+"DATA",176.112,26421,1)
+308907
+"DATA",176.112,26422,0)
+4008085^CALCIUM CARBONATE 500MG GUM,CHEWABLE
+"DATA",176.112,26422,1)
+308906
+"DATA",176.112,26423,0)
+4008084^CALCIUM CARBONATE 500MG CAP
+"DATA",176.112,26423,1)
+308905
+"DATA",176.112,26424,0)
+4008908^CALCIUM CARBONATE 420MG/PECTIN 130MG TAB,CHEWABLE
+"DATA",176.112,26424,1)
+308904
+"DATA",176.112,26425,0)
+4009492^CALCIUM CARBONATE 420MG/GLYCINE 180MG TAB,CHEWABLE
+"DATA",176.112,26425,1)
+308903
+"DATA",176.112,26426,0)
+4015034^CALCIUM CARBONATE 400MG/MAGNESIUM CARBONATE 200MG TAB
+"DATA",176.112,26426,1)
+308902
+"DATA",176.112,26427,0)
+4008097^CALCIUM CARBONATE 400MG/5ML LIQUID
+"DATA",176.112,26427,1)
+308901
+"DATA",176.112,26428,0)
+4010215^CALCIUM CARBONATE 311MG/MAGNESIUM CARBONATE 232MG TAB
+"DATA",176.112,26428,1)
+308900
+"DATA",176.112,26429,0)
+4008919^CALCIUM CARBONATE 300MG/SIMETHICONE 40MG TAB
+"DATA",176.112,26429,1)
+308899
+"DATA",176.112,26430,0)
+4007501^CALCIUM CARBONATE 300MG/PHENOBARBITAL 9MG TAB
+"DATA",176.112,26430,1)
+308898
+"DATA",176.112,26431,0)
+4010217^CALCIUM CARBONATE 270MG/MAGNESIUM CARBONATE 97MG TAB
+"DATA",176.112,26431,1)
+308897
+"DATA",176.112,26432,0)
+4009605^CALCIUM CARBONATE 250MG/VITAMIN D 125UNT TAB
+"DATA",176.112,26432,1)
+308896
+"DATA",176.112,26433,0)
+4015035^CALCIUM CARBONATE 250MG/MAGNESIUM CARBONATE 300MG TAB
+"DATA",176.112,26433,1)
+308895
+"DATA",176.112,26434,0)
+4008920^CALCIUM CARBONATE 1GM/SIMETHICONE 30MG/5ML LIQUID
+"DATA",176.112,26434,1)
+308894
+"DATA",176.112,26435,0)
+4008093^CALCIUM CARBONATE 1GM/5ML LIQUID
+"DATA",176.112,26435,1)
+308893
+"DATA",176.112,26436,0)
+4008098^CALCIUM CARBONATE 1GM TAB,CHEWABLE
+"DATA",176.112,26436,1)
+308892
+"DATA",176.112,26437,0)
+4014938^CALCIUM CARBONATE 1250MG/5ML SUSP,ORAL
+"DATA",176.112,26437,1)
+308891
+"DATA",176.112,26438,0)
+4009608^CALCIUM CARBONATE 1.5GM/VITAMIN D 125UNT TAB
+"DATA",176.112,26438,1)
+308889
+"DATA",176.112,26439,0)
+4008095^CALCIUM CARBONATE 1.25GM CAP
+"DATA",176.112,26439,1)
+308888
+"DATA",176.112,26440,0)
+4010479^CALCIUM ACETATE 500MG (CA 125MG) CAP
+"DATA",176.112,26440,1)
+308886
+"DATA",176.112,26441,0)
+4010477^CALCIUM ACETATE 250MG (CA 62.5MG) TAB
+"DATA",176.112,26441,1)
+308885
+"DATA",176.112,26442,0)
+4012125^CALCIUM 500MG (AS CITRATE)/VIT A 500UNT/VIT D 200UNT/TAB,EFFER
+"DATA",176.112,26442,1)
+308880
+"DATA",176.112,26443,0)
+4009243^CALCIUM 333MG/CHOLECALCIFEROL 133UNT TAB,CHEW
+"DATA",176.112,26443,1)
+308878
+"DATA",176.112,26444,0)
+4002230^CALCITRIOL 2MCG/ML INJ,1ML AMP
+"DATA",176.112,26444,1)
+308870
+"DATA",176.112,26445,0)
+4002229^CALCITRIOL 1MCG/ML INJ
+"DATA",176.112,26445,1)
+308869
+"DATA",176.112,26446,0)
+4002228^CALCITRIOL 0.5MCG CAP
+"DATA",176.112,26446,1)
+308868
+"DATA",176.112,26447,0)
+4002227^CALCITRIOL 0.25MCG CAP
+"DATA",176.112,26447,1)
+308867
+"DATA",176.112,26448,0)
+4006358^CALCITONIN,SALMON 200UNT/ML INJ
+"DATA",176.112,26448,1)
+308866
+"DATA",176.112,26449,0)
+4012310^CALCIPOTRIENE 0.005% SOLN,TOP
+"DATA",176.112,26449,1)
+308865
+"DATA",176.112,26450,0)
+4009339^CALAMINE 8%/PHENOL 1%/ZINC OXIDE 1% LOTION
+"DATA",176.112,26450,1)
+308858
+"DATA",176.112,26451,0)
+4009458^CALAMINE 1%/RESORCINOL 2%/SULFUR 5% CREAM,TOP
+"DATA",176.112,26451,1)
+308857
+"DATA",176.112,26452,0)
+4009961^CAFFEINE,CITRATED 65MG TAB
+"DATA",176.112,26452,1)
+308856
+"DATA",176.112,26453,0)
+4014842^CAFFEINE CITRATE 20MG/ML INJ
+"DATA",176.112,26453,1)
+308855
+"DATA",176.112,26454,0)
+4005092^CAFFEINE 100MG/ERGOTAMINE TARTRATE 2MG SUPP,RTL
+"DATA",176.112,26454,1)
+308854
+"DATA",176.112,26455,0)
+4009962^CAFFEINE 100MG TAB
+"DATA",176.112,26455,1)
+308853
+"DATA",176.112,26456,0)
+4013070^CADEXOMER IODINE 0.9% GEL,TOP
+"DATA",176.112,26456,1)
+308852
+"DATA",176.112,26457,0)
+4013071^CADEXOMER IODINE 0.9% GEL,PKT,10GM
+"DATA",176.112,26457,1)
+308852
+"DATA",176.112,26458,0)
+4013074^CADEXOMER IODINE 0.9% GEL,PKT,5GM
+"DATA",176.112,26458,1)
+308852
+"DATA",176.112,26459,0)
+4007857^CA PANTOTHENATE 25MG/DANTHRON 75MG/DOSS 100MG TAB
+"DATA",176.112,26459,1)
+308851
+"DATA",176.112,26460,0)
+4008005^CA GLUCONATE 65MG/NIACINAMIDE 3MG/PHENOBARB 65MG TAB
+"DATA",176.112,26460,1)
+308849
+"DATA",176.112,26461,0)
+4008006^CA GLUCONATE 65MG/NIACINAMIDE 3MG/PHENOBARB 200MG TAB
+"DATA",176.112,26461,1)
+308848
+"DATA",176.112,26462,0)
+4008007^CA GLUCONATE 130MG/NIACINAMIDE 3MG/PHENOBARB 32MG TAB
+"DATA",176.112,26462,1)
+308847
+"DATA",176.112,26463,0)
+4008008^CA GLUCONATE 130MG/NIACINAMIDE 3MG/PHENOBARB 160MG TAB
+"DATA",176.112,26463,1)
+308846
+"DATA",176.112,26464,0)
+4010581^CA CARBONATE 780MG/MG CARBONATE 130MG/MG OXIDE 65MG TAB,CHEW
+"DATA",176.112,26464,1)
+308845
+"DATA",176.112,26465,0)
+4009606^CA CARBONATE 600MG/VITAMIN D 100UNT TAB
+"DATA",176.112,26465,1)
+308844
+"DATA",176.112,26466,0)
+4009867^CA CARBONATE 600MG/FERROUS FUMARATE 18MG/VITAMIN D 125UNT TAB
+"DATA",176.112,26466,1)
+308843
+"DATA",176.112,26467,0)
+4007733^CA CARB 325MG/MG OH 325MG/PHENOBARB 15MG TAB
+"DATA",176.112,26467,1)
+308842
+"DATA",176.112,26468,0)
+4009034^CA CARB 280MG/MG OH 128MG/SIMETHICONE 20MG TAB,CHEWABLE
+"DATA",176.112,26468,1)
+308841
+"DATA",176.112,26469,0)
+4010439^BUTYLATED HYDROXYTOLUENE 100GM CRYSTALS
+"DATA",176.112,26469,1)
+308839
+"DATA",176.112,26470,0)
+4003840^BUTORPHANOL TARTRATE 10MG/ML SOLN,SPRAY,NASAL
+"DATA",176.112,26470,1)
+308838
+"DATA",176.112,26471,0)
+4004771^BUTOCONAZOLE NITRATE 2% CREAM,VAG,5GM
+"DATA",176.112,26471,1)
+308837
+"DATA",176.112,26472,0)
+4004770^BUTOCONAZOLE NITRATE 2% CREAM,VAG
+"DATA",176.112,26472,1)
+308837
+"DATA",176.112,26473,0)
+4013000^BUTENAFINE HCL 1% CREAM,TOP
+"DATA",176.112,26473,1)
+308836
+"DATA",176.112,26474,0)
+4008754^BUTAMBEN PICRATE 1% OINT,TOP
+"DATA",176.112,26474,1)
+308835
+"DATA",176.112,26475,0)
+4004791^BUTABARBITAL NA 50MG TAB
+"DATA",176.112,26475,1)
+308834
+"DATA",176.112,26476,0)
+4004792^BUTABARBITAL NA 32MG TAB
+"DATA",176.112,26476,1)
+308833
+"DATA",176.112,26477,0)
+4004787^BUTABARBITAL NA 30MG CAP
+"DATA",176.112,26477,1)
+308831
+"DATA",176.112,26478,0)
+4004786^BUTABARBITAL NA 15MG CAP
+"DATA",176.112,26478,1)
+308830
+"DATA",176.112,26479,0)
+4004793^BUTABARBITAL NA 100MG TAB
+"DATA",176.112,26479,1)
+308829
+"DATA",176.112,26480,0)
+4004794^BUTABARBITAL NA 100MG CAP
+"DATA",176.112,26480,1)
+308828
+"DATA",176.112,26481,0)
+4006735^BUTABARB 30MG/PHENOBARB 15MG/SECOBARB 50MG TAB
+"DATA",176.112,26481,1)
+308827
+"DATA",176.112,26482,0)
+4007701^BUTABARB 25MG/EPINEPHRINE 24MG/THEOPHYLLINE 130MG TAB
+"DATA",176.112,26482,1)
+308826
+"DATA",176.112,26483,0)
+4006629^BUTABARB 20MG/EPHEDRINE 25MG/GG 100MG/THEOPHYLLINE 150MG CAP
+"DATA",176.112,26483,1)
+308824
+"DATA",176.112,26484,0)
+4007700^BUTABARB 15MG/HYOSCYAMINE 0.3MG/AZOPHEN 150MG TAB
+"DATA",176.112,26484,1)
+308823
+"DATA",176.112,26485,0)
+4004276^BUPIVACAINE HCL 0.75%/EPINEPHRINE 1:200000 INJ
+"DATA",176.112,26485,1)
+308820
+"DATA",176.112,26486,0)
+4004273^BUPIVACAINE HCL 0.75% SPINAL INJ
+"DATA",176.112,26486,1)
+308819
+"DATA",176.112,26487,0)
+4004279^BUPIVACAINE HCL 0.75%/DEXTROSE 8.25% INJ
+"DATA",176.112,26487,1)
+308819
+"DATA",176.112,26488,0)
+4004272^BUPIVACAINE HCL 0.75% INJ
+"DATA",176.112,26488,1)
+308819
+"DATA",176.112,26489,0)
+4004275^BUPIVACAINE HCL 0.5%/EPINEPHRINE 1:200000 INJ
+"DATA",176.112,26489,1)
+308818
+"DATA",176.112,26490,0)
+4004892^BUCLIZINE HCL 50MG TAB,CHEWABLE
+"DATA",176.112,26490,1)
+308816
+"DATA",176.112,26491,0)
+4010226^BRYONIA 24MG/HYDRASTIS 24MG/PHENOLPHTHALEIN 120MG TAB,CHEW
+"DATA",176.112,26491,1)
+308815
+"DATA",176.112,26492,0)
+4004701^BROMPHENIRAMINE MALEATE 10MG/ML INJ
+"DATA",176.112,26492,1)
+308813
+"DATA",176.112,26493,0)
+4007317^BROMPHENIRAMINE 6MG/PSEUDOEPHEDRINE 60MG CAP,SA
+"DATA",176.112,26493,1)
+308812
+"DATA",176.112,26494,0)
+4007319^BROMPHENIRAMINE 4MG/PSEUDOEPHEDRINE 60MG TAB
+"DATA",176.112,26494,1)
+308811
+"DATA",176.112,26495,0)
+4007321^BROMPHENIRAMINE 12MG/PSEUDOEPHEDRINE SO4 120MG TAB,SA
+"DATA",176.112,26495,1)
+308809
+"DATA",176.112,26496,0)
+4007318^BROMPHENIRAMINE 12MG/PSEUDOEPHEDRINE 120MG CAP,SA
+"DATA",176.112,26496,1)
+308808
+"DATA",176.112,26497,0)
+4008125^BROMELAINS 50000UNT TAB,EC
+"DATA",176.112,26497,1)
+308807
+"DATA",176.112,26498,0)
+4008126^BROMELAINS 100000UNT TAB,EC
+"DATA",176.112,26498,1)
+308806
+"DATA",176.112,26499,0)
+4013195^BRINZOLAMIDE 1% SUSP,OPH
+"DATA",176.112,26499,1)
+308805
+"DATA",176.112,26500,0)
+4012964^BRIMONIDINE TARTRATE 0.2% SOLN,OPH
+"DATA",176.112,26500,1)
+308804
+"DATA",176.112,26501,0)
+4006296^BRETYLIUM TOSYLATE 4MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26501,1)
+308803
+"DATA",176.112,26502,0)
+4006298^BRETYLIUM TOSYLATE 4MG/ML/DEXTROSE 5% INJ,BAG,250ML
+"DATA",176.112,26502,1)
+308803
+"DATA",176.112,26503,0)
+4006295^BRETYLIUM TOSYLATE 2MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26503,1)
+308802
+"DATA",176.112,26504,0)
+4006297^BRETYLIUM TOSYLATE 2MG/ML/DEXTROSE 5% INJ,BAG,250ML
+"DATA",176.112,26504,1)
+308802
+"DATA",176.112,26505,0)
+4006332^BRETYLIUM TOSYLATE 100MG/ML INJ
+"DATA",176.112,26505,1)
+308801
+"DATA",176.112,26506,0)
+4007635^BPM 4MG/GG 300MG/PSEUDEFED 60MG CAP,SA
+"DATA",176.112,26506,1)
+308800
+"DATA",176.112,26507,0)
+4008299^BPM 2MG/P-EPHRINE 10MG/P-TOLOXAMINE 25MG CAP,SA
+"DATA",176.112,26507,1)
+308799
+"DATA",176.112,26508,0)
+4007946^BOTULISM ANTITOXIN 5000UNT/VIL INJ
+"DATA",176.112,26508,1)
+308797
+"DATA",176.112,26509,0)
+4008885^BORIC ACID 5% OINT,OPH
+"DATA",176.112,26509,1)
+308793
+"DATA",176.112,26510,0)
+4008890^BORIC ACID 2.75% SOLN,OTIC
+"DATA",176.112,26510,1)
+308792
+"DATA",176.112,26511,0)
+4008883^BORIC ACID 10% OINT,TOP
+"DATA",176.112,26511,1)
+308791
+"DATA",176.112,26512,0)
+4008936^BORIC ACID 1.2%/KCL 0.38%/NA CARBONATE 0.014% SOLN IRRG,OPH
+"DATA",176.112,26512,1)
+308790
+"DATA",176.112,26513,0)
+4010438^BONE MEAL TAB 700MG
+"DATA",176.112,26513,1)
+308773
+"DATA",176.112,26514,0)
+4007414^BLEOMYCIN SO4 3UNT/ML/NACL 0.9% INJ
+"DATA",176.112,26514,1)
+308771
+"DATA",176.112,26515,0)
+4003771^BLEOMYCIN SO4 15UNT/VIL INJ
+"DATA",176.112,26515,1)
+308770
+"DATA",176.112,26516,0)
+4003773^BLEOMYCIN SO4 30UNT/VIL INJ
+"DATA",176.112,26516,1)
+308770
+"DATA",176.112,26517,0)
+4003772^BLEOMYCIN SO4 15UNT/AMP INJ
+"DATA",176.112,26517,1)
+308770
+"DATA",176.112,26518,0)
+4015497^BIVALIRUDIN 250MG/VIL INJ
+"DATA",176.112,26518,1)
+308769
+"DATA",176.112,26519,0)
+4007799^BITOLTEROL MESYLATE 0.37MG/ACTUATION SOLN,INHL
+"DATA",176.112,26519,1)
+308768
+"DATA",176.112,26520,0)
+4007801^BITOLTEROL MESYLATE 0.2% SOLN,INHL
+"DATA",176.112,26520,1)
+308767
+"DATA",176.112,26521,0)
+4012789^BISOPROLOL FUMARATE 5MG/HYDROCHLOROTHIAZIDE 6.25MG TAB
+"DATA",176.112,26521,1)
+308766
+"DATA",176.112,26522,0)
+4012791^BISOPROLOL FUMARATE 2.5MG/HYDROCHLOROTHIAZIDE 6.25MG TAB
+"DATA",176.112,26522,1)
+308765
+"DATA",176.112,26523,0)
+4012790^BISOPROLOL FUMARATE 10MG/HYDROCHLOROTHIAZIDE 6.25MG TAB
+"DATA",176.112,26523,1)
+308764
+"DATA",176.112,26524,0)
+4009549^BISMUTH SUBSALICYLATE 525MG/15ML SUSP,ORAL
+"DATA",176.112,26524,1)
+308763
+"DATA",176.112,26525,0)
+4009548^BISMUTH SUBSALICYLATE 262MG/15ML SUSP,ORAL
+"DATA",176.112,26525,1)
+308762
+"DATA",176.112,26526,0)
+4009551^BISMUTH SUBSALICYLATE 262MG TAB,CHEW
+"DATA",176.112,26526,1)
+308761
+"DATA",176.112,26527,0)
+4009552^BISMUTH SUBSALICYLATE 262MG TAB
+"DATA",176.112,26527,1)
+308760
+"DATA",176.112,26528,0)
+4009037^BISMUTH SUBSALICYLATE 102MG/CA CARBONATE TAB,CHEWABLE
+"DATA",176.112,26528,1)
+308759
+"DATA",176.112,26529,0)
+4012600^BISMUTH SUBGALLATE 200MG TAB,CHEW
+"DATA",176.112,26529,1)
+308757
+"DATA",176.112,26530,0)
+4008446^BISACODYL 5MG TAB,EC
+"DATA",176.112,26530,1)
+308753
+"DATA",176.112,26531,0)
+4013914^BISACODYL 5MG TAB,EC,UD
+"DATA",176.112,26531,1)
+308753
+"DATA",176.112,26532,0)
+4008448^BISACODYL 10MG/30ML ENEMA,RTL
+"DATA",176.112,26532,1)
+308749
+"DATA",176.112,26533,0)
+4005110^BISACODYL 1.5MG/TANNIC ACID 2.5GM ENEMA
+"DATA",176.112,26533,1)
+308745
+"DATA",176.112,26534,0)
+4010329^BIOTIN 5MG CAP
+"DATA",176.112,26534,1)
+308744
+"DATA",176.112,26535,0)
+4010331^BIOTIN 300MCG TAB
+"DATA",176.112,26535,1)
+308743
+"DATA",176.112,26536,0)
+4010330^BIOTIN 10MG CAP
+"DATA",176.112,26536,1)
+308742
+"DATA",176.112,26537,0)
+4009956^BIOFLAVONOID COMPOUND 200MG CAP
+"DATA",176.112,26537,1)
+308740
+"DATA",176.112,26538,0)
+4015453^BIMATOPROST 0.03% SOLN,OPH
+"DATA",176.112,26538,1)
+308739
+"DATA",176.112,26539,0)
+4008442^BILE SALTS 300MG CAP
+"DATA",176.112,26539,1)
+308735
+"DATA",176.112,26540,0)
+4004710^BILE SALTS 150MG/PANCREATIN 300MG/PEPSIN 250MG TAB,EC
+"DATA",176.112,26540,1)
+308734
+"DATA",176.112,26541,0)
+4007941^BILE SALTS 100MG/CHARCOAL 150MG/PANCREATIN 150MG TAB,EC
+"DATA",176.112,26541,1)
+308733
+"DATA",176.112,26542,0)
+4009036^BI SUBSALICYLATE 459MG/MG AL SILICATE/SAL AC/NA SALICYLATE/30ML
+"DATA",176.112,26542,1)
+308730
+"DATA",176.112,26543,0)
+4009035^BI SUBSALICYLATE 260MG/MG AL SILICATE/SAL AC/NA SALICYLATE/30ML
+"DATA",176.112,26543,1)
+308729
+"DATA",176.112,26544,0)
+4007910^BI SUBNITRATE 30MG/CA CARB 225MG/MG CARB 160MG TAB
+"DATA",176.112,26544,1)
+308728
+"DATA",176.112,26545,0)
+4010409^BI SUBCARBONATE 260MG/KAOLIN 5.2GM/PECTIN 260MG/30ML SUSP
+"DATA",176.112,26545,1)
+308727
+"DATA",176.112,26546,0)
+4014573^BEXAROTENE 75MG CAP
+"DATA",176.112,26546,1)
+308725
+"DATA",176.112,26547,0)
+4014852^BEXAROTENE 1% GEL,TOP
+"DATA",176.112,26547,1)
+308724
+"DATA",176.112,26548,0)
+4002874^BETHANECHOL CL 5MG TAB
+"DATA",176.112,26548,1)
+308723
+"DATA",176.112,26549,0)
+4013913^BETHANECHOL CL 5MG TAB,UD
+"DATA",176.112,26549,1)
+308723
+"DATA",176.112,26550,0)
+4002876^BETHANECHOL CL 25MG TAB
+"DATA",176.112,26550,1)
+308722
+"DATA",176.112,26551,0)
+4014342^BETHANECHOL CL 25MG TAB,UD
+"DATA",176.112,26551,1)
+308722
+"DATA",176.112,26552,0)
+4013912^BETHANECHOL CL 10MG TAB,UD
+"DATA",176.112,26552,1)
+308721
+"DATA",176.112,26553,0)
+4002875^BETHANECHOL CL 10MG TAB
+"DATA",176.112,26553,1)
+308721
+"DATA",176.112,26554,0)
+4005505^BETAXOLOL HCL 0.5% SOLN,OPH
+"DATA",176.112,26554,1)
+308720
+"DATA",176.112,26555,0)
+4005506^BETAXOLOL HCL 0.25% SUSP,OPH
+"DATA",176.112,26555,1)
+308719
+"DATA",176.112,26556,0)
+4005803^BETAMETHASONE NA PHOSPHATE 4MG/ML INJ,SOLN
+"DATA",176.112,26556,1)
+308718
+"DATA",176.112,26557,0)
+4005799^BETAMETHASONE NA PHOSPHATE 3MG/ML INJ,SOLN
+"DATA",176.112,26557,1)
+308717
+"DATA",176.112,26558,0)
+4005797^BETAMETHASONE DIPROPIONATE 0.1% AEROSOL,TOP
+"DATA",176.112,26558,1)
+308716
+"DATA",176.112,26559,0)
+4015443^BETAMETHASONE DIPROPIONATE 0.05%/CLOTRIMAZOLE 1% LOTION,TOP
+"DATA",176.112,26559,1)
+308715
+"DATA",176.112,26560,0)
+4006614^BETAMETHASONE DIPROPIONATE 0.05%/CLOTRIMAZOLE 1% CREAM,TOP
+"DATA",176.112,26560,1)
+308714
+"DATA",176.112,26561,0)
+4005788^BETAMETHASONE BENZOATE 0.025% OINT,TOP
+"DATA",176.112,26561,1)
+308713
+"DATA",176.112,26562,0)
+4005787^BETAMETHASONE BENZOATE 0.025% GEL,TOP
+"DATA",176.112,26562,1)
+308712
+"DATA",176.112,26563,0)
+4005798^BETAMETHASONE ACETATE 3MG/BETAMETHASONE NA PO4 3MG/ML INJ,SUSP
+"DATA",176.112,26563,1)
+308711
+"DATA",176.112,26564,0)
+4005795^BETAMETHASONE 0.6MG TAB
+"DATA",176.112,26564,1)
+308709
+"DATA",176.112,26565,0)
+4010543^BETAINE HCL 648MG/PROTEASE 15MG TAB
+"DATA",176.112,26565,1)
+308708
+"DATA",176.112,26566,0)
+4013002^BETAINE 1GM/1.7GM PWDR,ORAL
+"DATA",176.112,26566,1)
+308707
+"DATA",176.112,26567,0)
+4012120^BETA CAROTENE 1000UNT/VITAMIN A 10000UNT TAB
+"DATA",176.112,26567,1)
+308705
+"DATA",176.112,26568,0)
+4009576^BETA CAROTENE 10000U CAP
+"DATA",176.112,26568,1)
+308704
+"DATA",176.112,26569,0)
+4009255^BEPRIDIL HCL 300MG TAB
+"DATA",176.112,26569,1)
+308701
+"DATA",176.112,26570,0)
+4009254^BEPRIDIL HCL 200MG TAB
+"DATA",176.112,26570,1)
+308700
+"DATA",176.112,26571,0)
+4010227^BENZYL ALCOHOL 0.3%/CETYLPYRIDINIUM CL 0.07% LOZENGE
+"DATA",176.112,26571,1)
+308698
+"DATA",176.112,26572,0)
+4013812^BENZOYL PEROXIDE 8% GEL,TOP
+"DATA",176.112,26572,1)
+308697
+"DATA",176.112,26573,0)
+4005302^BENZOYL PEROXIDE 5% WASH
+"DATA",176.112,26573,1)
+308696
+"DATA",176.112,26574,0)
+4005304^BENZOYL PEROXIDE 5% LIQUID,TOP
+"DATA",176.112,26574,1)
+308695
+"DATA",176.112,26575,0)
+4005300^BENZOYL PEROXIDE 5% GEL,TOP
+"DATA",176.112,26575,1)
+308694
+"DATA",176.112,26576,0)
+4017304^BENZOYL PEROXIDE 5% (WATER BASED) GEL,TOP
+"DATA",176.112,26576,1)
+308694
+"DATA",176.112,26577,0)
+4005316^BENZOYL PEROXIDE 5% CREAM,TOP
+"DATA",176.112,26577,1)
+308693
+"DATA",176.112,26578,0)
+4005315^BENZOYL PEROXIDE 5% BAR,TOP
+"DATA",176.112,26578,1)
+308692
+"DATA",176.112,26579,0)
+4005314^BENZOYL PEROXIDE 4% GEL,TOP
+"DATA",176.112,26579,1)
+308691
+"DATA",176.112,26580,0)
+4005313^BENZOYL PEROXIDE 4% CLEANSING LOTION
+"DATA",176.112,26580,1)
+308690
+"DATA",176.112,26581,0)
+4005301^BENZOYL PEROXIDE 2.5% GEL,TOP
+"DATA",176.112,26581,1)
+308689
+"DATA",176.112,26582,0)
+4005317^BENZOYL PEROXIDE 2.5% CREAM,TOP
+"DATA",176.112,26582,1)
+308688
+"DATA",176.112,26583,0)
+4006954^BENZOYL PEROXIDE 10%/SULFUR 8% GEL,TOP
+"DATA",176.112,26583,1)
+308687
+"DATA",176.112,26584,0)
+4006953^BENZOYL PEROXIDE 10%/SULFUR 4% GEL,TOP
+"DATA",176.112,26584,1)
+308686
+"DATA",176.112,26585,0)
+4005307^BENZOYL PEROXIDE 10% BAR,TOP
+"DATA",176.112,26585,1)
+308685
+"DATA",176.112,26586,0)
+4005306^BENZOYL PEROXIDE 10% SOAP
+"DATA",176.112,26586,1)
+308685
+"DATA",176.112,26587,0)
+4005305^BENZOYL PEROXIDE 10% LIQUID,TOP
+"DATA",176.112,26587,1)
+308684
+"DATA",176.112,26588,0)
+4010311^BENZOXIQUINE 0.275%/ICHTHAMMOL 20% OINT,TOP
+"DATA",176.112,26588,1)
+308682
+"DATA",176.112,26589,0)
+4010375^BENZOIN COMPOUND 30%/ISOPROPYL ALCOHOL 44.8% SPRAY
+"DATA",176.112,26589,1)
+308679
+"DATA",176.112,26590,0)
+4009562^BENZOIC ACID 12%/SALICYLIC ACID 6% CREAM,TOP
+"DATA",176.112,26590,1)
+308677
+"DATA",176.112,26591,0)
+4007835^BENZOCAINE 7.5% SOLN,TOP
+"DATA",176.112,26591,1)
+308669
+"DATA",176.112,26592,0)
+4026224^THROAT LOZENGE W/BENZOCAINE,MENTHOL
+"DATA",176.112,26592,1)
+308668
+"DATA",176.112,26593,0)
+4008478^BENZOCAINE 6MG/MENTHOL 10MG LOZENGE
+"DATA",176.112,26593,1)
+308668
+"DATA",176.112,26594,0)
+4009685^BENZOCAINE 6.3%/PHENOL 0.5% SOLN,DENT
+"DATA",176.112,26594,1)
+308667
+"DATA",176.112,26595,0)
+4009684^BENZOCAINE 6.3%/PHENOL 0.5% GEL,ORAL
+"DATA",176.112,26595,1)
+308666
+"DATA",176.112,26596,0)
+4008879^BENZOCAINE 5MG/CETYLPYRIDINIUM CL 1MG LOZENGE
+"DATA",176.112,26596,1)
+308665
+"DATA",176.112,26597,0)
+4009483^BENZOCAINE 5%/ICHTHAMMOL 2% OINT,TOP
+"DATA",176.112,26597,1)
+308664
+"DATA",176.112,26598,0)
+4007833^BENZOCAINE 5% GEL,DENT
+"DATA",176.112,26598,1)
+308663
+"DATA",176.112,26599,0)
+4007830^BENZOCAINE 4.5% AEROSOL,TOP
+"DATA",176.112,26599,1)
+308662
+"DATA",176.112,26600,0)
+4008799^BENZOCAINE 3%/METHYL SALICYLATE 30% FOAM AEROSOL,TOP
+"DATA",176.112,26600,1)
+308660
+"DATA",176.112,26601,0)
+4012872^BENZOCAINE 20MG/DOCUSATE NA 283MG CAP FOR ENEMA
+"DATA",176.112,26601,1)
+308659
+"DATA",176.112,26602,0)
+4012745^BENZOCAINE 20%/ORABASE PASTE,DENTAL,PKT,0.75GM
+"DATA",176.112,26602,1)
+308658
+"DATA",176.112,26603,0)
+4012744^BENZOCAINE 20%/ORABASE PASTE,DENTAL
+"DATA",176.112,26603,1)
+308658
+"DATA",176.112,26604,0)
+4007822^BENZOCAINE 20% LIQUID
+"DATA",176.112,26604,1)
+308657
+"DATA",176.112,26605,0)
+4007837^BENZOCAINE 20% LIQUID,PKT,0.25ML
+"DATA",176.112,26605,1)
+308657
+"DATA",176.112,26606,0)
+4012124^BENZOCAINE 2.5%/CETALKONIUM CL 0.02% LOTION
+"DATA",176.112,26606,1)
+308656
+"DATA",176.112,26607,0)
+4010471^BENZOCAINE 2%/COAL TAR 48.5%/SALICYLIC ACID 1% LOTION
+"DATA",176.112,26607,1)
+308655
+"DATA",176.112,26608,0)
+4010310^BENZOCAINE 2%/CHLOROXYLENOL 1%/ZINC OXIDE 3% OINT,TOP
+"DATA",176.112,26608,1)
+308653
+"DATA",176.112,26609,0)
+4007624^BENZOCAINE 15MG/CA CARB 180MG/MG CARB 120MG/PHENOBARB 15MG TAB
+"DATA",176.112,26609,1)
+308650
+"DATA",176.112,26610,0)
+4007446^BENZOCAINE 15MG/BI SUBNITRATE 120MG/CERIUM OXALATE 120MG TAB
+"DATA",176.112,26610,1)
+308649
+"DATA",176.112,26611,0)
+4013683^BENZOCAINE 15% GEL,DENT
+"DATA",176.112,26611,1)
+308648
+"DATA",176.112,26612,0)
+4007846^BENZOCAINE 14%/BUTAMBEN 2%/TETRACAINE 2% OINT,TOP
+"DATA",176.112,26612,1)
+308647
+"DATA",176.112,26613,0)
+4007845^BENZOCAINE 14%/BUTAMBEN 2%/TETRACAINE 2% LIQUID,TOP
+"DATA",176.112,26613,1)
+308646
+"DATA",176.112,26614,0)
+4007847^BENZOCAINE 14%/BUTAMBEN 2%/TETRACAINE 2% GEL,TOP
+"DATA",176.112,26614,1)
+308645
+"DATA",176.112,26615,0)
+4007844^BENZOCAINE 14%/BUTAMBEN 2%/TETRACAINE 2% AEROSOL,TOP
+"DATA",176.112,26615,1)
+308644
+"DATA",176.112,26616,0)
+4010234^BENZOCAINE 10MG/P-EPHRINE 5MG/P-PROPANOL 10.5MG LOZENGE
+"DATA",176.112,26616,1)
+308643
+"DATA",176.112,26617,0)
+4010233^BENZOCAINE 10MG/DEXTROMETHORPHAN HBR 10MG LOZENGE
+"DATA",176.112,26617,1)
+308642
+"DATA",176.112,26618,0)
+4007858^BENZOCAINE 10%/BORIC ACID 5% OINT,TOP
+"DATA",176.112,26618,1)
+308640
+"DATA",176.112,26619,0)
+4006760^BENZETHONIUM CL 0.5%/BENZOCAINE 13.6% SPRAY
+"DATA",176.112,26619,1)
+308636
+"DATA",176.112,26620,0)
+4006761^BENZETHONIUM CL 0.5%/BENZOCAINE 13.6% AEROSOL,TOP
+"DATA",176.112,26620,1)
+308636
+"DATA",176.112,26621,0)
+4006759^BENZETHONIUM CL 0.1%/BENZOCAINE 20% GEL,TOP
+"DATA",176.112,26621,1)
+308634
+"DATA",176.112,26622,0)
+4009477^BENZALKONIUM CL 50% LIQUID
+"DATA",176.112,26622,1)
+308631
+"DATA",176.112,26623,0)
+4009476^BENZALKONIUM CL 17% LIQUID
+"DATA",176.112,26623,1)
+308630
+"DATA",176.112,26624,0)
+4009474^BENZALKONIUM CL 17% SOLN
+"DATA",176.112,26624,1)
+308630
+"DATA",176.112,26625,0)
+4007887^BENZALKONIUM CL 0.2%/BENZOCAINE 18% LIQUID,DENT
+"DATA",176.112,26625,1)
+308629
+"DATA",176.112,26626,0)
+4015282^BENZALKONIUM CL 0.13%/LIDOCAINE HCL 2.5% LIQUID,TOP
+"DATA",176.112,26626,1)
+308628
+"DATA",176.112,26627,0)
+4009473^BENZALKONIUM CL 0.13% TINCTURE
+"DATA",176.112,26627,1)
+308627
+"DATA",176.112,26628,0)
+4009472^BENZALKONIUM CL 0.13% SOLN
+"DATA",176.112,26628,1)
+308627
+"DATA",176.112,26629,0)
+4010212^BENZALKONIUM CL 0.12%/BENZOCAINE 20%/ZINC CL 0.1% GEL,DENT
+"DATA",176.112,26629,1)
+308626
+"DATA",176.112,26630,0)
+4007888^BENZALKONIUM CL 0.1%/BENZOCAINE 20% LIQUID,OTIC
+"DATA",176.112,26630,1)
+308625
+"DATA",176.112,26631,0)
+4007886^BENZALKONIUM CL 0.1%/BENZOCAINE 18% OINT,DENT
+"DATA",176.112,26631,1)
+308624
+"DATA",176.112,26632,0)
+4009479^BENZALKONIUM CL 0.02% SOLN
+"DATA",176.112,26632,1)
+308622
+"DATA",176.112,26633,0)
+4006411^BENOXINATE HCL 0.4%/FLUORESCEIN NA 0.25% SOLN,OPH
+"DATA",176.112,26633,1)
+308619
+"DATA",176.112,26634,0)
+4001906^BENDROFLUMETHIAZIDE 5MG/KCL 6.7MEQ TAB,EC
+"DATA",176.112,26634,1)
+308618
+"DATA",176.112,26635,0)
+4001926^BENDROFLUMETHIAZIDE 5MG TAB,SA
+"DATA",176.112,26635,1)
+308617
+"DATA",176.112,26636,0)
+4001889^BENDROFLUMETHIAZIDE 4MG/KCL 5.4MEQ/RAUWOLFIA SERP 50MG TAB
+"DATA",176.112,26636,1)
+308616
+"DATA",176.112,26637,0)
+4001905^BENDROFLUMETHIAZIDE 2.5MG/KCL 6.7MEQ TAB,EC
+"DATA",176.112,26637,1)
+308615
+"DATA",176.112,26638,0)
+4001923^BENDROFLUMETHIAZIDE 2.5MG TAB
+"DATA",176.112,26638,1)
+308614
+"DATA",176.112,26639,0)
+4010113^BENAZEPRIL HCL 5MG TAB
+"DATA",176.112,26639,1)
+308613
+"DATA",176.112,26640,0)
+4013735^BENAZEPRIL HCL 5MG TAB,UD
+"DATA",176.112,26640,1)
+308613
+"DATA",176.112,26641,0)
+4013738^BENAZEPRIL HCL 40MG TAB,UD
+"DATA",176.112,26641,1)
+308612
+"DATA",176.112,26642,0)
+4010116^BENAZEPRIL HCL 40MG TAB
+"DATA",176.112,26642,1)
+308612
+"DATA",176.112,26643,0)
+4012788^BENAZEPRIL HCL 20MG/HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,26643,1)
+308611
+"DATA",176.112,26644,0)
+4012787^BENAZEPRIL HCL 20MG/HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,26644,1)
+308610
+"DATA",176.112,26645,0)
+4013737^BENAZEPRIL HCL 20MG TAB,UD
+"DATA",176.112,26645,1)
+308609
+"DATA",176.112,26646,0)
+4010115^BENAZEPRIL HCL 20MG TAB
+"DATA",176.112,26646,1)
+308609
+"DATA",176.112,26647,0)
+4012786^BENAZEPRIL HCL 10MG/HYDROCHLOROTHIAZIDE 12.5MG TAB
+"DATA",176.112,26647,1)
+308608
+"DATA",176.112,26648,0)
+4010114^BENAZEPRIL HCL 10MG TAB
+"DATA",176.112,26648,1)
+308607
+"DATA",176.112,26649,0)
+4013736^BENAZEPRIL HCL 10MG TAB,UD
+"DATA",176.112,26649,1)
+308607
+"DATA",176.112,26650,0)
+4004853^BENACTYZINE HCL 1MG/MEPROBAMATE 400MG TAB
+"DATA",176.112,26650,1)
+308606
+"DATA",176.112,26651,0)
+4001266^BELLADONNA LEAF 0.3MG/ML TINCTURE
+"DATA",176.112,26651,1)
+308605
+"DATA",176.112,26652,0)
+4007750^BELLADONNA EXTRACT 5MG/CHARCOAL 125MG TAB
+"DATA",176.112,26652,1)
+308604
+"DATA",176.112,26653,0)
+4001270^BELLADONNA EXTRACT 15MG TAB
+"DATA",176.112,26653,1)
+308602
+"DATA",176.112,26654,0)
+4001267^BELLADONNA ALKALOIDS 0.5MG/ML INJ
+"DATA",176.112,26654,1)
+308601
+"DATA",176.112,26655,0)
+4001271^BELLADONNA ALKALOIDS 0.3MG/ML TINCTURE
+"DATA",176.112,26655,1)
+308600
+"DATA",176.112,26656,0)
+4004633^BELLADONNA ALKALOIDS 0.38MG/PHENOBARBITAL 50MG TAB,SA
+"DATA",176.112,26656,1)
+308599
+"DATA",176.112,26657,0)
+4004625^BELLADONNA ALKALOIDS 0.31MG/PHENOBARBITAL 16MG TAB,CHEWABLE
+"DATA",176.112,26657,1)
+308598
+"DATA",176.112,26658,0)
+4005605^BELLADONNA ALKALOIDS 0.25MG/PHENOBARBITAL 50MG TAB,SA
+"DATA",176.112,26658,1)
+308597
+"DATA",176.112,26659,0)
+4001268^BELLADONNA ALKALOIDS 0.25MG TAB
+"DATA",176.112,26659,1)
+308596
+"DATA",176.112,26660,0)
+4004629^BELLADONNA ALKALOIDS 0.2592MG/PHENOBARBITAL 32MG TAB
+"DATA",176.112,26660,1)
+308595
+"DATA",176.112,26661,0)
+4008105^BELLADONNA ALKALOIDS 0.203MG/PHENAZOPYRIDINE 100MG TAB
+"DATA",176.112,26661,1)
+308593
+"DATA",176.112,26662,0)
+4004623^BELLADONNA ALKALOIDS 0.1296MG/PHENOBARBITAL 16.2MG TAB
+"DATA",176.112,26662,1)
+308589
+"DATA",176.112,26663,0)
+4004632^BELLADONNA ALKALOIDS 0.13MG/PHENOBARBITAL 16.2MG TAB
+"DATA",176.112,26663,1)
+308589
+"DATA",176.112,26664,0)
+4004620^BELLADONNA ALKALOIDS 0.1296MG/PHENOBARBITAL 16.2MG CAP
+"DATA",176.112,26664,1)
+308587
+"DATA",176.112,26665,0)
+4005608^BELLADONNA 7.5MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,26665,1)
+308586
+"DATA",176.112,26666,0)
+4005607^BELLADONNA LEAF 10.8MG/PHENOBARBITAL 16MG TAB
+"DATA",176.112,26666,1)
+308585
+"DATA",176.112,26667,0)
+4005606^BELLADONNA 10.8MG/PHENOBARBITAL 16MG TAB
+"DATA",176.112,26667,1)
+308585
+"DATA",176.112,26668,0)
+4006568^BECLOMETHASONE DIPROPIONATE 84MCG/ACTUAT AEROSOL,INH,ORAL,12.2GM
+"DATA",176.112,26668,1)
+308583
+"DATA",176.112,26669,0)
+4014162^BECLOMETHASONE DIPROPIONATE 42MCG/ACTUATION,AQ,INHL,NASAL,25GM
+"DATA",176.112,26669,1)
+308581
+"DATA",176.112,26670,0)
+4006563^BECLOMETHASONE DIPROPIONATE 0.042% SOLN,NASAL
+"DATA",176.112,26670,1)
+308581
+"DATA",176.112,26671,0)
+4006561^BECLOMETHASONE DIPROPIONATE 42MCG/ACTUATION INHL,NASAL
+"DATA",176.112,26671,1)
+308580
+"DATA",176.112,26672,0)
+4013250^BECLOMETHASONE DIPROPIONATE 42MCG/ACTUAT POCKETHALER,INHL,NASAL
+"DATA",176.112,26672,1)
+308580
+"DATA",176.112,26673,0)
+4006566^BECLOMETHASONE DIPROP 42MCG/ACTUATION AEROSOL,INHL,NASAL,6.7GM
+"DATA",176.112,26673,1)
+308580
+"DATA",176.112,26674,0)
+4013205^BECAPLERMIN 0.01% GEL,TOP
+"DATA",176.112,26674,1)
+308579
+"DATA",176.112,26675,0)
+4007613^BASIC FUCHSIN 0.53%/BORIC ACID 1%/RESORCINOL 10.3%/ACETONE TOP
+"DATA",176.112,26675,1)
+308569
+"DATA",176.112,26676,0)
+4009734^BALSAM PERU 7.25%/TRYPSIN 0.01% AEROSOL,TOP
+"DATA",176.112,26676,1)
+308525
+"DATA",176.112,26677,0)
+4010070^BALSAM PERU 7.25%/CASTOR OIL 65%/TRYPSIN 0.01% AEROSOL,TOP
+"DATA",176.112,26677,1)
+308524
+"DATA",176.112,26678,0)
+4004596^BACLOFEN 0.5MG/ML (PF) INJ,INTRATHECAL,AMP,20ML
+"DATA",176.112,26678,1)
+308517
+"DATA",176.112,26679,0)
+4004599^BACLOFEN 0.05MG/ML INJ,AMP,1ML
+"DATA",176.112,26679,1)
+308516
+"DATA",176.112,26680,0)
+4010312^BACITRACIN/LIDOCAINE 0.5%/NEOMYCIN/POLYMYXIN OINT,TOP
+"DATA",176.112,26680,1)
+308514
+"DATA",176.112,26681,0)
+4006510^BACITRACIN ZINC 500UNT/POLYMYXIN B SO4 10000UNT/GM PWDR,TOP
+"DATA",176.112,26681,1)
+308513
+"DATA",176.112,26682,0)
+4006509^BACITRACIN ZINC 500UNT/POLYMYXIN B SO4 10000UNT/GM OINT,TOP
+"DATA",176.112,26682,1)
+308512
+"DATA",176.112,26683,0)
+4006508^BACITRACIN ZINC 500UNT/POLYMYXIN B SO4 10000UNT/GM OINT,OPH
+"DATA",176.112,26683,1)
+308511
+"DATA",176.112,26684,0)
+4001164^BACITRACIN 500UNT/GM OINT,TOP
+"DATA",176.112,26684,1)
+308509
+"DATA",176.112,26685,0)
+4001166^BACITRACIN 500UNT/GM OINT,TOP,PKG,0.9GM
+"DATA",176.112,26685,1)
+308509
+"DATA",176.112,26686,0)
+4001161^BACITRACIN 500UNT/GM OINT,OPH
+"DATA",176.112,26686,1)
+308508
+"DATA",176.112,26687,0)
+4003546^B-TRACIN 500UNT/N-MYCIN 5MG/POLYMYX 10000UNT/GM OINT,OPH
+"DATA",176.112,26687,1)
+308502
+"DATA",176.112,26688,0)
+4009560^B-TRACIN 500UNT/N-MYCIN 3.5MG/POLYMYX 5000UNT/GM OINT,TOP
+"DATA",176.112,26688,1)
+308501
+"DATA",176.112,26689,0)
+4003552^B-TRACIN 500UNT/N-MYCIN 3.5MG/POLYMYX 10000UNT/GM OINT,TOP
+"DATA",176.112,26689,1)
+308500
+"DATA",176.112,26690,0)
+4009871^B-TRACIN 500UNT/LIDOCAINE 0.4%/POLYMYX 5000UNT/GM AEROSOL,TOP
+"DATA",176.112,26690,1)
+308499
+"DATA",176.112,26691,0)
+4010314^B-TRACIN 500U/LIDOCAINE 4%/N-MYCIN 3.5MG/POLYMYX 10000U/GM OINT
+"DATA",176.112,26691,1)
+308498
+"DATA",176.112,26692,0)
+4003553^B-TRACIN 400UNT/N-MYCIN 5MG/POLYMYX 5000UNT/GM OINT,TOP
+"DATA",176.112,26692,1)
+308497
+"DATA",176.112,26693,0)
+4003548^B-TRACIN 400UNT/N-MYCIN 5MG/POLYMYX 5000UNT/GM OINT,OPH
+"DATA",176.112,26693,1)
+308496
+"DATA",176.112,26694,0)
+4003549^B-TRACIN 400UNT/N-MYCIN 5MG/POLYMYX 10000UNT/GM OINT,OPH
+"DATA",176.112,26694,1)
+308495
+"DATA",176.112,26695,0)
+4003550^B-TRACIN 400UNT/N-MYCIN 3.5MG/POLYMYX 5000UNT/GM OINT,OPH
+"DATA",176.112,26695,1)
+308494
+"DATA",176.112,26696,0)
+4003547^B-TRACIN 400UNT/N-MYCIN 3.5MG/POLYMYX 10000UNT/GM OINT,OPH
+"DATA",176.112,26696,1)
+308493
+"DATA",176.112,26697,0)
+4006475^B-TRACIN 400UNT/HC 1%/N-MYCIN 5MG/POLYMYX 5000UNT/GM OINT,TOP
+"DATA",176.112,26697,1)
+308492
+"DATA",176.112,26698,0)
+4006477^B-TRACIN 400UNT/HC 1%/N-MYCIN 5MG/POLYMYX 5000UNT/GM OINT,OPH
+"DATA",176.112,26698,1)
+308491
+"DATA",176.112,26699,0)
+4006478^B-TRACIN 400UNT/HC 1%/N-MYCIN 5MG/POLYMYX 10000UNT/GM OINT,OPH
+"DATA",176.112,26699,1)
+308490
+"DATA",176.112,26700,0)
+4006479^B-TRACIN 400UNT/HC 1%/N-MYCIN 3.5MG/POLYMYX 5000UNT/GM OINT,OPH
+"DATA",176.112,26700,1)
+308489
+"DATA",176.112,26701,0)
+4006480^B-TRACIN 400UNT/HC 1%/N-MYCIN 3.5MG/POLYMYX 10000UNT/ML SUSP,OPH
+"DATA",176.112,26701,1)
+308488
+"DATA",176.112,26702,0)
+4006476^B-TRACIN 400UNT/HC 1%/N-MYCIN 3.5MG/POLYMYX 10000UNT/GM OINT,OPH
+"DATA",176.112,26702,1)
+308487
+"DATA",176.112,26703,0)
+4008769^B-TRACIN 400UNT/DIPERODON 1%/N-MYCIN 3.5MG/POLYMYX 5000UNT/GM ON
+"DATA",176.112,26703,1)
+308486
+"DATA",176.112,26704,0)
+4007619^B-DONNA 6MG/CTM 1MG/P-EPHRINE 2.5MG/PYRILAMINE 12.5MG TAB
+"DATA",176.112,26704,1)
+308483
+"DATA",176.112,26705,0)
+4007449^B-DONNA 5MG/METHENAMINE MAND 250MG/SALICYLAMIDE 120MG TAB,EC
+"DATA",176.112,26705,1)
+308482
+"DATA",176.112,26706,0)
+4007450^B-DONNA 5MG/METHENAMINE MAND 250MG/SALICYLAMIDE 120MG TAB
+"DATA",176.112,26706,1)
+308481
+"DATA",176.112,26707,0)
+4007460^B-DONNA 5MG/CTM 4MG/EPHEDRINE 25MG/PHENOBARB 15MG TAB
+"DATA",176.112,26707,1)
+308480
+"DATA",176.112,26708,0)
+4006418^B-DONNA 0.2MG/ERGOTAMINE 0.6MG/PHENOBARB 40MG TAB
+"DATA",176.112,26708,1)
+308479
+"DATA",176.112,26709,0)
+4010241^B-DONNA 0.25MG/CAFN 100MG/ERGOTAMINE 2MG/P-BARB 60MG SUPP,RTL
+"DATA",176.112,26709,1)
+308478
+"DATA",176.112,26710,0)
+4007596^B-DONNA 0.24MG/CTM 8MG/P-EPHRINE 25MG/P-PROPANOL 50MG TAB,SA
+"DATA",176.112,26710,1)
+308477
+"DATA",176.112,26711,0)
+4007969^B-DONNA 0.2016MG/KAOLIN 6GM/PECTIN 143MG/30ML SUSP
+"DATA",176.112,26711,1)
+308476
+"DATA",176.112,26712,0)
+4009456^B-DONNA 0.1296MG/KAOLIN 6GM/PECTIN 142.8MG/30ML SUSP,ORAL
+"DATA",176.112,26712,1)
+308474
+"DATA",176.112,26713,0)
+4009997^B-DONNA 0.128MG/CTM 1MG/PHENIRAMINE 12.5MG/P-PROPANOL 50MG CAP
+"DATA",176.112,26713,1)
+308473
+"DATA",176.112,26714,0)
+4007457^B-DONNA 0.08MG/KAOLIN 390MG/PHENOBARB 6.5MG TAB
+"DATA",176.112,26714,1)
+308472
+"DATA",176.112,26715,0)
+4012112^AZTREONAM 40MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26715,1)
+308468
+"DATA",176.112,26716,0)
+4002038^AZTREONAM 1GM/VIL INJ
+"DATA",176.112,26716,1)
+308467
+"DATA",176.112,26717,0)
+4002037^AZTREONAM 500MG/VIL INJ
+"DATA",176.112,26717,1)
+308467
+"DATA",176.112,26718,0)
+4002039^AZTREONAM 2GM/VIL INJ
+"DATA",176.112,26718,1)
+308467
+"DATA",176.112,26719,0)
+4012111^AZTREONAM 20MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,26719,1)
+308466
+"DATA",176.112,26720,0)
+4004580^AZLOCILLIN NA 2GM/VIL INJ
+"DATA",176.112,26720,1)
+308462
+"DATA",176.112,26721,0)
+4026091^AZITHROMYCIN DIHYDRATE 2.5GM/VIL INJ
+"DATA",176.112,26721,1)
+308461
+"DATA",176.112,26722,0)
+4010164^AZITHROMYCIN DIHYDRATE 500MG/VIL INJ
+"DATA",176.112,26722,1)
+308461
+"DATA",176.112,26723,0)
+4010162^AZITHROMYCIN 250MG TAB
+"DATA",176.112,26723,1)
+308460
+"DATA",176.112,26724,0)
+4010158^AZITHROMYCIN 100MG/5ML SUSP,ORAL
+"DATA",176.112,26724,1)
+308459
+"DATA",176.112,26725,0)
+4010161^AZITHROMYCIN 1GM/PKT PWDR,ORAL
+"DATA",176.112,26725,1)
+308459
+"DATA",176.112,26726,0)
+4014951^AZELASTINE HCL 0.05% SOLN,OPH
+"DATA",176.112,26726,1)
+308457
+"DATA",176.112,26727,0)
+4012824^AZELAIC ACID 20% CREAM,TOP
+"DATA",176.112,26727,1)
+308456
+"DATA",176.112,26728,0)
+4008945^ATTAPULGITE 750MG/5ML LIQUID
+"DATA",176.112,26728,1)
+308452
+"DATA",176.112,26729,0)
+4008949^ATTAPULGITE 750MG/15ML LIQUID
+"DATA",176.112,26729,1)
+308451
+"DATA",176.112,26730,0)
+4008947^ATTAPULGITE 600MG/5ML LIQUID
+"DATA",176.112,26730,1)
+308450
+"DATA",176.112,26731,0)
+4009842^ATTAPULGITE 10%/SALICYLIC ACID 2%/SULFUR 2% LOTION
+"DATA",176.112,26731,1)
+308449
+"DATA",176.112,26732,0)
+4000632^ATROPINE SO4 3% SOLN,OPH
+"DATA",176.112,26732,1)
+308448
+"DATA",176.112,26733,0)
+4000639^ATROPINE SO4 2MG/ML INJ
+"DATA",176.112,26733,1)
+308447
+"DATA",176.112,26734,0)
+4000641^ATROPINE SO4 2MG/0.7ML INJ
+"DATA",176.112,26734,1)
+308446
+"DATA",176.112,26735,0)
+4005537^ATROPINE SO4 1%/PREDNISOLONE ACETATE 0.25% SUSP,OPH
+"DATA",176.112,26735,1)
+308445
+"DATA",176.112,26736,0)
+4000626^ATROPINE SO4 1% OINT,OPH
+"DATA",176.112,26736,1)
+308444
+"DATA",176.112,26737,0)
+4000628^ATROPINE SO4 0.6MG TAB,SOLUBLE
+"DATA",176.112,26737,1)
+308443
+"DATA",176.112,26738,0)
+4000637^ATROPINE SO4 0.5MG/ML INJ
+"DATA",176.112,26738,1)
+308442
+"DATA",176.112,26739,0)
+4000631^ATROPINE SO4 0.5% SOLN,OPH
+"DATA",176.112,26739,1)
+308441
+"DATA",176.112,26740,0)
+4000630^ATROPINE SO4 0.5% OINT,OPH
+"DATA",176.112,26740,1)
+308440
+"DATA",176.112,26741,0)
+4000642^ATROPINE SO4 0.5% INHL
+"DATA",176.112,26741,1)
+308439
+"DATA",176.112,26742,0)
+4000627^ATROPINE SO4 0.4MG TAB,SOLUBLE
+"DATA",176.112,26742,1)
+308438
+"DATA",176.112,26743,0)
+4006771^ATROPINE SO4 0.195MG/PHENOBARBITAL 16MG TAB
+"DATA",176.112,26743,1)
+308435
+"DATA",176.112,26744,0)
+4006772^ATROPINE SO4 0.195MG/PHENOBARBITAL 16MG CAP
+"DATA",176.112,26744,1)
+308434
+"DATA",176.112,26745,0)
+4010176^ATROPINE SO4 0.14MG/EDROPHONIUM CL 10MG/ML INJ
+"DATA",176.112,26745,1)
+308433
+"DATA",176.112,26746,0)
+4006775^ATROPINE SO4 0.13MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,26746,1)
+308432
+"DATA",176.112,26747,0)
+4002628^ATROPINE SO4 0.025MG/DIPHENOXYLATE HCL 2.5MG/5ML LIQUID
+"DATA",176.112,26747,1)
+308431
+"DATA",176.112,26748,0)
+4008745^ATROPINE SO4 0.025MG/DIFENOXIN HCL 1MG TAB
+"DATA",176.112,26748,1)
+308430
+"DATA",176.112,26749,0)
+4010277^ATOVAQUONE 750MG/5ML SUSP,ORAL
+"DATA",176.112,26749,1)
+308429
+"DATA",176.112,26750,0)
+4014937^ATOVAQUONE 62.5MG/PROGUANIL HCL 25MG TAB
+"DATA",176.112,26750,1)
+308428
+"DATA",176.112,26751,0)
+4014936^ATOVAQUONE 250MG/PROGUANIL HCL 100MG TAB
+"DATA",176.112,26751,1)
+308427
+"DATA",176.112,26752,0)
+4007856^AT SO4 0.36MG/CTM 8MG/P-PROPANOL 50MG CAP,SA
+"DATA",176.112,26752,1)
+308425
+"DATA",176.112,26753,0)
+4007582^AT SO4 0.24MG/CTM 12MG/EPHEDRINE 15MG TAB,SA
+"DATA",176.112,26753,1)
+308424
+"DATA",176.112,26754,0)
+4006972^AT SO4 0.02MG/CTM 2MG/P-EPHRINE 10MG/P-TOLOXAMINE 25MG TAB
+"DATA",176.112,26754,1)
+308423
+"DATA",176.112,26755,0)
+4006973^AT SO4 0.024MG/CTM 4MG/P-EPHRINE 20MG/P-TOLOXAMINE 50MG CAP,SA
+"DATA",176.112,26755,1)
+308422
+"DATA",176.112,26756,0)
+4008298^AT SO4 0.024MG/BPM 4MG/P-TOLOXAMINE 50MG/PSEUDEFED 120MG TAB,SA
+"DATA",176.112,26756,1)
+308421
+"DATA",176.112,26757,0)
+4005759^ASPIRIN 975MG TAB,SA
+"DATA",176.112,26757,1)
+308418
+"DATA",176.112,26758,0)
+4005731^ASPIRIN 975MG TAB,EC
+"DATA",176.112,26758,1)
+308417
+"DATA",176.112,26759,0)
+4005766^ASPIRIN 81MG TAB,EC
+"DATA",176.112,26759,1)
+308416
+"DATA",176.112,26760,0)
+4005748^ASPIRIN 800MG CAP,SA
+"DATA",176.112,26760,1)
+308415
+"DATA",176.112,26761,0)
+4005740^ASPIRIN 75MG TAB,CHEWABLE
+"DATA",176.112,26761,1)
+308414
+"DATA",176.112,26762,0)
+4005752^ASPIRIN 65MG TAB,CHEWABLE
+"DATA",176.112,26762,1)
+308413
+"DATA",176.112,26763,0)
+4005746^ASPIRIN 650MG TAB,SA
+"DATA",176.112,26763,1)
+308412
+"DATA",176.112,26764,0)
+4005734^ASPIRIN 650MG TAB,EC
+"DATA",176.112,26764,1)
+308411
+"DATA",176.112,26765,0)
+4007639^ASPIRIN 500MG/PHENYLTOLOXAMINE 15MG TAB
+"DATA",176.112,26765,1)
+308410
+"DATA",176.112,26766,0)
+4024856^ASPIRIN 500MG/CITRIC ACID 1000MG/SODIUM BICARBONATE 1985MG TAB,E
+"DATA",176.112,26766,1)
+308409
+"DATA",176.112,26767,0)
+4005754^ASPIRIN 500MG TAB,EC
+"DATA",176.112,26767,1)
+308409
+"DATA",176.112,26768,0)
+4008675^ASPIRIN 400MG/CAFFEINE 16.25MG TAB
+"DATA",176.112,26768,1)
+308408
+"DATA",176.112,26769,0)
+4008576^ASPIRIN 325MG/PSEUDOEPHEDRINE 30MG TAB
+"DATA",176.112,26769,1)
+308407
+"DATA",176.112,26770,0)
+4014492^ASPIRIN 25MG/DIPYRIDAMOLE 200MG CAP,SA
+"DATA",176.112,26770,1)
+308405
+"DATA",176.112,26771,0)
+4008673^ASPIRIN 227.5MG/CAFFEINE 32.5MG CAP
+"DATA",176.112,26771,1)
+308404
+"DATA",176.112,26772,0)
+4005763^ASPIRIN 165MG TAB,EC
+"DATA",176.112,26772,1)
+308403
+"DATA",176.112,26773,0)
+4005765^ASPIRIN 165MG TAB
+"DATA",176.112,26773,1)
+308402
+"DATA",176.112,26774,0)
+4003012^ASPARAGINASE 10000UNT/VIL INJ
+"DATA",176.112,26774,1)
+308401
+"DATA",176.112,26775,0)
+4008565^ASCORBIC ACID 75MG/FERROUS SO4 195MG TAB
+"DATA",176.112,26775,1)
+308400
+"DATA",176.112,26776,0)
+4001046^ASCORBIC ACID 60MG TAB,CHEW
+"DATA",176.112,26776,1)
+308399
+"DATA",176.112,26777,0)
+4008558^ASCORBIC ACID 600MG/FERROUS FUMARATE 330MG TAB
+"DATA",176.112,26777,1)
+308398
+"DATA",176.112,26778,0)
+4008562^ASCORBIC ACID 600MG/FERROUS FUMARATE 110MG TAB
+"DATA",176.112,26778,1)
+308397
+"DATA",176.112,26779,0)
+4001040^ASCORBIC ACID 50MG TAB
+"DATA",176.112,26779,1)
+308396
+"DATA",176.112,26780,0)
+4001028^SODIUM ASCORBATE 500MG/ML INJ
+"DATA",176.112,26780,1)
+308395
+"DATA",176.112,26781,0)
+4001049^SODIUM ASCORBATE 500MG/ML INJ,AMP,2ML
+"DATA",176.112,26781,1)
+308395
+"DATA",176.112,26782,0)
+4001025^ASCORBIC ACID 500MG/ML (PF) INJ
+"DATA",176.112,26782,1)
+308395
+"DATA",176.112,26783,0)
+4001023^ASCORBIC ACID 500MG/ML INJ
+"DATA",176.112,26783,1)
+308395
+"DATA",176.112,26784,0)
+4008564^ASCORBIC ACID 500MG/FERROUS SO4 525MG TAB,SA
+"DATA",176.112,26784,1)
+308394
+"DATA",176.112,26785,0)
+4001039^ASCORBIC ACID 500MG TAB,SA
+"DATA",176.112,26785,1)
+308392
+"DATA",176.112,26786,0)
+4009572^ASCORBIC ACID 500MG/ROSE HIPS TAB,SA
+"DATA",176.112,26786,1)
+308392
+"DATA",176.112,26787,0)
+4001033^ASCORBIC ACID 500MG CAP,SA
+"DATA",176.112,26787,1)
+308391
+"DATA",176.112,26788,0)
+4008924^ASCORBIC ACID 30MG/NIACIN 50MG TAB
+"DATA",176.112,26788,1)
+308390
+"DATA",176.112,26789,0)
+4008561^ASCORBIC ACID 300MG/FERROUS FUMARATE 134MG TAB,CHEWABLE
+"DATA",176.112,26789,1)
+308389
+"DATA",176.112,26790,0)
+4001045^ASCORBIC ACID 25MG TAB
+"DATA",176.112,26790,1)
+308388
+"DATA",176.112,26791,0)
+4015445^ASCORBIC ACID 250MG/IRON CARBONYL 100MG TAB
+"DATA",176.112,26791,1)
+308387
+"DATA",176.112,26792,0)
+4008753^ASCORBIC ACID 250MG/IRON 50MG TAB
+"DATA",176.112,26792,1)
+308386
+"DATA",176.112,26793,0)
+4001041^ASCORBIC ACID 250MG/5ML SOLN,ORAL
+"DATA",176.112,26793,1)
+308385
+"DATA",176.112,26794,0)
+4001034^ASCORBIC ACID 250MG TAB,CHEWABLE
+"DATA",176.112,26794,1)
+308384
+"DATA",176.112,26795,0)
+4001026^ASCORBIC ACID 222MG/ML INJ
+"DATA",176.112,26795,1)
+308383
+"DATA",176.112,26796,0)
+4001037^ASCORBIC ACID 1GM TAB,SA
+"DATA",176.112,26796,1)
+308382
+"DATA",176.112,26797,0)
+4009574^ASCORBIC ACID 1GM/ROSE HIPS TAB,SA
+"DATA",176.112,26797,1)
+308382
+"DATA",176.112,26798,0)
+4008566^ASCORBIC ACID 150MG/FERROUS SULFATE 200MG TAB
+"DATA",176.112,26798,1)
+308381
+"DATA",176.112,26799,0)
+4008567^ASCORBIC ACID 150MG/FERROUS SULFATE 200MG CAP
+"DATA",176.112,26799,1)
+308380
+"DATA",176.112,26800,0)
+4008559^ASCORBIC ACID 125MG/FERROUS FUMARATE 66MG TAB,CHEWABLE
+"DATA",176.112,26800,1)
+308379
+"DATA",176.112,26801,0)
+4006782^ASCORBIC ACID 100MG/ZINC 45MG TAB
+"DATA",176.112,26801,1)
+308378
+"DATA",176.112,26802,0)
+4001047^ASCORBIC ACID 500MG/5ML LIQUID
+"DATA",176.112,26802,1)
+308377
+"DATA",176.112,26803,0)
+4001035^ASCORBIC ACID 500MG/5ML SYRUP
+"DATA",176.112,26803,1)
+308377
+"DATA",176.112,26804,0)
+4001032^ASCORBIC ACID 100MG/ML SOLN
+"DATA",176.112,26804,1)
+308377
+"DATA",176.112,26805,0)
+4001022^ASCORBIC ACID 100MG/ML INJ
+"DATA",176.112,26805,1)
+308376
+"DATA",176.112,26806,0)
+4002159^ASCORBIC AC 250MG/NIACINAMIDE 25MG/VIT A 25000UNT TAB
+"DATA",176.112,26806,1)
+308374
+"DATA",176.112,26807,0)
+4006702^ASA 770MG/CAFN 60MG/ORPHENADRINE CITRATE 50MG TAB
+"DATA",176.112,26807,1)
+308372
+"DATA",176.112,26808,0)
+4010183^ASA 742MG/CAFN 36MG/SALICYLAMIDE 222MG PWDR
+"DATA",176.112,26808,1)
+308371
+"DATA",176.112,26809,0)
+4010181^ASA 650MG/CAFN 32MG/SALICYLAMIDE 195MG PWDR
+"DATA",176.112,26809,1)
+308370
+"DATA",176.112,26810,0)
+4006439^ASA 648MG/BUTALBITAL 50MG/CAFN 40MG TAB
+"DATA",176.112,26810,1)
+308369
+"DATA",176.112,26811,0)
+4009854^ASA 500MG/CAFN 32.4MG/CINNAMEDRINE HCL 14.9MG TAB
+"DATA",176.112,26811,1)
+308368
+"DATA",176.112,26812,0)
+4008412^ASA 500MG/AL OH 80MG/CA CARB 80MG/MG OH 80MG TAB
+"DATA",176.112,26812,1)
+308367
+"DATA",176.112,26813,0)
+4009853^ASA 454MG/CAFN 32.4MG/CINNAMEDRINE HCL 14.9MG TAB
+"DATA",176.112,26813,1)
+308366
+"DATA",176.112,26814,0)
+4006701^ASA 385MG/CAFN 30MG/ORPHENADRINE CITRATE 25MG TAB
+"DATA",176.112,26814,1)
+308365
+"DATA",176.112,26815,0)
+4007623^ASA 325MG/CAFN 30MG/CTM 2MG TAB
+"DATA",176.112,26815,1)
+308364
+"DATA",176.112,26816,0)
+4010182^ASA 325MG/CAFN 16MG/SALICYLAMIDE 95MG TAB
+"DATA",176.112,26816,1)
+308363
+"DATA",176.112,26817,0)
+4009468^ASA 325MG/CA CARB 140MG/MG CARB 57MG/MG OXIDE 45MG TAB
+"DATA",176.112,26817,1)
+308361
+"DATA",176.112,26818,0)
+4009926^ASA 325MG/AL GLYCINATE 50MG/MG CARB 100MG TAB
+"DATA",176.112,26818,1)
+308360
+"DATA",176.112,26819,0)
+4007790^ASA 250MG/ETHOHEPTAZINE CIT 75MG/MEPROBAMATE 150MG TAB
+"DATA",176.112,26819,1)
+308358
+"DATA",176.112,26820,0)
+4006441^ASA 200MG/BUTALBITAL 50MG/CAFN 40MG TAB
+"DATA",176.112,26820,1)
+308357
+"DATA",176.112,26821,0)
+4006440^ASA 200MG/BUTALBITAL 50MG/CAFN 40MG CAP
+"DATA",176.112,26821,1)
+308356
+"DATA",176.112,26822,0)
+4010403^ASA 195MG/BUTALBITAL 50MG/CAFN 44MG/PHENACETIN 130MG TAB
+"DATA",176.112,26822,1)
+308355
+"DATA",176.112,26823,0)
+4014983^ARSENIC TRIOXIDE 1MG/ML INJ
+"DATA",176.112,26823,1)
+308354
+"DATA",176.112,26824,0)
+4009740^ARNICA 20%/ALCOHOL 66% TINCTURE,TOP
+"DATA",176.112,26824,1)
+308353
+"DATA",176.112,26825,0)
+4007670^ARGININE HCL 10GM/100ML INJ
+"DATA",176.112,26825,1)
+308352
+"DATA",176.112,26826,0)
+4007671^ARGININE HCL 30GM/300ML INJ
+"DATA",176.112,26826,1)
+308352
+"DATA",176.112,26827,0)
+4014990^ARGATROBAN 100MG/ML INJ
+"DATA",176.112,26827,1)
+308351
+"DATA",176.112,26828,0)
+4007491^APROBARB 25MG/BUTABARB 50MG/PHENOBARB 25MG TAB
+"DATA",176.112,26828,1)
+308347
+"DATA",176.112,26829,0)
+4010101^APRACLONIDINE HCL 1% SOLN,OPH
+"DATA",176.112,26829,1)
+308346
+"DATA",176.112,26830,0)
+4010102^APRACLONIDINE HCL 0.5% SOLN,OPH
+"DATA",176.112,26830,1)
+308345
+"DATA",176.112,26831,0)
+4008334^APAP 650MG/CTM 4MG/PSEUDEFED 60MG TAB
+"DATA",176.112,26831,1)
+308337
+"DATA",176.112,26832,0)
+4009001^APAP 650MG/CTM 4MG/DM 30MG/PSEUDEFED 60MG POWDER,ORAL
+"DATA",176.112,26832,1)
+308336
+"DATA",176.112,26833,0)
+4005705^APAP 600MG/P-PROPANOL 100MG/P-TOLOXAMINE 66MG TAB,SA
+"DATA",176.112,26833,1)
+308335
+"DATA",176.112,26834,0)
+4008984^APAP 500MG/PSEUDEFED 30MG/TRIPROLIDINE 1.25MG TAB
+"DATA",176.112,26834,1)
+308333
+"DATA",176.112,26835,0)
+4010199^APAP 500MG/DM 15MG/PSEUDEFED 30MG TAB
+"DATA",176.112,26835,1)
+308331
+"DATA",176.112,26836,0)
+4009718^APAP 500MG/DIPHENHYDRAMINE 12.5MG/PSEUDEFED 30MG TAB
+"DATA",176.112,26836,1)
+308330
+"DATA",176.112,26837,0)
+4009873^APAP 500MG/DEXBROMPHENIRAMINE 3MG/PSEUDEFED 60MG TAB
+"DATA",176.112,26837,1)
+308329
+"DATA",176.112,26838,0)
+4008332^APAP 500MG/CTM 2MG/PSEUDEFED 30MG TAB
+"DATA",176.112,26838,1)
+308326
+"DATA",176.112,26839,0)
+4008333^APAP 500MG/CTM 2MG/PSEUDEFED 30MG CAP
+"DATA",176.112,26839,1)
+308325
+"DATA",176.112,26840,0)
+4009002^APAP 500MG/CTM 2MG/DM 15MG/PSEUDEFED 30MG TAB
+"DATA",176.112,26840,1)
+308324
+"DATA",176.112,26841,0)
+4010623^APAP 500MG/CA CARB 111MG/MG CARB 64MG/MG OXIDE 30MG TAB
+"DATA",176.112,26841,1)
+308323
+"DATA",176.112,26842,0)
+4006434^APAP 500MG/BUTALBITAL 50MG/CAFN 40MG CAP
+"DATA",176.112,26842,1)
+308322
+"DATA",176.112,26843,0)
+4010532^APAP 500MG/BROMPHENIRAMINE 2MG/PSEUDEFED 30MG TAB
+"DATA",176.112,26843,1)
+308321
+"DATA",176.112,26844,0)
+4010200^APAP 325MG/DM 15MG/PSEUDEFED 30MG TAB
+"DATA",176.112,26844,1)
+308320
+"DATA",176.112,26845,0)
+4010198^APAP 325MG/DM 10MG/PSEUDEFED 30MG TAB
+"DATA",176.112,26845,1)
+308319
+"DATA",176.112,26846,0)
+4008330^APAP 325MG/CTM 2MG/PSEUDEFED 30MG TAB
+"DATA",176.112,26846,1)
+308317
+"DATA",176.112,26847,0)
+4008329^APAP 325MG/CTM 2MG/PSEUDEFED 30MG CAP
+"DATA",176.112,26847,1)
+308316
+"DATA",176.112,26848,0)
+4005646^APAP 325MG/CTM 2MG/P-EPHRINE 5MG TAB
+"DATA",176.112,26848,1)
+308315
+"DATA",176.112,26849,0)
+4008998^APAP 325MG/CTM 2MG/DM 15MG/PSEUDEFED 30MG TAB
+"DATA",176.112,26849,1)
+308314
+"DATA",176.112,26850,0)
+4008999^APAP 325MG/CTM 2MG/DM 10MG/PSEUDEFED 30MG TAB
+"DATA",176.112,26850,1)
+308313
+"DATA",176.112,26851,0)
+4007907^APAP 325MG/CAFN 30MG/HYOSCYAMUS 8MG CAP
+"DATA",176.112,26851,1)
+308311
+"DATA",176.112,26852,0)
+4008135^APAP 325MG/CAFN 100MG/ISOMETHEPTENE 65MG CAP
+"DATA",176.112,26852,1)
+308310
+"DATA",176.112,26853,0)
+4007636^APAP 300MG/P-TOLOXAMINE 20MG/SALICYLAMIDE 200MG TAB
+"DATA",176.112,26853,1)
+308309
+"DATA",176.112,26854,0)
+4007637^APAP 300MG/P-TOLOXAMINE 20MG/SALICYLAMIDE 200MG CAP
+"DATA",176.112,26854,1)
+308308
+"DATA",176.112,26855,0)
+4008342^APAP 300MG/DM 15MG/GG 100MG/P-EPHRINE 10MG TAB
+"DATA",176.112,26855,1)
+308307
+"DATA",176.112,26856,0)
+4006738^APAP 300MG/CTM 4MG/P-PROPANOL 60MG/SALICYLAMIDE 300MG TAB,SA
+"DATA",176.112,26856,1)
+308306
+"DATA",176.112,26857,0)
+4007359^APAP 300MG/CTM 2MG/P-EPHRINE 5MG/PYRILAMINE 12.5MG TAB
+"DATA",176.112,26857,1)
+308305
+"DATA",176.112,26858,0)
+4005645^APAP 300MG/CTM 2MG/P-EPHRINE 5MG TAB
+"DATA",176.112,26858,1)
+308304
+"DATA",176.112,26859,0)
+4010576^APAP 261MG/CAFN 32MG/GG 100MG/P-EPHRINE 5MG TAB
+"DATA",176.112,26859,1)
+308303
+"DATA",176.112,26860,0)
+4010202^APAP 250MG/DM 7.5MG/PSEUDEFED 15MG/5ML LIQUID
+"DATA",176.112,26860,1)
+308302
+"DATA",176.112,26861,0)
+4010396^APAP 250MG/DM 15MG/DIPHENHYDRAMINE 25MG/PSEUDEFED 30MG CAP
+"DATA",176.112,26861,1)
+308301
+"DATA",176.112,26862,0)
+4009502^APAP 250MG/DM 10MG/GG 100MG/PSEUDEFED 30MG CAP
+"DATA",176.112,26862,1)
+308300
+"DATA",176.112,26863,0)
+4009543^APAP 250MG/DM 10MG/DOXYLAMINE 6.25MG/PSEUDEFED 30MG CAP
+"DATA",176.112,26863,1)
+308299
+"DATA",176.112,26864,0)
+4007579^APAP 250MG/CTM 2MG/P-EPHRINE 5MG/SALICYLAMIDE 250MG TAB
+"DATA",176.112,26864,1)
+308298
+"DATA",176.112,26865,0)
+4017259^ACETAMINOPHEN 250MG/ASPIRIN 250MG/CAFFEINE 65MG TAB
+"DATA",176.112,26865,1)
+308297
+"DATA",176.112,26866,0)
+4009920^APAP 250MG/ASA 250MG/CAFN 65MG TAB
+"DATA",176.112,26866,1)
+308297
+"DATA",176.112,26867,0)
+4008929^APAP 240MG/CAFN 16MG/P-PROPANOL 18MG/SALICYLAMIDE 120MG CAP
+"DATA",176.112,26867,1)
+308296
+"DATA",176.112,26868,0)
+4010033^APAP 226.8MG/CAFN 32.4MG/SALICYLAMIDE 97.2MG TAB
+"DATA",176.112,26868,1)
+308295
+"DATA",176.112,26869,0)
+4010079^APAP 194MG/AL OH 25MG/ASA 227MG/CAFN 33MG/MG OH 50MG TAB
+"DATA",176.112,26869,1)
+308294
+"DATA",176.112,26870,0)
+4007893^APAP 180MG/CAFN 30MG/CTM 2MG/P-EPHRINE 5MG/PYRILAMINE 10MG TAB
+"DATA",176.112,26870,1)
+308293
+"DATA",176.112,26871,0)
+4009541^APAP 167MG/DM 5MG/DOXYLAMINE 1.25MG/PSEUDEFED 10MG/5ML SYRUP
+"DATA",176.112,26871,1)
+308292
+"DATA",176.112,26872,0)
+4009542^APAP 167MG/DM 5MG/DOXYLAMINE 1.25MG/PSEUDEFED 10MG/5ML LIQUID
+"DATA",176.112,26872,1)
+308292
+"DATA",176.112,26873,0)
+4008927^APAP 162MG/ASA 162MG/CAFN 16.2MG/SALICYLAMIDE 162MG TAB
+"DATA",176.112,26873,1)
+308291
+"DATA",176.112,26874,0)
+4009921^APAP 162.5MG/ASA 227.5MG/CAFN 32.5MG TAB
+"DATA",176.112,26874,1)
+308290
+"DATA",176.112,26875,0)
+4009874^APAP 160MG/DM 7.5MG/PSEUDEFED 15MG/5ML (AF) LIQUID
+"DATA",176.112,26875,1)
+308289
+"DATA",176.112,26876,0)
+4010203^APAP 160MG/DM 5MG/PSEUDEFED 15MG/5ML LIQUID
+"DATA",176.112,26876,1)
+308288
+"DATA",176.112,26877,0)
+4009635^APAP 160MG/ASA 230MG/CAFN 33MG/CA GLUCONATE 60MG TAB
+"DATA",176.112,26877,1)
+308287
+"DATA",176.112,26878,0)
+4007942^APAP 150MG/AT SO4 0.3MG/ETHAVERINE 20MG/SALICYLAMIDE 100MG TAB
+"DATA",176.112,26878,1)
+308286
+"DATA",176.112,26879,0)
+4009922^APAP 129.6MG/ASA 259.2MG/CAFN 16.2MG CAP
+"DATA",176.112,26879,1)
+308284
+"DATA",176.112,26880,0)
+4009500^APAP 125MG/DM 7.5/GG 50MG/PSEUDEFED 15MG/5ML LIQUID
+"DATA",176.112,26880,1)
+308283
+"DATA",176.112,26881,0)
+4007577^APAP 125MG/CTM 4MG/P-EPHRINE 5MG/SALICYLAMIDE 150MG TAB
+"DATA",176.112,26881,1)
+308282
+"DATA",176.112,26882,0)
+4009923^APAP 125MG/ASA 240MG/CAFN 32MG TAB
+"DATA",176.112,26882,1)
+308281
+"DATA",176.112,26883,0)
+4007309^APAP 120MG/CTM 4MG/DM 15MG/P-EPHRINE 5MG/5ML SUSP
+"DATA",176.112,26883,1)
+308280
+"DATA",176.112,26884,0)
+4008925^APAP 120MG/AL OH 100MG/ASA 260MG/SALICYLAMIDE 120MG TAB
+"DATA",176.112,26884,1)
+308279
+"DATA",176.112,26885,0)
+4008926^APAP 115MG/ASA 210MG/CAFN 16MG/SALICYLAMIDE 65MG TAB
+"DATA",176.112,26885,1)
+308278
+"DATA",176.112,26886,0)
+4008163^ANTIPYRINE 5%/HC 0.1%/N-MYCIN 5MG/POLYMYX 2000UNT/ML SOLN,OTIC
+"DATA",176.112,26886,1)
+308274
+"DATA",176.112,26887,0)
+4003602^ANTIPYRINE 5%/BENZOCAINE 5%/P-EPHRINE 0.25% SOLN,OTIC
+"DATA",176.112,26887,1)
+308273
+"DATA",176.112,26888,0)
+4007493^ANTIPYRINE 4.7%/BENZOCAINE 1%/GLYCERIN SOLN,OTIC
+"DATA",176.112,26888,1)
+308272
+"DATA",176.112,26889,0)
+4009168^ANTIPYRINE 0.1%/PHENYLEPHRINE 0.12% SOLN,OPH
+"DATA",176.112,26889,1)
+308271
+"DATA",176.112,26890,0)
+4007241^ANTICOAGULANT SODIUM CITRATE SOLN
+"DATA",176.112,26890,1)
+308263
+"DATA",176.112,26891,0)
+4003531^ANTI-THYMOCYTE GLOBULIN 50MG/ML INJ
+"DATA",176.112,26891,1)
+308260
+"DATA",176.112,26892,0)
+4007950^ANTAZOLINE PO4 0.5%/NAPHAZOLINE HCL 0.05% SOLN,OPH
+"DATA",176.112,26892,1)
+308256
+"DATA",176.112,26893,0)
+4007626^ANTAZOLINE HCL 200MG TAB
+"DATA",176.112,26893,1)
+308255
+"DATA",176.112,26894,0)
+4007625^ANTAZOLINE HCL 100MG TAB
+"DATA",176.112,26894,1)
+308254
+"DATA",176.112,26895,0)
+4005196^ANISOTROPINE METHYLBROMIDE 50MG TAB
+"DATA",176.112,26895,1)
+308253
+"DATA",176.112,26896,0)
+4004743^AMYLASE 97500UNT/LIPASE 30000UNT/PROTEASE 97500UNT CAP
+"DATA",176.112,26896,1)
+308245
+"DATA",176.112,26897,0)
+4004750^AMYLASE 90000UNT/LIPASE 32000UNT/PROTEASE 70000UNT CAP,EC
+"DATA",176.112,26897,1)
+308244
+"DATA",176.112,26898,0)
+4004742^AMYLASE 78000UNT/LIPASE 24000UNT/PROTEASE 78000UNT CAP
+"DATA",176.112,26898,1)
+308243
+"DATA",176.112,26899,0)
+4004745^AMYLASE 75000UNT/LIPASE 25000UNT/PROTEASE 63000UNT CAP,EC
+"DATA",176.112,26899,1)
+308242
+"DATA",176.112,26900,0)
+4004749^AMYLASE 70000UNT/LIPASE 25000UNT/PROTEASE 55000UNT CAP,EC
+"DATA",176.112,26900,1)
+308241
+"DATA",176.112,26901,0)
+4004741^AMYLASE 65000UNT/LIPASE 20000UNT/PROTEASE 65000UNT CAP
+"DATA",176.112,26901,1)
+308239
+"DATA",176.112,26902,0)
+4010414^AMYLASE 60MG/PAPAIN 60MG TAB,CHEW
+"DATA",176.112,26902,1)
+308238
+"DATA",176.112,26903,0)
+4004757^AMYLASE 56000UNT/LIPASE 20000UNT/PROTEASE 44000UNT CAP,EC
+"DATA",176.112,26903,1)
+308237
+"DATA",176.112,26904,0)
+4004730^AMYLASE 48000UNT/LIPASE 6500UNT/PROTEASE 32000UNT TAB
+"DATA",176.112,26904,1)
+308236
+"DATA",176.112,26905,0)
+4004753^AMYLASE 48000UNT/LIPASE 16000UNT/PROTEASE 48000UNT CAP,EC
+"DATA",176.112,26905,1)
+308235
+"DATA",176.112,26906,0)
+4025896^AMYLASE 48000UNT/LIPASE 16000UNT/PROTEASE 48000UNT CAP,EC
+"DATA",176.112,26906,1)
+308235
+"DATA",176.112,26907,0)
+4004732^AMYLASE 40000UNT/LIPASE 8000UNT/PROTEASE 50000UNT CAP
+"DATA",176.112,26907,1)
+308234
+"DATA",176.112,26908,0)
+4004740^AMYLASE 39000UNT/LIPASE 12000UNT/PROTEASE 39000UNT CAP
+"DATA",176.112,26908,1)
+308233
+"DATA",176.112,26909,0)
+4004747^AMYLASE 33200/LIPASE 10000UNT/PROTEASE 37500UNT CAP
+"DATA",176.112,26909,1)
+308232
+"DATA",176.112,26910,0)
+4016537^AMYLASE 33200UNT/LIPASE 10000UNT/PROTEASE 37500UNT CAP,EC
+"DATA",176.112,26910,1)
+308232
+"DATA",176.112,26911,0)
+4006724^AMYLASE 30MG/CELLULASE 2MG/LIPASE 75MG/PROTEASE 6MG CAP
+"DATA",176.112,26911,1)
+308231
+"DATA",176.112,26912,0)
+4005084^AMYLASE 30000UNT/PROTEASE 30000UNT CAP
+"DATA",176.112,26912,1)
+308230
+"DATA",176.112,26913,0)
+4004725^AMYLASE 30000UNT/LIPASE 8000UNT/PROTEASE 30000UNT TAB
+"DATA",176.112,26913,1)
+308228
+"DATA",176.112,26914,0)
+4014845^AMYLASE 30000UNT/LIPASE 8000UNT/PROTEASE 30000 UNT TAB
+"DATA",176.112,26914,1)
+308228
+"DATA",176.112,26915,0)
+4004735^AMYLASE 30000UNT/LIPASE 8000UNT/PROTEASE 13000UNT TAB
+"DATA",176.112,26915,1)
+308227
+"DATA",176.112,26916,0)
+4004734^AMYLASE 30000UNT/LIPASE 8000UNT/PROTEASE 13000UNT CAP,EC
+"DATA",176.112,26916,1)
+308226
+"DATA",176.112,26917,0)
+4004733^AMYLASE 30000UNT/LIPASE 6000UNT/PROTEASE 20000UNT TAB,EC
+"DATA",176.112,26917,1)
+308225
+"DATA",176.112,26918,0)
+4004751^AMYLASE 30000UNT/LIPASE 10000UNT/PROTEASE 30000UNT CAP,EC
+"DATA",176.112,26918,1)
+308224
+"DATA",176.112,26919,0)
+4015904^AMYLASE 30000UNT/LIPASE 10000UNT/PROTEASE 30000UNT CAP,EC
+"DATA",176.112,26919,1)
+308224
+"DATA",176.112,26920,0)
+4004736^AMYLASE 25000UNT/LIPASE 2000UNT/PROTEASE 25000UNT TAB,EC
+"DATA",176.112,26920,1)
+308223
+"DATA",176.112,26921,0)
+4004744^AMYLASE 24000UNT/LIPASE 12000UNT/PROTEASE 24000UNT CAP,EC
+"DATA",176.112,26921,1)
+308222
+"DATA",176.112,26922,0)
+4004727^AMYLASE 20000UNT/LIPASE 4000UNT/PROTEASE 25000UNT CAP,EC
+"DATA",176.112,26922,1)
+308221
+"DATA",176.112,26923,0)
+4017021^AMYLASE 20000UNT/LIPASE 4000UNT/PROTEASE 25000UNT CAP,EC
+"DATA",176.112,26923,1)
+308221
+"DATA",176.112,26924,0)
+4004738^AMYLASE 20000UNT/LIPASE 4000UNT/PROTEASE 20000UNT CAP
+"DATA",176.112,26924,1)
+308220
+"DATA",176.112,26925,0)
+4004746^AMYLASE 19MG/LIPASE 27.5MG/PROTEASE 5MG TAB,CHEW
+"DATA",176.112,26925,1)
+308219
+"DATA",176.112,26926,0)
+4004739^AMYLASE 19500UNT/LIPASE 6000UNT/PROTEASE 19500UNT CAP
+"DATA",176.112,26926,1)
+308218
+"DATA",176.112,26927,0)
+4004754^AMYLASE 12500UNT/LIPASE 1000UNT/PROTEASE 12500UNT TAB,EC
+"DATA",176.112,26927,1)
+308216
+"DATA",176.112,26928,0)
+4004752^AMYLASE 12000UNT/LIPASE 4000UNT/PROTEASE 12000UNT CAP,EC
+"DATA",176.112,26928,1)
+308215
+"DATA",176.112,26929,0)
+4001211^AMYL NITRITE 0.18ML/AMP,INHL
+"DATA",176.112,26929,1)
+308214
+"DATA",176.112,26930,0)
+4001330^AMPICILLIN 500MG CAP
+"DATA",176.112,26930,1)
+308212
+"DATA",176.112,26931,0)
+4001338^AMPICILLIN TRIHYDRATE 500MG CAP
+"DATA",176.112,26931,1)
+308212
+"DATA",176.112,26932,0)
+4001329^AMPICILLIN TRIHYDRATE 250MG/5ML SUSP
+"DATA",176.112,26932,1)
+308210
+"DATA",176.112,26933,0)
+4001335^AMPICILLIN 250MG/5ML SUSP
+"DATA",176.112,26933,1)
+308210
+"DATA",176.112,26934,0)
+4001333^AMPICILLIN TRIHYDRATE 100MG/ML DROPS,ORAL
+"DATA",176.112,26934,1)
+308209
+"DATA",176.112,26935,0)
+4001337^AMPICILLIN 100MG/ML DROPS,ORAL
+"DATA",176.112,26935,1)
+308209
+"DATA",176.112,26936,0)
+4001343^AMPICILLIN TRIHYDRATE 500MG/5ML SUSP
+"DATA",176.112,26936,1)
+308209
+"DATA",176.112,26937,0)
+4008599^AMPICILLIN NA/SULBACTAM NA 3GM/VIL INJ
+"DATA",176.112,26937,1)
+308208
+"DATA",176.112,26938,0)
+4008598^AMPICILLIN NA/SULBACTAM NA 1.5GM/VIL INJ
+"DATA",176.112,26938,1)
+308208
+"DATA",176.112,26939,0)
+4001344^AMPICILLIN NA 125MG/VIL INJ,ADD-VANTAGE
+"DATA",176.112,26939,1)
+308207
+"DATA",176.112,26940,0)
+4001336^AMPICILLIN NA 125MG/VIL INJ
+"DATA",176.112,26940,1)
+308207
+"DATA",176.112,26941,0)
+4001742^AMPHOTERICIN B 50MG/TETRACYCLINE HCL 250MG CAP
+"DATA",176.112,26941,1)
+308206
+"DATA",176.112,26942,0)
+4007330^AMPHETAMINE SO4 5MG TAB
+"DATA",176.112,26942,1)
+308202
+"DATA",176.112,26943,0)
+4006756^AMPHETAMINE 7.5MG/DEXTROAMPHETAMINE 7.5MG CAP
+"DATA",176.112,26943,1)
+308199
+"DATA",176.112,26944,0)
+4006754^AMPHETAMINE 2.5MG/DEXTROAMPHETAMINE 5MG CAP
+"DATA",176.112,26944,1)
+308198
+"DATA",176.112,26945,0)
+4014024^AMOXICILLIN TRIHYDRATE 875MG TAB
+"DATA",176.112,26945,1)
+308194
+"DATA",176.112,26946,0)
+4014023^AMOXICILLIN TRIHYDRATE 500MG TAB
+"DATA",176.112,26946,1)
+308192
+"DATA",176.112,26947,0)
+4001649^AMOXICILLIN 500MG CAP
+"DATA",176.112,26947,1)
+308191
+"DATA",176.112,26948,0)
+4001640^AMOXICILLIN TRIHYDRATE 500MG CAP
+"DATA",176.112,26948,1)
+308191
+"DATA",176.112,26949,0)
+4001656^AMOXICILLIN TRIHYDRATE 500MG CAP,UD
+"DATA",176.112,26949,1)
+308191
+"DATA",176.112,26950,0)
+4014028^AMOXICILLIN TRIHYDRATE 400MG/5ML SUSP
+"DATA",176.112,26950,1)
+308189
+"DATA",176.112,26951,0)
+4014026^AMOXICILLIN TRIHYDRATE 400MG TAB,CHEWABLE
+"DATA",176.112,26951,1)
+308188
+"DATA",176.112,26952,0)
+4001652^AMOXICILLIN TRIHYDRATE 250MG TAB
+"DATA",176.112,26952,1)
+308183
+"DATA",176.112,26953,0)
+4001648^AMOXICILLIN 250MG CAP
+"DATA",176.112,26953,1)
+308182
+"DATA",176.112,26954,0)
+4001639^AMOXICILLIN TRIHYDRATE 250MG CAP
+"DATA",176.112,26954,1)
+308182
+"DATA",176.112,26955,0)
+4001655^AMOXICILLIN TRIHYDRATE 250MG CAP,UD
+"DATA",176.112,26955,1)
+308182
+"DATA",176.112,26956,0)
+4014025^AMOXICILLIN TRIHYDRATE 200MG TAB,CHEWABLE
+"DATA",176.112,26956,1)
+308181
+"DATA",176.112,26957,0)
+4001646^AMOXICILLIN TRIHYDRATE 125MG TAB,CHEWABLE
+"DATA",176.112,26957,1)
+308177
+"DATA",176.112,26958,0)
+4001653^AMOXICILLIN 125MG TAB,CHEWABLE
+"DATA",176.112,26958,1)
+308177
+"DATA",176.112,26959,0)
+4008166^AMODIAQUINE HCL 100MG TAB
+"DATA",176.112,26959,1)
+308173
+"DATA",176.112,26960,0)
+4001174^AMOBARBITAL NA 65MG CAP
+"DATA",176.112,26960,1)
+308172
+"DATA",176.112,26961,0)
+4007609^AMOBARBITAL NA 50MG/SECOBARBITAL NA 50MG CAP
+"DATA",176.112,26961,1)
+308171
+"DATA",176.112,26962,0)
+4001172^AMOBARBITAL NA 500MG/AMP INJ
+"DATA",176.112,26962,1)
+308170
+"DATA",176.112,26963,0)
+4001173^AMOBARBITAL NA 200MG CAP
+"DATA",176.112,26963,1)
+308169
+"DATA",176.112,26964,0)
+4007610^AMOBARBITAL NA 100MG/SECOBARBITAL NA 65MG CAP
+"DATA",176.112,26964,1)
+308168
+"DATA",176.112,26965,0)
+4007611^AMOBARBITAL NA 100MG/SECOBARBITAL NA 100MG CAP
+"DATA",176.112,26965,1)
+308167
+"DATA",176.112,26966,0)
+4009965^AMOBARBITAL 50MG/EPHEDRINE SO4 25MG CAP
+"DATA",176.112,26966,1)
+308166
+"DATA",176.112,26967,0)
+4001168^AMOBARBITAL 50MG TAB
+"DATA",176.112,26967,1)
+308165
+"DATA",176.112,26968,0)
+4001170^AMOBARBITAL 30MG TAB
+"DATA",176.112,26968,1)
+308164
+"DATA",176.112,26969,0)
+4001169^AMOBARBITAL 15MG TAB
+"DATA",176.112,26969,1)
+308163
+"DATA",176.112,26970,0)
+4001167^AMOBARBITAL 100MG TAB
+"DATA",176.112,26970,1)
+308162
+"DATA",176.112,26971,0)
+4006938^AMMONIUM SILICOFLUORIDE 0.4% PASTE
+"DATA",176.112,26971,1)
+308161
+"DATA",176.112,26972,0)
+4010042^AMMONIUM PO4 95MG/DI-NA PYRO-PO4 55MG/NA BI-PO4 100MG TAB,EC
+"DATA",176.112,26972,1)
+308160
+"DATA",176.112,26973,0)
+4010041^AMMONIUM PO4 95MG/DI-NA PYRO-PO4 55MG/NA BI-PO4 100MG TAB
+"DATA",176.112,26973,1)
+308159
+"DATA",176.112,26974,0)
+4007916^AMMONIUM CL 15MG/ANTIMONY K TARTRATE 6.6MG/IPECAC 1MG TAB
+"DATA",176.112,26974,1)
+308151
+"DATA",176.112,26975,0)
+4007512^AMMONIUM CL 130MG/K GUAIACOLSULF 130MG/TERPIN HYDRATE 65MG TAB
+"DATA",176.112,26975,1)
+308149
+"DATA",176.112,26976,0)
+4006241^AMMONIUM CHLORIDE 500MG TAB,EC
+"DATA",176.112,26976,1)
+308147
+"DATA",176.112,26977,0)
+4009875^AMMONIUM CHLORIDE 22MG/IPECAC 0.24MG/5ML LIQUID
+"DATA",176.112,26977,1)
+308145
+"DATA",176.112,26978,0)
+4006240^AMMONIUM CHLORIDE 0.4MEQ/ML INJ
+"DATA",176.112,26978,1)
+308144
+"DATA",176.112,26979,0)
+4008404^AMMONIA,AROMATIC 0.4ML AMP,INHL
+"DATA",176.112,26979,1)
+308142
+"DATA",176.112,26980,0)
+4008401^AMMONIA,AROMATIC 0.3ML AMP,INHL
+"DATA",176.112,26980,1)
+308141
+"DATA",176.112,26981,0)
+4012860^AMLODIPINE BESYLATE 5MG/BENAZEPRIL HCL 20MG CAP
+"DATA",176.112,26981,1)
+308139
+"DATA",176.112,26982,0)
+4012859^AMLODIPINE BESYLATE 5MG/BENAZEPRIL HCL 10MG CAP
+"DATA",176.112,26982,1)
+308138
+"DATA",176.112,26983,0)
+4012858^AMLODIPINE BESYLATE 2.5MG/BENAZEPRIL HCL 10MG CAP
+"DATA",176.112,26983,1)
+308137
+"DATA",176.112,26984,0)
+4010273^AMLODIPINE BESYLATE 2.5MG TAB
+"DATA",176.112,26984,1)
+308136
+"DATA",176.112,26985,0)
+4010275^AMLODIPINE BESYLATE 10MG TAB
+"DATA",176.112,26985,1)
+308135
+"DATA",176.112,26986,0)
+4002879^AMITRIPTYLINE HCL 50MG/PERPHENAZINE 4MG TAB
+"DATA",176.112,26986,1)
+308134
+"DATA",176.112,26987,0)
+4002883^AMITRIPTYLINE HCL 25MG/PERPHENAZINE 4MG TAB
+"DATA",176.112,26987,1)
+308133
+"DATA",176.112,26988,0)
+4002881^AMITRIPTYLINE HCL 25MG/PERPHENAZINE 2MG TAB
+"DATA",176.112,26988,1)
+308132
+"DATA",176.112,26989,0)
+4006946^AMITRIPTYLINE HCL 25MG/CHLORDIAZEPOXIDE 10MG TAB
+"DATA",176.112,26989,1)
+308131
+"DATA",176.112,26990,0)
+4006945^AMITRIPTYLINE HCL 12.5MG/CHLORDIAZEPOXIDE 5MG TAB
+"DATA",176.112,26990,1)
+308130
+"DATA",176.112,26991,0)
+4006947^AMITRIPTYLINE HCL 12.5MG/CHLORDIAZEPOXIDE 5MG CAP
+"DATA",176.112,26991,1)
+308129
+"DATA",176.112,26992,0)
+4001974^AMITRIPTYLINE HCL 10MG/ML INJ
+"DATA",176.112,26992,1)
+308128
+"DATA",176.112,26993,0)
+4006877^AMINOSALICYLIC ACID 500MG TAB,EC
+"DATA",176.112,26993,1)
+308123
+"DATA",176.112,26994,0)
+4006876^AMINOSALICYLIC ACID 500MG TAB
+"DATA",176.112,26994,1)
+308122
+"DATA",176.112,26995,0)
+4003371^AMINOPHYLLINE 500MG SUPP,RTL
+"DATA",176.112,26995,1)
+308121
+"DATA",176.112,26996,0)
+4003362^AMINOPHYLLINE DIHYDRATE 500MG SUPP,RTL
+"DATA",176.112,26996,1)
+308121
+"DATA",176.112,26997,0)
+4003370^AMINOPHYLLINE DIHYDRATE 25MG/ML INJ
+"DATA",176.112,26997,1)
+308120
+"DATA",176.112,26998,0)
+4003367^AMINOPHYLLINE 25MG/ML INJ
+"DATA",176.112,26998,1)
+308120
+"DATA",176.112,26999,0)
+4003366^AMINOPHYLLINE 200MG TAB
+"DATA",176.112,26999,1)
+308119
+"DATA",176.112,27000,0)
+4003364^AMINOPHYLLINE DIHYDRATE 200MG TAB
+"DATA",176.112,27000,1)
+308119
+"DATA",176.112,27001,0)
+4006259^AMINOPHYLLINE DIHYDRATE 1MG/ML/NACL 0.45% INJ
+"DATA",176.112,27001,1)
+308118
+"DATA",176.112,27002,0)
+4003379^AMINOPHYLLINE 97.5MG TAB
+"DATA",176.112,27002,1)
+308117
+"DATA",176.112,27003,0)
+4003375^AMINOPHYLLINE 60MG/ML SOLN,RTL
+"DATA",176.112,27003,1)
+308116
+"DATA",176.112,27004,0)
+4003368^AMINOPHYLLINE 225MG TAB,SA
+"DATA",176.112,27004,1)
+308114
+"DATA",176.112,27005,0)
+4003373^AMINOPHYLLINE 200MG TAB,EC
+"DATA",176.112,27005,1)
+308113
+"DATA",176.112,27006,0)
+4003380^AMINOPHYLLINE 195MG TAB
+"DATA",176.112,27006,1)
+308112
+"DATA",176.112,27007,0)
+4006873^AMINOPHYLLINE 180MG/EPHEDRINE 48MG/PHENOBARB 25MG TAB,SA
+"DATA",176.112,27007,1)
+308111
+"DATA",176.112,27008,0)
+4006769^AMINOPHYLLINE 130MG/POTASSIUM IODIDE 195MG TAB
+"DATA",176.112,27008,1)
+308110
+"DATA",176.112,27009,0)
+4006776^AMINOPHYLLINE 130MG/EPHEDRINE 16MG/PHENOBARB 8MG/KI 195MG TAB
+"DATA",176.112,27009,1)
+308108
+"DATA",176.112,27010,0)
+4006777^AMINOPHYLLINE 130MG/EPHEDRINE 16MG/GG 100MG/PHENOBARB 8MG TAB
+"DATA",176.112,27010,1)
+308107
+"DATA",176.112,27011,0)
+4006872^AMINOPHYLLINE 120MG/EPHEDRINE 24MG/PHENOBARB 24MG CAP
+"DATA",176.112,27011,1)
+308106
+"DATA",176.112,27012,0)
+4003369^AMINOPHYLLINE 105MG/5ML SOLN,ORAL
+"DATA",176.112,27012,1)
+308105
+"DATA",176.112,27013,0)
+4003372^AMINOPHYLLINE 100MG TAB,EC
+"DATA",176.112,27013,1)
+308103
+"DATA",176.112,27014,0)
+4002972^AMILORIDE HCL 5MG/HYDROCHLOROTHIAZIDE 50MG TAB
+"DATA",176.112,27014,1)
+308098
+"DATA",176.112,27015,0)
+4012907^AMIFOSTINE 500MG/MANNITOL 500MG/VIL INJ
+"DATA",176.112,27015,1)
+308096
+"DATA",176.112,27016,0)
+4016924^AMIFOSTINE 500MG/VIL INJ
+"DATA",176.112,27016,1)
+308096
+"DATA",176.112,27017,0)
+4004283^AMBENONIUM CL 10MG TAB
+"DATA",176.112,27017,1)
+308095
+"DATA",176.112,27018,0)
+4007903^ALUMINUM SO4 2.5% SOLN
+"DATA",176.112,27018,1)
+308093
+"DATA",176.112,27019,0)
+4009142^ALUMINUM PHOSPHATE 234MG/5ML SUSP,ORAL
+"DATA",176.112,27019,1)
+308091
+"DATA",176.112,27020,0)
+4009517^ALUMINUM HYDROXIDE 80MG/MAGNESIUM TRISILICATE 20MG TAB,CHEWABLE
+"DATA",176.112,27020,1)
+308087
+"DATA",176.112,27021,0)
+4008316^ALUMINUM HYDROXIDE 675MG/5ML GEL
+"DATA",176.112,27021,1)
+308086
+"DATA",176.112,27022,0)
+4008376^ALUMINUM HYDROXIDE 600MG/MAGNESIUM HYDROXIDE 300MG/5ML SUSP,ORAL
+"DATA",176.112,27022,1)
+308085
+"DATA",176.112,27023,0)
+4008312^ALUMINUM HYDROXIDE 600MG/5ML LIQUID
+"DATA",176.112,27023,1)
+308084
+"DATA",176.112,27024,0)
+4008311^ALUMINUM HYDROXIDE 600MG TAB,CHEWABLE
+"DATA",176.112,27024,1)
+308083
+"DATA",176.112,27025,0)
+4008378^ALUMINUM HYDROXIDE 565MG/MAGNESIUM HYDROXIDE 180MG/5ML SUSP,ORAL
+"DATA",176.112,27025,1)
+308082
+"DATA",176.112,27026,0)
+4008315^ALUMINUM HYDROXIDE 450MG/5ML GEL
+"DATA",176.112,27026,1)
+308081
+"DATA",176.112,27027,0)
+4009514^ALUMINUM HYDROXIDE 32MG/MAGNESIUM CARBONATE 137MG/5ML SUSP,ORAL
+"DATA",176.112,27027,1)
+308080
+"DATA",176.112,27028,0)
+4008319^ALUMINUM HYDROXIDE 320MG/5ML SUSP (UNFLAVORED)
+"DATA",176.112,27028,1)
+308079
+"DATA",176.112,27029,0)
+4027357^ALUMINUM HYDROXIDE 320MG/5ML SUSP,ORAL,30ML
+"DATA",176.112,27029,1)
+308078^^^ALUMINUM HYDROXIDE 320MG/5ML SUSP 30ML^Y
+"DATA",176.112,27030,0)
+4008309^ALUMINUM HYDROXIDE 320MG/5ML SUSP
+"DATA",176.112,27030,1)
+308078
+"DATA",176.112,27031,0)
+4008374^ALUMINUM HYDROXIDE 307MG/MAGNESIUM HYDROXIDE 103MG/5ML SUSP
+"DATA",176.112,27031,1)
+308077
+"DATA",176.112,27032,0)
+4008310^ALUMINUM HYDROXIDE 300MG TAB,CHEWABLE
+"DATA",176.112,27032,1)
+308076
+"DATA",176.112,27033,0)
+4009516^ALUMINUM HYDROXIDE 280MG/MAGNESIUM CARBONATE 350MG/5ML SUSP
+"DATA",176.112,27033,1)
+308075
+"DATA",176.112,27034,0)
+4008377^ALUMINUM HYDROXIDE 180MG/MAGNESIUM HYDROXIDE 160MG TAB
+"DATA",176.112,27034,1)
+308074
+"DATA",176.112,27035,0)
+4009518^ALUMINUM HYDROXIDE 163MG/MAGNESIUM TRISILICATE 250MG TAB
+"DATA",176.112,27035,1)
+308073
+"DATA",176.112,27036,0)
+4009515^ALUMINUM HYDROXIDE 160MG/MAGNESIUM CARBONATE 105MG TAB,CHEWABLE
+"DATA",176.112,27036,1)
+308072
+"DATA",176.112,27037,0)
+4006783^ALUMINUM CL HEXAHYDRATE 20% SOLN,TOP
+"DATA",176.112,27037,1)
+308071
+"DATA",176.112,27038,0)
+4008430^ALUMINUM CARBONATE GEL 500MG TAB
+"DATA",176.112,27038,1)
+308065
+"DATA",176.112,27039,0)
+4008427^ALUMINUM CARBONATE GEL 500MG CAP
+"DATA",176.112,27039,1)
+308064
+"DATA",176.112,27040,0)
+4008428^ALUMINUM CARBONATE GEL 400MG/5ML SUSP
+"DATA",176.112,27040,1)
+308063
+"DATA",176.112,27041,0)
+4008429^ALUMINUM CARBONATE GEL 1000MG/5ML SUSP
+"DATA",176.112,27041,1)
+308062
+"DATA",176.112,27042,0)
+4009833^ALUMINUM ACETATE 1%/CAMPHOR 3%/MENTHOL 0.5%/PHENOL 1% CREAM,TOP
+"DATA",176.112,27042,1)
+308058
+"DATA",176.112,27043,0)
+4008364^ALTEPLASE,RECOMBINANT 100MG/VIL INJ
+"DATA",176.112,27043,1)
+308056
+"DATA",176.112,27044,0)
+4025335^ALTEPLASE,RECOMBINANT 50MG/VIL INJ
+"DATA",176.112,27044,1)
+308056
+"DATA",176.112,27045,0)
+4025334^ALTEPLACE,RECOMBINANT 50MG/VIL INJ
+"DATA",176.112,27045,1)
+308056
+"DATA",176.112,27046,0)
+4015679^ALTEPLASE,RECOMBINANT 2MG/VIL INJ
+"DATA",176.112,27046,1)
+308056
+"DATA",176.112,27047,0)
+4008363^ALTEPLASE,RECOMBINANT 1MG/ML INJ
+"DATA",176.112,27047,1)
+308056
+"DATA",176.112,27048,0)
+4006704^ALSEROXYLON 2MG TAB
+"DATA",176.112,27048,1)
+308055
+"DATA",176.112,27049,0)
+4003539^ALPROSTADIL 500MCG SUPP,URETHRAL
+"DATA",176.112,27049,1)
+308054
+"DATA",176.112,27050,0)
+4003538^ALPROSTADIL 250MCG SUPP,URETHRAL
+"DATA",176.112,27050,1)
+308052
+"DATA",176.112,27051,0)
+4003540^ALPROSTADIL 1000MCG SUPP,URETHRAL
+"DATA",176.112,27051,1)
+308051
+"DATA",176.112,27052,0)
+4003447^ALPRAZOLAM 1MG/ML CONC,ORAL
+"DATA",176.112,27052,1)
+308050
+"DATA",176.112,27053,0)
+4003446^ALPRAZOLAM 0.5MG/5ML SOLN,ORAL
+"DATA",176.112,27053,1)
+308049
+"DATA",176.112,27054,0)
+4003443^ALPRAZOLAM 0.5MG TAB
+"DATA",176.112,27054,1)
+308048
+"DATA",176.112,27055,0)
+4015275^ALPRAZOLAM 0.5MG TAB,UD
+"DATA",176.112,27055,1)
+308048
+"DATA",176.112,27056,0)
+4014496^ALPRAZOLAM 0.25MG TAB,UD
+"DATA",176.112,27056,1)
+308047
+"DATA",176.112,27057,0)
+4003442^ALPRAZOLAM 0.25MG TAB
+"DATA",176.112,27057,1)
+308047
+"DATA",176.112,27058,0)
+4002273^ALPHAPRODINE HCL 60MG/ML INJ
+"DATA",176.112,27058,1)
+308046
+"DATA",176.112,27059,0)
+4002272^ALPHAPRODINE HCL 40MG/ML INJ
+"DATA",176.112,27059,1)
+308045
+"DATA",176.112,27060,0)
+4007083^ALOIN 8.1MG/APIOLE 290MG/ERGOT 259.2MG CAP
+"DATA",176.112,27060,1)
+308038
+"DATA",176.112,27061,0)
+4007257^ALLERGENIC EXTRACT,TIMOTHY GRASS POLLEN 5 % INJ
+"DATA",176.112,27061,1)
+308026
+"DATA",176.112,27062,0)
+4007253^ALLERGENIC EXTRACT,TIMOTHY GRASS POLLEN 40000 PNU/ML INJ
+"DATA",176.112,27062,1)
+308025
+"DATA",176.112,27063,0)
+4007256^ALLERGENIC EXTRACT,TIMOTHY GRASS POLLEN 3 % INJ
+"DATA",176.112,27063,1)
+308024
+"DATA",176.112,27064,0)
+4007252^ALLERGENIC EXTRACT,TIMOTHY GRASS POLLEN 20000 PNU/ML INJ
+"DATA",176.112,27064,1)
+308023
+"DATA",176.112,27065,0)
+4007255^ALLERGENIC EXTRACT,TIMOTHY GRASS POLLEN 2 % INJ
+"DATA",176.112,27065,1)
+308022
+"DATA",176.112,27066,0)
+4004433^ALLERGENIC EXTRACT, GRASS, TIMOTHY, 10000PNU/ML, INJ
+"DATA",176.112,27066,1)
+308021
+"DATA",176.112,27067,0)
+4007251^ALLERGENIC EXTRACT,TIMOTHY GRASS POLLEN 10000 PNU/ML INJ
+"DATA",176.112,27067,1)
+308021
+"DATA",176.112,27068,0)
+4007254^ALLERGENIC EXTRACT,TIMOTHY GRASS POLLEN 1 % INJ
+"DATA",176.112,27068,1)
+308020
+"DATA",176.112,27069,0)
+4004444^ALLERGENIC EXTRACT,THISTLE,RUSSIAN 20000PNU/ML INJ
+"DATA",176.112,27069,1)
+308019
+"DATA",176.112,27070,0)
+4008130^ALLERGENIC EXTRACT,RAGWEED STOCK POLLEN INJ
+"DATA",176.112,27070,1)
+308017
+"DATA",176.112,27071,0)
+4004505^ALLERGENIC EXTRACT,HOUSE DUST,STOCK 100UNT/ML INJ
+"DATA",176.112,27071,1)
+308012
+"DATA",176.112,27072,0)
+4004504^ALLERGENIC EXTRACT,HOUSE DUST,STOCK 1000UNT/ML INJ
+"DATA",176.112,27072,1)
+308011
+"DATA",176.112,27073,0)
+4008131^ALLERGENIC EXTRACT,FOOD,WHEAT INJ
+"DATA",176.112,27073,1)
+308007
+"DATA",176.112,27074,0)
+4008133^ALLERGENIC EXTRACT,DUST INJ
+"DATA",176.112,27074,1)
+308006
+"DATA",176.112,27075,0)
+4004486^ALLERGENIC EXTRACT,DOG EPITHELIA INJ
+"DATA",176.112,27075,1)
+308005
+"DATA",176.112,27076,0)
+4004528^ALLERGENIC EXTRACT, WEED, YELLOW DOCK 10000PNU/ML INJ
+"DATA",176.112,27076,1)
+308004
+"DATA",176.112,27077,0)
+4004434^ALLERGENIC EXTRACT, WEED, WEST MIX 10000PNU/ML INJ
+"DATA",176.112,27077,1)
+308003
+"DATA",176.112,27078,0)
+4004437^ALLERGENIC EXTRACT, WEED, KOCHIA 20000PNU/ML INJ
+"DATA",176.112,27078,1)
+308002
+"DATA",176.112,27079,0)
+4004436^ALLERGENIC EXTRACT, WEED, KOCHIA 10000PNU/ML INJ
+"DATA",176.112,27079,1)
+308001
+"DATA",176.112,27080,0)
+4004435^ALLERGENIC EXTRACT, WEED, CARELESS 10000PNU/ML INJ
+"DATA",176.112,27080,1)
+308000
+"DATA",176.112,27081,0)
+4006904^ALLERGENIC EXTRACT, WASP 20000 PNU/ML INJ
+"DATA",176.112,27081,1)
+307999
+"DATA",176.112,27082,0)
+4004478^ALLERGENIC EXTRACT, INSECT, WASP 20000PNU/ML INJ
+"DATA",176.112,27082,1)
+307999
+"DATA",176.112,27083,0)
+4006903^ALLERGENIC EXTRACT, WASP 10000 PNU/ML INJ
+"DATA",176.112,27083,1)
+307998
+"DATA",176.112,27084,0)
+4006906^ALLERGENIC EXTRACT, WASP 10 % INJ
+"DATA",176.112,27084,1)
+307997
+"DATA",176.112,27085,0)
+4006905^ALLERGENIC EXTRACT, WASP 1 % INJ
+"DATA",176.112,27085,1)
+307996
+"DATA",176.112,27086,0)
+4004542^ALLERGENIC EXTRACT, TREE, WILLOW MIX 20000PNU/ML INJ
+"DATA",176.112,27086,1)
+307995
+"DATA",176.112,27087,0)
+4004541^ALLERGENIC EXTRACT, TREE, WILLOW MIX 10000PNU/ML INJ
+"DATA",176.112,27087,1)
+307994
+"DATA",176.112,27088,0)
+4004473^ALLERGENIC EXTRACT, TREE, WALNUT 10000PNU/ML INJ
+"DATA",176.112,27088,1)
+307993
+"DATA",176.112,27089,0)
+4004530^ALLERGENIC EXTRACT, TREE, TAG ALDER 10000PNU/ML INJ
+"DATA",176.112,27089,1)
+307992
+"DATA",176.112,27090,0)
+4004540^ALLERGENIC EXTRACT, TREE, SWEET GUM 10000PNU/ML INJ
+"DATA",176.112,27090,1)
+307991
+"DATA",176.112,27091,0)
+4004529^ALLERGENIC EXTRACT, TREE, RED ALDER 10000PNU/ML INJ
+"DATA",176.112,27091,1)
+307990
+"DATA",176.112,27092,0)
+4004471^ALLERGENIC EXTRACT, TREE, POPLAR MIX 20000PNU/ML
+"DATA",176.112,27092,1)
+307989
+"DATA",176.112,27093,0)
+4004470^ALLERGENIC EXTRACT, TREE, POPLAR MIX 10000PNU/ML INJ
+"DATA",176.112,27093,1)
+307988
+"DATA",176.112,27094,0)
+4004469^ALLERGENIC EXTRACT, TREE, PECAN 10000PNU/ML INJ
+"DATA",176.112,27094,1)
+307987
+"DATA",176.112,27095,0)
+4004467^ALLERGENIC EXTRACT, TREE, OLIVE 10000PNU/ML INJ
+"DATA",176.112,27095,1)
+307985
+"DATA",176.112,27096,0)
+4004456^ALLERGENIC EXTRACT, TREE, OAK, CALIFORNIA LIVE, 10000PNU/ML, INJ
+"DATA",176.112,27096,1)
+307984
+"DATA",176.112,27097,0)
+4004457^ALLERGENIC EXTRACT, TREE, OAK, CALIFORNIA LIVE 20000PNU/ML INJ
+"DATA",176.112,27097,1)
+307983
+"DATA",176.112,27098,0)
+4004465^ALLERGENIC EXTRACT, TREE, OAK MIX 10000PNU/ML INJ
+"DATA",176.112,27098,1)
+307982
+"DATA",176.112,27099,0)
+4004539^ALLERGENIC EXTRACT, TREE, MULBERRY MIX 10000PNU/ML INJ
+"DATA",176.112,27099,1)
+307981
+"DATA",176.112,27100,0)
+4004464^ALLERGENIC EXTRACT, TREE, MOUNTAIN CEDAR 10000PNU/ML INJ
+"DATA",176.112,27100,1)
+307980
+"DATA",176.112,27101,0)
+4004461^ALLERGENIC EXTRACT, TREE, MESQUITE 10000PNU/ML INJ
+"DATA",176.112,27101,1)
+307979
+"DATA",176.112,27102,0)
+4004558^ALLERGENIC EXTRACT, TREE, MAPLE MIX 20000PNU/ML INJ
+"DATA",176.112,27102,1)
+307978
+"DATA",176.112,27103,0)
+4004462^ALLERGENIC EXTRACT, TREE, HICKORY 10000PNU/ML INJ
+"DATA",176.112,27103,1)
+307977
+"DATA",176.112,27104,0)
+4004538^ALLERGENIC EXTRACT, TREE, HAZELNUT, CALIFORNIA 10000PNU/ML INJ
+"DATA",176.112,27104,1)
+307976
+"DATA",176.112,27105,0)
+4004537^ALLERGENIC EXTRACT, TREE, ELM, CHINESE 10000PNU/ML INJ
+"DATA",176.112,27105,1)
+307975
+"DATA",176.112,27106,0)
+4004460^ALLERGENIC EXTRACT, TREE, ELM MIX 20000PNU/ML INJ
+"DATA",176.112,27106,1)
+307974
+"DATA",176.112,27107,0)
+4004459^ALLERGENIC EXTRACT, TREE, ELM MIX 10000PNU/ML INJ
+"DATA",176.112,27107,1)
+307973
+"DATA",176.112,27108,0)
+4004535^ALLERGENIC EXTRACT, TREE, COTTONWOOD, WESTERN 10000PNU/ML INJ
+"DATA",176.112,27108,1)
+307972
+"DATA",176.112,27109,0)
+4004458^ALLERGENIC EXTRACT, TREE, COTTONWOOD, FREMONT 1000PNU/ML INJ
+"DATA",176.112,27109,1)
+307971
+"DATA",176.112,27110,0)
+4004534^ALLERGENIC EXTRACT, TREE, BOX ELDER 20000PNU/ML INJ
+"DATA",176.112,27110,1)
+307970
+"DATA",176.112,27111,0)
+4004533^ALLERGENIC EXTRACT, TREE, BOX ELDER 10000PNU/ML INJ
+"DATA",176.112,27111,1)
+307969
+"DATA",176.112,27112,0)
+4004454^ALLERGENIC EXTRACT, TREE, BEECH 10000PNU/ML INJ
+"DATA",176.112,27112,1)
+307968
+"DATA",176.112,27113,0)
+4004453^ALLERGENIC EXTRACT, TREE, ASH MIX 10000PNU/ML INJ
+"DATA",176.112,27113,1)
+307967
+"DATA",176.112,27114,0)
+4004531^ALLERGENIC EXTRACT, TREE, ARIZONA ASH 10000PNU/ML INJ
+"DATA",176.112,27114,1)
+307966
+"DATA",176.112,27115,0)
+4004443^ALLERGENIC EXTRACT, THISTLE, RUSSIAN 10000PNU/ML INJ
+"DATA",176.112,27115,1)
+307965
+"DATA",176.112,27116,0)
+4004526^ALLERGENIC EXTRACT, SUGAR BEET 10000PNU/ML INJ
+"DATA",176.112,27116,1)
+307964
+"DATA",176.112,27117,0)
+4007274^ALLERGENIC EXTRACT, SHORT RAGWEED ALTERNARIA 5000 PNU/ML INJ
+"DATA",176.112,27117,1)
+307962
+"DATA",176.112,27118,0)
+4007279^ALLERGENIC EXTRACT, SHORT RAGWEED ALTERNARIA 5 % INJ
+"DATA",176.112,27118,1)
+307961
+"DATA",176.112,27119,0)
+4007276^ALLERGENIC EXTRACT, SHORT RAGWEED ALTERNARIA 20000 PNU/ML INJ
+"DATA",176.112,27119,1)
+307960
+"DATA",176.112,27120,0)
+4007278^ALLERGENIC EXTRACT, SHORT RAGWEED ALTERNARIA 2 % INJ
+"DATA",176.112,27120,1)
+307959
+"DATA",176.112,27121,0)
+4007275^ALLERGENIC EXTRACT, SHORT RAGWEED ALTERNARIA 10000 PNU/ML INJ
+"DATA",176.112,27121,1)
+307958
+"DATA",176.112,27122,0)
+4007280^ALLERGENIC EXTRACT, SHORT RAGWEED ALTERNARIA 10 % INJ
+"DATA",176.112,27122,1)
+307957
+"DATA",176.112,27123,0)
+4004562^ALLERGENIC EXTRACT, SHEEP WOOL 10000PNU/ML INJ
+"DATA",176.112,27123,1)
+307955
+"DATA",176.112,27124,0)
+4004447^ALLERGENIC EXTRACT, SCALE MIX 10000PNU/ML INJ
+"DATA",176.112,27124,1)
+307954
+"DATA",176.112,27125,0)
+4004446^ALLERGENIC EXTRACT, SAGEBRUSH, COMMON 20000PNU/ML INJ
+"DATA",176.112,27125,1)
+307953
+"DATA",176.112,27126,0)
+4004445^ALLERGENIC EXTRACT, SAGEBRUSH, COMMON 10000PNU/ML INJ
+"DATA",176.112,27126,1)
+307952
+"DATA",176.112,27127,0)
+4004448^ALLERGENIC EXTRACT, RAGWEED, WEST 10000PNU/ML INJ
+"DATA",176.112,27127,1)
+307951
+"DATA",176.112,27128,0)
+4004561^ALLERGENIC EXTRACT, RABBIT EPITHELIA 10000PNU/ML INJ
+"DATA",176.112,27128,1)
+307950
+"DATA",176.112,27129,0)
+4004442^ALLERGENIC EXTRACT, PLANTAIN, ENGLISH 20000PNU/ML INJ
+"DATA",176.112,27129,1)
+307949
+"DATA",176.112,27130,0)
+4004522^ALLERGENIC EXTRACT, PIGWEED, SPINY 10000PNU/ML INJ
+"DATA",176.112,27130,1)
+307947
+"DATA",176.112,27131,0)
+4004440^ALLERGENIC EXTRACT, PIGWEED, ROUGH 10000PNU/ML INJ
+"DATA",176.112,27131,1)
+307946
+"DATA",176.112,27132,0)
+4004565^ALLERGENIC EXTRACT, PER PRESCRIPTION 20000PNU/ML INJ
+"DATA",176.112,27132,1)
+307945
+"DATA",176.112,27133,0)
+4004564^ALLERGENIC EXTRACT, PER PRESCRIPTION 10000PNU/ML INJ
+"DATA",176.112,27133,1)
+307944
+"DATA",176.112,27134,0)
+4004492^ALLERGENIC EXTRACT, PENICILLIN 10000PNU/ML INJ
+"DATA",176.112,27134,1)
+307943
+"DATA",176.112,27135,0)
+4004439^ALLERGENIC EXTRACT, MUGWORT, COMMON 10000PNU/ML INJ
+"DATA",176.112,27135,1)
+307942
+"DATA",176.112,27136,0)
+4004556^ALLERGENIC EXTRACT, MOLD, TRICOTHECIUM ROSEUM 10000PNU/ML INJ
+"DATA",176.112,27136,1)
+307940
+"DATA",176.112,27137,0)
+4004554^ALLERGENIC EXTRACT, MOLD, STEMPHYLLUM BOTRYOSUM 10000PNU/ML INJ
+"DATA",176.112,27137,1)
+307938
+"DATA",176.112,27138,0)
+4004553^ALLERGENIC EXTRACT, MOLD, RHIZOPUS ARRHIZUS 10000PNU/ML INJ
+"DATA",176.112,27138,1)
+307937
+"DATA",176.112,27139,0)
+4004551^ALLERGENIC EXTRACT, MOLD, PHOMA BETAE 10000PNU/ML INJ
+"DATA",176.112,27139,1)
+307936
+"DATA",176.112,27140,0)
+4004549^ALLERGENIC EXTRACT, MOLD, FUSARIUM OXYSPORUM 10000PNU/ML INJ
+"DATA",176.112,27140,1)
+307935
+"DATA",176.112,27141,0)
+4004548^ALLERGENIC EXTRACT, MOLD, EPICOCCUM PURPURASCENS 10000PNU/ML INJ
+"DATA",176.112,27141,1)
+307934
+"DATA",176.112,27142,0)
+4004547^ALLERGENIC EXTRACT, MOLD, CURVULARIA LUNATA 10000PNU/ML INJ
+"DATA",176.112,27142,1)
+307933
+"DATA",176.112,27143,0)
+4004487^ALLERGENIC EXTRACT, MOLD, ALTERNARIA TENUIS 10000PNU/ML INJ
+"DATA",176.112,27143,1)
+307932
+"DATA",176.112,27144,0)
+4004521^ALLERGENIC EXTRACT, MARSH ELDER MIX 20000PNU/ML INJ
+"DATA",176.112,27144,1)
+307931
+"DATA",176.112,27145,0)
+4004520^ALLERGENIC EXTRACT, MARSH ELDER MIX 10000PNU/ML INJ
+"DATA",176.112,27145,1)
+307930
+"DATA",176.112,27146,0)
+4004438^ALLERGENIC EXTRACT, LAMB QUARTERS 10000PNU/ML INJ
+"DATA",176.112,27146,1)
+307929
+"DATA",176.112,27147,0)
+4004477^ALLERGENIC EXTRACT, INSECT, BEE 20000PNU/ML INJ
+"DATA",176.112,27147,1)
+307928
+"DATA",176.112,27148,0)
+4004476^ALLERGENIC EXTRACT, INSECT, BEE 10000PNU/ML INJ
+"DATA",176.112,27148,1)
+307927
+"DATA",176.112,27149,0)
+4004500^ALLERGENIC EXTRACT, HOUSE DUST 50000 PNU/ML INJ
+"DATA",176.112,27149,1)
+307925
+"DATA",176.112,27150,0)
+4004499^ALLERGENIC EXTRACT, HOUSE DUST 40000 PNU/ML INJ
+"DATA",176.112,27150,1)
+307924
+"DATA",176.112,27151,0)
+4004494^ALLERGENIC EXTRACT, HOUSE DUST 20000PNU/ML INJ
+"DATA",176.112,27151,1)
+307923
+"DATA",176.112,27152,0)
+4004503^ALLERGENIC EXTRACT,HOUSE DUST,STOCK 10000UNT/ML INJ
+"DATA",176.112,27152,1)
+307922
+"DATA",176.112,27153,0)
+4004495^ALLERGENIC EXTRACT, HOUSE DUST 10000PNU/ML INJ
+"DATA",176.112,27153,1)
+307922
+"DATA",176.112,27154,0)
+4004498^ALLERGENIC EXTRACT, HOUSE DUST 10000 PNU/ML INJ
+"DATA",176.112,27154,1)
+307922
+"DATA",176.112,27155,0)
+4004560^ALLERGENIC EXTRACT, HORSE EPITHELIA 10000PNU/ML INJ
+"DATA",176.112,27155,1)
+307920
+"DATA",176.112,27156,0)
+4007268^ALLERGENIC EXTRACT, HORSE DANDER 5000PNU/ML INJ
+"DATA",176.112,27156,1)
+307919
+"DATA",176.112,27157,0)
+4007272^ALLERGENIC EXTRACT, HORSE DANDER 5% INJ
+"DATA",176.112,27157,1)
+307918
+"DATA",176.112,27158,0)
+4007270^ALLERGENIC EXTRACT, HORSE DANDER 20000PNU/ML INJ
+"DATA",176.112,27158,1)
+307917
+"DATA",176.112,27159,0)
+4007269^ALLERGENIC EXTRACT, HORSE DANDER 10000PNU/ML INJ
+"DATA",176.112,27159,1)
+307916
+"DATA",176.112,27160,0)
+4007273^ALLERGENIC EXTRACT, HORSE DANDER 10% INJ
+"DATA",176.112,27160,1)
+307915
+"DATA",176.112,27161,0)
+4007271^ALLERGENIC EXTRACT, HORSE DANDER 1% INJ
+"DATA",176.112,27161,1)
+307914
+"DATA",176.112,27162,0)
+4004491^ALLERGENIC EXTRACT, HORMODENDRUM HORDEI 10000PNU/ML INJ
+"DATA",176.112,27162,1)
+307913
+"DATA",176.112,27163,0)
+4004490^ALLERGENIC EXTRACT, HELMINTHOSPORIUM SATIVUM 10000PNU/ML INJ
+"DATA",176.112,27163,1)
+307912
+"DATA",176.112,27164,0)
+4004557^ALLERGENIC EXTRACT, GRASS, WESTERN WHEAT 10000PNU/ML INJ
+"DATA",176.112,27164,1)
+307911
+"DATA",176.112,27165,0)
+4004527^ALLERGENIC EXTRACT, GRASS, WESTERN WATER HEMP 10000PNU/ML INJ
+"DATA",176.112,27165,1)
+307910
+"DATA",176.112,27166,0)
+4004519^ALLERGENIC EXTRACT, GRASS, VELVET 1000PNU/ML INJ
+"DATA",176.112,27166,1)
+307909
+"DATA",176.112,27167,0)
+4004432^ALLERGENIC EXTRACT, GRASS, SWEET VERNAL 10000PNU/ML INJ
+"DATA",176.112,27167,1)
+307908
+"DATA",176.112,27168,0)
+4004518^ALLERGENIC EXTRACT, GRASS, SALT 10000PNU/ML INJ
+"DATA",176.112,27168,1)
+307907
+"DATA",176.112,27169,0)
+4004431^ALLERGENIC EXTRACT, GRASS, RYE, PERENNIAL 10000PNU/ML INJ
+"DATA",176.112,27169,1)
+307906
+"DATA",176.112,27170,0)
+4004517^ALLERGENIC EXTRACT, GRASS, RYE, ITALIAN 10000PNU/ML INJ
+"DATA",176.112,27170,1)
+307905
+"DATA",176.112,27171,0)
+4004512^ALLERGENIC EXTRACT, GRASS, REED CANARY 10000PNU/ML INJ
+"DATA",176.112,27171,1)
+307904
+"DATA",176.112,27172,0)
+4004430^ALLERGENIC EXTRACT, GRASS, REDTOP 10000PNU/ML INJ
+"DATA",176.112,27172,1)
+307903
+"DATA",176.112,27173,0)
+4004515^ALLERGENIC EXTRACT, GRASS, QUACK 10000PNU/ML INJ
+"DATA",176.112,27173,1)
+307902
+"DATA",176.112,27174,0)
+4004429^ALLERGENIC EXTRACT, GRASS, ORCHARD 10000PNU/ML INJ
+"DATA",176.112,27174,1)
+307901
+"DATA",176.112,27175,0)
+4004514^ALLERGENIC EXTRACT, GRASS, MEADOW FESCUE 10000PNU/ML INJ
+"DATA",176.112,27175,1)
+307900
+"DATA",176.112,27176,0)
+4004428^ALLERGENIC EXTRACT, GRASS, KENTUCKY BLUE 10000PNU/ML INJ
+"DATA",176.112,27176,1)
+307899
+"DATA",176.112,27177,0)
+4004427^ALLERGENIC EXTRACT, GRASS, JOHNSON 10000PNU/ML INJ
+"DATA",176.112,27177,1)
+307898
+"DATA",176.112,27178,0)
+4004511^ALLERGENIC EXTRACT, GRASS, BROME 10000PNU/ML INJ
+"DATA",176.112,27178,1)
+307897
+"DATA",176.112,27179,0)
+4004425^ALLERGENIC EXTRACT, GRASS, BERMUDA 10000PNU/ML INJ
+"DATA",176.112,27179,1)
+307895
+"DATA",176.112,27180,0)
+4004420^ALLERGENIC EXTRACT, 7 GRASS MIX 10000PNU/ML INJ
+"DATA",176.112,27180,1)
+307893
+"DATA",176.112,27181,0)
+4004567^ALLERGENIC EXTRACT, GRASS, 7 MIX INJ
+"DATA",176.112,27181,1)
+307893
+"DATA",176.112,27182,0)
+4004544^ALLERGENIC EXTRACT, GRAIN MILL DUST 20000PNU/ML INJ
+"DATA",176.112,27182,1)
+307892
+"DATA",176.112,27183,0)
+4004543^ALLERGENIC EXTRACT, GRAIN MILL DUST 10000PNU INJ
+"DATA",176.112,27183,1)
+307891
+"DATA",176.112,27184,0)
+4004489^ALLERGENIC EXTRACT, FUNGI, CANDIDA ALBICANS 10000PNU/ML INJ
+"DATA",176.112,27184,1)
+307890
+"DATA",176.112,27185,0)
+4004488^ALLERGENIC EXTRACT, FUNGI, ASPERGILLUS FUMIGATUS 10000PNU/ML INJ
+"DATA",176.112,27185,1)
+307889
+"DATA",176.112,27186,0)
+4004481^ALLERGENIC EXTRACT, FEATHER MIX 20000PNU/ML INJ
+"DATA",176.112,27186,1)
+307888
+"DATA",176.112,27187,0)
+4004480^ALLERGENIC EXTRACT, FEATHER MIX 10000PNU/ML INJ
+"DATA",176.112,27187,1)
+307887
+"DATA",176.112,27188,0)
+4004523^ALLERGENIC EXTRACT, FALSE RAGWEED 10000PNU/ML INJ
+"DATA",176.112,27188,1)
+307886
+"DATA",176.112,27189,0)
+4008044^ALLERGENIC EXTRACT, DUST, AUTOGENOUS 1 UNT/ML INJ
+"DATA",176.112,27189,1)
+307885
+"DATA",176.112,27190,0)
+4004485^ALLERGENIC EXTRACT, DOG EPITHELIA 20000PNU/ML INJ
+"DATA",176.112,27190,1)
+307884
+"DATA",176.112,27191,0)
+4004484^ALLERGENIC EXTRACT, DOG EPITHELIA 10000PNU/ML INJ
+"DATA",176.112,27191,1)
+307883
+"DATA",176.112,27192,0)
+4004546^ALLERGENIC EXTRACT, CLADOSPORIUM HERBARUM 10000PNU/ML INJ
+"DATA",176.112,27192,1)
+307882
+"DATA",176.112,27193,0)
+4004559^ALLERGENIC EXTRACT, CAT EPITHELIUM 20000PNU/ML INJ
+"DATA",176.112,27193,1)
+307880
+"DATA",176.112,27194,0)
+4004482^ALLERGENIC EXTRACT, CAT EPITHELIA 10000PNU/ML INJ
+"DATA",176.112,27194,1)
+307879
+"DATA",176.112,27195,0)
+4004509^ALLERGENIC EXTRACT, BLUEGRASS, ANNUAL 10000PNU/ML INJ
+"DATA",176.112,27195,1)
+307878
+"DATA",176.112,27196,0)
+4004455^ALLERGENIC EXTRACT, BIRCH 10000PNU/ML INJ
+"DATA",176.112,27196,1)
+307877
+"DATA",176.112,27197,0)
+4007259^ALLERGENIC EXTRACT, ALTERNARIA MOLD 5000 PNU/ML INJ
+"DATA",176.112,27197,1)
+307875
+"DATA",176.112,27198,0)
+4007262^ALLERGENIC EXTRACT, ALTERNARIA MOLD 40000 PNU/ML INJ
+"DATA",176.112,27198,1)
+307874
+"DATA",176.112,27199,0)
+4007263^ALLERGENIC EXTRACT, ALTERNARIA MOLD 2% INJ
+"DATA",176.112,27199,1)
+307873
+"DATA",176.112,27200,0)
+4007265^ALLERGENIC EXTRACT, ALTERNARIA MOLD 10% INJ
+"DATA",176.112,27200,1)
+307871
+"DATA",176.112,27201,0)
+4004450^ALLERGENIC EXTRACT, 7 TREE MIX 20000PNU/ML INJ
+"DATA",176.112,27201,1)
+307870
+"DATA",176.112,27202,0)
+4004449^ALLERGENIC EXTRACT, 7 TREE MIX 10000 PNU/ML INJ
+"DATA",176.112,27202,1)
+307869
+"DATA",176.112,27203,0)
+4004421^ALLERGENIC EXTRACT, 7 GRASS MIX 20000PNU/ML INJ
+"DATA",176.112,27203,1)
+307868
+"DATA",176.112,27204,0)
+4004424^ALLERGENIC EXTRACT, 3 GRASS, SOUTHERN 20000PNU/ML INJ
+"DATA",176.112,27204,1)
+307867
+"DATA",176.112,27205,0)
+4004423^ALLERGENIC EXTRACT, 3 GRASS MIX, SOUTHERN 10000PNU/ML INJ
+"DATA",176.112,27205,1)
+307866
+"DATA",176.112,27206,0)
+4004419^ALLERGENIC EXTRACT, 2 GRASS MIX 20000PNU/ML INJ
+"DATA",176.112,27206,1)
+307865
+"DATA",176.112,27207,0)
+4004418^ALLERGENIC EXTRACT, 2 GRASS MIX 10000PNU/ML INJ
+"DATA",176.112,27207,1)
+307864
+"DATA",176.112,27208,0)
+4004452^ALLERGENIC EXTRACT, 10 TREE MIX 20000 PNU/ML INJ
+"DATA",176.112,27208,1)
+307863
+"DATA",176.112,27209,0)
+4004451^ALLERGENIC EXTRACT, 10 TREE MIX 10000 PNU/ML INJ
+"DATA",176.112,27209,1)
+307862
+"DATA",176.112,27210,0)
+4004568^ALLERGENIC EXTRACT, INSECT, STINGING MIX INJ
+"DATA",176.112,27210,1)
+307857
+"DATA",176.112,27211,0)
+4008035^ALLERGENIC EXTRACT MIXED INSECT STINGING INJ
+"DATA",176.112,27211,1)
+307857
+"DATA",176.112,27212,0)
+4004474^ALLERGENIC EXTRACT, STINGING INSECTS MIX 10000PNU/ML INJ
+"DATA",176.112,27212,1)
+307857
+"DATA",176.112,27213,0)
+4007283^ALLERGENIC EXTRACT 4.98ML INJ
+"DATA",176.112,27213,1)
+307849
+"DATA",176.112,27214,0)
+4007287^ALLERGENIC EXTRACT 1 UNT/ML INJ
+"DATA",176.112,27214,1)
+307848
+"DATA",176.112,27215,0)
+4007284^ALLERGENIC EXTRACT 0.996ML INJ
+"DATA",176.112,27215,1)
+307847
+"DATA",176.112,27216,0)
+4007285^ALLERGENIC EXTRACT 0.744ML INJ
+"DATA",176.112,27216,1)
+307846
+"DATA",176.112,27217,0)
+4008270^ALLERGENIC EXT,USTILAGO MAYDIS 800MCG/ML INJ
+"DATA",176.112,27217,1)
+307845
+"DATA",176.112,27218,0)
+4008269^ALLERGENIC EXT,PENICILLIUM FREQUENTANS 800MCG/ML INJ
+"DATA",176.112,27218,1)
+307844
+"DATA",176.112,27219,0)
+4008268^ALLERGENIC EXT,LYCOPERDON PYRIFORME 800MCG/ML INJ
+"DATA",176.112,27219,1)
+307843
+"DATA",176.112,27220,0)
+4007258^ALLERGENIC EXT,HOUSE DUST CONC 0.4GM/ML INJ
+"DATA",176.112,27220,1)
+307842
+"DATA",176.112,27221,0)
+4008267^ALLERGENIC EXT,FULIGO SEPTICA 800MCG/ML INJ
+"DATA",176.112,27221,1)
+307841
+"DATA",176.112,27222,0)
+4008266^ALLERGENIC EXT,COPRINUS MICACEUS 800MCG/ML INJ
+"DATA",176.112,27222,1)
+307840
+"DATA",176.112,27223,0)
+4008265^ALLERGENIC EXT,CLADOSPORIUM CLADOSPORIS 800MCG/ML INJ
+"DATA",176.112,27223,1)
+307839
+"DATA",176.112,27224,0)
+4008264^ALLERGENIC EXT,CALVATIA CYANTHIFORMIS 800MCG/ML INJ
+"DATA",176.112,27224,1)
+307838
+"DATA",176.112,27225,0)
+4007289^ALLERGENIC EXT,ALTERNARIA ALTERNATA 800MCG/ML INJ
+"DATA",176.112,27225,1)
+307837
+"DATA",176.112,27226,0)
+4008263^ALLERGENIC EXT,AGARICUS CAMPESTRIS 800MCG/ML INJ
+"DATA",176.112,27226,1)
+307836
+"DATA",176.112,27227,0)
+4006734^ALLANTOIN 2%/AMINACRINE 0.2%/SULFISOXAZOLE 15% CREAM,VAG
+"DATA",176.112,27227,1)
+307832
+"DATA",176.112,27228,0)
+4005648^ALLANTOIN 2%/AMINACRINE 0.2%/SULFANILAMIDE 15% CREAM,VAG
+"DATA",176.112,27228,1)
+307831
+"DATA",176.112,27229,0)
+4005649^ALLANTOIN 140MG/AMINACRINE 14MG/SULFANILAMIDE 1.05GM SUPP,VAG
+"DATA",176.112,27229,1)
+307830
+"DATA",176.112,27230,0)
+4006733^ALLANTOIN 120MG/AMINACRINE 12MG/SULFISOXAZOLE 600MG SUPP,VAG
+"DATA",176.112,27230,1)
+307829
+"DATA",176.112,27231,0)
+4005650^ALLANTOIN 1.5%/AMINACRINE 0.2%/SULFANILAMIDE 15% CREAM,VAG
+"DATA",176.112,27231,1)
+307828
+"DATA",176.112,27232,0)
+4005651^ALLANTOIN 0.2%/AMINACRINE 0.2%/SULFANILAMIDE 15% CREAM,VAG
+"DATA",176.112,27232,1)
+307827
+"DATA",176.112,27233,0)
+4009335^ALGLUCERASE 80UNT/ML INJ
+"DATA",176.112,27233,1)
+307824
+"DATA",176.112,27234,0)
+4009336^ALGLUCERASE 10UNT/ML INJ
+"DATA",176.112,27234,1)
+307823
+"DATA",176.112,27235,0)
+4008604^ALGINIC ACID 400MG/AL OH 160MG/MG TRISIL 40MG/NA BICARB TAB,CHEW
+"DATA",176.112,27235,1)
+307822
+"DATA",176.112,27236,0)
+4008603^ALGINIC ACID 200MG/AL OH 80MG/MG TRISIL 20MG/NA BICARB TAB,CHEW
+"DATA",176.112,27236,1)
+307821
+"DATA",176.112,27237,0)
+4008370^ALFENTANIL HCL 500MCG/ML INJ
+"DATA",176.112,27237,1)
+307819
+"DATA",176.112,27238,0)
+4010415^ALFALFA 500MG TAB
+"DATA",176.112,27238,1)
+307818
+"DATA",176.112,27239,0)
+4010175^ALDESLEUKIN 22MILLION UNT/VIL INJ
+"DATA",176.112,27239,1)
+307816
+"DATA",176.112,27240,0)
+4007056^ALCLOMETASONE DIPROPIONATE 0.05% OINT,TOP
+"DATA",176.112,27240,1)
+307784
+"DATA",176.112,27241,0)
+4007055^ALCLOMETASONE DIPROPIONATE 0.05% CREAM,TOP
+"DATA",176.112,27241,1)
+307783
+"DATA",176.112,27242,0)
+4006584^ALBUTEROL SO4 4MG TAB,SA
+"DATA",176.112,27242,1)
+307781
+"DATA",176.112,27243,0)
+4006588^ALBUTEROL 200MCG CAP,INHL
+"DATA",176.112,27243,1)
+307779
+"DATA",176.112,27244,0)
+4001512^ALBUMIN,IODINATED,I-131,SERUM 10MG/ML INJ
+"DATA",176.112,27244,1)
+307776
+"DATA",176.112,27245,0)
+4001531^ALBUMIN,CHROMATED SERUM,CR-51 50MCG/ML INJ
+"DATA",176.112,27245,1)
+307774
+"DATA",176.112,27246,0)
+4016802^AL OH 500MG/MG OH 450MG/SIMETHICONE 40MG/5ML SUSP,ORAL(780ML)
+"DATA",176.112,27246,1)
+307764
+"DATA",176.112,27247,0)
+4016646^AL OH 500MG/MG OH 450MG/SIMETHICONE 40MG/5ML SUSP,ORAL(360ML)
+"DATA",176.112,27247,1)
+307764
+"DATA",176.112,27248,0)
+4008862^AL OH 500MG/MG OH 450MG/SIMETHICONE 40MG/5ML SUSP,ORAL
+"DATA",176.112,27248,1)
+307764
+"DATA",176.112,27249,0)
+4015869^AL OH 500MG/MG OH 400MG/SIMETHICONE 40MG/5ML LIQUID(ML)
+"DATA",176.112,27249,1)
+307764
+"DATA",176.112,27250,0)
+4008863^AL OH 500MG/MG OH 400MG/SIMETHICONE 40MG/5ML LIQUID
+"DATA",176.112,27250,1)
+307763
+"DATA",176.112,27251,0)
+4008874^AL OH 427MG/MG OH 400MG/SIMETHICONE 40MG/5ML SUSP,ORAL
+"DATA",176.112,27251,1)
+307762
+"DATA",176.112,27252,0)
+4008858^AL OH 400MG/MG OH 400MG/SIMETHICONE 40MG/5ML LIQUID
+"DATA",176.112,27252,1)
+307760
+"DATA",176.112,27253,0)
+4008873^AL OH 400MG/MG OH 400MG/SIMETHICONE 30MG/5ML SUSP
+"DATA",176.112,27253,1)
+307760
+"DATA",176.112,27254,0)
+4008865^AL OH 400MG/MG OH 400MG/SIMETHICONE 30MG/5ML LIQUID
+"DATA",176.112,27254,1)
+307760
+"DATA",176.112,27255,0)
+4008866^AL OH 400MG/MG OH 400MG/SIMETHICONE 30MG TAB,CHEWABLE
+"DATA",176.112,27255,1)
+307758
+"DATA",176.112,27256,0)
+4008868^AL OH 400MG/MG OH 400MG/SIMETHICONE 25MG/5ML LIQUID
+"DATA",176.112,27256,1)
+307757
+"DATA",176.112,27257,0)
+4009986^AL OH 33MG/ASA 500MG/MG OH 100MG TAB
+"DATA",176.112,27257,1)
+307756
+"DATA",176.112,27258,0)
+4008601^AL OH 31.5MG/MG CARB 137.5/NA ALGINATE 136MG/5ML LIQUID
+"DATA",176.112,27258,1)
+307755
+"DATA",176.112,27259,0)
+4010022^AL OH 260MG/MG OH 130MG/MG TRISILICATE 455MG TAB,CHEWABLE
+"DATA",176.112,27259,1)
+307753
+"DATA",176.112,27260,0)
+4008602^AL OH 254MG/MG CARB 238MG/NA ALGINATE 100MG/5ML SUSP,ORAL
+"DATA",176.112,27260,1)
+307752
+"DATA",176.112,27261,0)
+4008869^AL OH 225MG/MG OH 225MG/SIMETHICONE 25MG/5ML LIQUID
+"DATA",176.112,27261,1)
+307751
+"DATA",176.112,27262,0)
+4008867^AL OH 225MG/MG OH 200MG/SIMETHICONE 25MG/5ML LIQUID
+"DATA",176.112,27262,1)
+307750
+"DATA",176.112,27263,0)
+4008871^AL OH 225MG/MG OH 200MG/SIMETHICONE 25MG/5ML SUSP
+"DATA",176.112,27263,1)
+307750
+"DATA",176.112,27264,0)
+4008453^AL OH 225MG/CA CARB 250MG/MG OH 200MG/5ML SUSP
+"DATA",176.112,27264,1)
+307749
+"DATA",176.112,27265,0)
+4008864^AL OH 200MG/MG OH 200MG/SIMETHICONE 25MG/5ML SUSP,ORAL
+"DATA",176.112,27265,1)
+307748
+"DATA",176.112,27266,0)
+4008861^AL OH 200MG/MG OH 200MG/SIMETHICONE 25MG TAB,CHEWABLE
+"DATA",176.112,27266,1)
+307747
+"DATA",176.112,27267,0)
+4008872^AL OH 200MG/MG OH 200MG/SIMETHICONE 20MG/5ML SUSP,ORAL
+"DATA",176.112,27267,1)
+307746
+"DATA",176.112,27268,0)
+4008857^AL OH 200MG/MG OH 200MG/SIMETHICONE 20MG/5ML LIQUID
+"DATA",176.112,27268,1)
+307746
+"DATA",176.112,27269,0)
+4008875^AL OH 200MG/MG OH 200MG/SIMETHICONE 20MG/5ML LIQUID,360ML
+"DATA",176.112,27269,1)
+307746
+"DATA",176.112,27270,0)
+4010021^AL OH 150MG/MG OH 80MG/MG TRISILICATE 400MG/5ML SUSP,ORAL
+"DATA",176.112,27270,1)
+307745
+"DATA",176.112,27271,0)
+4010017^AL OH 100MG/MG TRISILICATE 150MG/PHENYLBUTAZONE 100MG CAP
+"DATA",176.112,27271,1)
+307743
+"DATA",176.112,27272,0)
+4008256^ADRENOCORTICOTROPIN (ACTH 1-18),I-125 (TYR) 80UNT/ML INJ
+"DATA",176.112,27272,1)
+307735
+"DATA",176.112,27273,0)
+4008255^ADRENOCORTICOTROPIN (ACTH 1-18),I-125 (TYR) 40UNT/ML INJ
+"DATA",176.112,27273,1)
+307734
+"DATA",176.112,27274,0)
+4007343^ADENOSINE PO4 SODIUM 25MG/ML INJ
+"DATA",176.112,27274,1)
+307733
+"DATA",176.112,27275,0)
+4007344^ADENOSINE PO4 25MG/ML INJ
+"DATA",176.112,27275,1)
+307733
+"DATA",176.112,27276,0)
+4012922^ADAPALENE 0.1% SOLN,TOP
+"DATA",176.112,27276,1)
+307732
+"DATA",176.112,27277,0)
+4012921^ADAPALENE 0.1% GEL,TOP
+"DATA",176.112,27277,1)
+307731
+"DATA",176.112,27278,0)
+4006521^ACYCLOVIR 200MG/5ML SUSP,ORAL
+"DATA",176.112,27278,1)
+307730
+"DATA",176.112,27279,0)
+4012332^ACRIVASTINE 8MG/PSEUDOEPHEDRINE HCL 60MG CAP
+"DATA",176.112,27279,1)
+307728
+"DATA",176.112,27280,0)
+4010067^ACIDULATED PHOSPHATE FLUORIDE 0.02% LIQUID
+"DATA",176.112,27280,1)
+307725
+"DATA",176.112,27281,0)
+4015315^ACETYLCYSTEINE 20% (PF) SOLN,INHL,10ML
+"DATA",176.112,27281,1)
+307719
+"DATA",176.112,27282,0)
+4006630^ACETYLCYSTEINE 20% SOLN,INHL
+"DATA",176.112,27282,1)
+307719
+"DATA",176.112,27283,0)
+4015319^ACETYLCYSTEINE 20% (PF) SOLN,INHL,30ML
+"DATA",176.112,27283,1)
+307719
+"DATA",176.112,27284,0)
+4015317^ACETYLCYSTEINE 20% SOLN,INHL,30ML
+"DATA",176.112,27284,1)
+307719
+"DATA",176.112,27285,0)
+4015313^ACETYLCYSTEINE 20% SOLN,INHL,10ML
+"DATA",176.112,27285,1)
+307719
+"DATA",176.112,27286,0)
+4006633^ACETYLCYSTEINE 20% (PF) SOLN,INHL
+"DATA",176.112,27286,1)
+307719
+"DATA",176.112,27287,0)
+4015309^ACETYLCYSTEINE 20% SOLN,INHL,4ML
+"DATA",176.112,27287,1)
+307719
+"DATA",176.112,27288,0)
+4015311^ACETYLCYSTEINE 20% (PF) SOLN,INHL,4ML
+"DATA",176.112,27288,1)
+307719
+"DATA",176.112,27289,0)
+4006632^ACETYLCYSTEINE 10% (PF) SOLN,INHL
+"DATA",176.112,27289,1)
+307718
+"DATA",176.112,27290,0)
+4015314^ACETYLCYSTEINE 10% (PF) SOLN,INHL,10ML
+"DATA",176.112,27290,1)
+307718
+"DATA",176.112,27291,0)
+4006631^ACETYLCYSTEINE 10% SOLN,INHL
+"DATA",176.112,27291,1)
+307718
+"DATA",176.112,27292,0)
+4015312^ACETYLCYSTEINE 10% SOLN,INHL,10ML
+"DATA",176.112,27292,1)
+307718
+"DATA",176.112,27293,0)
+4015318^ACETYLCYSTEINE 10% (PF) SOLN,INHL,30ML
+"DATA",176.112,27293,1)
+307718
+"DATA",176.112,27294,0)
+4015308^ACETYLCYSTEINE 10% SOLN,INHL,4ML
+"DATA",176.112,27294,1)
+307718
+"DATA",176.112,27295,0)
+4015310^ACETYLCYSTEINE 10% (PF) SOLN,INHL,4ML
+"DATA",176.112,27295,1)
+307718
+"DATA",176.112,27296,0)
+4015316^ACETYLCYSTEINE 10% SOLN,INHL,30ML
+"DATA",176.112,27296,1)
+307718
+"DATA",176.112,27297,0)
+4009246^ACETYLCHOLINE CL 1%,2ML/BALANCED SALT SOLN,OPH
+"DATA",176.112,27297,1)
+307717
+"DATA",176.112,27298,0)
+4010243^ACETIC ACID 9%/SALICYLIC ACID 14.2% LIQUID,TOP
+"DATA",176.112,27298,1)
+307713
+"DATA",176.112,27299,0)
+4004857^ACETIC ACID 36% LIQUID
+"DATA",176.112,27299,1)
+307712
+"DATA",176.112,27300,0)
+4008022^ACETIC ACID 2.47%/ALUMINUM SO4 0.79% SOLN,OTIC
+"DATA",176.112,27300,1)
+307711
+"DATA",176.112,27301,0)
+4004569^ACETIC ACID 2%/DESONIDE 0.05% SOLN,OTIC
+"DATA",176.112,27301,1)
+307710
+"DATA",176.112,27302,0)
+4004372^ACETIC ACID 2%/ALUMINUM ACETATE 10.79% SOLN,OTIC
+"DATA",176.112,27302,1)
+307709
+"DATA",176.112,27303,0)
+4004855^ACETIC ACID 0.25% SOLN,IRRG
+"DATA",176.112,27303,1)
+307707
+"DATA",176.112,27304,0)
+4008258^ACETIC AC 2%/ANTIPYRINE 5.4%/BENZOCAINE 1.4%/GLYCERIN SUSP,OTIC
+"DATA",176.112,27304,1)
+307703
+"DATA",176.112,27305,0)
+4002721^ACETAZOLAMIDE NA 500MG/VIL INJ
+"DATA",176.112,27305,1)
+307702
+"DATA",176.112,27306,0)
+4002719^ACETAZOLAMIDE 500MG CAP,SA
+"DATA",176.112,27306,1)
+307701
+"DATA",176.112,27307,0)
+4010205^ACETAMINOPHEN 81MG/PHENYLEPHRINE 1.25MG TAB,CHEW
+"DATA",176.112,27307,1)
+307697
+"DATA",176.112,27308,0)
+4007164^ACETAMINOPHEN 80MG TAB,CHEWABLE
+"DATA",176.112,27308,1)
+307696
+"DATA",176.112,27309,0)
+4007173^ACETAMINOPHEN 80MG SPRINKLE CAP
+"DATA",176.112,27309,1)
+307695
+"DATA",176.112,27310,0)
+4014211^ACETAMINOPHEN 650MG TAB,SA
+"DATA",176.112,27310,1)
+307694
+"DATA",176.112,27311,0)
+4008906^ACETAMINOPHEN 500MG/PSEUDOEPHEDRINE 30MG TAB
+"DATA",176.112,27311,1)
+307693
+"DATA",176.112,27312,0)
+4008907^ACETAMINOPHEN 500MG/PSEUDOEPHEDRINE 30MG CAP
+"DATA",176.112,27312,1)
+307692
+"DATA",176.112,27313,0)
+4008139^ACETAMINOPHEN 500MG/PHENYLTOLOXAMINE 30MG CAP
+"DATA",176.112,27313,1)
+307691
+"DATA",176.112,27314,0)
+4009858^ACETAMINOPHEN 500MG/PAMABROM 25MG/PYRILAMINE 15MG TAB
+"DATA",176.112,27314,1)
+307690
+"DATA",176.112,27315,0)
+4009856^APAP 500MG/PAMABROM 25MG/PYRILAMINE 15MG TAB
+"DATA",176.112,27315,1)
+307690
+"DATA",176.112,27316,0)
+4010178^ACETAMINOPHEN 500MG/DIPHENHYDRAMINE HCL 38MG TAB
+"DATA",176.112,27316,1)
+307689
+"DATA",176.112,27317,0)
+4010180^ACETAMINOPHEN 500MG/DIPHENHYDRAMINE HCL 25MG/15ML LIQUID
+"DATA",176.112,27317,1)
+307688
+"DATA",176.112,27318,0)
+4010179^ACETAMINOPHEN 500MG/DIPHENHYDRAMINE HCL 25MG TAB
+"DATA",176.112,27318,1)
+307687
+"DATA",176.112,27319,0)
+4010206^ACETAMINOPHEN 500MG/CAFFEINE 65MG TAB
+"DATA",176.112,27319,1)
+307686
+"DATA",176.112,27320,0)
+4010395^ACETAMINOPHEN 500MG/CA CARBONATE 250MG TAB
+"DATA",176.112,27320,1)
+307685
+"DATA",176.112,27321,0)
+4007167^ACETAMINOPHEN 500MG/15ML LIQUID
+"DATA",176.112,27321,1)
+307684
+"DATA",176.112,27322,0)
+4009857^ACETAMINOPHEN 400MG/PAMABROM 25MG/PYRILAMINE 15MG TAB
+"DATA",176.112,27322,1)
+307683
+"DATA",176.112,27323,0)
+4009855^ACETAMINOPHEN 325MG/PYRILAMINE MALEATE 12.5MG TAB
+"DATA",176.112,27323,1)
+307682
+"DATA",176.112,27324,0)
+4008905^ACETAMINOPHEN 325MG/PSEUDOEPHEDRINE 30MG TAB
+"DATA",176.112,27324,1)
+307681
+"DATA",176.112,27325,0)
+4008904^ACETAMINOPHEN 325MG/PSEUDOEPHEDRINE 15MG TAB
+"DATA",176.112,27325,1)
+307680
+"DATA",176.112,27326,0)
+4007621^ACETAMINOPHEN 325MG/PHENOBARBITAL 16MG TAB
+"DATA",176.112,27326,1)
+307679
+"DATA",176.112,27327,0)
+4009872^ACETAMINOPHEN 325MG/CHLORPHENIRAMINE 2MG TAB
+"DATA",176.112,27327,1)
+307678
+"DATA",176.112,27328,0)
+4008627^ACETAMINOPHEN 325MG/ASPIRIN 325MG TAB
+"DATA",176.112,27328,1)
+307677
+"DATA",176.112,27329,0)
+4014939^ACETAMINOPHEN 325MG/12.5ML SOLN,ORAL
+"DATA",176.112,27329,1)
+307676
+"DATA",176.112,27330,0)
+4007172^ACETAMINOPHEN 130MG/5ML SOLN,ORAL
+"DATA",176.112,27330,1)
+307676
+"DATA",176.112,27331,0)
+4007179^ACETAMINOPHEN 160MG/5ML (ALC-F) LIQUID
+"DATA",176.112,27331,1)
+307675
+"DATA",176.112,27332,0)
+4007160^ACETAMINOPHEN 325MG/10.15ML ELIXIR
+"DATA",176.112,27332,1)
+307675
+"DATA",176.112,27333,0)
+4016597^ACETAMINOPHEN 650MG/20.3ML (AF & SF) SOLN,ORAL
+"DATA",176.112,27333,1)
+307675
+"DATA",176.112,27334,0)
+4007181^ACETAMINOPHEN 160MG/5ML (SF & AF) LIQUID
+"DATA",176.112,27334,1)
+307675
+"DATA",176.112,27335,0)
+4007168^ACETAMINOPHEN 160MG/5ML LIQUID
+"DATA",176.112,27335,1)
+307675
+"DATA",176.112,27336,0)
+4007159^ACETAMINOPHEN 160MG/5ML ELIXIR
+"DATA",176.112,27336,1)
+307675
+"DATA",176.112,27337,0)
+4002642^ACETAMINOPHEN 300MG/CHLORZOXAZONE 250MG TAB
+"DATA",176.112,27337,1)
+307674
+"DATA",176.112,27338,0)
+4002643^ACETAMINOPHEN 300MG/CHLORZOXAZONE 250MG CAP
+"DATA",176.112,27338,1)
+307673
+"DATA",176.112,27339,0)
+4006731^ACETAMINOPHEN 250MG/SALICYLAMIDE 250MG CAP
+"DATA",176.112,27339,1)
+307672
+"DATA",176.112,27340,0)
+4008902^ACETAMINOPHEN 200MG/PSEUDOEPHEDRINE 30MG TAB
+"DATA",176.112,27340,1)
+307671
+"DATA",176.112,27341,0)
+4008903^ACETAMINOPHEN 200MG/PSEUDOEPHEDRINE 30MG CAP
+"DATA",176.112,27341,1)
+307670
+"DATA",176.112,27342,0)
+4007171^ACETAMINOPHEN 160MG/ML DROPS,ORAL
+"DATA",176.112,27342,1)
+307669
+"DATA",176.112,27343,0)
+4007180^ACETAMINOPHEN 160MG/5ML (ALC-F) SUSP
+"DATA",176.112,27343,1)
+307668
+"DATA",176.112,27344,0)
+4007174^ACETAMINOPHEN 160MG SPRINKLE CAP
+"DATA",176.112,27344,1)
+307667
+"DATA",176.112,27345,0)
+4007176^ACETAMINOPHEN 125MG SUPP,RTL
+"DATA",176.112,27345,1)
+307666
+"DATA",176.112,27346,0)
+4015079^ABACAVIR SO4 300MG/LAMIVUDINE 150MG/ZIDOVUDINE 300MG TAB
+"DATA",176.112,27346,1)
+307650
+"DATA",176.112,27347,0)
+4008140^ACETAMINOPHEN 500MG/PHENYLTOLXAMINE 50MG TAB
+"DATA",176.112,27347,1)
+285119
+"DATA",176.112,27348,0)
+4009275^ETODOLAC 600MG TAB,SA
+"DATA",176.112,27348,1)
+285005
+"DATA",176.112,27349,0)
+4009276^ETODOLAC 400MG TAB,SA
+"DATA",176.112,27349,1)
+285004
+"DATA",176.112,27350,0)
+4024600^APAP 500MG/DM 15MG/DOXYLAMINE 6.25MG/PSEUDOEFED 30MG/15ML LIQUID
+"DATA",176.112,27350,1)
+284990
+"DATA",176.112,27351,0)
+4009967^SOMATROPIN 10MG/VIL INJ
+"DATA",176.112,27351,1)
+284989
+"DATA",176.112,27352,0)
+4009966^SOMATROPIN 5MG/VIL INJ
+"DATA",176.112,27352,1)
+284989
+"DATA",176.112,27353,0)
+4016275^SOMATROPIN 15MG/1.5ML INJ,SOLN,CARTRIDGE
+"DATA",176.112,27353,1)
+284989
+"DATA",176.112,27354,0)
+4015115^DIDANOSINE 400MG CAP,SA
+"DATA",176.112,27354,1)
+284988
+"DATA",176.112,27355,0)
+4017032^DIDANOSINE 400MG CAP,EC
+"DATA",176.112,27355,1)
+284988
+"DATA",176.112,27356,0)
+4015848^LEUPROLIDE ACETATE 65MG/KIT INJ,IMPLANT
+"DATA",176.112,27356,1)
+284986
+"DATA",176.112,27357,0)
+4000706^THYROID 180MG CAP
+"DATA",176.112,27357,1)
+284438
+"DATA",176.112,27358,0)
+4013427^THYROID 15MG CAP
+"DATA",176.112,27358,1)
+284437
+"DATA",176.112,27359,0)
+4016840^DILTIAZEM (INWOOD) 180MG CAP,SA
+"DATA",176.112,27359,1)
+284265
+"DATA",176.112,27360,0)
+4006686^DILTIAZEM HCL 90MG CAP,SA
+"DATA",176.112,27360,1)
+284262
+"DATA",176.112,27361,0)
+4006685^DILTIAZEM HCL 60MG CAP,SA
+"DATA",176.112,27361,1)
+284261
+"DATA",176.112,27362,0)
+4009023^PROPAFENONE HCL 225MG TAB
+"DATA",176.112,27362,1)
+284257
+"DATA",176.112,27363,0)
+4009021^PROPAFENONE HCL 150MG TAB
+"DATA",176.112,27363,1)
+284256
+"DATA",176.112,27364,0)
+4016130^PROPAFENONE HCL 150MG TAB,UD
+"DATA",176.112,27364,1)
+284256
+"DATA",176.112,27365,0)
+4002999^FAMOTIDINE 40MG TAB
+"DATA",176.112,27365,1)
+284245
+"DATA",176.112,27366,0)
+4003474^CLINDAMYCIN HCL 300MG CAP
+"DATA",176.112,27366,1)
+284215
+"DATA",176.112,27367,0)
+4015409^IMATINIB MESYLATE 100MG CAP
+"DATA",176.112,27367,1)
+284206
+"DATA",176.112,27368,0)
+4015523^ALMOTRIPTAN MALATE 12.5MG TAB,UD
+"DATA",176.112,27368,1)
+284205
+"DATA",176.112,27369,0)
+4015522^ALMOTRIPTAN MALATE 6.25MG TAB,UD
+"DATA",176.112,27369,1)
+284204
+"DATA",176.112,27370,0)
+4015671^ZOLMITRIPTAN 2.5MG TAB,ORALLY DISINTEGRATING,PKG,6
+"DATA",176.112,27370,1)
+284201
+"DATA",176.112,27371,0)
+4015669^FLUOROURACIL 0.5% CREAM,TOP
+"DATA",176.112,27371,1)
+284191
+"DATA",176.112,27372,0)
+4015113^DIDANOSINE 200MG CAP,SA
+"DATA",176.112,27372,1)
+284185
+"DATA",176.112,27373,0)
+4017030^DIDANOSINE 200MG CAP,EC
+"DATA",176.112,27373,1)
+284185
+"DATA",176.112,27374,0)
+4017031^DIDANOSINE 250MG CAP,EC
+"DATA",176.112,27374,1)
+284184
+"DATA",176.112,27375,0)
+4015114^DIDANOSINE 250MG CAP,SA
+"DATA",176.112,27375,1)
+284184
+"DATA",176.112,27376,0)
+4015112^DIDANOSINE 125MG CAP,SA
+"DATA",176.112,27376,1)
+284183
+"DATA",176.112,27377,0)
+4017029^DIDANOSINE 125MG CAP,EC
+"DATA",176.112,27377,1)
+284183
+"DATA",176.112,27378,0)
+4024695^AMYLASE 60000UNIT/LIPASE 16000UNIT/PROTEASE 60000UNIT TAB
+"DATA",176.112,27378,1)
+284175
+"DATA",176.112,27379,0)
+4015586^PAPAIN 830000 UNT/UREA 10% OINT,TOP
+"DATA",176.112,27379,1)
+284146
+"DATA",176.112,27380,0)
+4017141^HYDROCODONE 5MG/ACETAMINOPHEN 325MG TAB
+"DATA",176.112,27380,1)
+284145
+"DATA",176.112,27381,0)
+4015495^ALEMTUZUMAB 10MG/ML INJ
+"DATA",176.112,27381,1)
+284064
+"DATA",176.112,27382,0)
+4025797^TRAVOPROST Z 0.004% SOLN,OPH
+"DATA",176.112,27382,1)
+284008
+"DATA",176.112,27383,0)
+4015446^TRAVOPROST 0.004% SOLN,OPH
+"DATA",176.112,27383,1)
+284008
+"DATA",176.112,27384,0)
+4016736^HYDROCODONE 7.5MG/ACETAMINOPHEN 325MG TAB
+"DATA",176.112,27384,1)
+283993
+"DATA",176.112,27385,0)
+4024976^TESTOSTERONE PROPIONATE 2% OINT,TOP
+"DATA",176.112,27385,1)
+283900
+"DATA",176.112,27386,0)
+4025587^HYDROCORTISONE 10%/ULTRASOUND GEL,TOP
+"DATA",176.112,27386,1)
+283896
+"DATA",176.112,27387,0)
+4026945^HYDROMORPHONE 0.2MG/ML INJ,30ML
+"DATA",176.112,27387,1)
+283895
+"DATA",176.112,27388,0)
+4024613^AMYLASE 15000UNIT/LIPASE 1200UNIT/PROTEASE 15000UNIT CAP
+"DATA",176.112,27388,1)
+283880
+"DATA",176.112,27389,0)
+4027355^AMYLASE 15000UNT/LIPASE 1200UNIT/PROTEASE 15000UNIT CAP
+"DATA",176.112,27389,1)
+283880
+"DATA",176.112,27390,0)
+4015673^ROPINIROLE HCL 3MG TAB
+"DATA",176.112,27390,1)
+283858
+"DATA",176.112,27391,0)
+4009019^ZINC PYRITHIONE 2% BAR,TOP
+"DATA",176.112,27391,1)
+283707
+"DATA",176.112,27392,0)
+4015650^CITALOPRAM HYDROBROMIDE 10MG TAB
+"DATA",176.112,27392,1)
+283672
+"DATA",176.112,27393,0)
+4009109^KETOROLAC TROMETHAMINE 15MG/ML INJ
+"DATA",176.112,27393,1)
+283670
+"DATA",176.112,27394,0)
+4015647^PANTOPRAZOLE NA 40MG/VIL INJ
+"DATA",176.112,27394,1)
+283669
+"DATA",176.112,27395,0)
+4007113^HYDROCODONE 5MG/CTM 2MG/P-EPHRINE 5MG/5ML SYRUP
+"DATA",176.112,27395,1)
+283662
+"DATA",176.112,27396,0)
+4016606^CALCIUM CARB 800MG/FAMOTIDINE 10MG/MAGNESIUM 165MG TAB,CHEW
+"DATA",176.112,27396,1)
+283641
+"DATA",176.112,27397,0)
+4015521^OLANZAPINE 20MG TAB,UD
+"DATA",176.112,27397,1)
+283639
+"DATA",176.112,27398,0)
+4015520^OLANZAPINE 20MG TAB
+"DATA",176.112,27398,1)
+283639
+"DATA",176.112,27399,0)
+4026080^SALICYLIC ACID 3% GEL,TOP
+"DATA",176.112,27399,1)
+283602
+"DATA",176.112,27400,0)
+4015674^OXCARBAZEPINE 300MG/5ML SUSP
+"DATA",176.112,27400,1)
+283536
+"DATA",176.112,27401,0)
+4015529^DOXYCYCLINE HYCLATE 20MG TAB
+"DATA",176.112,27401,1)
+283535
+"DATA",176.112,27402,0)
+4015539^GABAPENTIN 250MG/5ML SOLN,ORAL
+"DATA",176.112,27402,1)
+283523
+"DATA",176.112,27403,0)
+4015698^IRON SUCROSE 20MG/ML INJ
+"DATA",176.112,27403,1)
+283517
+"DATA",176.112,27404,0)
+4024995^METHOTREXATE NA 15MG TAB
+"DATA",176.112,27404,1)
+283510
+"DATA",176.112,27405,0)
+4009288^ONDANSETRON HCL 2MG/ML INJ,SOLN
+"DATA",176.112,27405,1)
+283504
+"DATA",176.112,27406,0)
+4009110^KETOROLAC TROMETHAMINE 30MG/ML INJ
+"DATA",176.112,27406,1)
+283502
+"DATA",176.112,27407,0)
+4008302^DM 10MG/GG 100MG/P-EPHRINE 10MG/5ML SYRUP
+"DATA",176.112,27407,1)
+283491
+"DATA",176.112,27408,0)
+4015555^CARBOXYMETHYLCELLULOSE NA 0.25% SOLN,OPH,0.6ML
+"DATA",176.112,27408,1)
+283489
+"DATA",176.112,27409,0)
+4015554^CARBOXYMETHYLCELLULOSE NA 0.25% SOLN,OPH
+"DATA",176.112,27409,1)
+283489
+"DATA",176.112,27410,0)
+4016817^BUSPIRONE HCL 7.5MG TAB
+"DATA",176.112,27410,1)
+283486
+"DATA",176.112,27411,0)
+4015701^MIRTAZAPINE 45MG,ORALLY DISINTERGRATING TAB
+"DATA",176.112,27411,1)
+283485
+"DATA",176.112,27412,0)
+4015670^HYDROXYUREA 1000MG TAB
+"DATA",176.112,27412,1)
+283475
+"DATA",176.112,27413,0)
+4024997^CHLORPHENIRAMINE 4.5MG/PHENYLEPHRINE 5MG/5ML SUSP,ORAL
+"DATA",176.112,27413,1)
+283463
+"DATA",176.112,27414,0)
+4025968^BENZONATATE 200MG CAP
+"DATA",176.112,27414,1)
+283417
+"DATA",176.112,27415,0)
+4015700^MIRTAZAPINE 30MG,ORALLY DISINTEGRATING TAB
+"DATA",176.112,27415,1)
+283407
+"DATA",176.112,27416,0)
+4015699^MIRTAZAPINE 15MG,ORALLY DISINTEGRATING TAB
+"DATA",176.112,27416,1)
+283406
+"DATA",176.112,27417,0)
+4015697^CETRORELIX ACETATE 3MG/VIL INJ
+"DATA",176.112,27417,1)
+283403
+"DATA",176.112,27418,0)
+4015696^CETRORELIX ACETATE 0.25MG/VIL INJ
+"DATA",176.112,27418,1)
+283402
+"DATA",176.112,27419,0)
+4001459^INSULIN,SEMILENTE,BEEF 100UNT/ML INJ
+"DATA",176.112,27419,1)
+283394
+"DATA",176.112,27420,0)
+4015332^BOTULINUM TOXIN TYPE B 2500UNT/VIL INJ 0.5ML
+"DATA",176.112,27420,1)
+283374
+"DATA",176.112,27421,0)
+4015334^BOTULINUM TOXIN TYPE B 10,000UNT/VIL INJ 2ML
+"DATA",176.112,27421,1)
+283374
+"DATA",176.112,27422,0)
+4015333^BOTULINUM TOXIN TYPE B 5000UNT/VIL INJ 1ML
+"DATA",176.112,27422,1)
+283374
+"DATA",176.112,27423,0)
+4016232^SENNOSIDES 17MG TAB
+"DATA",176.112,27423,1)
+283325
+"DATA",176.112,27424,0)
+4025745^HYOSCYAMINE SO4 0.125MG TAB,ORAL DISINTEGRATING
+"DATA",176.112,27424,1)
+283323
+"DATA",176.112,27425,0)
+4017340^HYDROCHLOROTHIAZIDE 12.5MG/TELMISARTAN 80MG TAB
+"DATA",176.112,27425,1)
+283317
+"DATA",176.112,27426,0)
+4017260^HYDROCHLOROTHIAZIDE 12.5MG/TELMISARTAN 40MG TAB
+"DATA",176.112,27426,1)
+283316
+"DATA",176.112,27427,0)
+4025022^CAMPHOR 4.7%/EUCALYPTUS 1.2%/MENTHOL 2.6% CREAM,TOP
+"DATA",176.112,27427,1)
+283260
+"DATA",176.112,27428,0)
+4024659^PSYLLIUM 3.4GM WAFER,ORAL
+"DATA",176.112,27428,1)
+283215
+"DATA",176.112,27429,0)
+4017281^BENZOCAINE 10MG/MENTHOL 3.6MG LOZENGE
+"DATA",176.112,27429,1)
+283147
+"DATA",176.112,27430,0)
+4003040^PREDNISOLONE 15MG/5ML SYRUP
+"DATA",176.112,27430,1)
+283077
+"DATA",176.112,27431,0)
+4016636^FISH OIL 1000MG CAP,ORAL
+"DATA",176.112,27431,1)
+282955
+"DATA",176.112,27432,0)
+4007203^DM 5MG/GG 100MG/P-PROPANOL 6.25MG/5ML SYRUP
+"DATA",176.112,27432,1)
+282815
+"DATA",176.112,27433,0)
+4015952^TELMISARTAN 20MG TAB
+"DATA",176.112,27433,1)
+282755
+"DATA",176.112,27434,0)
+4026393^NA BIPHOSPHATE 0.9GM/NA PHOSPHATE 2.4GM/5ML LIQUID,ORAL
+"DATA",176.112,27434,1)
+282725
+"DATA",176.112,27435,0)
+4009547^PHENOL 14.5MG LOZENGE
+"DATA",176.112,27435,1)
+282708
+"DATA",176.112,27436,0)
+4009617^CTM 2MG/DM 10MG/P-PROPANOL 12.5MG/5ML SYRUP
+"DATA",176.112,27436,1)
+282686
+"DATA",176.112,27437,0)
+4014745^GADOVERSETAMIDE 330.9MG/ML INJ
+"DATA",176.112,27437,1)
+282658
+"DATA",176.112,27438,0)
+4012418^CAMPHOR 9%/MENTHOL 1.35% OINT
+"DATA",176.112,27438,1)
+282626
+"DATA",176.112,27439,0)
+4015974^OXYCODONE HCL 30MG TAB
+"DATA",176.112,27439,1)
+282610
+"DATA",176.112,27440,0)
+4015540^DOXERCALCIFEROL 2MCG/ML INJ
+"DATA",176.112,27440,1)
+282609
+"DATA",176.112,27441,0)
+4002206^BUMETANIDE 0.25MG/ML INJ
+"DATA",176.112,27441,1)
+282486
+"DATA",176.112,27442,0)
+4007554^DROPERIDOL 2.5MG/ML (PF) INJ
+"DATA",176.112,27442,1)
+282485
+"DATA",176.112,27443,0)
+4007553^DROPERIDOL 2.5MG/ML INJ
+"DATA",176.112,27443,1)
+282485
+"DATA",176.112,27444,0)
+4012151^ENOXAPARIN 60MG/0.6ML INJ
+"DATA",176.112,27444,1)
+282479
+"DATA",176.112,27445,0)
+4012152^ENOXAPARIN 80MG/0.8ML INJ
+"DATA",176.112,27445,1)
+282479
+"DATA",176.112,27446,0)
+4012150^ENOXAPARIN 40MG/0.4ML INJ
+"DATA",176.112,27446,1)
+282479
+"DATA",176.112,27447,0)
+4013303^ENOXAPARIN 30MG/0.3ML INJ,AMP,1ML
+"DATA",176.112,27447,1)
+282479
+"DATA",176.112,27448,0)
+4012149^ENOXAPARIN 30MG/0.3ML INJ
+"DATA",176.112,27448,1)
+282479
+"DATA",176.112,27449,0)
+4012153^ENOXAPARIN 100MG/ML INJ
+"DATA",176.112,27449,1)
+282479
+"DATA",176.112,27450,0)
+4000634^ATROPINE SO4 0.1MG/ML INJ
+"DATA",176.112,27450,1)
+282474
+"DATA",176.112,27451,0)
+4004271^BUPIVACAINE HCL 0.5% INJ
+"DATA",176.112,27451,1)
+282473
+"DATA",176.112,27452,0)
+4004270^BUPIVACAINE HCL 0.25% INJ
+"DATA",176.112,27452,1)
+282472
+"DATA",176.112,27453,0)
+4015293^CALCIUM CARBONATE 1.25GM (CA 500MG) TAB,UD
+"DATA",176.112,27453,1)
+282465
+"DATA",176.112,27454,0)
+4008087^CALCIUM CARBONATE 1.25GM TAB
+"DATA",176.112,27454,1)
+282465
+"DATA",176.112,27455,0)
+4007166^ACETAMINOPHEN 160MG TAB
+"DATA",176.112,27455,1)
+282464
+"DATA",176.112,27456,0)
+4000731^PHENOBARBITAL NA 60MG/ML INJ
+"DATA",176.112,27456,1)
+282463
+"DATA",176.112,27457,0)
+4000902^SECOBARBITAL NA 50MG/ML INJ
+"DATA",176.112,27457,1)
+282460
+"DATA",176.112,27458,0)
+4007103^PRILOCAINE HCL 4% INJ
+"DATA",176.112,27458,1)
+282459
+"DATA",176.112,27459,0)
+4000990^MORPHINE SO4 5MG/ML INJ
+"DATA",176.112,27459,1)
+282458
+"DATA",176.112,27460,0)
+4000980^MORPHINE SO4 4MG/ML INJ
+"DATA",176.112,27460,1)
+282457
+"DATA",176.112,27461,0)
+4004199^MEPIVACAINE HCL 3% INJ
+"DATA",176.112,27461,1)
+282456
+"DATA",176.112,27462,0)
+4006191^ISOPROTERENOL HCL 0.2MG/ML/NACL 0.425% INJ
+"DATA",176.112,27462,1)
+282455
+"DATA",176.112,27463,0)
+4004232^ISOPROTERENOL HCL 0.2MG/ML INJ
+"DATA",176.112,27463,1)
+282455
+"DATA",176.112,27464,0)
+4003272^HYDROMORPHONE HCL 4MG/ML INJ
+"DATA",176.112,27464,1)
+282453
+"DATA",176.112,27465,0)
+4002371^FUROSEMIDE 10MG/ML INJ
+"DATA",176.112,27465,1)
+282452
+"DATA",176.112,27466,0)
+4006320^CYSTEINE HCL 50MG/ML INJ
+"DATA",176.112,27466,1)
+282451
+"DATA",176.112,27467,0)
+4000635^ATROPINE SO4 0.05MG/ML INJ
+"DATA",176.112,27467,1)
+282450
+"DATA",176.112,27468,0)
+4001051^ASCORBIC ACID 500MG TAB,UD
+"DATA",176.112,27468,1)
+282402
+"DATA",176.112,27469,0)
+4001031^ASCORBIC ACID 500MG TAB
+"DATA",176.112,27469,1)
+282402
+"DATA",176.112,27470,0)
+4001050^ASCORBIC ACID 500MG/ROSE HIPS TAB
+"DATA",176.112,27470,1)
+282402
+"DATA",176.112,27471,0)
+4012734^LAMOTRIGINE 25MG TAB
+"DATA",176.112,27471,1)
+282401
+"DATA",176.112,27472,0)
+4006236^PEMOLINE 37.5MG TAB
+"DATA",176.112,27472,1)
+261983
+"DATA",176.112,27473,0)
+4003286^HYDROMORPHONE HCL 8MG TAB
+"DATA",176.112,27473,1)
+261977
+"DATA",176.112,27474,0)
+4009287^RAMIPRIL 10MG CAP
+"DATA",176.112,27474,1)
+261962
+"DATA",176.112,27475,0)
+4005508^BETAXOLOL HCL 20MG TAB
+"DATA",176.112,27475,1)
+261398
+"DATA",176.112,27476,0)
+4005507^BETAXOLOL HCL 10MG TAB
+"DATA",176.112,27476,1)
+261397
+"DATA",176.112,27477,0)
+4004190^CHLOROQUINE PO4 500MG TAB
+"DATA",176.112,27477,1)
+261104
+"DATA",176.112,27478,0)
+4010292^SOTALOL HCL 120MG TAB
+"DATA",176.112,27478,1)
+260693
+"DATA",176.112,27479,0)
+4008934^OXYMETAZOLINE HCL 0.05% SOLN,NASAL
+"DATA",176.112,27479,1)
+260493
+"DATA",176.112,27480,0)
+4008932^OXYMETAZOLINE HCL 0.05% SOLN,NASAL SPRAY
+"DATA",176.112,27480,1)
+260493
+"DATA",176.112,27481,0)
+4007762^VITAMIN E 1000UNT CAP
+"DATA",176.112,27481,1)
+260476
+"DATA",176.112,27482,0)
+4006656^TRAZODONE HCL 300MG TAB
+"DATA",176.112,27482,1)
+260419
+"DATA",176.112,27483,0)
+4008766^TERAZOSIN HCL 10MG CAP
+"DATA",176.112,27483,1)
+260376
+"DATA",176.112,27484,0)
+4010291^SOTALOL HCL 240MG TAB
+"DATA",176.112,27484,1)
+260349
+"DATA",176.112,27485,0)
+4010290^SOTALOL HCL 160MG TAB
+"DATA",176.112,27485,1)
+260348
+"DATA",176.112,27486,0)
+4010289^SOTALOL HCL 80MG TAB
+"DATA",176.112,27486,1)
+260346
+"DATA",176.112,27487,0)
+4016133^SOTALOL HCL 80MG TAB,UD
+"DATA",176.112,27487,1)
+260346
+"DATA",176.112,27488,0)
+4008986^BUPROPION HCL 75MG TAB
+"DATA",176.112,27488,1)
+260279
+"DATA",176.112,27489,0)
+4008987^BUPROPION HCL 100MG TAB
+"DATA",176.112,27489,1)
+260278
+"DATA",176.112,27490,0)
+4025581^INSULIN,LISPRO,HUMAN 50/50 INJ,PEN,3ML
+"DATA",176.112,27490,1)
+260265
+"DATA",176.112,27491,0)
+4027214^INSULIN,LISPRO,HUMAN 50/50 INJ,KWIKPEN,3ML
+"DATA",176.112,27491,1)
+260265
+"DATA",176.112,27492,0)
+4012797^CARBIDOPA 25MG TAB
+"DATA",176.112,27492,1)
+260260
+"DATA",176.112,27493,0)
+4004212^DEXTROSE 25% INJ
+"DATA",176.112,27493,1)
+260258
+"DATA",176.112,27494,0)
+4003588^MAGNESIUM SALICYLATE 500MG TAB
+"DATA",176.112,27494,1)
+260249
+"DATA",176.112,27495,0)
+4000918^PROGESTERONE 100MG CAP
+"DATA",176.112,27495,1)
+260243
+"DATA",176.112,27496,0)
+4014642^DM 60MG/GG 1200MG/P-PROPANOL 75MG TAB,SA
+"DATA",176.112,27496,1)
+260240
+"DATA",176.112,27497,0)
+4013566^MODAFINIL 100MG TAB
+"DATA",176.112,27497,1)
+260218
+"DATA",176.112,27498,0)
+4006716^HYOSCYAMINE SO4 0.125MG/5ML ELIXIR
+"DATA",176.112,27498,1)
+260167
+"DATA",176.112,27499,0)
+4003036^PREDNISOLONE ACETATE 50MG/ML INJ,SUSP
+"DATA",176.112,27499,1)
+260127
+"DATA",176.112,27500,0)
+4003039^PREDNISOLONE ACETATE 40MG/ML INJ,SUSP
+"DATA",176.112,27500,1)
+260126
+"DATA",176.112,27501,0)
+4003035^PREDNISOLONE ACETATE 25MG/ML INJ,SUSP
+"DATA",176.112,27501,1)
+260125
+"DATA",176.112,27502,0)
+4003034^PREDNISOLONE NA PHOSPHATE 25MG/ML INJ,SOLN
+"DATA",176.112,27502,1)
+260125
+"DATA",176.112,27503,0)
+4001603^TRIAMCINOLONE ACETONIDE 40MG/ML INJ,SUSP
+"DATA",176.112,27503,1)
+260124
+"DATA",176.112,27504,0)
+4001625^TRIAMCINOLONE 40MG/ML INJ,SUSP
+"DATA",176.112,27504,1)
+260124
+"DATA",176.112,27505,0)
+4001619^TRIAMCINOLONE DIACETATE 40MG/ML INJ,SUSP
+"DATA",176.112,27505,1)
+260124
+"DATA",176.112,27506,0)
+4016320^DIPHENHYDRAMINE 0.5%/HC 0.5% SPRAY,TOP
+"DATA",176.112,27506,1)
+260072
+"DATA",176.112,27507,0)
+4003425^METHYLPREDNISOLONE 4MG TAB
+"DATA",176.112,27507,1)
+259966
+"DATA",176.112,27508,0)
+4016074^METHYLPREDNISOLONE 4MG TAB,UD
+"DATA",176.112,27508,1)
+259966
+"DATA",176.112,27509,0)
+4014365^BUSPIRONE HCL 30MG TAB
+"DATA",176.112,27509,1)
+259794
+"DATA",176.112,27510,0)
+4005585^COAL TAR 7% SHAMPOO
+"DATA",176.112,27510,1)
+259714
+"DATA",176.112,27511,0)
+4026904^ASCORBIC ACID (AS CA ASCORBATE) 500MG/BIOFLAVONOIDS 200MG TAB
+"DATA",176.112,27511,1)
+259703
+"DATA",176.112,27512,0)
+4014095^ACETIC ACID 0.9%/OXYQUINOLINE SO4 0.025% GEL,VAG
+"DATA",176.112,27512,1)
+259587
+"DATA",176.112,27513,0)
+4015036^CALCIUM CARBONATE 200/FOLIC ACID 1/MAGNESIUM CARBONATE 400MG TAB
+"DATA",176.112,27513,1)
+259567
+"DATA",176.112,27514,0)
+4008381^ALUMINUM HYDROXIDE 400MG/MAGNESIUM HYDROXIDE 400MG TAB,CHEW
+"DATA",176.112,27514,1)
+259533
+"DATA",176.112,27515,0)
+4015824^LEVOBUPIVACAINE HCL 2.5MG/ML INJ,SOLN
+"DATA",176.112,27515,1)
+259329
+"DATA",176.112,27516,0)
+4027422^THEOPHYLLINE 400MG 24HR TAB,SA
+"DATA",176.112,27516,1)
+259325^^^THEOPHYLLINE 400MG 24HR SA TAB^Y
+"DATA",176.112,27517,0)
+4015531^GATIFLOXACIN 2MG/ML/DEXTROSE INJ,BAG,200ML
+"DATA",176.112,27517,1)
+259311
+"DATA",176.112,27518,0)
+4014271^GATIFLOXACIN 10MG/ML INJ
+"DATA",176.112,27518,1)
+259311
+"DATA",176.112,27519,0)
+4015530^GATIFLOXACIN 2MG/ML/DEXTROSE INJ,BAG,100ML
+"DATA",176.112,27519,1)
+259311
+"DATA",176.112,27520,0)
+4014459^ALOSETRON HCL 1MG TAB
+"DATA",176.112,27520,1)
+259306
+"DATA",176.112,27521,0)
+4014467^ALOSETRON 1MG TAB
+"DATA",176.112,27521,1)
+259306
+"DATA",176.112,27522,0)
+4014241^DALFOPRISTIN 350MG/QUINUPRISTIN 150MG/VIL INJ
+"DATA",176.112,27522,1)
+259290
+"DATA",176.112,27523,0)
+4014971^TRIAMCINOLONE ACETONIDE 50MCG/ACTUATION,INHL,NASAL,15ML
+"DATA",176.112,27523,1)
+259259
+"DATA",176.112,27524,0)
+4014891^ATORVASTATIN CA 80MG TAB
+"DATA",176.112,27524,1)
+259255
+"DATA",176.112,27525,0)
+4016341^CLINDAMYCIN PHOSPHATE 100MG SUPP,VAG
+"DATA",176.112,27525,1)
+259233
+"DATA",176.112,27526,0)
+4015071^GEMTUZUMAB OZOGAMICIN 5MG/VIL INJ
+"DATA",176.112,27526,1)
+259231
+"DATA",176.112,27527,0)
+4015846^PEMIROLAST POTASSIUM 0.1% SOLN,OPH
+"DATA",176.112,27527,1)
+259219
+"DATA",176.112,27528,0)
+4015547^LEVONORGESTREL 0.75MG TAB,PKG,2
+"DATA",176.112,27528,1)
+259218
+"DATA",176.112,27529,0)
+4014458^TIAGABINE HCL 2MG TAB
+"DATA",176.112,27529,1)
+259217
+"DATA",176.112,27530,0)
+4014678^PORACTANT ALFA 80MG/ML SUSP,INTRATRACHEAL
+"DATA",176.112,27530,1)
+259216
+"DATA",176.112,27531,0)
+4015975^MINERAL OIL 20%/PETROLATUM 80% OINT,OPH
+"DATA",176.112,27531,1)
+259196
+"DATA",176.112,27532,0)
+4015763^GLYCERIN 0.3%/PROPYLENE GLYCOL 1% SOLN,OPH
+"DATA",176.112,27532,1)
+259195
+"DATA",176.112,27533,0)
+4015825^LEVOBUPIVACAINE HCL 5MG/ML INJ,SOLN
+"DATA",176.112,27533,1)
+259188
+"DATA",176.112,27534,0)
+4015826^LEVOBUPIVACAINE HCL 7.5MG/ML INJ,SOLN
+"DATA",176.112,27534,1)
+259187
+"DATA",176.112,27535,0)
+4007643^BPM 2MG/DM 10MG/P-PROPANOL 12.5MG/5ML SYRUP
+"DATA",176.112,27535,1)
+259183
+"DATA",176.112,27536,0)
+4007644^BPM 2MG/DM 10MG/P-PROPANOL 12.5MG/5ML ELIXIR
+"DATA",176.112,27536,1)
+259183
+"DATA",176.112,27537,0)
+4007645^BPM 2MG/DM 10MG/P-PROPANOL 12.5MG/5ML (AF) ELIXIR
+"DATA",176.112,27537,1)
+259183
+"DATA",176.112,27538,0)
+4014734^CLONIDINE HCL 500MCG/ML INJ
+"DATA",176.112,27538,1)
+259179
+"DATA",176.112,27539,0)
+4014735^INSULIN,LISPRO,HUMAN 75/25 INJ,PEN,3ML
+"DATA",176.112,27539,1)
+259111
+"DATA",176.112,27540,0)
+4027215^INSULIN,LISPRO,HUMAN 75/25 INJ,KWIKPEN,3ML
+"DATA",176.112,27540,1)
+259111
+"DATA",176.112,27541,0)
+4024978^CARBINOXAMINE MALEATE 8MG/PSEUDOEPHEDRINE 90MG TAB,SA
+"DATA",176.112,27541,1)
+259109
+"DATA",176.112,27542,0)
+4025801^DIMETHICONE 5% CREAM,TOP
+"DATA",176.112,27542,1)
+259090
+"DATA",176.112,27543,0)
+4017367^BENZOYL PEROXIDE 3% GEL,TOP
+"DATA",176.112,27543,1)
+259089
+"DATA",176.112,27544,0)
+4013988^VERAPAMIL HCL 240MG TAB,SA,UD
+"DATA",176.112,27544,1)
+259080
+"DATA",176.112,27545,0)
+4003634^VERAPAMIL HCL 240MG TAB,SA
+"DATA",176.112,27545,1)
+259080
+"DATA",176.112,27546,0)
+4027423^THEOPHYLLINE 600MG 24HR TAB,SA
+"DATA",176.112,27546,1)
+259079^^^THEOPHYLLINE 600MG 24HR SA TAB^Y
+"DATA",176.112,27547,0)
+4004143^GENTAMICIN SO4 0.4MG/ML INJ
+"DATA",176.112,27547,1)
+259047
+"DATA",176.112,27548,0)
+4014658^OXYCODONE HCL 7.5MG/ACETAMINOPHEN 500MG TAB
+"DATA",176.112,27548,1)
+259039
+"DATA",176.112,27549,0)
+4014656^OXYCODONE 7.5MG/ACETAMINOPHEN 500MG TAB
+"DATA",176.112,27549,1)
+259039
+"DATA",176.112,27550,0)
+4010154^BERACTANT 25MG/ML SUSP,INTRATHECAL
+"DATA",176.112,27550,1)
+259034
+"DATA",176.112,27551,0)
+4014680^RAPACURONIUM BROMIDE 20MG/ML INJ
+"DATA",176.112,27551,1)
+259033
+"DATA",176.112,27552,0)
+4013280^CALFACTANT 35MG/ML SUSP,INTRATRACHEAL
+"DATA",176.112,27552,1)
+259032
+"DATA",176.112,27553,0)
+4016342^CTM 4.5MG/DM 25MG/PSEUDEFED 75MG/5ML SUSP
+"DATA",176.112,27553,1)
+259031
+"DATA",176.112,27554,0)
+4007205^DM 10MG/GG 200MG/P-PROPANOLAMINE 12.5MG/5ML SYRUP
+"DATA",176.112,27554,1)
+259027
+"DATA",176.112,27555,0)
+4024980^PHENYLEPHRINE TANNATE 5MG/PYRILAMINE TANNATE 30MG/5ML SUSP,ORAL
+"DATA",176.112,27555,1)
+259026
+"DATA",176.112,27556,0)
+4010460^NONOXYNOL-9 3.5% GEL,VAG,APPLICATOR,3.5GM
+"DATA",176.112,27556,1)
+259004
+"DATA",176.112,27557,0)
+4010461^NONOXYNOL-9 3.5% GEL,VAG
+"DATA",176.112,27557,1)
+259004
+"DATA",176.112,27558,0)
+4013565^BUSULFAN 6MG/ML INJ,AMP,10ML
+"DATA",176.112,27558,1)
+253113
+"DATA",176.112,27559,0)
+4013180^MANGAFODIPIR TRISODIUM 37.9MG/ML INJ,SOLN
+"DATA",176.112,27559,1)
+253091
+"DATA",176.112,27560,0)
+4017283^BENZOCAINE 10MG/MENTHOL 2.5MG (SF) LOZENGE
+"DATA",176.112,27560,1)
+253065
+"DATA",176.112,27561,0)
+4007204^DM 5MG/GG 50MG/P-PROPANOL 6.25MG/ML DROPS,ORAL
+"DATA",176.112,27561,1)
+253048
+"DATA",176.112,27562,0)
+4017282^BENZOCAINE 10MG/MENTHOL 4.5MG (SF) LOZENGE
+"DATA",176.112,27562,1)
+253029
+"DATA",176.112,27563,0)
+4025125^GLYCERIN 0.2%/HYPROMELLOSE 0.2%/POLYETHYLENE GLYCOL 1%/ SOLN,OPH
+"DATA",176.112,27563,1)
+253021
+"DATA",176.112,27564,0)
+4009211^MAGNESIUM HYDROXIDE 405MG/5ML LIQUID
+"DATA",176.112,27564,1)
+253017
+"DATA",176.112,27565,0)
+4013852^ETANERCEPT 25MG/VIL INJ W/SYRINGE
+"DATA",176.112,27565,1)
+253014
+"DATA",176.112,27566,0)
+4013376^ETANERCEPT 25MG/VIL INJ,KIT
+"DATA",176.112,27566,1)
+253014
+"DATA",176.112,27567,0)
+4017052^SODIUM NITRITE 30MG/ML INJ
+"DATA",176.112,27567,1)
+253010
+"DATA",176.112,27568,0)
+4026421^RABIES VACCINE 2.5UNT/VIL INJ,KIT
+"DATA",176.112,27568,1)
+252989
+"DATA",176.112,27569,0)
+4006567^BECLOMETHASONE DIPROPIONATE 84MCG/ACTUATION,AQ,INHL,NASAL,19GM
+"DATA",176.112,27569,1)
+252972
+"DATA",176.112,27570,0)
+4015711^GLYBURIDE 4.5MG TAB
+"DATA",176.112,27570,1)
+252960
+"DATA",176.112,27571,0)
+4015413^ALLOPURINOL NA 500MG/VIL INJ
+"DATA",176.112,27571,1)
+252931
+"DATA",176.112,27572,0)
+4013781^AMPRENAVIR 75MG/5ML SOLN,ORAL
+"DATA",176.112,27572,1)
+252619
+"DATA",176.112,27573,0)
+4013780^AMPRENAVIR 150MG CAP
+"DATA",176.112,27573,1)
+252618
+"DATA",176.112,27574,0)
+4013779^AMPRENAVIR 50MG CAP
+"DATA",176.112,27574,1)
+252617
+"DATA",176.112,27575,0)
+4004342^TETRACAINE HCL 0.3%/DEXTROSE 6% INJ
+"DATA",176.112,27575,1)
+252592
+"DATA",176.112,27576,0)
+4004341^TETRACAINE HCL 0.2%/DEXTROSE 6% INJ
+"DATA",176.112,27576,1)
+252591
+"DATA",176.112,27577,0)
+4014187^LIDOCAINE 5% 5IN X 6IN PATCH
+"DATA",176.112,27577,1)
+252584
+"DATA",176.112,27578,0)
+4026751^BUDESONIDE 1MG/2ML SUSP,INH,2ML
+"DATA",176.112,27578,1)
+252559
+"DATA",176.112,27579,0)
+4009052^FLUCONAZOLE 2MG/ML INJ
+"DATA",176.112,27579,1)
+252432
+"DATA",176.112,27580,0)
+4024987^TRETINOIN 0.02% CREAM,TOP
+"DATA",176.112,27580,1)
+252265
+"DATA",176.112,27581,0)
+4016233^DOCUSATE NA 50MG/SENNOSIDES 8.6MG TAB
+"DATA",176.112,27581,1)
+252166
+"DATA",176.112,27582,0)
+4007798^VARICELLA ZOSTER IMMUNE GLOBULIN (HUMAN) 125UNT/VIL INJ
+"DATA",176.112,27582,1)
+252016
+"DATA",176.112,27583,0)
+4017059^PANTOPRAZOLE NA 20MG TAB,EC
+"DATA",176.112,27583,1)
+251872
+"DATA",176.112,27584,0)
+4013751^MAFENIDE ACETATE 50GM/PKT PWDR,TOP
+"DATA",176.112,27584,1)
+251575
+"DATA",176.112,27585,0)
+4016600^GRANISETRON HCL 1MG/5ML SOLN,ORAL
+"DATA",176.112,27585,1)
+251426
+"DATA",176.112,27586,0)
+4005846^SALICYLIC ACID 40% OINT,TOP
+"DATA",176.112,27586,1)
+251407
+"DATA",176.112,27587,0)
+4005836^SALICYLIC ACID 25% OINT,TOP
+"DATA",176.112,27587,1)
+251406
+"DATA",176.112,27588,0)
+4000663^CODEINE PO4 5MG/ML SYRUP
+"DATA",176.112,27588,1)
+251369
+"DATA",176.112,27589,0)
+4005718^ETHOSUXIMIDE 250MG/5ML SYRUP
+"DATA",176.112,27589,1)
+251322
+"DATA",176.112,27590,0)
+4015417^SENNOSIDE A&B 25MG TAB
+"DATA",176.112,27590,1)
+251292
+"DATA",176.112,27591,0)
+4016904^ALPRAZOLAM 0.5MG TAB,SA
+"DATA",176.112,27591,1)
+251142
+"DATA",176.112,27592,0)
+4016902^ALPRAZOLAM 2MG TAB,SA
+"DATA",176.112,27592,1)
+251141
+"DATA",176.112,27593,0)
+4016905^ALPRAZOLAM 1MG TAB,SA
+"DATA",176.112,27593,1)
+251140
+"DATA",176.112,27594,0)
+4002601^HYDROXYZINE HCL 10MG/5ML SYRUP
+"DATA",176.112,27594,1)
+251131
+"DATA",176.112,27595,0)
+4005107^COSYNTROPIN 0.25MG/MANNITOL 10MG/VIL INJ
+"DATA",176.112,27595,1)
+251039
+"DATA",176.112,27596,0)
+4008435^DEXTROMETHORPHAN HBR 7.5MG/5ML SYRUP
+"DATA",176.112,27596,1)
+250826
+"DATA",176.112,27597,0)
+4016347^CETIRIZINE HCL 5MG/5ML SYRUP
+"DATA",176.112,27597,1)
+250637
+"DATA",176.112,27598,0)
+4012846^CETIRIZINE HCL 5MG/5ML (SF) SYRUP
+"DATA",176.112,27598,1)
+250637
+"DATA",176.112,27599,0)
+4007025^CEPHALEXIN 100MG/ML DROPS,ORAL
+"DATA",176.112,27599,1)
+250582
+"DATA",176.112,27600,0)
+4017113^SERTACONAZOLE NITRATE 2% CREAM,TOP
+"DATA",176.112,27600,1)
+250511
+"DATA",176.112,27601,0)
+4016820^MEMANTINE HCL 10MG TAB
+"DATA",176.112,27601,1)
+250507
+"DATA",176.112,27602,0)
+4016943^MEMANTINE HCL 10MG TAB,UD
+"DATA",176.112,27602,1)
+250507
+"DATA",176.112,27603,0)
+4007155^ACETAMINOPHEN 600MG SUPP,RTL
+"DATA",176.112,27603,1)
+250494
+"DATA",176.112,27604,0)
+4025560^TRAMADOL HCL 100MG TAB,SA
+"DATA",176.112,27604,1)
+250375
+"DATA",176.112,27605,0)
+4025558^TRAMADOL HCL 200MG TAB,SA
+"DATA",176.112,27605,1)
+250373
+"DATA",176.112,27606,0)
+4016726^CICLOPIROX 1% SHAMPOO,TOP
+"DATA",176.112,27606,1)
+250344
+"DATA",176.112,27607,0)
+4006675^DILTIAZEM HCL 5MG/ML INJ
+"DATA",176.112,27607,1)
+250338
+"DATA",176.112,27608,0)
+4006488^LEUCOVORIN CALCIUM 3MG/ML INJ
+"DATA",176.112,27608,1)
+250288
+"DATA",176.112,27609,0)
+4007433^MEPIVACAINE HCL 2%/LEVONORDEFRIN 1:20000 INJ
+"DATA",176.112,27609,1)
+249806
+"DATA",176.112,27610,0)
+4013111^AMLEXANOX 5% PASTE,ORAL
+"DATA",176.112,27610,1)
+249469
+"DATA",176.112,27611,0)
+4009971^SOMATROPIN 6MG/VIL INJ
+"DATA",176.112,27611,1)
+249453
+"DATA",176.112,27612,0)
+4025562^SOMATROPIN 13.8MG/VIL INJ,SOLN,CARTRIDGE
+"DATA",176.112,27612,1)
+249453
+"DATA",176.112,27613,0)
+4027193^APAP 500MG/CAFN 60MG/PYRILAMINE 15MG TAB
+"DATA",176.112,27613,1)
+249366
+"DATA",176.112,27614,0)
+4003465^CYTARABINE 1GM/VIL INJ
+"DATA",176.112,27614,1)
+249364
+"DATA",176.112,27615,0)
+4003466^CYTARABINE 2GM/VIL INJ
+"DATA",176.112,27615,1)
+249364
+"DATA",176.112,27616,0)
+4002430^CODEINE 12MG/ACETAMINOPHEN 120MG/5ML ELIXIR
+"DATA",176.112,27616,1)
+249313
+"DATA",176.112,27617,0)
+4017060^AZELASTINE HCL 137MCG/SPRAY INHL,NASAL,30ML
+"DATA",176.112,27617,1)
+249221
+"DATA",176.112,27618,0)
+4024590^COAL TAR 10% OINT,TOP
+"DATA",176.112,27618,1)
+249165
+"DATA",176.112,27619,0)
+4005951^LIDOCAINE HCL 8MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,27619,1)
+249148
+"DATA",176.112,27620,0)
+4007052^CLOBETASOL PROPIONATE 0.05% LOTION
+"DATA",176.112,27620,1)
+248793
+"DATA",176.112,27621,0)
+4024984^AZITHROMYCIN 500MG TAB
+"DATA",176.112,27621,1)
+248656
+"DATA",176.112,27622,0)
+4015528^FLUOXETINE HCL 20MG TAB
+"DATA",176.112,27622,1)
+248642
+"DATA",176.112,27623,0)
+4024752^HYDROMORPHONE HCL 24MG CAP,SA
+"DATA",176.112,27623,1)
+248585
+"DATA",176.112,27624,0)
+4024754^HYDROMORPHONE HCL 12MG CAP,SA
+"DATA",176.112,27624,1)
+248584
+"DATA",176.112,27625,0)
+4007699^BROMPHENIRAMINE 2MG/PHENYLPROPANOLAMINE 12.5MG/5ML (AF) ELIXIR
+"DATA",176.112,27625,1)
+248527
+"DATA",176.112,27626,0)
+4007695^BROMPHENIRAMINE 2MG/PHENYLPROPANOLAMINE 12.5MG/5ML ELIXIR
+"DATA",176.112,27626,1)
+248527
+"DATA",176.112,27627,0)
+4009713^DIPHENHYDRAMINE 12.5MG/PSEUDOEPHEDRINE 30MG/5ML ELIXIR
+"DATA",176.112,27627,1)
+248526
+"DATA",176.112,27628,0)
+4024683^MESALAMINE 1000MG SUPP,RTL
+"DATA",176.112,27628,1)
+248420
+"DATA",176.112,27629,0)
+4024656^FLUTICASONE PROPIONATE 220MCG/SPRAY AEROSOL,INHL,ORAL,12GM
+"DATA",176.112,27629,1)
+248338
+"DATA",176.112,27630,0)
+4013357^FLUTICASONE PROPIONATE 220MCG/SPRAY AEROSOL,INHL,ORAL,7.9GM
+"DATA",176.112,27630,1)
+248338
+"DATA",176.112,27631,0)
+4010145^FLUTICASONE PROPIONATE 220MCG/SPRAY AEROSOL,INHL,ORAL,13GM
+"DATA",176.112,27631,1)
+248338
+"DATA",176.112,27632,0)
+4013356^FLUTICASONE PROPIONATE 110MCG/SPRAY AEROSOL,INHL,ORAL,7.9GM
+"DATA",176.112,27632,1)
+248337
+"DATA",176.112,27633,0)
+4024657^FLUTICASONE PROPIONATE 110MCG/SPRAY AEROSOL,INHL,ORAL,12GM
+"DATA",176.112,27633,1)
+248337
+"DATA",176.112,27634,0)
+4010144^FLUTICASONE PROPIONATE 110MCG/SPRAY AEROSOL,INHL,ORAL,13GM
+"DATA",176.112,27634,1)
+248337
+"DATA",176.112,27635,0)
+4010142^FLUTICASONE PROPIONATE 44MCG/SPRAY AEROSOL,INHL,ORAL,7.9GM
+"DATA",176.112,27635,1)
+248336
+"DATA",176.112,27636,0)
+4010143^FLUTICASONE PROPIONATE 44MCG/SPRAY AEROSOL,INHL,ORAL,13GM
+"DATA",176.112,27636,1)
+248336
+"DATA",176.112,27637,0)
+4024655^FLUTICASONE PROPIONATE 44MCG/SPRAY AEROSOL,INHL,ORAL,10.6GM
+"DATA",176.112,27637,1)
+248336
+"DATA",176.112,27638,0)
+4004808^DYPHYLLINE 100MG/15ML ELIXIR
+"DATA",176.112,27638,1)
+248333
+"DATA",176.112,27639,0)
+4009969^SOMATROPIN 4MG/VIL INJ
+"DATA",176.112,27639,1)
+248288
+"DATA",176.112,27640,0)
+4003798^AMIKACIN SO4 62.5MG/ML INJ
+"DATA",176.112,27640,1)
+248284
+"DATA",176.112,27641,0)
+4015725^MORPHINE SO4 60MG CAP,SA
+"DATA",176.112,27641,1)
+248265
+"DATA",176.112,27642,0)
+4015726^MORPHINE SO4 30MG CAP,SA
+"DATA",176.112,27642,1)
+248264
+"DATA",176.112,27643,0)
+4027662^ACETAMINOPHEN 500MG/DIPHENHYDRAMINE HCL 50MG TAB
+"DATA",176.112,27643,1)
+248250
+"DATA",176.112,27644,0)
+4000963^SODIUM IODIDE 100MG/ML INJ
+"DATA",176.112,27644,1)
+248207
+"DATA",176.112,27645,0)
+4005415^GUAIFENESIN 100MG/PSEUDOEPHEDRINE 30MG/5ML ELIXIR
+"DATA",176.112,27645,1)
+248177
+"DATA",176.112,27646,0)
+4005419^GUAIFENESIN 100MG/PSEUDOEPHEDRINE 30MG/5ML (ALC-F) SYRUP
+"DATA",176.112,27646,1)
+248177
+"DATA",176.112,27647,0)
+4005409^GUAIFENESIN 100MG/PSEUDOEPHEDRINE 30MG/5ML SYRUP
+"DATA",176.112,27647,1)
+248177
+"DATA",176.112,27648,0)
+4005813^VIDARABINE 200MG/ML INJ
+"DATA",176.112,27648,1)
+248113
+"DATA",176.112,27649,0)
+4024775^RIBAVIRIN 200MG/5ML SOLN,ORAL
+"DATA",176.112,27649,1)
+248112
+"DATA",176.112,27650,0)
+4016331^RIBAVIRIN 200MG TAB
+"DATA",176.112,27650,1)
+248109
+"DATA",176.112,27651,0)
+4006359^CALCITONIN 0.5MG/ML INJ
+"DATA",176.112,27651,1)
+248091
+"DATA",176.112,27652,0)
+4006360^CALCITONIN,SALMON 100UNT/ML INJ
+"DATA",176.112,27652,1)
+248088
+"DATA",176.112,27653,0)
+4005289^MICONAZOLE NITRATE 2%/BENZYL ALCOHOL TINCTURE,TOP
+"DATA",176.112,27653,1)
+248083
+"DATA",176.112,27654,0)
+4024532^NIACINAMIDE 4% GEL,TOP
+"DATA",176.112,27654,1)
+248052
+"DATA",176.112,27655,0)
+4007170^ACETAMINOPHEN 325MG/5ML ELIXIR
+"DATA",176.112,27655,1)
+247974
+"DATA",176.112,27656,0)
+4008405^CASCARA SAGRADA 1GM/ML FLUID EXTRACT,ORAL
+"DATA",176.112,27656,1)
+247922
+"DATA",176.112,27657,0)
+4025510^TRICLOSAN 0.5% SOLN,TOP
+"DATA",176.112,27657,1)
+247783
+"DATA",176.112,27658,0)
+4025331^UREA 50% OINT,TOP
+"DATA",176.112,27658,1)
+247760
+"DATA",176.112,27659,0)
+4025008^NIACIN 500MG CAP
+"DATA",176.112,27659,1)
+247747
+"DATA",176.112,27660,0)
+4009716^DEXTROMETHORPHAN 15MG/PSEUDOEPHEDRINE 30MG/5ML SYRUP
+"DATA",176.112,27660,1)
+247724
+"DATA",176.112,27661,0)
+4027579^CALAMINE 8%/PRAMOXINE 1% LOTION,TOP
+"DATA",176.112,27661,1)
+247639
+"DATA",176.112,27662,0)
+4005952^LIDOCAINE HCL 5%/DEXTROSE 7.5% INJ
+"DATA",176.112,27662,1)
+247359
+"DATA",176.112,27663,0)
+4007601^COAL TAR 10%/SALICYLIC ACID 5% SHAMPOO
+"DATA",176.112,27663,1)
+247141
+"DATA",176.112,27664,0)
+4005757^ASPIRIN 850MG PWDR
+"DATA",176.112,27664,1)
+247138
+"DATA",176.112,27665,0)
+4005756^ASPIRIN 650MG PWDR
+"DATA",176.112,27665,1)
+247137
+"DATA",176.112,27666,0)
+4000976^MORPHINE SO4 10MG TAB,SOLUBLE
+"DATA",176.112,27666,1)
+247062
+"DATA",176.112,27667,0)
+4010285^FLOSEQUINAN 75MG TAB
+"DATA",176.112,27667,1)
+246830
+"DATA",176.112,27668,0)
+4017197^HYPROMELLOSE 0.5%/NAPHAZOLINE 0.03% SOLN,OPH
+"DATA",176.112,27668,1)
+246822
+"DATA",176.112,27669,0)
+4006607^NETILMICIN SO4 10MG/ML INJ
+"DATA",176.112,27669,1)
+246504
+"DATA",176.112,27670,0)
+4012158^CISAPRIDE 5MG/5ML SUSP,ORAL
+"DATA",176.112,27670,1)
+246217
+"DATA",176.112,27671,0)
+4008532^PSYLLIUM HYDROPHILIC MUCILLOID 3.4GM/5GM PWDR,ORAL
+"DATA",176.112,27671,1)
+246074
+"DATA",176.112,27672,0)
+4008534^PSYLLIUM HYDROPHILIC MUCILLOID 3.4GM/5GM (SF) PWDR,ORAL
+"DATA",176.112,27672,1)
+246074
+"DATA",176.112,27673,0)
+4005467^DEXTROMETHORPHAN 30MG/GUAIFENESIN 200MG/5ML SOLN
+"DATA",176.112,27673,1)
+246073
+"DATA",176.112,27674,0)
+4012294^APROTININ 1MILLION UNITS(140MG)/100ML INJ,VIL
+"DATA",176.112,27674,1)
+246020
+"DATA",176.112,27675,0)
+4012295^APROTININ 2MILLION UNITS(280MG)/200ML INJ,VIL
+"DATA",176.112,27675,1)
+246020
+"DATA",176.112,27676,0)
+4003093^PROCHLORPERAZINE EDISYLATE 5MG/5ML SYRUP
+"DATA",176.112,27676,1)
+245963
+"DATA",176.112,27677,0)
+4002946^HYDROCORTISONE BUTYRATE 0.1% LOTION
+"DATA",176.112,27677,1)
+245818
+"DATA",176.112,27678,0)
+4001631^TRIAMCINOLONE ACETONIDE 55MCG/ACTUATION INHL,NASAL
+"DATA",176.112,27678,1)
+245785
+"DATA",176.112,27679,0)
+4009706^COAL TAR 5%/SALICYLIC ACID 2%/SULFUR 2% SHAMPOO
+"DATA",176.112,27679,1)
+245734
+"DATA",176.112,27680,0)
+4007095^PIPERACETAZINE 25MG TAB
+"DATA",176.112,27680,1)
+245722
+"DATA",176.112,27681,0)
+4007096^PIPERACETAZINE 10MG TAB
+"DATA",176.112,27681,1)
+245721
+"DATA",176.112,27682,0)
+4009973^TEMAFLOXACIN HCL 600MG TAB
+"DATA",176.112,27682,1)
+245692
+"DATA",176.112,27683,0)
+4009974^TEMAFLOXACIN HCL 400MG TAB
+"DATA",176.112,27683,1)
+245691
+"DATA",176.112,27684,0)
+4007832^BENZOCAINE 8% LOTION
+"DATA",176.112,27684,1)
+245650
+"DATA",176.112,27685,0)
+4005575^COAL TAR 5% OINT,TOP
+"DATA",176.112,27685,1)
+245627
+"DATA",176.112,27686,0)
+4005578^COAL TAR 2.5% SOLN,TOP
+"DATA",176.112,27686,1)
+245621
+"DATA",176.112,27687,0)
+4010231^RESORCINOL 2%/SULFUR 5% LOTION
+"DATA",176.112,27687,1)
+245613
+"DATA",176.112,27688,0)
+4009722^SULFUR 3%/ALCOHOL LOTION
+"DATA",176.112,27688,1)
+245607
+"DATA",176.112,27689,0)
+4001029^ASCORBIC ACID 200MG/ML INJ
+"DATA",176.112,27689,1)
+245477
+"DATA",176.112,27690,0)
+4003251^EPINEPHRINE 0.15MG/0.3ML INJ
+"DATA",176.112,27690,1)
+245317
+"DATA",176.112,27691,0)
+4003256^EPINEPHRINE 0.5MG/ML INJ
+"DATA",176.112,27691,1)
+245317
+"DATA",176.112,27692,0)
+4006581^ALBUTEROL 0.5% SOLN,INHL
+"DATA",176.112,27692,1)
+245314
+"DATA",176.112,27693,0)
+4016330^ALBUTEROL SO4 0.5% SOLN,INHL,0.5ML
+"DATA",176.112,27693,1)
+245314
+"DATA",176.112,27694,0)
+4015859^ALBUTEROL SO4 0.5% SOLN,INHL,5ML
+"DATA",176.112,27694,1)
+245314
+"DATA",176.112,27695,0)
+4006590^ALBUTEROL SO4 0.5% SOLN,INHL
+"DATA",176.112,27695,1)
+245314
+"DATA",176.112,27696,0)
+4001465^INSULIN,NPH 50UNT/REGULAR 50UNT/ML HUMAN INJ
+"DATA",176.112,27696,1)
+245265
+"DATA",176.112,27697,0)
+4003464^CYTARABINE 500MG/VIL INJ
+"DATA",176.112,27697,1)
+245255
+"DATA",176.112,27698,0)
+4004153^GRISEOFULVIN,ULTRAMICROSIZE 330MG TAB
+"DATA",176.112,27698,1)
+245249
+"DATA",176.112,27699,0)
+4004159^GRISEOFULVIN,ULTRAMICROSIZE 165MG TAB
+"DATA",176.112,27699,1)
+245248
+"DATA",176.112,27700,0)
+4006606^NETILMICIN SO4 25MG/ML INJ
+"DATA",176.112,27700,1)
+245244
+"DATA",176.112,27701,0)
+4002564^DIPHENHYDRAMINE HCL 2% SOLN,TOP
+"DATA",176.112,27701,1)
+245230
+"DATA",176.112,27702,0)
+4005941^DEXTROSE 10%/NACL 0.2% INJ
+"DATA",176.112,27702,1)
+245220
+"DATA",176.112,27703,0)
+4010547^CHARCOAL 400MG/SIMETHICONE 80MG TAB
+"DATA",176.112,27703,1)
+245213
+"DATA",176.112,27704,0)
+4012335^CALAMINE 3%/CAMPHOR 0.3%/PRAMOXINE 1% LOTION
+"DATA",176.112,27704,1)
+245194
+"DATA",176.112,27705,0)
+4012336^CALAMINE 3%/CAMPHOR 0.3%/PRAMOXINE 1% CREAM
+"DATA",176.112,27705,1)
+245193
+"DATA",176.112,27706,0)
+4006325^FENTANYL 100MCG/HR PATCH
+"DATA",176.112,27706,1)
+245136
+"DATA",176.112,27707,0)
+4006323^FENTANYL 50MCG/HR PATCH
+"DATA",176.112,27707,1)
+245135
+"DATA",176.112,27708,0)
+4006322^FENTANYL 25MCG/HR PATCH
+"DATA",176.112,27708,1)
+245134
+"DATA",176.112,27709,0)
+4010478^CALCIUM ACETATE 1GM (CA 250MG) TAB
+"DATA",176.112,27709,1)
+245133
+"DATA",176.112,27710,0)
+4007605^COAL TAR 2%/SALICYLIC ACID 2.5% LOTION
+"DATA",176.112,27710,1)
+245038
+"DATA",176.112,27711,0)
+4005576^COAL TAR 1% OINT,TOP
+"DATA",176.112,27711,1)
+245030
+"DATA",176.112,27712,0)
+4005834^SALICYLIC ACID 25% CREAM,TOP
+"DATA",176.112,27712,1)
+245020
+"DATA",176.112,27713,0)
+4008781^COAL TAR 10%/LANOLIN/MINERAL OIL,TOP
+"DATA",176.112,27713,1)
+245017
+"DATA",176.112,27714,0)
+4009952^MAGNESIUM GLUCONATE 54MG/5ML LIQUID
+"DATA",176.112,27714,1)
+244981
+"DATA",176.112,27715,0)
+4009159^POLYMYXIN B SO4 10000UNT/ML/TRIMETHOPRIM 0.1% SOLN,OPH
+"DATA",176.112,27715,1)
+244967
+"DATA",176.112,27716,0)
+4001684^IODIPAMIDE MEGLUMINE 10.3% INJ
+"DATA",176.112,27716,1)
+244714
+"DATA",176.112,27717,0)
+4002036^IODAMIDE MEGLUMINE 24% INJ
+"DATA",176.112,27717,1)
+244713
+"DATA",176.112,27718,0)
+4006764^INULIN 100MG/ML INJ
+"DATA",176.112,27718,1)
+244698
+"DATA",176.112,27719,0)
+4009852^METHYLBENZETHONIUM CL 0.1% CREAM,TOP
+"DATA",176.112,27719,1)
+244661
+"DATA",176.112,27720,0)
+4008667^CHLORHEXIDINE GLUCONATE 0.12% RINSE,ORAL
+"DATA",176.112,27720,1)
+244658
+"DATA",176.112,27721,0)
+4026402^CHLORHEXIDINE GLUCONATE 0.12% (AF) RINSE,ORAL
+"DATA",176.112,27721,1)
+244658
+"DATA",176.112,27722,0)
+4007646^FORMALDEHYDE 40% OINT,TOP
+"DATA",176.112,27722,1)
+244648
+"DATA",176.112,27723,0)
+4015854^FORMALDEHYDE 37% SOLN
+"DATA",176.112,27723,1)
+244647
+"DATA",176.112,27724,0)
+4009503^COD LIVER OIL/TALC/ZINC OXIDE 40% OINT,TOP
+"DATA",176.112,27724,1)
+244638
+"DATA",176.112,27725,0)
+4013306^ZINC OXIDE 40% OINT,TOP
+"DATA",176.112,27725,1)
+244638
+"DATA",176.112,27726,0)
+4008474^DEXTRANOMER BEADS,TOP,60GM,STERILE
+"DATA",176.112,27726,1)
+244622
+"DATA",176.112,27727,0)
+4006785^ALUMINUM CHLORIDE 25% SOLN
+"DATA",176.112,27727,1)
+244613
+"DATA",176.112,27728,0)
+4009496^PIPERONYL BUTOXIDE 4%/PYRETHRINS 0.3% GEL,TOP
+"DATA",176.112,27728,1)
+244602
+"DATA",176.112,27729,0)
+4026172^HYDROQUINONE 3% SOLN,TOP
+"DATA",176.112,27729,1)
+244593
+"DATA",176.112,27730,0)
+4004405^LIDOCAINE HCL 5% OINT,TOP
+"DATA",176.112,27730,1)
+244564
+"DATA",176.112,27731,0)
+4004386^LIDOCAINE 5% OINT,TOP
+"DATA",176.112,27731,1)
+244564
+"DATA",176.112,27732,0)
+4007821^BENZOCAINE 20% OINT,TOP
+"DATA",176.112,27732,1)
+244557
+"DATA",176.112,27733,0)
+4008705^SALICYLIC ACID 2.25%/SULFUR 8% LOTION
+"DATA",176.112,27733,1)
+244542
+"DATA",176.112,27734,0)
+4008706^SALICYLIC ACID 2.35%/SULFUR 4% LOTION
+"DATA",176.112,27734,1)
+244541
+"DATA",176.112,27735,0)
+4008715^SALICYLIC ACID 2%/SULFUR 3% LOTION
+"DATA",176.112,27735,1)
+244539
+"DATA",176.112,27736,0)
+4008707^SALICYLIC ACID 2%/SULFUR 3% CREAM,TOP
+"DATA",176.112,27736,1)
+244537
+"DATA",176.112,27737,0)
+4008744^PODOPHYLLIN 10%/SAL AC 30%/COLLODION LIQUID,TOP
+"DATA",176.112,27737,1)
+244535
+"DATA",176.112,27738,0)
+4005854^SALICYLIC ACID 13.6%/FLEXIBLE COLLODION LIQUID,TOP
+"DATA",176.112,27738,1)
+244523
+"DATA",176.112,27739,0)
+4007486^CANTHARIDIN 0.7%/COLLODION LIQUID,TOP
+"DATA",176.112,27739,1)
+244521
+"DATA",176.112,27740,0)
+4006059^UREA 20% LOTION
+"DATA",176.112,27740,1)
+244509
+"DATA",176.112,27741,0)
+4007049^DIBUCAINE 0.5%/HYDROCORTISONE 0.5% CREAM,TOP
+"DATA",176.112,27741,1)
+244496
+"DATA",176.112,27742,0)
+4003436^METHYLPREDNISOLONE ACETATE 1% OINT,TOP
+"DATA",176.112,27742,1)
+244495
+"DATA",176.112,27743,0)
+4003435^METHYLPREDNISOLONE ACETATE 0.25% OINT,TOP
+"DATA",176.112,27743,1)
+244494
+"DATA",176.112,27744,0)
+4002941^HYDROCORTISONE ACETATE 0.5% LOTION
+"DATA",176.112,27744,1)
+244492
+"DATA",176.112,27745,0)
+4002911^HYDROCORTISONE 0.5% LOTION
+"DATA",176.112,27745,1)
+244492
+"DATA",176.112,27746,0)
+4005790^BETAMETHASONE BENZOATE 0.025% LOTION
+"DATA",176.112,27746,1)
+244487
+"DATA",176.112,27747,0)
+4005789^BETAMETHASONE BENZOATE 0.025% CREAM,TOP
+"DATA",176.112,27747,1)
+244486
+"DATA",176.112,27748,0)
+4007600^COAL TAR 5%/SALICYLIC ACID 3% CREAM,TOP
+"DATA",176.112,27748,1)
+244475
+"DATA",176.112,27749,0)
+4007603^COAL TAR 10%/SALICYLIC ACID 4% SHAMPOO
+"DATA",176.112,27749,1)
+244474
+"DATA",176.112,27750,0)
+4010486^ALLANTOIN 1.7%/COAL TAR 5% LOTION
+"DATA",176.112,27750,1)
+244473
+"DATA",176.112,27751,0)
+4005586^COAL TAR 5% CREAM,TOP
+"DATA",176.112,27751,1)
+244468
+"DATA",176.112,27752,0)
+4005573^COAL TAR 1.6% CREAM,TOP
+"DATA",176.112,27752,1)
+244467
+"DATA",176.112,27753,0)
+4008709^SALICYLIC ACID 2%/SULFUR 3% SHAMPOO
+"DATA",176.112,27753,1)
+244460
+"DATA",176.112,27754,0)
+4009702^ZINC PYRITHONE 2% SHAMPOO
+"DATA",176.112,27754,1)
+244458
+"DATA",176.112,27755,0)
+4009018^PYRITHIONE ZINC 2% SHAMPOO
+"DATA",176.112,27755,1)
+244458
+"DATA",176.112,27756,0)
+4005863^CHLOROXINE 2% LOTION
+"DATA",176.112,27756,1)
+244456
+"DATA",176.112,27757,0)
+4005562^ANTHRALIN 0.4% OINT,TOP
+"DATA",176.112,27757,1)
+244451
+"DATA",176.112,27758,0)
+4005560^ANTHRALIN 0.4% CREAM,TOP
+"DATA",176.112,27758,1)
+244450
+"DATA",176.112,27759,0)
+4005559^ANTHRALIN 0.2% CREAM,TOP
+"DATA",176.112,27759,1)
+244449
+"DATA",176.112,27760,0)
+4009733^DIPHENHYDRAMINE HCL 2%/ZINC OXIDE 2% LOTION
+"DATA",176.112,27760,1)
+244435
+"DATA",176.112,27761,0)
+4010571^DIPHENHYDRAMINE 1%/TRIPELENNAMINE 0.5% GEL,TOP
+"DATA",176.112,27761,1)
+244434
+"DATA",176.112,27762,0)
+4010572^DIPHENHYDRAMINE 1%/TRIPELENNAMINE 0.5% SPRAY,TOP
+"DATA",176.112,27762,1)
+244433
+"DATA",176.112,27763,0)
+4001701^AMPHOTERICIN B 3% OINT,TOP
+"DATA",176.112,27763,1)
+244413
+"DATA",176.112,27764,0)
+4007743^FLURANDRENOLIDE 0.05%/NEOMYCIN SO4 0.5% OINT,TOP
+"DATA",176.112,27764,1)
+244400
+"DATA",176.112,27765,0)
+4007744^FLURANDRENOLIDE 0.05%/NEOMYCIN SO4 0.5% CREAM,TOP
+"DATA",176.112,27765,1)
+244399
+"DATA",176.112,27766,0)
+4009978^SULFUR 5%/ZINC OXIDE 2%/ZINC SULFATE 1% SOAP
+"DATA",176.112,27766,1)
+244383
+"DATA",176.112,27767,0)
+4008776^BENZOYL PEROXIDE 5%/HYDROCORTISONE 0.5% LOTION
+"DATA",176.112,27767,1)
+244382
+"DATA",176.112,27768,0)
+4026391^BENZOYL PEROXIDE 40MG/ERYTHROMYCIN 24MG/PKT GEL,TOP
+"DATA",176.112,27768,1)
+244374
+"DATA",176.112,27769,0)
+4005601^BENZOYL PEROXIDE 5%/ERYTHROMYCIN 3% GEL,TOP
+"DATA",176.112,27769,1)
+244374
+"DATA",176.112,27770,0)
+4008720^SULFUR 2% GEL,TOP
+"DATA",176.112,27770,1)
+244366
+"DATA",176.112,27771,0)
+4004038^HYDROCORTISONE ACETATE 1%/PRAMOXINE HCL 1% AEROSOL,RTL
+"DATA",176.112,27771,1)
+244351
+"DATA",176.112,27772,0)
+4008755^BUTACAINE 4% OINT,DENT
+"DATA",176.112,27772,1)
+244325
+"DATA",176.112,27773,0)
+4007492^ANTIPYRINE 5.4%/BENZOCAINE 1.4%/GLYCERIN SOLN,OTIC
+"DATA",176.112,27773,1)
+244309
+"DATA",176.112,27774,0)
+4006981^ANTIPYRINE 5.4%/BENZOCAINE 1.4% SOLN,OTIC
+"DATA",176.112,27774,1)
+244309
+"DATA",176.112,27775,0)
+4003052^DEXAMETHASONE NA PHOSPHATE 0.1%/NEOMYCIN SO4 0.5% SOLN,OPH
+"DATA",176.112,27775,1)
+244267
+"DATA",176.112,27776,0)
+4003894^DEXTRAN-40,10%/NACL 0.9% INJ
+"DATA",176.112,27776,1)
+244250
+"DATA",176.112,27777,0)
+4003895^DEXTRAN-40,10%/DEXTROSE 5% INJ
+"DATA",176.112,27777,1)
+244250
+"DATA",176.112,27778,0)
+4006487^LEUCOVORIN CALCIUM 5MG/ML INJ
+"DATA",176.112,27778,1)
+244197
+"DATA",176.112,27779,0)
+4007211^INVERT SUGAR 10% INJ
+"DATA",176.112,27779,1)
+244128
+"DATA",176.112,27780,0)
+4005960^FRUCTOSE 10% INJ
+"DATA",176.112,27780,1)
+244127
+"DATA",176.112,27781,0)
+4004215^DEXTROSE 38% INJ
+"DATA",176.112,27781,1)
+244124
+"DATA",176.112,27782,0)
+4004213^DEXTROSE 7.7% INJ
+"DATA",176.112,27782,1)
+244123
+"DATA",176.112,27783,0)
+4005934^DEXTROSE 10%/NACL 0.9% INJ
+"DATA",176.112,27783,1)
+244099
+"DATA",176.112,27784,0)
+4005940^DEXTROSE 10%/NACL 0.45% INJ
+"DATA",176.112,27784,1)
+244098
+"DATA",176.112,27785,0)
+4005929^DEXTROSE 2.5%/NACL 0.45% INJ
+"DATA",176.112,27785,1)
+244095
+"DATA",176.112,27786,0)
+4007372^CUPRIC SO4 2MG/ML INJ,CONC
+"DATA",176.112,27786,1)
+244071
+"DATA",176.112,27787,0)
+4007373^CUPRIC SO4 1MG/ML INJ
+"DATA",176.112,27787,1)
+244070
+"DATA",176.112,27788,0)
+4006988^ZINC SO4 4MG/ML INJ
+"DATA",176.112,27788,1)
+244062
+"DATA",176.112,27789,0)
+4001098^SODIUM CHLORIDE 2.25GM TAB
+"DATA",176.112,27789,1)
+244051
+"DATA",176.112,27790,0)
+4000880^POTASSIUM CHLORIDE 3MEQ/ML INJ
+"DATA",176.112,27790,1)
+244040
+"DATA",176.112,27791,0)
+4000862^POTASSIUM CHLORIDE 2.4MEQ/ML INJ
+"DATA",176.112,27791,1)
+244039
+"DATA",176.112,27792,0)
+4007345^CALCIUM GLYCEROPHOSPHATE 10MG/CALCIUM LEVULINATE 15MG/ML INJ
+"DATA",176.112,27792,1)
+243976
+"DATA",176.112,27793,0)
+4002178^MENADIOL NA DIPHOSPHATE 37.5MG/ML INJ
+"DATA",176.112,27793,1)
+243810
+"DATA",176.112,27794,0)
+4002177^MENADIOL NA DIPHOSPHATE 10MG/ML INJ
+"DATA",176.112,27794,1)
+243809
+"DATA",176.112,27795,0)
+4002176^MENADIOL NA DIPHOSPHATE 5MG/ML INJ
+"DATA",176.112,27795,1)
+243808
+"DATA",176.112,27796,0)
+4006373^NIACIN 100MG/ML INJ
+"DATA",176.112,27796,1)
+243783
+"DATA",176.112,27797,0)
+4004955^BIPERIDEN LACTATE 5MG/ML INJ
+"DATA",176.112,27797,1)
+243775
+"DATA",176.112,27798,0)
+4008151^FENTANYL 0.05MG/DROPERIDOL 2.5MG/ML INJ
+"DATA",176.112,27798,1)
+243774
+"DATA",176.112,27799,0)
+4004387^LIDOCAINE HCL 40MG/ML INJ
+"DATA",176.112,27799,1)
+243769
+"DATA",176.112,27800,0)
+4004408^LIDOCAINE HCL 40MG/ML (PF) INJ
+"DATA",176.112,27800,1)
+243769
+"DATA",176.112,27801,0)
+4004380^LIDOCAINE HCL 4% INJ
+"DATA",176.112,27801,1)
+243769
+"DATA",176.112,27802,0)
+4004184^MEPERIDINE HCL 75MG/ATROPINE SO4 0.4MG/ML INJ
+"DATA",176.112,27802,1)
+243759
+"DATA",176.112,27803,0)
+4004183^MEPERIDINE HCL 50MG/ATROPINE SO4 0.4MG/ML INJ
+"DATA",176.112,27803,1)
+243758
+"DATA",176.112,27804,0)
+4025630^ACETAMINOPHEN 100MG/ML (SF) SUSP,ORAL
+"DATA",176.112,27804,1)
+243675
+"DATA",176.112,27805,0)
+4007515^SODIUM SALICYLATE 100MG/ML INJ
+"DATA",176.112,27805,1)
+243665
+"DATA",176.112,27806,0)
+4007926^PHENYLPROPANOLAMINE HCL 25MG TAB
+"DATA",176.112,27806,1)
+243638
+"DATA",176.112,27807,0)
+4002186^CHLORPROTHIXENE 12.5MG/ML INJ
+"DATA",176.112,27807,1)
+243621
+"DATA",176.112,27808,0)
+4002184^CHLORPROTHIXENE 100MG TAB
+"DATA",176.112,27808,1)
+243620
+"DATA",176.112,27809,0)
+4002182^CHLORPROTHIXENE 25MG TAB
+"DATA",176.112,27809,1)
+243619
+"DATA",176.112,27810,0)
+4002181^CHLORPROTHIXENE 10MG TAB
+"DATA",176.112,27810,1)
+243618
+"DATA",176.112,27811,0)
+4006615^ACETOPHENAZINE MALEATE 20MG TAB
+"DATA",176.112,27811,1)
+243615
+"DATA",176.112,27812,0)
+4002575^METHENAMINE MANDELATE 500MG/PKG GRNL,ORAL
+"DATA",176.112,27812,1)
+243561
+"DATA",176.112,27813,0)
+4002569^METHENAMINE MANDELATE 500MG/5ML SUSP,ORAL
+"DATA",176.112,27813,1)
+243561
+"DATA",176.112,27814,0)
+4005080^BENZQUINAMIDE HCL 50MG/VIL INJ
+"DATA",176.112,27814,1)
+243530
+"DATA",176.112,27815,0)
+4005526^SCOPOLAMINE HBR 0.3MG/ML INJ
+"DATA",176.112,27815,1)
+243508
+"DATA",176.112,27816,0)
+4008382^ALUMINUM HYDROXIDE 600MG/MAGNESIUM HYDROXIDE 300MG TAB,CHEW
+"DATA",176.112,27816,1)
+243461
+"DATA",176.112,27817,0)
+4008313^ALUMINUM HYDROXIDE 475MG CAP
+"DATA",176.112,27817,1)
+243447
+"DATA",176.112,27818,0)
+4010420^DOCUSATE NA 50MG/SENNA 187MG TAB
+"DATA",176.112,27818,1)
+243411
+"DATA",176.112,27819,0)
+4008054^DOCUSATE NA 50MG/ML SOLN
+"DATA",176.112,27819,1)
+243388
+"DATA",176.112,27820,0)
+4008064^DOCUSATE NA 20MG/5ML SYRUP,UNIT DOSE,25ML
+"DATA",176.112,27820,1)
+243386
+"DATA",176.112,27821,0)
+4008058^DOCUSATE NA 20MG/5ML SYRUP
+"DATA",176.112,27821,1)
+243386
+"DATA",176.112,27822,0)
+4008286^METHYLCELLULOSE 450MG/5ML LIQUID
+"DATA",176.112,27822,1)
+243377
+"DATA",176.112,27823,0)
+4007448^EPHEDRINE SO4 25MG/PHENOBARBITAL 15MG TAB
+"DATA",176.112,27823,1)
+243334
+"DATA",176.112,27824,0)
+4008384^EPHEDRINE 24MG/THEOPHYLLINE 130MG TAB
+"DATA",176.112,27824,1)
+243329
+"DATA",176.112,27825,0)
+4007302^GG 50MG/NA CIT 100MG/THEOPHYLLINE NA GLYCINATE 60MG/5ML LIQ
+"DATA",176.112,27825,1)
+243328
+"DATA",176.112,27826,0)
+4005618^GUAIFENESIN 100MG/THEOPHYLLINE NA GLYCINATE 300MG/15ML SYRUP
+"DATA",176.112,27826,1)
+243327
+"DATA",176.112,27827,0)
+4005611^GUAIFENESIN 100MG/THEOPHYLLINE NA GLYCINATE 300MG/15ML ELIXIR
+"DATA",176.112,27827,1)
+243327
+"DATA",176.112,27828,0)
+4004867^GLYCEROL,IODINATED 30MG/THEOPHYLLINE 120MG/15ML ELIXIR
+"DATA",176.112,27828,1)
+243326
+"DATA",176.112,27829,0)
+4006983^POTASSIUM IODIDE 130MG/THEOPHYLLINE 80MG/15ML ELIXIR
+"DATA",176.112,27829,1)
+243325
+"DATA",176.112,27830,0)
+4005617^GUAIFENESIN 100MG/THEOPHYLLINE 125MG/15ML SYRUP
+"DATA",176.112,27830,1)
+243324
+"DATA",176.112,27831,0)
+4025922^EPINEPHRINE,RACEMIC HCL 2.25% SOLN,INHL,0.5ML
+"DATA",176.112,27831,1)
+243317
+"DATA",176.112,27832,0)
+4007525^DM 10MG/GG 100MG/PSEUDEFED 30MG/5ML SYRUP
+"DATA",176.112,27832,1)
+243259
+"DATA",176.112,27833,0)
+4005474^DEXTROMETHORPHAN 20MG/GUAIFENESIN 200MG/5ML ELIXIR
+"DATA",176.112,27833,1)
+243237
+"DATA",176.112,27834,0)
+4006608^DEXCHLORPHENIRAMINE 2MG/GG 100MG/PSEUDEFED 20MG/5ML SYRUP
+"DATA",176.112,27834,1)
+243220
+"DATA",176.112,27835,0)
+4005391^CTM 1MG/DM 5MG/PSEUDEFED 15MG/5ML LIQUID
+"DATA",176.112,27835,1)
+243176
+"DATA",176.112,27836,0)
+4008225^HYDROCODONE 1.67MG/PHENYLEPHRINE 5MG LIQUID,ORAL
+"DATA",176.112,27836,1)
+243133
+"DATA",176.112,27837,0)
+4008930^ACETAMINOPHEN 325MG/PHENYLPROPANOLAMINE 18MG TAB
+"DATA",176.112,27837,1)
+243005
+"DATA",176.112,27838,0)
+4007731^PHENIRAMINE 0.2%/PHENYLEPHRINE 0.5% SOLN,NASAL
+"DATA",176.112,27838,1)
+242993
+"DATA",176.112,27839,0)
+4004295^PHENYLEPHRINE HCL 0.5% JELLY,NASAL
+"DATA",176.112,27839,1)
+242989
+"DATA",176.112,27840,0)
+4005177^PSEUDOEPHEDRINE HCL 30MG/5ML SYRUP
+"DATA",176.112,27840,1)
+242984
+"DATA",176.112,27841,0)
+4004606^TRIPELENNAMINE CITRATE 37.5MG/5ML ELIXIR
+"DATA",176.112,27841,1)
+242979
+"DATA",176.112,27842,0)
+4007627^TRIPROLIDINE HCL 1.25MG/5ML SYRUP
+"DATA",176.112,27842,1)
+242978
+"DATA",176.112,27843,0)
+4008470^CHOLESTYRAMINE 4GM BAR,CHEWABLE
+"DATA",176.112,27843,1)
+242972
+"DATA",176.112,27844,0)
+4004268^NOREPINEPHRINE BITARTRATE 1MG/ML INJ
+"DATA",176.112,27844,1)
+242969
+"DATA",176.112,27845,0)
+4000949^EPHEDRINE SO4 25MG/ML INJ
+"DATA",176.112,27845,1)
+242968
+"DATA",176.112,27846,0)
+4001237^NITROGLYCERIN 2% OINT,TOP
+"DATA",176.112,27846,1)
+242946
+"DATA",176.112,27847,0)
+4006419^DESLANOSIDE 0.2MG/ML INJ
+"DATA",176.112,27847,1)
+242941
+"DATA",176.112,27848,0)
+4005820^VASOPRESSIN TANNATE 5UNT/ML INJ,SUSP (IN OIL)
+"DATA",176.112,27848,1)
+242938
+"DATA",176.112,27849,0)
+4000711^THYROID STRONG 32MG TAB
+"DATA",176.112,27849,1)
+242927
+"DATA",176.112,27850,0)
+4000690^THYROID 32MG TAB
+"DATA",176.112,27850,1)
+242927
+"DATA",176.112,27851,0)
+4001430^INSULIN,PROTAMINE ZINC,PORK/PURIFIED 100UNT/ML INJ
+"DATA",176.112,27851,1)
+242917
+"DATA",176.112,27852,0)
+4001431^INSULIN,PROTAMINE ZINC,BEEF/PURIFIED 100UNT/ML INJ
+"DATA",176.112,27852,1)
+242916
+"DATA",176.112,27853,0)
+4004151^GRISEOFULVIN,ULTRAMICROSIZE 125MG TAB
+"DATA",176.112,27853,1)
+242831
+"DATA",176.112,27854,0)
+4004154^GRISEOFULVIN,MICROSIZE 125MG CAP
+"DATA",176.112,27854,1)
+242830
+"DATA",176.112,27855,0)
+4005922^GENTAMICIN SO4 1MG/ML/NACL 0.9% INJ
+"DATA",176.112,27855,1)
+242816
+"DATA",176.112,27856,0)
+4004131^GENTAMICIN SO4 1MG/ML INJ
+"DATA",176.112,27856,1)
+242816
+"DATA",176.112,27857,0)
+4001741^AMPHOTERICIN B 25MG/TETRACYCLINE 125MG/5ML SYRUP
+"DATA",176.112,27857,1)
+242814
+"DATA",176.112,27858,0)
+4001410^CEFTAZIDIME 6GM/VIL INJ
+"DATA",176.112,27858,1)
+242800
+"DATA",176.112,27859,0)
+4001413^CEFTAZIDIME 10GM/VIL INJ
+"DATA",176.112,27859,1)
+242800
+"DATA",176.112,27860,0)
+4001304^CEFAMANDOLE NAFATE 500MG/VIL INJ
+"DATA",176.112,27860,1)
+242796
+"DATA",176.112,27861,0)
+4001985^CEPHRADINE 500MG/VIL INJ
+"DATA",176.112,27861,1)
+242794
+"DATA",176.112,27862,0)
+4001989^CEPHRADINE 1GM/VIL INJ
+"DATA",176.112,27862,1)
+242794
+"DATA",176.112,27863,0)
+4001299^CEPHALOTHIN NA 4GM/VIL INJ
+"DATA",176.112,27863,1)
+242787
+"DATA",176.112,27864,0)
+4001293^CEPHALOTHIN NA 1GM/VIL INJ
+"DATA",176.112,27864,1)
+242787
+"DATA",176.112,27865,0)
+4001295^CEPHALOTHIN NA 4GM/BAG INJ
+"DATA",176.112,27865,1)
+242787
+"DATA",176.112,27866,0)
+4001303^CEPHALOTHIN NA 4GM/BTL INJ
+"DATA",176.112,27866,1)
+242787
+"DATA",176.112,27867,0)
+4001296^CEPHALOTHIN NA 20GM/VIL INJ
+"DATA",176.112,27867,1)
+242787
+"DATA",176.112,27868,0)
+4001302^CEPHALOTHIN NA 2GM/BTL INJ
+"DATA",176.112,27868,1)
+242787
+"DATA",176.112,27869,0)
+4001298^CEPHALOTHIN NA 2GM/BAG INJ
+"DATA",176.112,27869,1)
+242787
+"DATA",176.112,27870,0)
+4001294^CEPHALOTHIN NA 2GM/VIL INJ
+"DATA",176.112,27870,1)
+242787
+"DATA",176.112,27871,0)
+4001297^CEPHALOTHIN NA 1GM/BAG INJ
+"DATA",176.112,27871,1)
+242787
+"DATA",176.112,27872,0)
+4001300^CEPHALOTHIN NA 10GM/VIL INJ
+"DATA",176.112,27872,1)
+242787
+"DATA",176.112,27873,0)
+4014198^FERRIC NA GLUCONATE COMPLEX 12.5MG/ML INJ
+"DATA",176.112,27873,1)
+242761
+"DATA",176.112,27874,0)
+4013755^METRONIDAZOLE 0.75% LOTION
+"DATA",176.112,27874,1)
+242736
+"DATA",176.112,27875,0)
+4013392^DIFLORASONE DIACETATE 0.05%/EMOLLIENT CREAM,TOP
+"DATA",176.112,27875,1)
+242730
+"DATA",176.112,27876,0)
+4003467^DIFLORASONE DIACETATE 0.05% CREAM,TOP
+"DATA",176.112,27876,1)
+242730
+"DATA",176.112,27877,0)
+4015543^VERAPAMIL HCL 100MG CAP,SA
+"DATA",176.112,27877,1)
+242722
+"DATA",176.112,27878,0)
+4013726^HYDROCODONE 7.5MG/ACETAMINOPHEN 400MG TAB
+"DATA",176.112,27878,1)
+242709
+"DATA",176.112,27879,0)
+4013725^HYDROCODONE 5MG/ACETAMINOPHEN 400MG TAB
+"DATA",176.112,27879,1)
+242708
+"DATA",176.112,27880,0)
+4013395^EPOETIN ALFA,RECOMBINANT 40000UNT/ML INJ
+"DATA",176.112,27880,1)
+242706
+"DATA",176.112,27881,0)
+4004211^DEXTROSE 30% INJ
+"DATA",176.112,27881,1)
+242694
+"DATA",176.112,27882,0)
+4013355^LAMIVUDINE 25MG/5ML SOLN,ORAL
+"DATA",176.112,27882,1)
+242692
+"DATA",176.112,27883,0)
+4016872^ALPROSTADIL 20MCG/VIL IMPLUSE INJ,SYSTEM
+"DATA",176.112,27883,1)
+242691
+"DATA",176.112,27884,0)
+4016510^ALPROSTADIL 20MCG/CARTRIDGE INJ,SYSTEM
+"DATA",176.112,27884,1)
+242691
+"DATA",176.112,27885,0)
+4016871^ALPROSTADIL 10MCG/VIL IMPULSE INJ,SYSTEM
+"DATA",176.112,27885,1)
+242691
+"DATA",176.112,27886,0)
+4003542^ALPROSTADIL 20MCG/VIL INJ,SYSTEM
+"DATA",176.112,27886,1)
+242691
+"DATA",176.112,27887,0)
+4003535^ALPROSTADIL 20MCG/VIL INJ
+"DATA",176.112,27887,1)
+242691
+"DATA",176.112,27888,0)
+4003541^ALPROSTADIL 10MCG/VIL INJ,SYSTEM
+"DATA",176.112,27888,1)
+242690
+"DATA",176.112,27889,0)
+4016509^ALPROSTADIL 10MCG/CARTRIDGE INJ,SYSTEM
+"DATA",176.112,27889,1)
+242690
+"DATA",176.112,27890,0)
+4003534^ALPROSTADIL 10MCG/VIL INJ
+"DATA",176.112,27890,1)
+242690
+"DATA",176.112,27891,0)
+4013384^ABACAVIR SO4 100MG/5ML SOLN,ORAL
+"DATA",176.112,27891,1)
+242680
+"DATA",176.112,27892,0)
+4013382^ABACAVIR SO4 300MG TAB
+"DATA",176.112,27892,1)
+242679
+"DATA",176.112,27893,0)
+4013383^ABACAVIR SO4 300MG TAB,UD
+"DATA",176.112,27893,1)
+242679
+"DATA",176.112,27894,0)
+4013744^ESTRADIOL 0.05MG/NORETHINDRONE ACETATE 0.25MG/24HRS PATCH
+"DATA",176.112,27894,1)
+242677
+"DATA",176.112,27895,0)
+4013286^RIFAPENTINE 150MG TAB
+"DATA",176.112,27895,1)
+242671
+"DATA",176.112,27896,0)
+4013743^ESTRADIOL 0.05MG/NORETHINDRONE ACETATE 0.14MG/24HRS PATCH
+"DATA",176.112,27896,1)
+242644
+"DATA",176.112,27897,0)
+4007247^LEVOCARNITINE 200MG/ML INJ
+"DATA",176.112,27897,1)
+242640
+"DATA",176.112,27898,0)
+4015959^FERROUS GLUCONATE 240MG TAB
+"DATA",176.112,27898,1)
+242590
+"DATA",176.112,27899,0)
+4017212^PYRITHIONE ZINC 0.25% SPRAY,TOP
+"DATA",176.112,27899,1)
+242537
+"DATA",176.112,27900,0)
+4013668^CILOSTAZOL 50MG TAB
+"DATA",176.112,27900,1)
+242462
+"DATA",176.112,27901,0)
+4013669^CILOSTAZOL 50MG TAB,UD
+"DATA",176.112,27901,1)
+242462
+"DATA",176.112,27902,0)
+4013670^CILOSTAZOL 100MG TAB
+"DATA",176.112,27902,1)
+242461
+"DATA",176.112,27903,0)
+4013671^CILOSTAZOL 100MG TAB,UD
+"DATA",176.112,27903,1)
+242461
+"DATA",176.112,27904,0)
+4009308^OFLOXACIN 0.3% SOLN,OTIC
+"DATA",176.112,27904,1)
+242446
+"DATA",176.112,27905,0)
+4013220^MONTELUKAST NA 5MG TAB,CHEW
+"DATA",176.112,27905,1)
+242438
+"DATA",176.112,27906,0)
+4013221^MONTELUKAST NA 5MG TAB,CHEW,UD
+"DATA",176.112,27906,1)
+242438
+"DATA",176.112,27907,0)
+4013212^RITUXIMAB 10MG/ML INJ,VIL,50ML
+"DATA",176.112,27907,1)
+242435
+"DATA",176.112,27908,0)
+4013211^RITUXIMAB 10MG/ML INJ,VIL,10ML
+"DATA",176.112,27908,1)
+242435
+"DATA",176.112,27909,0)
+4004805^POTASSIUM IODIDE 325MG/5ML SYRUP
+"DATA",176.112,27909,1)
+242429
+"DATA",176.112,27910,0)
+4013130^CORTICORELIN OVINE TRIFLUTATE 100MCG/VIL INJ
+"DATA",176.112,27910,1)
+242336
+"DATA",176.112,27911,0)
+4013104^BROMFENAC NA 25MG CAP
+"DATA",176.112,27911,1)
+242334
+"DATA",176.112,27912,0)
+4013103^MIBEFRADIL DIHYDROCHLORIDE 100MG TAB
+"DATA",176.112,27912,1)
+242325
+"DATA",176.112,27913,0)
+4013102^MIBEFRADIL DIHYDROCHLORIDE 50MG TAB
+"DATA",176.112,27913,1)
+242324
+"DATA",176.112,27914,0)
+4007550^NALBUPHINE HCL 1.5MG/ML INJ,VIL,PCA,30ML
+"DATA",176.112,27914,1)
+242313
+"DATA",176.112,27915,0)
+4008304^DM 10MG/GG 100MG/P-EPHRINE 5MG/5ML SYRUP
+"DATA",176.112,27915,1)
+242309
+"DATA",176.112,27916,0)
+4006319^ETOMIDATE 2MG/ML INJ
+"DATA",176.112,27916,1)
+242287
+"DATA",176.112,27917,0)
+4012971^LEVOFLOXACIN 25MG/ML INJ
+"DATA",176.112,27917,1)
+242228
+"DATA",176.112,27918,0)
+4013023^PORFIMER NA 75MG/VIL INJ
+"DATA",176.112,27918,1)
+242166
+"DATA",176.112,27919,0)
+4016103^FOSPHENYTOIN NA 50MG-PE/ML INJ
+"DATA",176.112,27919,1)
+242145
+"DATA",176.112,27920,0)
+4012912^FOSPHENYTOIN NA 75MG/ML INJ
+"DATA",176.112,27920,1)
+242145
+"DATA",176.112,27921,0)
+4013718^INSULIN,LISPRO,HUMAN 100 UNT/ML INJ,PEN,3ML
+"DATA",176.112,27921,1)
+242120
+"DATA",176.112,27922,0)
+4001496^INSULIN,LISPRO,HUMAN 100 UNT/ML INJ,CARTRIDGE,1.5ML
+"DATA",176.112,27922,1)
+242120
+"DATA",176.112,27923,0)
+4016829^INSULIN.LISPRO,HUMAN 100 UNIT/ML INJ,CARTRIDGE,3ML
+"DATA",176.112,27923,1)
+242120
+"DATA",176.112,27924,0)
+4016830^INSULIN,LISPRO,HUMAN 100 UNIT/ML INJ,CARTRIDGE,3ML
+"DATA",176.112,27924,1)
+242120
+"DATA",176.112,27925,0)
+4027216^INSULIN,LISPRO,HUMAN 100 UNT/ML INJ,KWIKPEN,3ML
+"DATA",176.112,27925,1)
+242120
+"DATA",176.112,27926,0)
+4012883^IBUTILIDE FUMARATE 0.1MG/ML INJ,SOLN
+"DATA",176.112,27926,1)
+242021
+"DATA",176.112,27927,0)
+4012913^GEMCITABINE HCL 200MG/VIL INJ
+"DATA",176.112,27927,1)
+242000
+"DATA",176.112,27928,0)
+4012914^GEMCITABINE HCL 1GM/VIL INJ
+"DATA",176.112,27928,1)
+242000
+"DATA",176.112,27929,0)
+4009083^EPOETIN ALFA,RECOMBINANT 20000UNT/ML INJ
+"DATA",176.112,27929,1)
+241999
+"DATA",176.112,27930,0)
+4006691^DILTIAZEM HCL 100MG/VIL INJ
+"DATA",176.112,27930,1)
+241994
+"DATA",176.112,27931,0)
+4009970^SOMATROPIN 5MG/ML INJ,SOLN
+"DATA",176.112,27931,1)
+241975
+"DATA",176.112,27932,0)
+4016272^SOMATROPIN 5MG/ML INJ,SOLN,PEN,2ML
+"DATA",176.112,27932,1)
+241975
+"DATA",176.112,27933,0)
+4014258^SOMATROPIN 5.8MG/VIL INJ,INTRA-MIX
+"DATA",176.112,27933,1)
+241975
+"DATA",176.112,27934,0)
+4014257^SOMATROPIN 5.8MG/VIL INJ,CARTRIDGE
+"DATA",176.112,27934,1)
+241975
+"DATA",176.112,27935,0)
+4009462^LECITHIN 1200MG CAP
+"DATA",176.112,27935,1)
+241950
+"DATA",176.112,27936,0)
+4024598^FOLIC 1MG/IRON (POLYSACCHARIDE) 100MG/5ML (AF,SF) LIQUID
+"DATA",176.112,27936,1)
+241944
+"DATA",176.112,27937,0)
+4016995^METHYLBENZETHONIUM CL 0.1% (AL & SF) LIQUID,ORAL
+"DATA",176.112,27937,1)
+241922
+"DATA",176.112,27938,0)
+4002009^IOPAMIDOL 755MG/ML INJ
+"DATA",176.112,27938,1)
+241843
+"DATA",176.112,27939,0)
+4024804^CYCLOSPORINE MODIFIED 100MG CAP
+"DATA",176.112,27939,1)
+241834
+"DATA",176.112,27940,0)
+4024979^POVIDONE IODINE 2.5% OINT,TOP
+"DATA",176.112,27940,1)
+241793
+"DATA",176.112,27941,0)
+4003275^HYDROMORPHONE HCL 10MG/ML INJ
+"DATA",176.112,27941,1)
+241784
+"DATA",176.112,27942,0)
+4025815^HYDROMORPHONE HCL 250MG/VIL INJ
+"DATA",176.112,27942,1)
+241784
+"DATA",176.112,27943,0)
+4000670^COLCHICINE 0.5MG/ML INJ
+"DATA",176.112,27943,1)
+241773
+"DATA",176.112,27944,0)
+4000851^CYANOCOBALAMIN 1000MCG/THIAMINE HCL 100MG INJ
+"DATA",176.112,27944,1)
+241190
+"DATA",176.112,27945,0)
+4012716^ABCIXIMAB 2MG/ML INJ,SOLN
+"DATA",176.112,27945,1)
+241162
+"DATA",176.112,27946,0)
+4010135^PAMIDRONATE DISODIUM 60MG/VIL INJ
+"DATA",176.112,27946,1)
+241134
+"DATA",176.112,27947,0)
+4017195^HYPROMELLOSE 0.4% SOLN,OPH
+"DATA",176.112,27947,1)
+241109
+"DATA",176.112,27948,0)
+4004818^DYPHYLLINE 100MG/GUAIFENESIN 100MG/15ML ELIXIR
+"DATA",176.112,27948,1)
+241063
+"DATA",176.112,27949,0)
+4016335^MAGALDRATE 1080MG/SIMETHICONE 40MG/5ML SUSP,ORAL
+"DATA",176.112,27949,1)
+241056
+"DATA",176.112,27950,0)
+4008600^AMPICILLIN NA/SULBACTAM NA 15GM/VIL INJ
+"DATA",176.112,27950,1)
+240984
+"DATA",176.112,27951,0)
+4012305^GRANISETRON HCL 1MG/ML INJ,1ML VIL
+"DATA",176.112,27951,1)
+240912
+"DATA",176.112,27952,0)
+4012307^GRANISETRON HCL 1MG/ML INJ,4ML VIL
+"DATA",176.112,27952,1)
+240912
+"DATA",176.112,27953,0)
+4001018^MORPHINE SO4 50MG/ML INJ,DILUTE-A-JET,50ML
+"DATA",176.112,27953,1)
+240910
+"DATA",176.112,27954,0)
+4001003^MORPHINE SO4 50MG/ML INJ
+"DATA",176.112,27954,1)
+240910
+"DATA",176.112,27955,0)
+4012483^PEGASPARGASE 750U/ML (PF) INJ,SOLN,5ML VIL
+"DATA",176.112,27955,1)
+240906
+"DATA",176.112,27956,0)
+4012169^TRIMETREXATE GLUCURONATE 25MG/VIL INJ
+"DATA",176.112,27956,1)
+240863
+"DATA",176.112,27957,0)
+4014121^KETOCONAZOLE 1% SHAMPOO
+"DATA",176.112,27957,1)
+240812
+"DATA",176.112,27958,0)
+4002277^SODIUM NITROPRUSSIDE 50MG/2ML INJ
+"DATA",176.112,27958,1)
+240793
+"DATA",176.112,27959,0)
+4004196^MEPIVACAINE HCL 1% INJ
+"DATA",176.112,27959,1)
+240766
+"DATA",176.112,27960,0)
+4010302^CLADRIBINE 1MG/ML INJ
+"DATA",176.112,27960,1)
+240754
+"DATA",176.112,27961,0)
+4010078^CLARITHROMYCIN 125MG/5ML SUSP,ORAL
+"DATA",176.112,27961,1)
+240741
+"DATA",176.112,27962,0)
+4009425^CAFFEINE 125MG/NA BENZOATE 125MG/ML INJ
+"DATA",176.112,27962,1)
+240738
+"DATA",176.112,27963,0)
+4006408^METHYLENE BLUE 1% INJ
+"DATA",176.112,27963,1)
+240737
+"DATA",176.112,27964,0)
+4010271^OATMEAL,COLLOIDAL 1% CREAM
+"DATA",176.112,27964,1)
+240651
+"DATA",176.112,27965,0)
+4009304^OFLOXACIN 40MG/ML INJ
+"DATA",176.112,27965,1)
+240640
+"DATA",176.112,27966,0)
+4009305^OFLOXACIN 20MG/ML INJ
+"DATA",176.112,27966,1)
+240639
+"DATA",176.112,27967,0)
+4017190^SODIUM CHLORIDE 0.9% GEL,TOP
+"DATA",176.112,27967,1)
+240623
+"DATA",176.112,27968,0)
+4005085^VECURONIUM BROMIDE 1MG/ML INJ
+"DATA",176.112,27968,1)
+240606
+"DATA",176.112,27969,0)
+4016908^VECURONIUM BROMIDE 10MG/VIL INJ
+"DATA",176.112,27969,1)
+240606
+"DATA",176.112,27970,0)
+4027706^VECURONIUM BROMIDE 20MG/VIL INJ
+"DATA",176.112,27970,1)
+240606
+"DATA",176.112,27971,0)
+4014431^MAGNESIUM SO4 32MEQ/100ML INJ,BAG
+"DATA",176.112,27971,1)
+240574
+"DATA",176.112,27972,0)
+4027081^MAGNESIUM SO4 16MEQ/50ML INJ,BAG
+"DATA",176.112,27972,1)
+240574
+"DATA",176.112,27973,0)
+4009467^PENTOSTATIN 10MG/MANNITOL 50MG/VIL INJ
+"DATA",176.112,27973,1)
+240573
+"DATA",176.112,27974,0)
+4005808^BETAMETHASONE DIPROPIONATE 0.05% AUGMENTED GEL
+"DATA",176.112,27974,1)
+240571
+"DATA",176.112,27975,0)
+4027735^ALOE VERA CREAM,TOP
+"DATA",176.112,27975,1)
+240554
+"DATA",176.112,27976,0)
+4010266^OATMEAL,COLLOIDAL 1% LOTION
+"DATA",176.112,27976,1)
+240464
+"DATA",176.112,27977,0)
+4009314^FILGRASTIM 300MCG/ML (PF) INJ
+"DATA",176.112,27977,1)
+240449
+"DATA",176.112,27978,0)
+4009315^FILGRASTIM 300MCG/ML (PF) INJ,VIL,1.6ML
+"DATA",176.112,27978,1)
+240449
+"DATA",176.112,27979,0)
+4025056^FILGRASTIM 300MCG/ML (PF) INJ,VIL,1ML
+"DATA",176.112,27979,1)
+240449
+"DATA",176.112,27980,0)
+4001010^MORPHINE SO4 25MG/ML (PF) INJ
+"DATA",176.112,27980,1)
+240437
+"DATA",176.112,27981,0)
+4000996^MORPHINE SO4 25MG/ML INJ
+"DATA",176.112,27981,1)
+240437
+"DATA",176.112,27982,0)
+4003463^CYTARABINE 100MG/VIL INJ
+"DATA",176.112,27982,1)
+240416
+"DATA",176.112,27983,0)
+4009257^PIPECURONIUM BR 10MG/VIL INJ
+"DATA",176.112,27983,1)
+240414
+"DATA",176.112,27984,0)
+4013476^FLUOCINOLONE ACETONIDE 0.01% SHAMPOO,TOP
+"DATA",176.112,27984,1)
+240413
+"DATA",176.112,27985,0)
+4017374^COAL TAR 7.5% GEL,TOP
+"DATA",176.112,27985,1)
+240388
+"DATA",176.112,27986,0)
+4009081^EPOETIN ALFA,RECOMBINANT 3000UNT/ML INJ
+"DATA",176.112,27986,1)
+240377
+"DATA",176.112,27987,0)
+4009141^DEZOCINE 15MG/ML INJ
+"DATA",176.112,27987,1)
+240376
+"DATA",176.112,27988,0)
+4009140^DEZOCINE 10MG/ML INJ
+"DATA",176.112,27988,1)
+240375
+"DATA",176.112,27989,0)
+4009139^DEZOCINE 5MG/ML INJ
+"DATA",176.112,27989,1)
+240374
+"DATA",176.112,27990,0)
+4005793^BETAMETHASONE DIPROPIONATE 0.05% LOTION
+"DATA",176.112,27990,1)
+240209
+"DATA",176.112,27991,0)
+4005807^BETAMETHASONE DIPROPIONATE 0.05% AUGMENTED LOTION
+"DATA",176.112,27991,1)
+240209
+"DATA",176.112,27992,0)
+4017354^BOTULINUM TOXIN TYPE A 100 UNIT/VIL INJ
+"DATA",176.112,27992,1)
+240160
+"DATA",176.112,27993,0)
+4006758^BENZETHONIUM CL 0.1%/BENZOCAINE 20% OINT,TOP
+"DATA",176.112,27993,1)
+240159
+"DATA",176.112,27994,0)
+4006436^APAP 500MG/BUTALBITAL 50MG/CAFN 40MG TAB
+"DATA",176.112,27994,1)
+240093
+"DATA",176.112,27995,0)
+4010462^NONOXYNOL-9 150MG SUPP,VAG
+"DATA",176.112,27995,1)
+240066
+"DATA",176.112,27996,0)
+4026907^POTASSIUM GLUCONATE 2.5MEQ TAB
+"DATA",176.112,27996,1)
+240060
+"DATA",176.112,27997,0)
+4027283^CHOLECALCIFEROL 5,000UNIT CAP,ORAL
+"DATA",176.112,27997,1)
+240029
+"DATA",176.112,27998,0)
+4009082^EPOETIN ALFA,RECOMBINANT 10000UNT/ML INJ,VIL,2ML
+"DATA",176.112,27998,1)
+240000
+"DATA",176.112,27999,0)
+4009080^EPOETIN ALFA,RECOMBINANT 10000UNT/ML INJ
+"DATA",176.112,27999,1)
+240000
+"DATA",176.112,28000,0)
+4009079^EPOETIN ALFA,RECOMBINANT 4000UNT/ML INJ
+"DATA",176.112,28000,1)
+239999
+"DATA",176.112,28001,0)
+4009078^EPOETIN ALFA,RECOMBINANT 2000UNT/ML INJ
+"DATA",176.112,28001,1)
+239998
+"DATA",176.112,28002,0)
+4007675^ISOSULFAN BLUE 1% INJ
+"DATA",176.112,28002,1)
+239990
+"DATA",176.112,28003,0)
+4005298^MUROMONAB-CD3 1MG/ML INJ,5ML
+"DATA",176.112,28003,1)
+239984
+"DATA",176.112,28004,0)
+4006483^AZATHIOPRINE 100MG/VIL INJ
+"DATA",176.112,28004,1)
+239983
+"DATA",176.112,28005,0)
+4006820^CIMETIDINE HCL 150MG/ML INJ
+"DATA",176.112,28005,1)
+239982
+"DATA",176.112,28006,0)
+4006824^CIMETIDINE HCL 150MG/ML INJ,ADD-VANTAGE VIL,2ML
+"DATA",176.112,28006,1)
+239982
+"DATA",176.112,28007,0)
+4001706^AMPHOTERICIN B CHOLESTERYL SO4 COMPLEX 100MG/VIL INJ
+"DATA",176.112,28007,1)
+239240
+"DATA",176.112,28008,0)
+4001704^AMPHOTERICIN B CHOLESTERYL SO4 COMPLEX 50MG/VIL INJ
+"DATA",176.112,28008,1)
+239240
+"DATA",176.112,28009,0)
+4001702^AMPHOTERICIN B 50MG/VIL INJ
+"DATA",176.112,28009,1)
+239240
+"DATA",176.112,28010,0)
+4004152^GRISEOFULVIN,ULTRAMICROSIZE 250MG TAB
+"DATA",176.112,28010,1)
+239239
+"DATA",176.112,28011,0)
+4004158^GRISEOFULVIN,MICROSIZE 250MG TAB
+"DATA",176.112,28011,1)
+239239
+"DATA",176.112,28012,0)
+4004157^GRISEOFULVIN,MICROSIZE 125MG/5ML SUSP,ORAL
+"DATA",176.112,28012,1)
+239238
+"DATA",176.112,28013,0)
+4007453^METHIONINE 200MG CAP
+"DATA",176.112,28013,1)
+239233
+"DATA",176.112,28014,0)
+4002571^METHENAMINE MANDELATE 500MG TAB
+"DATA",176.112,28014,1)
+239228
+"DATA",176.112,28015,0)
+4002570^METHENAMINE HIPPURATE 1GM TAB
+"DATA",176.112,28015,1)
+239227
+"DATA",176.112,28016,0)
+4002572^METHENAMINE MANDELATE 1GM TAB
+"DATA",176.112,28016,1)
+239227
+"DATA",176.112,28017,0)
+4003501^LINCOMYCIN HCL 300MG/ML INJ
+"DATA",176.112,28017,1)
+239212
+"DATA",176.112,28018,0)
+4000923^VANCOMYCIN HCL 1GM/BTL SOLN,ORAL
+"DATA",176.112,28018,1)
+239210
+"DATA",176.112,28019,0)
+4000926^VANCOMYCIN HCL 100MG/ML INJ
+"DATA",176.112,28019,1)
+239209
+"DATA",176.112,28020,0)
+4000937^CAPREOMYCIN SO4 1GM/VIL INJ
+"DATA",176.112,28020,1)
+239208
+"DATA",176.112,28021,0)
+4006605^NETILMICIN SO4 100MG/ML INJ
+"DATA",176.112,28021,1)
+239207
+"DATA",176.112,28022,0)
+4004127^GENTAMICIN SO4 10MG/ML INJ
+"DATA",176.112,28022,1)
+239204
+"DATA",176.112,28023,0)
+4004136^GENTAMICIN SO4 10MG/ML (PF) INJ
+"DATA",176.112,28023,1)
+239204
+"DATA",176.112,28024,0)
+4003823^KANAMYCIN SO4 37.5MG/ML INJ
+"DATA",176.112,28024,1)
+239202
+"DATA",176.112,28025,0)
+4003820^KANAMYCIN SO4 250MG/ML INJ
+"DATA",176.112,28025,1)
+239201
+"DATA",176.112,28026,0)
+4004073^CHLORAMPHENICOL NA SUCCINATE 1GM/VIL INJ
+"DATA",176.112,28026,1)
+239200
+"DATA",176.112,28027,0)
+4003128^CEFONICID NA 1GM/VIL INJ
+"DATA",176.112,28027,1)
+239195
+"DATA",176.112,28028,0)
+4001642^AMOXICILLIN 250MG/5ML SUSP,ORAL
+"DATA",176.112,28028,1)
+239191
+"DATA",176.112,28029,0)
+4001654^AMOXICILLIN 50MG/ML DROPS,ORAL
+"DATA",176.112,28029,1)
+239191
+"DATA",176.112,28030,0)
+4001644^AMOXICILLIN TRIHYDRATE 250MG/5ML SUSP
+"DATA",176.112,28030,1)
+239191
+"DATA",176.112,28031,0)
+4001647^AMOXICILLIN TRIHYDRATE 50MG/ML DROPS,ORAL
+"DATA",176.112,28031,1)
+239191
+"DATA",176.112,28032,0)
+4003184^NAFCILLIN NA 500MG/VIL INJ
+"DATA",176.112,28032,1)
+239190
+"DATA",176.112,28033,0)
+4003185^NAFCILLIN NA 1GM/VIL INJ
+"DATA",176.112,28033,1)
+239190
+"DATA",176.112,28034,0)
+4003189^NAFCILLIN NA 1GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,28034,1)
+239190
+"DATA",176.112,28035,0)
+4003186^NAFCILLIN NA 2GM/VIL INJ
+"DATA",176.112,28035,1)
+239190
+"DATA",176.112,28036,0)
+4003190^NAFCILLIN NA 2GM/VIL INJ,ADD-VANTAGE
+"DATA",176.112,28036,1)
+239190
+"DATA",176.112,28037,0)
+4003181^NAFCILLIN NA MONOHYDRATE 500MG/VIL INJ
+"DATA",176.112,28037,1)
+239190
+"DATA",176.112,28038,0)
+4003183^NAFCILLIN NA MONOHYDRATE 2GM/VIL INJ
+"DATA",176.112,28038,1)
+239190
+"DATA",176.112,28039,0)
+4003177^NAFCILLIN NA MONOHYDRATE 250MG/ML INJ
+"DATA",176.112,28039,1)
+239190
+"DATA",176.112,28040,0)
+4003182^NAFCILLIN NA MONOHYDRATE 1GM/VIL INJ
+"DATA",176.112,28040,1)
+239190
+"DATA",176.112,28041,0)
+4003180^NAFCILLIN NA MONOHYDRATE 10GM/VIL INJ
+"DATA",176.112,28041,1)
+239189
+"DATA",176.112,28042,0)
+4003187^NAFCILLIN NA 10GM/VIL INJ
+"DATA",176.112,28042,1)
+239189
+"DATA",176.112,28043,0)
+4007122^PIPERACILLIN NA 40GM/VIL INJ
+"DATA",176.112,28043,1)
+239186
+"DATA",176.112,28044,0)
+4003526^STREPTOZOCIN 1GM/VIL INJ
+"DATA",176.112,28044,1)
+239180
+"DATA",176.112,28045,0)
+4002984^DACTINOMYCIN 0.5MG/VIL INJ
+"DATA",176.112,28045,1)
+239179
+"DATA",176.112,28046,0)
+4000933^VINBLASTINE SO4 10MG/VIL INJ
+"DATA",176.112,28046,1)
+239178
+"DATA",176.112,28047,0)
+4009940^VINBLASTINE SO4 1MG/ML/NACL 0.9% INJ
+"DATA",176.112,28047,1)
+239178
+"DATA",176.112,28048,0)
+4000934^VINBLASTINE SO4 1MG/ML INJ
+"DATA",176.112,28048,1)
+239178
+"DATA",176.112,28049,0)
+4002257^FLUOROURACIL 50MG/ML INJ
+"DATA",176.112,28049,1)
+239177
+"DATA",176.112,28050,0)
+4002260^FLUOROURACIL (PF) 50MG/ML INJ
+"DATA",176.112,28050,1)
+239177
+"DATA",176.112,28051,0)
+4003055^MECHLORETHAMINE HCL 10MG/VIL INJ
+"DATA",176.112,28051,1)
+239176
+"DATA",176.112,28052,0)
+4016334^GELATIN 600MG CAP
+"DATA",176.112,28052,1)
+239151
+"DATA",176.112,28053,0)
+4006513^ATRACURIUM BESYLATE 10MG/ML INJ
+"DATA",176.112,28053,1)
+239060
+"DATA",176.112,28054,0)
+4006514^ATRACURIUM BESYLATE 10MG/ML INJ,AMP,2.5ML
+"DATA",176.112,28054,1)
+239060
+"DATA",176.112,28055,0)
+4006515^ATRACURIUM BESYLATE 10MG/ML INJ,AMP,5ML
+"DATA",176.112,28055,1)
+239060
+"DATA",176.112,28056,0)
+4005088^PANCURONIUM BROMIDE 2MG/ML INJ
+"DATA",176.112,28056,1)
+239059
+"DATA",176.112,28057,0)
+4005087^PANCURONIUM BROMIDE 1MG/ML INJ
+"DATA",176.112,28057,1)
+239058
+"DATA",176.112,28058,0)
+4001067^TUBOCURARINE CHLORIDE 3MG/ML INJ
+"DATA",176.112,28058,1)
+239056
+"DATA",176.112,28059,0)
+4006239^AMMONIUM CHLORIDE 5MEQ/ML INJ
+"DATA",176.112,28059,1)
+239018
+"DATA",176.112,28060,0)
+4015086^BENZOCAINE 20% SOLN,OTIC
+"DATA",176.112,28060,1)
+239009
+"DATA",176.112,28061,0)
+4004292^PHENYLEPHRINE HCL 1% SOLN,NASAL
+"DATA",176.112,28061,1)
+239001
+"DATA",176.112,28062,0)
+4004296^PHENYLEPHRINE HCL 0.5% SOLN,NASAL
+"DATA",176.112,28062,1)
+239000
+"DATA",176.112,28063,0)
+4004297^PHENYLEPHRINE HCL 0.25% SOLN,NASAL
+"DATA",176.112,28063,1)
+238999
+"DATA",176.112,28064,0)
+4004299^PHENYLEPHRINE HCL 0.16% SOLN,NASAL
+"DATA",176.112,28064,1)
+238998
+"DATA",176.112,28065,0)
+4004298^PHENYLEPHRINE HCL 0.125% SOLN,NASAL
+"DATA",176.112,28065,1)
+238997
+"DATA",176.112,28066,0)
+4008935^OXYMETAZOLINE HCL 0.025% SOLN,NASAL
+"DATA",176.112,28066,1)
+238993
+"DATA",176.112,28067,0)
+4009870^XYLOMETAZOLINE HCL 0.05% SOLN,NASAL
+"DATA",176.112,28067,1)
+238991
+"DATA",176.112,28068,0)
+4005501^NAPHAZOLINE HCL 0.05% SOLN,NASAL
+"DATA",176.112,28068,1)
+238990
+"DATA",176.112,28069,0)
+4007438^TETRAHYDROZOLINE HCL 0.1% SOLN,NASAL
+"DATA",176.112,28069,1)
+238987
+"DATA",176.112,28070,0)
+4009169^POLYVINYL ALCOHOL 1.4%/POVIDONE SOLN,OPH
+"DATA",176.112,28070,1)
+238970
+"DATA",176.112,28071,0)
+4009170^POLYVINYL ALCOHOL 1.4%/POVIDONE (PF) SOLN,OPH
+"DATA",176.112,28071,1)
+238970
+"DATA",176.112,28072,0)
+4001589^ERYTHROMYCIN 2% OINT,TOP
+"DATA",176.112,28072,1)
+238936
+"DATA",176.112,28073,0)
+4005805^BETAMETHASONE DIPROPIONATE 0.05% AUGMENTED CREAM
+"DATA",176.112,28073,1)
+238920
+"DATA",176.112,28074,0)
+4005791^BETAMETHASONE DIPROPIONATE 0.05% CREAM,TOP
+"DATA",176.112,28074,1)
+238920
+"DATA",176.112,28075,0)
+4007836^BENZOCAINE 20% GEL,DENTAL
+"DATA",176.112,28075,1)
+238910
+"DATA",176.112,28076,0)
+4007819^BENZOCAINE 20% GEL
+"DATA",176.112,28076,1)
+238910
+"DATA",176.112,28077,0)
+4009133^PRAMOXINE HCL 1% CREAM,TOP
+"DATA",176.112,28077,1)
+238895
+"DATA",176.112,28078,0)
+4008185^POVIDONE IODINE 10% SCRUB SOLN,TOP
+"DATA",176.112,28078,1)
+238851
+"DATA",176.112,28079,0)
+4008169^POVIDONE IODINE 5% AEROSOL,TOP
+"DATA",176.112,28079,1)
+238850
+"DATA",176.112,28080,0)
+4008191^POVIDONE IODINE 12% DOUCHE,CONC,VAG
+"DATA",176.112,28080,1)
+238803
+"DATA",176.112,28081,0)
+4003433^METHYLPREDNISOLONE ACETATE 80MG/ML INJ,SUSP
+"DATA",176.112,28081,1)
+238760
+"DATA",176.112,28082,0)
+4003431^METHYLPREDNISOLONE ACETATE 20MG/ML INJ,SUSP
+"DATA",176.112,28082,1)
+238759
+"DATA",176.112,28083,0)
+4002899^HYDROCORTISONE NA SUCCINATE 50MG/ML INJ,SOLN
+"DATA",176.112,28083,1)
+238755
+"DATA",176.112,28084,0)
+4002933^HYDROCORTISONE NA SUCCINATE 100MG/VIL INJ,SOLN
+"DATA",176.112,28084,1)
+238755
+"DATA",176.112,28085,0)
+4002895^HYDROCORTISONE NA PHOSPHATE 50MG/ML INJ,SOLN
+"DATA",176.112,28085,1)
+238755
+"DATA",176.112,28086,0)
+4002892^HYDROCORTISONE ACETATE 25MG/ML INJ,SUSP
+"DATA",176.112,28086,1)
+238754
+"DATA",176.112,28087,0)
+4006964^ETIDRONATE DISODIUM 50MG/ML INJ
+"DATA",176.112,28087,1)
+238753
+"DATA",176.112,28088,0)
+4002322^LEVOTHYROXINE NA 0.2MG TAB
+"DATA",176.112,28088,1)
+238752
+"DATA",176.112,28089,0)
+4002320^LEVOTHYROXINE NA 0.15MG TAB
+"DATA",176.112,28089,1)
+238751
+"DATA",176.112,28090,0)
+4002330^LEVOTHYROXINE NA 0.125MG TAB
+"DATA",176.112,28090,1)
+238750
+"DATA",176.112,28091,0)
+4002334^LEVOTHYROXINE NA 0.0125MG TAB
+"DATA",176.112,28091,1)
+238750
+"DATA",176.112,28092,0)
+4002321^LEVOTHYROXINE NA 0.1MG TAB
+"DATA",176.112,28092,1)
+238749
+"DATA",176.112,28093,0)
+4002329^LEVOTHYROXINE NA 0.075MG TAB
+"DATA",176.112,28093,1)
+238748
+"DATA",176.112,28094,0)
+4002328^LEVOTHYROXINE NA 0.05MG TAB
+"DATA",176.112,28094,1)
+238747
+"DATA",176.112,28095,0)
+4002327^LEVOTHYROXINE NA 0.025MG TAB
+"DATA",176.112,28095,1)
+238746
+"DATA",176.112,28096,0)
+4002325^LEVOTHYROXINE NA 200MCG/VIL INJ
+"DATA",176.112,28096,1)
+238745
+"DATA",176.112,28097,0)
+4002324^LEVOTHYROXINE NA 500MCG/VIL INJ
+"DATA",176.112,28097,1)
+238745
+"DATA",176.112,28098,0)
+4006366^DESMOPRESSIN ACETATE 4MCG/ML INJ,AMP,1ML
+"DATA",176.112,28098,1)
+238736
+"DATA",176.112,28099,0)
+4006363^DESMOPRESSIN ACETATE 4MCG/ML INJ
+"DATA",176.112,28099,1)
+238736
+"DATA",176.112,28100,0)
+4000935^PROTAMINE SO4 10MG/ML INJ
+"DATA",176.112,28100,1)
+238734
+"DATA",176.112,28101,0)
+4000936^PROTAMINE SO4 10MG/ML (PF) INJ
+"DATA",176.112,28101,1)
+238734
+"DATA",176.112,28102,0)
+4004909^STREPTOKINASE 250000UNT/VIL INJ
+"DATA",176.112,28102,1)
+238721
+"DATA",176.112,28103,0)
+4010612^TRANEXAMIC ACID 100MG/ML INJ
+"DATA",176.112,28103,1)
+238720
+"DATA",176.112,28104,0)
+4010613^TRANEXAMIC ACID 100MG/ML INJ,AMP,10ML
+"DATA",176.112,28104,1)
+238720
+"DATA",176.112,28105,0)
+4002768^AMINOCAPROIC ACID 250MG/ML INJ
+"DATA",176.112,28105,1)
+238719
+"DATA",176.112,28106,0)
+4006074^HEMIN 313MG/VIL INJ
+"DATA",176.112,28106,1)
+238657
+"DATA",176.112,28107,0)
+4003890^DEXTRAN-1,150MG/ML INJ
+"DATA",176.112,28107,1)
+238645
+"DATA",176.112,28108,0)
+4003897^ALBUMIN,HUMAN 5% INJ
+"DATA",176.112,28108,1)
+238644
+"DATA",176.112,28109,0)
+4003898^ALBUMIN,HUMAN 25% INJ
+"DATA",176.112,28109,1)
+238643
+"DATA",176.112,28110,0)
+4005148^PLASMA PROTEIN FRACTION 5% INJ
+"DATA",176.112,28110,1)
+238641
+"DATA",176.112,28111,0)
+4024988^UREA 40% OINT,TOP
+"DATA",176.112,28111,1)
+238636
+"DATA",176.112,28112,0)
+4004162^SELENIUM SULFIDE 2.5% SHAMPOO
+"DATA",176.112,28112,1)
+238600
+"DATA",176.112,28113,0)
+4004166^SELENIUM SULFIDE 2.5% SUSP,TOP
+"DATA",176.112,28113,1)
+238600
+"DATA",176.112,28114,0)
+4010073^MENTHOL 0.5%/SELENIUM SULFIDE 1% SHAMPOO
+"DATA",176.112,28114,1)
+238581
+"DATA",176.112,28115,0)
+4005848^SALICYLIC ACID 10% CREAM,TOP
+"DATA",176.112,28115,1)
+238460
+"DATA",176.112,28116,0)
+4016716^ZINC OXIDE 25% OINT,TOP
+"DATA",176.112,28116,1)
+238405
+"DATA",176.112,28117,0)
+4003216^HYALURONIDASE 150UNT/ML INJ
+"DATA",176.112,28117,1)
+238271
+"DATA",176.112,28118,0)
+4008452^ESMOLOL HCL 10MG/ML INJ
+"DATA",176.112,28118,1)
+238246
+"DATA",176.112,28119,0)
+4024570^ESMOLOL HCL 10MG/ML/NACL INJ,250ML
+"DATA",176.112,28119,1)
+238246
+"DATA",176.112,28120,0)
+4008451^ESMOLOL HCL 250MG/ML INJ
+"DATA",176.112,28120,1)
+238245
+"DATA",176.112,28121,0)
+4004610^METOPROLOL TARTRATE 1MG/ML INJ
+"DATA",176.112,28121,1)
+238243
+"DATA",176.112,28122,0)
+4002385^PROPRANOLOL HCL 80MG/ML DROPS,ORAL
+"DATA",176.112,28122,1)
+238242
+"DATA",176.112,28123,0)
+4002382^PROPRANOLOL HCL 1MG/ML INJ
+"DATA",176.112,28123,1)
+238241
+"DATA",176.112,28124,0)
+4006544^TOLAZOLINE HCL 25MG/ML INJ
+"DATA",176.112,28124,1)
+238240
+"DATA",176.112,28125,0)
+4006599^LABETALOL HCL 5MG/ML INJ
+"DATA",176.112,28125,1)
+238238
+"DATA",176.112,28126,0)
+4005178^PSEUDOEPHEDRINE HCL 9.4MG/ML DROPS,ORAL
+"DATA",176.112,28126,1)
+238236
+"DATA",176.112,28127,0)
+4003218^MEPHENTERMINE SO4 30MG/ML INJ
+"DATA",176.112,28127,1)
+238234
+"DATA",176.112,28128,0)
+4003217^MEPHENTERMINE SO4 15MG/ML INJ
+"DATA",176.112,28128,1)
+238233
+"DATA",176.112,28129,0)
+4004289^PHENYLEPHRINE HCL 10MG/ML INJ
+"DATA",176.112,28129,1)
+238230
+"DATA",176.112,28130,0)
+4005668^RITODRINE HCL 15MG/ML INJ
+"DATA",176.112,28130,1)
+238225
+"DATA",176.112,28131,0)
+4005666^RITODRINE HCL 10MG/ML INJ
+"DATA",176.112,28131,1)
+238224
+"DATA",176.112,28132,0)
+4006516^METHOXAMINE HCL 20MG/ML INJ
+"DATA",176.112,28132,1)
+238223
+"DATA",176.112,28133,0)
+4003111^DEXTROAMPHETAMINE SO4 5MG TAB
+"DATA",176.112,28133,1)
+238222
+"DATA",176.112,28134,0)
+4003113^DEXTROAMPHETAMINE SO4 10MG TAB
+"DATA",176.112,28134,1)
+238221
+"DATA",176.112,28135,0)
+4005823^DOPAMINE HCL 80MG/ML INJ
+"DATA",176.112,28135,1)
+238219
+"DATA",176.112,28136,0)
+4005822^DOPAMINE HCL 40MG/ML INJ
+"DATA",176.112,28136,1)
+238218
+"DATA",176.112,28137,0)
+4005824^DOPAMINE HCL 160MG/ML INJ
+"DATA",176.112,28137,1)
+238217
+"DATA",176.112,28138,0)
+4004719^GLYCOPYRROLATE 0.2MG/ML INJ
+"DATA",176.112,28138,1)
+238212
+"DATA",176.112,28139,0)
+4006720^HYOSCYAMINE SO4 0.125MG TAB,SUBLINGUAL
+"DATA",176.112,28139,1)
+238211
+"DATA",176.112,28140,0)
+4006718^HYOSCYAMINE SO4 0.13MG TAB
+"DATA",176.112,28140,1)
+238210
+"DATA",176.112,28141,0)
+4006713^HYOSCYAMINE SO4 0.5MG/ML INJ
+"DATA",176.112,28141,1)
+238209
+"DATA",176.112,28142,0)
+4000638^ATROPINE SO4 1MG/ML INJ
+"DATA",176.112,28142,1)
+238206
+"DATA",176.112,28143,0)
+4000648^ATROPINE SO4 1MG/ML INJ,AMP,1ML
+"DATA",176.112,28143,1)
+238206
+"DATA",176.112,28144,0)
+4000649^ATROPINE SO4 0.2MG/0.5ML INJ,AMP,0.5ML
+"DATA",176.112,28144,1)
+238203
+"DATA",176.112,28145,0)
+4000625^ATROPINE SO4 0.4MG/ML INJ
+"DATA",176.112,28145,1)
+238203
+"DATA",176.112,28146,0)
+4002274^EDROPHONIUM CL 10MG/ML INJ
+"DATA",176.112,28146,1)
+238193
+"DATA",176.112,28147,0)
+4002170^PYRIDOSTIGMINE BR 5MG/ML INJ
+"DATA",176.112,28147,1)
+238192
+"DATA",176.112,28148,0)
+4005514^PHYSOSTIGMINE SALICYLATE 1MG/ML INJ,AMP,2ML
+"DATA",176.112,28148,1)
+238191
+"DATA",176.112,28149,0)
+4005512^PHYSOSTIGMINE SALICYLATE 1MG/ML INJ
+"DATA",176.112,28149,1)
+238191
+"DATA",176.112,28150,0)
+4002878^BETHANECHOL CL 5MG/ML INJ
+"DATA",176.112,28150,1)
+238185
+"DATA",176.112,28151,0)
+4001941^SUCCINYLCHOLINE CHLORIDE 20MG/ML INJ
+"DATA",176.112,28151,1)
+238179
+"DATA",176.112,28152,0)
+4001942^SUCCINYLCHOLINE CHLORIDE 100MG/ML INJ
+"DATA",176.112,28152,1)
+238178
+"DATA",176.112,28153,0)
+4001944^SUCCINYLCHOLINE CHLORIDE 500MG/VIL INJ
+"DATA",176.112,28153,1)
+238177
+"DATA",176.112,28154,0)
+4001943^SUCCINYLCHOLINE CHLORIDE 50MG/ML INJ,CONC
+"DATA",176.112,28154,1)
+238176
+"DATA",176.112,28155,0)
+4002633^METHOCARBAMOL 100MG/ML INJ
+"DATA",176.112,28155,1)
+238175
+"DATA",176.112,28156,0)
+4002306^BENZTROPINE MESYLATE 1MG/ML INJ
+"DATA",176.112,28156,1)
+238169
+"DATA",176.112,28157,0)
+4002505^PHENYTOIN NA 50MG/ML INJ
+"DATA",176.112,28157,1)
+238168
+"DATA",176.112,28158,0)
+4003384^NALOXONE HCL 1MG/ML INJ
+"DATA",176.112,28158,1)
+238167
+"DATA",176.112,28159,0)
+4003382^NALOXONE HCL 0.4MG/ML INJ
+"DATA",176.112,28159,1)
+238166
+"DATA",176.112,28160,0)
+4003381^NALOXONE HCL 0.02MG/ML INJ
+"DATA",176.112,28160,1)
+238165
+"DATA",176.112,28161,0)
+4003383^NALOXONE HCL 0.02MG/ML (PF) INJ
+"DATA",176.112,28161,1)
+238165
+"DATA",176.112,28162,0)
+4006420^DIHYDROERGOTAMINE MESYLATE 1MG/ML INJ
+"DATA",176.112,28162,1)
+238163
+"DATA",176.112,28163,0)
+4007175^ACETAMINOPHEN 100MG/ML (SF) DROPS,ORAL
+"DATA",176.112,28163,1)
+238159
+"DATA",176.112,28164,0)
+4007165^ACETAMINOPHEN 100MG/ML DROPS,ORAL
+"DATA",176.112,28164,1)
+238159
+"DATA",176.112,28165,0)
+4006432^APAP 325MG/BUTALBITAL 50MG/CAFN 40MG TAB
+"DATA",176.112,28165,1)
+238154
+"DATA",176.112,28166,0)
+4006433^APAP 325MG/BUTALBITAL 50MG/CAFN 40MG CAP
+"DATA",176.112,28166,1)
+238153
+"DATA",176.112,28167,0)
+4009056^MESALAMINE 4GM/60ML SUSP,RTL
+"DATA",176.112,28167,1)
+238151
+"DATA",176.112,28168,0)
+4005750^ASPIRIN 195MG SUPP,RTL
+"DATA",176.112,28168,1)
+238145
+"DATA",176.112,28169,0)
+4005749^ASPIRIN 130MG SUPP,RTL
+"DATA",176.112,28169,1)
+238144
+"DATA",176.112,28170,0)
+4006438^ASA 325MG/BUTALBITAL 50MG/CAFN 40MG TAB
+"DATA",176.112,28170,1)
+238135
+"DATA",176.112,28171,0)
+4006437^ASA 325MG/BUTALBITAL 50MG/CAFN 40MG CAP
+"DATA",176.112,28171,1)
+238134
+"DATA",176.112,28172,0)
+4004346^PENTAZOCINE LACTATE 30MG/ML INJ
+"DATA",176.112,28172,1)
+238133
+"DATA",176.112,28173,0)
+4003838^BUTORPHANOL TARTRATE 2MG/ML INJ
+"DATA",176.112,28173,1)
+238132
+"DATA",176.112,28174,0)
+4003839^BUTORPHANOL TARTRATE 1MG/ML INJ
+"DATA",176.112,28174,1)
+238131
+"DATA",176.112,28175,0)
+4006980^BUPRENORPHINE HCL 0.3MG/ML INJ
+"DATA",176.112,28175,1)
+238129
+"DATA",176.112,28176,0)
+4007651^OXYMORPHONE HCL 1.5MG/ML INJ
+"DATA",176.112,28176,1)
+238116
+"DATA",176.112,28177,0)
+4007650^OXYMORPHONE HCL 1MG/ML INJ
+"DATA",176.112,28177,1)
+238115
+"DATA",176.112,28178,0)
+4003226^MEPERIDINE HCL 75MG/ML INJ
+"DATA",176.112,28178,1)
+238109
+"DATA",176.112,28179,0)
+4006547^PERPHENAZINE 5MG/ML INJ
+"DATA",176.112,28179,1)
+238104
+"DATA",176.112,28180,0)
+4002459^LORAZEPAM 4MG/ML INJ
+"DATA",176.112,28180,1)
+238101
+"DATA",176.112,28181,0)
+4002460^LORAZEPAM 2MG/ML INJ
+"DATA",176.112,28181,1)
+238100
+"DATA",176.112,28182,0)
+4002465^LORAZEPAM 2MG/ML INJ,CARPUJECT,1ML
+"DATA",176.112,28182,1)
+238100
+"DATA",176.112,28183,0)
+4003291^PENTOBARBITAL NA 50MG/ML INJ
+"DATA",176.112,28183,1)
+238090
+"DATA",176.112,28184,0)
+4003888^KETAMINE HCL 50MG/ML INJ
+"DATA",176.112,28184,1)
+238084
+"DATA",176.112,28185,0)
+4003889^KETAMINE HCL 100MG/ML INJ
+"DATA",176.112,28185,1)
+238083
+"DATA",176.112,28186,0)
+4003887^KETAMINE HCL 10MG/ML INJ
+"DATA",176.112,28186,1)
+238082
+"DATA",176.112,28187,0)
+4004709^DOXAPRAM HCL 20MG/ML INJ
+"DATA",176.112,28187,1)
+238071
+"DATA",176.112,28188,0)
+4004198^MEPIVACAINE HCL 2% INJ
+"DATA",176.112,28188,1)
+238040
+"DATA",176.112,28189,0)
+4004309^PROCAINE HCL 2% INJ
+"DATA",176.112,28189,1)
+238031
+"DATA",176.112,28190,0)
+4004313^PROCAINE HCL 1% INJ,AMP,2ML
+"DATA",176.112,28190,1)
+238030
+"DATA",176.112,28191,0)
+4004314^PROCAINE HCL 1% INJ,AMP,6ML
+"DATA",176.112,28191,1)
+238030
+"DATA",176.112,28192,0)
+4004307^PROCAINE HCL 1% INJ
+"DATA",176.112,28192,1)
+238030
+"DATA",176.112,28193,0)
+4007105^ETIDOCAINE HCL 1% INJ
+"DATA",176.112,28193,1)
+238026
+"DATA",176.112,28194,0)
+4013655^OCTOXYNOL-9 1% GEL,VAG
+"DATA",176.112,28194,1)
+238023
+"DATA",176.112,28195,0)
+4010464^NONOXYNOL-9 2% GEL,VAG
+"DATA",176.112,28195,1)
+238021
+"DATA",176.112,28196,0)
+4010463^NONOXYNOL-9 2% GEL,VAG W/APPLICATOR
+"DATA",176.112,28196,1)
+238021
+"DATA",176.112,28197,0)
+4003199^ETHINYL ESTRADIOL 0.03MG/LEVONORGESTREL 0.15MG TAB
+"DATA",176.112,28197,1)
+238019
+"DATA",176.112,28198,0)
+4005245^ETHINYL ESTRADIOL 0.035MG/NORETHINDRONE 0.4MG TAB
+"DATA",176.112,28198,1)
+238015
+"DATA",176.112,28199,0)
+4003530^CARBOPROST 250MCG/TROMETHAMINE 83MCG/ML INJ
+"DATA",176.112,28199,1)
+238014
+"DATA",176.112,28200,0)
+4003309^OXYTOCIN 10UNT/ML INJ
+"DATA",176.112,28200,1)
+238013
+"DATA",176.112,28201,0)
+4006424^METHYLERGONOVINE MALEATE 0.2MG/ML INJ
+"DATA",176.112,28201,1)
+238012
+"DATA",176.112,28202,0)
+4000736^ERGONOVINE MALEATE 0.2MG/ML INJ
+"DATA",176.112,28202,1)
+238011
+"DATA",176.112,28203,0)
+4002355^MEDROXYPROGESTERONE ACETATE 5MG TAB
+"DATA",176.112,28203,1)
+238010
+"DATA",176.112,28204,0)
+4002353^MEDROXYPROGESTERONE ACETATE 2.5MG TAB
+"DATA",176.112,28204,1)
+238009
+"DATA",176.112,28205,0)
+4002352^MEDROXYPROGESTERONE ACETATE 10MG TAB
+"DATA",176.112,28205,1)
+238008
+"DATA",176.112,28206,0)
+4005022^ESTROGENS,ESTERIFIED 0.625MG/METHYLTESTOSTERONE 1.25MG TAB
+"DATA",176.112,28206,1)
+238006
+"DATA",176.112,28207,0)
+4001697^ESTRADIOL CYPIONATE 2MG/TESTOSTERONE CYPIONATE 50MG/ML INJ
+"DATA",176.112,28207,1)
+238005
+"DATA",176.112,28208,0)
+4001668^ESTRADIOL 0.05MG/24HRS PATCH
+"DATA",176.112,28208,1)
+238003
+"DATA",176.112,28209,0)
+4001683^IODIPAMIDE MEGLUMINE 52% INJ
+"DATA",176.112,28209,1)
+237989
+"DATA",176.112,28210,0)
+4017022^SINCALIDE 5MCG/VIL INJ
+"DATA",176.112,28210,1)
+237982
+"DATA",176.112,28211,0)
+4008912^PHENOLPHTHALEIN 60MG TAB
+"DATA",176.112,28211,1)
+237941
+"DATA",176.112,28212,0)
+4008380^ALUMINUM HYDROXIDE 200MG/MAGNESIUM HYDROXIDE 200MG TAB,CHEW
+"DATA",176.112,28212,1)
+237872
+"DATA",176.112,28213,0)
+4025425^AL OH 400MG/MG OH 400MG/SIMETHICONE 40MG/5ML LIQUID(ML)
+"DATA",176.112,28213,1)
+237870
+"DATA",176.112,28214,0)
+4025424^AL OH 400MG/MG OH 400MG/SIMETHICONE 40MG/5ML LIQUID(780ML)
+"DATA",176.112,28214,1)
+237870
+"DATA",176.112,28215,0)
+4025423^AL OH 400MG/MG OH 400MG/SIMETHICONE 40MG/5ML LIQUID(360ML)
+"DATA",176.112,28215,1)
+237870
+"DATA",176.112,28216,0)
+4007294^STANNOUS FLUORIDE 0.4% GEL
+"DATA",176.112,28216,1)
+237847
+"DATA",176.112,28217,0)
+4004928^SODIUM FLUORIDE 1.1% GEL,DENT
+"DATA",176.112,28217,1)
+237844
+"DATA",176.112,28218,0)
+4004931^SODIUM FLUORIDE 1.1% GEL
+"DATA",176.112,28218,1)
+237844
+"DATA",176.112,28219,0)
+4001607^TRIAMCINOLONE ACETONIDE 0.1% PASTE,DENTAL
+"DATA",176.112,28219,1)
+237841
+"DATA",176.112,28220,0)
+4009012^CHARCOAL,ACTIVATED 260MG CAP
+"DATA",176.112,28220,1)
+237836
+"DATA",176.112,28221,0)
+4009010^CHARCOAL 260MG CAP,ORAL
+"DATA",176.112,28221,1)
+237836
+"DATA",176.112,28222,0)
+4009150^SODIUM THIOSULFATE 250MG/ML INJ
+"DATA",176.112,28222,1)
+237832
+"DATA",176.112,28223,0)
+4006281^EDETATE DISODIUM 150MG/ML INJ
+"DATA",176.112,28223,1)
+237830
+"DATA",176.112,28224,0)
+4006491^LEUCOVORIN CALCIUM 350MG/VIL (PF) INJ
+"DATA",176.112,28224,1)
+237788
+"DATA",176.112,28225,0)
+4001201^FOLIC ACID 5MG/ML INJ
+"DATA",176.112,28225,1)
+237786
+"DATA",176.112,28226,0)
+4007759^VITAMIN E 400UNT CAP
+"DATA",176.112,28226,1)
+237735
+"DATA",176.112,28227,0)
+4004225^ERGOCALCIFEROL 8000UNT/ML DROPS,ORAL
+"DATA",176.112,28227,1)
+237723
+"DATA",176.112,28228,0)
+4004205^DEXTROSE 70% INJ
+"DATA",176.112,28228,1)
+237656
+"DATA",176.112,28229,0)
+4004210^DEXTROSE 60% INJ
+"DATA",176.112,28229,1)
+237654
+"DATA",176.112,28230,0)
+4004207^DEXTROSE 50% INJ
+"DATA",176.112,28230,1)
+237653
+"DATA",176.112,28231,0)
+4004209^DEXTROSE 40% INJ
+"DATA",176.112,28231,1)
+237650
+"DATA",176.112,28232,0)
+4004208^DEXTROSE 20% INJ
+"DATA",176.112,28232,1)
+237649
+"DATA",176.112,28233,0)
+4004203^DEXTROSE 10% INJ
+"DATA",176.112,28233,1)
+237648
+"DATA",176.112,28234,0)
+4004206^DEXTROSE 2.5% INJ
+"DATA",176.112,28234,1)
+237631
+"DATA",176.112,28235,0)
+4001464^INSULIN,ULTRALENTE,HUMAN 100UNT/ML INJ
+"DATA",176.112,28235,1)
+237528
+"DATA",176.112,28236,0)
+4001452^INSULIN,LENTE,HUMAN 100UNT/ML INJ
+"DATA",176.112,28236,1)
+237527
+"DATA",176.112,28237,0)
+4005118^MANGANESE SO4 0.1MG/ML INJ
+"DATA",176.112,28237,1)
+237522
+"DATA",176.112,28238,0)
+4005117^MANGANESE CHLORIDE 0.1MG/ML INJ
+"DATA",176.112,28238,1)
+237521
+"DATA",176.112,28239,0)
+4006987^ZINC SO4 5MG/ML INJ
+"DATA",176.112,28239,1)
+237512
+"DATA",176.112,28240,0)
+4006986^ZINC SO4 1MG/ML INJ
+"DATA",176.112,28240,1)
+237511
+"DATA",176.112,28241,0)
+4005122^ZINC CHLORIDE 1MG/ML INJ
+"DATA",176.112,28241,1)
+237508
+"DATA",176.112,28242,0)
+4000965^MAGNESIUM SO4 1MEQ/ML INJ
+"DATA",176.112,28242,1)
+237444
+"DATA",176.112,28243,0)
+4000967^MAGNESIUM SO4 0.8MEQ/ML INJ
+"DATA",176.112,28243,1)
+237443
+"DATA",176.112,28244,0)
+4016135^MAGNESIUM SO4 8MEQ/100ML INJ,BAG
+"DATA",176.112,28244,1)
+237443
+"DATA",176.112,28245,0)
+4001157^CALCIUM GLUCEPTATE 220MG/ML INJ
+"DATA",176.112,28245,1)
+237424
+"DATA",176.112,28246,0)
+4026906^POTASSIUM GLUCONATE 2MEQ TAB
+"DATA",176.112,28246,1)
+237393
+"DATA",176.112,28247,0)
+4005909^POTASSIUM ACETATE 4MEQ/ML (PF) INJ
+"DATA",176.112,28247,1)
+237382
+"DATA",176.112,28248,0)
+4005906^POTASSIUM ACETATE 4MEQ/ML INJ
+"DATA",176.112,28248,1)
+237382
+"DATA",176.112,28249,0)
+4005907^POTASSIUM ACETATE 2MEQ/ML INJ
+"DATA",176.112,28249,1)
+237381
+"DATA",176.112,28250,0)
+4005908^POTASSIUM ACETATE 2MEQ/ML (PF) INJ
+"DATA",176.112,28250,1)
+237381
+"DATA",176.112,28251,0)
+4006048^SODIUM LACTATE 5MEQ/ML INJ,CONC
+"DATA",176.112,28251,1)
+237378
+"DATA",176.112,28252,0)
+4001071^SODIUM CHLORIDE 0.45% INJ
+"DATA",176.112,28252,1)
+237372
+"DATA",176.112,28253,0)
+4006288^SODIUM ACETATE 2MEQ/ML (PF) INJ
+"DATA",176.112,28253,1)
+237371
+"DATA",176.112,28254,0)
+4006285^SODIUM ACETATE 2MEQ/ML INJ
+"DATA",176.112,28254,1)
+237371
+"DATA",176.112,28255,0)
+4007222^POTASSIUM CHLORIDE 40MEQ/L/NACL 0.9% INJ
+"DATA",176.112,28255,1)
+237367
+"DATA",176.112,28256,0)
+4007012^APAP 325MG/CTM 4MG/P-PROPANOL 40MG TAB,SA
+"DATA",176.112,28256,1)
+237325
+"DATA",176.112,28257,0)
+4007874^GUAIFENESIN 300MG SPRINKLE CAP,SA
+"DATA",176.112,28257,1)
+237248
+"DATA",176.112,28258,0)
+4003533^ALPROSTADIL 500MCG/ML INJ
+"DATA",176.112,28258,1)
+237212
+"DATA",176.112,28259,0)
+4000750^PAPAVERINE HCL 30MG/ML INJ
+"DATA",176.112,28259,1)
+237210
+"DATA",176.112,28260,0)
+4001252^NITROGLYCERIN 5MG/ML (PF) INJ
+"DATA",176.112,28260,1)
+237205
+"DATA",176.112,28261,0)
+4001239^NITROGLYCERIN 5MG/ML INJ
+"DATA",176.112,28261,1)
+237205
+"DATA",176.112,28262,0)
+4002474^CLONIDINE 0.2MG/24HRS PATCH
+"DATA",176.112,28262,1)
+237193
+"DATA",176.112,28263,0)
+4002872^CHLOROTHIAZIDE 250MG/RESERPINE 0.125MG TAB
+"DATA",176.112,28263,1)
+237192
+"DATA",176.112,28264,0)
+4002638^HYDRALAZINE HCL 20MG/ML INJ
+"DATA",176.112,28264,1)
+237191
+"DATA",176.112,28265,0)
+4001727^PROCAINAMIDE HCL 500MG/ML INJ
+"DATA",176.112,28265,1)
+237190
+"DATA",176.112,28266,0)
+4001725^PROCAINAMIDE HCL 100MG/ML INJ
+"DATA",176.112,28266,1)
+237189
+"DATA",176.112,28267,0)
+4000675^QUINIDINE GLUCONATE 80MG/ML INJ
+"DATA",176.112,28267,1)
+237188
+"DATA",176.112,28268,0)
+4003259^EPINEPHRINE HCL 10MG/ML SOLN,INHL
+"DATA",176.112,28268,1)
+237187
+"DATA",176.112,28269,0)
+4003686^THEOPHYLLINE,ANHYDROUS 100MG TAB,SA
+"DATA",176.112,28269,1)
+237178
+"DATA",176.112,28270,0)
+4003657^THEOPHYLLINE 100MG TAB,SA
+"DATA",176.112,28270,1)
+237178
+"DATA",176.112,28271,0)
+4003337^DIGOXIN 0.5MG TAB
+"DATA",176.112,28271,1)
+237169
+"DATA",176.112,28272,0)
+4003341^DIGOXIN 0.1MG CAP
+"DATA",176.112,28272,1)
+237166
+"DATA",176.112,28273,0)
+4003340^DIGOXIN 0.05MG CAP
+"DATA",176.112,28273,1)
+237165
+"DATA",176.112,28274,0)
+4016511^ALPROSTADIL 40MCG/CARTRIDGE INJ,SYSTEM
+"DATA",176.112,28274,1)
+226921
+"DATA",176.112,28275,0)
+4017395^ESTRADIOL 0.06% GEL,TRANSDERMAL
+"DATA",176.112,28275,1)
+226597
+"DATA",176.112,28276,0)
+4002822^DEXAMETHASONE NA PHOSPHATE 0.1% SOLN,OPH
+"DATA",176.112,28276,1)
+226343
+"DATA",176.112,28277,0)
+4006819^CIMETIDINE HCL 300MG/5ML LIQUID,ORAL
+"DATA",176.112,28277,1)
+212787
+"DATA",176.112,28278,0)
+4001063^THIAMINE HCL 500MG TAB
+"DATA",176.112,28278,1)
+212470
+"DATA",176.112,28279,0)
+4009469^ASA 325MG/CA CARB 158MG/MG CARB 34MG/MG OXIDE 63MG TAB
+"DATA",176.112,28279,1)
+212033
+"DATA",176.112,28280,0)
+4009984^AL OH 300MG/ASA 325MG/MG OH 300MG TAB
+"DATA",176.112,28280,1)
+212033
+"DATA",176.112,28281,0)
+4008410^AL OH 75MG/ASA 325MG/CA CARB 75MG/MG OH 75MG TAB
+"DATA",176.112,28281,1)
+212033
+"DATA",176.112,28282,0)
+4009983^AL OH 150MG/ASA 325MG/MG OH 150MG TAB
+"DATA",176.112,28282,1)
+212033
+"DATA",176.112,28283,0)
+4005735^ASPIRIN 325MG TAB
+"DATA",176.112,28283,1)
+212033
+"DATA",176.112,28284,0)
+4012115^ASPIRIN 325MG/MAGNESIUM OXIDE TAB
+"DATA",176.112,28284,1)
+212033
+"DATA",176.112,28285,0)
+4009234^ASPIRIN 325MG/MAGNESIUM CARBONATE TAB
+"DATA",176.112,28285,1)
+212033
+"DATA",176.112,28286,0)
+4005767^ASPIRIN 325MG BUFFERED TAB
+"DATA",176.112,28286,1)
+212033
+"DATA",176.112,28287,0)
+4009470^ASA 325MG/CA CARB/MG CARB/MG OXIDE TAB
+"DATA",176.112,28287,1)
+212033
+"DATA",176.112,28288,0)
+4009982^AL OH/ASA 325MG/MG OH TAB
+"DATA",176.112,28288,1)
+212033
+"DATA",176.112,28289,0)
+4008411^AL OH 50MG/ASA 325MG/CA CARB/MG OH 50MG TAB
+"DATA",176.112,28289,1)
+212033
+"DATA",176.112,28290,0)
+4009985^AL OH 75MG/ASA 325MG/MG OH 75MG TAB
+"DATA",176.112,28290,1)
+212033
+"DATA",176.112,28291,0)
+4005768^ASPIRIN 325MG TAB,UD
+"DATA",176.112,28291,1)
+212033
+"DATA",176.112,28292,0)
+4006416^B-DONNA 0.2MG/ERGOTAMINE 0.6MG/PHENOBARB 40MG TAB,SA
+"DATA",176.112,28292,1)
+210544
+"DATA",176.112,28293,0)
+4007763^VITAMIN E 100UNT CAP
+"DATA",176.112,28293,1)
+210467
+"DATA",176.112,28294,0)
+4009017^PYRITHIONE ZN 1% SHAMPOO
+"DATA",176.112,28294,1)
+209884
+"DATA",176.112,28295,0)
+4009703^ZINC PYRITHONE 1% SHAMPOO
+"DATA",176.112,28295,1)
+209884
+"DATA",176.112,28296,0)
+4001182^NEOMYCIN SO4 0.5% OINT,TOP
+"DATA",176.112,28296,1)
+209765
+"DATA",176.112,28297,0)
+4000691^THYROID 120MG TAB
+"DATA",176.112,28297,1)
+208545
+"DATA",176.112,28298,0)
+4002583^DICYCLOMINE HCL 10MG/ML INJ
+"DATA",176.112,28298,1)
+207810
+"DATA",176.112,28299,0)
+4008587^DICLOFENAC NA 50MG TAB,EC,UD
+"DATA",176.112,28299,1)
+207756
+"DATA",176.112,28300,0)
+4008581^DICLOFENAC NA 50MG TAB,EC
+"DATA",176.112,28300,1)
+207756
+"DATA",176.112,28301,0)
+4000807^PENICILLIN G K 20MILLION UNT/VIL INJ
+"DATA",176.112,28301,1)
+207390
+"DATA",176.112,28302,0)
+4007411^PENICILLIN G K 20000UNT/ML/DEXTROSE 5% INJ
+"DATA",176.112,28302,1)
+207390
+"DATA",176.112,28303,0)
+4002785^MINOCYCLINE HCL 100MG TAB
+"DATA",176.112,28303,1)
+207364
+"DATA",176.112,28304,0)
+4002784^MINOCYCLINE HCL 50MG TAB
+"DATA",176.112,28304,1)
+207362
+"DATA",176.112,28305,0)
+4006321^FENTANYL CITRATE 50MCG/ML INJ
+"DATA",176.112,28305,1)
+206977
+"DATA",176.112,28306,0)
+4006114^METHAMPHETAMINE HCL 10MG TAB
+"DATA",176.112,28306,1)
+206861
+"DATA",176.112,28307,0)
+4000760^METHADONE HCL 10MG/ML INJ
+"DATA",176.112,28307,1)
+206860
+"DATA",176.112,28308,0)
+4013295^METHADONE HCL 10MG/ML INJ,AMP,1ML
+"DATA",176.112,28308,1)
+206860
+"DATA",176.112,28309,0)
+4002307^ISOSORBIDE DINITRATE 20MG TAB,ORAL
+"DATA",176.112,28309,1)
+206842
+"DATA",176.112,28310,0)
+4002866^CORTISONE ACETATE 50MG/ML INJ,SUSP
+"DATA",176.112,28310,1)
+206445
+"DATA",176.112,28311,0)
+4000665^CODEINE PO4 60MG/ML (PF) INJ
+"DATA",176.112,28311,1)
+206200
+"DATA",176.112,28312,0)
+4000660^CODEINE PO4 60MG/ML INJ
+"DATA",176.112,28312,1)
+206200
+"DATA",176.112,28313,0)
+4003481^CLINDAMYCIN PO4 150MG/ML INJ,ADD-VANTAGE,6ML
+"DATA",176.112,28313,1)
+205964
+"DATA",176.112,28314,0)
+4003483^CLINDAMYCIN PO4 150MG/ML INJ,ADD-VANTAGE,4ML
+"DATA",176.112,28314,1)
+205964
+"DATA",176.112,28315,0)
+4003480^CLINDAMYCIN PO4 150MG/ML INJ,VIL,2ML
+"DATA",176.112,28315,1)
+205964
+"DATA",176.112,28316,0)
+4003472^CLINDAMYCIN PO4 150MG/ML INJ
+"DATA",176.112,28316,1)
+205964
+"DATA",176.112,28317,0)
+4001892^FLUPHENAZINE HCL 2.5MG/ML INJ
+"DATA",176.112,28317,1)
+205581
+"DATA",176.112,28318,0)
+4005564^ANTHRALIN 0.25% CREAM,TOP
+"DATA",176.112,28318,1)
+205368
+"DATA",176.112,28319,0)
+4007865^APAP 325MG/DM 15MG/GG 100MG/P-PROPANOL 25MG TAB
+"DATA",176.112,28319,1)
+205367
+"DATA",176.112,28320,0)
+4005703^CHLORTHALIDONE 50MG/RESERPINE 0.25MG TAB
+"DATA",176.112,28320,1)
+205365
+"DATA",176.112,28321,0)
+4005704^CHLORTHALIDONE 25MG/RESERPINE 0.125MG TAB
+"DATA",176.112,28321,1)
+205364
+"DATA",176.112,28322,0)
+4007013^APAP 500MG/CTM 4MG/P-PROPANOL 25MG TAB
+"DATA",176.112,28322,1)
+205362
+"DATA",176.112,28323,0)
+4006331^BRETYLIUM TOSYLATE 50MG/ML INJ
+"DATA",176.112,28323,1)
+205359
+"DATA",176.112,28324,0)
+4009099^CEFMETAZOLE NA 2GM/VIL INJ
+"DATA",176.112,28324,1)
+205358
+"DATA",176.112,28325,0)
+4009098^CEFMETAZOLE NA 1GM/VIL INJ
+"DATA",176.112,28325,1)
+205357
+"DATA",176.112,28326,0)
+4005380^CHLORPHENIRAMINE 4MG/PSEUDOEPHEDRINE 60MG TAB
+"DATA",176.112,28326,1)
+205356
+"DATA",176.112,28327,0)
+4012822^ALENDRONATE 40MG TAB
+"DATA",176.112,28327,1)
+205354
+"DATA",176.112,28328,0)
+4004800^CTM 4MG/P-EPHRINE 10MG/P-PROPANOL 50MG/PYRILAMINE 25MG TAB,SA
+"DATA",176.112,28328,1)
+205352
+"DATA",176.112,28329,0)
+4003831^CTM 5MG/P-EPHRINE 10MG/P-PROPANOL 40MG/P-TOLOXAMINE 15MG TAB
+"DATA",176.112,28329,1)
+205347
+"DATA",176.112,28330,0)
+4003827^CTM 5MG/P-EPHRINE 10MG/P-PROPANOL 40MG/P-TOLOXAMINE 15MG TAB,SA
+"DATA",176.112,28330,1)
+205347
+"DATA",176.112,28331,0)
+4008461^CARTEOLOL 5MG TAB
+"DATA",176.112,28331,1)
+205345
+"DATA",176.112,28332,0)
+4008460^CARTEOLOL 2.5MG TAB
+"DATA",176.112,28332,1)
+205344
+"DATA",176.112,28333,0)
+4009091^ADENOSINE 3MG/ML INJ,VIL,20ML
+"DATA",176.112,28333,1)
+205343
+"DATA",176.112,28334,0)
+4009089^ADENOSINE 3MG/ML INJ,VIL 2ML
+"DATA",176.112,28334,1)
+205343
+"DATA",176.112,28335,0)
+4009090^ADENOSINE 3MG/ML INJ,VIL,30ML
+"DATA",176.112,28335,1)
+205343
+"DATA",176.112,28336,0)
+4009086^ADENOSINE 3MG/ML INJ
+"DATA",176.112,28336,1)
+205343
+"DATA",176.112,28337,0)
+4006200^CARBINOXAMINE MALEATE 4MG/PSEUDOEPHEDRINE 60MG/5ML SYRUP
+"DATA",176.112,28337,1)
+205340
+"DATA",176.112,28338,0)
+4005862^CHLOROXINE 2% SHAMPOO
+"DATA",176.112,28338,1)
+205338
+"DATA",176.112,28339,0)
+4013727^HYDROCODONE 10MG/ACETAMINOPHEN 400MG TAB
+"DATA",176.112,28339,1)
+205334
+"DATA",176.112,28340,0)
+4024996^ESTRADIOL 1.5MG TAB
+"DATA",176.112,28340,1)
+205333
+"DATA",176.112,28341,0)
+4002888^CHLOROTHIAZIDE 150MG/METHYLDOPA 250MG TAB
+"DATA",176.112,28341,1)
+205332
+"DATA",176.112,28342,0)
+4013133^MIGLITOL 100MG TAB
+"DATA",176.112,28342,1)
+205331
+"DATA",176.112,28343,0)
+4013132^MIGLITOL 50MG TAB
+"DATA",176.112,28343,1)
+205330
+"DATA",176.112,28344,0)
+4013131^MIGLITOL 25MG TAB
+"DATA",176.112,28344,1)
+205329
+"DATA",176.112,28345,0)
+4013354^LAMIVUDINE 100MG TAB
+"DATA",176.112,28345,1)
+205328
+"DATA",176.112,28346,0)
+4013728^LISINOPRIL 30MG TAB
+"DATA",176.112,28346,1)
+205326
+"DATA",176.112,28347,0)
+4013567^MODAFINIL 200MG TAB
+"DATA",176.112,28347,1)
+205324
+"DATA",176.112,28348,0)
+4013391^CELECOXIB 200MG CAP,UD
+"DATA",176.112,28348,1)
+205323
+"DATA",176.112,28349,0)
+4013390^CELECOXIB 200MG CAP
+"DATA",176.112,28349,1)
+205323
+"DATA",176.112,28350,0)
+4013389^CELECOXIB 100MG CAP,UD
+"DATA",176.112,28350,1)
+205322
+"DATA",176.112,28351,0)
+4013388^CELECOXIB 100MG CAP
+"DATA",176.112,28351,1)
+205322
+"DATA",176.112,28352,0)
+4013152^FOLLITROPIN BETA 75UNT/VIL INJ
+"DATA",176.112,28352,1)
+205320
+"DATA",176.112,28353,0)
+4013342^TOPIRAMATE 15MG CAP
+"DATA",176.112,28353,1)
+205316
+"DATA",176.112,28354,0)
+4013343^TOPIRAMATE 25MG CAP
+"DATA",176.112,28354,1)
+205315
+"DATA",176.112,28355,0)
+4001447^INSULIN,REGULAR,PORK/PURIFIED CONC 500UNT/ML INJ
+"DATA",176.112,28355,1)
+205314
+"DATA",176.112,28356,0)
+4014195^TELMISARTAN 80MG TAB
+"DATA",176.112,28356,1)
+205305
+"DATA",176.112,28357,0)
+4013428^TELMISARTAN 40MG TAB
+"DATA",176.112,28357,1)
+205304
+"DATA",176.112,28358,0)
+4002620^PREDNISONE 5MG/ML SOLN,CONC
+"DATA",176.112,28358,1)
+205301
+"DATA",176.112,28359,0)
+4013373^EFAVIRENZ 50MG CAP
+"DATA",176.112,28359,1)
+205292
+"DATA",176.112,28360,0)
+4013372^EFAVIRENZ 100MG CAP
+"DATA",176.112,28360,1)
+205291
+"DATA",176.112,28361,0)
+4013371^EFAVIRENZ 200MG CAP
+"DATA",176.112,28361,1)
+205290
+"DATA",176.112,28362,0)
+4007487^COAL TAR 2%/LACTIC ACID 5%/SAL AC 3%/ALCOHOL LOTION
+"DATA",176.112,28362,1)
+205289
+"DATA",176.112,28363,0)
+4013370^LEFLUNOMIDE 100MG TAB,PKT,3
+"DATA",176.112,28363,1)
+205286
+"DATA",176.112,28364,0)
+4013369^LEFLUNOMIDE 20MG TAB
+"DATA",176.112,28364,1)
+205285
+"DATA",176.112,28365,0)
+4013368^LEFLUNOMIDE 10MG TAB
+"DATA",176.112,28365,1)
+205284
+"DATA",176.112,28366,0)
+4007126^DIHYDROCODEINE 3MG/CTM 5MG/P-EPHRINE 20MG/P-PROPANOL 20MG/5ML SY
+"DATA",176.112,28366,1)
+205277
+"DATA",176.112,28367,0)
+4006914^EPHEDRINE HCL 8MG/POTASSIUM IODIDE 150MG/5ML SYRUP
+"DATA",176.112,28367,1)
+205275
+"DATA",176.112,28368,0)
+4013281^INTERFERON ALFA-2B,RECOMBINANT 3MILLION UNT/0.2ML INJ,PEN,1.5ML
+"DATA",176.112,28368,1)
+205270
+"DATA",176.112,28369,0)
+4002002^DIPHTHERIA TOXOID 2UNT/TETANUS TOXOID 10UNT/0.5ML ADSORBED INJ
+"DATA",176.112,28369,1)
+205257
+"DATA",176.112,28370,0)
+4015078^TIROFIBAN HCL 50MCG/ML INJ,BAG,250ML
+"DATA",176.112,28370,1)
+205253
+"DATA",176.112,28371,0)
+4013219^TIROFIBAN HCL 50MCG/ML INJ,BAG,500ML
+"DATA",176.112,28371,1)
+205253
+"DATA",176.112,28372,0)
+4006384^NIACIN 50MG/5ML ELIXIR
+"DATA",176.112,28372,1)
+205247
+"DATA",176.112,28373,0)
+4015852^CALCIUM CARBONATE 700MG/MAGNESIUM HYDROXIDE 300MG TAB,CHEW
+"DATA",176.112,28373,1)
+205233
+"DATA",176.112,28374,0)
+4004351^CHLORMEZANONE 100MG TAB
+"DATA",176.112,28374,1)
+205230
+"DATA",176.112,28375,0)
+4008725^SULFUR 2% SHAMPOO
+"DATA",176.112,28375,1)
+205217
+"DATA",176.112,28376,0)
+4015645^DIPHENHYDRAMINE HCL 1% GEL,TOP
+"DATA",176.112,28376,1)
+205213
+"DATA",176.112,28377,0)
+4009622^CHLOROPHYLLIN COPPER COMPLEX 14MG TAB
+"DATA",176.112,28377,1)
+205182
+"DATA",176.112,28378,0)
+4006447^CYCLOSPORINE 50MG/ML INJ
+"DATA",176.112,28378,1)
+205175
+"DATA",176.112,28379,0)
+4005853^SALICYLIC ACID 4% SHAMPOO
+"DATA",176.112,28379,1)
+205174
+"DATA",176.112,28380,0)
+4005387^CHLORPHENIRAMINE 2MG/PSEUDOEPHEDRINE 30MG TAB
+"DATA",176.112,28380,1)
+205170
+"DATA",176.112,28381,0)
+4024806^CYCLOSPORINE MODIFIED 50MG CAP
+"DATA",176.112,28381,1)
+205168
+"DATA",176.112,28382,0)
+4006451^CYCLOSPORINE 50MG CAP
+"DATA",176.112,28382,1)
+205168
+"DATA",176.112,28383,0)
+4007223^POTASSIUM CHLORIDE 30MG/SODIUM CHLORIDE 450MG TAB
+"DATA",176.112,28383,1)
+205156
+"DATA",176.112,28384,0)
+4007018^APAP 500MG/CTM 2MG/P-PROPANOL 12.5MG TAB
+"DATA",176.112,28384,1)
+205145
+"DATA",176.112,28385,0)
+4007697^BROMPHENIRAMINE 4MG/PHENYLPROPANOLAMINE 25MG CAP
+"DATA",176.112,28385,1)
+205143
+"DATA",176.112,28386,0)
+4007696^BROMPHENIRAMINE 4MG/PHENYLPROPANOLAMINE 25MG TAB
+"DATA",176.112,28386,1)
+205142
+"DATA",176.112,28387,0)
+4007014^APAP 650MG/CTM 4MG/P-PROPANOL 25MG TAB
+"DATA",176.112,28387,1)
+205140
+"DATA",176.112,28388,0)
+4009711^DIPHENHYDRAMINE 25MG/PSEUDOEPHEDRINE 60MG TAB
+"DATA",176.112,28388,1)
+205136
+"DATA",176.112,28389,0)
+4008713^SALICYLIC ACID 2%/SULFUR 2% LOTION
+"DATA",176.112,28389,1)
+205107
+"DATA",176.112,28390,0)
+4005847^SALICYLIC ACID 2% SHAMPOO
+"DATA",176.112,28390,1)
+205104
+"DATA",176.112,28391,0)
+4005591^COAL TAR 3% SHAMPOO
+"DATA",176.112,28391,1)
+205100
+"DATA",176.112,28392,0)
+4013818^COAL TAR 4.3% SHAMPOO
+"DATA",176.112,28392,1)
+205099
+"DATA",176.112,28393,0)
+4008780^COAL TAR 2%/LANOLIN/MINERAL OIL,TOP
+"DATA",176.112,28393,1)
+205097
+"DATA",176.112,28394,0)
+4003493^CALCIUM GLUCONATE 1GM TAB
+"DATA",176.112,28394,1)
+205082
+"DATA",176.112,28395,0)
+4010306^GADODIAMIDE 287MG/ML INJ
+"DATA",176.112,28395,1)
+205071
+"DATA",176.112,28396,0)
+4004969^HYDROCODONE 10MG/ACETAMINOPHEN 325MG TAB
+"DATA",176.112,28396,1)
+205067
+"DATA",176.112,28397,0)
+4000624^ATROPINE SO4 0.4MG TAB
+"DATA",176.112,28397,1)
+205058
+"DATA",176.112,28398,0)
+4014114^SALICYLIC ACID 3% SHAMPOO
+"DATA",176.112,28398,1)
+205023
+"DATA",176.112,28399,0)
+4008464^CASTOR OIL 36.4% EMULSION,ORAL
+"DATA",176.112,28399,1)
+204938
+"DATA",176.112,28400,0)
+4008467^CASTOR OIL 95% EMULSION,ORAL
+"DATA",176.112,28400,1)
+204937
+"DATA",176.112,28401,0)
+4008468^CASTOR OIL 95% LIQUID
+"DATA",176.112,28401,1)
+204937
+"DATA",176.112,28402,0)
+4008279^CEFUROXIME NA 15MG/ML/NACL 0.9% INJ
+"DATA",176.112,28402,1)
+204929
+"DATA",176.112,28403,0)
+4007420^CEFUROXIME NA 15MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,28403,1)
+204929
+"DATA",176.112,28404,0)
+4001424^CEFUROXIME NA 15MG/ML INJ
+"DATA",176.112,28404,1)
+204929
+"DATA",176.112,28405,0)
+4009705^COAL TAR 0.5%/SALICYLIC ACID 2%/SULFUR 2% CREAM RINSE
+"DATA",176.112,28405,1)
+204925
+"DATA",176.112,28406,0)
+4009704^COAL TAR 0.5%/SALICYLIC ACID 2%/SULFUR 2% SHAMPOO
+"DATA",176.112,28406,1)
+204925
+"DATA",176.112,28407,0)
+4009565^ZINC OXIDE 25% PASTE,TOP
+"DATA",176.112,28407,1)
+204919
+"DATA",176.112,28408,0)
+4003005^WATER,INHL 3ML
+"DATA",176.112,28408,1)
+204918
+"DATA",176.112,28409,0)
+4003008^WATER,INHL 5ML
+"DATA",176.112,28409,1)
+204918
+"DATA",176.112,28410,0)
+4007494^ACETYLCARBROMAL 250MG TAB
+"DATA",176.112,28410,1)
+204907
+"DATA",176.112,28411,0)
+4005747^ASPIRIN 227.5MG GUM,CHEWABLE
+"DATA",176.112,28411,1)
+204897
+"DATA",176.112,28412,0)
+4008194^POVIDONE IODINE 7.5% SHAMPOO
+"DATA",176.112,28412,1)
+204887
+"DATA",176.112,28413,0)
+4007019^APAP 325MG/CTM 2MG/P-PROPANOL 12.5MG TAB
+"DATA",176.112,28413,1)
+204885
+"DATA",176.112,28414,0)
+4007015^APAP 325MG/CTM 2MG/P-PROPANOL 12.5MG CAP
+"DATA",176.112,28414,1)
+204884
+"DATA",176.112,28415,0)
+4005429^HC 1%/N-MYCIN 3.5MG/POLYMYX 10000UNT/ML SUSP,OPH
+"DATA",176.112,28415,1)
+204874
+"DATA",176.112,28416,0)
+4002282^CEFTRIAXONE NA 500MG/VIL INJ
+"DATA",176.112,28416,1)
+204871
+"DATA",176.112,28417,0)
+4002284^CEFTRIAXONE NA 2GM/VIL INJ
+"DATA",176.112,28417,1)
+204871
+"DATA",176.112,28418,0)
+4002283^CEFTRIAXONE NA 1GM/VIL INJ
+"DATA",176.112,28418,1)
+204871
+"DATA",176.112,28419,0)
+4008971^MESNA 100MG/ML INJ
+"DATA",176.112,28419,1)
+204870
+"DATA",176.112,28420,0)
+4008416^IPRATROPIUM BR 0.06% SOLN,SPRAY,NASAL
+"DATA",176.112,28420,1)
+204863
+"DATA",176.112,28421,0)
+4008415^IPRATROPIUM BR 0.03% SOLN,SPRAY,NASAL
+"DATA",176.112,28421,1)
+204862
+"DATA",176.112,28422,0)
+4010160^AZITHROMYCIN 600MG TAB
+"DATA",176.112,28422,1)
+204844
+"DATA",176.112,28423,0)
+4016278^HYDROCODONE 10MG/ACETAMINOPHEN 660MG TAB
+"DATA",176.112,28423,1)
+204842
+"DATA",176.112,28424,0)
+4006368^DESMOPRESSIN 0.2MG TAB
+"DATA",176.112,28424,1)
+204841
+"DATA",176.112,28425,0)
+4006367^DESMOPRESSIN 0.1MG TAB
+"DATA",176.112,28425,1)
+204840
+"DATA",176.112,28426,0)
+4005600^COAL TAR 2% SHAMPOO
+"DATA",176.112,28426,1)
+204836
+"DATA",176.112,28427,0)
+4009630^MALT SOUP EXTRACT 750MG TAB
+"DATA",176.112,28427,1)
+204821
+"DATA",176.112,28428,0)
+4003150^CARAMIPHEN EDISYLATE 40MG/PHENYLPROPANOLAMINE 75MG CAP,SA
+"DATA",176.112,28428,1)
+204796
+"DATA",176.112,28429,0)
+4003071^OXYCODONE HCL 5MG/ACETAMINOPHEN 500MG TAB
+"DATA",176.112,28429,1)
+204783
+"DATA",176.112,28430,0)
+4007523^DM 5MG/GG 50MG/PSEUDEFED 15MG/5ML SYRUP
+"DATA",176.112,28430,1)
+204781
+"DATA",176.112,28431,0)
+4007524^DM 5MG/GG 100MG/PSEUDEFED 15MG/5ML SYRUP
+"DATA",176.112,28431,1)
+204780
+"DATA",176.112,28432,0)
+4008914^PHENOLPHTHALEIN 64.8MG WAFER,ORAL
+"DATA",176.112,28432,1)
+204777
+"DATA",176.112,28433,0)
+4007521^DM 15MG/GG 100MG/PSEUDEFED 30MG/5ML ELIXIR
+"DATA",176.112,28433,1)
+204775
+"DATA",176.112,28434,0)
+4007526^DM 15MG/GG 100MG/PSEUDEFED 30MG/5ML SYRUP
+"DATA",176.112,28434,1)
+204775
+"DATA",176.112,28435,0)
+4007200^DM 10MG/GG 100MG/P-PROPANOL 12.5MG/5ML SYRUP
+"DATA",176.112,28435,1)
+204769
+"DATA",176.112,28436,0)
+4007206^DM 10MG/GG 100MG/P-PROPANOL 12.5MG/5ML (SF & AF) SYRUP
+"DATA",176.112,28436,1)
+204769
+"DATA",176.112,28437,0)
+4010003^APAP 162MG/ASA 162MG/P-PROPANOL 20MG CAP
+"DATA",176.112,28437,1)
+204750
+"DATA",176.112,28438,0)
+4008560^ASCORBIC ACID 250MG/FERROUS FUMARATE 132MG TAB
+"DATA",176.112,28438,1)
+204734
+"DATA",176.112,28439,0)
+4004874^ESTROGENS,CONJUGATED 0.45MG/MEPROBAMATE 400MG TAB
+"DATA",176.112,28439,1)
+204726
+"DATA",176.112,28440,0)
+4010196^APAP 500MG/CTM 2MG/DM 15MG/P-PROPANOL 12.5MG TAB
+"DATA",176.112,28440,1)
+204719
+"DATA",176.112,28441,0)
+4010237^ALLANTOIN 1%/CAMPHOR 0.5%/PHENOL 0.5% OINT,TOP
+"DATA",176.112,28441,1)
+204709
+"DATA",176.112,28442,0)
+4008575^FERROUS GLUCONATE 86MG CAP
+"DATA",176.112,28442,1)
+204705
+"DATA",176.112,28443,0)
+4004875^ESTROGENS,CONJUGATED 0.45MG/MEPROBAMATE 200MG TAB
+"DATA",176.112,28443,1)
+204702
+"DATA",176.112,28444,0)
+4008573^FERROUS GLUCONATE 300MG/5ML ELIXIR
+"DATA",176.112,28444,1)
+204701
+"DATA",176.112,28445,0)
+4004077^CHLORAMPHENICOL 0.5% SOLN,OTIC
+"DATA",176.112,28445,1)
+204699
+"DATA",176.112,28446,0)
+4008463^CASTOR OIL
+"DATA",176.112,28446,1)
+204691
+"DATA",176.112,28447,0)
+4005581^COAL TAR 8.75% SHAMPOO
+"DATA",176.112,28447,1)
+204682
+"DATA",176.112,28448,0)
+4005597^COAL TAR 5% SHAMPOO
+"DATA",176.112,28448,1)
+204681
+"DATA",176.112,28449,0)
+4004169^SELENIUM SULFIDE 1% SHAMPOO
+"DATA",176.112,28449,1)
+204642
+"DATA",176.112,28450,0)
+4008708^SALICYLIC ACID 2%/SULFUR 2% SHAMPOO
+"DATA",176.112,28450,1)
+204638
+"DATA",176.112,28451,0)
+4008235^FERROUS SO4 200MG TAB
+"DATA",176.112,28451,1)
+204632
+"DATA",176.112,28452,0)
+4008253^RIBOFLAVIN 100MG TAB
+"DATA",176.112,28452,1)
+204625
+"DATA",176.112,28453,0)
+4008254^RIBOFLAVIN 50MG TAB
+"DATA",176.112,28453,1)
+204624
+"DATA",176.112,28454,0)
+4008252^RIBOFLAVIN 25MG TAB
+"DATA",176.112,28454,1)
+204623
+"DATA",176.112,28455,0)
+4008251^RIBOFLAVIN 10MG TAB
+"DATA",176.112,28455,1)
+204622
+"DATA",176.112,28456,0)
+4008138^ACETAMINOPHEN 325MG/PHENYLTOLOXAMINE 30MG TAB
+"DATA",176.112,28456,1)
+204612
+"DATA",176.112,28457,0)
+4003551^B-TRACIN 400UNT/N-MYCIN 3.5MG/POLYMYX 5000UNT/GM OINT,TOP
+"DATA",176.112,28457,1)
+204602
+"DATA",176.112,28458,0)
+4009125^MINERAL OIL 1.4GM/5ML EMULSION
+"DATA",176.112,28458,1)
+204579
+"DATA",176.112,28459,0)
+4005917^LIDOCAINE HCL 2%/EPINEPHRINE 1:50000 INJ
+"DATA",176.112,28459,1)
+204566
+"DATA",176.112,28460,0)
+4005914^LIDOCAINE HCL 1%/EPINEPHRINE 1:200000 INJ
+"DATA",176.112,28460,1)
+204565
+"DATA",176.112,28461,0)
+4005911^LIDOCAINE HCL 1.5%/EPINEPHRINE 1:200000 INJ
+"DATA",176.112,28461,1)
+204564
+"DATA",176.112,28462,0)
+4005913^LIDOCAINE HCL 2%/EPINEPHRINE 1:100000 INJ
+"DATA",176.112,28462,1)
+204563
+"DATA",176.112,28463,0)
+4005912^LIDOCAINE HCL 1%/EPINEPHRINE 1:100000 INJ
+"DATA",176.112,28463,1)
+204562
+"DATA",176.112,28464,0)
+4003305^TYPHOID VACCINE 8UNT/ML INJ
+"DATA",176.112,28464,1)
+204555
+"DATA",176.112,28465,0)
+4007374^CUPRIC SO4 1.57MG/ML INJ
+"DATA",176.112,28465,1)
+204537
+"DATA",176.112,28466,0)
+4004355^COPPER 0.4MG/ML INJ
+"DATA",176.112,28466,1)
+204536
+"DATA",176.112,28467,0)
+4005639^PROBUCOL 500MG TAB
+"DATA",176.112,28467,1)
+204535
+"DATA",176.112,28468,0)
+4009072^ZIDOVUDINE 10MG/ML INJ
+"DATA",176.112,28468,1)
+204534
+"DATA",176.112,28469,0)
+4002004^TETANUS TOXOID ADSORBED INJ
+"DATA",176.112,28469,1)
+204527
+"DATA",176.112,28470,0)
+4002001^DIPHTHERIA TOXOID 15UNT/TETANUS TOXOID 10UNT/0.5ML ADSORBED INJ
+"DATA",176.112,28470,1)
+204525
+"DATA",176.112,28471,0)
+4000853^POTASSIUM CHLORIDE 2MEQ/ML INJ
+"DATA",176.112,28471,1)
+204520
+"DATA",176.112,28472,0)
+4000872^POTASSIUM CHLORIDE 20MEQ/ML INJ
+"DATA",176.112,28472,1)
+204520
+"DATA",176.112,28473,0)
+4000864^POTASSIUM CHLORIDE 1.5MEQ/ML INJ
+"DATA",176.112,28473,1)
+204519
+"DATA",176.112,28474,0)
+4005640^TRICHLORMETHIAZIDE 2MG TAB
+"DATA",176.112,28474,1)
+204515
+"DATA",176.112,28475,0)
+4006115^TRIMETHADIONE 300MG CAP
+"DATA",176.112,28475,1)
+204511
+"DATA",176.112,28476,0)
+4002817^DEXAMETHASONE 0.04% AEROSOL,TOP
+"DATA",176.112,28476,1)
+204510
+"DATA",176.112,28477,0)
+4006468^POLYMYXIN B SO4 500000UNT/VIL INJ
+"DATA",176.112,28477,1)
+204509
+"DATA",176.112,28478,0)
+4010177^FLUMAZENIL 0.1MG/ML INJ
+"DATA",176.112,28478,1)
+204508
+"DATA",176.112,28479,0)
+4003338^DIGOXIN 0.1MG/ML INJ
+"DATA",176.112,28479,1)
+204504
+"DATA",176.112,28480,0)
+4000744^DIGITOXIN 0.1MG TAB
+"DATA",176.112,28480,1)
+204503
+"DATA",176.112,28481,0)
+4002844^HYDROCHLOROTHIAZIDE 25MG/RESERPINE 0.125MG TAB
+"DATA",176.112,28481,1)
+204501
+"DATA",176.112,28482,0)
+4000738^DIETHYLSTILBESTROL 5MG TAB
+"DATA",176.112,28482,1)
+204499
+"DATA",176.112,28483,0)
+4000737^DIETHYLSTILBESTROL 1MG TAB
+"DATA",176.112,28483,1)
+204498
+"DATA",176.112,28484,0)
+4010088^PSEUDOEPHEDRINE 120MG/TERFENADINE 60MG TAB,SA
+"DATA",176.112,28484,1)
+204495
+"DATA",176.112,28485,0)
+4007673^SODIUM TETRADECYL SO4 3% INJ
+"DATA",176.112,28485,1)
+204491
+"DATA",176.112,28486,0)
+4007672^SODIUM TETRADECYL SO4 1% INJ
+"DATA",176.112,28486,1)
+204490
+"DATA",176.112,28487,0)
+4008459^NICARDIPINE HCL 2.5MG/ML INJ,AMP,10ML
+"DATA",176.112,28487,1)
+204481
+"DATA",176.112,28488,0)
+4006047^SODIUM LACTATE 1/6 MOLAR INJ
+"DATA",176.112,28488,1)
+204479
+"DATA",176.112,28489,0)
+4006935^PHENIRAMINE 4MG/P-PROPANOL 12.5MG/P-TOLOX 4MG/PYRILAMINE 4MG/5ML
+"DATA",176.112,28489,1)
+204476
+"DATA",176.112,28490,0)
+4006578^DIAZOXIDE 15MG/ML INJ
+"DATA",176.112,28490,1)
+204474
+"DATA",176.112,28491,0)
+4006124^PHENACEMIDE 500MG TAB
+"DATA",176.112,28491,1)
+204473
+"DATA",176.112,28492,0)
+4001947^DIATRIZOATE MEGLUMINE 34.3%/DIATRIZOATE NA 35%/IODINE 37% INJ
+"DATA",176.112,28492,1)
+204472
+"DATA",176.112,28493,0)
+4001541^DIATRIZOATE MEGLUMINE 76% INJ
+"DATA",176.112,28493,1)
+204470
+"DATA",176.112,28494,0)
+4001546^DIATRIZOATE NA 25% INJ
+"DATA",176.112,28494,1)
+204467
+"DATA",176.112,28495,0)
+4007413^PENICILLIN G K 40000UNT/ML/DEXTROSE 5% INJ
+"DATA",176.112,28495,1)
+204466
+"DATA",176.112,28496,0)
+4006121^PARAMETHADIONE 300MG CAP
+"DATA",176.112,28496,1)
+204463
+"DATA",176.112,28497,0)
+4000899^METOCURINE IODIDE 2MG/ML INJ
+"DATA",176.112,28497,1)
+204461
+"DATA",176.112,28498,0)
+4005702^OXAMNIQUINE 250MG CAP
+"DATA",176.112,28498,1)
+204458
+"DATA",176.112,28499,0)
+4012720^NEFAZODONE 250MG TAB
+"DATA",176.112,28499,1)
+204456
+"DATA",176.112,28500,0)
+4012719^NEFAZODONE 200MG TAB
+"DATA",176.112,28500,1)
+204455
+"DATA",176.112,28501,0)
+4012718^NEFAZODONE 150MG TAB
+"DATA",176.112,28501,1)
+204454
+"DATA",176.112,28502,0)
+4012717^NEFAZODONE 100MG TAB
+"DATA",176.112,28502,1)
+204453
+"DATA",176.112,28503,0)
+4002983^METHYLDOPATE HCL 50MG/ML INJ
+"DATA",176.112,28503,1)
+204452
+"DATA",176.112,28504,0)
+4005553^NATAMYCIN 5% SUSP,OPH
+"DATA",176.112,28504,1)
+204451
+"DATA",176.112,28505,0)
+4002035^IODAMIDE MEGLUMINE 65% INJ
+"DATA",176.112,28505,1)
+204449
+"DATA",176.112,28506,0)
+4002997^FAMOTIDINE 10MG/ML INJ
+"DATA",176.112,28506,1)
+204441
+"DATA",176.112,28507,0)
+4004894^CICLOPIROX OLAMINE 1% LOTION,TOP
+"DATA",176.112,28507,1)
+204439
+"DATA",176.112,28508,0)
+4006711^ISOPROTERENOL HCL 0.16MG/PHENYLEPHRINE 0.24MG/SPRAY
+"DATA",176.112,28508,1)
+204436
+"DATA",176.112,28509,0)
+4003063^MEPROBAMATE 600MG TAB
+"DATA",176.112,28509,1)
+204434
+"DATA",176.112,28510,0)
+4006275^ETHOTOIN 500MG TAB
+"DATA",176.112,28510,1)
+204433
+"DATA",176.112,28511,0)
+4006255^HEPARIN NA 2UNT/ML/DEXTROSE 5% INJ
+"DATA",176.112,28511,1)
+204431
+"DATA",176.112,28512,0)
+4003352^HEPARIN NA 2UNT/ML/NACL 0.9% INJ
+"DATA",176.112,28512,1)
+204431
+"DATA",176.112,28513,0)
+4001193^ISONIAZID 100MG/ML INJ
+"DATA",176.112,28513,1)
+204430
+"DATA",176.112,28514,0)
+4027358^HYDROXYAMPHETAMINE 1%/TROPICAMIDE 0.25% SOLN,OPH
+"DATA",176.112,28514,1)
+204426
+"DATA",176.112,28515,0)
+4010394^MASOPROCOL 10% CREAM,TOP
+"DATA",176.112,28515,1)
+204425
+"DATA",176.112,28516,0)
+4005432^HC 1%/N-MYCIN 3.5MG/POLYMYX 10000UNT/ML SOLN,OTIC
+"DATA",176.112,28516,1)
+204423
+"DATA",176.112,28517,0)
+4003591^MAGNESIUM SALICYLATE 545MG TAB
+"DATA",176.112,28517,1)
+204422
+"DATA",176.112,28518,0)
+4007347^LEUPROLIDE ACETATE 3.75MG/VIL INJ,SUSP,SA
+"DATA",176.112,28518,1)
+204418
+"DATA",176.112,28519,0)
+4003625^HALOPERIDOL 5MG/ML INJ
+"DATA",176.112,28519,1)
+204416
+"DATA",176.112,28520,0)
+4003626^HALOPERIDOL 5MG/ML (PF) INJ
+"DATA",176.112,28520,1)
+204416
+"DATA",176.112,28521,0)
+4003627^HALOPERIDOL DECANOATE 100MG/ML INJ
+"DATA",176.112,28521,1)
+204415
+"DATA",176.112,28522,0)
+4003629^HALOPERIDOL DECANOATE 100MG/ML INJ,1ML AMP
+"DATA",176.112,28522,1)
+204415
+"DATA",176.112,28523,0)
+4003624^HALOPERIDOL DECANOATE 50MG/ML INJ
+"DATA",176.112,28523,1)
+204414
+"DATA",176.112,28524,0)
+4003628^HALOPERIDOL DECANOATE 50MG/ML INJ,1ML AMP
+"DATA",176.112,28524,1)
+204414
+"DATA",176.112,28525,0)
+4003419^ETHINYL ESTRADIOL 0.5MG TAB
+"DATA",176.112,28525,1)
+204407
+"DATA",176.112,28526,0)
+4003322^GLOBULIN,IMMUNE (IV) 5%/MALTOSE 10% INJ
+"DATA",176.112,28526,1)
+204406
+"DATA",176.112,28527,0)
+4003326^GLOBULIN,IMMUNE (IV) 5% INJ
+"DATA",176.112,28527,1)
+204406
+"DATA",176.112,28528,0)
+4003328^GLOBULIN,IMMUNE (IV) 0.5GM/VIL INJ
+"DATA",176.112,28528,1)
+204406
+"DATA",176.112,28529,0)
+4005556^ANTHRALIN 0.5% OINT,TOP
+"DATA",176.112,28529,1)
+204405
+"DATA",176.112,28530,0)
+4009064^ENALAPRILAT 1.25MG/ML INJ
+"DATA",176.112,28530,1)
+204404
+"DATA",176.112,28531,0)
+4004810^DYPHYLLINE 250MG/ML INJ
+"DATA",176.112,28531,1)
+204403
+"DATA",176.112,28532,0)
+4005112^CHROMIUM (AS CHLORIDE) 4MCG/ML INJ
+"DATA",176.112,28532,1)
+204401
+"DATA",176.112,28533,0)
+4006125^CHROMIUM 4MCG/ML INJ
+"DATA",176.112,28533,1)
+204401
+"DATA",176.112,28534,0)
+4005111^CHROMIC CHLORIDE 4MCG/ML INJ
+"DATA",176.112,28534,1)
+204401
+"DATA",176.112,28535,0)
+4001895^FLUPHENAZINE ENANTHATE 25MG/ML INJ
+"DATA",176.112,28535,1)
+204399
+"DATA",176.112,28536,0)
+4001891^FLUPHENAZINE DECANOATE 25MG/ML INJ
+"DATA",176.112,28536,1)
+204399
+"DATA",176.112,28537,0)
+4010149^DOXACURIUM CL 1MG/ML INJ,SOLN
+"DATA",176.112,28537,1)
+204398
+"DATA",176.112,28538,0)
+4005555^ANTHRALIN 0.25% OINT,TOP
+"DATA",176.112,28538,1)
+204397
+"DATA",176.112,28539,0)
+4005557^ANTHRALIN 1% OINT,TOP
+"DATA",176.112,28539,1)
+204396
+"DATA",176.112,28540,0)
+4001313^DOBUTAMINE HCL 12.5MG/ML INJ
+"DATA",176.112,28540,1)
+204395
+"DATA",176.112,28541,0)
+4005554^ANTHRALIN 0.1% OINT,TOP
+"DATA",176.112,28541,1)
+204393
+"DATA",176.112,28542,0)
+4005048^DEXTROTHYROXINE NA 4MG TAB
+"DATA",176.112,28542,1)
+204392
+"DATA",176.112,28543,0)
+4005046^DEXTROTHYROXINE NA 1MG TAB
+"DATA",176.112,28543,1)
+204391
+"DATA",176.112,28544,0)
+4007694^BROMPHENIRAMINE 12MG/PHENYLPROPANOLAMINE 75MG TAB,SA
+"DATA",176.112,28544,1)
+204389
+"DATA",176.112,28545,0)
+4004416^DESONIDE 0.05% OINT,TOP
+"DATA",176.112,28545,1)
+204135
+"DATA",176.112,28546,0)
+4004781^MALATHION 0.5% LOTION
+"DATA",176.112,28546,1)
+204119
+"DATA",176.112,28547,0)
+4003193^NORGESTREL 0.075MG TAB
+"DATA",176.112,28547,1)
+203717
+"DATA",176.112,28548,0)
+4002898^HYDROCORTISONE ACETATE 1% OINT,TOP
+"DATA",176.112,28548,1)
+203105
+"DATA",176.112,28549,0)
+4002916^HYDROCORTISONE 1% OINT,TOP
+"DATA",176.112,28549,1)
+203105
+"DATA",176.112,28550,0)
+4002270^CHLORDIAZEPOXIDE HCL 10MG TAB
+"DATA",176.112,28550,1)
+203102
+"DATA",176.112,28551,0)
+4002269^CHLORDIAZEPOXIDE HCL 5MG TAB
+"DATA",176.112,28551,1)
+203101
+"DATA",176.112,28552,0)
+4002271^CHLORDIAZEPOXIDE HCL 25MG TAB
+"DATA",176.112,28552,1)
+203100
+"DATA",176.112,28553,0)
+4008158^KETOCONAZOLE 2% CREAM,TOP
+"DATA",176.112,28553,1)
+203088
+"DATA",176.112,28554,0)
+4013811^GREPAFLOXACIN HCL 600MG TAB
+"DATA",176.112,28554,1)
+200395
+"DATA",176.112,28555,0)
+4013810^GREPAFLOXACIN HCL 400MG TAB
+"DATA",176.112,28555,1)
+200394
+"DATA",176.112,28556,0)
+4013374^THALIDOMIDE 50MG CAP
+"DATA",176.112,28556,1)
+200390
+"DATA",176.112,28557,0)
+4024637^AMANTADINE HCL 100MG TAB
+"DATA",176.112,28557,1)
+200381
+"DATA",176.112,28558,0)
+4013291^CITALOPRAM HYDROBROMIDE 20MG TAB
+"DATA",176.112,28558,1)
+200371
+"DATA",176.112,28559,0)
+4013292^CITALOPRAM HYDROBROMIDE 20MG TAB,UD
+"DATA",176.112,28559,1)
+200371
+"DATA",176.112,28560,0)
+4010213^CALCIUM CARBONATE 520MG/MAGNESIUM CARBONATE 400MG TAB
+"DATA",176.112,28560,1)
+200350
+"DATA",176.112,28561,0)
+4013241^EPTIFIBATIDE 0.75MG/ML INJ
+"DATA",176.112,28561,1)
+200349
+"DATA",176.112,28562,0)
+4013240^EPTIFIBATIDE 2MG/ML INJ
+"DATA",176.112,28562,1)
+200348
+"DATA",176.112,28563,0)
+4015820^LIDOCAINE 5% CREAM,TOP
+"DATA",176.112,28563,1)
+200347
+"DATA",176.112,28564,0)
+4026475^CEFDINIR 300MG CAP,UD
+"DATA",176.112,28564,1)
+200346
+"DATA",176.112,28565,0)
+4013279^SIMVASTATIN 80MG TAB
+"DATA",176.112,28565,1)
+200345
+"DATA",176.112,28566,0)
+4016498^SIMVASTATIN 80MG TAB,UD
+"DATA",176.112,28566,1)
+200345
+"DATA",176.112,28567,0)
+4013257^HYDROXYUREA 400MG CAP
+"DATA",176.112,28567,1)
+200344
+"DATA",176.112,28568,0)
+4013256^HYDROXYUREA 300MG CAP
+"DATA",176.112,28568,1)
+200343
+"DATA",176.112,28569,0)
+4013255^HYDROXYUREA 200MG CAP
+"DATA",176.112,28569,1)
+200342
+"DATA",176.112,28570,0)
+4008790^OMEPRAZOLE 40MG CAP,SA,UD
+"DATA",176.112,28570,1)
+200329
+"DATA",176.112,28571,0)
+4008789^OMEPRAZOLE 40MG CAP,SA
+"DATA",176.112,28571,1)
+200329
+"DATA",176.112,28572,0)
+4025404^OMEPRAZOLE 40MG CAP,EC
+"DATA",176.112,28572,1)
+200329
+"DATA",176.112,28573,0)
+4025405^OMEPRAZOLE 40MG CAP,EC,UD
+"DATA",176.112,28573,1)
+200329
+"DATA",176.112,28574,0)
+4013202^CAPECITABINE 500MG TAB
+"DATA",176.112,28574,1)
+200328
+"DATA",176.112,28575,0)
+4013201^CAPECITABINE 150MG TAB
+"DATA",176.112,28575,1)
+200327
+"DATA",176.112,28576,0)
+4013218^TIROFIBAN HCL 250MCG/ML INJ
+"DATA",176.112,28576,1)
+200326
+"DATA",176.112,28577,0)
+4013194^LEPIRUDIN 50MG/VIL INJ
+"DATA",176.112,28577,1)
+200322
+"DATA",176.112,28578,0)
+4026090^PARICALCITOL 5MCG/ML INJ,SOLN,2ML
+"DATA",176.112,28578,1)
+200321
+"DATA",176.112,28579,0)
+4013215^PARICALCITOL 5MCG/ML INJ,SOLN
+"DATA",176.112,28579,1)
+200321
+"DATA",176.112,28580,0)
+4013196^FENOFIBRATE 67MG CAP
+"DATA",176.112,28580,1)
+200311
+"DATA",176.112,28581,0)
+4013207^TOLTERODINE TARTRATE 1MG TAB
+"DATA",176.112,28581,1)
+200310
+"DATA",176.112,28582,0)
+4013208^TOLTERODINE TARTRATE 1MG TAB,UD
+"DATA",176.112,28582,1)
+200310
+"DATA",176.112,28583,0)
+4013199^HYDROCHLOROTHIAZIDE 12.5MG/VALSARTAN 160MG TAB
+"DATA",176.112,28583,1)
+200285
+"DATA",176.112,28584,0)
+4013200^HYDROCHLOROTHIAZIDE 12.5MG/VALSARTAN 160MG TAB,UD
+"DATA",176.112,28584,1)
+200285
+"DATA",176.112,28585,0)
+4013197^HYDROCHLOROTHIAZIDE 12.5MG/VALSARTAN 80MG TAB
+"DATA",176.112,28585,1)
+200284
+"DATA",176.112,28586,0)
+4013198^HYDROCHLOROTHIAZIDE 12.5MG/VALSARTAN 80MG TAB,UD
+"DATA",176.112,28586,1)
+200284
+"DATA",176.112,28587,0)
+4013266^REPAGLINIDE 2MG TAB
+"DATA",176.112,28587,1)
+200258
+"DATA",176.112,28588,0)
+4013264^REPAGLINIDE 0.5MG TAB
+"DATA",176.112,28588,1)
+200257
+"DATA",176.112,28589,0)
+4013265^REPAGLINIDE 1MG TAB
+"DATA",176.112,28589,1)
+200256
+"DATA",176.112,28590,0)
+4005294^TRIPLE SULFA CREAM,VAG
+"DATA",176.112,28590,1)
+200241
+"DATA",176.112,28591,0)
+4005826^DESOXYRIBONUCLEASE 666.6UNT/FIBRINOLYSIN 1UNT/GM OINT,TOP
+"DATA",176.112,28591,1)
+200236
+"DATA",176.112,28592,0)
+4013222^MONTELUKAST NA 10MG TAB
+"DATA",176.112,28592,1)
+200224
+"DATA",176.112,28593,0)
+4013223^MONTELUKAST NA 10MG TAB,UD
+"DATA",176.112,28593,1)
+200224
+"DATA",176.112,28594,0)
+4013269^FENOLDOPAM MESYLATE 10MG/ML INJ,CONC,AMP,5ML
+"DATA",176.112,28594,1)
+200222
+"DATA",176.112,28595,0)
+4013267^FENOLDOPAM MESYLATE 10MG/ML INJ,CONC,AMP,1ML
+"DATA",176.112,28595,1)
+200222
+"DATA",176.112,28596,0)
+4013268^FENOLDOPAM MESYLATE 10MG/ML INJ,CONC,AMP,2ML
+"DATA",176.112,28596,1)
+200222
+"DATA",176.112,28597,0)
+4013193^TOLCAPONE 200MG TAB
+"DATA",176.112,28597,1)
+200221
+"DATA",176.112,28598,0)
+4013192^TOLCAPONE 100MG TAB
+"DATA",176.112,28598,1)
+200220
+"DATA",176.112,28599,0)
+4015857^PEG 1%/PVA 1% SOLN,OPH
+"DATA",176.112,28599,1)
+200217
+"DATA",176.112,28600,0)
+4008431^DEXTROMETHORPHAN HBR 10MG/5ML SYRUP
+"DATA",176.112,28600,1)
+200216
+"DATA",176.112,28601,0)
+4024608^CHLOROPHYLLIN 3MG/THYMOL 0.6MG TAB
+"DATA",176.112,28601,1)
+200213
+"DATA",176.112,28602,0)
+4008899^GANCICLOVIR 500MG CAP
+"DATA",176.112,28602,1)
+200206
+"DATA",176.112,28603,0)
+4017398^BENZETHONIUM CL 0.1% SPRAY,TOP
+"DATA",176.112,28603,1)
+200200
+"DATA",176.112,28604,0)
+4013185^ALATROFLOXACIN MESYLATE 5MG/ML INJ,VIL,40ML
+"DATA",176.112,28604,1)
+200195
+"DATA",176.112,28605,0)
+4013186^ALATROFLOXACIN MESYLATE 5MG/ML INJ,VIL,60ML
+"DATA",176.112,28605,1)
+200195
+"DATA",176.112,28606,0)
+4013191^ZOLMITRIPTAN 5MG TAB,PACKAGE,3
+"DATA",176.112,28606,1)
+200194
+"DATA",176.112,28607,0)
+4013190^ZOLMITRIPTAN 2.5MG TAB,PACKAGE,6
+"DATA",176.112,28607,1)
+200193
+"DATA",176.112,28608,0)
+4012419^CAMPHOR 0.5%/MENTHOL 0.5% LOTION
+"DATA",176.112,28608,1)
+200176
+"DATA",176.112,28609,0)
+4010121^FINASTERIDE 1MG TAB
+"DATA",176.112,28609,1)
+200172
+"DATA",176.112,28610,0)
+4013165^DACLIZUMAB 5MG/ML INJ
+"DATA",176.112,28610,1)
+200171
+"DATA",176.112,28611,0)
+4009598^ZINC 23MG LOZENGE
+"DATA",176.112,28611,1)
+200151
+"DATA",176.112,28612,0)
+4012836^ACARBOSE 25MG TAB
+"DATA",176.112,28612,1)
+200132
+"DATA",176.112,28613,0)
+4012832^SAQUINAVIR 200MG CAP
+"DATA",176.112,28613,1)
+200105
+"DATA",176.112,28614,0)
+4013162^GREPAFLOXACIN HCL 200MG TAB,UD
+"DATA",176.112,28614,1)
+200104
+"DATA",176.112,28615,0)
+4013161^GREPAFLOXACIN HCL 200MG TAB
+"DATA",176.112,28615,1)
+200104
+"DATA",176.112,28616,0)
+4013123^DOLASETRON MESYLATE 12.5MG/0.625ML INJ,AMP
+"DATA",176.112,28616,1)
+200101
+"DATA",176.112,28617,0)
+4013124^DOLASETRON MESYLATE 20MG/ML INJ,VIAL,5ML
+"DATA",176.112,28617,1)
+200101
+"DATA",176.112,28618,0)
+4013158^IRBESARTAN 300MG TAB
+"DATA",176.112,28618,1)
+200096
+"DATA",176.112,28619,0)
+4013157^IRBESARTAN 150MG TAB
+"DATA",176.112,28619,1)
+200095
+"DATA",176.112,28620,0)
+4013156^IRBESARTAN 75MG TAB
+"DATA",176.112,28620,1)
+200094
+"DATA",176.112,28621,0)
+4013155^LAMIVUDINE 150MG/ZIDOVUDINE 300MG TAB
+"DATA",176.112,28621,1)
+200082
+"DATA",176.112,28622,0)
+4008851^SENNA 217MG TAB
+"DATA",176.112,28622,1)
+200081
+"DATA",176.112,28623,0)
+4017285^MENTHOL 3MG LOZENGE
+"DATA",176.112,28623,1)
+200074
+"DATA",176.112,28624,0)
+4002225^DIAZEPAM 15MG/SYSTEM,ADULT,GEL,RTL
+"DATA",176.112,28624,1)
+200070
+"DATA",176.112,28625,0)
+4002223^DIAZEPAM 10MG/SYSTEM,PEDIATRIC,GEL,RTL
+"DATA",176.112,28625,1)
+200070
+"DATA",176.112,28626,0)
+4002222^DIAZEPAM 5MG/SYSTEM,PEDIATRIC,GEL,RTL
+"DATA",176.112,28626,1)
+200070
+"DATA",176.112,28627,0)
+4012959^TROGLITAZONE 300MG TAB
+"DATA",176.112,28627,1)
+200065
+"DATA",176.112,28628,0)
+4013105^LETROZOLE 2.5MG TAB
+"DATA",176.112,28628,1)
+200064
+"DATA",176.112,28629,0)
+4012774^MYCOPHENOLATE MOFETIL 500MG TAB
+"DATA",176.112,28629,1)
+200060
+"DATA",176.112,28630,0)
+4017368^SCOPOLAMINE HBR 0.4MG TAB
+"DATA",176.112,28630,1)
+200059
+"DATA",176.112,28631,0)
+4004370^CLOTRIMAZOLE 200MG TAB,VAG
+"DATA",176.112,28631,1)
+200036
+"DATA",176.112,28632,0)
+4024561^OLANZAPINE 2.5MG TAB,UD
+"DATA",176.112,28632,1)
+200034
+"DATA",176.112,28633,0)
+4012956^OLANZAPINE 2.5MG TAB
+"DATA",176.112,28633,1)
+200034
+"DATA",176.112,28634,0)
+4013086^CARVEDILOL 25MG TAB
+"DATA",176.112,28634,1)
+200033
+"DATA",176.112,28635,0)
+4013085^CARVEDILOL 12.5MG TAB
+"DATA",176.112,28635,1)
+200032
+"DATA",176.112,28636,0)
+4013084^CARVEDILOL 6.25MG TAB
+"DATA",176.112,28636,1)
+200031
+"DATA",176.112,28637,0)
+4025987^DIMETHICONE 1% CREAM,TOP
+"DATA",176.112,28637,1)
+200010
+"DATA",176.112,28638,0)
+4013101^IVERMECTIN 6MG TAB
+"DATA",176.112,28638,1)
+199998
+"DATA",176.112,28639,0)
+4012941^SPARFLOXACIN 200MG TAB
+"DATA",176.112,28639,1)
+199997
+"DATA",176.112,28640,0)
+4009600^ZINC ACETATE 50MG CAP
+"DATA",176.112,28640,1)
+199995
+"DATA",176.112,28641,0)
+4009599^ZINC ACETATE 25MG CAP
+"DATA",176.112,28641,1)
+199994
+"DATA",176.112,28642,0)
+4012958^TROGLITAZONE 400MG TAB
+"DATA",176.112,28642,1)
+199985
+"DATA",176.112,28643,0)
+4012957^TROGLITAZONE 200MG TAB
+"DATA",176.112,28643,1)
+199984
+"DATA",176.112,28644,0)
+4017106^APOMORPHINE HCL 10MG/ML INJ,SOLN,2ML
+"DATA",176.112,28644,1)
+199929
+"DATA",176.112,28645,0)
+4017107^APOMORPHINE HCL 10MG/ML INJ,SOLN,CARTRIDGE,3ML
+"DATA",176.112,28645,1)
+199929
+"DATA",176.112,28646,0)
+4012943^VALSARTAN 160MG CAP
+"DATA",176.112,28646,1)
+199919
+"DATA",176.112,28647,0)
+4012989^ZILEUTON 600MG TAB
+"DATA",176.112,28647,1)
+199904
+"DATA",176.112,28648,0)
+4002656^HYDROCHLOROTHIAZIDE 12.5MG CAP
+"DATA",176.112,28648,1)
+199903
+"DATA",176.112,28649,0)
+4006057^UREA 25% LOTION
+"DATA",176.112,28649,1)
+199902
+"DATA",176.112,28650,0)
+4013032^TOPIRAMATE 200MG TAB
+"DATA",176.112,28650,1)
+199890
+"DATA",176.112,28651,0)
+4013031^TOPIRAMATE 100MG TAB
+"DATA",176.112,28651,1)
+199889
+"DATA",176.112,28652,0)
+4013030^TOPIRAMATE 25MG TAB
+"DATA",176.112,28652,1)
+199888
+"DATA",176.112,28653,0)
+4012970^LEVOFLOXACIN 5MG/ML/DEXTROSE INJ,BAG,100ML
+"DATA",176.112,28653,1)
+199886
+"DATA",176.112,28654,0)
+4015451^LEVOFLOXACIN 5MG/ML/DEXTROSE INJ,BAG,150ML
+"DATA",176.112,28654,1)
+199886
+"DATA",176.112,28655,0)
+4012969^LEVOFLOXACIN 5MG/ML/DEXTROSE INJ,BAG,50ML
+"DATA",176.112,28655,1)
+199886
+"DATA",176.112,28656,0)
+4012968^LEVOFLOXACIN 500MG TAB
+"DATA",176.112,28656,1)
+199885
+"DATA",176.112,28657,0)
+4012967^LEVOFLOXACIN 250MG TAB
+"DATA",176.112,28657,1)
+199884
+"DATA",176.112,28658,0)
+4008476^BENZOCAINE 20%/MENTHOL 0.5% AEROSOL,TOP
+"DATA",176.112,28658,1)
+199864
+"DATA",176.112,28659,0)
+4009686^ALOE/BENZOCAINE 20%/LANOLIN/MENTHOL 0.5% AEROSOL,TOP
+"DATA",176.112,28659,1)
+199864
+"DATA",176.112,28660,0)
+4012942^VALSARTAN 80MG CAP
+"DATA",176.112,28660,1)
+199850
+"DATA",176.112,28661,0)
+4003572^DOXORUBICIN HCL LIPOSOME 2MG/ML INJ
+"DATA",176.112,28661,1)
+199846
+"DATA",176.112,28662,0)
+4027711^TRIPTORELIN PAMOATE 3.75MG/KIT INJ,SUSP,SA
+"DATA",176.112,28662,1)
+199821^^^TRIPTORELIN 3.75MG/KIT SUSP SA INJ^Y
+"DATA",176.112,28663,0)
+4027718^TRIPTORELIN PAMOATE 3.75MG/VIL INJ,SUSP,SA
+"DATA",176.112,28663,1)
+199821^^^TRIPTORELIN 3.75MG/VIL SUSP SA INJ^Y
+"DATA",176.112,28664,0)
+4013674^METYRAPONE 250MG CAP
+"DATA",176.112,28664,1)
+199772
+"DATA",176.112,28665,0)
+4003001^FAMOTIDINE 0.4MG/ML/NACL INJ,50ML BAG
+"DATA",176.112,28665,1)
+199739
+"DATA",176.112,28666,0)
+4002805^DEMECLOCYCLINE HCL 150MG CAP
+"DATA",176.112,28666,1)
+199719
+"DATA",176.112,28667,0)
+4012995^CABERGOLINE 0.5MG TAB
+"DATA",176.112,28667,1)
+199703
+"DATA",176.112,28668,0)
+4013129^ACITRETIN 25MG CAP
+"DATA",176.112,28668,1)
+199690
+"DATA",176.112,28669,0)
+4013128^ACITRETIN 10MG CAP
+"DATA",176.112,28669,1)
+199689
+"DATA",176.112,28670,0)
+4008989^BUPROPION HCL 150MG TAB,SA
+"DATA",176.112,28670,1)
+199677
+"DATA",176.112,28671,0)
+4008988^BUPROPION HCL 100MG TAB,SA
+"DATA",176.112,28671,1)
+199676
+"DATA",176.112,28672,0)
+4012952^ALBENDAZOLE 200MG TAB
+"DATA",176.112,28672,1)
+199672
+"DATA",176.112,28673,0)
+4013027^NILUTAMIDE 50MG TAB
+"DATA",176.112,28673,1)
+199671
+"DATA",176.112,28674,0)
+4004706^BROMPHENIRAMINE MALEATE 2MG/5ML (SF & AF) ELIXIR
+"DATA",176.112,28674,1)
+199665
+"DATA",176.112,28675,0)
+4004705^BROMPHENIRAMINE MALEATE 2MG/5ML ELIXIR
+"DATA",176.112,28675,1)
+199665
+"DATA",176.112,28676,0)
+4008436^DEXTROMETHORPHAN HBR 15MG/5ML SYRUP
+"DATA",176.112,28676,1)
+199664
+"DATA",176.112,28677,0)
+4008437^DEXTROMETHORPHAN HBR 15MG/5ML LIQUID
+"DATA",176.112,28677,1)
+199664
+"DATA",176.112,28678,0)
+4009073^ZIDOVUDINE 300MG TAB
+"DATA",176.112,28678,1)
+199663
+"DATA",176.112,28679,0)
+4012944^ZAFIRLUKAST 20MG TAB
+"DATA",176.112,28679,1)
+199655
+"DATA",176.112,28680,0)
+4025045^ACETYLCYSTEINE 500MG TAB
+"DATA",176.112,28680,1)
+199650
+"DATA",176.112,28681,0)
+4005284^MICONAZOLE NITRATE 2% LOTION
+"DATA",176.112,28681,1)
+199613
+"DATA",176.112,28682,0)
+4015822^ESTRADIOL 25MCG TAB,VAG,APPLICATOR
+"DATA",176.112,28682,1)
+199607
+"DATA",176.112,28683,0)
+4025840^CLOTRIMAZOLE 2% CREAM,VAG
+"DATA",176.112,28683,1)
+199603
+"DATA",176.112,28684,0)
+4017148^AMIODARONE HCL 100MG TAB
+"DATA",176.112,28684,1)
+199597
+"DATA",176.112,28685,0)
+4003544^ALPROSTADIL 5MCG/VIL INJ,SYSTEM
+"DATA",176.112,28685,1)
+199596
+"DATA",176.112,28686,0)
+4003536^ALPROSTADIL 5MCG/VIL INJ
+"DATA",176.112,28686,1)
+199596
+"DATA",176.112,28687,0)
+4027893^TETRABENAZINE 25MG TAB
+"DATA",176.112,28687,1)
+199592
+"DATA",176.112,28688,0)
+4012919^RANITIDINE BISMUTH CITRATE 400MG TAB
+"DATA",176.112,28688,1)
+199561
+"DATA",176.112,28689,0)
+4000640^ATROPINE SO4 0.6MG TAB
+"DATA",176.112,28689,1)
+199530
+"DATA",176.112,28690,0)
+4001148^PYRIDOXINE HCL 50MG/ML INJ
+"DATA",176.112,28690,1)
+199522
+"DATA",176.112,28691,0)
+4017102^TINIDAZOLE 500MG TAB
+"DATA",176.112,28691,1)
+199519
+"DATA",176.112,28692,0)
+4012994^PENTOSAN POLYSULFATE NA 100MG CAP
+"DATA",176.112,28692,1)
+199498
+"DATA",176.112,28693,0)
+4012950^NEVIRAPINE 200MG TAB
+"DATA",176.112,28693,1)
+199422
+"DATA",176.112,28694,0)
+4013753^NEVIRAPINE 200MG TAB,UD
+"DATA",176.112,28694,1)
+199422
+"DATA",176.112,28695,0)
+4008419^NIZATIDINE 75MG TAB
+"DATA",176.112,28695,1)
+199420
+"DATA",176.112,28696,0)
+4006659^BUSPIRONE HCL 15MG TAB
+"DATA",176.112,28696,1)
+199397
+"DATA",176.112,28697,0)
+4025741^BUSPIRONE HCL 15MG TAB,UD
+"DATA",176.112,28697,1)
+199397
+"DATA",176.112,28698,0)
+4012906^IRINOTECAN HCL 20MG/ML INJ,SOLN
+"DATA",176.112,28698,1)
+199392
+"DATA",176.112,28699,0)
+4009274^ETODOLAC 500MG TAB
+"DATA",176.112,28699,1)
+199390
+"DATA",176.112,28700,0)
+4012915^CIDOFOVIR 75MG/ML INJ
+"DATA",176.112,28700,1)
+199388
+"DATA",176.112,28701,0)
+4012174^RISPERIDONE 1MG/ML SOLN,ORAL
+"DATA",176.112,28701,1)
+199387
+"DATA",176.112,28702,0)
+4007061^POTASSIUM CITRATE 1080MG TAB,SA
+"DATA",176.112,28702,1)
+199381
+"DATA",176.112,28703,0)
+4010112^NICOTINE 10MG/ML SOLN,NASAL SPRAY
+"DATA",176.112,28703,1)
+199377
+"DATA",176.112,28704,0)
+4007059^POTASSIUM CITRATE 540MG TAB,SA
+"DATA",176.112,28704,1)
+199376
+"DATA",176.112,28705,0)
+4014653^CHLOROPHYLLIN COPPER COMPLEX 33.3MG TAB
+"DATA",176.112,28705,1)
+199372
+"DATA",176.112,28706,0)
+4008328^CIPROFLOXACIN HCL 100MG TAB
+"DATA",176.112,28706,1)
+199370
+"DATA",176.112,28707,0)
+4013034^PHENYLBUTYRATE NA 500MG TAB
+"DATA",176.112,28707,1)
+199369
+"DATA",176.112,28708,0)
+4017017^CHOLECALCIFEROL 1000UNT TAB
+"DATA",176.112,28708,1)
+199362
+"DATA",176.112,28709,0)
+4008996^SELEGILINE HCL 5MG CAP
+"DATA",176.112,28709,1)
+199354
+"DATA",176.112,28710,0)
+4012908^TRANDOLAPRIL 1MG TAB
+"DATA",176.112,28710,1)
+199353
+"DATA",176.112,28711,0)
+4012910^TRANDOLAPRIL 4MG TAB
+"DATA",176.112,28711,1)
+199352
+"DATA",176.112,28712,0)
+4012909^TRANDOLAPRIL 2MG TAB
+"DATA",176.112,28712,1)
+199351
+"DATA",176.112,28713,0)
+4012911^DEXFENFLURAMINE HCL 15MG CAP
+"DATA",176.112,28713,1)
+199348
+"DATA",176.112,28714,0)
+4004970^HYDROCODONE 10MG/ACETAMINOPHEN 500MG TAB
+"DATA",176.112,28714,1)
+199347
+"DATA",176.112,28715,0)
+4013665^L-ARGININE 500MG TAB
+"DATA",176.112,28715,1)
+199292
+"DATA",176.112,28716,0)
+4005739^ASPIRIN 300MG TAB
+"DATA",176.112,28716,1)
+199281
+"DATA",176.112,28717,0)
+4001705^AMPHOTERICIN B 100MG/ML SUSP,ORAL
+"DATA",176.112,28717,1)
+199264
+"DATA",176.112,28718,0)
+4010470^NONOXYNOL-9 2.2% GEL,VAG
+"DATA",176.112,28718,1)
+199262
+"DATA",176.112,28719,0)
+4004772^OXYMETHOLONE 50MG TAB
+"DATA",176.112,28719,1)
+199258
+"DATA",176.112,28720,0)
+4005771^METHSUXIMIDE 150MG CAP
+"DATA",176.112,28720,1)
+199257
+"DATA",176.112,28721,0)
+4027831^BISMUTH SUBGALLATE 400MG TAB,CHEW
+"DATA",176.112,28721,1)
+199253^^^BISMUTH SUBGALLATE 400MG CHEW TAB^Y
+"DATA",176.112,28722,0)
+4012900^RITONAVIR 80MG/ML SOLN,ORAL
+"DATA",176.112,28722,1)
+199249
+"DATA",176.112,28723,0)
+4012851^GLIMEPIRIDE 4MG TAB
+"DATA",176.112,28723,1)
+199247
+"DATA",176.112,28724,0)
+4012850^GLIMEPIRIDE 2MG TAB
+"DATA",176.112,28724,1)
+199246
+"DATA",176.112,28725,0)
+4012849^GLIMEPIRIDE 1MG TAB
+"DATA",176.112,28725,1)
+199245
+"DATA",176.112,28726,0)
+4013316^CHLOROPHYLL 20MG TAB
+"DATA",176.112,28726,1)
+199235
+"DATA",176.112,28727,0)
+4012852^ANASTROZOLE 1MG TAB
+"DATA",176.112,28727,1)
+199224
+"DATA",176.112,28728,0)
+4027527^ANASTROZOLE 1MG TAB,30
+"DATA",176.112,28728,1)
+199224
+"DATA",176.112,28729,0)
+4002549^CHLORPHENIRAMINE MALEATE 2MG/5ML SYRUP
+"DATA",176.112,28729,1)
+199221
+"DATA",176.112,28730,0)
+4008127^BROMELAIN 500MG TAB
+"DATA",176.112,28730,1)
+199219
+"DATA",176.112,28731,0)
+4014064^SALICYLIC ACID 12%/COLLODION LIQUID,TOP
+"DATA",176.112,28731,1)
+199213
+"DATA",176.112,28732,0)
+4012885^CISATRACURIUM BESYLATE 10MG/ML INJ,SOLN
+"DATA",176.112,28732,1)
+199212
+"DATA",176.112,28733,0)
+4012884^CISATRACURIUM BESYLATE 2MG/ML INJ,SOLN
+"DATA",176.112,28733,1)
+199211
+"DATA",176.112,28734,0)
+4025050^BIOTIN 2.5MG TAB
+"DATA",176.112,28734,1)
+199209
+"DATA",176.112,28735,0)
+4012839^RILUZOLE 50MG TAB
+"DATA",176.112,28735,1)
+199206
+"DATA",176.112,28736,0)
+4005155^OXYCODONE HCL 5MG CAP
+"DATA",176.112,28736,1)
+199205
+"DATA",176.112,28737,0)
+4012608^FAMCICLOVIR 250MG TAB
+"DATA",176.112,28737,1)
+199193
+"DATA",176.112,28738,0)
+4012607^FAMCICLOVIR 125MG TAB
+"DATA",176.112,28738,1)
+199192
+"DATA",176.112,28739,0)
+4002908^HYDROCORTISONE 0.25% CREAM,TOP
+"DATA",176.112,28739,1)
+199190
+"DATA",176.112,28740,0)
+4015704^FERROUS FUMARATE 300MG TAB,UD
+"DATA",176.112,28740,1)
+199178
+"DATA",176.112,28741,0)
+4004830^FERROUS FUMARATE 300MG TAB
+"DATA",176.112,28741,1)
+199178
+"DATA",176.112,28742,0)
+4003409^KETOPROFEN 12.5MG TAB
+"DATA",176.112,28742,1)
+199169
+"DATA",176.112,28743,0)
+4016096^PHENOBARBITAL 97.2MG TAB
+"DATA",176.112,28743,1)
+199164
+"DATA",176.112,28744,0)
+4005223^TRETINOIN 10MG CAP
+"DATA",176.112,28744,1)
+199159
+"DATA",176.112,28745,0)
+4009463^LECITHIN 420MG CAP
+"DATA",176.112,28745,1)
+199152
+"DATA",176.112,28746,0)
+4012838^ACARBOSE 100MG TAB,UD
+"DATA",176.112,28746,1)
+199150
+"DATA",176.112,28747,0)
+4012835^ACARBOSE 100MG TAB
+"DATA",176.112,28747,1)
+199150
+"DATA",176.112,28748,0)
+4012837^ACARBOSE 50MG TAB,UD
+"DATA",176.112,28748,1)
+199149
+"DATA",176.112,28749,0)
+4012834^ACARBOSE 50MG TAB
+"DATA",176.112,28749,1)
+199149
+"DATA",176.112,28750,0)
+4012830^LAMIVUDINE 50MG/5ML SOLN,ORAL
+"DATA",176.112,28750,1)
+199148
+"DATA",176.112,28751,0)
+4012831^LAMIVUDINE 150MG TAB
+"DATA",176.112,28751,1)
+199147
+"DATA",176.112,28752,0)
+4016452^BENZOYL PEROXIDE 6% GEL,TOP
+"DATA",176.112,28752,1)
+199146
+"DATA",176.112,28753,0)
+4006386^NIACIN 250MG TAB
+"DATA",176.112,28753,1)
+199143
+"DATA",176.112,28754,0)
+4005851^SALICYLIC ACID 0.5% LOTION
+"DATA",176.112,28754,1)
+199134
+"DATA",176.112,28755,0)
+4012857^BICALUTAMIDE 50MG TAB
+"DATA",176.112,28755,1)
+199123
+"DATA",176.112,28756,0)
+4003105^LIOTHYRONINE NA 10MCG/ML INJ
+"DATA",176.112,28756,1)
+199122
+"DATA",176.112,28757,0)
+4008788^OMEPRAZOLE 10MG CAP,SA
+"DATA",176.112,28757,1)
+199119
+"DATA",176.112,28758,0)
+4025401^OMEPRAZOLE 10MG CAP,EC,UD
+"DATA",176.112,28758,1)
+199119
+"DATA",176.112,28759,0)
+4013739^OMEPRAZOLE 10MG CAP,SA,UD
+"DATA",176.112,28759,1)
+199119
+"DATA",176.112,28760,0)
+4025400^OMEPRAZOLE 10MG CAP,EC
+"DATA",176.112,28760,1)
+199119
+"DATA",176.112,28761,0)
+4001144^TESTOSTERONE 2.5MG/24HRS PATCH
+"DATA",176.112,28761,1)
+199116
+"DATA",176.112,28762,0)
+4012725^RIMEXOLONE 1% SUSP,OPH
+"DATA",176.112,28762,1)
+199115
+"DATA",176.112,28763,0)
+4003412^AMIODARONE HCL 50MG/ML INJ,AMP,3ML
+"DATA",176.112,28763,1)
+199111
+"DATA",176.112,28764,0)
+4024629^AMIODARONE HCL 50MG/ML INJ,AMP,18ML
+"DATA",176.112,28764,1)
+199111
+"DATA",176.112,28765,0)
+4016925^AMIODARONE HCL 50MG/ML INJ,9ML
+"DATA",176.112,28765,1)
+199111
+"DATA",176.112,28766,0)
+4016338^PYRANTEL PAMOATE 180MG TAB
+"DATA",176.112,28766,1)
+199107
+"DATA",176.112,28767,0)
+4016337^PYRANTEL PAMOATE 144MG/ML SUSP,ORAL
+"DATA",176.112,28767,1)
+199106
+"DATA",176.112,28768,0)
+4006825^CIMETIDINE 100MG TAB
+"DATA",176.112,28768,1)
+199093
+"DATA",176.112,28769,0)
+4006055^UREA 15% LOTION
+"DATA",176.112,28769,1)
+199091
+"DATA",176.112,28770,0)
+4009721^UREA 30% CREAM,TOP
+"DATA",176.112,28770,1)
+199090
+"DATA",176.112,28771,0)
+4001030^ASCORBIC ACID 250MG TAB
+"DATA",176.112,28771,1)
+199083
+"DATA",176.112,28772,0)
+4009573^ASCORBIC ACID 250MG/ROSE HIPS TAB
+"DATA",176.112,28772,1)
+199083
+"DATA",176.112,28773,0)
+4008948^ATTAPULGITE 600MG TAB,CHEWABLE
+"DATA",176.112,28773,1)
+199080
+"DATA",176.112,28774,0)
+4012778^NALMEFENE HCL 1MG/ML INJ,AMP,2ML
+"DATA",176.112,28774,1)
+199059
+"DATA",176.112,28775,0)
+4012773^MYCOPHENOLATE MOFETIL 250MG CAP
+"DATA",176.112,28775,1)
+199058
+"DATA",176.112,28776,0)
+4002405^METRONIDAZOLE 375MG CAP
+"DATA",176.112,28776,1)
+199055
+"DATA",176.112,28777,0)
+4004178^FLUOCINOLONE ACETONIDE 0.2% CREAM,TOP
+"DATA",176.112,28777,1)
+199053
+"DATA",176.112,28778,0)
+4003002^FAMOTIDINE 10MG TAB
+"DATA",176.112,28778,1)
+199047
+"DATA",176.112,28779,0)
+4002804^AMCINONIDE 0.1% LOTION
+"DATA",176.112,28779,1)
+199041
+"DATA",176.112,28780,0)
+4001473^INSULIN LENTE BEEF/PORK 100 U/ML INJ LIL
+"DATA",176.112,28780,1)
+199040
+"DATA",176.112,28781,0)
+4001443^INSULIN,LENTE,BEEF/PORK 100UNT/ML INJ
+"DATA",176.112,28781,1)
+199040
+"DATA",176.112,28782,0)
+4001960^DOXYCYCLINE HYCLATE 50MG CAP
+"DATA",176.112,28782,1)
+199027
+"DATA",176.112,28783,0)
+4001967^DOXYCYCLINE MONOHYDRATE 50MG CAP
+"DATA",176.112,28783,1)
+199027
+"DATA",176.112,28784,0)
+4001966^DOXYCYCLINE MONOHYDRATE 100MG CAP
+"DATA",176.112,28784,1)
+199026
+"DATA",176.112,28785,0)
+4001958^DOXYCYCLINE HYCLATE 100MG CAP
+"DATA",176.112,28785,1)
+199026
+"DATA",176.112,28786,0)
+4016065^DOXYCYCLINE HYCLATE 100MG CAP,UD
+"DATA",176.112,28786,1)
+199026
+"DATA",176.112,28787,0)
+4008325^CIPROFLOXACIN 10MG/ML INJ IV
+"DATA",176.112,28787,1)
+199025
+"DATA",176.112,28788,0)
+4008327^CIPROFLOXACIN 10MG/ML INJ IV,BULK VIL 120ML
+"DATA",176.112,28788,1)
+199025
+"DATA",176.112,28789,0)
+4002522^CHLORPROMAZINE 25MG SUPP,RTL
+"DATA",176.112,28789,1)
+199024
+"DATA",176.112,28790,0)
+4002523^CHLORPROMAZINE 100MG SUPP,RTL
+"DATA",176.112,28790,1)
+199023
+"DATA",176.112,28791,0)
+4002261^TRIMETHAPHAN CAMSYLATE 50MG/ML INJ
+"DATA",176.112,28791,1)
+199019
+"DATA",176.112,28792,0)
+4015851^HYDROGEN PEROXIDE 1.5% GEL,DENTAL
+"DATA",176.112,28792,1)
+199012
+"DATA",176.112,28793,0)
+4001155^PYRIDOXINE HCL 250MG TAB
+"DATA",176.112,28793,1)
+198952
+"DATA",176.112,28794,0)
+4001151^PYRIDOXINE HCL 25MG TAB
+"DATA",176.112,28794,1)
+198951
+"DATA",176.112,28795,0)
+4001156^PYRIDOXINE HCL 200MG TAB
+"DATA",176.112,28795,1)
+198949
+"DATA",176.112,28796,0)
+4001154^PYRIDOXINE HCL 100MG TAB,SA
+"DATA",176.112,28796,1)
+198947
+"DATA",176.112,28797,0)
+4001152^PYRIDOXINE HCL 100MG TAB
+"DATA",176.112,28797,1)
+198946
+"DATA",176.112,28798,0)
+4001153^PYRIDOXINE HCL 10MG TAB
+"DATA",176.112,28798,1)
+198945
+"DATA",176.112,28799,0)
+4009620^CHLOROPHYLLIN COPPER COMPLEX 100MG TAB
+"DATA",176.112,28799,1)
+198934
+"DATA",176.112,28800,0)
+4000951^EPHEDRINE SO4 25MG CAP
+"DATA",176.112,28800,1)
+198918
+"DATA",176.112,28801,0)
+4006992^ZINC SO4 66MG TAB
+"DATA",176.112,28801,1)
+198915
+"DATA",176.112,28802,0)
+4009564^ZINC OXIDE 20% OINT,TOP
+"DATA",176.112,28802,1)
+198911
+"DATA",176.112,28803,0)
+4013313^ZINC GLUCONATE 60MG TAB
+"DATA",176.112,28803,1)
+198908
+"DATA",176.112,28804,0)
+4009638^ZINC GLUCONATE 50MG TAB
+"DATA",176.112,28804,1)
+198907
+"DATA",176.112,28805,0)
+4009641^ZINC GLUCONATE 30MG TAB
+"DATA",176.112,28805,1)
+198906
+"DATA",176.112,28806,0)
+4009640^ZINC GLUCONATE 15MG TAB
+"DATA",176.112,28806,1)
+198903
+"DATA",176.112,28807,0)
+4009642^ZINC GLUCONATE 100MG TAB
+"DATA",176.112,28807,1)
+198902
+"DATA",176.112,28808,0)
+4001052^ASCORBIC ACID 1GM/ROSE HIPS TAB
+"DATA",176.112,28808,1)
+198897
+"DATA",176.112,28809,0)
+4001042^ASCORBIC ACID 1GM TAB
+"DATA",176.112,28809,1)
+198897
+"DATA",176.112,28810,0)
+4001044^ASCORBIC ACID 500MG CAP
+"DATA",176.112,28810,1)
+198896
+"DATA",176.112,28811,0)
+4001036^ASCORBIC ACID 100MG TAB
+"DATA",176.112,28811,1)
+198893
+"DATA",176.112,28812,0)
+4001053^ASCORBIC ACID 1.5GM/ROSE HIPS TAB
+"DATA",176.112,28812,1)
+198892
+"DATA",176.112,28813,0)
+4027281^CYANOCOBALAMIN 2,500MCG TAB,SUBLINGUAL
+"DATA",176.112,28813,1)
+198891^^^CYANOCOBALAMIN 2,500MCG SL TAB^Y
+"DATA",176.112,28814,0)
+4024975^VITAMIN A PALMITATE 5000 UNIT TAB
+"DATA",176.112,28814,1)
+198888
+"DATA",176.112,28815,0)
+4006053^UREA 20% CREAM,TOP
+"DATA",176.112,28815,1)
+198886
+"DATA",176.112,28816,0)
+4006061^UREA 10% OINT,TOP
+"DATA",176.112,28816,1)
+198885
+"DATA",176.112,28817,0)
+4006054^UREA 10% LOTION
+"DATA",176.112,28817,1)
+198884
+"DATA",176.112,28818,0)
+4009489^THIMEROSAL 1:1000/ALCOHOL 72% AEROSOL,TOP
+"DATA",176.112,28818,1)
+198877
+"DATA",176.112,28819,0)
+4008718^SULFUR 5% LOTION
+"DATA",176.112,28819,1)
+198872
+"DATA",176.112,28820,0)
+4008717^SULFUR 2% LOTION
+"DATA",176.112,28820,1)
+198870
+"DATA",176.112,28821,0)
+4010327^CALCIUM CARBONATE 364MG/SODIUM FLUORIDE 8.3MG TAB
+"DATA",176.112,28821,1)
+198865
+"DATA",176.112,28822,0)
+4010326^CALCIUM CARBONATE 364MG/SODIUM FLUORIDE 8.3MG CAP
+"DATA",176.112,28822,1)
+198864
+"DATA",176.112,28823,0)
+4006070^SODIUM BICARBONATE 650MG TAB
+"DATA",176.112,28823,1)
+198861
+"DATA",176.112,28824,0)
+4006069^SODIUM BICARBONATE 325MG TAB
+"DATA",176.112,28824,1)
+198859
+"DATA",176.112,28825,0)
+4008951^SIMETHICONE 40MG/0.6ML DROPS,ORAL
+"DATA",176.112,28825,1)
+198857
+"DATA",176.112,28826,0)
+4008950^SIMETHICONE 125MG CAP
+"DATA",176.112,28826,1)
+198852
+"DATA",176.112,28827,0)
+4007602^COAL TAR 8%/SALICYLIC ACID 2% GEL,TOP
+"DATA",176.112,28827,1)
+198841
+"DATA",176.112,28828,0)
+4005663^QUININE SO4 200MG CAP
+"DATA",176.112,28828,1)
+198832
+"DATA",176.112,28829,0)
+4005176^PSEUDOEPHEDRINE HCL 30MG TAB
+"DATA",176.112,28829,1)
+198826
+"DATA",176.112,28830,0)
+4013477^PSEUDOEPHEDRINE HCL 15MG/5ML SYRUP
+"DATA",176.112,28830,1)
+198825
+"DATA",176.112,28831,0)
+4009134^PRAMOXINE HCL 1% LOTION
+"DATA",176.112,28831,1)
+198822
+"DATA",176.112,28832,0)
+4008172^POVIDONE IODINE 1% OINT,TOP
+"DATA",176.112,28832,1)
+198818
+"DATA",176.112,28833,0)
+4026905^POTASSIUM GLUCONATE 550MG TAB
+"DATA",176.112,28833,1)
+198815
+"DATA",176.112,28834,0)
+4008751^IRON (POLYSACCHARIDE COMPLEX) 50MG TAB
+"DATA",176.112,28834,1)
+198809
+"DATA",176.112,28835,0)
+4008752^IRON (POLYSACCHARIDE COMPLEX) 150MG CAP
+"DATA",176.112,28835,1)
+198806
+"DATA",176.112,28836,0)
+4007927^PHENYLPROPANOLAMINE HCL 75MG TAB,SA
+"DATA",176.112,28836,1)
+198795
+"DATA",176.112,28837,0)
+4007928^PHENYLPROPANOLAMINE HCL 50MG TAB
+"DATA",176.112,28837,1)
+198794
+"DATA",176.112,28838,0)
+4014563^DEXTROMETHORPHAN 5MG/PHENYLPROPANOLAMINE 6.25MG/5ML SYRUP
+"DATA",176.112,28838,1)
+198790
+"DATA",176.112,28839,0)
+4004301^PHENYLEPHRINE HCL 1% SOLN,NASAL,SPRAY
+"DATA",176.112,28839,1)
+198788
+"DATA",176.112,28840,0)
+4004303^PHENYLEPHRINE HCL 1% SOLN,NASAL,SPRAY/PUMP
+"DATA",176.112,28840,1)
+198788
+"DATA",176.112,28841,0)
+4004305^PHENYLEPHRINE HCL 0.5% SOLN,NASAL,SPRAY/PUMP
+"DATA",176.112,28841,1)
+198787
+"DATA",176.112,28842,0)
+4004302^PHENYLEPHRINE HCL 0.5% SOLN,NASAL,SPRAY
+"DATA",176.112,28842,1)
+198787
+"DATA",176.112,28843,0)
+4004300^PHENYLEPHRINE HCL 0.25% SOLN,NASAL,SPRAY
+"DATA",176.112,28843,1)
+198786
+"DATA",176.112,28844,0)
+4004304^PHENYLEPHRINE HCL 0.25% SOLN,NASAL,SPRAY/PUMP
+"DATA",176.112,28844,1)
+198786
+"DATA",176.112,28845,0)
+4008913^PHENOLPHTHALEIN 130MG TAB
+"DATA",176.112,28845,1)
+198777
+"DATA",176.112,28846,0)
+4008746^PHENINDAMINE TARTRATE 25MG TAB
+"DATA",176.112,28846,1)
+198774
+"DATA",176.112,28847,0)
+4010466^NONOXYNOL-9 1% AQ GEL,VAG
+"DATA",176.112,28847,1)
+198762
+"DATA",176.112,28848,0)
+4010467^NONOXYNOL-9 1% GEL,VAG
+"DATA",176.112,28848,1)
+198762
+"DATA",176.112,28849,0)
+4010458^NONOXYNOL 100MG SUPP,VAG
+"DATA",176.112,28849,1)
+198761
+"DATA",176.112,28850,0)
+4006380^NIACIN 50MG TAB
+"DATA",176.112,28850,1)
+198760
+"DATA",176.112,28851,0)
+4006381^NIACIN 100MG TAB
+"DATA",176.112,28851,1)
+198759
+"DATA",176.112,28852,0)
+4006835^NAPROXEN NA 220MG TAB
+"DATA",176.112,28852,1)
+198757
+"DATA",176.112,28853,0)
+4005282^MICONAZOLE NITRATE 100MG SUPP,VAG
+"DATA",176.112,28853,1)
+198753
+"DATA",176.112,28854,0)
+4015853^METHYLCELLULOSE 500MG TAB
+"DATA",176.112,28854,1)
+198750
+"DATA",176.112,28855,0)
+4015890^MAGNESIUM SULFATE 80% OINT,TOP
+"DATA",176.112,28855,1)
+198745
+"DATA",176.112,28856,0)
+4009936^MAGNESIUM OXIDE 400MG TAB
+"DATA",176.112,28856,1)
+198741
+"DATA",176.112,28857,0)
+4009935^MAGNESIUM OXIDE 140MG CAP
+"DATA",176.112,28857,1)
+198740
+"DATA",176.112,28858,0)
+4009585^LYSINE 500MG TAB
+"DATA",176.112,28858,1)
+198735
+"DATA",176.112,28859,0)
+4008015^LOPERAMIDE HCL 2MG TAB
+"DATA",176.112,28859,1)
+198732
+"DATA",176.112,28860,0)
+4009465^LECITHIN 520MG CAP
+"DATA",176.112,28860,1)
+198727
+"DATA",176.112,28861,0)
+4015976^LACTASE 250MG CAP
+"DATA",176.112,28861,1)
+198725
+"DATA",176.112,28862,0)
+4008686^CLIOQUINOL 3% CREAM,TOP
+"DATA",176.112,28862,1)
+198717
+"DATA",176.112,28863,0)
+4010011^ICHTHAMMOL 10%/LANOLIN/PETROLATUM OINT,TOP
+"DATA",176.112,28863,1)
+198709
+"DATA",176.112,28864,0)
+4009452^ICHTHAMMOL 10% OINT,TOP
+"DATA",176.112,28864,1)
+198709
+"DATA",176.112,28865,0)
+4002910^HYDROCORTISONE 0.5% CREAM,TOP
+"DATA",176.112,28865,1)
+198707
+"DATA",176.112,28866,0)
+4002929^HYDROCORTISONE ACETATE 0.5% CREAM,TOP
+"DATA",176.112,28866,1)
+198707
+"DATA",176.112,28867,0)
+4008697^HYDROCORTISONE 0.5%/ALOE CREAM,TOP
+"DATA",176.112,28867,1)
+198707
+"DATA",176.112,28868,0)
+4007867^GUAIFENESIN 200MG CAP
+"DATA",176.112,28868,1)
+198689
+"DATA",176.112,28869,0)
+4007869^GUAIFENESIN 100MG TAB
+"DATA",176.112,28869,1)
+198687
+"DATA",176.112,28870,0)
+4004219^DEXTROSE 32GM/80GM SQUEEZE TUBE
+"DATA",176.112,28870,1)
+198683
+"DATA",176.112,28871,0)
+4004220^DEXTROSE 18GM/45GM SQUEEZE TUBE
+"DATA",176.112,28871,1)
+198683
+"DATA",176.112,28872,0)
+4004221^DEXTROSE 15GM/37.5GM SQUEEZE TUBE
+"DATA",176.112,28872,1)
+198683
+"DATA",176.112,28873,0)
+4025333^DEXTROSE 15GM/45GM SQUEEZE TUBE
+"DATA",176.112,28873,1)
+198683
+"DATA",176.112,28874,0)
+4001204^FOLIC ACID 0.8MG TAB
+"DATA",176.112,28874,1)
+198641
+"DATA",176.112,28875,0)
+4001203^FOLIC ACID 0.4MG TAB
+"DATA",176.112,28875,1)
+198640
+"DATA",176.112,28876,0)
+4016637^FISH OIL 1200MG CAP,ORAL
+"DATA",176.112,28876,1)
+198639
+"DATA",176.112,28877,0)
+4016638^FISH OIL 2000MG CAP,ORAL
+"DATA",176.112,28877,1)
+198637
+"DATA",176.112,28878,0)
+4008237^FERROUS SO4 300MG TAB
+"DATA",176.112,28878,1)
+198635
+"DATA",176.112,28879,0)
+4015709^FERROUS SO4 300MG TAB,UD
+"DATA",176.112,28879,1)
+198635
+"DATA",176.112,28880,0)
+4015707^FERROUS SO4 195MG TAB,UD
+"DATA",176.112,28880,1)
+198633
+"DATA",176.112,28881,0)
+4008246^FERROUS SO4 195MG TAB
+"DATA",176.112,28881,1)
+198633
+"DATA",176.112,28882,0)
+4008571^FERROUS GLUCONATE 325MG TAB
+"DATA",176.112,28882,1)
+198632
+"DATA",176.112,28883,0)
+4008572^FERROUS GLUCONATE 320MG TAB
+"DATA",176.112,28883,1)
+198629
+"DATA",176.112,28884,0)
+4008570^FERROUS GLUCONATE 300MG TAB
+"DATA",176.112,28884,1)
+198627
+"DATA",176.112,28885,0)
+4015710^FERROUS GLUCONATE 300MG TAB,UD
+"DATA",176.112,28885,1)
+198627
+"DATA",176.112,28886,0)
+4015706^FERROUS FUMARATE 350MG TAB,UD
+"DATA",176.112,28886,1)
+198625
+"DATA",176.112,28887,0)
+4004835^FERROUS FUMARATE 350MG TAB
+"DATA",176.112,28887,1)
+198625
+"DATA",176.112,28888,0)
+4004828^FERROUS FUMARATE 325MG TAB
+"DATA",176.112,28888,1)
+198624
+"DATA",176.112,28889,0)
+4004826^FERROUS FUMARATE 200MG TAB
+"DATA",176.112,28889,1)
+198623
+"DATA",176.112,28890,0)
+4015703^FERROUS FUMARATE 200MG TAB,UD
+"DATA",176.112,28890,1)
+198623
+"DATA",176.112,28891,0)
+4015702^FERROUS FUMARATE 100MG TAB,CHEWABLE,UD
+"DATA",176.112,28891,1)
+198622
+"DATA",176.112,28892,0)
+4008067^DOXYLAMINE SUCCINATE 25MG TAB
+"DATA",176.112,28892,1)
+198614
+"DATA",176.112,28893,0)
+4008228^CASANTHRANOL 30MG/DOCUSATE K 100MG CAP
+"DATA",176.112,28893,1)
+198613
+"DATA",176.112,28894,0)
+4008227^CASANTHRANOL 30MG/DOCUSATE NA 100MG CAP
+"DATA",176.112,28894,1)
+198613
+"DATA",176.112,28895,0)
+4008048^DOCUSATE NA 50MG CAP
+"DATA",176.112,28895,1)
+198611
+"DATA",176.112,28896,0)
+4008062^DOCUSATE CA 50MG CAP
+"DATA",176.112,28896,1)
+198611
+"DATA",176.112,28897,0)
+4015646^DIPHENHYDRAMINE HCL 1% CREAM,TOP
+"DATA",176.112,28897,1)
+198607
+"DATA",176.112,28898,0)
+4016725^DIMETHICONE 2% LOTION,TOP,SPRAY
+"DATA",176.112,28898,1)
+198605
+"DATA",176.112,28899,0)
+4003344^DIMENHYDRINATE 50MG TAB
+"DATA",176.112,28899,1)
+198603
+"DATA",176.112,28900,0)
+4008695^DIBUCAINE 1% OINT,TOP
+"DATA",176.112,28900,1)
+198601
+"DATA",176.112,28901,0)
+4004217^DEXTROSE 100GM/180ML
+"DATA",176.112,28901,1)
+198599
+"DATA",176.112,28902,0)
+4025973^DEXTROMETHORPHAN HBR 5MG/5ML LIQUID
+"DATA",176.112,28902,1)
+198595
+"DATA",176.112,28903,0)
+4010584^CHOLINE 500MG TAB
+"DATA",176.112,28903,1)
+198579
+"DATA",176.112,28904,0)
+4008406^CASCARA SAGRADA 325MG TAB
+"DATA",176.112,28904,1)
+198562
+"DATA",176.112,28905,0)
+4007248^LEVOCARNITINE 250MG CAP
+"DATA",176.112,28905,1)
+198561
+"DATA",176.112,28906,0)
+4013311^CAPSAICIN 0.075% LOTION,TOP
+"DATA",176.112,28906,1)
+198557
+"DATA",176.112,28907,0)
+4009084^CAPSAICIN 0.025% CREAM,TOP
+"DATA",176.112,28907,1)
+198555
+"DATA",176.112,28908,0)
+4025009^CALCIUM PHOSPHATE 600MG TAB
+"DATA",176.112,28908,1)
+198554
+"DATA",176.112,28909,0)
+4009237^CALCIUM LACTATE 650MG TAB
+"DATA",176.112,28909,1)
+198553
+"DATA",176.112,28910,0)
+4009235^CALCIUM LACTATE 648MG TAB
+"DATA",176.112,28910,1)
+198552
+"DATA",176.112,28911,0)
+4009236^CALCIUM LACTATE 325MG TAB
+"DATA",176.112,28911,1)
+198550
+"DATA",176.112,28912,0)
+4003492^CALCIUM GLUCONATE 650MG TAB
+"DATA",176.112,28912,1)
+198547
+"DATA",176.112,28913,0)
+4003491^CALCIUM GLUCONATE 500MG TAB
+"DATA",176.112,28913,1)
+198546
+"DATA",176.112,28914,0)
+4009633^CALCIUM CITRATE 950MG TAB
+"DATA",176.112,28914,1)
+198538
+"DATA",176.112,28915,0)
+4008081^CALCIUM CARBONATE 650MG TAB
+"DATA",176.112,28915,1)
+198533
+"DATA",176.112,28916,0)
+4008092^CALCIUM CARBONATE 1.5GM TAB
+"DATA",176.112,28916,1)
+198532
+"DATA",176.112,28917,0)
+4008091^CALCIUM CARBONATE 600MG TAB
+"DATA",176.112,28917,1)
+198532
+"DATA",176.112,28918,0)
+4008086^CALCIUM CARBONATE 500MG/5ML SUSP,ORAL
+"DATA",176.112,28918,1)
+198530
+"DATA",176.112,28919,0)
+4009963^CAFFEINE 200MG TAB
+"DATA",176.112,28919,1)
+198520
+"DATA",176.112,28920,0)
+4004702^BROMPHENIRAMINE MALEATE 8MG TAB,SA
+"DATA",176.112,28920,1)
+198516
+"DATA",176.112,28921,0)
+4004703^BROMPHENIRAMINE MALEATE 12MG TAB,SA
+"DATA",176.112,28921,1)
+198515
+"DATA",176.112,28922,0)
+4008443^BISACODYL 10MG SUPP,RTL
+"DATA",176.112,28922,1)
+198509
+"DATA",176.112,28923,0)
+4008445^BISACODYL 10MG ENEMA
+"DATA",176.112,28923,1)
+198508
+"DATA",176.112,28924,0)
+4005310^BENZOYL PEROXIDE 5.5% LOTION
+"DATA",176.112,28924,1)
+198503
+"DATA",176.112,28925,0)
+4009561^BENZOIC ACID 6%/SALICYLIC ACID 3% OINT,TOP
+"DATA",176.112,28925,1)
+198501
+"DATA",176.112,28926,0)
+4007827^BENZOCAINE 7.5% GEL,DENTAL
+"DATA",176.112,28926,1)
+198496
+"DATA",176.112,28927,0)
+4007824^BENZOCAINE 5% CREAM,TOP
+"DATA",176.112,28927,1)
+198494
+"DATA",176.112,28928,0)
+4007826^BENZOCAINE 5MG LOZENGE
+"DATA",176.112,28928,1)
+198493
+"DATA",176.112,28929,0)
+4007829^BENZOCAINE 10% GEL,DENTAL
+"DATA",176.112,28929,1)
+198488
+"DATA",176.112,28930,0)
+4007825^BENZOCAINE 10MG LOZENGE
+"DATA",176.112,28930,1)
+198487
+"DATA",176.112,28931,0)
+4008943^ATTAPULGITE 600MG/15ML LIQUID,ORAL
+"DATA",176.112,28931,1)
+198483
+"DATA",176.112,28932,0)
+4008944^ATTAPULGITE 750MG TAB
+"DATA",176.112,28932,1)
+198482
+"DATA",176.112,28933,0)
+4008946^ATTAPULGITE 300MG TAB,CHEWABLE
+"DATA",176.112,28933,1)
+198481
+"DATA",176.112,28934,0)
+4008672^ASPIRIN 400MG/CAFFEINE 30MG TAB
+"DATA",176.112,28934,1)
+198479
+"DATA",176.112,28935,0)
+4008676^ASPIRIN 400MG/CAFFEINE 32MG TAB
+"DATA",176.112,28935,1)
+198479
+"DATA",176.112,28936,0)
+4016494^ASPIRIN 162MG TAB,EC
+"DATA",176.112,28936,1)
+198477
+"DATA",176.112,28937,0)
+4005761^ASPIRIN 650MG TAB
+"DATA",176.112,28937,1)
+198475
+"DATA",176.112,28938,0)
+4005745^ASPIRIN 650MG SUPP,RTL
+"DATA",176.112,28938,1)
+198474
+"DATA",176.112,28939,0)
+4005738^ASPIRIN 600MG SUPP,RTL
+"DATA",176.112,28939,1)
+198473
+"DATA",176.112,28940,0)
+4005741^ASPIRIN 60MG SUPP,RTL
+"DATA",176.112,28940,1)
+198472
+"DATA",176.112,28941,0)
+4005758^ASPIRIN 500MG TAB
+"DATA",176.112,28941,1)
+198471
+"DATA",176.112,28942,0)
+4012116^ASPIRIN 500MG/MAGNESIUM OXIDE TAB
+"DATA",176.112,28942,1)
+198471
+"DATA",176.112,28943,0)
+4009471^ASA 500MG/CA CARB/MG CARB/MG OXIDE TAB
+"DATA",176.112,28943,1)
+198471
+"DATA",176.112,28944,0)
+4005753^ASPIRIN 486MG TAB
+"DATA",176.112,28944,1)
+198470
+"DATA",176.112,28945,0)
+4005744^ASPIRIN 325MG SUPP,RTL
+"DATA",176.112,28945,1)
+198468
+"DATA",176.112,28946,0)
+4005769^ASPIRIN 325MG TAB,EC,UD
+"DATA",176.112,28946,1)
+198467
+"DATA",176.112,28947,0)
+4005733^ASPIRIN 325MG TAB,EC
+"DATA",176.112,28947,1)
+198467
+"DATA",176.112,28948,0)
+4005760^ASPIRIN 325MG CAP
+"DATA",176.112,28948,1)
+198466
+"DATA",176.112,28949,0)
+4005737^ASPIRIN 300MG SUPP,RTL
+"DATA",176.112,28949,1)
+198464
+"DATA",176.112,28950,0)
+4005743^ASPIRIN 200MG SUPP,RTL
+"DATA",176.112,28950,1)
+198463
+"DATA",176.112,28951,0)
+4005736^ASPIRIN 125MG SUPP,RTL
+"DATA",176.112,28951,1)
+198462
+"DATA",176.112,28952,0)
+4005742^ASPIRIN 120MG SUPP,RTL
+"DATA",176.112,28952,1)
+198461
+"DATA",176.112,28953,0)
+4006242^AMMONIUM CHLORIDE 500MG TAB
+"DATA",176.112,28953,1)
+198460
+"DATA",176.112,28954,0)
+4008314^ALUMINUM HYDROXIDE 600MG TAB
+"DATA",176.112,28954,1)
+198456
+"DATA",176.112,28955,0)
+4008317^ALUMINUM HYDROXIDE 500MG CAP
+"DATA",176.112,28955,1)
+198455
+"DATA",176.112,28956,0)
+4024986^ACETAMINOPHEN 80MG SUPP,RTL
+"DATA",176.112,28956,1)
+198445
+"DATA",176.112,28957,0)
+4007156^ACETAMINOPHEN 650MG TAB
+"DATA",176.112,28957,1)
+198444
+"DATA",176.112,28958,0)
+4007162^ACETAMINOPHEN 650MG SUPP,RTL
+"DATA",176.112,28958,1)
+198443
+"DATA",176.112,28959,0)
+4007183^ACETAMINOPHEN 500MG TAB,UD
+"DATA",176.112,28959,1)
+198440
+"DATA",176.112,28960,0)
+4007154^ACETAMINOPHEN 500MG TAB
+"DATA",176.112,28960,1)
+198440
+"DATA",176.112,28961,0)
+4007157^ACETAMINOPHEN 500MG CAP
+"DATA",176.112,28961,1)
+198439
+"DATA",176.112,28962,0)
+4007163^ACETAMINOPHEN 325MG SUPP,RTL
+"DATA",176.112,28962,1)
+198437
+"DATA",176.112,28963,0)
+4007161^ACETAMINOPHEN 120MG SUPP,RTL
+"DATA",176.112,28963,1)
+198434
+"DATA",176.112,28964,0)
+4012733^LAMOTRIGINE 200MG TAB
+"DATA",176.112,28964,1)
+198429
+"DATA",176.112,28965,0)
+4012732^LAMOTRIGINE 150MG TAB
+"DATA",176.112,28965,1)
+198428
+"DATA",176.112,28966,0)
+4012731^LAMOTRIGINE 100MG TAB
+"DATA",176.112,28966,1)
+198427
+"DATA",176.112,28967,0)
+4006944^HYDROCODONE 1.66MG/P-EPHRINE 5MG/PYRILAMINE 8.33MG/5ML SYRUP
+"DATA",176.112,28967,1)
+198424
+"DATA",176.112,28968,0)
+4006765^METHENAMINE 300MG/NA BIPHOSPHATE 500MG TAB
+"DATA",176.112,28968,1)
+198422
+"DATA",176.112,28969,0)
+4002043^SULFISOXAZOLE ACETYL 500MG/5ML SUSP,ORAL
+"DATA",176.112,28969,1)
+198420
+"DATA",176.112,28970,0)
+4005950^LIDOCAINE HCL 4MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,28970,1)
+198417
+"DATA",176.112,28971,0)
+4005949^LIDOCAINE HCL 2MG/ML/DEXTROSE 5% INJ
+"DATA",176.112,28971,1)
+198416
+"DATA",176.112,28972,0)
+4006062^TROMETHAMINE 18GM/BTL INJ
+"DATA",176.112,28972,1)
+198412
+"DATA",176.112,28973,0)
+4004924^SODIUM FLUORIDE 1% GEL
+"DATA",176.112,28973,1)
+198411
+"DATA",176.112,28974,0)
+4010111^NICOTINE 15MG/16HRS PATCH
+"DATA",176.112,28974,1)
+198407
+"DATA",176.112,28975,0)
+4010110^NICOTINE 10MG/16HRS PATCH
+"DATA",176.112,28975,1)
+198406
+"DATA",176.112,28976,0)
+4002416^IBUPROFEN 100MG TAB
+"DATA",176.112,28976,1)
+198405
+"DATA",176.112,28977,0)
+4004904^CEFOTAXIME NA 1GM/BAG INJ
+"DATA",176.112,28977,1)
+198396
+"DATA",176.112,28978,0)
+4004905^CEFOTAXIME NA 2GM/BAG INJ
+"DATA",176.112,28978,1)
+198395
+"DATA",176.112,28979,0)
+4012514^ISONIAZID 50MG/PYRAZINAMIDE 300MG/RIFAMPIN 120MG TAB
+"DATA",176.112,28979,1)
+198384
+"DATA",176.112,28980,0)
+4012482^ROCURONIUM BR 10MG/ML INJ,10ML VIL
+"DATA",176.112,28980,1)
+198383
+"DATA",176.112,28981,0)
+4012481^ROCURONIUM BR 10MG/ML INJ,5ML VIL
+"DATA",176.112,28981,1)
+198383
+"DATA",176.112,28982,0)
+4012606^FAMCICLOVIR 500MG TAB
+"DATA",176.112,28982,1)
+198382
+"DATA",176.112,28983,0)
+4016085^FAMCICLOVIR 500MG TAB,UD
+"DATA",176.112,28983,1)
+198382
+"DATA",176.112,28984,0)
+4009645^TIOCONAZOLE 6.5%/APPLICATOR OINT,VAG
+"DATA",176.112,28984,1)
+198380
+"DATA",176.112,28985,0)
+4009646^TIOCONAZOLE 6.5% OINT,VAG
+"DATA",176.112,28985,1)
+198380
+"DATA",176.112,28986,0)
+4012486^TACROLIMUS 5MG/ML INJ,SOLN,1ML AMP
+"DATA",176.112,28986,1)
+198379
+"DATA",176.112,28987,0)
+4012485^TACROLIMUS 5MG CAP
+"DATA",176.112,28987,1)
+198378
+"DATA",176.112,28988,0)
+4012484^TACROLIMUS 1MG CAP
+"DATA",176.112,28988,1)
+198377
+"DATA",176.112,28989,0)
+4005093^ERGOTAMINE TARTRATE 2MG TAB,SUBLINGUAL
+"DATA",176.112,28989,1)
+198376
+"DATA",176.112,28990,0)
+4012308^CALCIPOTRIENE 0.005% OINT
+"DATA",176.112,28990,1)
+198373
+"DATA",176.112,28991,0)
+4012297^TORSEMIDE 5MG TAB
+"DATA",176.112,28991,1)
+198372
+"DATA",176.112,28992,0)
+4012299^TORSEMIDE 20MG TAB
+"DATA",176.112,28992,1)
+198371
+"DATA",176.112,28993,0)
+4013715^TORSEMIDE 20MG TAB,UD
+"DATA",176.112,28993,1)
+198371
+"DATA",176.112,28994,0)
+4012300^TORSEMIDE 100MG TAB
+"DATA",176.112,28994,1)
+198370
+"DATA",176.112,28995,0)
+4012298^TORSEMIDE 10MG TAB
+"DATA",176.112,28995,1)
+198369
+"DATA",176.112,28996,0)
+4000722^PHENOBARBITAL NA 65MG/ML INJ
+"DATA",176.112,28996,1)
+198368
+"DATA",176.112,28997,0)
+4005450^BPM 12MG/P-EPHRINE 15MG/P-PROPANOL 15MG TAB,SA
+"DATA",176.112,28997,1)
+198367
+"DATA",176.112,28998,0)
+4003096^PROCHLORPERAZINE MALEATE 25MG TAB
+"DATA",176.112,28998,1)
+198366
+"DATA",176.112,28999,0)
+4003099^PROCHLORPERAZINE 25MG TAB
+"DATA",176.112,28999,1)
+198366
+"DATA",176.112,29000,0)
+4003098^PROCHLORPERAZINE 10MG TAB
+"DATA",176.112,29000,1)
+198365
+"DATA",176.112,29001,0)
+4003095^PROCHLORPERAZINE MALEATE 10MG TAB
+"DATA",176.112,29001,1)
+198365
+"DATA",176.112,29002,0)
+4008584^DICLOFENAC POTASSIUM 50MG TAB
+"DATA",176.112,29002,1)
+198364
+"DATA",176.112,29003,0)
+4012724^PREDNICARBATE 0.1% CREAM,TOP
+"DATA",176.112,29003,1)
+198363
+"DATA",176.112,29004,0)
+4012352^BISOPROLOL FUMARATE 5MG TAB
+"DATA",176.112,29004,1)
+198362
+"DATA",176.112,29005,0)
+4012353^BISOPROLOL FUMARATE 10MG TAB
+"DATA",176.112,29005,1)
+198361
+"DATA",176.112,29006,0)
+4012175^INTERFERON BETA-1B,RECOMBINANT 9.6 MILLION UNT/VIL INJ
+"DATA",176.112,29006,1)
+198360
+"DATA",176.112,29007,0)
+4015939^INTERFERON BETA-1B,RECOMBINANT (250MCG) 0.3MG/VIL INJ
+"DATA",176.112,29007,1)
+198360
+"DATA",176.112,29008,0)
+4012143^FELBAMATE 600MG TAB
+"DATA",176.112,29008,1)
+198359
+"DATA",176.112,29009,0)
+4012142^FELBAMATE 400MG TAB
+"DATA",176.112,29009,1)
+198358
+"DATA",176.112,29010,0)
+4012157^CISAPRIDE 20MG TAB
+"DATA",176.112,29010,1)
+198357
+"DATA",176.112,29011,0)
+4013345^CISAPRIDE 20MG TAB,UD
+"DATA",176.112,29011,1)
+198357
+"DATA",176.112,29012,0)
+4012156^CISAPRIDE 10MG TAB
+"DATA",176.112,29012,1)
+198356
+"DATA",176.112,29013,0)
+4013344^CISAPRIDE 10MG TAB,UD
+"DATA",176.112,29013,1)
+198356
+"DATA",176.112,29014,0)
+4000950^EPHEDRINE SO4 50MG CAP
+"DATA",176.112,29014,1)
+198355
+"DATA",176.112,29015,0)
+4009070^ZIDOVUDINE 100MG CAP
+"DATA",176.112,29015,1)
+198352
+"DATA",176.112,29016,0)
+4007148^YOHIMBINE HCL 5.4MG TAB
+"DATA",176.112,29016,1)
+198351
+"DATA",176.112,29017,0)
+4007147^YOHIMBINE HCL 5MG TAB
+"DATA",176.112,29017,1)
+198350
+"DATA",176.112,29018,0)
+4026947^WARFARIN NA 4MG TAB,UD
+"DATA",176.112,29018,1)
+198349
+"DATA",176.112,29019,0)
+4005204^WARFARIN NA 4MG TAB
+"DATA",176.112,29019,1)
+198349
+"DATA",176.112,29020,0)
+4003636^VERAPAMIL HCL 40MG TAB
+"DATA",176.112,29020,1)
+198347
+"DATA",176.112,29021,0)
+4003633^VERAPAMIL HCL 120MG TAB
+"DATA",176.112,29021,1)
+198346
+"DATA",176.112,29022,0)
+4006052^UREA 40% CREAM,TOP
+"DATA",176.112,29022,1)
+198342
+"DATA",176.112,29023,0)
+4026603^UREA 40% EMULSION,TOP
+"DATA",176.112,29023,1)
+198342
+"DATA",176.112,29024,0)
+4003532^URACIL MUSTARD 1MG CAP
+"DATA",176.112,29024,1)
+198341
+"DATA",176.112,29025,0)
+4005061^TROLEANDOMYCIN 250MG CAP
+"DATA",176.112,29025,1)
+198337
+"DATA",176.112,29026,0)
+4007000^TRIOXSALEN 5MG TAB
+"DATA",176.112,29026,1)
+198336
+"DATA",176.112,29027,0)
+4008224^SULFAMETHIZOLE 800MG/TRIMETHOPRIM 160MG TAB
+"DATA",176.112,29027,1)
+198335
+"DATA",176.112,29028,0)
+4013984^SULFAMETHOXAZOLE 800MG/TRIMETHOPRIM 160MG TAB,UD
+"DATA",176.112,29028,1)
+198335
+"DATA",176.112,29029,0)
+4001953^SULFAMETHOXAZOLE 800MG/TRIMETHOPRIM 160MG TAB
+"DATA",176.112,29029,1)
+198335
+"DATA",176.112,29030,0)
+4008223^SULFAMETHIZOLE 400MG/TRIMETHOPRIM 80MG TAB
+"DATA",176.112,29030,1)
+198334
+"DATA",176.112,29031,0)
+4001954^SULFAMETHOXAZOLE 400MG/TRIMETHOPRIM 80MG TAB
+"DATA",176.112,29031,1)
+198334
+"DATA",176.112,29032,0)
+4013974^SULFAMETHOXAZOLE 400MG/TRIMETHOPRIM 80MG TAB,UD
+"DATA",176.112,29032,1)
+198334
+"DATA",176.112,29033,0)
+4002208^TRIMETHOPRIM 200MG TAB
+"DATA",176.112,29033,1)
+198333
+"DATA",176.112,29034,0)
+4002207^TRIMETHOPRIM 100MG TAB
+"DATA",176.112,29034,1)
+198332
+"DATA",176.112,29035,0)
+4004662^TRIMETHOBENZAMIDE HCL 250MG CAP
+"DATA",176.112,29035,1)
+198331
+"DATA",176.112,29036,0)
+4002723^TRIHEXYPHENIDYL HCL 5MG TAB
+"DATA",176.112,29036,1)
+198329
+"DATA",176.112,29037,0)
+4002722^TRIHEXYPHENIDYL HCL 2MG TAB
+"DATA",176.112,29037,1)
+198328
+"DATA",176.112,29038,0)
+4001978^TRIFLUPROMAZINE HCL 20MG/ML INJ
+"DATA",176.112,29038,1)
+198327
+"DATA",176.112,29039,0)
+4001982^TRIFLUPROMAZINE HCL 10MG/ML INJ
+"DATA",176.112,29039,1)
+198326
+"DATA",176.112,29040,0)
+4006801^TRIFLUOPERAZINE HCL 5MG TAB
+"DATA",176.112,29040,1)
+198325
+"DATA",176.112,29041,0)
+4006800^TRIFLUOPERAZINE HCL 2MG TAB
+"DATA",176.112,29041,1)
+198324
+"DATA",176.112,29042,0)
+4006802^TRIFLUOPERAZINE HCL 10MG TAB
+"DATA",176.112,29042,1)
+198323
+"DATA",176.112,29043,0)
+4006799^TRIFLUOPERAZINE HCL 1MG TAB
+"DATA",176.112,29043,1)
+198322
+"DATA",176.112,29044,0)
+4005643^RESERPINE 0.1MG/TRICHLORMETHIAZIDE 4MG TAB
+"DATA",176.112,29044,1)
+198321
+"DATA",176.112,29045,0)
+4005642^RESERPINE 0.1MG/TRICHLORMETHIAZIDE 2MG TAB
+"DATA",176.112,29045,1)
+198320
+"DATA",176.112,29046,0)
+4005641^TRICHLORMETHIAZIDE 4MG TAB
+"DATA",176.112,29046,1)
+198319
+"DATA",176.112,29047,0)
+4003416^TRIAZOLAM 0.25MG TAB
+"DATA",176.112,29047,1)
+198318
+"DATA",176.112,29048,0)
+4003415^TRIAZOLAM 0.125MG TAB
+"DATA",176.112,29048,1)
+198317
+"DATA",176.112,29049,0)
+4002734^HYDROCHLOROTHIAZIDE 25MG/TRIAMTERENE 37.5MG CAP
+"DATA",176.112,29049,1)
+198316
+"DATA",176.112,29050,0)
+4002733^HYDROCHLOROTHIAZIDE 50MG/TRIAMTERENE 50MG TAB
+"DATA",176.112,29050,1)
+198315
+"DATA",176.112,29051,0)
+4002729^HYDROCHLOROTHIAZIDE 25MG/TRIAMTERENE 50MG CAP
+"DATA",176.112,29051,1)
+198314
+"DATA",176.112,29052,0)
+4002735^HYDROCHLOROTHIAZIDE 25MG/TRIAMTERENE 50MG CAP,UD
+"DATA",176.112,29052,1)
+198314
+"DATA",176.112,29053,0)
+4007569^TRIAMTERENE 50MG CAP
+"DATA",176.112,29053,1)
+198313
+"DATA",176.112,29054,0)
+4007570^TRIAMTERENE 100MG CAP
+"DATA",176.112,29054,1)
+198312
+"DATA",176.112,29055,0)
+4001615^TRIAMCINOLONE ACETONIDE 0.5% OINT,TOP
+"DATA",176.112,29055,1)
+198309
+"DATA",176.112,29056,0)
+4001614^TRIAMCINOLONE ACETONIDE 0.5% CREAM,TOP
+"DATA",176.112,29056,1)
+198308
+"DATA",176.112,29057,0)
+4001609^TRIAMCINOLONE ACETONIDE 0.1% LOTION
+"DATA",176.112,29057,1)
+198307
+"DATA",176.112,29058,0)
+4001606^TRIAMCINOLONE ACETONIDE 0.025% OINT,TOP
+"DATA",176.112,29058,1)
+198306
+"DATA",176.112,29059,0)
+4001601^TRIAMCINOLONE ACETONIDE 0.025% CREAM,TOP
+"DATA",176.112,29059,1)
+198305
+"DATA",176.112,29060,0)
+4001613^TRIAMCINOLONE 8MG TAB
+"DATA",176.112,29060,1)
+198304
+"DATA",176.112,29061,0)
+4001612^TRIAMCINOLONE 4MG TAB
+"DATA",176.112,29061,1)
+198303
+"DATA",176.112,29062,0)
+4001616^TRIAMCINOLONE 2MG TAB
+"DATA",176.112,29062,1)
+198302
+"DATA",176.112,29063,0)
+4001617^TRIAMCINOLONE 1MG TAB
+"DATA",176.112,29063,1)
+198301
+"DATA",176.112,29064,0)
+4005217^TRETINOIN 0.1% CREAM,TOP
+"DATA",176.112,29064,1)
+198300
+"DATA",176.112,29065,0)
+4006655^TRAZODONE HCL 150MG TAB
+"DATA",176.112,29065,1)
+198299
+"DATA",176.112,29066,0)
+4006654^TRAZODONE HCL 100MG TAB
+"DATA",176.112,29066,1)
+198298
+"DATA",176.112,29067,0)
+4004980^TOLMETIN NA 600MG TAB
+"DATA",176.112,29067,1)
+198297
+"DATA",176.112,29068,0)
+4004979^TOLMETIN NA 400MG CAP
+"DATA",176.112,29068,1)
+198296
+"DATA",176.112,29069,0)
+4004978^TOLMETIN NA 200MG TAB
+"DATA",176.112,29069,1)
+198295
+"DATA",176.112,29070,0)
+4002661^TOLBUTAMIDE 500MG TAB
+"DATA",176.112,29070,1)
+198294
+"DATA",176.112,29071,0)
+4002366^TOLAZAMIDE 500MG TAB
+"DATA",176.112,29071,1)
+198293
+"DATA",176.112,29072,0)
+4002365^TOLAZAMIDE 250MG TAB
+"DATA",176.112,29072,1)
+198292
+"DATA",176.112,29073,0)
+4002364^TOLAZAMIDE 100MG TAB
+"DATA",176.112,29073,1)
+198291
+"DATA",176.112,29074,0)
+4002964^TOCAINIDE HCL 600MG TAB
+"DATA",176.112,29074,1)
+198290
+"DATA",176.112,29075,0)
+4013742^TOCAINIDE HCL 600MG TAB,UD
+"DATA",176.112,29075,1)
+198290
+"DATA",176.112,29076,0)
+4002965^TOCAINIDE 400MG TAB
+"DATA",176.112,29076,1)
+198289
+"DATA",176.112,29077,0)
+4013741^TOCAINIDE HCL 400MG TAB,UD
+"DATA",176.112,29077,1)
+198289
+"DATA",176.112,29078,0)
+4002963^TOCAINIDE HCL 400MG TAB
+"DATA",176.112,29078,1)
+198289
+"DATA",176.112,29079,0)
+4008965^TIOPRONIN 100MG TAB
+"DATA",176.112,29079,1)
+198287
+"DATA",176.112,29080,0)
+4002848^TIMOLOL MALEATE 5MG TAB
+"DATA",176.112,29080,1)
+198286
+"DATA",176.112,29081,0)
+4002850^TIMOLOL MALEATE 20MG TAB
+"DATA",176.112,29081,1)
+198285
+"DATA",176.112,29082,0)
+4002849^TIMOLOL MALEATE 10MG TAB
+"DATA",176.112,29082,1)
+198284
+"DATA",176.112,29083,0)
+4026202^TIMOLOL MALEATE 0.25% SOLN,OPH,0.2ML
+"DATA",176.112,29083,1)
+198283
+"DATA",176.112,29084,0)
+4002855^TIMOLOL HEMIHYDRATE 0.25% SOLN,OPH
+"DATA",176.112,29084,1)
+198283
+"DATA",176.112,29085,0)
+4002853^TIMOLOL MALEATE 0.25% GEL,OPH
+"DATA",176.112,29085,1)
+198283
+"DATA",176.112,29086,0)
+4002851^TIMOLOL MALEATE 0.25% SOLN,OPH
+"DATA",176.112,29086,1)
+198283
+"DATA",176.112,29087,0)
+4013430^TIMOLOL MALEATE 0.25% SOLN,OPH,0.3ML
+"DATA",176.112,29087,1)
+198283
+"DATA",176.112,29088,0)
+4002323^LEVOTHYROXINE NA 0.3MG TAB
+"DATA",176.112,29088,1)
+198281
+"DATA",176.112,29089,0)
+4000695^THYROID 180MG TAB
+"DATA",176.112,29089,1)
+198278
+"DATA",176.112,29090,0)
+4000689^THYROID 130MG TAB
+"DATA",176.112,29090,1)
+198277
+"DATA",176.112,29091,0)
+4000713^THYROID STRONG 130MG TAB
+"DATA",176.112,29091,1)
+198277
+"DATA",176.112,29092,0)
+4014339^THIORIDAZINE HCL 50MG TAB,UD
+"DATA",176.112,29092,1)
+198275
+"DATA",176.112,29093,0)
+4002675^THIORIDAZINE HCL 50MG TAB
+"DATA",176.112,29093,1)
+198275
+"DATA",176.112,29094,0)
+4014950^THIORIDAZINE HCL 50MG TAB UD
+"DATA",176.112,29094,1)
+198275
+"DATA",176.112,29095,0)
+4002674^THIORIDAZINE HCL 25MG TAB
+"DATA",176.112,29095,1)
+198274
+"DATA",176.112,29096,0)
+4002680^THIORIDAZINE HCL 200MG TAB
+"DATA",176.112,29096,1)
+198273
+"DATA",176.112,29097,0)
+4002679^THIORIDAZINE HCL 150MG TAB
+"DATA",176.112,29097,1)
+198272
+"DATA",176.112,29098,0)
+4002681^THIORIDAZINE HCL 15MG TAB
+"DATA",176.112,29098,1)
+198271
+"DATA",176.112,29099,0)
+4002676^THIORIDAZINE HCL 100MG TAB
+"DATA",176.112,29099,1)
+198270
+"DATA",176.112,29100,0)
+4006512^THIOGUANINE 40MG TAB
+"DATA",176.112,29100,1)
+198269
+"DATA",176.112,29101,0)
+4002970^THIABENDAZOLE 500MG TAB,CHEWABLE
+"DATA",176.112,29101,1)
+198268
+"DATA",176.112,29102,0)
+4005622^GUAIFENESIN 90MG/THEOPHYLLINE 150MG CAP
+"DATA",176.112,29102,1)
+198267
+"DATA",176.112,29103,0)
+4005614^GUAIFENESIN 90MG/THEOPHYLLINE,ANHYDROUS 150MG CAP
+"DATA",176.112,29103,1)
+198267
+"DATA",176.112,29104,0)
+4003677^THEOPHYLLINE 300MG TAB
+"DATA",176.112,29104,1)
+198263
+"DATA",176.112,29105,0)
+4003667^THEOPHYLLINE,ANHYDROUS 300MG TAB
+"DATA",176.112,29105,1)
+198263
+"DATA",176.112,29106,0)
+4003670^THEOPHYLLINE 250MG TAB
+"DATA",176.112,29106,1)
+198261
+"DATA",176.112,29107,0)
+4003663^THEOPHYLLINE,ANHYDROUS 200MG TAB
+"DATA",176.112,29107,1)
+198260
+"DATA",176.112,29108,0)
+4003676^THEOPHYLLINE 200MG TAB
+"DATA",176.112,29108,1)
+198260
+"DATA",176.112,29109,0)
+4003650^THEOPHYLLINE,ANHYDROUS 200MG CAP
+"DATA",176.112,29109,1)
+198259
+"DATA",176.112,29110,0)
+4003697^THEOPHYLLINE 200MG CAP
+"DATA",176.112,29110,1)
+198259
+"DATA",176.112,29111,0)
+4003669^THEOPHYLLINE 125MG TAB
+"DATA",176.112,29111,1)
+198258
+"DATA",176.112,29112,0)
+4003678^THEOPHYLLINE 125MG CAP,SA
+"DATA",176.112,29112,1)
+198257
+"DATA",176.112,29113,0)
+4003654^THEOPHYLLINE,ANHYDROUS 125MG CAP,SA
+"DATA",176.112,29113,1)
+198257
+"DATA",176.112,29114,0)
+4003690^THEOPHYLLINE,ANHYDROUS 125MG SPRINKLE CAP,SA
+"DATA",176.112,29114,1)
+198257
+"DATA",176.112,29115,0)
+4003662^THEOPHYLLINE,ANHYDROUS 100MG TAB
+"DATA",176.112,29115,1)
+198256
+"DATA",176.112,29116,0)
+4003696^THEOPHYLLINE 100MG TAB
+"DATA",176.112,29116,1)
+198256
+"DATA",176.112,29117,0)
+4003698^THEOPHYLLINE 100MG CAP
+"DATA",176.112,29117,1)
+198255
+"DATA",176.112,29118,0)
+4003649^THEOPHYLLINE,ANHYDROUS 100MG CAP
+"DATA",176.112,29118,1)
+198255
+"DATA",176.112,29119,0)
+4007439^TETRAHYDROZOLINE HCL 0.05% SOLN,NASAL
+"DATA",176.112,29119,1)
+198253
+"DATA",176.112,29120,0)
+4001910^TETRACYCLINE HCL 500MG CAP
+"DATA",176.112,29120,1)
+198252
+"DATA",176.112,29121,0)
+4001919^TETRACYCLINE HCL 2.2MG/ML SOLN,TOP
+"DATA",176.112,29121,1)
+198251
+"DATA",176.112,29122,0)
+4001908^TETRACYCLINE HCL 250MG CAP
+"DATA",176.112,29122,1)
+198250
+"DATA",176.112,29123,0)
+4001918^TETRACYCLINE HCL 100MG CAP
+"DATA",176.112,29123,1)
+198249
+"DATA",176.112,29124,0)
+4027725^TETRACAINE HCL 20MG/VIL INJ
+"DATA",176.112,29124,1)
+198248
+"DATA",176.112,29125,0)
+4004332^TETRACAINE HCL 1% INJ
+"DATA",176.112,29125,1)
+198248
+"DATA",176.112,29126,0)
+4004338^TETRACAINE HCL 0.5% OINT,TOP
+"DATA",176.112,29126,1)
+198247
+"DATA",176.112,29127,0)
+4001936^TESTOLACTONE 50MG TAB
+"DATA",176.112,29127,1)
+198246
+"DATA",176.112,29128,0)
+4009146^TERCONAZOLE 80MG SUPP,VAG
+"DATA",176.112,29128,1)
+198245
+"DATA",176.112,29129,0)
+4004615^TERBUTALINE SO4 5MG TAB
+"DATA",176.112,29129,1)
+198244
+"DATA",176.112,29130,0)
+4002700^TEMAZEPAM 7.5MG CAP
+"DATA",176.112,29130,1)
+198243
+"DATA",176.112,29131,0)
+4002699^TEMAZEPAM 30MG CAP
+"DATA",176.112,29131,1)
+198242
+"DATA",176.112,29132,0)
+4002698^TEMAZEPAM 15MG CAP
+"DATA",176.112,29132,1)
+198241
+"DATA",176.112,29133,0)
+4004890^TAMOXIFEN CITRATE 10MG TAB
+"DATA",176.112,29133,1)
+198240
+"DATA",176.112,29134,0)
+4002975^SULINDAC 200MG TAB
+"DATA",176.112,29134,1)
+198239
+"DATA",176.112,29135,0)
+4002974^SULINDAC 150MG TAB
+"DATA",176.112,29135,1)
+198238
+"DATA",176.112,29136,0)
+4006951^BENZOYL PEROXIDE 5%/SULFUR 2% LOTION
+"DATA",176.112,29136,1)
+198237
+"DATA",176.112,29137,0)
+4006952^BENZOYL PEROXIDE 10%/SULFUR 5% LOTION
+"DATA",176.112,29137,1)
+198236
+"DATA",176.112,29138,0)
+4002042^SULFISOXAZOLE 500MG TAB
+"DATA",176.112,29138,1)
+198235
+"DATA",176.112,29139,0)
+4006537^SULFINPYRAZONE 200MG CAP
+"DATA",176.112,29139,1)
+198234
+"DATA",176.112,29140,0)
+4006536^SULFINPYRAZONE 100MG TAB
+"DATA",176.112,29140,1)
+198233
+"DATA",176.112,29141,0)
+4002715^SULFASALAZINE 500MG TAB
+"DATA",176.112,29141,1)
+198232
+"DATA",176.112,29142,0)
+4002048^SULFAMETHOXAZOLE 500MG TAB
+"DATA",176.112,29142,1)
+198231
+"DATA",176.112,29143,0)
+4005017^SULFAMETHIZOLE 500MG TAB
+"DATA",176.112,29143,1)
+198230
+"DATA",176.112,29144,0)
+4002234^PYRIMETHAMINE 25MG/SULFADOXINE 500MG TAB
+"DATA",176.112,29144,1)
+198229
+"DATA",176.112,29145,0)
+4001177^SULFADIAZINE 500MG TAB
+"DATA",176.112,29145,1)
+198228
+"DATA",176.112,29146,0)
+4009262^SUCCIMER 100MG CAP
+"DATA",176.112,29146,1)
+198227
+"DATA",176.112,29147,0)
+4004353^STANOZOLOL 2MG TAB
+"DATA",176.112,29147,1)
+198226
+"DATA",176.112,29148,0)
+4002641^HYDROCHLOROTHIAZIDE 50MG/SPIRONOLACTONE 50MG TAB
+"DATA",176.112,29148,1)
+198225
+"DATA",176.112,29149,0)
+4002640^HYDROCHLOROTHIAZIDE 25MG/SPIRONOLACTONE 25MG TAB
+"DATA",176.112,29149,1)
+198224
+"DATA",176.112,29150,0)
+4002695^SPIRONOLACTONE 50MG TAB
+"DATA",176.112,29150,1)
+198223
+"DATA",176.112,29151,0)
+4002694^SPIRONOLACTONE 100MG TAB
+"DATA",176.112,29151,1)
+198222
+"DATA",176.112,29152,0)
+4008301^MORRHUATE NA 50MG/ML INJ
+"DATA",176.112,29152,1)
+198220
+"DATA",176.112,29153,0)
+4016607^SIMVASTATIN 40MG TAB,UD
+"DATA",176.112,29153,1)
+198211
+"DATA",176.112,29154,0)
+4010153^SIMVASTATIN 40MG TAB
+"DATA",176.112,29154,1)
+198211
+"DATA",176.112,29155,0)
+4005528^SCOPOLAMINE HBR 1MG/ML INJ
+"DATA",176.112,29155,1)
+198208
+"DATA",176.112,29156,0)
+4005527^SCOPOLAMINE HBR 0.4MG/ML INJ
+"DATA",176.112,29156,1)
+198207
+"DATA",176.112,29157,0)
+4006730^ACETAMINOPHEN 250MG/SALICYLAMIDE 600MG TAB
+"DATA",176.112,29157,1)
+198204
+"DATA",176.112,29158,0)
+4005657^ISONIAZID 150MG/RIFAMPIN 300MG CAP
+"DATA",176.112,29158,1)
+198203
+"DATA",176.112,29159,0)
+4005654^RIFAMPIN 300MG CAP
+"DATA",176.112,29159,1)
+198202
+"DATA",176.112,29160,0)
+4005655^RIFAMPIN 150MG CAP
+"DATA",176.112,29160,1)
+198201
+"DATA",176.112,29161,0)
+4010287^RIFABUTIN 150MG CAP
+"DATA",176.112,29161,1)
+198200
+"DATA",176.112,29162,0)
+4005701^POLYTHIAZIDE 2MG/RESERPINE 0.25MG TAB
+"DATA",176.112,29162,1)
+198198
+"DATA",176.112,29163,0)
+4001197^RESERPINE 0.25MG TAB
+"DATA",176.112,29163,1)
+198197
+"DATA",176.112,29164,0)
+4001198^RESERPINE 0.1MG TAB
+"DATA",176.112,29164,1)
+198196
+"DATA",176.112,29165,0)
+4001937^RAUWOLFIA SERPENTINA 50MG TAB
+"DATA",176.112,29165,1)
+198195
+"DATA",176.112,29166,0)
+4001938^RAUWOLFIA SERPENTINA 100MG TAB
+"DATA",176.112,29166,1)
+198194
+"DATA",176.112,29167,0)
+4007040^RANITIDINE HCL 300MG TAB
+"DATA",176.112,29167,1)
+198193
+"DATA",176.112,29168,0)
+4007044^RANITIDINE HCL 300MG CAP
+"DATA",176.112,29168,1)
+198192
+"DATA",176.112,29169,0)
+4007047^RANITIDINE HCL 150MG TAB,UD
+"DATA",176.112,29169,1)
+198191
+"DATA",176.112,29170,0)
+4007038^RANITIDINE HCL 150MG TAB
+"DATA",176.112,29170,1)
+198191
+"DATA",176.112,29171,0)
+4007043^RANITIDINE HCL 150MG CAP
+"DATA",176.112,29171,1)
+198190
+"DATA",176.112,29172,0)
+4009286^RAMIPRIL 5MG CAP
+"DATA",176.112,29172,1)
+198189
+"DATA",176.112,29173,0)
+4009285^RAMIPRIL 2.5MG CAP
+"DATA",176.112,29173,1)
+198188
+"DATA",176.112,29174,0)
+4005661^QUININE SO4 325MG CAP
+"DATA",176.112,29174,1)
+198186
+"DATA",176.112,29175,0)
+4005659^QUININE SO4 260MG TAB
+"DATA",176.112,29175,1)
+198185
+"DATA",176.112,29176,0)
+4009148^QUAZEPAM 7.5MG TAB
+"DATA",176.112,29176,1)
+198184
+"DATA",176.112,29177,0)
+4009149^QUAZEPAM 15MG TAB
+"DATA",176.112,29177,1)
+198183
+"DATA",176.112,29178,0)
+4006481^PYRIMETHAMINE 25MG TAB
+"DATA",176.112,29178,1)
+198182
+"DATA",176.112,29179,0)
+4002774^PYRAZINAMIDE 500MG TAB
+"DATA",176.112,29179,1)
+198181
+"DATA",176.112,29180,0)
+4004656^CODEINE 20MG/GG 200MG/PSEUDEFED 60MG/5ML SYRUP
+"DATA",176.112,29180,1)
+198180
+"DATA",176.112,29181,0)
+4005172^PSEUDOEPHEDRINE HCL 60MG TAB
+"DATA",176.112,29181,1)
+198178
+"DATA",176.112,29182,0)
+4016129^PSEUDOEPHEDRINE HCL 60MG TAB,UD
+"DATA",176.112,29182,1)
+198178
+"DATA",176.112,29183,0)
+4002840^PROTRIPTYLINE HCL 5MG TAB
+"DATA",176.112,29183,1)
+198177
+"DATA",176.112,29184,0)
+4002841^PROTRIPTYLINE HCL 10MG TAB
+"DATA",176.112,29184,1)
+198176
+"DATA",176.112,29185,0)
+4000790^PROPYLTHIOURACIL 50MG TAB
+"DATA",176.112,29185,1)
+198175
+"DATA",176.112,29186,0)
+4002376^PROPRANOLOL HCL 80MG TAB
+"DATA",176.112,29186,1)
+198174
+"DATA",176.112,29187,0)
+4002377^PROPRANOLOL HCL 60MG TAB
+"DATA",176.112,29187,1)
+198173
+"DATA",176.112,29188,0)
+4002374^PROPRANOLOL HCL 20MG TAB
+"DATA",176.112,29188,1)
+198172
+"DATA",176.112,29189,0)
+4002359^PROPOXYPHENE N 100MG/ACETAMINOPHEN 650MG TAB
+"DATA",176.112,29189,1)
+198171
+"DATA",176.112,29190,0)
+4016926^PROPOXYPHENE N 100MG/ACETAMINOPHEN 650MG TAB,UD
+"DATA",176.112,29190,1)
+198171
+"DATA",176.112,29191,0)
+4002362^PROPOXYPHENE N 50MG/ACETAMINOPHEN 325MG TAB
+"DATA",176.112,29191,1)
+198170
+"DATA",176.112,29192,0)
+4001209^PROPOXYPHENE N 100MG TAB
+"DATA",176.112,29192,1)
+198169
+"DATA",176.112,29193,0)
+4001287^PROPOXYPHENE HCL 65MG/ASA 389MG/CAFN 32MG CAP
+"DATA",176.112,29193,1)
+198168
+"DATA",176.112,29194,0)
+4002360^PROPOXYPHENE HCL 65MG/ACETAMINOPHEN 650MG TAB
+"DATA",176.112,29194,1)
+198167
+"DATA",176.112,29195,0)
+4003221^PROPIOMAZINE HCL 20MG/ML INJ
+"DATA",176.112,29195,1)
+198166
+"DATA",176.112,29196,0)
+4003615^PROPANTHELINE BR 15MG TAB
+"DATA",176.112,29196,1)
+198165
+"DATA",176.112,29197,0)
+4002492^PROMETHAZINE HCL 50MG TAB
+"DATA",176.112,29197,1)
+198164
+"DATA",176.112,29198,0)
+4002493^PROMETHAZINE HCL 50MG SUPP,RTL
+"DATA",176.112,29198,1)
+198163
+"DATA",176.112,29199,0)
+4002488^PROMETHAZINE HCL 12.5MG TAB
+"DATA",176.112,29199,1)
+198162
+"DATA",176.112,29200,0)
+4003091^PROCHLORPERAZINE 5MG SUPP,RTL
+"DATA",176.112,29200,1)
+198161
+"DATA",176.112,29201,0)
+4003090^PROCHLORPERAZINE 2.5MG SUPP,RTL
+"DATA",176.112,29201,1)
+198160
+"DATA",176.112,29202,0)
+4003092^PROCHLORPERAZINE 25MG SUPP,RTL
+"DATA",176.112,29202,1)
+198159
+"DATA",176.112,29203,0)
+4004315^PROCAINE HCL 10% INJ,AMP,2ML
+"DATA",176.112,29203,1)
+198158
+"DATA",176.112,29204,0)
+4004308^PROCAINE HCL 10% INJ
+"DATA",176.112,29204,1)
+198158
+"DATA",176.112,29205,0)
+4001723^PROCAINAMIDE HCL 500MG CAP
+"DATA",176.112,29205,1)
+198157
+"DATA",176.112,29206,0)
+4001720^PROCAINAMIDE HCL 375MG TAB
+"DATA",176.112,29206,1)
+198156
+"DATA",176.112,29207,0)
+4001722^PROCAINAMIDE HCL 375MG CAP
+"DATA",176.112,29207,1)
+198155
+"DATA",176.112,29208,0)
+4001724^PROCAINAMIDE HCL 250MG CAP
+"DATA",176.112,29208,1)
+198154
+"DATA",176.112,29209,0)
+4002589^COLCHICINE 0.5MG/PROBENECID 500MG TAB
+"DATA",176.112,29209,1)
+198153
+"DATA",176.112,29210,0)
+4002588^PROBENECID 500MG TAB
+"DATA",176.112,29210,1)
+198152
+"DATA",176.112,29211,0)
+4005638^PROBUCOL 250MG TAB
+"DATA",176.112,29211,1)
+198151
+"DATA",176.112,29212,0)
+4004990^PRIMIDONE 50MG TAB
+"DATA",176.112,29212,1)
+198150
+"DATA",176.112,29213,0)
+4004343^PRIMAQUINE PO4 26.3MG TAB
+"DATA",176.112,29213,1)
+198149
+"DATA",176.112,29214,0)
+4002618^PREDNISONE 50MG TAB
+"DATA",176.112,29214,1)
+198148
+"DATA",176.112,29215,0)
+4002615^PREDNISONE 2.5MG TAB
+"DATA",176.112,29215,1)
+198146
+"DATA",176.112,29216,0)
+4002617^PREDNISONE 10MG TAB
+"DATA",176.112,29216,1)
+198145
+"DATA",176.112,29217,0)
+4002619^PREDNISONE 1MG TAB
+"DATA",176.112,29217,1)
+198144
+"DATA",176.112,29218,0)
+4003031^PREDNISOLONE 5MG TAB
+"DATA",176.112,29218,1)
+198142
+"DATA",176.112,29219,0)
+4016426^PRAZOSIN HCL 5MG CAP,UD
+"DATA",176.112,29219,1)
+198141
+"DATA",176.112,29220,0)
+4006863^PRAZOSIN HCL 5MG CAP
+"DATA",176.112,29220,1)
+198141
+"DATA",176.112,29221,0)
+4004360^PRAZIQUANTEL 600MG TAB
+"DATA",176.112,29221,1)
+198140
+"DATA",176.112,29222,0)
+4003943^POTASSIUM PERCHLORATE 200MG CAP
+"DATA",176.112,29222,1)
+198139
+"DATA",176.112,29223,0)
+4006230^DEXTROSE 5%/NACL 0.2%/KCL 10MEQ/L INJ
+"DATA",176.112,29223,1)
+198126
+"DATA",176.112,29224,0)
+4015800^POTASSIUM CHLORIDE 20MEQ TAB,SA (DISPERSIBLE)
+"DATA",176.112,29224,1)
+198116
+"DATA",176.112,29225,0)
+4015801^POTASSIUM CHLORIDE 20MEQ TAB,SA,UD (DISPERSIBLE)
+"DATA",176.112,29225,1)
+198116
+"DATA",176.112,29226,0)
+4000883^POTASSIUM CHLORIDE 20MEQ TAB,SA
+"DATA",176.112,29226,1)
+198116
+"DATA",176.112,29227,0)
+4006926^POTASSIUM CITRATE 50MG/SODIUM CITRATE 950MG TAB
+"DATA",176.112,29227,1)
+198114
+"DATA",176.112,29228,0)
+4005698^POLYTHIAZIDE 4MG TAB
+"DATA",176.112,29228,1)
+198112
+"DATA",176.112,29229,0)
+4005697^POLYTHIAZIDE 2MG TAB
+"DATA",176.112,29229,1)
+198111
+"DATA",176.112,29230,0)
+4005696^POLYTHIAZIDE 1MG TAB
+"DATA",176.112,29230,1)
+198110
+"DATA",176.112,29231,0)
+4006613^HYDROCORTISONE 0.5%/POLYMYXIN 10000UNT/ML SOLN,OTIC
+"DATA",176.112,29231,1)
+198109
+"DATA",176.112,29232,0)
+4005695^PIROXICAM 20MG CAP
+"DATA",176.112,29232,1)
+198108
+"DATA",176.112,29233,0)
+4025742^PIROXICAM 20MG CAP,UD
+"DATA",176.112,29233,1)
+198108
+"DATA",176.112,29234,0)
+4005694^PIROXICAM 10MG CAP
+"DATA",176.112,29234,1)
+198107
+"DATA",176.112,29235,0)
+4006431^PINDOLOL 5MG TAB
+"DATA",176.112,29235,1)
+198105
+"DATA",176.112,29236,0)
+4006430^PINDOLOL 10MG TAB
+"DATA",176.112,29236,1)
+198104
+"DATA",176.112,29237,0)
+4004977^PIMOZIDE 2MG TAB
+"DATA",176.112,29237,1)
+198103
+"DATA",176.112,29238,0)
+4002264^PHYTONADIONE 5MG TAB
+"DATA",176.112,29238,1)
+198102
+"DATA",176.112,29239,0)
+4006965^GG 200MG/P-EPHRINE 5MG/P-PROPANOL 45MG CAP
+"DATA",176.112,29239,1)
+198098
+"DATA",176.112,29240,0)
+4007925^PHENYLPROPANOLAMINE HCL 75MG CAP,SA
+"DATA",176.112,29240,1)
+198096
+"DATA",176.112,29241,0)
+4003924^PHENTERMINE 8MG TAB
+"DATA",176.112,29241,1)
+198092
+"DATA",176.112,29242,0)
+4003916^PHENTERMINE HCL 8MG TAB
+"DATA",176.112,29242,1)
+198092
+"DATA",176.112,29243,0)
+4003117^PHENOXYBENZAMINE HCL 10MG CAP
+"DATA",176.112,29243,1)
+198091
+"DATA",176.112,29244,0)
+4000732^PHENOBARBITAL 60MG TAB
+"DATA",176.112,29244,1)
+198089
+"DATA",176.112,29245,0)
+4000715^PHENOBARBITAL 16MG TAB
+"DATA",176.112,29245,1)
+198085
+"DATA",176.112,29246,0)
+4000724^PHENOBARBITAL 16MG CAP
+"DATA",176.112,29246,1)
+198084
+"DATA",176.112,29247,0)
+4000717^PHENOBARBITAL 100MG TAB
+"DATA",176.112,29247,1)
+198083
+"DATA",176.112,29248,0)
+4005007^PHENDIMETRAZINE TARTRATE 35MG TAB
+"DATA",176.112,29248,1)
+198082
+"DATA",176.112,29249,0)
+4006856^PHENAZOPYRIDINE HCL 200MG TAB
+"DATA",176.112,29249,1)
+198080
+"DATA",176.112,29250,0)
+4006857^PHENAZOPYRIDINE HCL 100MG TAB
+"DATA",176.112,29250,1)
+198079
+"DATA",176.112,29251,0)
+4006550^PERPHENAZINE 8MG TAB
+"DATA",176.112,29251,1)
+198078
+"DATA",176.112,29252,0)
+4006553^PERPHENAZINE 4MG TAB
+"DATA",176.112,29252,1)
+198077
+"DATA",176.112,29253,0)
+4006552^PERPHENAZINE 2MG TAB
+"DATA",176.112,29253,1)
+198076
+"DATA",176.112,29254,0)
+4006548^PERPHENAZINE 16MG TAB
+"DATA",176.112,29254,1)
+198075
+"DATA",176.112,29255,0)
+4000813^PENICILLIN V K 500MG TAB
+"DATA",176.112,29255,1)
+198073
+"DATA",176.112,29256,0)
+4000815^PENICILLIN V K 250MG TAB
+"DATA",176.112,29256,1)
+198072
+"DATA",176.112,29257,0)
+4002887^PENICILLAMINE 250MG TAB
+"DATA",176.112,29257,1)
+198071
+"DATA",176.112,29258,0)
+4002885^PENICILLAMINE 250MG CAP
+"DATA",176.112,29258,1)
+198070
+"DATA",176.112,29259,0)
+4002886^PENICILLAMINE 125MG CAP
+"DATA",176.112,29259,1)
+198069
+"DATA",176.112,29260,0)
+4006237^PEMOLINE 75MG TAB
+"DATA",176.112,29260,1)
+198068
+"DATA",176.112,29261,0)
+4006123^PARAMETHADIONE 150MG CAP
+"DATA",176.112,29261,1)
+198066
+"DATA",176.112,29262,0)
+4003067^OXYCODONE HCL 5MG/ACETAMINOPHEN 325MG TAB
+"DATA",176.112,29262,1)
+198063
+"DATA",176.112,29263,0)
+4003068^OXYCODONE HCL 5MG/ACETAMINOPHEN 500MG CAP
+"DATA",176.112,29263,1)
+198062
+"DATA",176.112,29264,0)
+4005157^OXYCODONE HCL 5MG TAB,UD
+"DATA",176.112,29264,1)
+198061
+"DATA",176.112,29265,0)
+4005151^OXYCODONE HCL 5MG TAB
+"DATA",176.112,29265,1)
+198061
+"DATA",176.112,29266,0)
+4006662^OXYBUTYNIN CL 5MG TAB
+"DATA",176.112,29266,1)
+198060
+"DATA",176.112,29267,0)
+4013405^OXYBUTYNIN CL 5MG TAB,UD
+"DATA",176.112,29267,1)
+198060
+"DATA",176.112,29268,0)
+4003155^OXAZEPAM 30MG CAP
+"DATA",176.112,29268,1)
+198059
+"DATA",176.112,29269,0)
+4016128^OXAZEPAM 30MG CAP,UD
+"DATA",176.112,29269,1)
+198059
+"DATA",176.112,29270,0)
+4003156^OXAZEPAM 15MG TAB
+"DATA",176.112,29270,1)
+198058
+"DATA",176.112,29271,0)
+4003154^OXAZEPAM 10MG CAP
+"DATA",176.112,29271,1)
+198057
+"DATA",176.112,29272,0)
+4003630^OXANDROLONE 2.5MG TAB
+"DATA",176.112,29272,1)
+198056
+"DATA",176.112,29273,0)
+4003858^OXACILLIN NA 500MG CAP
+"DATA",176.112,29273,1)
+198055
+"DATA",176.112,29274,0)
+4003854^OXACILLIN NA 250MG CAP
+"DATA",176.112,29274,1)
+198054
+"DATA",176.112,29275,0)
+4001273^OPIUM 10% TINCTURE
+"DATA",176.112,29275,1)
+198053
+"DATA",176.112,29276,0)
+4009289^ONDANSETRON HCL 4MG TAB
+"DATA",176.112,29276,1)
+198052
+"DATA",176.112,29277,0)
+4008787^OMEPRAZOLE 20MG CAP,SA
+"DATA",176.112,29277,1)
+198051
+"DATA",176.112,29278,0)
+4025403^OMEPRAZOLE 20MG CAP,EC,UD
+"DATA",176.112,29278,1)
+198051
+"DATA",176.112,29279,0)
+4013740^OMEPRAZOLE 20MG CAP,SA,UD
+"DATA",176.112,29279,1)
+198051
+"DATA",176.112,29280,0)
+4025402^OMEPRAZOLE 20MG CAP,EC
+"DATA",176.112,29280,1)
+198051
+"DATA",176.112,29281,0)
+4009302^OFLOXACIN 400MG TAB
+"DATA",176.112,29281,1)
+198050
+"DATA",176.112,29282,0)
+4009301^OFLOXACIN 300MG TAB
+"DATA",176.112,29282,1)
+198049
+"DATA",176.112,29283,0)
+4009300^OFLOXACIN 200MG TAB
+"DATA",176.112,29283,1)
+198048
+"DATA",176.112,29284,0)
+4001215^NORTRIPTYLINE HCL 75MG CAP
+"DATA",176.112,29284,1)
+198047
+"DATA",176.112,29285,0)
+4001218^NORTRIPTYLINE HCL 50MG CAP
+"DATA",176.112,29285,1)
+198046
+"DATA",176.112,29286,0)
+4016083^NORTRIPTYLINE HCL 50MG CAP,UD
+"DATA",176.112,29286,1)
+198046
+"DATA",176.112,29287,0)
+4001216^NORTRIPTYLINE HCL 10MG CAP
+"DATA",176.112,29287,1)
+198045
+"DATA",176.112,29288,0)
+4009074^NORFLOXACIN 400MG TAB
+"DATA",176.112,29288,1)
+198044
+"DATA",176.112,29289,0)
+4005225^MESTRANOL 0.05MG/NORETHINDRONE 1MG TAB
+"DATA",176.112,29289,1)
+198043
+"DATA",176.112,29290,0)
+4005025^NORETHINDRONE 0.35MG TAB
+"DATA",176.112,29290,1)
+198042
+"DATA",176.112,29291,0)
+4008418^NIZATIDINE 300MG CAP
+"DATA",176.112,29291,1)
+198041
+"DATA",176.112,29292,0)
+4001226^NITROGLYCERIN 0.6MG TAB,SUBLINGUAL
+"DATA",176.112,29292,1)
+198040
+"DATA",176.112,29293,0)
+4001263^NITROGLYCERIN 0.4MG TAB,SUBLINGUAL,BTL,25
+"DATA",176.112,29293,1)
+198039
+"DATA",176.112,29294,0)
+4001225^NITROGLYCERIN 0.4MG TAB,SUBLINGUAL
+"DATA",176.112,29294,1)
+198039
+"DATA",176.112,29295,0)
+4001224^NITROGLYCERIN 0.3MG TAB,SUBLINGUAL
+"DATA",176.112,29295,1)
+198038
+"DATA",176.112,29296,0)
+4008628^NIMODIPINE 30MG CAP
+"DATA",176.112,29296,1)
+198037
+"DATA",176.112,29297,0)
+4024792^NIFEDIPINE (EQV-CC) 90MG TAB,SA
+"DATA",176.112,29297,1)
+198036
+"DATA",176.112,29298,0)
+4024719^NIFEDIPINE (EVQ-XL) 90MG TAB,SA,UD
+"DATA",176.112,29298,1)
+198036
+"DATA",176.112,29299,0)
+4024715^NIFEDIPINE (EVQ-XL) 90MG TAB,SA
+"DATA",176.112,29299,1)
+198036
+"DATA",176.112,29300,0)
+4024710^NIFEDIPINE (EVQ-CC) 90MG TAB,SA,UD
+"DATA",176.112,29300,1)
+198036
+"DATA",176.112,29301,0)
+4024716^NIFEDIPINE (EVQ-CC) 90MG TAB,SA
+"DATA",176.112,29301,1)
+198036
+"DATA",176.112,29302,0)
+4024803^NIFEDIPINE (EQV-XL) 90MG TAB,SA,UD
+"DATA",176.112,29302,1)
+198036
+"DATA",176.112,29303,0)
+4024793^NIFEDIPINE (EQV-CC) 90MG TAB,SA,UD
+"DATA",176.112,29303,1)
+198036
+"DATA",176.112,29304,0)
+4024802^NIFEDIPINE (EQV-XL) 90MG TAB,SA
+"DATA",176.112,29304,1)
+198036
+"DATA",176.112,29305,0)
+4024791^NIFEDIPINE (EQV-CC) 60MG TAB,SA,UD
+"DATA",176.112,29305,1)
+198035
+"DATA",176.112,29306,0)
+4024800^NIFEDIPINE (EQV-XL) 60MG TAB,SA
+"DATA",176.112,29306,1)
+198035
+"DATA",176.112,29307,0)
+4024801^NIFEDIPINE (EQV-XL) 60MG TAB,SA,UD
+"DATA",176.112,29307,1)
+198035
+"DATA",176.112,29308,0)
+4024483^NIFEDIPINE (WATSON-CC) 60MG SA TAB
+"DATA",176.112,29308,1)
+198035
+"DATA",176.112,29309,0)
+4024790^NIFEDIPINE (EQV-CC) 60MG TAB,SA
+"DATA",176.112,29309,1)
+198035
+"DATA",176.112,29310,0)
+4024717^NIFEDIPINE (EVQ-XL) 30MG TAB,SA,UD
+"DATA",176.112,29310,1)
+198034
+"DATA",176.112,29311,0)
+4024482^NIFEDIPINE (WATSON-CC) 30MG SA TAB
+"DATA",176.112,29311,1)
+198034
+"DATA",176.112,29312,0)
+4024713^NIFEDIPINE (EVQ-XL) 30MG TAB,SA
+"DATA",176.112,29312,1)
+198034
+"DATA",176.112,29313,0)
+4024708^NIFEDIPINE (EVQ-CC) 30MG TAB,SA,UD
+"DATA",176.112,29313,1)
+198034
+"DATA",176.112,29314,0)
+4024711^NIFEDIPINE (EVQ-CC) 30MG TAB,SA
+"DATA",176.112,29314,1)
+198034
+"DATA",176.112,29315,0)
+4024799^NIFEDIPINE (EQV-XL) 30MG TAB,SA,UD
+"DATA",176.112,29315,1)
+198034
+"DATA",176.112,29316,0)
+4024789^NIFEDIPINE (EQV-CC) 30MG TAB,SA,UD
+"DATA",176.112,29316,1)
+198034
+"DATA",176.112,29317,0)
+4024788^NIFEDIPINE (EQV-CC) 30MG TAB,SA
+"DATA",176.112,29317,1)
+198034
+"DATA",176.112,29318,0)
+4024794^NIFEDIPINE (EQV-XL) 30MG TAB,SA
+"DATA",176.112,29318,1)
+198034
+"DATA",176.112,29319,0)
+4004584^NIFEDIPINE 20MG CAP
+"DATA",176.112,29319,1)
+198033
+"DATA",176.112,29320,0)
+4004583^NIFEDIPINE 10MG CAP
+"DATA",176.112,29320,1)
+198032
+"DATA",176.112,29321,0)
+4016091^NIFEDIPINE 10MG CAP,UD
+"DATA",176.112,29321,1)
+198032
+"DATA",176.112,29322,0)
+4010105^NICOTINE 7MG/24HRS PATCH
+"DATA",176.112,29322,1)
+198031
+"DATA",176.112,29323,0)
+4010106^NICOTINE 21MG/24HRS PATCH
+"DATA",176.112,29323,1)
+198030
+"DATA",176.112,29324,0)
+4010104^NICOTINE 14MG/24HRS PATCH
+"DATA",176.112,29324,1)
+198029
+"DATA",176.112,29325,0)
+4008455^NICARDIPINE HCL 30MG CAP
+"DATA",176.112,29325,1)
+198027
+"DATA",176.112,29326,0)
+4008454^NICARDIPINE HCL 20MG CAP
+"DATA",176.112,29326,1)
+198026
+"DATA",176.112,29327,0)
+4006747^NIACINAMIDE 500MG TAB
+"DATA",176.112,29327,1)
+198025
+"DATA",176.112,29328,0)
+4006369^NIACIN 500MG TAB
+"DATA",176.112,29328,1)
+198024
+"DATA",176.112,29329,0)
+4002173^NEOSTIGMINE METHYLSULFATE 0.25MG/ML INJ
+"DATA",176.112,29329,1)
+198023
+"DATA",176.112,29330,0)
+4002171^NEOSTIGMINE BR 15MG TAB
+"DATA",176.112,29330,1)
+198022
+"DATA",176.112,29331,0)
+4003050^DEXAMETHASONE 0.05%/NEOMYCIN SO4 3.5MG/GM OINT,OPH
+"DATA",176.112,29331,1)
+198021
+"DATA",176.112,29332,0)
+4001180^NEOMYCIN SO4 500MG TAB
+"DATA",176.112,29332,1)
+198020
+"DATA",176.112,29333,0)
+4006832^NAPROXEN 500MG TAB
+"DATA",176.112,29333,1)
+198014
+"DATA",176.112,29334,0)
+4006843^NAPROXEN 500MG TAB,UD
+"DATA",176.112,29334,1)
+198014
+"DATA",176.112,29335,0)
+4006833^NAPROXEN NA 550MG TAB
+"DATA",176.112,29335,1)
+198014
+"DATA",176.112,29336,0)
+4006840^NAPROXEN NA 550MG TAB,UD
+"DATA",176.112,29336,1)
+198014
+"DATA",176.112,29337,0)
+4006829^NAPROXEN NA 275MG TAB
+"DATA",176.112,29337,1)
+198013
+"DATA",176.112,29338,0)
+4006841^NAPROXEN 250MG TAB,UD
+"DATA",176.112,29338,1)
+198013
+"DATA",176.112,29339,0)
+4006830^NAPROXEN 250MG TAB
+"DATA",176.112,29339,1)
+198013
+"DATA",176.112,29340,0)
+4006844^NAPROXEN NA 275MG TAB,UD
+"DATA",176.112,29340,1)
+198013
+"DATA",176.112,29341,0)
+4006842^NAPROXEN 375MG TAB,UD
+"DATA",176.112,29341,1)
+198012
+"DATA",176.112,29342,0)
+4006831^NAPROXEN 375MG TAB
+"DATA",176.112,29342,1)
+198012
+"DATA",176.112,29343,0)
+4005191^NALTREXONE HCL 50MG TAB
+"DATA",176.112,29343,1)
+198011
+"DATA",176.112,29344,0)
+4001636^NADOLOL 80MG TAB
+"DATA",176.112,29344,1)
+198008
+"DATA",176.112,29345,0)
+4001634^NADOLOL 40MG TAB
+"DATA",176.112,29345,1)
+198007
+"DATA",176.112,29346,0)
+4001638^NADOLOL 20MG TAB
+"DATA",176.112,29346,1)
+198006
+"DATA",176.112,29347,0)
+4001637^NADOLOL 160MG TAB
+"DATA",176.112,29347,1)
+198005
+"DATA",176.112,29348,0)
+4001635^NADOLOL 120MG TAB
+"DATA",176.112,29348,1)
+198004
+"DATA",176.112,29349,0)
+4009156^NAFTIFINE HCL 1% CREAM
+"DATA",176.112,29349,1)
+198002
+"DATA",176.112,29350,0)
+4001686^BENDROFLUMETHIAZIDE 5MG/NADOLOL 80MG TAB
+"DATA",176.112,29350,1)
+198001
+"DATA",176.112,29351,0)
+4001685^BENDROFLUMETHIAZIDE 5MG/NADOLOL 40MG TAB
+"DATA",176.112,29351,1)
+198000
+"DATA",176.112,29352,0)
+4000993^MORPHINE SO4 5MG SUPP,RTL
+"DATA",176.112,29352,1)
+197998
+"DATA",176.112,29353,0)
+4000985^MORPHINE SO4 30MG TAB
+"DATA",176.112,29353,1)
+197997
+"DATA",176.112,29354,0)
+4001002^MORPHINE SO4 33MG SUPP,RTL
+"DATA",176.112,29354,1)
+197996
+"DATA",176.112,29355,0)
+4000995^MORPHINE SO4 20MG SUPP,RTL
+"DATA",176.112,29355,1)
+197995
+"DATA",176.112,29356,0)
+4000977^MORPHINE SO4 15MG TAB,SOLUBLE
+"DATA",176.112,29356,1)
+197994
+"DATA",176.112,29357,0)
+4000984^MORPHINE SO4 15MG TAB
+"DATA",176.112,29357,1)
+197994
+"DATA",176.112,29358,0)
+4016076^MORPHINE SO4 15MG TAB,UD
+"DATA",176.112,29358,1)
+197994
+"DATA",176.112,29359,0)
+4000994^MORPHINE SO4 10MG SUPP,RTL
+"DATA",176.112,29359,1)
+197993
+"DATA",176.112,29360,0)
+4007001^MONOBENZONE 20% CREAM,TOP
+"DATA",176.112,29360,1)
+197992
+"DATA",176.112,29361,0)
+4007556^AMMONIUM MOLYBDATE 25MCG/ML INJ
+"DATA",176.112,29361,1)
+197991
+"DATA",176.112,29362,0)
+4009158^MITOXANTRONE HCL 2MG/ML INJ
+"DATA",176.112,29362,1)
+197989
+"DATA",176.112,29363,0)
+4003810^MITOTANE 500MG TAB
+"DATA",176.112,29363,1)
+197988
+"DATA",176.112,29364,0)
+4003452^MINOXIDIL 2.5MG TAB
+"DATA",176.112,29364,1)
+197987
+"DATA",176.112,29365,0)
+4003453^MINOXIDIL 10MG TAB
+"DATA",176.112,29365,1)
+197986
+"DATA",176.112,29366,0)
+4002781^MINOCYCLINE HCL 50MG CAP
+"DATA",176.112,29366,1)
+197985
+"DATA",176.112,29367,0)
+4002782^MINOCYCLINE HCL 100MG CAP
+"DATA",176.112,29367,1)
+197984
+"DATA",176.112,29368,0)
+4005285^MICONAZOLE NITRATE 200MG SUPP,VAG
+"DATA",176.112,29368,1)
+197983
+"DATA",176.112,29369,0)
+4007669^MEXILETINE HCL 250MG CAP
+"DATA",176.112,29369,1)
+197982
+"DATA",176.112,29370,0)
+4007667^MEXILETINE HCL 150MG CAP
+"DATA",176.112,29370,1)
+197981
+"DATA",176.112,29371,0)
+4002962^METYROSINE 250MG CAP
+"DATA",176.112,29371,1)
+197980
+"DATA",176.112,29372,0)
+4003905^METOLAZONE 2.5MG TAB
+"DATA",176.112,29372,1)
+197979
+"DATA",176.112,29373,0)
+4003903^METOLAZONE 10MG TAB
+"DATA",176.112,29373,1)
+197978
+"DATA",176.112,29374,0)
+4003906^METOLAZONE 0.5MG TAB
+"DATA",176.112,29374,1)
+197977
+"DATA",176.112,29375,0)
+4000791^METHYLTESTOSTERONE 10MG TAB,ORAL
+"DATA",176.112,29375,1)
+197976
+"DATA",176.112,29376,0)
+4000793^METHYLTESTOSTERONE 10MG CAP
+"DATA",176.112,29376,1)
+197975
+"DATA",176.112,29377,0)
+4006426^METHYSERGIDE MALEATE 2MG TAB
+"DATA",176.112,29377,1)
+197974
+"DATA",176.112,29378,0)
+4003423^METHYLPREDNISOLONE 8MG TAB
+"DATA",176.112,29378,1)
+197973
+"DATA",176.112,29379,0)
+4003429^METHYLPREDNISOLONE 32MG TAB
+"DATA",176.112,29379,1)
+197971
+"DATA",176.112,29380,0)
+4003428^METHYLPREDNISOLONE 24MG TAB
+"DATA",176.112,29380,1)
+197970
+"DATA",176.112,29381,0)
+4003424^METHYLPREDNISOLONE 2MG TAB
+"DATA",176.112,29381,1)
+197969
+"DATA",176.112,29382,0)
+4004066^METHYLPHENIDATE HCL 5MG TAB
+"DATA",176.112,29382,1)
+197967
+"DATA",176.112,29383,0)
+4004068^METHYLPHENIDATE HCL 20MG TAB
+"DATA",176.112,29383,1)
+197966
+"DATA",176.112,29384,0)
+4004067^METHYLPHENIDATE HCL 10MG TAB
+"DATA",176.112,29384,1)
+197965
+"DATA",176.112,29385,0)
+4006407^METHYLENE BLUE 65MG TAB
+"DATA",176.112,29385,1)
+197964
+"DATA",176.112,29386,0)
+4002710^HYDROCHLOROTHIAZIDE 15MG/METHYLDOPA 250MG TAB
+"DATA",176.112,29386,1)
+197963
+"DATA",176.112,29387,0)
+4002712^HYDROCHLOROTHIAZIDE 30MG/METHYLDOPA 500MG TAB
+"DATA",176.112,29387,1)
+197962
+"DATA",176.112,29388,0)
+4002713^HYDROCHLOROTHIAZIDE 50MG/METHYLDOPA 500MG TAB
+"DATA",176.112,29388,1)
+197961
+"DATA",176.112,29389,0)
+4002711^HYDROCHLOROTHIAZIDE 25MG/METHYLDOPA 250MG TAB
+"DATA",176.112,29389,1)
+197960
+"DATA",176.112,29390,0)
+4002889^CHLOROTHIAZIDE 250MG/METHYLDOPA 250MG TAB
+"DATA",176.112,29390,1)
+197959
+"DATA",176.112,29391,0)
+4002707^METHYLDOPA 500MG TAB
+"DATA",176.112,29391,1)
+197958
+"DATA",176.112,29392,0)
+4002708^METHYLDOPA 250MG/5ML SUSP,ORAL
+"DATA",176.112,29392,1)
+197957
+"DATA",176.112,29393,0)
+4002706^METHYLDOPA 250MG TAB
+"DATA",176.112,29393,1)
+197956
+"DATA",176.112,29394,0)
+4002705^METHYLDOPA 125MG TAB
+"DATA",176.112,29394,1)
+197955
+"DATA",176.112,29395,0)
+4004798^METHYCLOTHIAZIDE 2.5MG/RESERPINE 0.1MG TAB
+"DATA",176.112,29395,1)
+197954
+"DATA",176.112,29396,0)
+4006268^DESERPIDINE 0.25MG/METHYCLOTHIAZIDE 5MG TAB
+"DATA",176.112,29396,1)
+197953
+"DATA",176.112,29397,0)
+4006269^DESERPIDINE 0.5MG/METHYCLOTHIAZIDE 5MG TAB
+"DATA",176.112,29397,1)
+197952
+"DATA",176.112,29398,0)
+4004796^METHYCLOTHIAZIDE 5MG TAB
+"DATA",176.112,29398,1)
+197951
+"DATA",176.112,29399,0)
+4004797^METHYCLOTHIAZIDE 2.5MG TAB
+"DATA",176.112,29399,1)
+197950
+"DATA",176.112,29400,0)
+4005770^METHSUXIMIDE 300MG CAP
+"DATA",176.112,29400,1)
+197949
+"DATA",176.112,29401,0)
+4007008^METHOXSALEN 1% LIQUID,TOP
+"DATA",176.112,29401,1)
+197948
+"DATA",176.112,29402,0)
+4007009^METHOXSALEN 10MG (HARD) CAP
+"DATA",176.112,29402,1)
+197947
+"DATA",176.112,29403,0)
+4007010^METHOXSALEN 10MG (SOFT) CAP
+"DATA",176.112,29403,1)
+197947
+"DATA",176.112,29404,0)
+4004716^ASPIRIN 325MG/METHOCARBAMOL 400MG TAB
+"DATA",176.112,29404,1)
+197945
+"DATA",176.112,29405,0)
+4002632^METHOCARBAMOL 750MG TAB
+"DATA",176.112,29405,1)
+197944
+"DATA",176.112,29406,0)
+4002631^METHOCARBAMOL 500MG TAB
+"DATA",176.112,29406,1)
+197943
+"DATA",176.112,29407,0)
+4000799^METHIMAZOLE 5MG TAB
+"DATA",176.112,29407,1)
+197942
+"DATA",176.112,29408,0)
+4000800^METHIMAZOLE 10MG TAB
+"DATA",176.112,29408,1)
+197941
+"DATA",176.112,29409,0)
+4002759^METHAZOLAMIDE 50MG TAB
+"DATA",176.112,29409,1)
+197940
+"DATA",176.112,29410,0)
+4002760^METHAZOLAMIDE 25MG TAB
+"DATA",176.112,29410,1)
+197939
+"DATA",176.112,29411,0)
+4006110^METHAMPHETAMINE HCL 5MG TAB
+"DATA",176.112,29411,1)
+197938
+"DATA",176.112,29412,0)
+4000761^METHADONE HCL 40MG TAB
+"DATA",176.112,29412,1)
+197937
+"DATA",176.112,29413,0)
+4016493^METHACHOLINE CL 100MG/VIL PWDR,INH
+"DATA",176.112,29413,1)
+197936
+"DATA",176.112,29414,0)
+4006625^METAXALONE 400MG TAB
+"DATA",176.112,29414,1)
+197935
+"DATA",176.112,29415,0)
+4006459^METAPROTERENOL SO4 20MG TAB
+"DATA",176.112,29415,1)
+197934
+"DATA",176.112,29416,0)
+4006458^METAPROTERENOL SO4 10MG TAB
+"DATA",176.112,29416,1)
+197933
+"DATA",176.112,29417,0)
+4009057^MESALAMINE 500MG SUPP,RTL
+"DATA",176.112,29417,1)
+197932
+"DATA",176.112,29418,0)
+4006511^MERCAPTOPURINE 50MG TAB
+"DATA",176.112,29418,1)
+197931
+"DATA",176.112,29419,0)
+4003213^ASPIRIN 325MG/MEPROBAMATE 200MG TAB
+"DATA",176.112,29419,1)
+197930
+"DATA",176.112,29420,0)
+4003060^MEPROBAMATE 400MG TAB
+"DATA",176.112,29420,1)
+197929
+"DATA",176.112,29421,0)
+4003059^MEPROBAMATE 200MG TAB
+"DATA",176.112,29421,1)
+197928
+"DATA",176.112,29422,0)
+4004197^MEPIVACAINE HCL 1.5% INJ
+"DATA",176.112,29422,1)
+197927
+"DATA",176.112,29423,0)
+4006423^MEPHENYTOIN 100MG TAB
+"DATA",176.112,29423,1)
+197926
+"DATA",176.112,29424,0)
+4004281^MEPHOBARBITAL 50MG TAB
+"DATA",176.112,29424,1)
+197925
+"DATA",176.112,29425,0)
+4015257^MEPHOBARBITAL 32MG TAB
+"DATA",176.112,29425,1)
+197924
+"DATA",176.112,29426,0)
+4004282^MEPHOBARBITAL 100MG TAB
+"DATA",176.112,29426,1)
+197923
+"DATA",176.112,29427,0)
+4003224^MEPERIDINE HCL 50MG TAB
+"DATA",176.112,29427,1)
+197922
+"DATA",176.112,29428,0)
+4016072^MEPERIDINE HCL 50MG TAB,UD
+"DATA",176.112,29428,1)
+197922
+"DATA",176.112,29429,0)
+4003228^MEPERIDINE HCL 100MG TAB
+"DATA",176.112,29429,1)
+197921
+"DATA",176.112,29430,0)
+4005632^MEPENZOLATE BR 25MG TAB
+"DATA",176.112,29430,1)
+197920
+"DATA",176.112,29431,0)
+4006470^MELPHALAN 2MG TAB
+"DATA",176.112,29431,1)
+197919
+"DATA",176.112,29432,0)
+4003764^MEGESTROL ACETATE 20MG TAB
+"DATA",176.112,29432,1)
+197918
+"DATA",176.112,29433,0)
+4005224^MECLOCYCLINE SULFOSALICYLATE 1% CREAM,TOP
+"DATA",176.112,29433,1)
+197914
+"DATA",176.112,29434,0)
+4003195^MAZINDOL 2MG TAB
+"DATA",176.112,29434,1)
+197913
+"DATA",176.112,29435,0)
+4003194^MAZINDOL 1MG TAB
+"DATA",176.112,29435,1)
+197912
+"DATA",176.112,29436,0)
+4006533^MAPROTILINE HCL 75MG TAB
+"DATA",176.112,29436,1)
+197911
+"DATA",176.112,29437,0)
+4006531^MAPROTILINE HCL 50MG TAB
+"DATA",176.112,29437,1)
+197910
+"DATA",176.112,29438,0)
+4006532^MAPROTILINE HCL 25MG TAB
+"DATA",176.112,29438,1)
+197909
+"DATA",176.112,29439,0)
+4003589^MAGNESIUM SALICYLATE 600MG TAB
+"DATA",176.112,29439,1)
+197907
+"DATA",176.112,29440,0)
+4008980^LOVASTATIN 40MG TAB
+"DATA",176.112,29440,1)
+197905
+"DATA",176.112,29441,0)
+4016895^LOVASTATIN 40MG TAB,UD
+"DATA",176.112,29441,1)
+197905
+"DATA",176.112,29442,0)
+4008981^LOVASTATIN 20MG TAB
+"DATA",176.112,29442,1)
+197904
+"DATA",176.112,29443,0)
+4016894^LOVASTATIN 20MG TAB,UD
+"DATA",176.112,29443,1)
+197904
+"DATA",176.112,29444,0)
+4008982^LOVASTATIN 10MG TAB
+"DATA",176.112,29444,1)
+197903
+"DATA",176.112,29445,0)
+4016893^LOVASTATIN 10MG TAB,UD
+"DATA",176.112,29445,1)
+197903
+"DATA",176.112,29446,0)
+4002468^LORAZEPAM 2MG TAB,UD
+"DATA",176.112,29446,1)
+197902
+"DATA",176.112,29447,0)
+4002458^LORAZEPAM 2MG TAB
+"DATA",176.112,29447,1)
+197902
+"DATA",176.112,29448,0)
+4002467^LORAZEPAM 1MG TAB,UD
+"DATA",176.112,29448,1)
+197901
+"DATA",176.112,29449,0)
+4002457^LORAZEPAM 1MG TAB
+"DATA",176.112,29449,1)
+197901
+"DATA",176.112,29450,0)
+4002456^LORAZEPAM 0.5MG TAB
+"DATA",176.112,29450,1)
+197900
+"DATA",176.112,29451,0)
+4002466^LORAZEPAM 0.5MG TAB,UD
+"DATA",176.112,29451,1)
+197900
+"DATA",176.112,29452,0)
+4010174^LORACARBEF 400MG CAP
+"DATA",176.112,29452,1)
+197899
+"DATA",176.112,29453,0)
+4010171^LORACARBEF 200MG CAP
+"DATA",176.112,29453,1)
+197898
+"DATA",176.112,29454,0)
+4008013^LOPERAMIDE HCL 2MG CAP
+"DATA",176.112,29454,1)
+197897
+"DATA",176.112,29455,0)
+4008016^LOPERAMIDE HCL 2MG CAP,UD
+"DATA",176.112,29455,1)
+197897
+"DATA",176.112,29456,0)
+4003801^LOMUSTINE 40MG CAP
+"DATA",176.112,29456,1)
+197896
+"DATA",176.112,29457,0)
+4003802^LOMUSTINE 100MG CAP
+"DATA",176.112,29457,1)
+197895
+"DATA",176.112,29458,0)
+4003800^LOMUSTINE 10MG CAP
+"DATA",176.112,29458,1)
+197894
+"DATA",176.112,29459,0)
+4003124^LITHIUM CARBONATE 600MG CAP
+"DATA",176.112,29459,1)
+197893
+"DATA",176.112,29460,0)
+4003120^LITHIUM CARBONATE 450MG TAB,SA
+"DATA",176.112,29460,1)
+197892
+"DATA",176.112,29461,0)
+4003122^LITHIUM CARBONATE 300MG TAB,SA
+"DATA",176.112,29461,1)
+197891
+"DATA",176.112,29462,0)
+4003119^LITHIUM CARBONATE 300MG TAB
+"DATA",176.112,29462,1)
+197890
+"DATA",176.112,29463,0)
+4003118^LITHIUM CARBONATE 300MG CAP
+"DATA",176.112,29463,1)
+197889
+"DATA",176.112,29464,0)
+4008625^HYDROCHLOROTHIAZIDE 25MG/LISINOPRIL 20MG TAB
+"DATA",176.112,29464,1)
+197887
+"DATA",176.112,29465,0)
+4008624^HYDROCHLOROTHIAZIDE 12.5MG/LISINOPRIL 20MG TAB
+"DATA",176.112,29465,1)
+197886
+"DATA",176.112,29466,0)
+4008626^HYDROCHLOROTHIAZIDE 12.5MG/LISINOPRIL 10MG TAB
+"DATA",176.112,29466,1)
+197885
+"DATA",176.112,29467,0)
+4017119^LISINOPRIL 40MG TAB,UD
+"DATA",176.112,29467,1)
+197884
+"DATA",176.112,29468,0)
+4008594^LISINOPRIL 40MG TAB
+"DATA",176.112,29468,1)
+197884
+"DATA",176.112,29469,0)
+4004036^LINDANE 1% SHAMPOO
+"DATA",176.112,29469,1)
+197878
+"DATA",176.112,29470,0)
+4013815^LIDOCAINE 2.5%/PRILOCAINE 2.5% KIT,TOP
+"DATA",176.112,29470,1)
+197877
+"DATA",176.112,29471,0)
+4010392^LIDOCAINE 2.5%/PRILOCAINE 2.5% CREAM,TOP
+"DATA",176.112,29471,1)
+197877
+"DATA",176.112,29472,0)
+4004384^LIDOCAINE HCL 200MG/ML INJ
+"DATA",176.112,29472,1)
+197874
+"DATA",176.112,29473,0)
+4002179^LEVORPHANOL TARTRATE 2MG TAB
+"DATA",176.112,29473,1)
+197873
+"DATA",176.112,29474,0)
+4002190^LEVODOPA 500MG TAB
+"DATA",176.112,29474,1)
+197872
+"DATA",176.112,29475,0)
+4002188^LEVODOPA 500MG CAP
+"DATA",176.112,29475,1)
+197871
+"DATA",176.112,29476,0)
+4002191^LEVODOPA 250MG TAB
+"DATA",176.112,29476,1)
+197870
+"DATA",176.112,29477,0)
+4002189^LEVODOPA 250MG CAP
+"DATA",176.112,29477,1)
+197869
+"DATA",176.112,29478,0)
+4002192^LEVODOPA 100MG TAB
+"DATA",176.112,29478,1)
+197868
+"DATA",176.112,29479,0)
+4002193^LEVODOPA 100MG CAP
+"DATA",176.112,29479,1)
+197867
+"DATA",176.112,29480,0)
+4006485^LEUCOVORIN CALCIUM 5MG TAB
+"DATA",176.112,29480,1)
+197863
+"DATA",176.112,29481,0)
+4006486^LEUCOVORIN CALCIUM 25MG TAB
+"DATA",176.112,29481,1)
+197862
+"DATA",176.112,29482,0)
+4006493^LEUCOVORIN CALCIUM 15MG TAB
+"DATA",176.112,29482,1)
+197861
+"DATA",176.112,29483,0)
+4006492^LEUCOVORIN CALCIUM 10MG TAB
+"DATA",176.112,29483,1)
+197860
+"DATA",176.112,29484,0)
+4009102^KETOROLAC TROMETHAMINE 10MG TAB
+"DATA",176.112,29484,1)
+197857
+"DATA",176.112,29485,0)
+4003404^KETOPROFEN 75MG CAP
+"DATA",176.112,29485,1)
+197856
+"DATA",176.112,29486,0)
+4003403^KETOPROFEN 50MG CAP
+"DATA",176.112,29486,1)
+197855
+"DATA",176.112,29487,0)
+4003405^KETOPROFEN 25MG CAP
+"DATA",176.112,29487,1)
+197854
+"DATA",176.112,29488,0)
+4008159^KETOCONAZOLE 200MG TAB
+"DATA",176.112,29488,1)
+197853
+"DATA",176.112,29489,0)
+4009280^ISRADIPINE 5MG CAP
+"DATA",176.112,29489,1)
+197849
+"DATA",176.112,29490,0)
+4009279^ISRADIPINE 2.5MG CAP
+"DATA",176.112,29490,1)
+197848
+"DATA",176.112,29491,0)
+4002645^ISOXSUPRINE HCL 20MG TAB
+"DATA",176.112,29491,1)
+197847
+"DATA",176.112,29492,0)
+4002644^ISOXSUPRINE HCL 10MG TAB
+"DATA",176.112,29492,1)
+197846
+"DATA",176.112,29493,0)
+4002232^ISOTRETINOIN 40MG CAP
+"DATA",176.112,29493,1)
+197845
+"DATA",176.112,29494,0)
+4002233^ISOTRETINOIN 20MG CAP
+"DATA",176.112,29494,1)
+197844
+"DATA",176.112,29495,0)
+4002231^ISOTRETINOIN 10MG CAP
+"DATA",176.112,29495,1)
+197843
+"DATA",176.112,29496,0)
+4002312^ISOSORBIDE DINITRATE 5MG TAB,SUBLINGUAL
+"DATA",176.112,29496,1)
+197841
+"DATA",176.112,29497,0)
+4002317^ISOSORBIDE DINITRATE 40MG TAB,ORAL
+"DATA",176.112,29497,1)
+197840
+"DATA",176.112,29498,0)
+4002314^ISOSORBIDE DINITRATE 30MG TAB,ORAL
+"DATA",176.112,29498,1)
+197839
+"DATA",176.112,29499,0)
+4002310^ISOSORBIDE DINITRATE 2.5MG TAB,SUBLINGUAL
+"DATA",176.112,29499,1)
+197838
+"DATA",176.112,29500,0)
+4002315^ISOSORBIDE DINITRATE 10MG TAB,SUBLINGUAL
+"DATA",176.112,29500,1)
+197837
+"DATA",176.112,29501,0)
+4004241^ISOPROTERENOL HCL 0.02MG/ML INJ
+"DATA",176.112,29501,1)
+197833
+"DATA",176.112,29502,0)
+4001191^ISONIAZID 300MG TAB
+"DATA",176.112,29502,1)
+197832
+"DATA",176.112,29503,0)
+4007591^IODOQUINOL 650MG TAB
+"DATA",176.112,29503,1)
+197826
+"DATA",176.112,29504,0)
+4007590^IODOQUINOL 210MG TAB
+"DATA",176.112,29504,1)
+197825
+"DATA",176.112,29505,0)
+4002666^INDOMETHACIN 50MG SUPP,RTL
+"DATA",176.112,29505,1)
+197819
+"DATA",176.112,29506,0)
+4002665^INDOMETHACIN 50MG CAP
+"DATA",176.112,29506,1)
+197818
+"DATA",176.112,29507,0)
+4002664^INDOMETHACIN 25MG CAP
+"DATA",176.112,29507,1)
+197817
+"DATA",176.112,29508,0)
+4016082^INDAPAMIDE 2.5MG TAB,UD
+"DATA",176.112,29508,1)
+197816
+"DATA",176.112,29509,0)
+4006333^INDAPAMIDE 2.5MG TAB
+"DATA",176.112,29509,1)
+197816
+"DATA",176.112,29510,0)
+4006334^INDAPAMIDE 1.25MG TAB
+"DATA",176.112,29510,1)
+197815
+"DATA",176.112,29511,0)
+4002534^IMIPRAMINE PAMOATE 75MG CAP
+"DATA",176.112,29511,1)
+197813
+"DATA",176.112,29512,0)
+4002535^IMIPRAMINE PAMOATE 150MG CAP
+"DATA",176.112,29512,1)
+197812
+"DATA",176.112,29513,0)
+4002537^IMIPRAMINE PAMOATE 125MG CAP
+"DATA",176.112,29513,1)
+197811
+"DATA",176.112,29514,0)
+4002536^IMIPRAMINE PAMOATE 100MG CAP
+"DATA",176.112,29514,1)
+197810
+"DATA",176.112,29515,0)
+4002533^IMIPRAMINE HCL 50MG TAB
+"DATA",176.112,29515,1)
+197809
+"DATA",176.112,29516,0)
+4002531^IMIPRAMINE HCL 10MG TAB
+"DATA",176.112,29516,1)
+197808
+"DATA",176.112,29517,0)
+4002410^IBUPROFEN 800MG TAB
+"DATA",176.112,29517,1)
+197807
+"DATA",176.112,29518,0)
+4002419^IBUPROFEN 800MG TAB,UD
+"DATA",176.112,29518,1)
+197807
+"DATA",176.112,29519,0)
+4002409^IBUPROFEN 600MG TAB
+"DATA",176.112,29519,1)
+197806
+"DATA",176.112,29520,0)
+4002420^IBUPROFEN 600MG TAB,UD
+"DATA",176.112,29520,1)
+197806
+"DATA",176.112,29521,0)
+4002418^IBUPROFEN 400MG TAB,UD
+"DATA",176.112,29521,1)
+197805
+"DATA",176.112,29522,0)
+4002408^IBUPROFEN 400MG TAB
+"DATA",176.112,29522,1)
+197805
+"DATA",176.112,29523,0)
+4002411^IBUPROFEN 300MG TAB
+"DATA",176.112,29523,1)
+197804
+"DATA",176.112,29524,0)
+4002417^IBUPROFEN 100MG/5ML SUSP,BTL,5ML
+"DATA",176.112,29524,1)
+197803
+"DATA",176.112,29525,0)
+4002413^IBUPROFEN 100MG/5ML SUSP,ORAL
+"DATA",176.112,29525,1)
+197803
+"DATA",176.112,29526,0)
+4002604^HYDROXYZINE PAMOATE 100MG CAP
+"DATA",176.112,29526,1)
+197802
+"DATA",176.112,29527,0)
+4002596^HYDROXYZINE HCL 50MG TAB
+"DATA",176.112,29527,1)
+197801
+"DATA",176.112,29528,0)
+4002602^HYDROXYZINE HCL 100MG TAB
+"DATA",176.112,29528,1)
+197800
+"DATA",176.112,29529,0)
+4002597^HYDROXYZINE HCL 10MG TAB
+"DATA",176.112,29529,1)
+197798
+"DATA",176.112,29530,0)
+4001952^HYDROXYUREA 500MG CAP
+"DATA",176.112,29530,1)
+197797
+"DATA",176.112,29531,0)
+4004331^HYDROXYCHLOROQUINE SO4 200MG TAB
+"DATA",176.112,29531,1)
+197796
+"DATA",176.112,29532,0)
+4007002^HYDROQUINONE 4% CREAM,TOP
+"DATA",176.112,29532,1)
+197795
+"DATA",176.112,29533,0)
+4003279^HYDROMORPHONE HCL 4MG TAB
+"DATA",176.112,29533,1)
+197794
+"DATA",176.112,29534,0)
+4003280^HYDROMORPHONE HCL 3MG SUPP,RTL
+"DATA",176.112,29534,1)
+197793
+"DATA",176.112,29535,0)
+4003277^HYDROMORPHONE HCL 2MG TAB
+"DATA",176.112,29535,1)
+197792
+"DATA",176.112,29536,0)
+4016073^HYDROMORPHONE HCL 2MG TAB,UD
+"DATA",176.112,29536,1)
+197792
+"DATA",176.112,29537,0)
+4003290^HYDROMORPHONE HCL 1MG/ML LIQUID,ORAL
+"DATA",176.112,29537,1)
+197791
+"DATA",176.112,29538,0)
+4003825^HYDROFLUMETHIAZIDE 50MG/RESERPINE 0.125MG TAB
+"DATA",176.112,29538,1)
+197790
+"DATA",176.112,29539,0)
+4003826^HYDROFLUMETHIAZIDE 25MG/RESERPINE 0.125MG TAB
+"DATA",176.112,29539,1)
+197789
+"DATA",176.112,29540,0)
+4003824^HYDROFLUMETHIAZIDE 50MG TAB
+"DATA",176.112,29540,1)
+197788
+"DATA",176.112,29541,0)
+4002896^HYDROCORTISONE 5MG TAB
+"DATA",176.112,29541,1)
+197787
+"DATA",176.112,29542,0)
+4002917^HYDROCORTISONE 2.5% LOTION
+"DATA",176.112,29542,1)
+197785
+"DATA",176.112,29543,0)
+4002926^HYDROCORTISONE 2% LOTION
+"DATA",176.112,29543,1)
+197784
+"DATA",176.112,29544,0)
+4002891^HYDROCORTISONE 20MG TAB
+"DATA",176.112,29544,1)
+197783
+"DATA",176.112,29545,0)
+4002890^HYDROCORTISONE 10MG TAB
+"DATA",176.112,29545,1)
+197782
+"DATA",176.112,29546,0)
+4002909^HYDROCORTISONE 0.25% LOTION
+"DATA",176.112,29546,1)
+197781
+"DATA",176.112,29547,0)
+4002918^HYDROCORTISONE VALERATE 0.2% OINT,TOP
+"DATA",176.112,29547,1)
+197780
+"DATA",176.112,29548,0)
+4002919^HYDROCORTISONE VALERATE 0.2% CREAM,TOP
+"DATA",176.112,29548,1)
+197779
+"DATA",176.112,29549,0)
+4004965^HYDROCODONE 2.5MG/ACETAMINOPHEN 500MG TAB
+"DATA",176.112,29549,1)
+197778
+"DATA",176.112,29550,0)
+4004967^HYDROCODONE 10MG/ACETAMINOPHEN 650MG TAB
+"DATA",176.112,29550,1)
+197777
+"DATA",176.112,29551,0)
+4004966^HYDROCODONE 7.5MG/ACETAMINOPHEN 500MG TAB
+"DATA",176.112,29551,1)
+197776
+"DATA",176.112,29552,0)
+4004964^HYDROCODONE 7.5MG/ACETAMINOPHEN 750MG TAB
+"DATA",176.112,29552,1)
+197775
+"DATA",176.112,29553,0)
+4004957^HYDROCODONE 5MG/ACETAMINOPHEN 500MG TAB
+"DATA",176.112,29553,1)
+197774
+"DATA",176.112,29554,0)
+4004958^HYDROCODONE 5MG/ACETAMINOPHEN 500MG CAP
+"DATA",176.112,29554,1)
+197773
+"DATA",176.112,29555,0)
+4004959^HYDROCODONE 7.5MG/ACETAMINOPHEN 650MG TAB
+"DATA",176.112,29555,1)
+197772
+"DATA",176.112,29556,0)
+4002845^HYDROCHLOROTHIAZIDE 50MG/RESERPINE 0.125MG TAB
+"DATA",176.112,29556,1)
+197771
+"DATA",176.112,29557,0)
+4002652^HYDROCHLOROTHIAZIDE 50MG TAB
+"DATA",176.112,29557,1)
+197770
+"DATA",176.112,29558,0)
+4002653^HYDROCHLOROTHIAZIDE 100MG TAB
+"DATA",176.112,29558,1)
+197769
+"DATA",176.112,29559,0)
+4007477^HYDROCHLORIC ACID 2MG/ML INJ
+"DATA",176.112,29559,1)
+197768
+"DATA",176.112,29560,0)
+4002637^HYDRALAZINE HCL 100MG TAB
+"DATA",176.112,29560,1)
+197767
+"DATA",176.112,29561,0)
+4002636^HYDRALAZINE HCL 10MG TAB
+"DATA",176.112,29561,1)
+197766
+"DATA",176.112,29562,0)
+4001356^HEPARIN NA 7500UNT/ML INJ
+"DATA",176.112,29562,1)
+197758
+"DATA",176.112,29563,0)
+4001369^HEPARIN CA 25000UNT/ML INJ
+"DATA",176.112,29563,1)
+197757
+"DATA",176.112,29564,0)
+4003622^HALOPERIDOL 20MG TAB
+"DATA",176.112,29564,1)
+197754
+"DATA",176.112,29565,0)
+4005864^HALOPROGIN 1% CREAM,TOP
+"DATA",176.112,29565,1)
+197753
+"DATA",176.112,29566,0)
+4009326^HALOBETASOL PROPIONATE 0.05% OINT,TOP
+"DATA",176.112,29566,1)
+197752
+"DATA",176.112,29567,0)
+4009325^HALOBETASOL PROPIONATE 0.05% CREAM,TOP
+"DATA",176.112,29567,1)
+197751
+"DATA",176.112,29568,0)
+4001657^HALCINONIDE 0.1% OINT,TOP
+"DATA",176.112,29568,1)
+197750
+"DATA",176.112,29569,0)
+4001659^HALCINONIDE 0.025% CREAM,TOP
+"DATA",176.112,29569,1)
+197749
+"DATA",176.112,29570,0)
+4006604^HALAZEPAM 40MG TAB
+"DATA",176.112,29570,1)
+197748
+"DATA",176.112,29571,0)
+4006603^HALAZEPAM 20MG TAB
+"DATA",176.112,29571,1)
+197747
+"DATA",176.112,29572,0)
+4008786^GUANFACINE HCL 2MG TAB
+"DATA",176.112,29572,1)
+197746
+"DATA",176.112,29573,0)
+4008785^GUANFACINE HCL 1MG TAB
+"DATA",176.112,29573,1)
+197745
+"DATA",176.112,29574,0)
+4003197^GUANABENZ ACETATE 8MG TAB
+"DATA",176.112,29574,1)
+197744
+"DATA",176.112,29575,0)
+4003196^GUANABENZ ACETATE 4MG TAB
+"DATA",176.112,29575,1)
+197743
+"DATA",176.112,29576,0)
+4004723^CODEINE 10MG/GUAIFENESIN 300MG TAB
+"DATA",176.112,29576,1)
+197742
+"DATA",176.112,29577,0)
+4007872^GUAIFENESIN 200MG TAB
+"DATA",176.112,29577,1)
+197741
+"DATA",176.112,29578,0)
+4004718^GLYCOPYRROLATE 2MG TAB
+"DATA",176.112,29578,1)
+197739
+"DATA",176.112,29579,0)
+4004717^GLYCOPYRROLATE 1MG TAB
+"DATA",176.112,29579,1)
+197738
+"DATA",176.112,29580,0)
+4003455^GLYBURIDE 1.25MG TAB
+"DATA",176.112,29580,1)
+197737
+"DATA",176.112,29581,0)
+4004135^GENTAMICIN SO4 2MG/ML INJ
+"DATA",176.112,29581,1)
+197736
+"DATA",176.112,29582,0)
+4004129^GENTAMICIN SO4 2MG/ML INJ,INTH
+"DATA",176.112,29582,1)
+197736
+"DATA",176.112,29583,0)
+4004128^GENTAMICIN SO4 0.1% CREAM,TOP
+"DATA",176.112,29583,1)
+197735
+"DATA",176.112,29584,0)
+4009283^GALLIUM NITRATE 25MG/ML (PF) INJ
+"DATA",176.112,29584,1)
+197734
+"DATA",176.112,29585,0)
+4012503^GADOTERIDOL 279.3MG/ML INJ
+"DATA",176.112,29585,1)
+197733
+"DATA",176.112,29586,0)
+4002368^FUROSEMIDE 80MG TAB
+"DATA",176.112,29586,1)
+197732
+"DATA",176.112,29587,0)
+4013359^FUROSEMIDE 40MG/5ML SOLN,5ML
+"DATA",176.112,29587,1)
+197731
+"DATA",176.112,29588,0)
+4013360^FUROSEMIDE 40MG/5ML SOLN,ORAL
+"DATA",176.112,29588,1)
+197731
+"DATA",176.112,29589,0)
+4002372^FUROSEMIDE 10MG/ML SOLN,ORAL
+"DATA",176.112,29589,1)
+197730
+"DATA",176.112,29590,0)
+4006960^FURAZOLIDONE 100MG TAB
+"DATA",176.112,29590,1)
+197729
+"DATA",176.112,29591,0)
+4008577^FLUTAMIDE 125MG CAP
+"DATA",176.112,29591,1)
+197726
+"DATA",176.112,29592,0)
+4007955^FLURBIPROFEN 50MG TAB
+"DATA",176.112,29592,1)
+197725
+"DATA",176.112,29593,0)
+4007956^FLURBIPROFEN 100MG TAB
+"DATA",176.112,29593,1)
+197724
+"DATA",176.112,29594,0)
+4002349^FLURAZEPAM HCL 30MG CAP
+"DATA",176.112,29594,1)
+197723
+"DATA",176.112,29595,0)
+4002348^FLURAZEPAM HCL 15MG CAP
+"DATA",176.112,29595,1)
+197722
+"DATA",176.112,29596,0)
+4007563^FLURANDRENOLIDE 0.05% OINT,TOP
+"DATA",176.112,29596,1)
+197720
+"DATA",176.112,29597,0)
+4007561^FLURANDRENOLIDE 0.05% LOTION
+"DATA",176.112,29597,1)
+197719
+"DATA",176.112,29598,0)
+4007566^FLURANDRENOLIDE 0.05% CREAM,TOP
+"DATA",176.112,29598,1)
+197718
+"DATA",176.112,29599,0)
+4007562^FLURANDRENOLIDE 0.025% OINT,TOP
+"DATA",176.112,29599,1)
+197717
+"DATA",176.112,29600,0)
+4007565^FLURANDRENOLIDE 0.025% CREAM,TOP
+"DATA",176.112,29600,1)
+197716
+"DATA",176.112,29601,0)
+4001897^FLUPHENAZINE HCL 2.5MG TAB
+"DATA",176.112,29601,1)
+197715
+"DATA",176.112,29602,0)
+4001899^FLUPHENAZINE HCL 10MG TAB
+"DATA",176.112,29602,1)
+197714
+"DATA",176.112,29603,0)
+4001896^FLUPHENAZINE HCL 1MG TAB
+"DATA",176.112,29603,1)
+197713
+"DATA",176.112,29604,0)
+4001902^FLUOXYMESTERONE 5MG TAB
+"DATA",176.112,29604,1)
+197712
+"DATA",176.112,29605,0)
+4001903^FLUOXYMESTERONE 2MG TAB
+"DATA",176.112,29605,1)
+197711
+"DATA",176.112,29606,0)
+4001904^FLUOXYMESTERONE 10MG TAB
+"DATA",176.112,29606,1)
+197710
+"DATA",176.112,29607,0)
+4002259^FLUOROURACIL 1% CREAM,TOP
+"DATA",176.112,29607,1)
+197709
+"DATA",176.112,29608,0)
+4002198^FLUCYTOSINE 500MG CAP
+"DATA",176.112,29608,1)
+197703
+"DATA",176.112,29609,0)
+4002197^FLUCYTOSINE 250MG CAP
+"DATA",176.112,29609,1)
+197702
+"DATA",176.112,29610,0)
+4009049^FLUCONAZOLE 50MG TAB
+"DATA",176.112,29610,1)
+197701
+"DATA",176.112,29611,0)
+4009051^FLUCONAZOLE 200MG TAB
+"DATA",176.112,29611,1)
+197700
+"DATA",176.112,29612,0)
+4009053^FLUCONAZOLE 150MG TAB
+"DATA",176.112,29612,1)
+197699
+"DATA",176.112,29613,0)
+4009050^FLUCONAZOLE 100MG TAB
+"DATA",176.112,29613,1)
+197698
+"DATA",176.112,29614,0)
+4006705^FLECAINIDE ACETATE 100MG TAB
+"DATA",176.112,29614,1)
+197697
+"DATA",176.112,29615,0)
+4006324^FENTANYL 75MCG/HR PATCH
+"DATA",176.112,29615,1)
+197696
+"DATA",176.112,29616,0)
+4007068^FENOPROFEN CA 300MG CAP
+"DATA",176.112,29616,1)
+197695
+"DATA",176.112,29617,0)
+4007069^FENOPROFEN CA 200MG CAP
+"DATA",176.112,29617,1)
+197694
+"DATA",176.112,29618,0)
+4004715^FENFLURAMINE HCL 20MG TAB
+"DATA",176.112,29618,1)
+197693
+"DATA",176.112,29619,0)
+4013722^FELODIPINE 2.5MG TAB,SA,UD
+"DATA",176.112,29619,1)
+197692
+"DATA",176.112,29620,0)
+4009114^ETRETINATE 25MG CAP
+"DATA",176.112,29620,1)
+197689
+"DATA",176.112,29621,0)
+4009113^ETRETINATE 10MG CAP
+"DATA",176.112,29621,1)
+197688
+"DATA",176.112,29622,0)
+4003812^ETOPOSIDE 50MG CAP
+"DATA",176.112,29622,1)
+197687
+"DATA",176.112,29623,0)
+4009273^ETODOLAC 400MG TAB
+"DATA",176.112,29623,1)
+197686
+"DATA",176.112,29624,0)
+4009272^ETODOLAC 300MG CAP
+"DATA",176.112,29624,1)
+197685
+"DATA",176.112,29625,0)
+4009271^ETODOLAC 200MG CAP
+"DATA",176.112,29625,1)
+197684
+"DATA",176.112,29626,0)
+4006274^ETHOTOIN 250MG TAB
+"DATA",176.112,29626,1)
+197683
+"DATA",176.112,29627,0)
+4005717^ETHOSUXIMIDE 250MG CAP
+"DATA",176.112,29627,1)
+197682
+"DATA",176.112,29628,0)
+4003393^ETHIONAMIDE 250MG TAB
+"DATA",176.112,29628,1)
+197681
+"DATA",176.112,29629,0)
+4003418^ETHINYL ESTRADIOL 0.05MG TAB
+"DATA",176.112,29629,1)
+197680
+"DATA",176.112,29630,0)
+4003420^ETHINYL ESTRADIOL 0.02MG TAB
+"DATA",176.112,29630,1)
+197679
+"DATA",176.112,29631,0)
+4006261^ETHCHLORVYNOL 750MG CAP
+"DATA",176.112,29631,1)
+197678
+"DATA",176.112,29632,0)
+4006263^ETHCHLORVYNOL 500MG CAP
+"DATA",176.112,29632,1)
+197677
+"DATA",176.112,29633,0)
+4006262^ETHCHLORVYNOL 200MG CAP
+"DATA",176.112,29633,1)
+197676
+"DATA",176.112,29634,0)
+4007031^ETHAVERINE HCL 100MG TAB
+"DATA",176.112,29634,1)
+197675
+"DATA",176.112,29635,0)
+4005023^ESTROGENS,ESTERIFIED 1.25MG/METHYLTESTOSTERONE 2.5MG TAB
+"DATA",176.112,29635,1)
+197670
+"DATA",176.112,29636,0)
+4004645^ESTROGENS,ESTERIFIED 2.5MG TAB
+"DATA",176.112,29636,1)
+197669
+"DATA",176.112,29637,0)
+4004644^ESTROGENS,ESTERIFIED 1.25MG TAB
+"DATA",176.112,29637,1)
+197668
+"DATA",176.112,29638,0)
+4004643^ESTROGENS,ESTERIFIED 0.625MG TAB
+"DATA",176.112,29638,1)
+197667
+"DATA",176.112,29639,0)
+4004635^ESTROGENS,ESTERIFIED 0.3MG TAB
+"DATA",176.112,29639,1)
+197666
+"DATA",176.112,29640,0)
+4005021^ESTROGENS,CONJUGATED 1.25MG/METHYLTESTOSTERONE 10MG TAB
+"DATA",176.112,29640,1)
+197665
+"DATA",176.112,29641,0)
+4005020^ESTROGENS,CONJUGATED 0.625MG/METHYLTESTOSTERONE 5MG TAB
+"DATA",176.112,29641,1)
+197664
+"DATA",176.112,29642,0)
+4004638^ESTROGENS,CONJUGATED 2.5MG TAB
+"DATA",176.112,29642,1)
+197663
+"DATA",176.112,29643,0)
+4004637^ESTROGENS,CONJUGATED 1.25MG TAB
+"DATA",176.112,29643,1)
+197662
+"DATA",176.112,29644,0)
+4016497^ESTROGENS,CONJUGATED 1.25MG TAB,UD
+"DATA",176.112,29644,1)
+197662
+"DATA",176.112,29645,0)
+4004640^ESTROGENS,CONJUGATED 0.9MG TAB
+"DATA",176.112,29645,1)
+197661
+"DATA",176.112,29646,0)
+4027506^ESTROGENS,CONJUGATED SYNTHETIC B 0.9MG TAB
+"DATA",176.112,29646,1)
+197661^^^ESTROGENS,CONJ SYNTHETIC B 0.9MG TAB^Y
+"DATA",176.112,29647,0)
+4004641^ESTROGENS,CONJUGATED 0.3MG TAB
+"DATA",176.112,29647,1)
+197660
+"DATA",176.112,29648,0)
+4001672^ESTRADIOL 2MG TAB
+"DATA",176.112,29648,1)
+197659
+"DATA",176.112,29649,0)
+4001671^ESTRADIOL 1MG TAB
+"DATA",176.112,29649,1)
+197658
+"DATA",176.112,29650,0)
+4001674^ESTRADIOL 0.5MG TAB
+"DATA",176.112,29650,1)
+197657
+"DATA",176.112,29651,0)
+4009299^ESTAZOLAM 2MG TAB
+"DATA",176.112,29651,1)
+197654
+"DATA",176.112,29652,0)
+4009298^ESTAZOLAM 1MG TAB
+"DATA",176.112,29652,1)
+197653
+"DATA",176.112,29653,0)
+4001570^ERYTHROMYCIN 500MG TAB
+"DATA",176.112,29653,1)
+197650
+"DATA",176.112,29654,0)
+4000735^ERGONOVINE MALEATE 0.2MG TAB
+"DATA",176.112,29654,1)
+197648
+"DATA",176.112,29655,0)
+4002392^ERGOLOID MESYLATES 1MG LIQUID CAP,ORAL
+"DATA",176.112,29655,1)
+197647
+"DATA",176.112,29656,0)
+4016806^ERGOCALCIFEROL (VITAMIN D) 25000 UNT CAP
+"DATA",176.112,29656,1)
+197645
+"DATA",176.112,29657,0)
+4010166^ENOXACIN 400MG TAB
+"DATA",176.112,29657,1)
+197642
+"DATA",176.112,29658,0)
+4010165^ENOXACIN 200MG TAB
+"DATA",176.112,29658,1)
+197641
+"DATA",176.112,29659,0)
+4006962^ETIDRONATE DISODIUM 200MG TAB
+"DATA",176.112,29659,1)
+197640
+"DATA",176.112,29660,0)
+4004817^DYPHYLLINE 200MG/GUAIFENESIN 200MG TAB
+"DATA",176.112,29660,1)
+197639
+"DATA",176.112,29661,0)
+4004811^DYPHYLLINE 400MG TAB
+"DATA",176.112,29661,1)
+197638
+"DATA",176.112,29662,0)
+4004809^DYPHYLLINE 200MG TAB
+"DATA",176.112,29662,1)
+197637
+"DATA",176.112,29663,0)
+4005082^DRONABINOL 5MG CAP
+"DATA",176.112,29663,1)
+197636
+"DATA",176.112,29664,0)
+4005081^DRONABINOL 2.5MG CAP
+"DATA",176.112,29664,1)
+197635
+"DATA",176.112,29665,0)
+4005083^DRONABINOL 10MG CAP
+"DATA",176.112,29665,1)
+197634
+"DATA",176.112,29666,0)
+4001959^DOXYCYCLINE HYCLATE 100MG TAB
+"DATA",176.112,29666,1)
+197633
+"DATA",176.112,29667,0)
+4002480^DOXEPIN HCL 75MG CAP
+"DATA",176.112,29667,1)
+197632
+"DATA",176.112,29668,0)
+4002483^DOXEPIN HCL 150MG CAP
+"DATA",176.112,29668,1)
+197631
+"DATA",176.112,29669,0)
+4002481^DOXEPIN HCL 100MG CAP
+"DATA",176.112,29669,1)
+197630
+"DATA",176.112,29670,0)
+4002477^DOXEPIN HCL 10MG CAP
+"DATA",176.112,29670,1)
+197629
+"DATA",176.112,29671,0)
+4009297^DOXAZOSIN MESYLATE 8MG TAB
+"DATA",176.112,29671,1)
+197628
+"DATA",176.112,29672,0)
+4009296^DOXAZOSIN MESYLATE 4MG TAB
+"DATA",176.112,29672,1)
+197627
+"DATA",176.112,29673,0)
+4016084^DOXAZOSIN MESYLATE 2MG TAB,UD
+"DATA",176.112,29673,1)
+197626
+"DATA",176.112,29674,0)
+4009295^DOXAZOSIN MESYLATE 2MG TAB
+"DATA",176.112,29674,1)
+197626
+"DATA",176.112,29675,0)
+4009294^DOXAZOSIN MESYLATE 1MG TAB
+"DATA",176.112,29675,1)
+197625
+"DATA",176.112,29676,0)
+4005019^DISULFIRAM 500MG TAB
+"DATA",176.112,29676,1)
+197624
+"DATA",176.112,29677,0)
+4005018^DISULFIRAM 250MG TAB
+"DATA",176.112,29677,1)
+197623
+"DATA",176.112,29678,0)
+4002647^DIPYRIDAMOLE 50MG TAB
+"DATA",176.112,29678,1)
+197622
+"DATA",176.112,29679,0)
+4002560^DIPHENHYDRAMINE HCL 50MG TAB
+"DATA",176.112,29679,1)
+197621
+"DATA",176.112,29680,0)
+4002562^DIPHENHYDRAMINE HCL 25MG TAB
+"DATA",176.112,29680,1)
+197620
+"DATA",176.112,29681,0)
+4003520^DINOPROSTONE 20MG SUPP,VAG
+"DATA",176.112,29681,1)
+197619
+"DATA",176.112,29682,0)
+4006670^DILTIAZEM HCL 90MG TAB
+"DATA",176.112,29682,1)
+197616
+"DATA",176.112,29683,0)
+4006666^DILTIAZEM HCL 60MG TAB
+"DATA",176.112,29683,1)
+197614
+"DATA",176.112,29684,0)
+4006665^DILTIAZEM HCL 30MG TAB
+"DATA",176.112,29684,1)
+197613
+"DATA",176.112,29685,0)
+4006671^DILTIAZEM HCL 120MG TAB
+"DATA",176.112,29685,1)
+197612
+"DATA",176.112,29686,0)
+4004231^DIHYDROTACHYSTEROL 0.4MG TAB
+"DATA",176.112,29686,1)
+197611
+"DATA",176.112,29687,0)
+4004229^DIHYDROTACHYSTEROL 0.2MG TAB
+"DATA",176.112,29687,1)
+197610
+"DATA",176.112,29688,0)
+4004230^DIHYDROTACHYSTEROL 0.125MG TAB
+"DATA",176.112,29688,1)
+197609
+"DATA",176.112,29689,0)
+4004227^DIHYDROTACHYSTEROL 0.125MG CAP
+"DATA",176.112,29689,1)
+197608
+"DATA",176.112,29690,0)
+4015938^DIGOXIN 0.25MG TAB,UD
+"DATA",176.112,29690,1)
+197606
+"DATA",176.112,29691,0)
+4003336^DIGOXIN 0.25MG TAB
+"DATA",176.112,29691,1)
+197606
+"DATA",176.112,29692,0)
+4003342^DIGOXIN 0.2MG CAP
+"DATA",176.112,29692,1)
+197605
+"DATA",176.112,29693,0)
+4003335^DIGOXIN 0.125MG TAB
+"DATA",176.112,29693,1)
+197604
+"DATA",176.112,29694,0)
+4015937^DIGOXIN 0.125MG TAB,UD
+"DATA",176.112,29694,1)
+197604
+"DATA",176.112,29695,0)
+4002959^DIFLUNISAL 500MG TAB
+"DATA",176.112,29695,1)
+197603
+"DATA",176.112,29696,0)
+4002958^DIFLUNISAL 250MG TAB
+"DATA",176.112,29696,1)
+197602
+"DATA",176.112,29697,0)
+4003468^DIFLORASONE DIACETATE 0.05% OINT,TOP
+"DATA",176.112,29697,1)
+197601
+"DATA",176.112,29698,0)
+4013393^DIFLORASONE DIACETATE 0.05%/EMOLLIENT OINT,TOP
+"DATA",176.112,29698,1)
+197601
+"DATA",176.112,29699,0)
+4005443^DIETHYLPROPION HCL 25MG TAB
+"DATA",176.112,29699,1)
+197600
+"DATA",176.112,29700,0)
+4002581^DICYCLOMINE HCL 20MG TAB
+"DATA",176.112,29700,1)
+197599
+"DATA",176.112,29701,0)
+4002582^DICYCLOMINE HCL 10MG CAP
+"DATA",176.112,29701,1)
+197598
+"DATA",176.112,29702,0)
+4006119^DICUMAROL 25MG TAB
+"DATA",176.112,29702,1)
+197597
+"DATA",176.112,29703,0)
+4002434^DICLOXACILLIN NA 500MG CAP
+"DATA",176.112,29703,1)
+197596
+"DATA",176.112,29704,0)
+4002433^DICLOXACILLIN NA 250MG CAP
+"DATA",176.112,29704,1)
+197595
+"DATA",176.112,29705,0)
+4002842^DICHLORPHENAMIDE 50MG TAB
+"DATA",176.112,29705,1)
+197594
+"DATA",176.112,29706,0)
+4006579^DIAZOXIDE 50MG/ML SUSP,ORAL
+"DATA",176.112,29706,1)
+197593
+"DATA",176.112,29707,0)
+4006580^DIAZOXIDE 50MG CAP
+"DATA",176.112,29707,1)
+197592
+"DATA",176.112,29708,0)
+4002216^DIAZEPAM 5MG TAB
+"DATA",176.112,29708,1)
+197591
+"DATA",176.112,29709,0)
+4016090^DIAZEPAM 5MG TAB,UD
+"DATA",176.112,29709,1)
+197591
+"DATA",176.112,29710,0)
+4002215^DIAZEPAM 2MG TAB
+"DATA",176.112,29710,1)
+197590
+"DATA",176.112,29711,0)
+4016089^DIAZEPAM 2MG TAB,UD
+"DATA",176.112,29711,1)
+197590
+"DATA",176.112,29712,0)
+4002217^DIAZEPAM 10MG TAB
+"DATA",176.112,29712,1)
+197589
+"DATA",176.112,29713,0)
+4015628^DIAZEPAM 10MG TAB,UD
+"DATA",176.112,29713,1)
+197589
+"DATA",176.112,29714,0)
+4001536^DIATRIZOATE MEGLUMINE 52%/DIATRIZOATE NA 8% INJ
+"DATA",176.112,29714,1)
+197588
+"DATA",176.112,29715,0)
+4005933^DEXTROSE 5%/NACL 0.9% INJ
+"DATA",176.112,29715,1)
+197587
+"DATA",176.112,29716,0)
+4002824^DEXAMETHASONE NA PHOSPHATE 24MG/ML INJ,SOLN
+"DATA",176.112,29716,1)
+197584
+"DATA",176.112,29717,0)
+4002813^DEXAMETHASONE 6MG TAB
+"DATA",176.112,29717,1)
+197583
+"DATA",176.112,29718,0)
+4002812^DEXAMETHASONE 4MG TAB
+"DATA",176.112,29718,1)
+197582
+"DATA",176.112,29719,0)
+4002831^DEXAMETHASONE 2MG TAB
+"DATA",176.112,29719,1)
+197581
+"DATA",176.112,29720,0)
+4016070^DEXAMETHASONE 2MG TAB,UD
+"DATA",176.112,29720,1)
+197581
+"DATA",176.112,29721,0)
+4002811^DEXAMETHASONE 1.5MG TAB
+"DATA",176.112,29721,1)
+197580
+"DATA",176.112,29722,0)
+4002830^DEXAMETHASONE 1MG TAB
+"DATA",176.112,29722,1)
+197579
+"DATA",176.112,29723,0)
+4002809^DEXAMETHASONE 0.5MG TAB
+"DATA",176.112,29723,1)
+197577
+"DATA",176.112,29724,0)
+4002808^DEXAMETHASONE 0.25MG TAB
+"DATA",176.112,29724,1)
+197576
+"DATA",176.112,29725,0)
+4004898^DESOXIMETASONE 0.25% OINT,TOP
+"DATA",176.112,29725,1)
+197575
+"DATA",176.112,29726,0)
+4004895^DESOXIMETASONE 0.25% CREAM,TOP
+"DATA",176.112,29726,1)
+197574
+"DATA",176.112,29727,0)
+4004896^DESOXIMETASONE 0.05% CREAM,TOP
+"DATA",176.112,29727,1)
+197573
+"DATA",176.112,29728,0)
+4004417^DESONIDE 0.05% LOTION
+"DATA",176.112,29728,1)
+197572
+"DATA",176.112,29729,0)
+4006362^DESMOPRESSIN ACETATE 0.1MG/ML SOLN,NASAL SPRAY
+"DATA",176.112,29729,1)
+197571
+"DATA",176.112,29730,0)
+4005626^DESIPRAMINE HCL 75MG TAB
+"DATA",176.112,29730,1)
+197570
+"DATA",176.112,29731,0)
+4005625^DESIPRAMINE HCL 50MG TAB
+"DATA",176.112,29731,1)
+197569
+"DATA",176.112,29732,0)
+4005624^DESIPRAMINE HCL 25MG TAB
+"DATA",176.112,29732,1)
+197568
+"DATA",176.112,29733,0)
+4005628^DESIPRAMINE HCL 150MG TAB
+"DATA",176.112,29733,1)
+197567
+"DATA",176.112,29734,0)
+4005627^DESIPRAMINE HCL 100MG TAB
+"DATA",176.112,29734,1)
+197566
+"DATA",176.112,29735,0)
+4005623^DESIPRAMINE HCL 10MG TAB
+"DATA",176.112,29735,1)
+197565
+"DATA",176.112,29736,0)
+4006279^DESERPIDINE 0.25MG/HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,29736,1)
+197564
+"DATA",176.112,29737,0)
+4006277^DESERPIDINE 0.125MG/HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,29737,1)
+197563
+"DATA",176.112,29738,0)
+4006278^DESERPIDINE 0.125MG/HYDROCHLOROTHIAZIDE 50MG TAB
+"DATA",176.112,29738,1)
+197562
+"DATA",176.112,29739,0)
+4006276^DESERPIDINE 0.25MG TAB
+"DATA",176.112,29739,1)
+197561
+"DATA",176.112,29740,0)
+4002807^DEMECLOCYCLINE HCL 300MG TAB
+"DATA",176.112,29740,1)
+197560
+"DATA",176.112,29741,0)
+4008147^DAPSONE 25MG TAB
+"DATA",176.112,29741,1)
+197558
+"DATA",176.112,29742,0)
+4008146^DAPSONE 100MG TAB
+"DATA",176.112,29742,1)
+197557
+"DATA",176.112,29743,0)
+4004200^DANAZOL 50MG CAP
+"DATA",176.112,29743,1)
+197556
+"DATA",176.112,29744,0)
+4004202^DANAZOL 200MG CAP
+"DATA",176.112,29744,1)
+197555
+"DATA",176.112,29745,0)
+4004201^DANAZOL 100MG CAP
+"DATA",176.112,29745,1)
+197554
+"DATA",176.112,29746,0)
+4024809^CYCLOSPORINE NON-MODIFIED 25MG CAP
+"DATA",176.112,29746,1)
+197553
+"DATA",176.112,29747,0)
+4024805^CYCLOSPORINE MODIFIED 25MG CAP
+"DATA",176.112,29747,1)
+197553
+"DATA",176.112,29748,0)
+4006452^CYCLOSPORINE MICROEMULSION 25MG CAP
+"DATA",176.112,29748,1)
+197553
+"DATA",176.112,29749,0)
+4006449^CYCLOSPORINE 25MG CAP
+"DATA",176.112,29749,1)
+197553
+"DATA",176.112,29750,0)
+4008262^CYCLOSERINE 250MG CAP
+"DATA",176.112,29750,1)
+197551
+"DATA",176.112,29751,0)
+4003597^CYCLOPHOSPHAMIDE 50MG TAB
+"DATA",176.112,29751,1)
+197550
+"DATA",176.112,29752,0)
+4003598^CYCLOPHOSPHAMIDE 25MG TAB
+"DATA",176.112,29752,1)
+197549
+"DATA",176.112,29753,0)
+4002973^CYCLOBENZAPRINE HCL 10MG TAB
+"DATA",176.112,29753,1)
+197548
+"DATA",176.112,29754,0)
+4003390^CYCLANDELATE 400MG CAP
+"DATA",176.112,29754,1)
+197547
+"DATA",176.112,29755,0)
+4003389^CYCLANDELATE 200MG CAP
+"DATA",176.112,29755,1)
+197546
+"DATA",176.112,29756,0)
+4002867^CORTISONE ACETATE 5MG TAB
+"DATA",176.112,29756,1)
+197545
+"DATA",176.112,29757,0)
+4002864^CORTISONE ACETATE 25MG TAB
+"DATA",176.112,29757,1)
+197544
+"DATA",176.112,29758,0)
+4002871^CORTISONE 25MG TAB
+"DATA",176.112,29758,1)
+197544
+"DATA",176.112,29759,0)
+4002868^CORTISONE ACETATE 10MG TAB
+"DATA",176.112,29759,1)
+197543
+"DATA",176.112,29760,0)
+4000669^COLCHICINE 0.6MG TAB
+"DATA",176.112,29760,1)
+197541
+"DATA",176.112,29761,0)
+4000671^COLCHICINE 0.5MG TAB
+"DATA",176.112,29761,1)
+197540
+"DATA",176.112,29762,0)
+4000652^CODEINE SO4 60MG TAB
+"DATA",176.112,29762,1)
+197539
+"DATA",176.112,29763,0)
+4016125^CODEINE SO4 30MG TAB,UD
+"DATA",176.112,29763,1)
+197538
+"DATA",176.112,29764,0)
+4000651^CODEINE SO4 30MG TAB
+"DATA",176.112,29764,1)
+197538
+"DATA",176.112,29765,0)
+4000650^CODEINE SO4 15MG TAB
+"DATA",176.112,29765,1)
+197537
+"DATA",176.112,29766,0)
+4024860^CLOZAPINE (TEVA) 25MG TAB
+"DATA",176.112,29766,1)
+197536
+"DATA",176.112,29767,0)
+4009024^CLOZAPINE 25MG TAB
+"DATA",176.112,29767,1)
+197536
+"DATA",176.112,29768,0)
+4016858^CLOZAPINE (CARACO) 25MG TAB
+"DATA",176.112,29768,1)
+197536
+"DATA",176.112,29769,0)
+4024859^CLOZAPINE (TEVA) 100MG TAB
+"DATA",176.112,29769,1)
+197535
+"DATA",176.112,29770,0)
+4016859^CLOZAPINE (CARACO) 100MG TAB
+"DATA",176.112,29770,1)
+197535
+"DATA",176.112,29771,0)
+4009025^CLOZAPINE 100MG TAB
+"DATA",176.112,29771,1)
+197535
+"DATA",176.112,29772,0)
+4002690^CLOXACILLIN NA 500MG CAP
+"DATA",176.112,29772,1)
+197534
+"DATA",176.112,29773,0)
+4002689^CLOXACILLIN NA 250MG CAP
+"DATA",176.112,29773,1)
+197533
+"DATA",176.112,29774,0)
+4004367^CLOTRIMAZOLE 500MG TAB,VAG
+"DATA",176.112,29774,1)
+197532
+"DATA",176.112,29775,0)
+4004369^CLOTRIMAZOLE 1% LOTION
+"DATA",176.112,29775,1)
+197531
+"DATA",176.112,29776,0)
+4004364^CLOTRIMAZOLE 100MG TAB,VAG
+"DATA",176.112,29776,1)
+197530
+"DATA",176.112,29777,0)
+4016088^CLONAZEPAM 2MG TAB,UD
+"DATA",176.112,29777,1)
+197529
+"DATA",176.112,29778,0)
+4002196^CLONAZEPAM 2MG TAB
+"DATA",176.112,29778,1)
+197529
+"DATA",176.112,29779,0)
+4016087^CLONAZEPAM 1MG TAB,UD
+"DATA",176.112,29779,1)
+197528
+"DATA",176.112,29780,0)
+4002194^CLONAZEPAM 1MG TAB
+"DATA",176.112,29780,1)
+197528
+"DATA",176.112,29781,0)
+4002195^CLONAZEPAM 0.5MG TAB
+"DATA",176.112,29781,1)
+197527
+"DATA",176.112,29782,0)
+4016086^CLONAZEPAM 0.5MG TAB,UD
+"DATA",176.112,29782,1)
+197527
+"DATA",176.112,29783,0)
+4009048^CLOMIPRAMINE HCL 75MG CAP
+"DATA",176.112,29783,1)
+197526
+"DATA",176.112,29784,0)
+4013420^CLOMIPRAMINE HCL 75MG CAP,UD
+"DATA",176.112,29784,1)
+197526
+"DATA",176.112,29785,0)
+4009047^CLOMIPRAMINE HCL 50MG CAP
+"DATA",176.112,29785,1)
+197525
+"DATA",176.112,29786,0)
+4013419^CLOMIPRAMINE HCL 50MG CAP,UD
+"DATA",176.112,29786,1)
+197525
+"DATA",176.112,29787,0)
+4013418^CLOMIPRAMINE HCL 25MG CAP,UD
+"DATA",176.112,29787,1)
+197524
+"DATA",176.112,29788,0)
+4009046^CLOMIPRAMINE HCL 25MG CAP
+"DATA",176.112,29788,1)
+197524
+"DATA",176.112,29789,0)
+4005652^CLOMIPHENE CITRATE 50MG TAB
+"DATA",176.112,29789,1)
+197523
+"DATA",176.112,29790,0)
+4004983^CLOFIBRATE 500MG CAP
+"DATA",176.112,29790,1)
+197522
+"DATA",176.112,29791,0)
+4009076^CLOFAZIMINE 50MG CAP
+"DATA",176.112,29791,1)
+197521
+"DATA",176.112,29792,0)
+4005238^CLOCORTOLONE PIVALATE 0.1% CREAM,TOP
+"DATA",176.112,29792,1)
+197520
+"DATA",176.112,29793,0)
+4003476^CLINDAMYCIN PO4 1% LOTION
+"DATA",176.112,29793,1)
+197519
+"DATA",176.112,29794,0)
+4027360^CLINDAMYCIN HCL 150MG CAP,UD
+"DATA",176.112,29794,1)
+197518^^^CLINDAMYCIN HCL 150MG CAP UD^Y
+"DATA",176.112,29795,0)
+4003469^CLINDAMYCIN HCL 150MG CAP
+"DATA",176.112,29795,1)
+197518
+"DATA",176.112,29796,0)
+4010076^CLARITHROMYCIN 500MG TAB
+"DATA",176.112,29796,1)
+197517
+"DATA",176.112,29797,0)
+4010075^CLARITHROMYCIN 250MG TAB
+"DATA",176.112,29797,1)
+197516
+"DATA",176.112,29798,0)
+4008324^CIPROFLOXACIN HCL 750MG TAB
+"DATA",176.112,29798,1)
+197512
+"DATA",176.112,29799,0)
+4008322^CIPROFLOXACIN HCL 250MG TAB
+"DATA",176.112,29799,1)
+197511
+"DATA",176.112,29800,0)
+4007746^CINOXACIN 500MG CAP
+"DATA",176.112,29800,1)
+197510
+"DATA",176.112,29801,0)
+4007745^CINOXACIN 250MG CAP
+"DATA",176.112,29801,1)
+197509
+"DATA",176.112,29802,0)
+4006828^CIMETIDINE 800MG TAB,UD
+"DATA",176.112,29802,1)
+197508
+"DATA",176.112,29803,0)
+4006822^CIMETIDINE 800MG TAB
+"DATA",176.112,29803,1)
+197508
+"DATA",176.112,29804,0)
+4006827^CIMETIDINE 400MG TAB,UD
+"DATA",176.112,29804,1)
+197507
+"DATA",176.112,29805,0)
+4006821^CIMETIDINE 400MG TAB
+"DATA",176.112,29805,1)
+197507
+"DATA",176.112,29806,0)
+4006817^CIMETIDINE 300MG TAB
+"DATA",176.112,29806,1)
+197506
+"DATA",176.112,29807,0)
+4006826^CIMETIDINE 300MG TAB,UD
+"DATA",176.112,29807,1)
+197506
+"DATA",176.112,29808,0)
+4006818^CIMETIDINE 200MG TAB
+"DATA",176.112,29808,1)
+197505
+"DATA",176.112,29809,0)
+4004976^CHLORZOXAZONE 500MG TAB
+"DATA",176.112,29809,1)
+197502
+"DATA",176.112,29810,0)
+4004975^CHLORZOXAZONE 250MG TAB
+"DATA",176.112,29810,1)
+197501
+"DATA",176.112,29811,0)
+4002657^CHLORTHALIDONE 50MG TAB
+"DATA",176.112,29811,1)
+197500
+"DATA",176.112,29812,0)
+4002658^CHLORTHALIDONE 25MG TAB
+"DATA",176.112,29812,1)
+197499
+"DATA",176.112,29813,0)
+4016418^CHLORTHALIDONE 25MG TAB,UD
+"DATA",176.112,29813,1)
+197499
+"DATA",176.112,29814,0)
+4002660^CHLORTHALIDONE 15MG TAB
+"DATA",176.112,29814,1)
+197498
+"DATA",176.112,29815,0)
+4002659^CHLORTHALIDONE 100MG TAB
+"DATA",176.112,29815,1)
+197497
+"DATA",176.112,29816,0)
+4002422^CHLORPROPAMIDE 250MG TAB
+"DATA",176.112,29816,1)
+197496
+"DATA",176.112,29817,0)
+4002421^CHLORPROPAMIDE 100MG TAB
+"DATA",176.112,29817,1)
+197495
+"DATA",176.112,29818,0)
+4002511^CHLORPROMAZINE HCL 50MG TAB
+"DATA",176.112,29818,1)
+197494
+"DATA",176.112,29819,0)
+4002510^CHLORPROMAZINE HCL 25MG TAB
+"DATA",176.112,29819,1)
+197493
+"DATA",176.112,29820,0)
+4002512^CHLORPROMAZINE HCL 100MG TAB
+"DATA",176.112,29820,1)
+197492
+"DATA",176.112,29821,0)
+4002525^CHLORPROMAZINE HCL 10MG TAB
+"DATA",176.112,29821,1)
+197491
+"DATA",176.112,29822,0)
+4016417^CHLORPROMAZINE HCL 10MG TAB,UD
+"DATA",176.112,29822,1)
+197491
+"DATA",176.112,29823,0)
+4007117^HYDROCODONE 2.5MG/CTM 2MG/P-EPHRINE 5MG/5ML SYRUP
+"DATA",176.112,29823,1)
+197484
+"DATA",176.112,29824,0)
+4006627^CTM 4MG/PHENINDAMINE 24MG/P-PROPANOL 50MG TAB,SA
+"DATA",176.112,29824,1)
+197483
+"DATA",176.112,29825,0)
+4007509^CTM 6MG/GG 200MG/P-PROPANOL 75MG TAB,SA
+"DATA",176.112,29825,1)
+197481
+"DATA",176.112,29826,0)
+4007312^CTM 2MG/DM 15MG/P-EPHRINE 5MG/5ML SYRUP
+"DATA",176.112,29826,1)
+197480
+"DATA",176.112,29827,0)
+4005670^CHLOROTRIANISENE 25MG CAP
+"DATA",176.112,29827,1)
+197479
+"DATA",176.112,29828,0)
+4005669^CHLOROTRIANISENE 12MG CAP
+"DATA",176.112,29828,1)
+197478
+"DATA",176.112,29829,0)
+4002873^CHLOROTHIAZIDE 500MG/RESERPINE 0.125MG TAB
+"DATA",176.112,29829,1)
+197477
+"DATA",176.112,29830,0)
+4001948^CHLOROTHIAZIDE 500MG TAB
+"DATA",176.112,29830,1)
+197476
+"DATA",176.112,29831,0)
+4001949^CHLOROTHIAZIDE 250MG TAB
+"DATA",176.112,29831,1)
+197475
+"DATA",176.112,29832,0)
+4004191^CHLOROQUINE PO4 250MG TAB
+"DATA",176.112,29832,1)
+197474
+"DATA",176.112,29833,0)
+4004192^CHLOROQUINE HCL 250MG TAB
+"DATA",176.112,29833,1)
+197474
+"DATA",176.112,29834,0)
+4006185^CHLOROPROCAINE HCL 3% INJ
+"DATA",176.112,29834,1)
+197473
+"DATA",176.112,29835,0)
+4006184^CHLOROPROCAINE HCL 2% INJ
+"DATA",176.112,29835,1)
+197472
+"DATA",176.112,29836,0)
+4006186^CHLOROPROCAINE HCL 1% INJ
+"DATA",176.112,29836,1)
+197471
+"DATA",176.112,29837,0)
+4004352^CHLORMEZANONE 200MG TAB
+"DATA",176.112,29837,1)
+197470
+"DATA",176.112,29838,0)
+4002266^CHLORDIAZEPOXIDE HCL 5MG CAP
+"DATA",176.112,29838,1)
+197469
+"DATA",176.112,29839,0)
+4002268^CHLORDIAZEPOXIDE HCL 25MG CAP
+"DATA",176.112,29839,1)
+197468
+"DATA",176.112,29840,0)
+4016068^CHLORDIAZEPOXIDE HCL 25MG CAP,UD
+"DATA",176.112,29840,1)
+197468
+"DATA",176.112,29841,0)
+4002267^CHLORDIAZEPOXIDE HCL 10MG CAP
+"DATA",176.112,29841,1)
+197467
+"DATA",176.112,29842,0)
+4016067^CHLORDIAZEPOXIDE HCL 10MG CAP,UD
+"DATA",176.112,29842,1)
+197467
+"DATA",176.112,29843,0)
+4006092^CLORAZEPATE DIPOTASSIUM 7.5MG TAB
+"DATA",176.112,29843,1)
+197466
+"DATA",176.112,29844,0)
+4006091^CLORAZEPATE DIPOTASSIUM 3.75MG TAB
+"DATA",176.112,29844,1)
+197465
+"DATA",176.112,29845,0)
+4006093^CLORAZEPATE DIPOTASSIUM 15MG TAB
+"DATA",176.112,29845,1)
+197464
+"DATA",176.112,29846,0)
+4006094^CLORAZEPATE DIPOTASSIUM 15MG TABLET
+"DATA",176.112,29846,1)
+197464
+"DATA",176.112,29847,0)
+4004070^CHLORAMPHENICOL 250MG CAP
+"DATA",176.112,29847,1)
+197463
+"DATA",176.112,29848,0)
+4006497^CHLORAMBUCIL 2MG TAB
+"DATA",176.112,29848,1)
+197462
+"DATA",176.112,29849,0)
+4001933^CHLORAL HYDRATE 650MG SUPP,RTL
+"DATA",176.112,29849,1)
+197461
+"DATA",176.112,29850,0)
+4001931^CHLORAL HYDRATE 500MG SUPP,RTL
+"DATA",176.112,29850,1)
+197460
+"DATA",176.112,29851,0)
+4001928^CHLORAL HYDRATE 500MG CAP
+"DATA",176.112,29851,1)
+197459
+"DATA",176.112,29852,0)
+4001932^CHLORAL HYDRATE 325MG SUPP,RTL
+"DATA",176.112,29852,1)
+197458
+"DATA",176.112,29853,0)
+4001987^CEPHRADINE 500MG CAP
+"DATA",176.112,29853,1)
+197456
+"DATA",176.112,29854,0)
+4001986^CEPHRADINE 250MG CAP
+"DATA",176.112,29854,1)
+197455
+"DATA",176.112,29855,0)
+4007030^CEPHALEXIN HCL MONOHYDRATE 500MG TAB
+"DATA",176.112,29855,1)
+197454
+"DATA",176.112,29856,0)
+4007028^CEPHALEXIN 500MG TAB
+"DATA",176.112,29856,1)
+197454
+"DATA",176.112,29857,0)
+4010170^CEFPROZIL 500MG TAB
+"DATA",176.112,29857,1)
+197453
+"DATA",176.112,29858,0)
+4010169^CEFPROZIL 250MG TAB
+"DATA",176.112,29858,1)
+197452
+"DATA",176.112,29859,0)
+4008630^CEFIXIME 400MG TAB
+"DATA",176.112,29859,1)
+197451
+"DATA",176.112,29860,0)
+4008629^CEFIXIME 200MG TAB
+"DATA",176.112,29860,1)
+197450
+"DATA",176.112,29861,0)
+4001276^CEFACLOR 500MG CAP
+"DATA",176.112,29861,1)
+197449
+"DATA",176.112,29862,0)
+4007245^LEVOCARNITINE 330MG TAB
+"DATA",176.112,29862,1)
+197448
+"DATA",176.112,29863,0)
+4004851^ASPIRIN 325MG/CARISOPRODOL 200MG TAB
+"DATA",176.112,29863,1)
+197447
+"DATA",176.112,29864,0)
+4004850^CARISOPRODOL 350MG TAB
+"DATA",176.112,29864,1)
+197446
+"DATA",176.112,29865,0)
+4002952^CARBIDOPA 25MG/LEVODOPA 250MG TAB
+"DATA",176.112,29865,1)
+197445
+"DATA",176.112,29866,0)
+4002957^CARBIDOPA 25MG/LEVODOPA 250MG TAB,UD
+"DATA",176.112,29866,1)
+197445
+"DATA",176.112,29867,0)
+4002951^CARBIDOPA 25MG/LEVODOPA 100MG TAB
+"DATA",176.112,29867,1)
+197444
+"DATA",176.112,29868,0)
+4002956^CARBIDOPA 25MG/LEVODOPA 100MG TAB,UD
+"DATA",176.112,29868,1)
+197444
+"DATA",176.112,29869,0)
+4002955^CARBIDOPA 10MG/LEVODOPA 100MG TAB,UD
+"DATA",176.112,29869,1)
+197443
+"DATA",176.112,29870,0)
+4002950^CARBIDOPA 10MG/LEVODOPA 100MG TAB
+"DATA",176.112,29870,1)
+197443
+"DATA",176.112,29871,0)
+4001694^CAPTOPRIL 50MG/HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,29871,1)
+197439
+"DATA",176.112,29872,0)
+4001693^CAPTOPRIL 50MG/HYDROCHLOROTHIAZIDE 15MG TAB
+"DATA",176.112,29872,1)
+197438
+"DATA",176.112,29873,0)
+4001692^CAPTOPRIL 25MG/HYDROCHLOROTHIAZIDE 25MG TAB
+"DATA",176.112,29873,1)
+197437
+"DATA",176.112,29874,0)
+4001691^CAPTOPRIL 25MG/HYDROCHLOROTHIAZIDE 15MG TAB
+"DATA",176.112,29874,1)
+197436
+"DATA",176.112,29875,0)
+4003490^CALCIUM GLUCONATE 100MG/ML INJ
+"DATA",176.112,29875,1)
+197435
+"DATA",176.112,29876,0)
+4003494^CALCIUM GLUCONATE 100MG/ML (PF) INJ
+"DATA",176.112,29876,1)
+197435
+"DATA",176.112,29877,0)
+4003484^CALCIUM CHLORIDE 100MG/ML INJ
+"DATA",176.112,29877,1)
+197434
+"DATA",176.112,29878,0)
+4010476^CALCIUM ACETATE 667MG TAB
+"DATA",176.112,29878,1)
+197433
+"DATA",176.112,29879,0)
+4005090^CALCIFEDIOL 50MCG CAP
+"DATA",176.112,29879,1)
+197432
+"DATA",176.112,29880,0)
+4005089^CALCIFEDIOL 20MCG CAP
+"DATA",176.112,29880,1)
+197431
+"DATA",176.112,29881,0)
+4007520^CTM 2MG/P-PROPANOL 10MG/PSEUDEFED 20MG/5ML SYRUP
+"DATA",176.112,29881,1)
+197430
+"DATA",176.112,29882,0)
+4003573^ASPIRIN 650MG/BUTALBITAL 50MG TAB
+"DATA",176.112,29882,1)
+197429
+"DATA",176.112,29883,0)
+4006619^ACETAMINOPHEN 650MG/BUTALBITAL 50MG TAB
+"DATA",176.112,29883,1)
+197428
+"DATA",176.112,29884,0)
+4006617^ACETAMINOPHEN 650MG/BUTALBITAL 50MG CAP
+"DATA",176.112,29884,1)
+197427
+"DATA",176.112,29885,0)
+4006616^ACETAMINOPHEN 325MG/BUTALBITAL 50MG TAB
+"DATA",176.112,29885,1)
+197426
+"DATA",176.112,29886,0)
+4006618^ACETAMINOPHEN 325MG/BUTALBITAL 50MG CAP
+"DATA",176.112,29886,1)
+197425
+"DATA",176.112,29887,0)
+4004790^BUTABARBITAL NA 30MG TAB
+"DATA",176.112,29887,1)
+197424
+"DATA",176.112,29888,0)
+4004789^BUTABARBITAL NA 15MG TAB
+"DATA",176.112,29888,1)
+197423
+"DATA",176.112,29889,0)
+4006501^BUSULFAN 2MG TAB
+"DATA",176.112,29889,1)
+197422
+"DATA",176.112,29890,0)
+4006657^BUSPIRONE HCL 5MG TAB
+"DATA",176.112,29890,1)
+197421
+"DATA",176.112,29891,0)
+4013915^BUSPIRONE HCL 5MG TAB,UD
+"DATA",176.112,29891,1)
+197421
+"DATA",176.112,29892,0)
+4014036^BUSPIRONE HCL 10MG TAB,UD
+"DATA",176.112,29892,1)
+197420
+"DATA",176.112,29893,0)
+4006658^BUSPIRONE HCL 10MG TAB
+"DATA",176.112,29893,1)
+197420
+"DATA",176.112,29894,0)
+4002205^BUMETANIDE 2MG TAB
+"DATA",176.112,29894,1)
+197419
+"DATA",176.112,29895,0)
+4002203^BUMETANIDE 1MG TAB
+"DATA",176.112,29895,1)
+197418
+"DATA",176.112,29896,0)
+4002204^BUMETANIDE 0.5MG TAB
+"DATA",176.112,29896,1)
+197417
+"DATA",176.112,29897,0)
+4004704^BROMPHENIRAMINE MALEATE 4MG TAB
+"DATA",176.112,29897,1)
+197415
+"DATA",176.112,29898,0)
+4006415^BROMOCRIPTINE MESYLATE 5MG CAP
+"DATA",176.112,29898,1)
+197412
+"DATA",176.112,29899,0)
+4006414^BROMOCRIPTINE MESYLATE 2.5MG TAB
+"DATA",176.112,29899,1)
+197411
+"DATA",176.112,29900,0)
+4002877^BETHANECHOL CL 50MG TAB
+"DATA",176.112,29900,1)
+197410
+"DATA",176.112,29901,0)
+4005800^BETAMETHASONE VALERATE 0.1% OINT,TOP
+"DATA",176.112,29901,1)
+197409
+"DATA",176.112,29902,0)
+4005794^BETAMETHASONE VALERATE 0.1% LOTION
+"DATA",176.112,29902,1)
+197408
+"DATA",176.112,29903,0)
+4005796^BETAMETHASONE VALERATE 0.1% CREAM,TOP
+"DATA",176.112,29903,1)
+197407
+"DATA",176.112,29904,0)
+4005801^BETAMETHASONE VALERATE 0.01% CREAM,TOP
+"DATA",176.112,29904,1)
+197406
+"DATA",176.112,29905,0)
+4005806^BETAMETHASONE DIPROPIONATE 0.05% AUGMENTED OINT
+"DATA",176.112,29905,1)
+197405
+"DATA",176.112,29906,0)
+4005792^BETAMETHASONE DIPROPIONATE 0.05% OINT,TOP
+"DATA",176.112,29906,1)
+197405
+"DATA",176.112,29907,0)
+4002199^CAROTENE,BETA 30MG CAP
+"DATA",176.112,29907,1)
+197404
+"DATA",176.112,29908,0)
+4002304^BENZTROPINE MESYLATE 2MG TAB
+"DATA",176.112,29908,1)
+197403
+"DATA",176.112,29909,0)
+4016069^BENZTROPINE MESYLATE 2MG TAB,UD
+"DATA",176.112,29909,1)
+197403
+"DATA",176.112,29910,0)
+4013911^BENZTROPINE MESYLATE 1MG TAB,UD
+"DATA",176.112,29910,1)
+197402
+"DATA",176.112,29911,0)
+4002303^BENZTROPINE MESYLATE 1MG TAB
+"DATA",176.112,29911,1)
+197402
+"DATA",176.112,29912,0)
+4013910^BENZTROPINE MESYLATE 0.5MG TAB,UD
+"DATA",176.112,29912,1)
+197401
+"DATA",176.112,29913,0)
+4002305^BENZTROPINE MESYLATE 0.5MG TAB
+"DATA",176.112,29913,1)
+197401
+"DATA",176.112,29914,0)
+4004712^BENZTHIAZIDE 50MG TAB
+"DATA",176.112,29914,1)
+197400
+"DATA",176.112,29915,0)
+4003422^BENZPHETAMINE HCL 50MG TAB
+"DATA",176.112,29915,1)
+197399
+"DATA",176.112,29916,0)
+4005312^BENZOYL PEROXIDE 2.5% WASH,TOP
+"DATA",176.112,29916,1)
+197398
+"DATA",176.112,29917,0)
+4005181^BENZONATATE 100MG CAP
+"DATA",176.112,29917,1)
+197397
+"DATA",176.112,29918,0)
+4001924^BENDROFLUMETHIAZIDE 5MG TAB
+"DATA",176.112,29918,1)
+197394
+"DATA",176.112,29919,0)
+4001925^BENDROFLUMETHIAZIDE 10MG TAB
+"DATA",176.112,29919,1)
+197393
+"DATA",176.112,29920,0)
+4016078^BACLOFEN 20MG TAB,UD
+"DATA",176.112,29920,1)
+197392
+"DATA",176.112,29921,0)
+4004595^BACLOFEN 20MG TAB
+"DATA",176.112,29921,1)
+197392
+"DATA",176.112,29922,0)
+4004594^BACLOFEN 10MG TAB
+"DATA",176.112,29922,1)
+197391
+"DATA",176.112,29923,0)
+4013909^BACLOFEN 10MG TAB,UD
+"DATA",176.112,29923,1)
+197391
+"DATA",176.112,29924,0)
+4005056^BACAMPICILLIN HCL 400MG TAB
+"DATA",176.112,29924,1)
+197389
+"DATA",176.112,29925,0)
+4006482^AZATHIOPRINE 50MG TAB
+"DATA",176.112,29925,1)
+197388
+"DATA",176.112,29926,0)
+4006609^AZATADINE MALEATE 1MG TAB
+"DATA",176.112,29926,1)
+197387
+"DATA",176.112,29927,0)
+4003143^AURANOFIN 3MG CAP
+"DATA",176.112,29927,1)
+197386
+"DATA",176.112,29928,0)
+4000636^ATROPINE SO4 0.4MG/0.5ML INJ
+"DATA",176.112,29928,1)
+197385
+"DATA",176.112,29929,0)
+4000645^ATROPINE SO4 0.8MG/ML INJ
+"DATA",176.112,29929,1)
+197385
+"DATA",176.112,29930,0)
+4010276^ATOVAQUONE 250MG TAB
+"DATA",176.112,29930,1)
+197384
+"DATA",176.112,29931,0)
+4004881^ATENOLOL 50MG/CHLORTHALIDONE 25MG TAB
+"DATA",176.112,29931,1)
+197383
+"DATA",176.112,29932,0)
+4004882^ATENOLOL 100MG/CHLORTHALIDONE 25MG TAB
+"DATA",176.112,29932,1)
+197382
+"DATA",176.112,29933,0)
+4004880^ATENOLOL 50MG TAB,UD
+"DATA",176.112,29933,1)
+197381
+"DATA",176.112,29934,0)
+4004877^ATENOLOL 50MG TAB
+"DATA",176.112,29934,1)
+197381
+"DATA",176.112,29935,0)
+4004879^ATENOLOL 25MG TAB
+"DATA",176.112,29935,1)
+197380
+"DATA",176.112,29936,0)
+4015116^ATENOLOL 25MG TAB,UD
+"DATA",176.112,29936,1)
+197380
+"DATA",176.112,29937,0)
+4004876^ATENOLOL 100MG TAB
+"DATA",176.112,29937,1)
+197379
+"DATA",176.112,29938,0)
+4014051^ATENOLOL 100MG TAB,UD
+"DATA",176.112,29938,1)
+197379
+"DATA",176.112,29939,0)
+4008590^ASTEMIZOLE 10MG TAB
+"DATA",176.112,29939,1)
+197378
+"DATA",176.112,29940,0)
+4005778^CODEINE 60MG/ASPIRIN 325MG TAB
+"DATA",176.112,29940,1)
+197377
+"DATA",176.112,29941,0)
+4005777^CODEINE 30MG/ASPIRIN 325MG TAB
+"DATA",176.112,29941,1)
+197376
+"DATA",176.112,29942,0)
+4005602^CODEINE 15MG/AL OH 75MG/ASA 325MG/MG OH 75MG TAB
+"DATA",176.112,29942,1)
+197375
+"DATA",176.112,29943,0)
+4005776^CODEINE 15MG/ASPIRIN 325MG TAB
+"DATA",176.112,29943,1)
+197375
+"DATA",176.112,29944,0)
+4005732^ASPIRIN 800MG TAB,SA
+"DATA",176.112,29944,1)
+197374
+"DATA",176.112,29945,0)
+4005561^ANTHRALIN 1% CREAM,TOP
+"DATA",176.112,29945,1)
+197372
+"DATA",176.112,29946,0)
+4005563^ANTHRALIN 0.5% CREAM,TOP
+"DATA",176.112,29946,1)
+197371
+"DATA",176.112,29947,0)
+4005558^ANTHRALIN 0.1% CREAM,TOP
+"DATA",176.112,29947,1)
+197370
+"DATA",176.112,29948,0)
+4006612^ANISINDIONE 50MG TAB
+"DATA",176.112,29948,1)
+197369
+"DATA",176.112,29949,0)
+4001700^AMPHOTERICIN B 3% LOTION
+"DATA",176.112,29949,1)
+197368
+"DATA",176.112,29950,0)
+4001699^AMPHOTERICIN B 3% CREAM,TOP
+"DATA",176.112,29950,1)
+197367
+"DATA",176.112,29951,0)
+4002798^AMOXAPINE 50MG TAB
+"DATA",176.112,29951,1)
+197366
+"DATA",176.112,29952,0)
+4002801^AMOXAPINE 50MG TAB,UD
+"DATA",176.112,29952,1)
+197366
+"DATA",176.112,29953,0)
+4002797^AMOXAPINE 25MG TAB
+"DATA",176.112,29953,1)
+197365
+"DATA",176.112,29954,0)
+4002800^AMOXAPINE 150MG TAB
+"DATA",176.112,29954,1)
+197364
+"DATA",176.112,29955,0)
+4002799^AMOXAPINE 100MG TAB
+"DATA",176.112,29955,1)
+197363
+"DATA",176.112,29956,0)
+4005831^AMMONIUM LACTATE 12% LOTION
+"DATA",176.112,29956,1)
+197362
+"DATA",176.112,29957,0)
+4014686^AMLODIPINE BESYLATE 5MG TAB,UD
+"DATA",176.112,29957,1)
+197361
+"DATA",176.112,29958,0)
+4010274^AMLODIPINE BESYLATE 5MG TAB
+"DATA",176.112,29958,1)
+197361
+"DATA",176.112,29959,0)
+4001971^AMITRIPTYLINE HCL 75MG TAB
+"DATA",176.112,29959,1)
+197360
+"DATA",176.112,29960,0)
+4001977^AMITRIPTYLINE HCL 75MG TAB,UD
+"DATA",176.112,29960,1)
+197360
+"DATA",176.112,29961,0)
+4001976^AMITRIPTYLINE HCL 50MG TAB,UD
+"DATA",176.112,29961,1)
+197359
+"DATA",176.112,29962,0)
+4001970^AMITRIPTYLINE HCL 50MG TAB
+"DATA",176.112,29962,1)
+197359
+"DATA",176.112,29963,0)
+4001973^AMITRIPTYLINE HCL 150MG TAB
+"DATA",176.112,29963,1)
+197358
+"DATA",176.112,29964,0)
+4001975^AMITRIPTYLINE HCL 100MG TAB,UD
+"DATA",176.112,29964,1)
+197357
+"DATA",176.112,29965,0)
+4001972^AMITRIPTYLINE HCL 100MG TAB
+"DATA",176.112,29965,1)
+197357
+"DATA",176.112,29966,0)
+4001969^AMITRIPTYLINE HCL 10MG TAB
+"DATA",176.112,29966,1)
+197356
+"DATA",176.112,29967,0)
+4025146^AMIODARONE HCL (BARR) 200MG TAB
+"DATA",176.112,29967,1)
+197355
+"DATA",176.112,29968,0)
+4003413^AMIODARONE HCL 200MG TAB,UD
+"DATA",176.112,29968,1)
+197355
+"DATA",176.112,29969,0)
+4003411^AMIODARONE HCL 200MG TAB
+"DATA",176.112,29969,1)
+197355
+"DATA",176.112,29970,0)
+4025147^AMIODARONE HCL (EON) 200MG TAB
+"DATA",176.112,29970,1)
+197355
+"DATA",176.112,29971,0)
+4003377^AMINOPHYLLINE DIHYDRATE 250MG SUPP,RTL
+"DATA",176.112,29971,1)
+197354
+"DATA",176.112,29972,0)
+4003374^AMINOPHYLLINE 250MG SUPP,RTL
+"DATA",176.112,29972,1)
+197354
+"DATA",176.112,29973,0)
+4006530^AMINOGLUTETHIMIDE 250MG TAB
+"DATA",176.112,29973,1)
+197352
+"DATA",176.112,29974,0)
+4002766^AMINOCAPROIC ACID 500MG TAB
+"DATA",176.112,29974,1)
+197351
+"DATA",176.112,29975,0)
+4002863^AMILORIDE HCL 5MG TAB
+"DATA",176.112,29975,1)
+197331
+"DATA",176.112,29976,0)
+4003795^AMIKACIN SO4 50MG/ML INJ
+"DATA",176.112,29976,1)
+197330
+"DATA",176.112,29977,0)
+4003797^AMIKACIN SO4 250MG/VIL INJ
+"DATA",176.112,29977,1)
+197329
+"DATA",176.112,29978,0)
+4003796^AMIKACIN SO4 250MG/ML INJ
+"DATA",176.112,29978,1)
+197329
+"DATA",176.112,29979,0)
+4002803^AMCINONIDE 0.1% OINT,TOP
+"DATA",176.112,29979,1)
+197328
+"DATA",176.112,29980,0)
+4002802^AMCINONIDE 0.1% CREAM,TOP
+"DATA",176.112,29980,1)
+197327
+"DATA",176.112,29981,0)
+4005192^AMANTADINE HCL 100MG CAP
+"DATA",176.112,29981,1)
+197325
+"DATA",176.112,29982,0)
+4005194^AMANTADINE HCL 100MG CAP,UD
+"DATA",176.112,29982,1)
+197325
+"DATA",176.112,29983,0)
+4009324^ALTRETAMINE 50MG CAP
+"DATA",176.112,29983,1)
+197323
+"DATA",176.112,29984,0)
+4003445^ALPRAZOLAM 2MG TAB
+"DATA",176.112,29984,1)
+197322
+"DATA",176.112,29985,0)
+4003448^ALPRAZOLAM 1MG TAB,UD
+"DATA",176.112,29985,1)
+197321
+"DATA",176.112,29986,0)
+4003444^ALPRAZOLAM 1MG TAB
+"DATA",176.112,29986,1)
+197321
+"DATA",176.112,29987,0)
+4002704^ALLOPURINOL 300MG TAB,UD
+"DATA",176.112,29987,1)
+197320
+"DATA",176.112,29988,0)
+4002702^ALLOPURINOL 300MG TAB
+"DATA",176.112,29988,1)
+197320
+"DATA",176.112,29989,0)
+4002701^ALLOPURINOL 100MG TAB
+"DATA",176.112,29989,1)
+197319
+"DATA",176.112,29990,0)
+4002703^ALLOPURINOL 100MG TAB,UD
+"DATA",176.112,29990,1)
+197319
+"DATA",176.112,29991,0)
+4006585^ALBUTEROL SO4 4MG TAB
+"DATA",176.112,29991,1)
+197318
+"DATA",176.112,29992,0)
+4006583^ALBUTEROL SO4 2MG TAB
+"DATA",176.112,29992,1)
+197316
+"DATA",176.112,29993,0)
+4006527^ACYCLOVIR 800MG TAB,UD
+"DATA",176.112,29993,1)
+197313
+"DATA",176.112,29994,0)
+4006523^ACYCLOVIR 800MG TAB
+"DATA",176.112,29994,1)
+197313
+"DATA",176.112,29995,0)
+4006519^ACYCLOVIR 5% OINT,TOP
+"DATA",176.112,29995,1)
+197312
+"DATA",176.112,29996,0)
+4006526^ACYCLOVIR 400MG TAB,UD
+"DATA",176.112,29996,1)
+197311
+"DATA",176.112,29997,0)
+4006524^ACYCLOVIR 400MG TAB
+"DATA",176.112,29997,1)
+197311
+"DATA",176.112,29998,0)
+4006518^ACYCLOVIR 200MG CAP
+"DATA",176.112,29998,1)
+197310
+"DATA",176.112,29999,0)
+4006525^ACYCLOVIR 200MG CAP,UD
+"DATA",176.112,29999,1)
+197310
+"DATA",176.112,30000,0)
+4007058^ACETOHYDROXAMIC ACID 250MG TAB
+"DATA",176.112,30000,1)
+197308
+"DATA",176.112,30001,0)
+4001189^ACETOHEXAMIDE 500MG TAB
+"DATA",176.112,30001,1)
+197307
+"DATA",176.112,30002,0)
+4001188^ACETOHEXAMIDE 250MG TAB
+"DATA",176.112,30002,1)
+197306
+"DATA",176.112,30003,0)
+4004854^ACETIC ACID 2% SOLN,OTIC
+"DATA",176.112,30003,1)
+197305
+"DATA",176.112,30004,0)
+4002720^ACETAZOLAMIDE 250MG TAB
+"DATA",176.112,30004,1)
+197304
+"DATA",176.112,30005,0)
+4002718^ACETAZOLAMIDE 125MG TAB
+"DATA",176.112,30005,1)
+197303
+"DATA",176.112,30006,0)
+4002423^CODEINE 60MG/ACETAMINOPHEN 300MG TAB
+"DATA",176.112,30006,1)
+197300
+"DATA",176.112,30007,0)
+4002425^CODEINE 15MG/ACETAMINOPHEN 300MG TAB
+"DATA",176.112,30007,1)
+197299
+"DATA",176.112,30008,0)
+4003402^ACEBUTOLOL HCL 400MG CAP
+"DATA",176.112,30008,1)
+197297
+"DATA",176.112,30009,0)
+4003401^ACEBUTOLOL HCL 200MG CAP
+"DATA",176.112,30009,1)
+197296
+"DATA",176.112,30010,0)
+4013531^CANDESARTAN CILEXETIL 8MG TAB
+"DATA",176.112,30010,1)
+153823
+"DATA",176.112,30011,0)
+4013530^CANDESARTAN CILEXETIL 4MG TAB
+"DATA",176.112,30011,1)
+153822
+"DATA",176.112,30012,0)
+4014962^BALSALAZIDE DISODIUM 750MG CAP
+"DATA",176.112,30012,1)
+153719
+"DATA",176.112,30013,0)
+4024751^HYDROMORPHONE HCL 16MG CAP,SA
+"DATA",176.112,30013,1)
+153346
+"DATA",176.112,30014,0)
+4012898^INTERFERON BETA-1A,RECOMBINANT 30 MCG/VIL INJ
+"DATA",176.112,30014,1)
+153323
+"DATA",176.112,30015,0)
+4007004^HYDROQUINONE 2% CREAM,TOP
+"DATA",176.112,30015,1)
+153031
+"DATA",176.112,30016,0)
+4002561^DIPHENHYDRAMINE HCL 2% CREAM,TOP
+"DATA",176.112,30016,1)
+152713
+"DATA",176.112,30017,0)
+4015491^MELOXICAM 15MG TAB
+"DATA",176.112,30017,1)
+152695
+"DATA",176.112,30018,0)
+4016420^BUDESONIDE 3MG CAP,EC
+"DATA",176.112,30018,1)
+152594
+"DATA",176.112,30019,0)
+4015831^BUDESONIDE 3MG CAP,SA
+"DATA",176.112,30019,1)
+152594
+"DATA",176.112,30020,0)
+4010139^FLUTICASONE PROPIONATE 0.005% OINT,TOP
+"DATA",176.112,30020,1)
+151273
+"DATA",176.112,30021,0)
+4024528^TOPIRAMATE 50MG TAB
+"DATA",176.112,30021,1)
+151226
+"DATA",176.112,30022,0)
+4008537^MOMETASONE FUROATE 0.1% LOTION
+"DATA",176.112,30022,1)
+151030
+"DATA",176.112,30023,0)
+4008538^MOMETASONE FUROATE 0.1% OINT,TOP
+"DATA",176.112,30023,1)
+151029
+"DATA",176.112,30024,0)
+4003006^WATER FOR IRRIGATION,STERILE
+"DATA",176.112,30024,1)
+150985
+"DATA",176.112,30025,0)
+4005421^CLIOQUINOL 3%/HYDROCORTISONE 1% OINT,TOP
+"DATA",176.112,30025,1)
+150945
+"DATA",176.112,30026,0)
+4001058^THIAMINE HCL 50MG TAB
+"DATA",176.112,30026,1)
+150921
+"DATA",176.112,30027,0)
+4004174^FLUOCINOLONE ACETONIDE 0.025% CREAM,TOP
+"DATA",176.112,30027,1)
+150702
+"DATA",176.112,30028,0)
+4004175^FLUOCINOLONE ACETONIDE 0.025% OINT,TOP
+"DATA",176.112,30028,1)
+150701
+"DATA",176.112,30029,0)
+4016384^MESNA 400MG TAB
+"DATA",176.112,30029,1)
+142113
+"DATA",176.112,30030,0)
+4004597^BACLOFEN 10MG/5ML X 2 AMP KIT,INTRATHECAL
+"DATA",176.112,30030,1)
+142111
+"DATA",176.112,30031,0)
+4004598^BACLOFEN 10MG/5ML X 4 AMP KIT,INTRATHECAL
+"DATA",176.112,30031,1)
+142111
+"DATA",176.112,30032,0)
+4017339^BACLOFEN 2MG/ML (PF) INJ,INTRATHECAL,AMP,20ML
+"DATA",176.112,30032,1)
+142111
+"DATA",176.112,30033,0)
+4002403^METRONIDAZOLE 0.75% GEL,VAG
+"DATA",176.112,30033,1)
+142046
+"DATA",176.112,30034,0)
+4005303^BENZOYL PEROXIDE 10% WASH
+"DATA",176.112,30034,1)
+142034
+"DATA",176.112,30035,0)
+4009869^XYLOMETAZOLINE HCL 0.1% SOLN,NASAL
+"DATA",176.112,30035,1)
+142010
+"DATA",176.112,30036,0)
+4009167^POLYVINYL ALCOHOL 1.4%/NACL SOLN,OPH
+"DATA",176.112,30036,1)
+142004
+"DATA",176.112,30037,0)
+4009166^POLYVINYL ALCOHOL 1.4% SOLN,OPH
+"DATA",176.112,30037,1)
+142004
+"DATA",176.112,30038,0)
+4017081^HYPROMELLOSE 0.5% SOLN,OPH
+"DATA",176.112,30038,1)
+142002
+"DATA",176.112,30039,0)
+4008677^HYDROXYPROPYL METHYLCELLULOSE 0.5% SOLN,OPH
+"DATA",176.112,30039,1)
+142002
+"DATA",176.112,30040,0)
+4017196^HYPROMELLOSE 1% SOLN,OPH
+"DATA",176.112,30040,1)
+142001
+"DATA",176.112,30041,0)
+4008680^HYDROXYPROPYL METHYLCELLULOSE 1% SOLN,OPH
+"DATA",176.112,30041,1)
+142001
+"DATA",176.112,30042,0)
+4010159^AZITHROMYCIN 200MG/5ML SUSP,ORAL
+"DATA",176.112,30042,1)
+141963
+"DATA",176.112,30043,0)
+4010157^AZITHROMYCIN 250MG CAP
+"DATA",176.112,30043,1)
+141962
+"DATA",176.112,30044,0)
+4017176^HALOPERIDOL 2MG/ML SOLN,ORAL,5ML
+"DATA",176.112,30044,1)
+141935
+"DATA",176.112,30045,0)
+4003623^HALOPERIDOL 2MG/ML SOLN,ORAL
+"DATA",176.112,30045,1)
+141935
+"DATA",176.112,30046,0)
+4008293^TERFENADINE 60MG TAB
+"DATA",176.112,30046,1)
+141918
+"DATA",176.112,30047,0)
+4009085^CAPSAICIN 0.075% CREAM,TOP
+"DATA",176.112,30047,1)
+141868
+"DATA",176.112,30048,0)
+4004034^LINDANE 1% CREAM,TOP
+"DATA",176.112,30048,1)
+141862
+"DATA",176.112,30049,0)
+4004035^LINDANE 1% LOTION
+"DATA",176.112,30049,1)
+141860
+"DATA",176.112,30050,0)
+4017143^ACYCLOVIR 5% CREAM,TOP
+"DATA",176.112,30050,1)
+141859
+"DATA",176.112,30051,0)
+4003244^EPINEPHRINE HCL 1% SOLN,OPH
+"DATA",176.112,30051,1)
+141848
+"DATA",176.112,30052,0)
+4003258^EPINEPHRINE BITARTRATE 1% SOLN,OPH
+"DATA",176.112,30052,1)
+141848
+"DATA",176.112,30053,0)
+4005515^EPINEPHRYL BORATE 1% SOLN,OPH
+"DATA",176.112,30053,1)
+141848
+"DATA",176.112,30054,0)
+4012301^TORSEMIDE 10MG/ML INJ,5ML AMP
+"DATA",176.112,30054,1)
+132604
+"DATA",176.112,30055,0)
+4012296^TORSEMIDE 10MG/ML INJ,2ML AMP
+"DATA",176.112,30055,1)
+132604
+"DATA",176.112,30056,0)
+4006661^OXYBUTYNIN CL 5MG/5ML SYRUP
+"DATA",176.112,30056,1)
+108883
+"DATA",176.112,30057,0)
+4002688^THIORIDAZINE HCL 10MG/ML SOLN,ORAL
+"DATA",176.112,30057,1)
+108878
+"DATA",176.112,30058,0)
+4002725^TRIHEXYPHENIDYL HCL 2MG/5ML ELIXIR
+"DATA",176.112,30058,1)
+108373
+"DATA",176.112,30059,0)
+4009222^SODIUM BIPHOSPHATE 19GM/SODIUM PHOSPHATE 7GM ENEMA
+"DATA",176.112,30059,1)
+107691
+"DATA",176.112,30060,0)
+4015823^ANTI-THYMOCYTE GLOBULIN (RABBIT) 25MG/VIL INJ
+"DATA",176.112,30060,1)
+107047
+"DATA",176.112,30061,0)
+4007051^CLOBETASOL PROPIONATE 0.05% OINT,TOP
+"DATA",176.112,30061,1)
+106933
+"DATA",176.112,30062,0)
+4001707^AMPHOTERICIN B LIPOSOME 50MG/VIL INJ
+"DATA",176.112,30062,1)
+106879
+"DATA",176.112,30063,0)
+4008962^ETHANOLAMINE OLEATE 50MG/ML INJ
+"DATA",176.112,30063,1)
+106675
+"DATA",176.112,30064,0)
+4007797^VARICELLA ZOSTER IMMUNE GLOBULIN (HUMAN) 5% INJ
+"DATA",176.112,30064,1)
+106483
+"DATA",176.112,30065,0)
+4006507^PERMETHRIN 5% CREAM
+"DATA",176.112,30065,1)
+106387
+"DATA",176.112,30066,0)
+4009066^SULCONAZOLE NITRATE 1% CREAM,TOP
+"DATA",176.112,30066,1)
+106366
+"DATA",176.112,30067,0)
+4001922^TETRACYCLINE HCL 3% OINT,TOP
+"DATA",176.112,30067,1)
+106356
+"DATA",176.112,30068,0)
+4005055^SILVER SULFADIAZINE 1% CREAM,TOP
+"DATA",176.112,30068,1)
+106351
+"DATA",176.112,30069,0)
+4008424^MUPIROCIN 2% OINT,TOP
+"DATA",176.112,30069,1)
+106346
+"DATA",176.112,30070,0)
+4008160^KETOCONAZOLE 2% SHAMPOO
+"DATA",176.112,30070,1)
+106336
+"DATA",176.112,30071,0)
+4005311^BENZOYL PEROXIDE 10% CREAM,TOP
+"DATA",176.112,30071,1)
+106315
+"DATA",176.112,30072,0)
+4005309^BENZOYL PEROXIDE 10% LOTION
+"DATA",176.112,30072,1)
+106310
+"DATA",176.112,30073,0)
+4005308^BENZOYL PEROXIDE 5% LOTION
+"DATA",176.112,30073,1)
+106309
+"DATA",176.112,30074,0)
+4005216^TRETINOIN 0.05% CREAM,TOP
+"DATA",176.112,30074,1)
+106303
+"DATA",176.112,30075,0)
+4005220^TRETINOIN 0.025% CREAM,TOP
+"DATA",176.112,30075,1)
+106302
+"DATA",176.112,30076,0)
+4002903^HYDROCORTISONE 1% CREAM,TOP
+"DATA",176.112,30076,1)
+106258
+"DATA",176.112,30077,0)
+4002923^HYDROCORTISONE ACETATE 1% CREAM,TOP
+"DATA",176.112,30077,1)
+106258
+"DATA",176.112,30078,0)
+4001610^TRIAMCINOLONE ACETONIDE 0.1% CREAM,TOP
+"DATA",176.112,30078,1)
+106256
+"DATA",176.112,30079,0)
+4001611^TRIAMCINOLONE ACETONIDE 0.1% OINT,TOP
+"DATA",176.112,30079,1)
+106255
+"DATA",176.112,30080,0)
+4002925^HYDROCORTISONE BUTYRATE 0.1% OINT,TOP
+"DATA",176.112,30080,1)
+106250
+"DATA",176.112,30081,0)
+4024968^HYDROCORTISONE PROBUTATE 0.1% CREAM,TOP
+"DATA",176.112,30081,1)
+106248
+"DATA",176.112,30082,0)
+4026053^HYDROCORTISONE BUTEPRATE 0.1% EMOLLIENT CREAM,TOP
+"DATA",176.112,30082,1)
+106248
+"DATA",176.112,30083,0)
+4002947^HYDROCORTISONE BUTEPRATE 0.1% CREAM,TOP
+"DATA",176.112,30083,1)
+106248
+"DATA",176.112,30084,0)
+4002924^HYDROCORTISONE BUTYRATE 0.1% CREAM,TOP
+"DATA",176.112,30084,1)
+106248
+"DATA",176.112,30085,0)
+4002921^HYDROCORTISONE 0.1% CREAM,TOP
+"DATA",176.112,30085,1)
+106248
+"DATA",176.112,30086,0)
+4005422^CLIOQUINOL 3%/HYDROCORTISONE 1% CREAM,TOP
+"DATA",176.112,30086,1)
+106234
+"DATA",176.112,30087,0)
+4005830^CROTAMITON 10% LOTION
+"DATA",176.112,30087,1)
+106219
+"DATA",176.112,30088,0)
+4016740^LACTIC ACID 5%/UREA 10% CREAM,TOP
+"DATA",176.112,30088,1)
+106200
+"DATA",176.112,30089,0)
+4006058^UREA 10% CREAM
+"DATA",176.112,30089,1)
+106199
+"DATA",176.112,30090,0)
+4003503^HYDROCORTISONE 1%/NEOMYCIN SO4 0.5% CREAM,TOP
+"DATA",176.112,30090,1)
+106078
+"DATA",176.112,30091,0)
+4027716^DICLOFENAC NA 1% GEL,TOP
+"DATA",176.112,30091,1)
+106003
+"DATA",176.112,30092,0)
+4006692^SALSALATE 500MG CAP
+"DATA",176.112,30092,1)
+105798
+"DATA",176.112,30093,0)
+4006710^EDETATE CA DISODIUM 200MG/ML INJ
+"DATA",176.112,30093,1)
+105746
+"DATA",176.112,30094,0)
+4000842^CYANOCOBALAMIN 50MCG TAB
+"DATA",176.112,30094,1)
+105686
+"DATA",176.112,30095,0)
+4025026^METHOTREXATE NA 10MG TAB
+"DATA",176.112,30095,1)
+105586
+"DATA",176.112,30096,0)
+4027010^METHOTREXATE NA 2.5MG TAB DOSE PACK,12
+"DATA",176.112,30096,1)
+105585
+"DATA",176.112,30097,0)
+4025158^METHOTREXATE NA 2.5MG TAB,UD
+"DATA",176.112,30097,1)
+105585
+"DATA",176.112,30098,0)
+4002736^METHOTREXATE NA 2.5MG TAB
+"DATA",176.112,30098,1)
+105585
+"DATA",176.112,30099,0)
+4002254^FLUOROURACIL 5% CREAM,TOP
+"DATA",176.112,30099,1)
+105583
+"DATA",176.112,30100,0)
+4003437^METHYLPREDNISOLONE NA SUCCINATE 1000MG/VIL INJ
+"DATA",176.112,30100,1)
+105403
+"DATA",176.112,30101,0)
+4008156^MEBENDAZOLE 100MG TAB,CHEWABLE
+"DATA",176.112,30101,1)
+105347
+"DATA",176.112,30102,0)
+4001196^ISONIAZID 50MG/5ML SYRUP
+"DATA",176.112,30102,1)
+105292
+"DATA",176.112,30103,0)
+4003867^CEFADROXIL MONOHYDRATE 500MG/5ML SUSP
+"DATA",176.112,30103,1)
+105171
+"DATA",176.112,30104,0)
+4003873^CEFADROXIL 500MG/5ML SUSP
+"DATA",176.112,30104,1)
+105171
+"DATA",176.112,30105,0)
+4003872^CEFADROXIL 125MG/5ML SUSP
+"DATA",176.112,30105,1)
+105170
+"DATA",176.112,30106,0)
+4003864^CEFADROXIL MONOHYDRATE 125MG/5ML SUSP
+"DATA",176.112,30106,1)
+105170
+"DATA",176.112,30107,0)
+4010109^NICOTINE 5MG/16HRS PATCH
+"DATA",176.112,30107,1)
+105075
+"DATA",176.112,30108,0)
+4002220^DIAZEPAM,EMULSIFIED 5MG/ML INJ,IV
+"DATA",176.112,30108,1)
+105032
+"DATA",176.112,30109,0)
+4004280^MEPHOBARBITAL 30MG TAB
+"DATA",176.112,30109,1)
+105005
+"DATA",176.112,30110,0)
+4001000^MORPHINE SO4 30MG SUPP,RTL
+"DATA",176.112,30110,1)
+104947
+"DATA",176.112,30111,0)
+4007169^ACETAMINOPHEN 120MG/5ML ELIXIR
+"DATA",176.112,30111,1)
+104906
+"DATA",176.112,30112,0)
+4013559^ONDANSETRON HCL 4MG TAB,ORALLY DISINTEGRATING
+"DATA",176.112,30112,1)
+104894
+"DATA",176.112,30113,0)
+4002756^METOCLOPRAMIDE HCL 5MG/5ML (SF) SYRUP
+"DATA",176.112,30113,1)
+104884
+"DATA",176.112,30114,0)
+4024639^METOCLOPRAMIDE HCL 5MG/5ML SOLN,ORAL,10ML
+"DATA",176.112,30114,1)
+104884
+"DATA",176.112,30115,0)
+4024640^METOCLOPRAMIDE HCL 5MG/5ML SOLN,ORAL
+"DATA",176.112,30115,1)
+104884
+"DATA",176.112,30116,0)
+4002754^METOCLOPRAMIDE HCL 5MG/5ML SYRUP
+"DATA",176.112,30116,1)
+104884
+"DATA",176.112,30117,0)
+4024641^METOCLOPRAMIDE HCL 5MG/5ML (SF) SOLN,ORAL,10ML
+"DATA",176.112,30117,1)
+104884
+"DATA",176.112,30118,0)
+4005525^SCOPOLAMINE 0.5MG/72HRS PATCH
+"DATA",176.112,30118,1)
+104873
+"DATA",176.112,30119,0)
+4002166^ISOCARBOXAZID 10MG TAB
+"DATA",176.112,30119,1)
+104837
+"DATA",176.112,30120,0)
+4006428^CLEMASTINE FUMARATE 1.34MG TAB
+"DATA",176.112,30120,1)
+104591
+"DATA",176.112,30121,0)
+4010611^TRANEXAMIC ACID 500MG TAB
+"DATA",176.112,30121,1)
+104481
+"DATA",176.112,30122,0)
+4010284^FLOSEQUINAN 50MG TAB
+"DATA",176.112,30122,1)
+104422
+"DATA",176.112,30123,0)
+4010286^FLOSEQUINAN 100MG TAB
+"DATA",176.112,30123,1)
+104421
+"DATA",176.112,30124,0)
+4004878^ATENOLOL 500MCG/ML INJ
+"DATA",176.112,30124,1)
+104308
+"DATA",176.112,30125,0)
+4003334^DIGOXIN 0.25MG/ML INJ
+"DATA",176.112,30125,1)
+104208
+"DATA",176.112,30126,0)
+4002717^SULFASALAZINE 250MG/5ML SUSP,ORAL
+"DATA",176.112,30126,1)
+104121
+"DATA",176.112,30127,0)
+4002584^DICYCLOMINE HCL 10MG/5ML SYRUP
+"DATA",176.112,30127,1)
+104041
+"DATA",176.112,30128,0)
+4010138^FLUTICASONE PROPIONATE 0.05% CREAM,TOP
+"DATA",176.112,30128,1)
+103962
+"DATA",176.112,30129,0)
+4008688^TOLNAFTATE 1% CREAM,TOP
+"DATA",176.112,30129,1)
+103951
+"DATA",176.112,30130,0)
+4009174^LEVAMISOLE 50MG TAB
+"DATA",176.112,30130,1)
+103835
+"DATA",176.112,30131,0)
+4005297^ECONAZOLE NITRATE 1% CREAM,TOP
+"DATA",176.112,30131,1)
+103587
+"DATA",176.112,30132,0)
+4006977^NITROFURAZONE 0.2% OINT,TOP
+"DATA",176.112,30132,1)
+103572
+"DATA",176.112,30133,0)
+4005844^SALICYLIC ACID 2% LOTION
+"DATA",176.112,30133,1)
+103568
+"DATA",176.112,30134,0)
+4001661^HALCINONIDE 0.1%/EMOLLIENT CREAM,TOP
+"DATA",176.112,30134,1)
+103467
+"DATA",176.112,30135,0)
+4001660^HALCINONIDE 0.1% CREAM,TOP
+"DATA",176.112,30135,1)
+103467
+"DATA",176.112,30136,0)
+4004765^FLUOCINONIDE 0.05% OINT,TOP
+"DATA",176.112,30136,1)
+103457
+"DATA",176.112,30137,0)
+4004764^FLUOCINONIDE 0.05% CREAM,TOP
+"DATA",176.112,30137,1)
+103456
+"DATA",176.112,30138,0)
+4027361^FLUOCINONIDE 0.05% EMOLLIENT CREAM,TOP
+"DATA",176.112,30138,1)
+103456
+"DATA",176.112,30139,0)
+4004177^FLUOCINOLONE ACETONIDE 0.01% CREAM,TOP
+"DATA",176.112,30139,1)
+103454
+"DATA",176.112,30140,0)
+4002912^HYDROCORTISONE 1% LOTION
+"DATA",176.112,30140,1)
+103403
+"DATA",176.112,30141,0)
+4002905^HYDROCORTISONE 2.5% OINT,TOP
+"DATA",176.112,30141,1)
+103401
+"DATA",176.112,30142,0)
+4002183^CHLORPROTHIXENE 50MG TAB
+"DATA",176.112,30142,1)
+102545
+"DATA",176.112,30143,0)
+4005047^DEXTROTHYROXINE NA 2MG TAB
+"DATA",176.112,30143,1)
+102376
+"DATA",176.112,30144,0)
+4004989^PRIMIDONE 250MG TAB
+"DATA",176.112,30144,1)
+96304
+"DATA",176.112,30145,0)
+4006979^NITROFURAZONE 0.2% LIQUID,TOP
+"DATA",176.112,30145,1)
+96058
+"DATA",176.112,30146,0)
+4010012^ICHTHAMMOL 20%/LANOLIN/PETROLATUM OINT,TOP
+"DATA",176.112,30146,1)
+95721
+"DATA",176.112,30147,0)
+4009453^ICHTHAMMOL 20% OINT,TOP
+"DATA",176.112,30147,1)
+95721
+"DATA",176.112,30148,0)
+4009353^HYDROGEN PEROXIDE 3% SOLN,TOP
+"DATA",176.112,30148,1)
+91349
+"DATA",176.112,30149,0)
+4009442^COD LIVER OIL
+"DATA",176.112,30149,1)
+2669^^Y
+"DATA",176.112,30150,0)
+4010525^CORN STARCH
+"DATA",176.112,30150,1)
+2858^^Y
+"DATA",176.112,30151,0)
+4009766^COTTONSEED OIL
+"DATA",176.112,30151,1)
+2894^^Y
+"DATA",176.112,30152,0)
+4009769^ETHER
+"DATA",176.112,30152,1)
+4120^^Y
+"DATA",176.112,30153,0)
+4001222^IPECAC SYRUP
+"DATA",176.112,30153,1)
+5975^^Y
+"DATA",176.112,30154,0)
+4009793^LINSEED OIL
+"DATA",176.112,30154,1)
+6404^^Y
+"DATA",176.112,30155,0)
+4017267^MARIJUANA
+"DATA",176.112,30155,1)
+6650^^Y
+"DATA",176.112,30156,0)
+4009805^CLOVE OIL
+"DATA",176.112,30156,1)
+7624^^Y
+"DATA",176.112,30157,0)
+4025048^PARAFFIN WAX
+"DATA",176.112,30157,1)
+7906^^Y
+"DATA",176.112,30158,0)
+4010511^POLYETHYLENE GLYCOL 1000
+"DATA",176.112,30158,1)
+7961^^Y
+"DATA",176.112,30159,0)
+4010513^POLYETHYLENE GLYCOL 8000
+"DATA",176.112,30159,1)
+7963^^Y
+"DATA",176.112,30160,0)
+4010510^POLYETHYLENE GLYCOL 400
+"DATA",176.112,30160,1)
+8514^^Y
+"DATA",176.112,30161,0)
+4026083^SAFFLOWER OIL
+"DATA",176.112,30161,1)
+9515^^Y
+"DATA",176.112,30162,0)
+4010435^ARTIFICIAL SALIVA
+"DATA",176.112,30162,1)
+9530^^Y
+"DATA",176.112,30163,0)
+4010127^SALIVA,ARTIFICIAL
+"DATA",176.112,30163,1)
+9530^^Y
+"DATA",176.112,30164,0)
+4010521^SILICON DIOXIDE
+"DATA",176.112,30164,1)
+9771^^Y
+"DATA",176.112,30165,0)
+4017266^TABACCO
+"DATA",176.112,30165,1)
+10623^^Y
+"DATA",176.112,30166,0)
+4017291^TOBACCO
+"DATA",176.112,30166,1)
+10623^^Y
+"DATA",176.112,30167,0)
+4003787^WINE
+"DATA",176.112,30167,1)
+11334^^Y
+"DATA",176.112,30168,0)
+4025354^LAVENDER OIL
+"DATA",176.112,30168,1)
+28486^^Y
+"DATA",176.112,30169,0)
+4025356^MUSTARD OIL
+"DATA",176.112,30169,1)
+30359^^Y
+"DATA",176.112,30170,0)
+4010025^OLIVE OIL
+"DATA",176.112,30170,1)
+32380^^Y
+"DATA",176.112,30171,0)
+4001272^PAREGORIC
+"DATA",176.112,30171,1)
+32926^^Y
+"DATA",176.112,30172,0)
+4025357^PENNYROYAL OIL
+"DATA",176.112,30172,1)
+33027^^Y
+"DATA",176.112,30173,0)
+4017009^PEPPERMINT OIL
+"DATA",176.112,30173,1)
+33094^^Y
+"DATA",176.112,30174,0)
+4009800^ALMOND OIL
+"DATA",176.112,30174,1)
+46096^^Y
+"DATA",176.112,30175,0)
+4008142^EUCALYPTUS OIL
+"DATA",176.112,30175,1)
+59087^^Y
+"DATA",176.112,30176,0)
+4007783^FUNGOID TINCTURE,TOP
+"DATA",176.112,30176,1)
+61654^^Y
+"DATA",176.112,30177,0)
+4009804^CITRONELLA OIL
+"DATA",176.112,30177,1)
+61669^^Y
+"DATA",176.112,30178,0)
+4009488^CONTACT LENS CLEANING SOLN
+"DATA",176.112,30178,1)
+62878^^Y
+"DATA",176.112,30179,0)
+4010558^CONTACT LENS CASE
+"DATA",176.112,30179,1)
+62936^^Y
+"DATA",176.112,30180,0)
+4014643^COTTON BALL
+"DATA",176.112,30180,1)
+62959^^Y
+"DATA",176.112,30181,0)
+4011992^SUTURE REMOVAL KIT
+"DATA",176.112,30181,1)
+64146^^Y
+"DATA",176.112,30182,0)
+4025385^MYRRH OIL
+"DATA",176.112,30182,1)
+67258^^Y
+"DATA",176.112,30183,0)
+4025375^LORENZO'S OIL
+"DATA",176.112,30183,1)
+68926^^Y
+"DATA",176.112,30184,0)
+4012704^CONDOM,FEMALE
+"DATA",176.112,30184,1)
+70682^^Y
+"DATA",176.112,30185,0)
+4009557^GREEN SOAP TINCTURE,TOP
+"DATA",176.112,30185,1)
+89680^^Y
+"DATA",176.112,30186,0)
+4009803^CINNAMON OIL
+"DATA",176.112,30186,1)
+89685^^Y
+"DATA",176.112,30187,0)
+4005590^COAL TAR DISTILLATE
+"DATA",176.112,30187,1)
+90732^^Y
+"DATA",176.112,30188,0)
+4009801^ANISE OIL
+"DATA",176.112,30188,1)
+90926^^Y
+"DATA",176.112,30189,0)
+4017007^FENNEL OIL
+"DATA",176.112,30189,1)
+90936^^Y
+"DATA",176.112,30190,0)
+4017003^ROSEMARY OIL
+"DATA",176.112,30190,1)
+90945^^Y
+"DATA",176.112,30191,0)
+4025347^THYME OIL
+"DATA",176.112,30191,1)
+90950^^Y
+"DATA",176.112,30192,0)
+4016014^PARSLEY SEED OIL
+"DATA",176.112,30192,1)
+90977^^Y
+"DATA",176.112,30193,0)
+4005589^COAL TAR SOLN
+"DATA",176.112,30193,1)
+91318^^Y
+"DATA",176.112,30194,0)
+4008346^VITAMIN A/VITAMIN D OINT,TOP
+"DATA",176.112,30194,1)
+91629^^Y
+"DATA",176.112,30195,0)
+4014160^ACID MANTLE CREAM
+"DATA",176.112,30195,1)
+91673^^Y
+"DATA",176.112,30196,0)
+4010186^AQUA-A CREAM
+"DATA",176.112,30196,1)
+91832^^Y
+"DATA",176.112,30197,0)
+4010184^AQUADERM CREAM
+"DATA",176.112,30197,1)
+91835^^Y
+"DATA",176.112,30198,0)
+4010185^AQUADERM LOTION
+"DATA",176.112,30198,1)
+91836^^Y
+"DATA",176.112,30199,0)
+4010585^AQUANIL LOTION
+"DATA",176.112,30199,1)
+91837^^Y
+"DATA",176.112,30200,0)
+4012474^FIBERMED HIGH-FIBER SUPPLEMENT
+"DATA",176.112,30200,1)
+92710^^Y
+"DATA",176.112,30201,0)
+4007788^FUNGOID SOLN,TOP
+"DATA",176.112,30201,1)
+92768^^Y
+"DATA",176.112,30202,0)
+4001869^GERITOL COMPLETE TAB
+"DATA",176.112,30202,1)
+92811^^Y
+"DATA",176.112,30203,0)
+4001870^GERITOL EXTEND TABS
+"DATA",176.112,30203,1)
+92812^^Y
+"DATA",176.112,30204,0)
+4001790^GEVRABON LIQUID,ORAL
+"DATA",176.112,30204,1)
+92815^^Y
+"DATA",176.112,30205,0)
+4001860^GEVRAL TAB
+"DATA",176.112,30205,1)
+92817^^Y
+"DATA",176.112,30206,0)
+4002300^POLIOVIRUS VACCINE INACTIVATED (IPOL)
+"DATA",176.112,30206,1)
+92930^^Y
+"DATA",176.112,30207,0)
+4005367^IBERET 500 LIQUID
+"DATA",176.112,30207,1)
+92933^^Y
+"DATA",176.112,30208,0)
+4010552^LUBRIDERM LOTION,SCENTED
+"DATA",176.112,30208,1)
+93178^^Y
+"DATA",176.112,30209,0)
+4010553^LUBRIDERM LOTION,UNSCENTED
+"DATA",176.112,30209,1)
+93178^^Y
+"DATA",176.112,30210,0)
+4016279^LUBRIDERM LOTION,SERIOUSLY SENSITIVE
+"DATA",176.112,30210,1)
+93178^^Y
+"DATA",176.112,30211,0)
+4010355^MASSENGILL DISPOSABLE DOUCHE
+"DATA",176.112,30211,1)
+93228^^Y
+"DATA",176.112,30212,0)
+4008390^MOISTUREL LOTION
+"DATA",176.112,30212,1)
+93344^^Y
+"DATA",176.112,30213,0)
+4010616^NIVEA E/E LOTION
+"DATA",176.112,30213,1)
+93497^^Y
+"DATA",176.112,30214,0)
+4010614^NIVEA SKIN OIL
+"DATA",176.112,30214,1)
+93500^^Y
+"DATA",176.112,30215,0)
+4005235^NORINYL 1+50 TAB,21
+"DATA",176.112,30215,1)
+93528^^Y
+"DATA",176.112,30216,0)
+4013077^NUTRADERM LOTION
+"DATA",176.112,30216,1)
+93582^^Y
+"DATA",176.112,30217,0)
+4001821^OS-CAL PLUS TAB
+"DATA",176.112,30217,1)
+93643^^Y
+"DATA",176.112,30218,0)
+4004358^COPPER IUD (PARAGARD T380A)
+"DATA",176.112,30218,1)
+93694^^Y
+"DATA",176.112,30219,0)
+4009649^QUELIDRINE SYRUP
+"DATA",176.112,30219,1)
+93917^^Y
+"DATA",176.112,30220,0)
+4012707^SWEEN CREAM
+"DATA",176.112,30220,1)
+94208^^Y
+"DATA",176.112,30221,0)
+4001873^STUART FORMULA TAB
+"DATA",176.112,30221,1)
+94287^^Y
+"DATA",176.112,30222,0)
+4002122^THERAGRAN LIQUID
+"DATA",176.112,30222,1)
+94301^^Y
+"DATA",176.112,30223,0)
+4002123^THERAGRAN TAB
+"DATA",176.112,30223,1)
+94303^^Y
+"DATA",176.112,30224,0)
+4004954^TRIAMINIC EXPECTORANT DH
+"DATA",176.112,30224,1)
+94384^^Y
+"DATA",176.112,30225,0)
+4001876^UNICAP T TAB
+"DATA",176.112,30225,1)
+94459^^Y
+"DATA",176.112,30226,0)
+4007184^VAGISEC PLUS SUPP,VAG
+"DATA",176.112,30226,1)
+94480^^Y
+"DATA",176.112,30227,0)
+4001788^VICON FORTE CAP
+"DATA",176.112,30227,1)
+94560^^Y
+"DATA",176.112,30228,0)
+4001787^ZENATE TAB
+"DATA",176.112,30228,1)
+94635^^Y
+"DATA",176.112,30229,0)
+4025427^ELECTROLYTE SOLN,ORAL
+"DATA",176.112,30229,1)
+95394^^Y
+"DATA",176.112,30230,0)
+4002061^VITAMIN B COMPLEX INJ
+"DATA",176.112,30230,1)
+97025^^Y
+"DATA",176.112,30231,0)
+4016516^PHENOL (DILUTE) 1.4% (AF) MOUTHWASH
+"DATA",176.112,30231,1)
+103335^^Y
+"DATA",176.112,30232,0)
+4007756^PARA-AMINOBENZOIC ACID LOTION
+"DATA",176.112,30232,1)
+103530^^Y
+"DATA",176.112,30233,0)
+4013041^PEPTAMEN LIQUID UNFLAVORED,250ML
+"DATA",176.112,30233,1)
+103834^^Y
+"DATA",176.112,30234,0)
+4009709^ANUSOL OINT,RTL
+"DATA",176.112,30234,1)
+104169^^Y
+"DATA",176.112,30235,0)
+4014054^AMIODARONE HCL (CORDARONE) 200MG TAB,UD
+"DATA",176.112,30235,1)
+104269^^Y
+"DATA",176.112,30236,0)
+4014053^AMIODARONE HCL (CORDARONE) 200MG TAB
+"DATA",176.112,30236,1)
+104269^^Y
+"DATA",176.112,30237,0)
+4015736^CLOZAPINE (CLOZARIL) 25MG TAB
+"DATA",176.112,30237,1)
+104775^^Y
+"DATA",176.112,30238,0)
+4015737^CLOZAPINE (CLOZARIL) 25MG TAB,UD
+"DATA",176.112,30238,1)
+104775^^Y
+"DATA",176.112,30239,0)
+4015738^CLOZAPINE (CLOZARIL) 100MG TAB
+"DATA",176.112,30239,1)
+104776^^Y
+"DATA",176.112,30240,0)
+4015739^CLOZAPINE (CLOZARIL) 100MG TAB,UD
+"DATA",176.112,30240,1)
+104776^^Y
+"DATA",176.112,30241,0)
+4009655^HEPATIC-AID II POWDER (EGGNOG)
+"DATA",176.112,30241,1)
+105728^^Y
+"DATA",176.112,30242,0)
+4005279^ACI-JEL JELLY,VAG
+"DATA",176.112,30242,1)
+107032^^Y
+"DATA",176.112,30243,0)
+4003007^WATER,STERILE
+"DATA",176.112,30243,1)
+107129^^Y
+"DATA",176.112,30244,0)
+4009691^KERI LOTION
+"DATA",176.112,30244,1)
+107397^^Y
+"DATA",176.112,30245,0)
+4012861^MASSE EMOLLIENT CREAM
+"DATA",176.112,30245,1)
+107399^^Y
+"DATA",176.112,30246,0)
+4009441^COD LIVER OIL CAP
+"DATA",176.112,30246,1)
+108411^^Y
+"DATA",176.112,30247,0)
+4013661^CYCLOSPORINE (NEORAL) 100MG CAP
+"DATA",176.112,30247,1)
+108843^^Y
+"DATA",176.112,30248,0)
+4013662^CYCLOSPORINE (NEORAL) 25MG CAP
+"DATA",176.112,30248,1)
+108845^^Y
+"DATA",176.112,30249,0)
+4025380^TANSY EXTRACT
+"DATA",176.112,30249,1)
+124220^^Y
+"DATA",176.112,30250,0)
+4015561^LANCET,MONOLET
+"DATA",176.112,30250,1)
+126601^^Y
+"DATA",176.112,30251,0)
+4003788^WHISKEY
+"DATA",176.112,30251,1)
+127418^^Y
+"DATA",176.112,30252,0)
+4013075^SCHIRMER TEAR TEST
+"DATA",176.112,30252,1)
+132109^^Y
+"DATA",176.112,30253,0)
+4010596^ENSURE LIQUID VANILLA
+"DATA",176.112,30253,1)
+142083^^Y
+"DATA",176.112,30254,0)
+4010592^ENSURE LIQUID COFFEE
+"DATA",176.112,30254,1)
+142452^^Y
+"DATA",176.112,30255,0)
+4010593^ENSURE LIQUID EGGNOG
+"DATA",176.112,30255,1)
+142454^^Y
+"DATA",176.112,30256,0)
+4013040^PEPTAMEN LIQUID VANILLA,250ML
+"DATA",176.112,30256,1)
+142472^^Y
+"DATA",176.112,30257,0)
+4010591^ENSURE LIQUID CHOCOLATE
+"DATA",176.112,30257,1)
+144270^^Y
+"DATA",176.112,30258,0)
+4008371^ALPHA KERI BATH OIL
+"DATA",176.112,30258,1)
+151004^^Y
+"DATA",176.112,30259,0)
+4013958^MILK OF MAGNESIA
+"DATA",176.112,30259,1)
+152039^^Y
+"DATA",176.112,30260,0)
+4013249^SAQUINAVIR 200MG (INVIRASE) CAP
+"DATA",176.112,30260,1)
+153054^^Y
+"DATA",176.112,30261,0)
+4009656^HEPATIC-AID II POWDER (CUSTARD)
+"DATA",176.112,30261,1)
+153947^^Y
+"DATA",176.112,30262,0)
+4009654^HEPATIC-AID II POWDER (CHOCOLATE)
+"DATA",176.112,30262,1)
+153949^^Y
+"DATA",176.112,30263,0)
+4009338^CALAMINE/PHENOL LOTION
+"DATA",176.112,30263,1)
+157954^^Y
+"DATA",176.112,30264,0)
+4009751^CALAMINE,PHENOLATED LOTION
+"DATA",176.112,30264,1)
+157954^^Y
+"DATA",176.112,30265,0)
+4013658^CYCLOSPORINE (SANDIMMUNE) 100MG CAP
+"DATA",176.112,30265,1)
+197552^^Y
+"DATA",176.112,30266,0)
+4002750^METHOTREXATE NA 2.5MG TAB DOSE PACK,8
+"DATA",176.112,30266,1)
+197946^^Y
+"DATA",176.112,30267,0)
+4003722^THEOPHYLLINE 300MG TAB,SA (THEO-DUR)
+"DATA",176.112,30267,1)
+201541^^Y
+"DATA",176.112,30268,0)
+4003716^THEOPHYLLINE 125MG CAP,SA (SLO-PHYLLIN GYROCAPS)
+"DATA",176.112,30268,1)
+201546^^Y
+"DATA",176.112,30269,0)
+4003717^THEOPHYLLINE 250MG CAP,SA (SLO-PHYLLIN GYROCAPS)
+"DATA",176.112,30269,1)
+201547^^Y
+"DATA",176.112,30270,0)
+4009337^CALAMINE LOTION
+"DATA",176.112,30270,1)
+204933^^Y
+"DATA",176.112,30271,0)
+4008421^LACTOBACILLUS/NA CARBOXYMETHYLCELLULOSE 100MG CAP
+"DATA",176.112,30271,1)
+205115^^Y
+"DATA",176.112,30272,0)
+4010499^EMOLLIENT CREAM
+"DATA",176.112,30272,1)
+205176^^Y
+"DATA",176.112,30273,0)
+4002336^LEVOTHYROXINE NA 0.025MG TAB (SYNTHROID)
+"DATA",176.112,30273,1)
+206457^^Y
+"DATA",176.112,30274,0)
+4002338^LEVOTHYROXINE NA 0.075MG TAB (SYNTHROID)
+"DATA",176.112,30274,1)
+206470^^Y
+"DATA",176.112,30275,0)
+4002346^LEVOTHYROXINE NA 0.088MG TAB (SYNTHROID)
+"DATA",176.112,30275,1)
+206475^^Y
+"DATA",176.112,30276,0)
+4002340^LEVOTHYROXINE NA 0.112MG TAB (SYNTHROID)
+"DATA",176.112,30276,1)
+206486^^Y
+"DATA",176.112,30277,0)
+4002343^LEVOTHYROXINE NA 0.125MG TAB (SYNTHROID)
+"DATA",176.112,30277,1)
+206493^^Y
+"DATA",176.112,30278,0)
+4016499^LEVOTHYROXINE NA 0.125MG TAB,UD (SYNTHROID)
+"DATA",176.112,30278,1)
+206493^^Y
+"DATA",176.112,30279,0)
+4002341^LEVOTHYROXINE NA 0.15MG TAB (SYNTHROID)
+"DATA",176.112,30279,1)
+206503^^Y
+"DATA",176.112,30280,0)
+4002342^LEVOTHYROXINE NA 0.175MG TAB (SYNTHROID)
+"DATA",176.112,30280,1)
+206508^^Y
+"DATA",176.112,30281,0)
+4002345^LEVOTHYROXINE NA 0.3MG TAB (SYNTHROID)
+"DATA",176.112,30281,1)
+206545^^Y
+"DATA",176.112,30282,0)
+4001994^MENOMUNE A/C/Y/W-135 INJ
+"DATA",176.112,30282,1)
+207269^^Y
+"DATA",176.112,30283,0)
+4014235^NITROGLYCERIN (ETHEX) 0.3MG TAB,SUBLINGUAL
+"DATA",176.112,30283,1)
+207330^^Y
+"DATA",176.112,30284,0)
+4014237^NITROGLYCERIN (ETHEX) 0.4MG TAB,SUBLINGUAL
+"DATA",176.112,30284,1)
+207345^^Y
+"DATA",176.112,30285,0)
+4014236^NITROGLYCERIN (ETHEX) 0.4MG TAB,SUBLINGUAL,BTL,25
+"DATA",176.112,30285,1)
+207345^^Y
+"DATA",176.112,30286,0)
+4025121^NITROGLYCERIN (ETHEX) 0.6MG TAB,SUBLINGUAL
+"DATA",176.112,30286,1)
+207360^^Y
+"DATA",176.112,30287,0)
+4004585^NIFEDIPINE (PROCARDIA XL) 30MG SA TAB
+"DATA",176.112,30287,1)
+207772^^Y
+"DATA",176.112,30288,0)
+4004586^NIFEDIPINE (PROCARDIA XL) 60MG SA TAB
+"DATA",176.112,30288,1)
+207773^^Y
+"DATA",176.112,30289,0)
+4004587^NIFEDIPINE (PROCARDIA XL) 90MG SA TAB
+"DATA",176.112,30289,1)
+207774^^Y
+"DATA",176.112,30290,0)
+4026457^SOMATROPIN (HUMATROPE) 5MG/VIL INJ
+"DATA",176.112,30290,1)
+207834^^Y
+"DATA",176.112,30291,0)
+4026458^SOMATROPIN (NUTROPIN) 5MG/VIL INJ
+"DATA",176.112,30291,1)
+207835^^Y
+"DATA",176.112,30292,0)
+4026459^SOMATROPIN (SAIZEN) 5MG/VIL INJ
+"DATA",176.112,30292,1)
+207836^^Y
+"DATA",176.112,30293,0)
+4026452^SOMATROPIN (NUTROPIN) 10MG/VIL INJ
+"DATA",176.112,30293,1)
+207838^^Y
+"DATA",176.112,30294,0)
+4027805^SOMATROPIN (NUTROPIN AQ) 20MG/2ML INJ,SOLN,NUSPIN,2ML
+"DATA",176.112,30294,1)
+207838^^Y
+"DATA",176.112,30295,0)
+4007597^RU-TUSS W/HYDROCODONE LIQUID
+"DATA",176.112,30295,1)
+208144^^Y
+"DATA",176.112,30296,0)
+4003704^THEOPHYLLINE 100MG CAP,SA (THEO-24)
+"DATA",176.112,30296,1)
+208217^^Y
+"DATA",176.112,30297,0)
+4003719^THEOPHYLLINE 125MG CAP,SA (SLO-BID GYROCAPS)
+"DATA",176.112,30297,1)
+208218^^Y
+"DATA",176.112,30298,0)
+4003720^THEOPHYLLINE 125MG CAP,SA (THEOVENT)
+"DATA",176.112,30298,1)
+208219^^Y
+"DATA",176.112,30299,0)
+4003723^THEOPHYLLINE 250MG CAP,SA (THEOVENT)
+"DATA",176.112,30299,1)
+208223^^Y
+"DATA",176.112,30300,0)
+4003714^THEOPHYLLINE 300MG CAP,SA (SLO-BID GYROCAPS)
+"DATA",176.112,30300,1)
+208225^^Y
+"DATA",176.112,30301,0)
+4003706^THEOPHYLLINE 300MG CAP,SA (THEO-24)
+"DATA",176.112,30301,1)
+208226^^Y
+"DATA",176.112,30302,0)
+4006667^DILTIAZEM (CARDIZEM SR) 60MG SA CAP
+"DATA",176.112,30302,1)
+208235^^Y
+"DATA",176.112,30303,0)
+4015868^THEOPHYLLINE 125MG TAB (THEOLAIR)
+"DATA",176.112,30303,1)
+208238^^Y
+"DATA",176.112,30304,0)
+4006668^DILTIAZEM (CARDIZEM SR) 90MG SA CAP
+"DATA",176.112,30304,1)
+208239^^Y
+"DATA",176.112,30305,0)
+4003728^THEOPHYLLINE 250MG TAB,SA (THEOLAIR-SR)
+"DATA",176.112,30305,1)
+208257^^Y
+"DATA",176.112,30306,0)
+4006669^DILTIAZEM (CARDIZEM SR) 120MG SA CAP
+"DATA",176.112,30306,1)
+208258^^Y
+"DATA",176.112,30307,0)
+4006678^DILTIAZEM (DILACOR XR) 120MG SA CAP
+"DATA",176.112,30307,1)
+208259^^Y
+"DATA",176.112,30308,0)
+4006680^DILTIAZEM (TIAZAC) 120MG SA CAP
+"DATA",176.112,30308,1)
+208261^^Y
+"DATA",176.112,30309,0)
+4013422^DILTIAZEM (TIAZAC) 120MG SA CAP,UD
+"DATA",176.112,30309,1)
+208261^^Y
+"DATA",176.112,30310,0)
+4003721^THEOPHYLLINE 100MG TAB,SA (THEO-DUR)
+"DATA",176.112,30310,1)
+208263^^Y
+"DATA",176.112,30311,0)
+4003732^THEOPHYLLINE 100MG TAB,SA (THEOCHRON)
+"DATA",176.112,30311,1)
+208266^^Y
+"DATA",176.112,30312,0)
+4006672^DILTIAZEM (DILACOR XR) 180MG SA CAP
+"DATA",176.112,30312,1)
+208267^^Y
+"DATA",176.112,30313,0)
+4006681^DILTIAZEM (TIAZAC) 180MG SA CAP
+"DATA",176.112,30313,1)
+208269^^Y
+"DATA",176.112,30314,0)
+4013423^DILTIAZEM (TIAZAC) 180MG SA CAP,UD
+"DATA",176.112,30314,1)
+208269^^Y
+"DATA",176.112,30315,0)
+4003725^THEOPHYLLINE 200MG TAB,SA (THEO-DUR)
+"DATA",176.112,30315,1)
+208270^^Y
+"DATA",176.112,30316,0)
+4003726^THEOPHYLLINE 200MG TAB,SA (THEOLAIR-SR)
+"DATA",176.112,30316,1)
+208273^^Y
+"DATA",176.112,30317,0)
+4003747^THEOPHYLLINE 250MG TAB,SA (RESPBID)
+"DATA",176.112,30317,1)
+208274^^Y
+"DATA",176.112,30318,0)
+4003750^THEOPHYLLINE 300MG TAB,SA (QUIBRON T/SR)
+"DATA",176.112,30318,1)
+208275^^Y
+"DATA",176.112,30319,0)
+4003731^THEOPHYLLINE 300MG TAB,SA (THEOCHRON)
+"DATA",176.112,30319,1)
+208278^^Y
+"DATA",176.112,30320,0)
+4003727^THEOPHYLLINE 300MG TAB,SA (THEOLAIR-SR)
+"DATA",176.112,30320,1)
+208279^^Y
+"DATA",176.112,30321,0)
+4006673^DILTIAZEM (DILACOR XR) 240MG SA CAP
+"DATA",176.112,30321,1)
+208280^^Y
+"DATA",176.112,30322,0)
+4006674^DILTIAZEM (CARDIZEM CD) 300MG SA CAP
+"DATA",176.112,30322,1)
+208282^^Y
+"DATA",176.112,30323,0)
+4013425^DILTIAZEM (TIAZAC) 300MG SA CAP,UD
+"DATA",176.112,30323,1)
+208283^^Y
+"DATA",176.112,30324,0)
+4006683^DILTIAZEM (TIAZAC) 300MG SA CAP
+"DATA",176.112,30324,1)
+208283^^Y
+"DATA",176.112,30325,0)
+4003756^THEOPHYLLINE 600MG TAB,SA (UNI-DUR)
+"DATA",176.112,30325,1)
+208285^^Y
+"DATA",176.112,30326,0)
+4006096^THIOPENTAL NA 5GM KIT INJ
+"DATA",176.112,30326,1)
+208352^^Y
+"DATA",176.112,30327,0)
+4016288^INFANRIX INJ,SUSP
+"DATA",176.112,30327,1)
+208977^^Y
+"DATA",176.112,30328,0)
+4003644^VERAPAMIL HCL (COVERA-HS) 180MG TAB,SA
+"DATA",176.112,30328,1)
+209044^^Y
+"DATA",176.112,30329,0)
+4003645^VERAPAMIL HCL (COVERA-HS) 240MG TAB,SA
+"DATA",176.112,30329,1)
+209049^^Y
+"DATA",176.112,30330,0)
+4004758^PANOKASE TAB
+"DATA",176.112,30330,1)
+209242^^Y
+"DATA",176.112,30331,0)
+4009411^TING PWDR,TOP
+"DATA",176.112,30331,1)
+209661^^Y
+"DATA",176.112,30332,0)
+4012833^SAQUINAVIR 200MG (FORTOVASE) CAP
+"DATA",176.112,30332,1)
+210201^^Y
+"DATA",176.112,30333,0)
+4025208^ALOE VERA LIQUID,ORAL
+"DATA",176.112,30333,1)
+210742^^Y
+"DATA",176.112,30334,0)
+4006684^DILTIAZEM (TIAZAC) 360MG SA CAP
+"DATA",176.112,30334,1)
+211475^^Y
+"DATA",176.112,30335,0)
+4013426^DILTIAZEM (TIAZAC) 360MG SA CAP,UD
+"DATA",176.112,30335,1)
+211475^^Y
+"DATA",176.112,30336,0)
+4007230^LYPHOLYTE INJ,CONC
+"DATA",176.112,30336,1)
+211528^^Y
+"DATA",176.112,30337,0)
+4007231^LYPHOLYTE INJ
+"DATA",176.112,30337,1)
+211528^^Y
+"DATA",176.112,30338,0)
+4024876^AMIODARONE HCL (PACERONE) 200MG TAB
+"DATA",176.112,30338,1)
+211629^^Y
+"DATA",176.112,30339,0)
+4025740^AMIODARONE HCL (PACERONE) 200MG TAB,UD
+"DATA",176.112,30339,1)
+211629^^Y
+"DATA",176.112,30340,0)
+4007483^AMINO-CERV CREAM,VAG
+"DATA",176.112,30340,1)
+211848^^Y
+"DATA",176.112,30341,0)
+4027163^SOMATROPIN (GENOTROPIN) 5.8MG/VIL INJ,INTRA-MIX
+"DATA",176.112,30341,1)
+212025^^Y
+"DATA",176.112,30342,0)
+4026464^SOMATROPIN (GENOTROPIN) 5.8MG/VIL INJ
+"DATA",176.112,30342,1)
+212025^^Y
+"DATA",176.112,30343,0)
+4005142^RHO (D) IMMUNE GLOBULIN,HUMAN (WINRHO SD) 600UNT/VIL INJ
+"DATA",176.112,30343,1)
+212401^^Y
+"DATA",176.112,30344,0)
+4014703^RHO (D) IMMUNE GLOBULIN,HUMAN (WINRHO SDF) 5000UNT/VIL INJ
+"DATA",176.112,30344,1)
+212402^^Y
+"DATA",176.112,30345,0)
+4008385^AQUACARE LOTION
+"DATA",176.112,30345,1)
+212429^^Y
+"DATA",176.112,30346,0)
+4013659^CYCLOSPORINE (SANDIMMUNE) 25MG CAP
+"DATA",176.112,30346,1)
+212810^^Y
+"DATA",176.112,30347,0)
+4013660^CYCLOSPORINE (SANDIMMUNE) 50MG CAP
+"DATA",176.112,30347,1)
+212821^^Y
+"DATA",176.112,30348,0)
+4008393^AQUAPHOR OINT,TOP
+"DATA",176.112,30348,1)
+212929^^Y
+"DATA",176.112,30349,0)
+4016438^CYCLOSPORINE (SANDIMMUNE) 100MG/ML SOLN,ORAL
+"DATA",176.112,30349,1)
+212957^^Y
+"DATA",176.112,30350,0)
+4026621^ACITRETIN 10MG CAP,30/VERSA FOAM KIT
+"DATA",176.112,30350,1)
+213069^^Y
+"DATA",176.112,30351,0)
+4026620^ACITRETIN 25MG CAP,30/VERSA FOAM KIT
+"DATA",176.112,30351,1)
+213070^^Y
+"DATA",176.112,30352,0)
+4009708^ANUSOL SUPP,RTL
+"DATA",176.112,30352,1)
+213239^^Y
+"DATA",176.112,30353,0)
+4027164^SOMATROPIN (GENOTROPIN) 13.8MG/VIL INJ,CARTRIDGE
+"DATA",176.112,30353,1)
+213352^^Y
+"DATA",176.112,30354,0)
+4027806^SOMATROPIN (NUTROPIN AQ) 10MG/2ML INJ,SOLN,NUSPIN,2ML
+"DATA",176.112,30354,1)
+213383^^Y
+"DATA",176.112,30355,0)
+4027803^SOMATROPIN (NUTROPIN AQ) 20MG/2ML INJ,SOLN,CARTRIDGE,2ML
+"DATA",176.112,30355,1)
+213383^^Y^SOMATROPIN (NUTROPIN AQ) 20MG/2ML CART^Y
+"DATA",176.112,30356,0)
+4026456^SOMATROPIN (NUTROPIN AQ) 5MG/ML INJ,SOLN
+"DATA",176.112,30356,1)
+213383^^Y
+"DATA",176.112,30357,0)
+4027804^SOMATROPIN (NUTROPIN AQ) 10MG/2ML INJ,SOLN,CARTRIDGE,2ML
+"DATA",176.112,30357,1)
+213383^^Y^SOMATROPIN (NUTROPIN AQ) 10MG/2ML CART^Y
+"DATA",176.112,30358,0)
+4016296^ALOE VESTA 2-N-1 ANTIFUNGAL OINT,TOP
+"DATA",176.112,30358,1)
+213397^^Y
+"DATA",176.112,30359,0)
+4013716^INSULIN HUMULIN 70/30 (NPH/REG) INJ PEN,3ML
+"DATA",176.112,30359,1)
+213441^^Y
+"DATA",176.112,30360,0)
+4001499^INSULIN HUMULIN 70/30 (NPH/REG) INJ CARTRIDGE,1.5ML
+"DATA",176.112,30360,1)
+213441^^Y
+"DATA",176.112,30361,0)
+4001477^INSULIN HUMULIN 70/30 (NPH/REG) INJ LILY
+"DATA",176.112,30361,1)
+213441^^Y
+"DATA",176.112,30362,0)
+4001486^INSULIN NOVOLIN 70/30 (NPH/REG) INJ NOVO
+"DATA",176.112,30362,1)
+213442^^Y
+"DATA",176.112,30363,0)
+4001487^INSULIN NOVOLIN 70/30 INJ PENFILL 1.5ML
+"DATA",176.112,30363,1)
+213442^^Y
+"DATA",176.112,30364,0)
+4013478^INSULIN NOVOLIN 70/30 INJ PENFILL 3ML
+"DATA",176.112,30364,1)
+213442^^Y
+"DATA",176.112,30365,0)
+4001479^INSULIN NOVOLIN 70/30 INJ SYRINGE 1.5ML
+"DATA",176.112,30365,1)
+213442^^Y
+"DATA",176.112,30366,0)
+4016800^INSULIN NOVOLIN 70/30 INJ INNOLET 3ML
+"DATA",176.112,30366,1)
+213442^^Y
+"DATA",176.112,30367,0)
+4009320^BCG,TICE 50MG/AMP VACCINE
+"DATA",176.112,30367,1)
+213744^^Y
+"DATA",176.112,30368,0)
+4009741^BABY OIL,TOP
+"DATA",176.112,30368,1)
+215531^^Y
+"DATA",176.112,30369,0)
+4009143^BREEZEE MIST FOOT PWDR
+"DATA",176.112,30369,1)
+215717^^Y
+"DATA",176.112,30370,0)
+4013080^CETAPHIL CREAM
+"DATA",176.112,30370,1)
+215966^^Y
+"DATA",176.112,30371,0)
+4013081^CETAPHIL LOTION
+"DATA",176.112,30371,1)
+215967^^Y
+"DATA",176.112,30372,0)
+4010442^DERMABASE
+"DATA",176.112,30372,1)
+216473^^Y
+"DATA",176.112,30373,0)
+4007389^PEDTE-PAK-4
+"DATA",176.112,30373,1)
+219142^^Y
+"DATA",176.112,30374,0)
+4010472^VANICREAM
+"DATA",176.112,30374,1)
+220747^^Y
+"DATA",176.112,30375,0)
+4010512^POLYETHYLENE GLYCOL 3350
+"DATA",176.112,30375,1)
+221147^^Y
+"DATA",176.112,30376,0)
+4013507^ACCU-CHEK COMFORT CURVE (GLUCOSE) TEST STRIP
+"DATA",176.112,30376,1)
+221267^^Y
+"DATA",176.112,30377,0)
+4013689^EASY ACCU-CHEK (GLUCOSE) METER
+"DATA",176.112,30377,1)
+221270^^Y
+"DATA",176.112,30378,0)
+4012067^ADHESIVE REMOVER PAD
+"DATA",176.112,30378,1)
+221401^^Y
+"DATA",176.112,30379,0)
+4012267^ATTENDS WASHCLOTH
+"DATA",176.112,30379,1)
+221561^^Y
+"DATA",176.112,30380,0)
+4009744^BAY RUM
+"DATA",176.112,30380,1)
+221662^^Y
+"DATA",176.112,30381,0)
+4010370^CARRASYN V WOUND DRESSING GEL
+"DATA",176.112,30381,1)
+221860^^Y
+"DATA",176.112,30382,0)
+4014449^CARRASYN WOUND DRESSING GEL
+"DATA",176.112,30382,1)
+221861^^Y
+"DATA",176.112,30383,0)
+4009759^CHAMOMILE FLOWERS
+"DATA",176.112,30383,1)
+221916^^Y
+"DATA",176.112,30384,0)
+4009880^CITROTEIN POWDER (PUNCH)
+"DATA",176.112,30384,1)
+221947^^Y
+"DATA",176.112,30385,0)
+4009879^CITROTEIN POWDER (ORANGE)
+"DATA",176.112,30385,1)
+221947^^Y
+"DATA",176.112,30386,0)
+4012691^COLD PACK,INSTANT
+"DATA",176.112,30386,1)
+221987^^Y
+"DATA",176.112,30387,0)
+4013134^CURASOL WOUND CLEANSER
+"DATA",176.112,30387,1)
+222122^^Y
+"DATA",176.112,30388,0)
+4014299^DELIVER 2.0 LIQUID
+"DATA",176.112,30388,1)
+222135^^Y
+"DATA",176.112,30389,0)
+4012056^DEPEND FITTED BRIEF LARGE
+"DATA",176.112,30389,1)
+222139^^Y
+"DATA",176.112,30390,0)
+4012053^DEPEND UNDERGARMENT EXTRA ABSORB
+"DATA",176.112,30390,1)
+222144^^Y
+"DATA",176.112,30391,0)
+4012052^DEPEND UNDERGARMENT REG ABSORB
+"DATA",176.112,30391,1)
+222145^^Y
+"DATA",176.112,30392,0)
+4008496^DEXTRO-CHEK HIGH CONTROL
+"DATA",176.112,30392,1)
+222158^^Y
+"DATA",176.112,30393,0)
+4008497^DEXTRO-CHEK LOW CONTROL
+"DATA",176.112,30393,1)
+222159^^Y
+"DATA",176.112,30394,0)
+4008498^DEXTRO-CHEK NORMAL CONTROL
+"DATA",176.112,30394,1)
+222160^^Y
+"DATA",176.112,30395,0)
+4013805^EASIVENT
+"DATA",176.112,30395,1)
+222292^^Y
+"DATA",176.112,30396,0)
+4010590^ENSURE PUDDING (BUTTERSCOTCH)
+"DATA",176.112,30396,1)
+222425^^Y
+"DATA",176.112,30397,0)
+4010587^ENSURE PUDDING (CHOCOLATE)
+"DATA",176.112,30397,1)
+222426^^Y
+"DATA",176.112,30398,0)
+4010588^ENSURE PUDDING (TAPIOCA)
+"DATA",176.112,30398,1)
+222427^^Y
+"DATA",176.112,30399,0)
+4010589^ENSURE PUDDING (VANILLA)
+"DATA",176.112,30399,1)
+222428^^Y
+"DATA",176.112,30400,0)
+4015081^LANCET,FINGERSTIX
+"DATA",176.112,30400,1)
+222539^^Y
+"DATA",176.112,30401,0)
+4016712^ISOSOURCE LIQUID
+"DATA",176.112,30401,1)
+223031^^Y
+"DATA",176.112,30402,0)
+4009886^ISOSOURCE LIQUID (CLOSED SYSTEM)
+"DATA",176.112,30402,1)
+223032^^Y
+"DATA",176.112,30403,0)
+4014644^LIPISORB LIQUID
+"DATA",176.112,30403,1)
+223201^^Y
+"DATA",176.112,30404,0)
+4009895^MERITENE POWDER (CHOCOLATE)
+"DATA",176.112,30404,1)
+223282^^Y
+"DATA",176.112,30405,0)
+4009898^MERITENE POWDER (MILK CHOCOLATE)
+"DATA",176.112,30405,1)
+223283^^Y
+"DATA",176.112,30406,0)
+4009894^MERITENE POWDER (PLAIN)
+"DATA",176.112,30406,1)
+223284^^Y
+"DATA",176.112,30407,0)
+4009897^MERITENE POWDER (VANILLA)
+"DATA",176.112,30407,1)
+223285^^Y
+"DATA",176.112,30408,0)
+4013614^LANCET,MICROLET
+"DATA",176.112,30408,1)
+223314^^Y
+"DATA",176.112,30409,0)
+4025829^OPTIHALER
+"DATA",176.112,30409,1)
+223558^^Y
+"DATA",176.112,30410,0)
+4012706^ORABASE PLAIN PASTE
+"DATA",176.112,30410,1)
+223564^^Y
+"DATA",176.112,30411,0)
+4010027^PEPPERMINT SPIRIT
+"DATA",176.112,30411,1)
+223700^^Y
+"DATA",176.112,30412,0)
+4016898^POISE PAD,EXTRA ABSORBENCY
+"DATA",176.112,30412,1)
+223767^^Y
+"DATA",176.112,30413,0)
+4010515^SULFURATED POTASH
+"DATA",176.112,30413,1)
+223778^^Y
+"DATA",176.112,30414,0)
+4011932^LANCET,SELECT LITE DEVICE
+"DATA",176.112,30414,1)
+224022^^Y
+"DATA",176.112,30415,0)
+4009818^SIMPLE SYRUP
+"DATA",176.112,30415,1)
+224080^^Y
+"DATA",176.112,30416,0)
+4012076^SKIN PREP AEROSOL
+"DATA",176.112,30416,1)
+224096^^Y
+"DATA",176.112,30417,0)
+4011927^LANCET,SOFT-TOUCH
+"DATA",176.112,30417,1)
+224119^^Y
+"DATA",176.112,30418,0)
+4011928^LANCET,SOFT-TOUCH DEVICE
+"DATA",176.112,30418,1)
+224120^^Y
+"DATA",176.112,30419,0)
+4013510^LANCET,SOFTCLIX
+"DATA",176.112,30419,1)
+224122^^Y
+"DATA",176.112,30420,0)
+4008650^SUSTACAL CHOCOLATE
+"DATA",176.112,30420,1)
+224391^^Y
+"DATA",176.112,30421,0)
+4008658^SUSTACAL PUDDING BUTTERSCOTCH
+"DATA",176.112,30421,1)
+224404^^Y
+"DATA",176.112,30422,0)
+4008659^SUSTACAL PUDDING CHOCOLATE
+"DATA",176.112,30422,1)
+224405^^Y
+"DATA",176.112,30423,0)
+4008652^SUSTACAL VANILLA
+"DATA",176.112,30423,1)
+224408^^Y
+"DATA",176.112,30424,0)
+4016557^THICK-IT POWDER
+"DATA",176.112,30424,1)
+224579^^Y
+"DATA",176.112,30425,0)
+4012018^TUBEX INJECTOR
+"DATA",176.112,30425,1)
+224656^^Y
+"DATA",176.112,30426,0)
+4014120^LANCET,ULTRA TLC
+"DATA",176.112,30426,1)
+224665^^Y
+"DATA",176.112,30427,0)
+4008541^EMPTY STERILE VIAL
+"DATA",176.112,30427,1)
+225248^^Y
+"DATA",176.112,30428,0)
+4027162^SOMATROPIN (GENOTROPIN) 1.5MG/VIL INJ,INTRA-MIX
+"DATA",176.112,30428,1)
+226952^^Y
+"DATA",176.112,30429,0)
+4025352^JUNIPER BERRY OIL
+"DATA",176.112,30429,1)
+230461^^Y
+"DATA",176.112,30430,0)
+4007495^BARBITAL NA MISCELLANEOUS
+"DATA",176.112,30430,1)
+235404^^Y
+"DATA",176.112,30431,0)
+4007965^AGGREGATED ALBUMIN(HUMAN)
+"DATA",176.112,30431,1)
+235467^^Y
+"DATA",176.112,30432,0)
+4010081^HYDROPHILIC CREAM,TOP
+"DATA",176.112,30432,1)
+235516^^Y
+"DATA",176.112,30433,0)
+4009980^ANTISEPTIC SOLUTION
+"DATA",176.112,30433,1)
+235629^^Y
+"DATA",176.112,30434,0)
+4012703^CONDOM,LATEX,LUBRICATED
+"DATA",176.112,30434,1)
+236015^^Y
+"DATA",176.112,30435,0)
+4016540^CONDOM,NON-LATEX,LUBRICATED
+"DATA",176.112,30435,1)
+236017^^Y
+"DATA",176.112,30436,0)
+4016000^ANGELICA ROOT EXTRACT
+"DATA",176.112,30436,1)
+236694^^Y
+"DATA",176.112,30437,0)
+4003378^AMINOPHYLLINE PWDR
+"DATA",176.112,30437,1)
+237181^^Y
+"DATA",176.112,30438,0)
+4008245^FERROUS SULFATE GRANULES
+"DATA",176.112,30438,1)
+237507^^Y
+"DATA",176.112,30439,0)
+4004807^POTASSIUM IODIDE GRANULES
+"DATA",176.112,30439,1)
+237516^^Y
+"DATA",176.112,30440,0)
+4005901^AMINO ACIDS TAB
+"DATA",176.112,30440,1)
+237588^^Y
+"DATA",176.112,30441,0)
+4009571^KELP TAB
+"DATA",176.112,30441,1)
+237612^^Y
+"DATA",176.112,30442,0)
+4002069^VITAMIN B COMPLEX CAP
+"DATA",176.112,30442,1)
+237689^^Y
+"DATA",176.112,30443,0)
+4001043^ASCORBIC ACID PWDR
+"DATA",176.112,30443,1)
+237710^^Y
+"DATA",176.112,30444,0)
+4005360^MULTIVITAMINS W/IRON DROPS,ORAL
+"DATA",176.112,30444,1)
+237764^^Y
+"DATA",176.112,30445,0)
+4002088^MULTIVITAMINS DROPS,ORAL
+"DATA",176.112,30445,1)
+237766^^Y
+"DATA",176.112,30446,0)
+4002071^MULTIVITAMIN DROPS,ORAL
+"DATA",176.112,30446,1)
+237766^^Y
+"DATA",176.112,30447,0)
+4002083^HEXAVITAMIN TAB
+"DATA",176.112,30447,1)
+237806^^Y
+"DATA",176.112,30448,0)
+4008090^CALCIUM CARBONATE PWDR
+"DATA",176.112,30448,1)
+237868^^Y
+"DATA",176.112,30449,0)
+4009754^CALCIUM HYDROXIDE PWDR
+"DATA",176.112,30449,1)
+237869^^Y
+"DATA",176.112,30450,0)
+4009121^MINERAL OIL ENEMA,RTL
+"DATA",176.112,30450,1)
+237951^^Y
+"DATA",176.112,30451,0)
+4000969^MAGNESIUM SULFATE GRANULES
+"DATA",176.112,30451,1)
+237953^^Y
+"DATA",176.112,30452,0)
+4000798^METHYLTESTOSTERONE PWDR
+"DATA",176.112,30452,1)
+238000^^Y
+"DATA",176.112,30453,0)
+4007831^BENZOCAINE PWDR
+"DATA",176.112,30453,1)
+238054^^Y
+"DATA",176.112,30454,0)
+4005755^ASPIRIN PWDR
+"DATA",176.112,30454,1)
+238143^^Y
+"DATA",176.112,30455,0)
+4010059^SORBITAN SESQUIOLEATE CREAM
+"DATA",176.112,30455,1)
+238299^^Y
+"DATA",176.112,30456,0)
+4009748^BISMUTH SUBCARBONATE PWDR
+"DATA",176.112,30456,1)
+238371^^Y
+"DATA",176.112,30457,0)
+4009752^CALAMINE PWDR
+"DATA",176.112,30457,1)
+238373^^Y
+"DATA",176.112,30458,0)
+4009749^BISMUTH SUBNITRATE PWDR
+"DATA",176.112,30458,1)
+238376^^Y
+"DATA",176.112,30459,0)
+4009738^ALUM,AMMONIUM PWDR
+"DATA",176.112,30459,1)
+238429^^Y
+"DATA",176.112,30460,0)
+4009750^SODIUM BORATE GRANULES
+"DATA",176.112,30460,1)
+238501^^Y
+"DATA",176.112,30461,0)
+4005565^ANTHRALIN PWDR
+"DATA",176.112,30461,1)
+238517^^Y
+"DATA",176.112,30462,0)
+4009505^MENTHOL CRYSTALS
+"DATA",176.112,30462,1)
+238554^^Y
+"DATA",176.112,30463,0)
+4009808^OXALIC ACID CRYSTALS
+"DATA",176.112,30463,1)
+238566^^Y
+"DATA",176.112,30464,0)
+4007853^TRICHLOROACETIC ACID CRYSTALS
+"DATA",176.112,30464,1)
+238602^^Y
+"DATA",176.112,30465,0)
+4006060^UREA POWDER
+"DATA",176.112,30465,1)
+238637^^Y
+"DATA",176.112,30466,0)
+4009466^LECITHIN GRANULES
+"DATA",176.112,30466,1)
+238676^^Y
+"DATA",176.112,30467,0)
+4002938^HYDROCORTISONE PWDR
+"DATA",176.112,30467,1)
+238756^^Y
+"DATA",176.112,30468,0)
+4003048^PREDNISOLONE ACETATE PWDR
+"DATA",176.112,30468,1)
+238757^^Y
+"DATA",176.112,30469,0)
+4003047^PREDNISOLONE PWDR
+"DATA",176.112,30469,1)
+238758^^Y
+"DATA",176.112,30470,0)
+4005804^BETAMETHASONE VALERATE PWDR
+"DATA",176.112,30470,1)
+238761^^Y
+"DATA",176.112,30471,0)
+4002672^INDOMETHACIN PWDR
+"DATA",176.112,30471,1)
+239055^^Y
+"DATA",176.112,30472,0)
+4015286^CHERRY SYRUP
+"DATA",176.112,30472,1)
+239128^^Y
+"DATA",176.112,30473,0)
+4009760^CITRIC ACID GRANULES
+"DATA",176.112,30473,1)
+239130^^Y
+"DATA",176.112,30474,0)
+4009761^COCOA BUTTER OINT,TOP
+"DATA",176.112,30474,1)
+239132^^Y
+"DATA",176.112,30475,0)
+4009737^ACACIA PWDR
+"DATA",176.112,30475,1)
+239142^^Y
+"DATA",176.112,30476,0)
+4009747^BENTONITE PWDR
+"DATA",176.112,30476,1)
+239146^^Y
+"DATA",176.112,30477,0)
+4007455^METHIONINE PWDR
+"DATA",176.112,30477,1)
+239234^^Y
+"DATA",176.112,30478,0)
+4005664^QUININE SO4 PWDR
+"DATA",176.112,30478,1)
+239250^^Y
+"DATA",176.112,30479,0)
+4006994^PLAGUE VACCINE INJ
+"DATA",176.112,30479,1)
+239272^^Y
+"DATA",176.112,30480,0)
+4002293^CHOLERA VACCINE INJ
+"DATA",176.112,30480,1)
+239274^^Y
+"DATA",176.112,30481,0)
+4000961^SILVER NITRATE CRYSTALS
+"DATA",176.112,30481,1)
+239318^^Y
+"DATA",176.112,30482,0)
+4007327^IODINE CRYSTALS
+"DATA",176.112,30482,1)
+239326^^Y
+"DATA",176.112,30483,0)
+4009821^SODIUM PERBORATE GRANULES
+"DATA",176.112,30483,1)
+239330^^Y
+"DATA",176.112,30484,0)
+4009815^POTASSIUM PERMANGANATE GRANULES
+"DATA",176.112,30484,1)
+239332^^Y
+"DATA",176.112,30485,0)
+4009545^PHENOL LIQUID
+"DATA",176.112,30485,1)
+239351^^Y
+"DATA",176.112,30486,0)
+4008888^BORIC ACID PWDR
+"DATA",176.112,30486,1)
+239355^^Y
+"DATA",176.112,30487,0)
+4008887^BORIC ACID GRANULES
+"DATA",176.112,30487,1)
+239356^^Y
+"DATA",176.112,30488,0)
+4011926^LANCET
+"DATA",176.112,30488,1)
+239826^^Y
+"DATA",176.112,30489,0)
+4007178^ACETAMINOPHEN PWDR
+"DATA",176.112,30489,1)
+240240^^Y
+"DATA",176.112,30490,0)
+4006592^ALBUTEROL SO4 PWDR
+"DATA",176.112,30490,1)
+240585^^Y
+"DATA",176.112,30491,0)
+4002404^METRONIDAZOLE PWDR
+"DATA",176.112,30491,1)
+240590^^Y
+"DATA",176.112,30492,0)
+4009757^CAMPHOR CRYSTALS
+"DATA",176.112,30492,1)
+241524^^Y
+"DATA",176.112,30493,0)
+4007375^CUPRIC SULFATE CRYSTALS
+"DATA",176.112,30493,1)
+242490^^Y
+"DATA",176.112,30494,0)
+4007035^BCG VACCINE INJ
+"DATA",176.112,30494,1)
+242514^^Y
+"DATA",176.112,30495,0)
+4007507^PLACEBO TAB
+"DATA",176.112,30495,1)
+242771^^Y
+"DATA",176.112,30496,0)
+4002298^POLIOVIRUS VACCINE LIVE SOLN,ORAL
+"DATA",176.112,30496,1)
+242847^^Y
+"DATA",176.112,30497,0)
+4003013^MUMPS/RUBELLA VIRUS VACCINE,LIVE INJ
+"DATA",176.112,30497,1)
+242850^^Y
+"DATA",176.112,30498,0)
+4008321^ANTIVENIN,CROTALIDAE POLYVALENT INJ
+"DATA",176.112,30498,1)
+242868^^Y
+"DATA",176.112,30499,0)
+4003312^ANTIVENIN,MICRURUS FULVIUS INJ
+"DATA",176.112,30499,1)
+242870^^Y
+"DATA",176.112,30500,0)
+4008423^LACTOBACILLUS TAB,CHEWABLE
+"DATA",176.112,30500,1)
+243422^^Y
+"DATA",176.112,30501,0)
+4004795^BUTABARBITAL NA PWDR
+"DATA",176.112,30501,1)
+243624^^Y
+"DATA",176.112,30502,0)
+4009941^BREWER'S YEAST TAB
+"DATA",176.112,30502,1)
+243831^^Y
+"DATA",176.112,30503,0)
+4009570^GARLIC OIL CAP
+"DATA",176.112,30503,1)
+244167^^Y
+"DATA",176.112,30504,0)
+4009660^ROSE PETALS,AQUEOUS INFUSION SOLN,OPH
+"DATA",176.112,30504,1)
+244288^^Y
+"DATA",176.112,30505,0)
+4009491^CALAMINE/CAMPHOR/DIPHENHYDRAMINE 1% LOTION
+"DATA",176.112,30505,1)
+244437^^Y
+"DATA",176.112,30506,0)
+4008359^ALUMINUM ACETATE SOLN
+"DATA",176.112,30506,1)
+244632^^Y
+"DATA",176.112,30507,0)
+4009797^MERBROMIN CRYSTALS
+"DATA",176.112,30507,1)
+244678^^Y
+"DATA",176.112,30508,0)
+4006712^LIVER DERIVATIVE COMPLEX INJ
+"DATA",176.112,30508,1)
+244931^^Y
+"DATA",176.112,30509,0)
+4006997^ANTICOAGULANT CITRATE PHOSPHATE DEXTROSE SOLN
+"DATA",176.112,30509,1)
+246084^^Y
+"DATA",176.112,30510,0)
+4009809^PARADICHLOROBENZENE CRYSTALS
+"DATA",176.112,30510,1)
+246864^^Y
+"DATA",176.112,30511,0)
+4010060^CASTILE SOAP ENEMA,RTL
+"DATA",176.112,30511,1)
+247299^^Y
+"DATA",176.112,30512,0)
+4013466^WOUND CLEANSER LIQUID
+"DATA",176.112,30512,1)
+247338^^Y
+"DATA",176.112,30513,0)
+4013206^ASPERGILLUS FUMIGATUS 1:500 INJ
+"DATA",176.112,30513,1)
+248122^^Y
+"DATA",176.112,30514,0)
+4010624^CYTOMEGALOVIRUS IMMUNE GLOBULIN HUMAN INJ,IV
+"DATA",176.112,30514,1)
+248197^^Y
+"DATA",176.112,30515,0)
+4012771^CELLULOSE POWDER
+"DATA",176.112,30515,1)
+248521^^Y
+"DATA",176.112,30516,0)
+4009127^MINERAL OIL,HEAVY
+"DATA",176.112,30516,1)
+258439^^Y
+"DATA",176.112,30517,0)
+4009130^MINERAL OIL,HEAVY,30ML
+"DATA",176.112,30517,1)
+258439^^Y
+"DATA",176.112,30518,0)
+4014096^HEPATITIS B IMMUNE GLOBULIN (NABI-HB) INJ,VIL,5ML
+"DATA",176.112,30518,1)
+260339^^Y
+"DATA",176.112,30519,0)
+4024675^DILTIAZEM (CARTIA XT) 120MG CAP,SA
+"DATA",176.112,30519,1)
+260354^^Y
+"DATA",176.112,30520,0)
+4001824^DECAGEN TAB
+"DATA",176.112,30520,1)
+260678^^Y
+"DATA",176.112,30521,0)
+4015871^TESTOSTERONE (ANDRODERM) 5MG/24HRS PATCH
+"DATA",176.112,30521,1)
+261193^^Y
+"DATA",176.112,30522,0)
+4015870^TESTOSTERONE (TESTODERM) 5MG/24HRS PATCH
+"DATA",176.112,30522,1)
+261194^^Y
+"DATA",176.112,30523,0)
+4016282^ESTRADIOL 0.05MG/DAY (ESCLIM) PATCH
+"DATA",176.112,30523,1)
+261196^^Y
+"DATA",176.112,30524,0)
+4016280^ESTRADIOL 0.025MG/DAY (ESCLIM) PATCH
+"DATA",176.112,30524,1)
+261197^^Y
+"DATA",176.112,30525,0)
+4016281^ESTRADIOL 0.0375MG/DAY (ESCLIM) PATCH
+"DATA",176.112,30525,1)
+261198^^Y
+"DATA",176.112,30526,0)
+4016831^ESTRADIOL 37.5MCG/DAY (VIVELLE-DOT) PATCH
+"DATA",176.112,30526,1)
+261199^^Y
+"DATA",176.112,30527,0)
+4016283^ESTRADIOL 0.075MG/DAY (ESCLIM) PATCH
+"DATA",176.112,30527,1)
+261200^^Y
+"DATA",176.112,30528,0)
+4016833^ESTRADIOL 75MCG/DAY (VIVELLE-DOT) PATCH
+"DATA",176.112,30528,1)
+261201^^Y
+"DATA",176.112,30529,0)
+4016284^ESTRADIOL 0.1MG/DAY (ESCLIM) PATCH
+"DATA",176.112,30529,1)
+261202^^Y
+"DATA",176.112,30530,0)
+4016834^ESTRADIOL 100MCG/DAY (VIVELLE-DOT) PATCH
+"DATA",176.112,30530,1)
+261203^^Y
+"DATA",176.112,30531,0)
+4014116^LANCET,ONE TOUCH FINE POINT
+"DATA",176.112,30531,1)
+261853^^Y
+"DATA",176.112,30532,0)
+4004869^DEXTROMETHORPHAN 10MG/GLYCEROL,IODINATED 30MG/5ML LIQUID
+"DATA",176.112,30532,1)
+282529^^Y
+"DATA",176.112,30533,0)
+4013411^BISACODYL 10MG (MAGIC BULLET) SUPP,RTL
+"DATA",176.112,30533,1)
+284283^^Y
+"DATA",176.112,30534,0)
+4016832^ESTRADIOL 50MCG/DAY (VIVELLE-DOT) PATCH
+"DATA",176.112,30534,1)
+284377^^Y
+"DATA",176.112,30535,0)
+4015821^ESTRADIOL 0.025MG/DAY (VIVELLE) PATCH
+"DATA",176.112,30535,1)
+284378^^Y
+"DATA",176.112,30536,0)
+4024879^AMIODARONE HCL (PACERONE) 400MG TAB
+"DATA",176.112,30536,1)
+284533^^Y
+"DATA",176.112,30537,0)
+4016453^METHYLPHENIDATE HCL (METADATE CD) 20MG CAP,SA
+"DATA",176.112,30537,1)
+284575^^Y
+"DATA",176.112,30538,0)
+4015340^LANCET,ONE TOUCH ULTRA SOFT
+"DATA",176.112,30538,1)
+284966^^Y
+"DATA",176.112,30539,0)
+4014953^LANCET,FREESTYLE
+"DATA",176.112,30539,1)
+285108^^Y
+"DATA",176.112,30540,0)
+4009827^1,1,1 TRICHLOROETHANE (INHIBITED) SOLN
+"DATA",176.112,30540,1)
+307649^^Y
+"DATA",176.112,30541,0)
+4008394^ABSORBASE OINT,TOP
+"DATA",176.112,30541,1)
+307651^^Y
+"DATA",176.112,30542,0)
+4010579^ABSORBINE ARTHRITIC PAIN LOTION
+"DATA",176.112,30542,1)
+307652^^Y
+"DATA",176.112,30543,0)
+4010575^ABSORBINE JR LINIMENT
+"DATA",176.112,30543,1)
+307653^^Y
+"DATA",176.112,30544,0)
+4013506^ACCU-CHEK COMFORT CURVE (GLUCOSE) HI/LO CONTROL SOLN
+"DATA",176.112,30544,1)
+307654^^Y
+"DATA",176.112,30545,0)
+4013654^ACCU-CHEK COMFORT CURVE (GLUCOSE) HI/MED/LO CONTROL SOLN
+"DATA",176.112,30545,1)
+307655^^Y
+"DATA",176.112,30546,0)
+4014694^ACCU-CHEK COMFORT CURVE-H (GLUCOSE) HI/LO CONTROL SOLN
+"DATA",176.112,30546,1)
+307656^^Y
+"DATA",176.112,30547,0)
+4014158^ACCU-CHEK COMFORT CURVE-H (GLUCOSE) TEST STRIP
+"DATA",176.112,30547,1)
+307657^^Y
+"DATA",176.112,30548,0)
+4013325^ACCU-CHEK INSTANT (GLUCOSE) METER
+"DATA",176.112,30548,1)
+307660^^Y
+"DATA",176.112,30549,0)
+4013326^ACCU-CHEK INSTANT DM (GLUCOSE) METER
+"DATA",176.112,30549,1)
+307662^^Y
+"DATA",176.112,30550,0)
+4014061^ACCU-CHEK INSTANT PLUS (CHOLESTEROL) TEST STRIP
+"DATA",176.112,30550,1)
+307663^^Y
+"DATA",176.112,30551,0)
+4014080^ACCU-CHEK SIMPLICITY (GLUCOSE) TEST STRIP
+"DATA",176.112,30551,1)
+307664^^Y
+"DATA",176.112,30552,0)
+4002292^ACEL-IMUNE INJ
+"DATA",176.112,30552,1)
+307665^^Y
+"DATA",176.112,30553,0)
+4010245^ACETANILIDE PWDR
+"DATA",176.112,30553,1)
+307698^^Y
+"DATA",176.112,30554,0)
+4008071^ACETIC AC 2%/BENZALKONIUM CL/CHLOROXYLENOL/PRAMOXINE 1% SLN,OTIC
+"DATA",176.112,30554,1)
+307704^^Y
+"DATA",176.112,30555,0)
+4009409^ACETIC AC/BENZALKONIUM CL/CHLOROXYLENOL/GLYCERIN SOLN,OTIC
+"DATA",176.112,30555,1)
+307705^^Y
+"DATA",176.112,30556,0)
+4008046^ACETIC AC/BENZALKONIUM CL/CHLOROXYLENOL/HC 1%/PRAMOXINE SLN,OTIC
+"DATA",176.112,30556,1)
+307706^^Y
+"DATA",176.112,30557,0)
+4009457^ACETONE LIQUID
+"DATA",176.112,30557,1)
+307715^^Y
+"DATA",176.112,30558,0)
+4010023^ACETONE/BORIC ACID/RESORCINOL SOLN,TOP
+"DATA",176.112,30558,1)
+307716^^Y
+"DATA",176.112,30559,0)
+4009569^ACIDOPHILUS TAB
+"DATA",176.112,30559,1)
+307722^^Y
+"DATA",176.112,30560,0)
+4010246^ACIDOPHILUS/PECTIN 100MG CAP
+"DATA",176.112,30560,1)
+307723^^Y
+"DATA",176.112,30561,0)
+4010247^ACIDOPHILUS/PECTIN 100MG TAB,CHEWABLE
+"DATA",176.112,30561,1)
+307724^^Y
+"DATA",176.112,30562,0)
+4010248^ACNE AID BAR
+"DATA",176.112,30562,1)
+307726^^Y
+"DATA",176.112,30563,0)
+4013330^ADVANTAGE (ACCU-CHEK GLUCOSE) METER
+"DATA",176.112,30563,1)
+307736^^Y
+"DATA",176.112,30564,0)
+4008511^ADVANTAGE (ACCU-CHEK GLUCOSE) TEST STRIP
+"DATA",176.112,30564,1)
+307737^^Y
+"DATA",176.112,30565,0)
+4013037^ADVERA LIQUID CHOCOLATE,240ML
+"DATA",176.112,30565,1)
+307738^^Y
+"DATA",176.112,30566,0)
+4013038^ADVERA LIQUID ORANGE,240ML
+"DATA",176.112,30566,1)
+307739^^Y
+"DATA",176.112,30567,0)
+4013036^ADVERA LIQUID VANILLA,240ML
+"DATA",176.112,30567,1)
+307740^^Y
+"DATA",176.112,30568,0)
+4008148^AIR/CARBON MONOXIDE 0.1% GAS
+"DATA",176.112,30568,1)
+307741^^Y
+"DATA",176.112,30569,0)
+4010570^AL CHLOROHYDRATE/CHLOROXYLENOL/MENTHOL/ZN UNDECYLENATE PWDR,TOP
+"DATA",176.112,30569,1)
+307742^^Y
+"DATA",176.112,30570,0)
+4010345^ALA-BATH OIL,TOP
+"DATA",176.112,30570,1)
+307767^^Y
+"DATA",176.112,30571,0)
+4010346^ALA-DERM LOTION,TOP
+"DATA",176.112,30571,1)
+307768^^Y
+"DATA",176.112,30572,0)
+4013066^ALBOLENE (SCENTED) CREAM,TOP
+"DATA",176.112,30572,1)
+307769^^Y
+"DATA",176.112,30573,0)
+4013067^ALBOLENE (UNSCENTED) CREAM,TOP
+"DATA",176.112,30573,1)
+307770^^Y
+"DATA",176.112,30574,0)
+4006910^ALBUMIN HUMAN 0.03% / ALLERGENIC EXTRACT, EPIDERMAL & INHL INJ
+"DATA",176.112,30574,1)
+307771^^Y
+"DATA",176.112,30575,0)
+4006909^ALBUMIN HUMAN 0.03% / ALLERGENIC EXTRACT, POLLEN MIX INJ
+"DATA",176.112,30575,1)
+307772^^Y
+"DATA",176.112,30576,0)
+4008369^ALBUSTIX (PROTEIN) TEST STRIP
+"DATA",176.112,30576,1)
+307778^^Y
+"DATA",176.112,30577,0)
+4009859^ALCOHOL 28%/SALICYLIC ACID 0.5% PAD,TOP
+"DATA",176.112,30577,1)
+307788^^Y
+"DATA",176.112,30578,0)
+4010456^ALCOHOL 70%/CAMPHOR 3.6%/CAPSICUM/ME SALICYLATE 15% LIQUID
+"DATA",176.112,30578,1)
+307792^^Y
+"DATA",176.112,30579,0)
+4010455^ALCOHOL 70%/CAMPHOR 3.6%/CAPSICUM 0.025%/ME SALICYLATE 15% LIQ
+"DATA",176.112,30579,1)
+307792^^Y
+"DATA",176.112,30580,0)
+4010457^ALCOHOL 70%/CAMPHOR 3.6%/CAPSICUM/ME SALICYLATE 15% AEROSOL
+"DATA",176.112,30580,1)
+307793^^Y
+"DATA",176.112,30581,0)
+4003784^ALCOHOL,METHYL,ANHYDROUS LIQUID
+"DATA",176.112,30581,1)
+307810^^Y
+"DATA",176.112,30582,0)
+4009730^ALCOHOL/BENZOIC ACID/EUCALYPTOL/ME SALICYLATE/THYMOL MOUTHWASH
+"DATA",176.112,30582,1)
+307811^^Y
+"DATA",176.112,30583,0)
+4009729^ALCOHOL/BENZOIC ACID/EUCALYPTOL/METHYL SALICYLATE/THYMOL LIQUID
+"DATA",176.112,30583,1)
+307812^^Y
+"DATA",176.112,30584,0)
+4010562^ALCOHOL/EUCALYPTOL/MENTHOL/ME SALICYLATE/THYMOL MOUTHWASH
+"DATA",176.112,30584,1)
+307813^^Y
+"DATA",176.112,30585,0)
+4010221^ALCOHOL/GLYCOLIC ACID LOTION
+"DATA",176.112,30585,1)
+307814^^Y
+"DATA",176.112,30586,0)
+4010318^ALCOHOL/MENTHOL 2%/THYMOL GEL,TOP
+"DATA",176.112,30586,1)
+307815^^Y
+"DATA",176.112,30587,0)
+4010563^ALGINIC AC 200MG/CARBOXYMETHYLCELLULOSE/NA BICARB 70MG TAB
+"DATA",176.112,30587,1)
+307820^^Y
+"DATA",176.112,30588,0)
+4009979^ALKALINE AROMATIC SOLN
+"DATA",176.112,30588,1)
+307825^^Y
+"DATA",176.112,30589,0)
+4005647^ALLANTOIN/AMINACRINE/SULFANILAMIDE W/DIENESTROL 0.01% CR,VAG
+"DATA",176.112,30589,1)
+307833^^Y
+"DATA",176.112,30590,0)
+4010498^ALLANTOIN/BENZALKONIUM/DIPERODON/EUCALYPTOL FIRST AID CREAM
+"DATA",176.112,30590,1)
+307834^^Y
+"DATA",176.112,30591,0)
+4013588^ALLCLENZ SPRAY,TOP
+"DATA",176.112,30591,1)
+307835^^Y
+"DATA",176.112,30592,0)
+4008045^ALLERGENIC EXTRACT EPIDERMAL INJ
+"DATA",176.112,30592,1)
+307850^^Y
+"DATA",176.112,30593,0)
+4008041^ALLERGENIC EXTRACT GRASSES INJ
+"DATA",176.112,30593,1)
+307851^^Y
+"DATA",176.112,30594,0)
+4007282^ALLERGENIC EXTRACT INJ
+"DATA",176.112,30594,1)
+307852^^Y
+"DATA",176.112,30595,0)
+4008036^ALLERGENIC EXTRACT INSECTS HOUSEHOLD INJ
+"DATA",176.112,30595,1)
+307853^^Y
+"DATA",176.112,30596,0)
+4008038^ALLERGENIC EXTRACT MIXED EPIDERMALS INJ
+"DATA",176.112,30596,1)
+307854^^Y
+"DATA",176.112,30597,0)
+4008032^ALLERGENIC EXTRACT MIXED GRASSES INJ
+"DATA",176.112,30597,1)
+307855^^Y
+"DATA",176.112,30598,0)
+4008037^ALLERGENIC EXTRACT MIXED INHL INJ
+"DATA",176.112,30598,1)
+307856^^Y
+"DATA",176.112,30599,0)
+4008031^ALLERGENIC EXTRACT MIXED TREES INJ
+"DATA",176.112,30599,1)
+307858^^Y
+"DATA",176.112,30600,0)
+4008033^ALLERGENIC EXTRACT MIXED WEEDS INJ
+"DATA",176.112,30600,1)
+307859^^Y
+"DATA",176.112,30601,0)
+4008042^ALLERGENIC EXTRACT TREES INJ
+"DATA",176.112,30601,1)
+307860^^Y
+"DATA",176.112,30602,0)
+4008043^ALLERGENIC EXTRACT WEEDS INJ
+"DATA",176.112,30602,1)
+307861^^Y
+"DATA",176.112,30603,0)
+4004563^ALLERGENIC EXTRACT, ANTIGENS, MIXED INJ
+"DATA",176.112,30603,1)
+307876^^Y
+"DATA",176.112,30604,0)
+4004566^ALLERGENIC EXTRACT, GRASS, 9 SOUTHERN
+"DATA",176.112,30604,1)
+307894^^Y
+"DATA",176.112,30605,0)
+4004426^ALLERGENIC EXTRACT, GRASS, BERMUDA INJ,SUSP
+"DATA",176.112,30605,1)
+307896^^Y
+"DATA",176.112,30606,0)
+4004496^ALLERGENIC EXTRACT, HOUSE DUST INJ
+"DATA",176.112,30606,1)
+307926^^Y
+"DATA",176.112,30607,0)
+4007266^ALLERGENIC EXTRACT, MOLDS 10000 UNT MISCELLANEOUS
+"DATA",176.112,30607,1)
+307941^^Y
+"DATA",176.112,30608,0)
+4006900^ALLERGENIC EXTRACT,HONEY BEE VENOM INJ
+"DATA",176.112,30608,1)
+308008^^Y
+"DATA",176.112,30609,0)
+4006901^ALLERGENIC EXTRACT,HORNET INJ
+"DATA",176.112,30609,1)
+308009^^Y
+"DATA",176.112,30610,0)
+4007288^ALLERGENIC EXTRACT,MIXED ANTIGENS
+"DATA",176.112,30610,1)
+308013^^Y
+"DATA",176.112,30611,0)
+4008132^ALLERGENIC EXTRACT,MOLD INJ
+"DATA",176.112,30611,1)
+308014^^Y
+"DATA",176.112,30612,0)
+4007267^ALLERGENIC EXTRACT,MOLDS MIXTURE INJ
+"DATA",176.112,30612,1)
+308015^^Y
+"DATA",176.112,30613,0)
+4008034^ALLERGENIC EXTRACT MIXED MOLDS INJ
+"DATA",176.112,30613,1)
+308015^^Y
+"DATA",176.112,30614,0)
+4008134^ALLERGENIC EXTRACT,POLLEN INJ
+"DATA",176.112,30614,1)
+308016^^Y
+"DATA",176.112,30615,0)
+4006908^ALLERGENIC EXTRACT,STINGING INSECT INJ
+"DATA",176.112,30615,1)
+308018^^Y
+"DATA",176.112,30616,0)
+4006907^ALLERGENIC EXTRACT,YELLOW JACKET INJ
+"DATA",176.112,30616,1)
+308027^^Y
+"DATA",176.112,30617,0)
+4008040^ALLERGENIC EXTRACTS DIAGNOSTIC SCRATCH TEST INJ
+"DATA",176.112,30617,1)
+308028^^Y
+"DATA",176.112,30618,0)
+4007939^ALLERGENIC EXTRACTS INTRADERMAL INJ
+"DATA",176.112,30618,1)
+308029^^Y
+"DATA",176.112,30619,0)
+4008039^ALLERGENIC EXTRACTS MIXED INHL EPIDERMAL INJ
+"DATA",176.112,30619,1)
+308030^^Y
+"DATA",176.112,30620,0)
+4014640^ALOE VERA GEL,TOP
+"DATA",176.112,30620,1)
+308032^^Y
+"DATA",176.112,30621,0)
+4009637^ALOE VERA/VITAMIN E OIL,TOP
+"DATA",176.112,30621,1)
+308033^^Y
+"DATA",176.112,30622,0)
+4015265^ALOE VESTA 2-IN-1 PROTECTIVE OINT,TOP
+"DATA",176.112,30622,1)
+308034^^Y
+"DATA",176.112,30623,0)
+4015444^ALOE VESTA 3-N-1 CLEANSING FOAM,TOP
+"DATA",176.112,30623,1)
+308035^^Y
+"DATA",176.112,30624,0)
+4013681^ALOE VESTA CREAM,TOP
+"DATA",176.112,30624,1)
+308036^^Y
+"DATA",176.112,30625,0)
+4013682^ALOE VESTA PROTECTIVE OINT,TOP
+"DATA",176.112,30625,1)
+308037^^Y
+"DATA",176.112,30626,0)
+4009682^ALPHA KERI BAR SOAP
+"DATA",176.112,30626,1)
+308039^^Y
+"DATA",176.112,30627,0)
+4009683^ALPHA KERI SPRAY MIST OIL,TOP
+"DATA",176.112,30627,1)
+308040^^Y
+"DATA",176.112,30628,0)
+4012891^ALPHA-GALACTISIDASE DROPS,ORAL
+"DATA",176.112,30628,1)
+308042^^Y
+"DATA",176.112,30629,0)
+4012890^ALPHA-GALACTISIDASE ENZYME TAB
+"DATA",176.112,30629,1)
+308043^^Y
+"DATA",176.112,30630,0)
+4012892^ALPHA-GALACTISIDASE ENZYME TAB,CHEW
+"DATA",176.112,30630,1)
+308044^^Y
+"DATA",176.112,30631,0)
+4008361^ALUMINUM ACETATE PWDR,TOP
+"DATA",176.112,30631,1)
+308059^^Y
+"DATA",176.112,30632,0)
+4008360^ALUMINUM ACETATE TAB,EFFERVSC,TOP
+"DATA",176.112,30632,1)
+308060^^Y
+"DATA",176.112,30633,0)
+4008779^ALUMINUM ACETATE/BENZETHONIUM CL PWDR,TOP
+"DATA",176.112,30633,1)
+308061^^Y
+"DATA",176.112,30634,0)
+4006784^ALUMINUM CHLORIDE 1MG BRAID
+"DATA",176.112,30634,1)
+308068^^Y
+"DATA",176.112,30635,0)
+4009392^ALUMINUM CHLOROHYDREX AEROSOL,TOP
+"DATA",176.112,30635,1)
+308070^^Y
+"DATA",176.112,30636,0)
+4015326^ALUMINUM HYDROXIDE OINT,TOP
+"DATA",176.112,30636,1)
+308088^^Y
+"DATA",176.112,30637,0)
+4006792^ALUMINUM HYDROXYCHLORIDE LOTION
+"DATA",176.112,30637,1)
+308090^^Y
+"DATA",176.112,30638,0)
+4008545^ALUMINUM SULFATE/CALCIUM ACETATE PWDR,TOP
+"DATA",176.112,30638,1)
+308094^^Y
+"DATA",176.112,30639,0)
+4008025^AMINO ACIDS/MULTIVITAMINS/MINERALS LIQUID
+"DATA",176.112,30639,1)
+308100^^Y
+"DATA",176.112,30640,0)
+4007943^AMINOPHYLLINE 32MG/AMMONIUM CL 30MG/DIPHENHYDRAMINE 8MG ELIXIR
+"DATA",176.112,30640,1)
+308115^^Y
+"DATA",176.112,30641,0)
+4006314^AMINOSYN II 3.5%/DEXTROSE 5% INJ
+"DATA",176.112,30641,1)
+308125^^Y
+"DATA",176.112,30642,0)
+4006316^AMINOSYN II 4.25%/DEXTROSE 10% INJ
+"DATA",176.112,30642,1)
+308126^^Y
+"DATA",176.112,30643,0)
+4007401^AMINOSYN II 4.25% M/DEXTROSE 10% INJ
+"DATA",176.112,30643,1)
+308126^^Y
+"DATA",176.112,30644,0)
+4014827^AMIODARONE HCL (GENEVA) 200MG TAB
+"DATA",176.112,30644,1)
+308127^^Y
+"DATA",176.112,30645,0)
+4008402^AMMONIA,AROMATIC LIQUID
+"DATA",176.112,30645,1)
+308143^^Y
+"DATA",176.112,30646,0)
+4006928^AMMONIUM CL 125MG/DIPHENHYDRAMINE 12.5MG/MENTHOL/NA CIT/5ML LIQ
+"DATA",176.112,30646,1)
+308148^^Y
+"DATA",176.112,30647,0)
+4008937^AMMONIUM CL 22MG/IPECAC ALK 0.24MG/5ML TOLU BALSAM SYRUP
+"DATA",176.112,30647,1)
+308152^^Y
+"DATA",176.112,30648,0)
+4007595^AMMONIUM CL 4MEQ/K CITRATE 5MEQ/K GLUCONATE 10MEQ/15ML LIQUID
+"DATA",176.112,30648,1)
+308153^^Y
+"DATA",176.112,30649,0)
+4007722^AMMONIUM CL 500MG/CTM 7.5MG/DM 60MG/P-EPHRINE 30MG LIQUID
+"DATA",176.112,30649,1)
+308154^^Y
+"DATA",176.112,30650,0)
+4009739^AMMONIUM HYDROXIDE 25% SOLN
+"DATA",176.112,30650,1)
+308155^^Y
+"DATA",176.112,30651,0)
+4007361^AMMONIUM PO4 190MG/DI-NA PYRO-PO4 110MG/NA BI-PO4 200MG TAB
+"DATA",176.112,30651,1)
+308157^^Y
+"DATA",176.112,30652,0)
+4007362^AMMONIUM PO4 190MG/DI-NA PYRO-PO4 110MG/NA BI-PO4 200MG TAB,EC
+"DATA",176.112,30652,1)
+308158^^Y
+"DATA",176.112,30653,0)
+4008877^AMYL METACRESOL/BENZOCAINE/MYRRH/PHENOL/ALCOHOL 70% SOLN
+"DATA",176.112,30653,1)
+308213^^Y
+"DATA",176.112,30654,0)
+4004906^AMYLASE/ATROPINE ME-NITRATE 1MG/LIPASE/PROTEASE TAB,EC
+"DATA",176.112,30654,1)
+308246^^Y
+"DATA",176.112,30655,0)
+4007308^AMYLASE/B-DONNA/CELLULASE/LIPASE/PHENOBARB 8MG/PROTEASE TAB
+"DATA",176.112,30655,1)
+308247^^Y
+"DATA",176.112,30656,0)
+4007188^AMYLASE/CELLULASE/HOMATROPINE/PHENOBARB 8MG/PROTEASE TAB
+"DATA",176.112,30656,1)
+308248^^Y
+"DATA",176.112,30657,0)
+4007186^AMYLASE/DEHYDROCHOLIC AC/DESOXYCHOLIC AC/PROTEASE TAB
+"DATA",176.112,30657,1)
+308249^^Y
+"DATA",176.112,30658,0)
+4009404^ANTI-INHIBITOR COAGULANT COMPLEX INJ
+"DATA",176.112,30658,1)
+308258^^Y
+"DATA",176.112,30659,0)
+4010411^ANTI-RUST TAB (NOT FOR ORAL USE)
+"DATA",176.112,30659,1)
+308259^^Y
+"DATA",176.112,30660,0)
+4007796^ANTICOAGULANT CITRATE DEXTROSE INJ
+"DATA",176.112,30660,1)
+308261^^Y
+"DATA",176.112,30661,0)
+4006998^ANTICOAGULANT CITRATE DEXTROSE SOLN
+"DATA",176.112,30661,1)
+308262^^Y
+"DATA",176.112,30662,0)
+4005146^ANTIHEMOPHILIC FACTOR,HUMAN INJ
+"DATA",176.112,30662,1)
+308264^^Y
+"DATA",176.112,30663,0)
+4009399^ANTIHEMOPHILIC FACTOR,HUMAN,MONOCLONAL INJ
+"DATA",176.112,30663,1)
+308265^^Y
+"DATA",176.112,30664,0)
+4010495^ANTIPRURITIC CREAM
+"DATA",176.112,30664,1)
+308270^^Y
+"DATA",176.112,30665,0)
+4007734^APAP/CAFN/CTM 4MG/P-EPHRINE 5MG/P-PROPANOL 14MG/SALICYLAMIDE CAP
+"DATA",176.112,30665,1)
+308340^^Y
+"DATA",176.112,30666,0)
+4007735^APAP/CAFN/CTM 4MG/P-EPHRINE 5MG/P-PROPANOL 14MG/SALICYLAMIDE TAB
+"DATA",176.112,30666,1)
+308341^^Y
+"DATA",176.112,30667,0)
+4004802^APAP/CTM 2MG/P-EPHRINE 7.5MG/P-PROPANOL 12.5MG/PYRILAMINE 12.5MG
+"DATA",176.112,30667,1)
+308342^^Y
+"DATA",176.112,30668,0)
+4002145^APATATE TAB
+"DATA",176.112,30668,1)
+308344^^Y
+"DATA",176.112,30669,0)
+4008397^AQUABASE OINT,TOP
+"DATA",176.112,30669,1)
+308349^^Y
+"DATA",176.112,30670,0)
+4010353^AQUAPHILIC OINTMENT TOP
+"DATA",176.112,30670,1)
+308350^^Y
+"DATA",176.112,30671,0)
+4007445^ASA 260MG/CAFN 16MG/GELSEMIUM/HYOSCYAMUS TAB
+"DATA",176.112,30671,1)
+308359^^Y
+"DATA",176.112,30672,0)
+4009767^ASAFETIDA/MAGNESIA LIQUID
+"DATA",176.112,30672,1)
+308373^^Y
+"DATA",176.112,30673,0)
+4008901^ASPIRIN 325MG/DIHYDROXYALUMINUM AMINOACETATE TAB
+"DATA",176.112,30673,1)
+308406^^Y
+"DATA",176.112,30674,0)
+4007444^AT SO4 0.0194MG/PHENOBARB 16MG/SCOPOLAMINE 0.0065MG LIQUID
+"DATA",176.112,30674,1)
+308419^^Y
+"DATA",176.112,30675,0)
+4006950^AT SO4 0.0195MG/HYOSCYAMINE 0.11MG/PHENOBARB 16.2MG TAB
+"DATA",176.112,30675,1)
+308420^^Y
+"DATA",176.112,30676,0)
+4015065^AT-LAST (GLUCOSE) TEST STRIP
+"DATA",176.112,30676,1)
+308426^^Y
+"DATA",176.112,30677,0)
+4009417^AVALGESTIC ANALGESIC LOTION
+"DATA",176.112,30677,1)
+308454^^Y
+"DATA",176.112,30678,0)
+4008420^AZOSTIX (BLOOD UREA NITROGEN) TEST STRIP
+"DATA",176.112,30678,1)
+308465^^Y
+"DATA",176.112,30679,0)
+4002138^B COMPLEX TAB
+"DATA",176.112,30679,1)
+308469^^Y
+"DATA",176.112,30680,0)
+4009601^B-C-E & ZINC HIGH POTENCY TAB
+"DATA",176.112,30680,1)
+308470^^Y
+"DATA",176.112,30681,0)
+4002114^B-COMPLEX W/VIT C TAB
+"DATA",176.112,30681,1)
+308471^^Y
+"DATA",176.112,30682,0)
+4002156^B COMPLEX W/VIT C TAB
+"DATA",176.112,30682,1)
+308471^^Y
+"DATA",176.112,30683,0)
+4007968^B-DONNA 0.1296MG/KAOLIN/PECTIN/30ML SUSP
+"DATA",176.112,30683,1)
+308475^^Y
+"DATA",176.112,30684,0)
+4004708^B-DONNA/BILE SALTS/PANCREATIN/PEPSIN/PB 8MG TAB
+"DATA",176.112,30684,1)
+308484^^Y
+"DATA",176.112,30685,0)
+4004760^B-DONNA/DEHYDROCHOLIC AC/LIPASE/OX BILE/PANCREATIN PEPSIN TAB,EC
+"DATA",176.112,30685,1)
+308485^^Y
+"DATA",176.112,30686,0)
+4002126^BABY VITAMIN DROPS,ORAL
+"DATA",176.112,30686,1)
+308504^^Y
+"DATA",176.112,30687,0)
+4001822^BABY VITAMINS W/IRON DROPS,ORAL
+"DATA",176.112,30687,1)
+308505^^Y
+"DATA",176.112,30688,0)
+4001165^BACITRACIN PWDR
+"DATA",176.112,30688,1)
+308510^^Y
+"DATA",176.112,30689,0)
+4010313^BACITRACIN/LIDOCAINE 4%/NEOMYCIN/POLYMYXIN OINT,TOP
+"DATA",176.112,30689,1)
+308515^^Y
+"DATA",176.112,30690,0)
+4010062^BAGENEMA/BISACODYL TAB 5MG #4/CASTILE SOAP/PHOSPHO-SODA 45ML KIT
+"DATA",176.112,30690,1)
+308519^^Y
+"DATA",176.112,30691,0)
+4010342^BALANCED SALT PLUS SOLN,OPH IRRG
+"DATA",176.112,30691,1)
+308520^^Y
+"DATA",176.112,30692,0)
+4010427^BALANCED SALT SOLN W/BICARBONATE/DEXTROSE/GLUTATHIONE IRRG,OPH
+"DATA",176.112,30692,1)
+308521^^Y
+"DATA",176.112,30693,0)
+4004149^BALANCED SALT SOLN,OPH IRRG
+"DATA",176.112,30693,1)
+308522^^Y
+"DATA",176.112,30694,0)
+4008389^BALNEOL LOTION
+"DATA",176.112,30694,1)
+308523^^Y
+"DATA",176.112,30695,0)
+4007598^BAN-TUSS HYDROCODONE LIQUID,ORAL
+"DATA",176.112,30695,1)
+308526^^Y
+"DATA",176.112,30696,0)
+4004008^BARIUM SO4 1.2% SUSP
+"DATA",176.112,30696,1)
+308528^^Y
+"DATA",176.112,30697,0)
+4004016^BARIUM SO4 1.5% LIQUID,ORAL
+"DATA",176.112,30697,1)
+308529^^Y
+"DATA",176.112,30698,0)
+4003986^BARIUM SO4 100% CREAM,ORAL
+"DATA",176.112,30698,1)
+308530^^Y
+"DATA",176.112,30699,0)
+4004028^BARIUM SO4 100% SUSP,ORAL
+"DATA",176.112,30699,1)
+308531^^Y
+"DATA",176.112,30700,0)
+4004001^BARIUM SO4 10OZ PWDR,RTL
+"DATA",176.112,30700,1)
+308532^^Y
+"DATA",176.112,30701,0)
+4003992^BARIUM SO4 180GM/CUP PWDR,ORAL
+"DATA",176.112,30701,1)
+308533^^Y
+"DATA",176.112,30702,0)
+4004027^BARIUM SO4 2.1% SUSP
+"DATA",176.112,30702,1)
+308534^^Y
+"DATA",176.112,30703,0)
+4004021^BARIUM SO4 2.2% SUSP,ORAL
+"DATA",176.112,30703,1)
+308535^^Y
+"DATA",176.112,30704,0)
+4003994^BARIUM SO4 300GM/BAG PWDR,RTL
+"DATA",176.112,30704,1)
+308536^^Y
+"DATA",176.112,30705,0)
+4004025^BARIUM SO4 340GM PWDR,RTL
+"DATA",176.112,30705,1)
+308537^^Y
+"DATA",176.112,30706,0)
+4004024^BARIUM SO4 35% SUSP,ORAL
+"DATA",176.112,30706,1)
+308538^^Y
+"DATA",176.112,30707,0)
+4003995^BARIUM SO4 360GM PWDR,RTL
+"DATA",176.112,30707,1)
+308539^^Y
+"DATA",176.112,30708,0)
+4004017^BARIUM SO4 4.5% SUSP,ORAL
+"DATA",176.112,30708,1)
+308540^^Y
+"DATA",176.112,30709,0)
+4004004^BARIUM SO4 420GM/BAG PWDR,RTL
+"DATA",176.112,30709,1)
+308541^^Y
+"DATA",176.112,30710,0)
+4003996^BARIUM SO4 420GM PWDR,RTL
+"DATA",176.112,30710,1)
+308541^^Y
+"DATA",176.112,30711,0)
+4004015^BARIUM SO4 45% LIQUID
+"DATA",176.112,30711,1)
+308542^^Y
+"DATA",176.112,30712,0)
+4008305^BARIUM SO4 45%/HYDROXYPROPYL METHYLCELLULOSE 1% SUSP
+"DATA",176.112,30712,1)
+308543^^Y
+"DATA",176.112,30713,0)
+4003991^BARIUM SO4 454GM PWDR,RTL
+"DATA",176.112,30713,1)
+308544^^Y
+"DATA",176.112,30714,0)
+4003997^BARIUM SO4 480GM PWDR,RTL
+"DATA",176.112,30714,1)
+308545^^Y
+"DATA",176.112,30715,0)
+4004022^BARIUM SO4 5% SUSP,ORAL
+"DATA",176.112,30715,1)
+308546^^Y
+"DATA",176.112,30716,0)
+4004023^BARIUM SO4 5% SUSP,RTL
+"DATA",176.112,30716,1)
+308547^^Y
+"DATA",176.112,30717,0)
+4004020^BARIUM SO4 50% SUSP
+"DATA",176.112,30717,1)
+308548^^Y
+"DATA",176.112,30718,0)
+4004011^BARIUM SO4 55% ENEMA
+"DATA",176.112,30718,1)
+308549^^Y
+"DATA",176.112,30719,0)
+4004013^BARIUM SO4 55% SUSP,ORAL
+"DATA",176.112,30719,1)
+308550^^Y
+"DATA",176.112,30720,0)
+4003980^BARIUM SO4 57% SUSP,RTL
+"DATA",176.112,30720,1)
+308551^^Y
+"DATA",176.112,30721,0)
+4003989^BARIUM SO4 60% SUSP
+"DATA",176.112,30721,1)
+308552^^Y
+"DATA",176.112,30722,0)
+4004003^BARIUM SO4 600GM PWDR,RTL
+"DATA",176.112,30722,1)
+308553^^Y
+"DATA",176.112,30723,0)
+4003999^BARIUM SO4 20OZ PWDR,RTL
+"DATA",176.112,30723,1)
+308553^^Y
+"DATA",176.112,30724,0)
+4003981^BARIUM SO4 61% SUSP,RTL
+"DATA",176.112,30724,1)
+308554^^Y
+"DATA",176.112,30725,0)
+4004026^BARIUM SO4 630GM PWDR,RTL
+"DATA",176.112,30725,1)
+308555^^Y
+"DATA",176.112,30726,0)
+4004012^BARIUM SO4 64.4% ENEMA
+"DATA",176.112,30726,1)
+308556^^Y
+"DATA",176.112,30727,0)
+4004010^BARIUM SO4 70% ENEMA
+"DATA",176.112,30727,1)
+308557^^Y
+"DATA",176.112,30728,0)
+4003983^BARIUM SO4 70% LIQUID,ORAL
+"DATA",176.112,30728,1)
+308558^^Y
+"DATA",176.112,30729,0)
+4003990^BARIUM SO4 70% SUSP,RTL
+"DATA",176.112,30729,1)
+308559^^Y
+"DATA",176.112,30730,0)
+4004005^BARIUM SO4 75% SUSP,RTL
+"DATA",176.112,30730,1)
+308560^^Y
+"DATA",176.112,30731,0)
+4003987^BARIUM SO4 85% SUSP,RTL
+"DATA",176.112,30731,1)
+308561^^Y
+"DATA",176.112,30732,0)
+4003993^BARIUM SO4 8GM/CUP PWDR
+"DATA",176.112,30732,1)
+308562^^Y
+"DATA",176.112,30733,0)
+4004019^BARIUM SO4 92.5% PWDR
+"DATA",176.112,30733,1)
+308563^^Y
+"DATA",176.112,30734,0)
+4003982^BARIUM SO4 95 % PWDR,ORAL
+"DATA",176.112,30734,1)
+308564^^Y
+"DATA",176.112,30735,0)
+4003985^BARIUM SO4 95% PWDR,RTL
+"DATA",176.112,30735,1)
+308565^^Y
+"DATA",176.112,30736,0)
+4003979^BARIUM SO4 95% ENEMA
+"DATA",176.112,30736,1)
+308565^^Y
+"DATA",176.112,30737,0)
+4003988^BARIUM SO4 98% PWDR,RTL
+"DATA",176.112,30737,1)
+308567^^Y
+"DATA",176.112,30738,0)
+4012617^BASIS SOAP BAR,SENSITIVE SKIN
+"DATA",176.112,30738,1)
+308570^^Y
+"DATA",176.112,30739,0)
+4010365^BASLE CREAM,TOP
+"DATA",176.112,30739,1)
+308571^^Y
+"DATA",176.112,30740,0)
+4008372^BATH OIL
+"DATA",176.112,30740,1)
+308572^^Y
+"DATA",176.112,30741,0)
+4012750^BAZA CREAM/PERI-WASH II BARRIER PACK
+"DATA",176.112,30741,1)
+308573^^Y
+"DATA",176.112,30742,0)
+4012751^BAZA CREAM/PERI-WASH II SKIN CARE PACK
+"DATA",176.112,30742,1)
+308574^^Y
+"DATA",176.112,30743,0)
+4015067^BCG (PACIS) 120MG/AMP VACCINE
+"DATA",176.112,30743,1)
+308575^^Y
+"DATA",176.112,30744,0)
+4007036^BCG (THERACYS) 27MG/VIAL
+"DATA",176.112,30744,1)
+308576^^Y
+"DATA",176.112,30745,0)
+4007037^BCG (THERACYS) 81MG/VIAL
+"DATA",176.112,30745,1)
+308576^^Y
+"DATA",176.112,30746,0)
+4009321^BCG,TICE 27MG/VIL VACCINE
+"DATA",176.112,30746,1)
+308577^^Y
+"DATA",176.112,30747,0)
+4002086^BE-C 800 TAB
+"DATA",176.112,30747,1)
+308578^^Y
+"DATA",176.112,30748,0)
+4003786^BEER,CAN,360ML
+"DATA",176.112,30748,1)
+308584^^Y
+"DATA",176.112,30749,0)
+4008844^BENTONITE/K ALUM/TALC PWDR,TOP
+"DATA",176.112,30749,1)
+308621^^Y
+"DATA",176.112,30750,0)
+4010053^BENZALKONIUM CL 0.05%/OXYQUINOLINE SO4 LIQUID
+"DATA",176.112,30750,1)
+308623^^Y
+"DATA",176.112,30751,0)
+4009475^BENZALKONIUM CL TOWELETTES
+"DATA",176.112,30751,1)
+308632^^Y
+"DATA",176.112,30752,0)
+4008882^BENZALKONIUM CL/BENZOCAINE/DIBUCAINE/TETRACAINE CREAM,TOP
+"DATA",176.112,30752,1)
+308633^^Y
+"DATA",176.112,30753,0)
+4006762^BENZETHONIUM CL 0.1%/BENZOCAINE 20%/GLYCERIN SOLN,OTIC
+"DATA",176.112,30753,1)
+308635^^Y
+"DATA",176.112,30754,0)
+4010568^BENZETHONIUM CL HAND CLEANSER
+"DATA",176.112,30754,1)
+308637^^Y
+"DATA",176.112,30755,0)
+4010574^BENZETHONIUM CL/MENTHOL/ZINC STEARATE PWDR,TOP
+"DATA",176.112,30755,1)
+308638^^Y
+"DATA",176.112,30756,0)
+4012123^BENZOCAINE 15MG/CETYLPYRIDINIUM CL/TERPIN HYDRATE LOZENGE
+"DATA",176.112,30756,1)
+308651^^Y
+"DATA",176.112,30757,0)
+4007894^BENZOCAINE 2%/CINNAMON OIL/CLOVE OIL/EUCALYPTUS OIL/PHENOL SOLN
+"DATA",176.112,30757,1)
+308654^^Y
+"DATA",176.112,30758,0)
+4007848^BENZOCAINE 4%/CHLOROBUTANOL 4%/EUGENOL 46%/PERUVIAN BALSAM SOLN
+"DATA",176.112,30758,1)
+308661^^Y
+"DATA",176.112,30759,0)
+4007828^BENZOCAINE CREAM,TOP
+"DATA",176.112,30759,1)
+308670^^Y
+"DATA",176.112,30760,0)
+4010417^BENZOCAINE/CALAMINE 10%/ZINC OXIDE 10% LOTION
+"DATA",176.112,30760,1)
+308671^^Y
+"DATA",176.112,30761,0)
+4010550^BENZOCAINE/CALAMINE/DIPHENHYDRAMINE/MENTHOL CREAM,TOP
+"DATA",176.112,30761,1)
+308672^^Y
+"DATA",176.112,30762,0)
+4010496^BENZOCAINE/CAMPHOR/MENTHOL CREAM,LIP
+"DATA",176.112,30762,1)
+308673^^Y
+"DATA",176.112,30763,0)
+4008477^BENZOCAINE/MENTHOL GEL,TOP
+"DATA",176.112,30763,1)
+308674^^Y
+"DATA",176.112,30764,0)
+4010239^BENZOCAINE/PHENOL/VITAMIN E/ZINC OXIDE OINT,TOP
+"DATA",176.112,30764,1)
+308675^^Y
+"DATA",176.112,30765,0)
+4010319^BENZOCAINE/RESORCINOL CREAM,TOP
+"DATA",176.112,30765,1)
+308676^^Y
+"DATA",176.112,30766,0)
+4010309^BENZOIC ACID LIQUID,TOP
+"DATA",176.112,30766,1)
+308678^^Y
+"DATA",176.112,30767,0)
+4009493^BENZOIN/CAMPHOR/TOLU BALSAM LOTION
+"DATA",176.112,30767,1)
+308680^^Y
+"DATA",176.112,30768,0)
+4010509^BENZOPHENONE-3/PARA-AMINOBENZOIC ACID LOTION
+"DATA",176.112,30768,1)
+308681^^Y
+"DATA",176.112,30769,0)
+4006722^BENZYLPENICILLOYL POLYLYSINE INJ
+"DATA",176.112,30769,1)
+308699^^Y
+"DATA",176.112,30770,0)
+4009802^BERGAMOT OIL,IMITATION
+"DATA",176.112,30770,1)
+308703^^Y
+"DATA",176.112,30771,0)
+4010044^BETA-D-GALACTOSE 125MG/MALTODEXTRIN CAP
+"DATA",176.112,30771,1)
+308706^^Y
+"DATA",176.112,30772,0)
+4012754^BFI PWDR,TOP
+"DATA",176.112,30772,1)
+308726^^Y
+"DATA",176.112,30773,0)
+4014213^BIAFINE DHE CREAM,TOP
+"DATA",176.112,30773,1)
+308731^^Y
+"DATA",176.112,30774,0)
+4014214^BIAFINE WDE CREAM,TOP
+"DATA",176.112,30774,1)
+308732^^Y
+"DATA",176.112,30775,0)
+4006882^BILE SALTS/DEHYDROCHOLIC AC/PANCREATIN/PEPSIN TAB
+"DATA",176.112,30775,1)
+308736^^Y
+"DATA",176.112,30776,0)
+4006883^BILE SALTS/DEHYDROCHOLIC AC/PANCREATIN/PEPSIN TAB,SA
+"DATA",176.112,30776,1)
+308737^^Y
+"DATA",176.112,30777,0)
+4009180^BILI-LABSTIX SG (MULTIPLE) TEST STRIP
+"DATA",176.112,30777,1)
+308738^^Y
+"DATA",176.112,30778,0)
+4012351^BIOLEX WOUND CLEANSER SPRAY
+"DATA",176.112,30778,1)
+308741^^Y
+"DATA",176.112,30779,0)
+4008845^BISACODYL 10MG SUPP/SENNA EXT 74ML/SENOKOT-S TAB 2/SUCROSE 50GM
+"DATA",176.112,30779,1)
+308748^^Y
+"DATA",176.112,30780,0)
+4010065^BISACODYL 30ML/BISACODYL 5MG TAB #4/CASTOR OIL 45ML KIT
+"DATA",176.112,30780,1)
+308750^^Y
+"DATA",176.112,30781,0)
+4010063^BISACODYL 30ML/BISACODYL 5MG TAB #4/PHOSPHO-SODA 45ML
+"DATA",176.112,30781,1)
+308751^^Y
+"DATA",176.112,30782,0)
+4010064^BISACODYL SUPP 10MG/BISACODYL 5MG TAB #4/CASTOR OIL 45ML KIT
+"DATA",176.112,30782,1)
+308754^^Y
+"DATA",176.112,30783,0)
+4008773^BISCOLAN SUPP,RTL
+"DATA",176.112,30783,1)
+308756^^Y
+"DATA",176.112,30784,0)
+4009981^BISMUTH SUBGALLATE/BORIC ACID/ZINC OXIDE SUPP,RTL
+"DATA",176.112,30784,1)
+308758^^Y
+"DATA",176.112,30785,0)
+4008340^BLINX SOLN,OPH IRRG
+"DATA",176.112,30785,1)
+308772^^Y
+"DATA",176.112,30786,0)
+4013791^BOOST BAR CHOCOLATE CHRUNCH
+"DATA",176.112,30786,1)
+308774^^Y
+"DATA",176.112,30787,0)
+4013792^BOOST BAR STRAWBERRIES/CREAM
+"DATA",176.112,30787,1)
+308775^^Y
+"DATA",176.112,30788,0)
+4013794^BOOST HIGH PROTEIN LIQUID CHOCOLATE
+"DATA",176.112,30788,1)
+308776^^Y
+"DATA",176.112,30789,0)
+4013795^BOOST HIGH PROTEIN LIQUID STRAWBERRY
+"DATA",176.112,30789,1)
+308777^^Y
+"DATA",176.112,30790,0)
+4013785^BOOST LIQUID CHOCOLATE
+"DATA",176.112,30790,1)
+308778^^Y
+"DATA",176.112,30791,0)
+4013787^BOOST LIQUID CHOCOLATE MOCHA
+"DATA",176.112,30791,1)
+308779^^Y
+"DATA",176.112,30792,0)
+4013788^BOOST LIQUID CHOCOLATE RASPBERRY
+"DATA",176.112,30792,1)
+308780^^Y
+"DATA",176.112,30793,0)
+4013790^BOOST LIQUID EGGNOG
+"DATA",176.112,30793,1)
+308781^^Y
+"DATA",176.112,30794,0)
+4013789^BOOST LIQUID STRAWBERRY BANANA
+"DATA",176.112,30794,1)
+308782^^Y
+"DATA",176.112,30795,0)
+4013784^BOOST LIQUID VANILLA
+"DATA",176.112,30795,1)
+308783^^Y
+"DATA",176.112,30796,0)
+4013803^BOOST PLUS LIQUID CHOCOLATE
+"DATA",176.112,30796,1)
+308784^^Y
+"DATA",176.112,30797,0)
+4013804^BOOST PLUS LIQUID STRAWBERRY
+"DATA",176.112,30797,1)
+308785^^Y
+"DATA",176.112,30798,0)
+4013798^BOOST PUDDING CHOCOLATE
+"DATA",176.112,30798,1)
+308786^^Y
+"DATA",176.112,30799,0)
+4013797^BOOST PUDDING VANILLA
+"DATA",176.112,30799,1)
+308787^^Y
+"DATA",176.112,30800,0)
+4013801^BOOST W/FIBER LIQUID CHOCOLATE
+"DATA",176.112,30800,1)
+308788^^Y
+"DATA",176.112,30801,0)
+4013800^BOOST W/FIBER LIQUID VANILLA
+"DATA",176.112,30801,1)
+308789^^Y
+"DATA",176.112,30802,0)
+4008889^BORIC ACID SOLN
+"DATA",176.112,30802,1)
+308794^^Y
+"DATA",176.112,30803,0)
+4008339^BORIC ACID/NA BORATE SOLN IRRG,OPH
+"DATA",176.112,30803,1)
+308795^^Y
+"DATA",176.112,30804,0)
+4010426^BOTULINUM TOXIN TYPE A 100UNT/VIL OPH
+"DATA",176.112,30804,1)
+308796^^Y
+"DATA",176.112,30805,0)
+4007741^BROWN MIXTURE
+"DATA",176.112,30805,1)
+308814^^Y
+"DATA",176.112,30806,0)
+4013245^BUPROPION HCL (WELLBUTRIN SR) 100MG TAB,SA
+"DATA",176.112,30806,1)
+308821^^Y
+"DATA",176.112,30807,0)
+4015355^BUSPIRONE HCL STARTER PACK
+"DATA",176.112,30807,1)
+308822^^Y
+"DATA",176.112,30808,0)
+4007620^CA LACT 60MG/GG 60MG/HYOSCYAMUS 6MG/PB 7.5MG/TERPIN HYDRATE TAB
+"DATA",176.112,30808,1)
+308850^^Y
+"DATA",176.112,30809,0)
+4009753^CALAMINE OINT,TOP
+"DATA",176.112,30809,1)
+308859^^Y
+"DATA",176.112,30810,0)
+4009341^CALAMINE/DIPHENHYDRAMINE HCL 1% CREAM,TOP
+"DATA",176.112,30810,1)
+308860^^Y
+"DATA",176.112,30811,0)
+4009340^CALAMINE/DIPHENHYDRAMINE HCL 1% LOTION
+"DATA",176.112,30811,1)
+308861^^Y
+"DATA",176.112,30812,0)
+4012135^CALAMINE/METACRESYL ACETATE 0.95%/ZN OXIDE 12.47% CREAM
+"DATA",176.112,30812,1)
+308862^^Y
+"DATA",176.112,30813,0)
+4009632^CALCET TAB
+"DATA",176.112,30813,1)
+308863^^Y
+"DATA",176.112,30814,0)
+4010323^CALCIUM CARBONATE/CALCIUM PHOSPHATE PASTE,DENTAL
+"DATA",176.112,30814,1)
+308916^^Y
+"DATA",176.112,30815,0)
+4003495^CALCIUM GLUCONATE PWDR
+"DATA",176.112,30815,1)
+308924^^Y
+"DATA",176.112,30816,0)
+4010357^CAMEO OIL TOP
+"DATA",176.112,30816,1)
+308937^^Y
+"DATA",176.112,30817,0)
+4008770^CAMPHO-PHENIQUE ANTIBIOTIC OINT,TOP
+"DATA",176.112,30817,1)
+308938^^Y
+"DATA",176.112,30818,0)
+4009758^CAMPHOR SPIRITS LIQUID
+"DATA",176.112,30818,1)
+308945^^Y
+"DATA",176.112,30819,0)
+4009418^CAMPHOR/EUCALYPTUS OIL/MENTHOL/METHYL SALICYLATE 4.9% LIQ,TOP
+"DATA",176.112,30819,1)
+308946^^Y
+"DATA",176.112,30820,0)
+4010500^CAMPHOR/EUCALYPTUS/MENTHOL/ME SAL/TURPENTINE CREAM
+"DATA",176.112,30820,1)
+308947^^Y
+"DATA",176.112,30821,0)
+4010315^CAMPHOR/EUCALYPTUS/MENTHOL/PHENOL LOTION
+"DATA",176.112,30821,1)
+308948^^Y
+"DATA",176.112,30822,0)
+4010047^CAMPHOR/ISOPROPANOL/MENTHOL/PROPYLENE GLYCOL LOTION
+"DATA",176.112,30822,1)
+308949^^Y
+"DATA",176.112,30823,0)
+4008748^CAMPHOR/MENTHOL/METHYL SALICYLATE OINT,TOP
+"DATA",176.112,30823,1)
+308950^^Y
+"DATA",176.112,30824,0)
+4009988^CAMPHOR/MENTHOL/METHYL SALICYLATE/PEPPERMINT OIL LOTION
+"DATA",176.112,30824,1)
+308951^^Y
+"DATA",176.112,30825,0)
+4009755^CAMPHOR/SOAP LINIMENT
+"DATA",176.112,30825,1)
+308952^^Y
+"DATA",176.112,30826,0)
+4012863^CANDIDA 1:100 SKIN TEST
+"DATA",176.112,30826,1)
+308954^^Y
+"DATA",176.112,30827,0)
+4012864^CANDIDA 1:500 SKIN TEST
+"DATA",176.112,30827,1)
+308955^^Y
+"DATA",176.112,30828,0)
+4010371^CARA-KLENZ,SKIN & WOUND CLEANSER
+"DATA",176.112,30828,1)
+308965^^Y
+"DATA",176.112,30829,0)
+4015460^CARBAMAZEPINE (TEGRETOL) 100MG/5ML SUSP
+"DATA",176.112,30829,1)
+308971^^Y
+"DATA",176.112,30830,0)
+4014274^CARBAMAZEPINE 100MG/5ML SUSP,10ML (TEGRETOL)
+"DATA",176.112,30830,1)
+308971^^Y
+"DATA",176.112,30831,0)
+4014238^CARBAMAZEPINE (TEGRETOL) 100MG/5ML SUSP,10ML
+"DATA",176.112,30831,1)
+308971^^Y
+"DATA",176.112,30832,0)
+4015458^CARBAMAZEPINE (TEGRETOL) 200MG TAB,UD
+"DATA",176.112,30832,1)
+308972^^Y
+"DATA",176.112,30833,0)
+4015456^CARBAMAZEPINE (TEGRETOL) 200MG TAB
+"DATA",176.112,30833,1)
+308972^^Y
+"DATA",176.112,30834,0)
+4015455^CARBAMAZEPINE (TEGRETOL) 100MG TAB,CHEWABLE
+"DATA",176.112,30834,1)
+308974^^Y
+"DATA",176.112,30835,0)
+4014037^CARBAMAZEPINE 100MG TAB,CHEWABLE,UD (TEGRETOL)
+"DATA",176.112,30835,1)
+308974^^Y
+"DATA",176.112,30836,0)
+4002593^CARBAMAZEPINE 100MG TAB,SA (TEGRETOL-XR)
+"DATA",176.112,30836,1)
+308975^^Y
+"DATA",176.112,30837,0)
+4013362^CARBAMAZEPINE 200MG CAP,SA (CARBATROL)
+"DATA",176.112,30837,1)
+308977^^Y
+"DATA",176.112,30838,0)
+4002594^CARBAMAZEPINE 200MG TAB,SA (TEGRETOL-XR)
+"DATA",176.112,30838,1)
+308978^^Y
+"DATA",176.112,30839,0)
+4002595^CARBAMAZEPINE 400MG TAB,SA (TEGRETOL-XR)
+"DATA",176.112,30839,1)
+308980^^Y
+"DATA",176.112,30840,0)
+4010068^CARBAMIDE PEROXIDE 10%/GLYCERIN DROPS,ORAL
+"DATA",176.112,30840,1)
+308981^^Y
+"DATA",176.112,30841,0)
+4009162^CARBOXYMETHYLCELLULOSE SODIUM CREAM,DENTAL
+"DATA",176.112,30841,1)
+309010^^Y
+"DATA",176.112,30842,0)
+4012752^CARNATION INSTANT BREAKFAST PWDR,35.8GM
+"DATA",176.112,30842,1)
+309014^^Y
+"DATA",176.112,30843,0)
+4012403^CARRA FOAM-PERINEAL CLEANSING FOAM
+"DATA",176.112,30843,1)
+309017^^Y
+"DATA",176.112,30844,0)
+4012404^CARRAKLENZ SOLN,SPRAY
+"DATA",176.112,30844,1)
+309018^^Y
+"DATA",176.112,30845,0)
+4014450^CARRASYN WOUND DRESSING SOLN,SPRAY
+"DATA",176.112,30845,1)
+309019^^Y
+"DATA",176.112,30846,0)
+4012400^CARRINGTON FOOT CREAM
+"DATA",176.112,30846,1)
+309020^^Y
+"DATA",176.112,30847,0)
+4010372^CARRINGTON INCONTINENCE SKIN KIT
+"DATA",176.112,30847,1)
+309021^^Y
+"DATA",176.112,30848,0)
+4015088^CARRINGTON MOISTURE BARRIER/ZINC CREAM,TOP
+"DATA",176.112,30848,1)
+309022^^Y
+"DATA",176.112,30849,0)
+4010368^CARRINGTON SKIN BALM GEL,TOP
+"DATA",176.112,30849,1)
+309023^^Y
+"DATA",176.112,30850,0)
+4010424^CASCARA/MILK OF MAGNESIA LIQUID,30ML
+"DATA",176.112,30850,1)
+309030^^Y
+"DATA",176.112,30851,0)
+4010425^CASCARA/MILK OF MAGNESIA LIQUID
+"DATA",176.112,30851,1)
+309030^^Y
+"DATA",176.112,30852,0)
+4010423^CASCARA/MAGNESIUM HYDROXIDE CONC SUSP
+"DATA",176.112,30852,1)
+309030^^Y
+"DATA",176.112,30853,0)
+4012495^CASEC POWDER,ORAL
+"DATA",176.112,30853,1)
+309031^^Y
+"DATA",176.112,30854,0)
+4007573^CASTELLANI PAINT,TOP
+"DATA",176.112,30854,1)
+309033^^Y
+"DATA",176.112,30855,0)
+4009647^CASTOR OIL/DIMETHICONE/NITROCELLULOSE OINT,TOP
+"DATA",176.112,30855,1)
+309037^^Y
+"DATA",176.112,30856,0)
+4014177^CASTOR OIL/PERUVIAN BALSAM SPRAY,TOP
+"DATA",176.112,30856,1)
+309038^^Y
+"DATA",176.112,30857,0)
+4012131^CATALYTIC FORMULA TAB
+"DATA",176.112,30857,1)
+309039^^Y
+"DATA",176.112,30858,0)
+4003875^CEFORANIDE 2GM/VIL INJ
+"DATA",176.112,30858,1)
+309064^^Y
+"DATA",176.112,30859,0)
+4013098^CEFTRIAXONE NA 500MG/VIL/LIDOCAINE 1% INJ,KIT
+"DATA",176.112,30859,1)
+309094^^Y
+"DATA",176.112,30860,0)
+4013138^CELLULOSE,MICROPOROUS/TALC PWDR,TOP
+"DATA",176.112,30860,1)
+309105^^Y
+"DATA",176.112,30861,0)
+4008217^CENTRAL VEIN CATHETERIZATION KIT
+"DATA",176.112,30861,1)
+309107^^Y
+"DATA",176.112,30862,0)
+4001791^CENTRUM TAB
+"DATA",176.112,30862,1)
+309108^^Y
+"DATA",176.112,30863,0)
+4001795^CENTURION A-Z TAB
+"DATA",176.112,30863,1)
+309109^^Y
+"DATA",176.112,30864,0)
+4001823^CERTAGEN TAB
+"DATA",176.112,30864,1)
+309126^^Y
+"DATA",176.112,30865,0)
+4014485^CETAPHIL GENTLE SKIN CLEANSER
+"DATA",176.112,30865,1)
+309128^^Y
+"DATA",176.112,30866,0)
+4012618^CETYLPYRIDINIUM CL/CHLOROPHYL COPPER COMPLEX (ALC F) MOUTHWASH
+"DATA",176.112,30866,1)
+309138^^Y
+"DATA",176.112,30867,0)
+4009144^CETYLPYRIDINIUM CL/CHLOROXYLENOL/HC 0.5%/TRIACETIN CREAM,TOP
+"DATA",176.112,30867,1)
+309139^^Y
+"DATA",176.112,30868,0)
+4010398^CHARCOAL 60ML #4/IPECAC SYRUP 30ML/KIT
+"DATA",176.112,30868,1)
+309144^^Y
+"DATA",176.112,30869,0)
+4009181^CHEK-STIX (URINALYSIS CONTROL) TEST STRIP
+"DATA",176.112,30869,1)
+309152^^Y
+"DATA",176.112,30870,0)
+4009203^CHEMSTRIP 2 GP (GLUCOSE,PROTEIN) TEST STRIP
+"DATA",176.112,30870,1)
+309153^^Y
+"DATA",176.112,30871,0)
+4009192^CHEMSTRIP 2LN (LEUKOCYTES,NITRITE) TEST STRIP
+"DATA",176.112,30871,1)
+309154^^Y
+"DATA",176.112,30872,0)
+4009356^CHEMSTRIP 4 THE OB (MULTIPLE) TEST STRIP
+"DATA",176.112,30872,1)
+309155^^Y
+"DATA",176.112,30873,0)
+4009357^CHEMSTRIP 6 (MULTIPLE) TEST STRIP
+"DATA",176.112,30873,1)
+309156^^Y
+"DATA",176.112,30874,0)
+4009358^CHEMSTRIP 7 (MULTIPLE) TEST STRIP
+"DATA",176.112,30874,1)
+309157^^Y
+"DATA",176.112,30875,0)
+4009359^CHEMSTRIP 8 (MULTIPLE) TEST STRIP
+"DATA",176.112,30875,1)
+309158^^Y
+"DATA",176.112,30876,0)
+4009187^CHEMSTRIP 9 (MULTIPLE) TEST STRIP
+"DATA",176.112,30876,1)
+309159^^Y
+"DATA",176.112,30877,0)
+4008491^CHEMSTRIP BG (GLUCOSE) TEST KIT
+"DATA",176.112,30877,1)
+309160^^Y
+"DATA",176.112,30878,0)
+4008488^CHEMSTRIP BG (GLUCOSE) TEST STRIP
+"DATA",176.112,30878,1)
+309161^^Y
+"DATA",176.112,30879,0)
+4008501^CHEMSTRIP BG ACCU-CHEK/VISUAL TEST STRIP
+"DATA",176.112,30879,1)
+309162^^Y
+"DATA",176.112,30880,0)
+4008500^CHEMSTRIP BG GLUCOSE VISUAL TEST STRIP
+"DATA",176.112,30880,1)
+309163^^Y
+"DATA",176.112,30881,0)
+4008357^CHEMSTRIP K (KETONE) TEST STRIP
+"DATA",176.112,30881,1)
+309164^^Y
+"DATA",176.112,30882,0)
+4009207^CHEMSTRIP UGK (GLUCOSE,KETONE) TEST STRIP
+"DATA",176.112,30882,1)
+309165^^Y
+"DATA",176.112,30883,0)
+4009995^CHERALIN SYRUP
+"DATA",176.112,30883,1)
+309167^^Y
+"DATA",176.112,30884,0)
+4005827^CHLORAMPHENICOL 1%/DESOXYRIBONUCLEASE/FIBRINOLYSIN OINT,TOP
+"DATA",176.112,30884,1)
+309173^^Y
+"DATA",176.112,30885,0)
+4015073^CHLORHEXIDINE GLUCONATE 2%/ISOPROPYL ALCHOHOL 70% 3ML
+"DATA",176.112,30885,1)
+309184^^Y
+"DATA",176.112,30886,0)
+4009849^CHLORHEXIDINE GLUCONATE 4% LIQUID SPONGE BRUSH
+"DATA",176.112,30886,1)
+309185^^Y
+"DATA",176.112,30887,0)
+4008668^CHLORHEXIDINE GLUCONATE JELLY,TOP
+"DATA",176.112,30887,1)
+309187^^Y
+"DATA",176.112,30888,0)
+4010071^CHLOROBUTANOL/EDTA/POLYVINYL ALCOHOL 1.4% SOLN,OPH
+"DATA",176.112,30888,1)
+309189^^Y
+"DATA",176.112,30889,0)
+4012829^CHOICE DM LIQUID,BOTTLE,1000ML
+"DATA",176.112,30889,1)
+309262^^Y
+"DATA",176.112,30890,0)
+4009846^CHOLECALCIFEROL/FISH LIVER OIL OINT,TOP
+"DATA",176.112,30890,1)
+309264^^Y
+"DATA",176.112,30891,0)
+4009878^CHROMAGEN OB CAP
+"DATA",176.112,30891,1)
+309275^^Y
+"DATA",176.112,30892,0)
+4005051^CHYMOPAPAIN 12.5UNT/VIL INJ
+"DATA",176.112,30892,1)
+309283^^Y
+"DATA",176.112,30893,0)
+4010410^CINOXATE/ZINC OXIDE CREAM,TOP
+"DATA",176.112,30893,1)
+309303^^Y
+"DATA",176.112,30894,0)
+4007332^CIT AC/IPECAC 0.17MIN/K GUAIACOLSULF 44MG/PROMETH 5MG/NA CIT/5ML
+"DATA",176.112,30894,1)
+309312^^Y
+"DATA",176.112,30895,0)
+4013607^CLEANSER,PROSHIELD FOAM SPRAY,TOP
+"DATA",176.112,30895,1)
+309323^^Y
+"DATA",176.112,30896,0)
+4013606^CLEANSER,PROSHIELD SPRAY,TOP
+"DATA",176.112,30896,1)
+309324^^Y
+"DATA",176.112,30897,0)
+4010586^CLEANSING SHAMPOO
+"DATA",176.112,30897,1)
+309325^^Y
+"DATA",176.112,30898,0)
+4003479^CLINDAMYCIN PHOSPHATE PWDR
+"DATA",176.112,30898,1)
+309331^^Y
+"DATA",176.112,30899,0)
+4008485^CLINITEST SET (NOT FOR ORAL USE)
+"DATA",176.112,30899,1)
+309341^^Y
+"DATA",176.112,30900,0)
+4008484^CLINITEST TAB (NOT FOR ORAL USE)
+"DATA",176.112,30900,1)
+309342^^Y
+"DATA",176.112,30901,0)
+4014877^CLONIDINE HCL PWDR
+"DATA",176.112,30901,1)
+309361^^Y
+"DATA",176.112,30902,0)
+4004368^CLOTRIMAZOLE 1% CREAM/CLOTRIMAZOLE 500MG TAB,VAG
+"DATA",176.112,30902,1)
+309369^^Y
+"DATA",176.112,30903,0)
+4010336^COAL TAR 1%/ZINC OXIDE OINT,TOP
+"DATA",176.112,30903,1)
+309382^^Y
+"DATA",176.112,30904,0)
+4005588^COAL TAR 2% SOAP,TOP
+"DATA",176.112,30904,1)
+309389^^Y
+"DATA",176.112,30905,0)
+4012113^COAL TAR 5%/LASSAR PASTE,TOP
+"DATA",176.112,30905,1)
+309396^^Y
+"DATA",176.112,30906,0)
+4005574^COAL TAR EXTRACT 5% STICK,TOP
+"DATA",176.112,30906,1)
+309400^^Y
+"DATA",176.112,30907,0)
+4007607^COAL TAR/SALICYLIC ACID CREAM,TOP
+"DATA",176.112,30907,1)
+309404^^Y
+"DATA",176.112,30908,0)
+4014184^COCAINE HCL PWDR
+"DATA",176.112,30908,1)
+309408^^Y
+"DATA",176.112,30909,0)
+4012894^COCCIDIODIN 1:10 SKIN TEST
+"DATA",176.112,30909,1)
+309409^^Y
+"DATA",176.112,30910,0)
+4012893^COCCIDIODIN 1:100 SKIN TEST
+"DATA",176.112,30910,1)
+309410^^Y
+"DATA",176.112,30911,0)
+4009443^COD LIVER OIL TAB
+"DATA",176.112,30911,1)
+309412^^Y
+"DATA",176.112,30912,0)
+4004871^CODEINE 10MG/GLYCEROL,IODINATED 30MG/5ML (SF) LIQUID
+"DATA",176.112,30912,1)
+309426^^Y
+"DATA",176.112,30913,0)
+4007713^CODEINE 10MG/IPECAC 0.17MIN/K GUAIACOLSULF 44MG/PROMETH 5MG/5ML
+"DATA",176.112,30913,1)
+309429^^Y
+"DATA",176.112,30914,0)
+4007794^CODEINE 16MG/BI SUBSALICYLATE/KAOLIN/PECTIN/15ML SUSP
+"DATA",176.112,30914,1)
+309455^^Y
+"DATA",176.112,30915,0)
+4007747^CODEINE 1MG/APAP/ASA/CAFN/SALICYLAMIDE 30MG TAB
+"DATA",176.112,30915,1)
+309456^^Y
+"DATA",176.112,30916,0)
+4012121^COLD SORE LOTION
+"DATA",176.112,30916,1)
+309493^^Y
+"DATA",176.112,30917,0)
+4003488^COLESTIPOL HCL GRANULES,FLAVORED
+"DATA",176.112,30917,1)
+309498^^Y
+"DATA",176.112,30918,0)
+4008738^COLLADERM GEL,TOP
+"DATA",176.112,30918,1)
+309503^^Y
+"DATA",176.112,30919,0)
+4009176^COLLAGEN HEMOSTAT,ABSORBABLE 2.5CM X 5CM PAD
+"DATA",176.112,30919,1)
+309506^^Y
+"DATA",176.112,30920,0)
+4009177^COLLAGEN HEMOSTAT,ABSORBABLE 5CM X 8CM PAD
+"DATA",176.112,30920,1)
+309507^^Y
+"DATA",176.112,30921,0)
+4009178^COLLAGEN HEMOSTAT,ABSORBABLE 8CM X 10CM PAD
+"DATA",176.112,30921,1)
+309508^^Y
+"DATA",176.112,30922,0)
+4009762^COLLODION,FLEXIBLE,TOP
+"DATA",176.112,30922,1)
+309510^^Y
+"DATA",176.112,30923,0)
+4007385^COMBOMIN-4 INJ
+"DATA",176.112,30923,1)
+309511^^Y
+"DATA",176.112,30924,0)
+4009883^COMPLEAT MODIFIED LIQUID
+"DATA",176.112,30924,1)
+309512^^Y
+"DATA",176.112,30925,0)
+4009884^COMPLEAT MODIFIED LIQUID (CLOSED SYSTEM)
+"DATA",176.112,30925,1)
+309513^^Y
+"DATA",176.112,30926,0)
+4009881^COMPLEAT REGULAR FORMULA LIQUID
+"DATA",176.112,30926,1)
+309514^^Y
+"DATA",176.112,30927,0)
+4001796^COMPLETE TAB
+"DATA",176.112,30927,1)
+309515^^Y
+"DATA",176.112,30928,0)
+4007780^COMPOUND BENZOIN CONC LIQUID,TOP
+"DATA",176.112,30928,1)
+309516^^Y
+"DATA",176.112,30929,0)
+4007129^COPHENE-X CAP
+"DATA",176.112,30929,1)
+309531^^Y
+"DATA",176.112,30930,0)
+4007130^COPHENE-XP SYRUP
+"DATA",176.112,30930,1)
+309532^^Y
+"DATA",176.112,30931,0)
+4004356^COPPER SULFATE CRYSTALS
+"DATA",176.112,30931,1)
+309534^^Y
+"DATA",176.112,30932,0)
+4004357^COPPER SULFATE PWDR
+"DATA",176.112,30932,1)
+309535^^Y
+"DATA",176.112,30933,0)
+4012592^CORPAK PRO-MIX #22-9804 20GM/PKT PWDR
+"DATA",176.112,30933,1)
+309537^^Y
+"DATA",176.112,30934,0)
+4012593^CRITICARE HN LIQUID
+"DATA",176.112,30934,1)
+309545^^Y
+"DATA",176.112,30935,0)
+4013830^CURASOL WOUND DRESSING GEL,TOP
+"DATA",176.112,30935,1)
+309589^^Y
+"DATA",176.112,30936,0)
+4009266^CUTEMOL CREAM,TOP
+"DATA",176.112,30936,1)
+309590^^Y
+"DATA",176.112,30937,0)
+4001210^CYANIDE ANTIDOTE PACKAGE INJ
+"DATA",176.112,30937,1)
+309591^^Y
+"DATA",176.112,30938,0)
+4015260^CYCLOSPORINE (EON) 100MG CAP
+"DATA",176.112,30938,1)
+309627^^Y
+"DATA",176.112,30939,0)
+4014909^CYCLOSPORINE (GENGRAF) 100MG CAP
+"DATA",176.112,30939,1)
+309628^^Y
+"DATA",176.112,30940,0)
+4014908^CYCLOSPORINE (GENGRAF) 25MG CAP
+"DATA",176.112,30940,1)
+309629^^Y
+"DATA",176.112,30941,0)
+4015262^CYCLOSPORINE (SIDMAK) 100MG CAP
+"DATA",176.112,30941,1)
+309630^^Y
+"DATA",176.112,30942,0)
+4015261^CYCLOSPORINE (SIDMAK) 25MG CAP
+"DATA",176.112,30942,1)
+309631^^Y
+"DATA",176.112,30943,0)
+4009316^DACRIOSE SOLN,OPH,IRRG
+"DATA",176.112,30943,1)
+309639^^Y
+"DATA",176.112,30944,0)
+4001835^DAILY MULTIPLE VITAMIN W/IRON TAB
+"DATA",176.112,30944,1)
+309640^^Y
+"DATA",176.112,30945,0)
+4002117^DAILY MULTIPLE VITAMINS TAB
+"DATA",176.112,30945,1)
+309641^^Y
+"DATA",176.112,30946,0)
+4001871^DAILY MULTIVITAMIN TAB
+"DATA",176.112,30946,1)
+309642^^Y
+"DATA",176.112,30947,0)
+4002139^DECAVITAMIN TAB
+"DATA",176.112,30947,1)
+309651^^Y
+"DATA",176.112,30948,0)
+4010347^DEL-CLENS CLEANSER,TOP
+"DATA",176.112,30948,1)
+309660^^Y
+"DATA",176.112,30949,0)
+4006162^DELFLEX/DEXTROSE 1.5% SOLN
+"DATA",176.112,30949,1)
+309663^^Y
+"DATA",176.112,30950,0)
+4006163^DELFLEX/DEXTROSE 2.5% SOLN
+"DATA",176.112,30950,1)
+309664^^Y
+"DATA",176.112,30951,0)
+4006164^DELFLEX/DEXTROSE 4.25% SOLN
+"DATA",176.112,30951,1)
+309665^^Y
+"DATA",176.112,30952,0)
+4005825^DESOXYRIBONUCLEASE 15000UNT/FIBRINOLYSIN 25UNT/VIL SOLN,TOP
+"DATA",176.112,30952,1)
+309676^^Y
+"DATA",176.112,30953,0)
+4002837^DEXAMETHASONE ACETATE PWDR
+"DATA",176.112,30953,1)
+309689^^Y
+"DATA",176.112,30954,0)
+4002838^DEXAMETHASONE SODIUM PHOSPHATE PWDR
+"DATA",176.112,30954,1)
+309701^^Y
+"DATA",176.112,30955,0)
+4009668^DEXTRAN 70/EDTA/METHYLCELLULOSE/NACL SOLN,OPH
+"DATA",176.112,30955,1)
+309712^^Y
+"DATA",176.112,30956,0)
+4010400^DEXTRAN 70/HYDROXYPROPYL METHYLCELLULOSE SOLN,OPH
+"DATA",176.112,30956,1)
+309713^^Y
+"DATA",176.112,30957,0)
+4008473^DEXTRANOMER BEADS,TOP
+"DATA",176.112,30957,1)
+309717^^Y
+"DATA",176.112,30958,0)
+4009175^DEXTRO-CHEK LOW & HIGH CALIBRATORS
+"DATA",176.112,30958,1)
+309718^^Y
+"DATA",176.112,30959,0)
+4003114^DEXTROAMPHETAMINE ADIPATE 5MG/DEXTROAMPHETAMINE SO4 5MG TAB
+"DATA",176.112,30959,1)
+309720^^Y
+"DATA",176.112,30960,0)
+4004216^DEXTROSE 100% PWDR
+"DATA",176.112,30960,1)
+309765^^Y
+"DATA",176.112,30961,0)
+4005993^DEXTROSE 2.5%/ELECTROLYTE NO.11 SOLN
+"DATA",176.112,30961,1)
+309768^^Y
+"DATA",176.112,30962,0)
+4005954^DEXTROSE 2.5%/HALF STRENGTH LACTATED RINGER'S INJ
+"DATA",176.112,30962,1)
+309769^^Y
+"DATA",176.112,30963,0)
+4005972^DEXTROSE 38%/ELECTROLYTES (PATTERN T) INJ
+"DATA",176.112,30963,1)
+309776^^Y
+"DATA",176.112,30964,0)
+4005957^DEXTROSE 4%/MODIFIED LACTATED RINGER'S INJ
+"DATA",176.112,30964,1)
+309777^^Y
+"DATA",176.112,30965,0)
+4005991^DEXTROSE 4%/ELECTROLYTE 27 INJ
+"DATA",176.112,30965,1)
+309777^^Y
+"DATA",176.112,30966,0)
+4005958^DEXTROSE 5%/HALF STRENGTH RINGER'S INJ
+"DATA",176.112,30966,1)
+309781^^Y
+"DATA",176.112,30967,0)
+4007403^DEXTROSE 5%/LACTATED RINGER'S/KCL 20MEQ/L INJ
+"DATA",176.112,30967,1)
+309788^^Y
+"DATA",176.112,30968,0)
+4005970^DEXTROSE 50%/ELECTROLYTES (PATTERN B) INJ
+"DATA",176.112,30968,1)
+309812^^Y
+"DATA",176.112,30969,0)
+4009520^DEXTROSE/FRUCTOSE/PHOSPHORIC ACID SOLN,ORAL
+"DATA",176.112,30969,1)
+309814^^Y
+"DATA",176.112,30970,0)
+4008479^DEXTROSTIX (GLUCOSE) TEST STRIP
+"DATA",176.112,30970,1)
+309815^^Y
+"DATA",176.112,30971,0)
+4006147^DIANEAL 137/DEXTROSE 1.5% SOLN
+"DATA",176.112,30971,1)
+309817^^Y
+"DATA",176.112,30972,0)
+4006154^DIANEAL 137/DEXTROSE 2.5% SOLN
+"DATA",176.112,30972,1)
+309818^^Y
+"DATA",176.112,30973,0)
+4006148^DIANEAL 137/DEXTROSE 4.25% SOLN
+"DATA",176.112,30973,1)
+309819^^Y
+"DATA",176.112,30974,0)
+4006156^DIANEAL PD-1/DEXTROSE 4.25% SOLN
+"DATA",176.112,30974,1)
+309821^^Y
+"DATA",176.112,30975,0)
+4006159^DIANEAL PD-2/DEXTROSE 2.5% SOLN
+"DATA",176.112,30975,1)
+309823^^Y
+"DATA",176.112,30976,0)
+4006160^DIANEAL PD-2/DEXTROSE 4.25% SOLN
+"DATA",176.112,30976,1)
+309824^^Y
+"DATA",176.112,30977,0)
+4009851^DIAPARENE PERI-ANAL MEDICATED OINT,TOP
+"DATA",176.112,30977,1)
+309825^^Y
+"DATA",176.112,30978,0)
+4013314^DIASCAN (GLUCOSE) HIGH CONTROL SOLN
+"DATA",176.112,30978,1)
+309826^^Y
+"DATA",176.112,30979,0)
+4013315^DIASCAN (GLUCOSE) LOW CONTROL SOLN
+"DATA",176.112,30979,1)
+309827^^Y
+"DATA",176.112,30980,0)
+4008480^DIASTIX (GLUCOSE) TEST STRIP
+"DATA",176.112,30980,1)
+309828^^Y
+"DATA",176.112,30981,0)
+4001548^DIATRIZOATE NA PWDR,ORAL
+"DATA",176.112,30981,1)
+309838^^Y
+"DATA",176.112,30982,0)
+4010494^DIBUCAINE/DIPERODON ANESTHETIC CREAM
+"DATA",176.112,30982,1)
+309848^^Y
+"DATA",176.112,30983,0)
+4007970^DIGESTIVE ENZYMES TAB,SA
+"DATA",176.112,30983,1)
+309880^^Y
+"DATA",176.112,30984,0)
+4007187^DIGESTIVE ENZYMES/HOMATROPINE 2.5MG/PHENOBARB 8MG TAB
+"DATA",176.112,30984,1)
+309881^^Y
+"DATA",176.112,30985,0)
+4013922^DIGOXIN 0.125MG TAB,UD (LANOXIN)
+"DATA",176.112,30985,1)
+309888^^Y
+"DATA",176.112,30986,0)
+4015935^DIGOXIN (LANOXIN) 0.125MG TAB
+"DATA",176.112,30986,1)
+309888^^Y
+"DATA",176.112,30987,0)
+4015936^DIGOXIN (LANOXIN) 0.25MG TAB
+"DATA",176.112,30987,1)
+309889^^Y
+"DATA",176.112,30988,0)
+4013927^DIGOXIN 0.25MG TAB,UD (LANOXIN)
+"DATA",176.112,30988,1)
+309889^^Y
+"DATA",176.112,30989,0)
+4013929^DILTIAZEM (CARDIZEM CD) 180MG SA CAP,UD
+"DATA",176.112,30989,1)
+309900^^Y
+"DATA",176.112,30990,0)
+4006676^DILTIAZEM (CARDIZEM CD) 180MG SA CAP
+"DATA",176.112,30990,1)
+309900^^Y
+"DATA",176.112,30991,0)
+4006677^DILTIAZEM (CARDIZEM CD) 240MG SA CAP
+"DATA",176.112,30991,1)
+309901^^Y
+"DATA",176.112,30992,0)
+4013930^DILTIAZEM (CARDIZEM CD) 240MG SA CAP,UD
+"DATA",176.112,30992,1)
+309901^^Y
+"DATA",176.112,30993,0)
+4014403^DILTIAZEM (CARDIZEM CD) 360MG SA CAP
+"DATA",176.112,30993,1)
+309902^^Y
+"DATA",176.112,30994,0)
+4013424^DILTIAZEM (TIAZAC) 240MG SA CAP,UD
+"DATA",176.112,30994,1)
+309903^^Y
+"DATA",176.112,30995,0)
+4006682^DILTIAZEM (TIAZAC) 240MG SA CAP
+"DATA",176.112,30995,1)
+309903^^Y
+"DATA",176.112,30996,0)
+4013253^DILTIAZEM (WATSON-XR) 120MG SA CAP
+"DATA",176.112,30996,1)
+309904^^Y
+"DATA",176.112,30997,0)
+4013251^DILTIAZEM (WATSON-XR) 180MG SA CAP
+"DATA",176.112,30997,1)
+309905^^Y
+"DATA",176.112,30998,0)
+4012888^DILUENT,STERILE FOR FLOLAN
+"DATA",176.112,30998,1)
+309908^^Y
+"DATA",176.112,30999,0)
+4010497^DIPERODON/VITAMIN A/VITAMIN D/ZINC OXIDE OINT
+"DATA",176.112,30999,1)
+309927^^Y
+"DATA",176.112,31000,0)
+4007987^DIPHTHERIA TOXOID,ADSORBED,EQUINE INJ,SUSP
+"DATA",176.112,31000,1)
+309946^^Y
+"DATA",176.112,31001,0)
+4002000^DIPHTHERIA TOXOID/TETANUS TOXOID 15UNT/0.5ML ADSORBED INJ
+"DATA",176.112,31001,1)
+309947^^Y
+"DATA",176.112,31002,0)
+4001998^DIPHTHERIA TOXOID/TETANUS TOXOID ADSORBED (PEDIATRIC) INJ
+"DATA",176.112,31002,1)
+309948^^Y
+"DATA",176.112,31003,0)
+4001999^DIPHTHERIA TOXOID/TETANUS TOXOID ADSORBED (ADULT) INJ
+"DATA",176.112,31003,1)
+309948^^Y
+"DATA",176.112,31004,0)
+4001997^DIPHTHERIA TOXOID/TETANUS TOXOID ADSORBED INJ
+"DATA",176.112,31004,1)
+309948^^Y
+"DATA",176.112,31005,0)
+4002291^DIPHTHERIA/TETANUS TOXOIDS/PERTUSSIS VACCINE INJ
+"DATA",176.112,31005,1)
+309949^^Y
+"DATA",176.112,31006,0)
+4010493^DIPROPYLENE GLYCOL SALICYLATE/HISTAMINE/METHYL NICOTINATE CREAM
+"DATA",176.112,31006,1)
+309951^^Y
+"DATA",176.112,31007,0)
+4008117^DM 15MG/DYPHYLLINE 100MG/PSEUDEFED 45MG LIQUID
+"DATA",176.112,31007,1)
+309975^^Y
+"DATA",176.112,31008,0)
+4009989^DOCUSATE NA 60MG/MINERAL OIL LIQUID
+"DATA",176.112,31008,1)
+310001^^Y
+"DATA",176.112,31009,0)
+4009555^DOMOL BATH & SHOWER OIL
+"DATA",176.112,31009,1)
+310008^^Y
+"DATA",176.112,31010,0)
+4010001^DOVERIN CAP
+"DATA",176.112,31010,1)
+310018^^Y
+"DATA",176.112,31011,0)
+4008731^DRYTERGENT
+"DATA",176.112,31011,1)
+310031^^Y
+"DATA",176.112,31012,0)
+4008732^DRYTEX LOTION
+"DATA",176.112,31012,1)
+310032^^Y
+"DATA",176.112,31013,0)
+4001867^DYNATRIM POWDER
+"DATA",176.112,31013,1)
+310037^^Y
+"DATA",176.112,31014,0)
+4008499^EASY (GLUCOSE) TEST STRIP
+"DATA",176.112,31014,1)
+310047^^Y
+"DATA",176.112,31015,0)
+4010419^EDTA 0.1%/POVIDONE SOLN,OPH
+"DATA",176.112,31015,1)
+310051^^Y
+"DATA",176.112,31016,0)
+4010565^EFFERDENT DENTURE CLEANER TAB,EFFERVSC
+"DATA",176.112,31016,1)
+310053^^Y
+"DATA",176.112,31017,0)
+4007795^ELECTROLYTE SOLN,IRRG
+"DATA",176.112,31017,1)
+310055^^Y
+"DATA",176.112,31018,0)
+4009393^EMUL-O-BALM LIQUID,TOP
+"DATA",176.112,31018,1)
+310062^^Y
+"DATA",176.112,31019,0)
+4014648^ENSURE ENLIVE LIQUID APPLE
+"DATA",176.112,31019,1)
+310074^^Y
+"DATA",176.112,31020,0)
+4014649^ENSURE ENLIVE LIQUID PEACH
+"DATA",176.112,31020,1)
+310075^^Y
+"DATA",176.112,31021,0)
+4010594^ENSURE LIQUID BLACK WALNUT
+"DATA",176.112,31021,1)
+310076^^Y
+"DATA",176.112,31022,0)
+4010595^ENSURE LIQUID STRAWBERRY
+"DATA",176.112,31022,1)
+310077^^Y
+"DATA",176.112,31023,0)
+4010600^ENSURE PLUS HN LIQUID CHOCOLATE
+"DATA",176.112,31023,1)
+310078^^Y
+"DATA",176.112,31024,0)
+4010601^ENSURE PLUS HN LIQUID TUBE FEEDING
+"DATA",176.112,31024,1)
+310079^^Y
+"DATA",176.112,31025,0)
+4010602^ENSURE PLUS HN LIQUID VANILLA
+"DATA",176.112,31025,1)
+310080^^Y
+"DATA",176.112,31026,0)
+4010604^ENSURE PLUS LIQUID CHOCOLATE
+"DATA",176.112,31026,1)
+310081^^Y
+"DATA",176.112,31027,0)
+4010605^ENSURE PLUS LIQUID COFFEE
+"DATA",176.112,31027,1)
+310082^^Y
+"DATA",176.112,31028,0)
+4010606^ENSURE PLUS LIQUID EGGNOG
+"DATA",176.112,31028,1)
+310083^^Y
+"DATA",176.112,31029,0)
+4010607^ENSURE PLUS LIQUID STRAWBERRY
+"DATA",176.112,31029,1)
+310084^^Y
+"DATA",176.112,31030,0)
+4010608^ENSURE PLUS LIQUID VANILLA
+"DATA",176.112,31030,1)
+310085^^Y
+"DATA",176.112,31031,0)
+4010610^ENSURE W/FIBER LIQUID CHOCOLATE
+"DATA",176.112,31031,1)
+310086^^Y
+"DATA",176.112,31032,0)
+4010609^ENSURE W/FIBER LIQUID VANILLA
+"DATA",176.112,31032,1)
+310087^^Y
+"DATA",176.112,31033,0)
+4010537^ENZYMATIC CLEANER (OPTI-FREE) TAB,OPH
+"DATA",176.112,31033,1)
+310088^^Y
+"DATA",176.112,31034,0)
+4010538^ENZYMATIC CLEANER (PANCREATIN) TAB,OPH,EFFERVSC
+"DATA",176.112,31034,1)
+310089^^Y
+"DATA",176.112,31035,0)
+4010393^ENZYMATIC CLEANER (PAPAIN) TAB,OPH
+"DATA",176.112,31035,1)
+310090^^Y
+"DATA",176.112,31036,0)
+4010490^ENZYMATIC CLEANER (SUBTILISIN A) TAB,OPH,EFFERVSC
+"DATA",176.112,31036,1)
+310091^^Y
+"DATA",176.112,31037,0)
+4010491^ENZYMATIC CLEANER (ULTRAZYME) TAB,OPH,EFFERVSC
+"DATA",176.112,31037,1)
+310092^^Y
+"DATA",176.112,31038,0)
+4014385^EPILYT LOTION,TOP
+"DATA",176.112,31038,1)
+310114^^Y
+"DATA",176.112,31039,0)
+4007904^EPINEPHRINE HCL 0.35MG/ZINC PHENOSULFONATE 1.45MG/IN CORD
+"DATA",176.112,31039,1)
+310128^^Y
+"DATA",176.112,31040,0)
+4003253^EPINEPHRINE HCL 0.5MG RETRACTION CORD
+"DATA",176.112,31040,1)
+310130^^Y
+"DATA",176.112,31041,0)
+4001599^ERYTHROMYCIN PWDR
+"DATA",176.112,31041,1)
+310164^^Y
+"DATA",176.112,31042,0)
+4014402^ESTRADIOL 0.025MG/DAY (CLIMARA) PATCH
+"DATA",176.112,31042,1)
+310170^^Y
+"DATA",176.112,31043,0)
+4001681^ESTRADIOL 0.025MG/DAY (FEMPATCH) PATCH
+"DATA",176.112,31043,1)
+310171^^Y
+"DATA",176.112,31044,0)
+4001676^ESTRADIOL 0.0375MG/DAY (VIVELLE) PATCH
+"DATA",176.112,31044,1)
+310172^^Y
+"DATA",176.112,31045,0)
+4013449^ESTRADIOL 0.05MG/DAY (ALORA) PATCH
+"DATA",176.112,31045,1)
+310173^^Y
+"DATA",176.112,31046,0)
+4013443^ESTRADIOL 0.05MG/DAY (CLIMARA) PATCH
+"DATA",176.112,31046,1)
+310174^^Y
+"DATA",176.112,31047,0)
+4013446^ESTRADIOL 0.05MG/DAY (ESTRADERM) PATCH
+"DATA",176.112,31047,1)
+310175^^Y
+"DATA",176.112,31048,0)
+4001677^ESTRADIOL 0.05MG/DAY (VIVELLE) PATCH
+"DATA",176.112,31048,1)
+310176^^Y
+"DATA",176.112,31049,0)
+4013450^ESTRADIOL 0.075MG/DAY (ALORA) PATCH
+"DATA",176.112,31049,1)
+310177^^Y
+"DATA",176.112,31050,0)
+4013444^ESTRADIOL 0.075MG/DAY (CLIMARA) PATCH
+"DATA",176.112,31050,1)
+310178^^Y
+"DATA",176.112,31051,0)
+4001678^ESTRADIOL 0.075MG/DAY (VIVELLE) PATCH
+"DATA",176.112,31051,1)
+310179^^Y
+"DATA",176.112,31052,0)
+4013451^ESTRADIOL 0.1MG/DAY (ALORA) PATCH
+"DATA",176.112,31052,1)
+310180^^Y
+"DATA",176.112,31053,0)
+4013445^ESTRADIOL 0.1MG/DAY (CLIMARA) PATCH
+"DATA",176.112,31053,1)
+310181^^Y
+"DATA",176.112,31054,0)
+4013447^ESTRADIOL 0.1MG/DAY (ESTRADERM) PATCH
+"DATA",176.112,31054,1)
+310182^^Y
+"DATA",176.112,31055,0)
+4001679^ESTRADIOL 0.1MG/DAY (VIVELLE) PATCH
+"DATA",176.112,31055,1)
+310183^^Y
+"DATA",176.112,31056,0)
+4001673^ESTRADIOL PWDR
+"DATA",176.112,31056,1)
+310188^^Y
+"DATA",176.112,31057,0)
+4007471^ETHYL CHLORIDE LIQUID
+"DATA",176.112,31057,1)
+310238^^Y
+"DATA",176.112,31058,0)
+4010577^EUCALYPTUS OIL/ME SALICYLATE/PEPPERMINT OIL/SALICYLIC AC LIQ,TOP
+"DATA",176.112,31058,1)
+310251^^Y
+"DATA",176.112,31059,0)
+4009728^EUCALYPTUS OIL/MENTHOL 15%/LANOLIN OINT
+"DATA",176.112,31059,1)
+310252^^Y
+"DATA",176.112,31060,0)
+4012137^EUCALYPTUS/MENTHOL/METHYL SALICYLATE/TRIETHANOLAMINE GEL,TOP
+"DATA",176.112,31060,1)
+310254^^Y
+"DATA",176.112,31061,0)
+4010189^EUCERIN BAR,TOP
+"DATA",176.112,31061,1)
+310255^^Y
+"DATA",176.112,31062,0)
+4010191^EUCERIN CLEANSING
+"DATA",176.112,31062,1)
+310256^^Y
+"DATA",176.112,31063,0)
+4008395^EUCERIN CREAM,TOP
+"DATA",176.112,31063,1)
+310257^^Y
+"DATA",176.112,31064,0)
+4010190^EUCERIN DAILY FACIAL
+"DATA",176.112,31064,1)
+310258^^Y
+"DATA",176.112,31065,0)
+4010188^EUCERIN LOTION,TOP
+"DATA",176.112,31065,1)
+310259^^Y
+"DATA",176.112,31066,0)
+4008507^EXACTECH (GLUCOSE) TEST STRIP
+"DATA",176.112,31066,1)
+310260^^Y
+"DATA",176.112,31067,0)
+4010580^EXTRA STRENGTH ABSORBINE JR LINIMENT
+"DATA",176.112,31067,1)
+310262^^Y
+"DATA",176.112,31068,0)
+4010210^EXTRA STRENGTH HAND & NAIL LOTION
+"DATA",176.112,31068,1)
+310263^^Y
+"DATA",176.112,31069,0)
+4009663^EYE-STREAM SOLN,OPH IRRG
+"DATA",176.112,31069,1)
+310264^^Y
+"DATA",176.112,31070,0)
+4014579^EYELID CLEANSER,EYE SCRUB PAD
+"DATA",176.112,31070,1)
+310265^^Y
+"DATA",176.112,31071,0)
+4009020^F D & C RED #3 2% LIQUID
+"DATA",176.112,31071,1)
+310266^^Y
+"DATA",176.112,31072,0)
+4010432^FACIAL CLEANSING BAR
+"DATA",176.112,31072,1)
+310267^^Y
+"DATA",176.112,31073,0)
+4005147^FACTOR IX COMPLEX,HUMAN INJ
+"DATA",176.112,31073,1)
+310268^^Y
+"DATA",176.112,31074,0)
+4013365^FAST TAKE (GLUCOSE) CONTROL SOLN
+"DATA",176.112,31074,1)
+310275^^Y
+"DATA",176.112,31075,0)
+4013366^FAST TAKE (GLUCOSE) METER
+"DATA",176.112,31075,1)
+310276^^Y
+"DATA",176.112,31076,0)
+4003978^FAST-PAK ANGIOGRAPHY KIT WITH MD 76
+"DATA",176.112,31076,1)
+310277^^Y
+"DATA",176.112,31077,0)
+4003930^FAST-PAK ANGIOGRAPHY KIT WITH VASCORAY
+"DATA",176.112,31077,1)
+310278^^Y
+"DATA",176.112,31078,0)
+4006076^FAT EMULSION (SAFFLOWER) 10% INJ
+"DATA",176.112,31078,1)
+310279^^Y
+"DATA",176.112,31079,0)
+4006077^FAT EMULSION (SAFFLOWER/SOYBEAN) 10% INJ
+"DATA",176.112,31079,1)
+310280^^Y
+"DATA",176.112,31080,0)
+4006078^FAT EMULSION (SAFFLOWER/SOYBEAN) 20% INJ
+"DATA",176.112,31080,1)
+310281^^Y
+"DATA",176.112,31081,0)
+4010449^FATTIBASE OINT
+"DATA",176.112,31081,1)
+310284^^Y
+"DATA",176.112,31082,0)
+4001864^FEMIRON VITAMIN TAB
+"DATA",176.112,31082,1)
+310287^^Y
+"DATA",176.112,31083,0)
+4009636^FERRALET PLUS TAB
+"DATA",176.112,31083,1)
+310298^^Y
+"DATA",176.112,31084,0)
+4009771^FERRIC SUBSULFATE (MONSEL'S) SOLN,TOP
+"DATA",176.112,31084,1)
+310302^^Y
+"DATA",176.112,31085,0)
+4009770^FERRIC SUBSULFATE PWDR
+"DATA",176.112,31085,1)
+310303^^Y
+"DATA",176.112,31086,0)
+4008876^FESTEX OINT,TOP
+"DATA",176.112,31086,1)
+310331^^Y
+"DATA",176.112,31087,0)
+4012476^FIBERMED HIGH-FIBER MINIATURE FRUIT
+"DATA",176.112,31087,1)
+310338^^Y
+"DATA",176.112,31088,0)
+4012475^FIBERMED HIGH-FIBER SUPPLEMENT FRUIT
+"DATA",176.112,31088,1)
+310339^^Y
+"DATA",176.112,31089,0)
+4009915^FIBERSOURCE HN LIQUID
+"DATA",176.112,31089,1)
+310340^^Y
+"DATA",176.112,31090,0)
+4009914^FIBERSOURCE LIQUID
+"DATA",176.112,31090,1)
+310341^^Y
+"DATA",176.112,31091,0)
+4012107^FIBRAD PWDR,ORAL
+"DATA",176.112,31091,1)
+310342^^Y
+"DATA",176.112,31092,0)
+4009772^FLAXSEED MEAL
+"DATA",176.112,31092,1)
+310348^^Y
+"DATA",176.112,31093,0)
+4005488^FLUORESCEIN NA 0.6MG STRIP,OPH
+"DATA",176.112,31093,1)
+310366^^Y
+"DATA",176.112,31094,0)
+4005489^FLUORESCEIN NA 1MG STRIP,OPH
+"DATA",176.112,31094,1)
+310368^^Y
+"DATA",176.112,31095,0)
+4005490^FLUORESCEIN NA 9MG STRIP,OPH
+"DATA",176.112,31095,1)
+310370^^Y
+"DATA",176.112,31096,0)
+4009154^FLUOSOL SOLUTION 1
+"DATA",176.112,31096,1)
+310382^^Y
+"DATA",176.112,31097,0)
+4009155^FLUOSOL SOLUTION 2
+"DATA",176.112,31097,1)
+310383^^Y
+"DATA",176.112,31098,0)
+4001797^FOSFREE TAB
+"DATA",176.112,31098,1)
+310420^^Y
+"DATA",176.112,31099,0)
+4006307^FREAMINE II KIT INJ
+"DATA",176.112,31099,1)
+310424^^Y
+"DATA",176.112,31100,0)
+4014952^FREESTYLE (GLUCOSE) TEST STRIP
+"DATA",176.112,31100,1)
+310425^^Y
+"DATA",176.112,31101,0)
+4005961^FRUCTOSE PWDR
+"DATA",176.112,31101,1)
+310426^^Y
+"DATA",176.112,31102,0)
+4003963^GALLIUM CITRATE (GA-67) 2MIL/ML INJ
+"DATA",176.112,31102,1)
+310439^^Y
+"DATA",176.112,31103,0)
+4014636^GARLIC OIL TAB,EC
+"DATA",176.112,31103,1)
+310443^^Y
+"DATA",176.112,31104,0)
+4007975^GELATIN 1.1%/GLYCERIN 29.7%/KARAYA 22.3%/ZN OXIDE 9.3% DRESSING
+"DATA",176.112,31104,1)
+310446^^Y
+"DATA",176.112,31105,0)
+4008605^GELATIN,ABSORBABLE 100MM X 125MM FILM
+"DATA",176.112,31105,1)
+310448^^Y
+"DATA",176.112,31106,0)
+4008610^GELATIN,ABSORBABLE PROSTATECTOMY CONE,SZ 13
+"DATA",176.112,31106,1)
+310449^^Y
+"DATA",176.112,31107,0)
+4008611^GELATIN,ABSORBABLE PROSTATECTOMY CONE,SZ 18
+"DATA",176.112,31107,1)
+310450^^Y
+"DATA",176.112,31108,0)
+4008609^GELATIN,ABSORBABLE PWDR
+"DATA",176.112,31108,1)
+310451^^Y
+"DATA",176.112,31109,0)
+4008612^GELATIN,ABSORBABLE SPONGE,2CM
+"DATA",176.112,31109,1)
+310452^^Y
+"DATA",176.112,31110,0)
+4008607^GELATIN,ABSORBABLE SPONGE,DENTAL SIZE 2
+"DATA",176.112,31110,1)
+310453^^Y
+"DATA",176.112,31111,0)
+4008608^GELATIN,ABSORBABLE SPONGE,DENTAL SIZE 4
+"DATA",176.112,31111,1)
+310454^^Y
+"DATA",176.112,31112,0)
+4008617^GELATIN,ABSORBABLE SPONGE,SZ 100
+"DATA",176.112,31112,1)
+310455^^Y
+"DATA",176.112,31113,0)
+4008614^GELATIN,ABSORBABLE SPONGE,SZ 12,3MM
+"DATA",176.112,31113,1)
+310456^^Y
+"DATA",176.112,31114,0)
+4008618^GELATIN,ABSORBABLE SPONGE,SZ 200
+"DATA",176.112,31114,1)
+310457^^Y
+"DATA",176.112,31115,0)
+4008616^GELATIN,ABSORBABLE SPONGE,SZ 50
+"DATA",176.112,31115,1)
+310458^^Y
+"DATA",176.112,31116,0)
+4002129^GEN-BEE W/C TAB
+"DATA",176.112,31116,1)
+310461^^Y
+"DATA",176.112,31117,0)
+4009924^GENALG CREME LINIMENT
+"DATA",176.112,31117,1)
+310462^^Y
+"DATA",176.112,31118,0)
+4004141^GENTAMICIN SULFATE PWDR
+"DATA",176.112,31118,1)
+310480^^Y
+"DATA",176.112,31119,0)
+4012619^GENTLE CREAM
+"DATA",176.112,31119,1)
+310483^^Y
+"DATA",176.112,31120,0)
+4012620^GERI SOFT LOTION
+"DATA",176.112,31120,1)
+310484^^Y
+"DATA",176.112,31121,0)
+4005364^GERIX ELIXIR
+"DATA",176.112,31121,1)
+310485^^Y
+"DATA",176.112,31122,0)
+4012091^GLUCERNA LIQUID TUBE FEEDING
+"DATA",176.112,31122,1)
+310500^^Y
+"DATA",176.112,31123,0)
+4013346^GLUCOFILM (GLUCOSE) HIGH CONTROL SOLN
+"DATA",176.112,31123,1)
+310501^^Y
+"DATA",176.112,31124,0)
+4013349^GLUCOFILM (GLUCOSE) LOW CONTROL SOLN
+"DATA",176.112,31124,1)
+310502^^Y
+"DATA",176.112,31125,0)
+4008493^GLUCOFILM (GLUCOSE) TEST STRIP
+"DATA",176.112,31125,1)
+310503^^Y
+"DATA",176.112,31126,0)
+4008516^GLUCOFILM NORMAL CONTROL SOLN
+"DATA",176.112,31126,1)
+310504^^Y
+"DATA",176.112,31127,0)
+4014018^GLUCOMETER DEX (GLUCOSE) HIGH CONTROL
+"DATA",176.112,31127,1)
+310505^^Y
+"DATA",176.112,31128,0)
+4014017^GLUCOMETER DEX (GLUCOSE) LOW CONTROL
+"DATA",176.112,31128,1)
+310506^^Y
+"DATA",176.112,31129,0)
+4014015^GLUCOMETER DEX (GLUCOSE) METER
+"DATA",176.112,31129,1)
+310507^^Y
+"DATA",176.112,31130,0)
+4014019^GLUCOMETER DEX (GLUCOSE) NORMAL CONTROL
+"DATA",176.112,31130,1)
+310508^^Y
+"DATA",176.112,31131,0)
+4014016^GLUCOMETER DEX (GLUCOSE) TEST STRIP
+"DATA",176.112,31131,1)
+310509^^Y
+"DATA",176.112,31132,0)
+4012926^GLUCOMETER ELITE HIGH CONTROL
+"DATA",176.112,31132,1)
+310511^^Y
+"DATA",176.112,31133,0)
+4012927^GLUCOMETER ELITE LOW CONTROL
+"DATA",176.112,31133,1)
+310512^^Y
+"DATA",176.112,31134,0)
+4008508^GLUCOMETER ENCORE (GLUCOSE) TEST STRIP
+"DATA",176.112,31134,1)
+310513^^Y
+"DATA",176.112,31135,0)
+4012924^GLUCOMETER ENCORE HIGH CONTROL
+"DATA",176.112,31135,1)
+310514^^Y
+"DATA",176.112,31136,0)
+4012925^GLUCOMETER ENCORE LOW CONTROL
+"DATA",176.112,31136,1)
+310515^^Y
+"DATA",176.112,31137,0)
+4012923^GLUCOMETER ENCORE NORMAL CONTROL
+"DATA",176.112,31137,1)
+310516^^Y
+"DATA",176.112,31138,0)
+4015487^GLUCOSE 24GM LIQUID,ORAL
+"DATA",176.112,31138,1)
+310517^^Y
+"DATA",176.112,31139,0)
+4010043^GLUCOSE 40%/LANOLIN/PETROLATUM OINT,OPH
+"DATA",176.112,31139,1)
+310518^^Y
+"DATA",176.112,31140,0)
+4008503^GLUCOSE CONTROL 2 LEVEL (ACCU-CHEK II,IIM,III) SOLN
+"DATA",176.112,31140,1)
+310521^^Y
+"DATA",176.112,31141,0)
+4008502^GLUCOSE CONTROL 2 LEVEL (TRACER/TRACER II) SOLN
+"DATA",176.112,31141,1)
+310522^^Y
+"DATA",176.112,31142,0)
+4008520^GLUCOSE CONTROL 2 LEVEL ADVANTAGE-H SOLN #986
+"DATA",176.112,31142,1)
+310523^^Y
+"DATA",176.112,31143,0)
+4008494^GLUCOSE CONTROL 2L ACCU-CHEK EASY SOLN
+"DATA",176.112,31143,1)
+310524^^Y
+"DATA",176.112,31144,0)
+4008505^GLUCOSE CONTROL 3 LEVEL (ACCU-CHEK EASY) SOLN
+"DATA",176.112,31144,1)
+310525^^Y
+"DATA",176.112,31145,0)
+4008504^GLUCOSE CONTROL 3 LEVEL (ACCU-CHEK II,IIM,III) SOLN
+"DATA",176.112,31145,1)
+310526^^Y
+"DATA",176.112,31146,0)
+4008517^GLUCOSTIX NORMAL CONTROL SOLN
+"DATA",176.112,31146,1)
+310527^^Y
+"DATA",176.112,31147,0)
+4009678^GLUTARALDEHYDE ACID,POTENTIATED LIQUID,INANIMATE
+"DATA",176.112,31147,1)
+310529^^Y
+"DATA",176.112,31148,0)
+4005033^GLYCERIN (ADULT) SUPP,RTL
+"DATA",176.112,31148,1)
+310540^^Y
+"DATA",176.112,31149,0)
+4005035^GLYCERIN (PEDIATRIC) SUPP,RTL
+"DATA",176.112,31149,1)
+310540^^Y
+"DATA",176.112,31150,0)
+4009115^GLYCERIN 1%/TETRAHYDROZOLINE 0.05%/BORIC AC/NA BORATE OPH,IRR
+"DATA",176.112,31150,1)
+310542^^Y
+"DATA",176.112,31151,0)
+4009553^GLYCERIN 10%/WITCH HAZEL 50% PAD
+"DATA",176.112,31151,1)
+310544^^Y
+"DATA",176.112,31152,0)
+4008306^GLYCERIN 50%/NA BICARBONATE 0.091%/NA CHLORIDE 0.166% SOLN
+"DATA",176.112,31152,1)
+310549^^Y
+"DATA",176.112,31153,0)
+4007281^GLYCERIN 50%/SODIUM CHLORIDE 0.9%/PHENOL 0.4% INJ
+"DATA",176.112,31153,1)
+310550^^Y
+"DATA",176.112,31154,0)
+4008020^GLYCERIN 8.6M (79.2%) SOLN
+"DATA",176.112,31154,1)
+310551^^Y
+"DATA",176.112,31155,0)
+4008019^GLYCERIN 8.6M CPD (79.2%) SOLN
+"DATA",176.112,31155,1)
+310551^^Y
+"DATA",176.112,31156,0)
+4005036^GLYCERIN CREAM,TOP
+"DATA",176.112,31156,1)
+310554^^Y
+"DATA",176.112,31157,0)
+4005034^GLYCERIN LIQUID
+"DATA",176.112,31157,1)
+310555^^Y
+"DATA",176.112,31158,0)
+4005039^GLYCERIN SUPP,VAG
+"DATA",176.112,31158,1)
+310556^^Y
+"DATA",176.112,31159,0)
+4011575^GLYCERIN/LEMON SWAB
+"DATA",176.112,31159,1)
+310557^^Y
+"DATA",176.112,31160,0)
+4010324^GLYCERIN/MINERAL OIL/PETROLATUM CREAM,TOP
+"DATA",176.112,31160,1)
+310558^^Y
+"DATA",176.112,31161,0)
+4010325^GLYCERIN/MINERAL OIL/PETROLATUM LOTION,TOP
+"DATA",176.112,31161,1)
+310559^^Y
+"DATA",176.112,31162,0)
+4010211^GLYCERIN/PETROLATUM/ZINC OXIDE LOTION
+"DATA",176.112,31162,1)
+310560^^Y
+"DATA",176.112,31163,0)
+4009768^GLYCERIN/PHENOL 0.3%/NA BICARB/NA BORATE MOUTHWASH
+"DATA",176.112,31163,1)
+310561^^Y
+"DATA",176.112,31164,0)
+4009449^GLYCERIN/ROSE WATER LIQUID,TOP
+"DATA",176.112,31164,1)
+310562^^Y
+"DATA",176.112,31165,0)
+4009448^GLYCERIN/ROSE WATER LOTION
+"DATA",176.112,31165,1)
+310563^^Y
+"DATA",176.112,31166,0)
+4008021^GLYCEROL 8.6M (79.2%) SOLN
+"DATA",176.112,31166,1)
+310564^^Y
+"DATA",176.112,31167,0)
+4010219^GLYCOLIC ACID SHAMPOO
+"DATA",176.112,31167,1)
+310577^^Y
+"DATA",176.112,31168,0)
+4010007^GLYCYRRHIZA FLUID EXTRACT
+"DATA",176.112,31168,1)
+310578^^Y
+"DATA",176.112,31169,0)
+4009774^GOLDEN SEAL PWDR
+"DATA",176.112,31169,1)
+310581^^Y
+"DATA",176.112,31170,0)
+4009664^GONIOSCOPIC PRISM SOLN,OPH
+"DATA",176.112,31170,1)
+310588^^Y
+"DATA",176.112,31171,0)
+4010045^GORDOBALM GEL,TOP
+"DATA",176.112,31171,1)
+310589^^Y
+"DATA",176.112,31172,0)
+4010046^GORDOMATIC CRYSTALS
+"DATA",176.112,31172,1)
+310590^^Y
+"DATA",176.112,31173,0)
+4010048^GORDOMATIC PWDR,TOP
+"DATA",176.112,31173,1)
+310591^^Y
+"DATA",176.112,31174,0)
+4014825^GRAFTSKIN 3IN(75MM) DIAMETER
+"DATA",176.112,31174,1)
+310593^^Y
+"DATA",176.112,31175,0)
+4006751^GRAMICIDIN/NEOMYCIN/NYSTATIN/TRIAMCINOLONE 0.1% CREAM,TOP
+"DATA",176.112,31175,1)
+310597^^Y
+"DATA",176.112,31176,0)
+4006750^GRAMICIDIN/NEOMYCIN/NYSTATIN/TRIAMCINOLONE 0.1% OINT,TOP
+"DATA",176.112,31176,1)
+310598^^Y
+"DATA",176.112,31177,0)
+4010010^GUAIACOL/MENTHOL/METHYL SALICYLATE CREAM,TOP
+"DATA",176.112,31177,1)
+310603^^Y
+"DATA",176.112,31178,0)
+4008649^HAMAMELIS WATER LIQUID,TOP
+"DATA",176.112,31178,1)
+310678^^Y
+"DATA",176.112,31179,0)
+4008392^HEALTH SAFE LOTION
+"DATA",176.112,31179,1)
+310689^^Y
+"DATA",176.112,31180,0)
+4012406^HEMA-CHEK (OCCULT BLOOD) SLIDE TEST
+"DATA",176.112,31180,1)
+310694^^Y
+"DATA",176.112,31181,0)
+4009182^HEMA-COMBISTIX (MULTIPLE) TEST STRIP
+"DATA",176.112,31181,1)
+310695^^Y
+"DATA",176.112,31182,0)
+4012407^HEMASTIX (OCCULT BLOOD) TEST STRIP
+"DATA",176.112,31182,1)
+310696^^Y
+"DATA",176.112,31183,0)
+4012405^HEMATEST TAB (NOT FOR ORAL USE)
+"DATA",176.112,31183,1)
+310697^^Y
+"DATA",176.112,31184,0)
+4002297^HEMOPHILUS B CONJUGATE VACCINE (TETANUS TOXOID CONJUGATE)
+"DATA",176.112,31184,1)
+310699^^Y
+"DATA",176.112,31185,0)
+4002295^HEMOPHILUS B POLYSACCHARIDE VACCINE 150MCG/NACL 0.9% INJ
+"DATA",176.112,31185,1)
+310701^^Y
+"DATA",176.112,31186,0)
+4008771^HEMORRHOIDAL OINT,RTL
+"DATA",176.112,31186,1)
+310703^^Y
+"DATA",176.112,31187,0)
+4008772^HEMORRHOIDAL SUPP,RTL
+"DATA",176.112,31187,1)
+310704^^Y
+"DATA",176.112,31188,0)
+4008775^HEMORRHOIDAL W/BENZOCAINE SUPP,RTL
+"DATA",176.112,31188,1)
+310705^^Y
+"DATA",176.112,31189,0)
+4007685^HEMORRHOIDAL-HC 1% OINT,RTL
+"DATA",176.112,31189,1)
+310706^^Y
+"DATA",176.112,31190,0)
+4003017^HEPATITIS B IMMUNE GLOBULIN (IM) INJ
+"DATA",176.112,31190,1)
+310749^^Y
+"DATA",176.112,31191,0)
+4003018^HEPATITIS B IMMUNE GLOBULIN (IM) INJ,SYRINGE,0.5ML
+"DATA",176.112,31191,1)
+310750^^Y
+"DATA",176.112,31192,0)
+4014097^HEPATITIS B IMMUNE GLOBULIN (NABI-HB) INJ,VIL,1ML
+"DATA",176.112,31192,1)
+310751^^Y
+"DATA",176.112,31193,0)
+4003026^HEPATITIS B VACCINE (RECOMBINANT) 20MCG/ML INJ,SYRINGE,1ML
+"DATA",176.112,31193,1)
+310754^^Y
+"DATA",176.112,31194,0)
+4003028^HEPATITIS B VACCINE (RECOMBINANT) 20MCG/ML INJ,SYRINGE-TL,1ML
+"DATA",176.112,31194,1)
+310755^^Y
+"DATA",176.112,31195,0)
+4004323^HEXACHLOROPHENE 3% SPONGE
+"DATA",176.112,31195,1)
+310762^^Y
+"DATA",176.112,31196,0)
+4004326^HEXACHLOROPHENE 480MG/UNT SPONGE
+"DATA",176.112,31196,1)
+310764^^Y
+"DATA",176.112,31197,0)
+4007633^HIGH ACETATE MULTIPLE ELECTROLYTE ADDITIVE INJ
+"DATA",176.112,31197,1)
+310770^^Y
+"DATA",176.112,31198,0)
+4008398^HYDROCERIN CREAM,TOP
+"DATA",176.112,31198,1)
+310790^^Y
+"DATA",176.112,31199,0)
+4002939^HYDROCORTISONE ACETONIDE PWDR
+"DATA",176.112,31199,1)
+310897^^Y
+"DATA",176.112,31200,0)
+4002945^HYDROCORTISONE ACETATE PWDR
+"DATA",176.112,31200,1)
+310897^^Y
+"DATA",176.112,31201,0)
+4002932^HYDROCORTISONE,NONSTERILE PWDR
+"DATA",176.112,31201,1)
+310901^^Y
+"DATA",176.112,31202,0)
+4010453^HYDROCREAM BASE
+"DATA",176.112,31202,1)
+310902^^Y
+"DATA",176.112,31203,0)
+4003282^HYDROMORPHONE HCL 1GM PWDR
+"DATA",176.112,31203,1)
+310913^^Y
+"DATA",176.112,31204,0)
+4003287^HYDROMORPHONE HCL 1MG/ML INJ,CARPUJECT,1ML
+"DATA",176.112,31204,1)
+310915^^Y
+"DATA",176.112,31205,0)
+4003288^HYDROMORPHONE HCL 2MG/ML INJ,CARPUJECT,1ML
+"DATA",176.112,31205,1)
+310917^^Y
+"DATA",176.112,31206,0)
+4014103^HYDROMORPHONE HCL 2MG/ML INJ,CARPUJECT,LUER LOCK,1ML
+"DATA",176.112,31206,1)
+310918^^Y
+"DATA",176.112,31207,0)
+4003289^HYDROMORPHONE HCL 4MG/ML INJ,CARPUJECT,1ML
+"DATA",176.112,31207,1)
+310921^^Y
+"DATA",176.112,31208,0)
+4003281^HYDROMORPHONE HCL CRYSTALS
+"DATA",176.112,31208,1)
+310923^^Y
+"DATA",176.112,31209,0)
+4009834^HYDROPHILIC OINT,TOP
+"DATA",176.112,31209,1)
+310924^^Y
+"DATA",176.112,31210,0)
+4009835^HYDROPHOR OINT,TOP
+"DATA",176.112,31210,1)
+310925^^Y
+"DATA",176.112,31211,0)
+4008366^HYDROXYETHYL CELLULOSE/POVIDONE 1.67% SOLN,OPH
+"DATA",176.112,31211,1)
+310930^^Y
+"DATA",176.112,31212,0)
+4002611^HYDROXYZINE HCL 25MG/ML INJ,CARPUJECT,1ML
+"DATA",176.112,31212,1)
+310937^^Y
+"DATA",176.112,31213,0)
+4002612^HYDROXYZINE HCL 50MG/ML INJ,CARPUJECT,1ML
+"DATA",176.112,31213,1)
+310940^^Y
+"DATA",176.112,31214,0)
+4002613^HYDROXYZINE HCL 50MG/ML INJ,CARPUJECT,2ML
+"DATA",176.112,31214,1)
+310941^^Y
+"DATA",176.112,31215,0)
+4008111^HYFED SYRUP
+"DATA",176.112,31215,1)
+310944^^Y
+"DATA",176.112,31216,0)
+4007791^HYOSCYAMINE/PASSION FLOWER/PHENOBARB 15MG/SCOPOLAMINE TAB
+"DATA",176.112,31216,1)
+310953^^Y
+"DATA",176.112,31217,0)
+4007618^HYOSCYAMUS/PASSIFLORA/PHENOBARB 16MG/THIAMINE/VALERIAN EXT TAB
+"DATA",176.112,31217,1)
+310956^^Y
+"DATA",176.112,31218,0)
+4006209^HYPERLYTE CR INJ
+"DATA",176.112,31218,1)
+310957^^Y
+"DATA",176.112,31219,0)
+4001842^I-L-X ELIXIR
+"DATA",176.112,31219,1)
+310958^^Y
+"DATA",176.112,31220,0)
+4012621^I.S.P. LOTION
+"DATA",176.112,31220,1)
+310959^^Y
+"DATA",176.112,31221,0)
+4005368^IBEROL-F TAB
+"DATA",176.112,31221,1)
+310961^^Y
+"DATA",176.112,31222,0)
+4007496^IBOGAINE HCL 100% MISCELLANEOUS
+"DATA",176.112,31222,1)
+310962^^Y
+"DATA",176.112,31223,0)
+4009687^ICE MINT CREAM,TOP
+"DATA",176.112,31223,1)
+310968^^Y
+"DATA",176.112,31224,0)
+4009354^ICTOTEST (BILIRUBIN) TAB (NOT FOR ORAL USE)
+"DATA",176.112,31224,1)
+310969^^Y
+"DATA",176.112,31225,0)
+4015226^IMMUNOCAL PWDR,PKT,10GM
+"DATA",176.112,31225,1)
+310983^^Y
+"DATA",176.112,31226,0)
+4014843^INFLUENZA SUBVIRON VACCINE,'00-'01,SYRINGE,0.5ML
+"DATA",176.112,31226,1)
+310995^^Y
+"DATA",176.112,31227,0)
+4014844^INFLUENZA SUBVIRON VACCINE,'00-'01,VIL,5ML
+"DATA",176.112,31227,1)
+310996^^Y
+"DATA",176.112,31228,0)
+4013835^INFLUENZA SUBVIRON VACCINE,'99-'00,SYRINGE,0.5ML
+"DATA",176.112,31228,1)
+310997^^Y
+"DATA",176.112,31229,0)
+4002019^INFLUENZA TRIVALENT SPLIT VIRUS VACCINE '95-'96,SYRINGE,0.5ML
+"DATA",176.112,31229,1)
+310998^^Y
+"DATA",176.112,31230,0)
+4002018^INFLUENZA TRIVALENT SPLIT VIRUS VACCINE '95-'96,VIAL,5ML
+"DATA",176.112,31230,1)
+310999^^Y
+"DATA",176.112,31231,0)
+4002020^INFLUENZA TRIVALENT SUBVIRON,'96-'97,SYRINGE,0.5ML
+"DATA",176.112,31231,1)
+311000^^Y
+"DATA",176.112,31232,0)
+4002021^INFLUENZA TRIVALENT SUBVIRON,'96-'97,VIL,5ML
+"DATA",176.112,31232,1)
+311001^^Y
+"DATA",176.112,31233,0)
+4002023^INFLUENZA TRIVALENT SUBVIRON,'98-'99,SYRINGE,0.5ML
+"DATA",176.112,31233,1)
+311002^^Y
+"DATA",176.112,31234,0)
+4002026^INFLUENZA TRIVALENT SUBVIRON,'98-'99,TUBEX,0.5ML
+"DATA",176.112,31234,1)
+311003^^Y
+"DATA",176.112,31235,0)
+4002024^INFLUENZA TRIVALENT SUBVIRON,'98-'99,VIL,5ML
+"DATA",176.112,31235,1)
+311004^^Y
+"DATA",176.112,31236,0)
+4002025^INFLUENZA TRIVALENT WHOLE VIRON,'98-'99,VIL,5ML
+"DATA",176.112,31236,1)
+311005^^Y
+"DATA",176.112,31237,0)
+4002022^INFLUENZA TRIVALENT WHOLE,'96-'97,VIAL,5ML
+"DATA",176.112,31237,1)
+311006^^Y
+"DATA",176.112,31238,0)
+4002017^INFLUENZA VIRUS VACCINE (SPLIT VIRUS),SYRINGE,0.5ML
+"DATA",176.112,31238,1)
+311007^^Y
+"DATA",176.112,31239,0)
+4002016^INFLUENZA VIRUS VACCINE (SPLIT VIRUS),VIL,5ML
+"DATA",176.112,31239,1)
+311008^^Y
+"DATA",176.112,31240,0)
+4002015^INFLUENZA VIRUS VACCINE,TRIVALENT TYPES A&B ('90-'91) INJ
+"DATA",176.112,31240,1)
+311009^^Y
+"DATA",176.112,31241,0)
+4014839^INFLUENZA WHOLE VIRON VACCINE,'00-'01,VIL,5ML
+"DATA",176.112,31241,1)
+311010^^Y
+"DATA",176.112,31242,0)
+4013836^INFLUENZA WHOLE VIRON VACCINE,'99-'00,VIL,5ML
+"DATA",176.112,31242,1)
+311011^^Y
+"DATA",176.112,31243,0)
+4006133^INPERSOL-LM/DEXTROSE 1.5% SOLN
+"DATA",176.112,31243,1)
+311012^^Y
+"DATA",176.112,31244,0)
+4006134^INPERSOL-LM/DEXTROSE 2.5% SOLN
+"DATA",176.112,31244,1)
+311013^^Y
+"DATA",176.112,31245,0)
+4006135^INPERSOL-LM/DEXTROSE 4.25% SOLN
+"DATA",176.112,31245,1)
+311014^^Y
+"DATA",176.112,31246,0)
+4006132^INPERSOL/DEXTROSE 4.25% SOLN
+"DATA",176.112,31246,1)
+311015^^Y
+"DATA",176.112,31247,0)
+4001478^INSULIN HUMULIN 50/50 (NPH/REG) INJ LILY
+"DATA",176.112,31247,1)
+311016^^Y
+"DATA",176.112,31248,0)
+4001493^INSULIN LENTE BEEF 100 U/ML INJ NOVO
+"DATA",176.112,31248,1)
+311018^^Y
+"DATA",176.112,31249,0)
+4001475^INSULIN LENTE HUMAN 100 U/ML IJ HUMULN L
+"DATA",176.112,31249,1)
+311019^^Y
+"DATA",176.112,31250,0)
+4001485^INSULIN LENTE HUMAN 100 U/ML IJ NOVOLN L
+"DATA",176.112,31250,1)
+311020^^Y
+"DATA",176.112,31251,0)
+4001474^INSULIN LENTE PUR PORK 100 U/ML INJ LILY
+"DATA",176.112,31251,1)
+311021^^Y
+"DATA",176.112,31252,0)
+4001489^INSULIN LENTE PUR PORK 100 U/ML INJ NOVO
+"DATA",176.112,31252,1)
+311022^^Y
+"DATA",176.112,31253,0)
+4001470^INSULIN NPH BEEF/PORK 100 U/ML INJ LILLY
+"DATA",176.112,31253,1)
+311025^^Y
+"DATA",176.112,31254,0)
+4001498^INSULIN NPH HUMULIN-N 100 U/ML INJ CARTRIDGE,1.5ML
+"DATA",176.112,31254,1)
+311026^^Y
+"DATA",176.112,31255,0)
+4001472^INSULIN NPH HUMAN 100 U/ML INJ HUMULIN N
+"DATA",176.112,31255,1)
+311026^^Y
+"DATA",176.112,31256,0)
+4013849^INSULIN NPH HUMULIN-N 100 U/ML INJ PEN 3ML
+"DATA",176.112,31256,1)
+311026^^Y
+"DATA",176.112,31257,0)
+4001483^INSULIN NPH HUMAN 100 U/ML INJ NOVOLIN N
+"DATA",176.112,31257,1)
+311027^^Y
+"DATA",176.112,31258,0)
+4013850^INSULIN NPH NOVOLIN-N 100 U/ML INJ PEN 3ML
+"DATA",176.112,31258,1)
+311027^^Y
+"DATA",176.112,31259,0)
+4001471^INSULIN NPH PURE PORK 100 U/ML INJ LILLY
+"DATA",176.112,31259,1)
+311030^^Y
+"DATA",176.112,31260,0)
+4001490^INSULIN NPH PURE PORK 100 U/ML INJ NOVO
+"DATA",176.112,31260,1)
+311031^^Y
+"DATA",176.112,31261,0)
+4001466^INSULIN REG BEEF/PORK 100 U/ML INJ LILLY
+"DATA",176.112,31261,1)
+311032^^Y
+"DATA",176.112,31262,0)
+4001481^INSULIN REG HUMAN 100 U/ML INJ NOVOLIN R
+"DATA",176.112,31262,1)
+311033^^Y
+"DATA",176.112,31263,0)
+4013851^INSULIN REGULAR NOVOLIN-R 100 U/ML PEN 3ML
+"DATA",176.112,31263,1)
+311033^^Y
+"DATA",176.112,31264,0)
+4001480^INSULIN REG HUMAN 100 U/ML INJ VELOSULIN
+"DATA",176.112,31264,1)
+311035^^Y
+"DATA",176.112,31265,0)
+4001497^INSULIN REG HUMULIN-R 100 U/ML CARTRIDGE,1.5ML
+"DATA",176.112,31265,1)
+311036^^Y
+"DATA",176.112,31266,0)
+4001469^INSULIN REG HUMULIN BUFFERED 100 U/ML INJ
+"DATA",176.112,31266,1)
+311036^^Y
+"DATA",176.112,31267,0)
+4001468^INSULIN REG HUMAN 100 U/ML INJ HUMULIN R
+"DATA",176.112,31267,1)
+311036^^Y
+"DATA",176.112,31268,0)
+4001491^INSULIN REGULAR PORK 100 U/ML INJ NOVO
+"DATA",176.112,31268,1)
+311038^^Y
+"DATA",176.112,31269,0)
+4001488^INSULIN REG PURE PORK 100 U/ML INJ NOVO
+"DATA",176.112,31269,1)
+311038^^Y
+"DATA",176.112,31270,0)
+4001494^INSULIN ULTRALENTE BEEF 100 U/ML IJ NOVO
+"DATA",176.112,31270,1)
+311039^^Y
+"DATA",176.112,31271,0)
+4001495^INSULIN,LISPRO,HUMAN 100 UNT/ML INJ,HUMALOG
+"DATA",176.112,31271,1)
+311044^^Y
+"DATA",176.112,31272,0)
+4013720^INTERFERON ALFACON-1 15MCG/0.5ML INJ,SYRINGE
+"DATA",176.112,31272,1)
+213084^^Y^INTERFERON ALFACON-1 15MCG/0.5ML INJ,SYRINGE_#1^Y
+"DATA",176.112,31273,0)
+4009444^INTRINSITINIC CAP
+"DATA",176.112,31273,1)
+311084^^Y
+"DATA",176.112,31274,0)
+4012092^INTROLITE LIQUID
+"DATA",176.112,31274,1)
+311085^^Y
+"DATA",176.112,31275,0)
+4005998^INVERT SUGAR 10%/MULTIPLE ELECTROLYTE #1 INJ
+"DATA",176.112,31275,1)
+311086^^Y
+"DATA",176.112,31276,0)
+4006000^INVERT SUGAR 10%/MULTIPLE ELECTROLYTE #2 INJ
+"DATA",176.112,31276,1)
+311087^^Y
+"DATA",176.112,31277,0)
+4005999^INVERT SUGAR 5%/MULTIPLE ELECTROLYTE #2 INJ
+"DATA",176.112,31277,1)
+311090^^Y
+"DATA",176.112,31278,0)
+4012420^IONAX AEROSOL 150GM
+"DATA",176.112,31278,1)
+311113^^Y
+"DATA",176.112,31279,0)
+4005996^IONOSOL G/INVERT SUGAR 10% INJ
+"DATA",176.112,31279,1)
+311114^^Y
+"DATA",176.112,31280,0)
+4003940^IOTHALAMATE MEGLUMINE 30% KIT
+"DATA",176.112,31280,1)
+311121^^Y
+"DATA",176.112,31281,0)
+4003929^IOTHALAMATE MEGLUMINE 52%/IOTHALAMATE NA 26% INJ
+"DATA",176.112,31281,1)
+311122^^Y
+"DATA",176.112,31282,0)
+4003936^IOTHALAMATE MEGLUMINE 60% KIT
+"DATA",176.112,31282,1)
+311123^^Y
+"DATA",176.112,31283,0)
+4003938^IOTHALAMATE NA 66.8% KIT
+"DATA",176.112,31283,1)
+311126^^Y
+"DATA",176.112,31284,0)
+4009329^IOTROLAN 240MG/ML INJ INTH
+"DATA",176.112,31284,1)
+311127^^Y
+"DATA",176.112,31285,0)
+4007422^IPECAC 0.17MIN/P-EPHRINE 5MG/K GUAIACOLSULF 44MG/PROMETH 5MG/5ML
+"DATA",176.112,31285,1)
+311136^^Y
+"DATA",176.112,31286,0)
+4001798^IROMIN-G TAB
+"DATA",176.112,31286,1)
+311141^^Y
+"DATA",176.112,31287,0)
+4001774^IRON/LIVER/VITAMINS INJ
+"DATA",176.112,31287,1)
+311145^^Y
+"DATA",176.112,31288,0)
+4005375^IRON/MULTIVITAMINS LIQUID
+"DATA",176.112,31288,1)
+311146^^Y
+"DATA",176.112,31289,0)
+4004150^IRRIGATING EYE SOLUTION
+"DATA",176.112,31289,1)
+311147^^Y
+"DATA",176.112,31290,0)
+4012856^ISOCAL HN (VANILLA) LIQUID,240ML
+"DATA",176.112,31290,1)
+311148^^Y
+"DATA",176.112,31291,0)
+4012853^ISOCAL LIQUID,CAN,240ML
+"DATA",176.112,31291,1)
+311149^^Y
+"DATA",176.112,31292,0)
+4012854^ISOCAL LIQUID,CAN,360ML
+"DATA",176.112,31292,1)
+311150^^Y
+"DATA",176.112,31293,0)
+4012855^ISOCAL LIQUID,CAN,960ML
+"DATA",176.112,31293,1)
+311151^^Y
+"DATA",176.112,31294,0)
+4007092^ISOLATE COMPOUND ELIXIR
+"DATA",176.112,31294,1)
+311163^^Y
+"DATA",176.112,31295,0)
+4006016^ISOLYTE H 900 CAL-HIGH CALORIE MAINTENANCE EL INJ
+"DATA",176.112,31295,1)
+311165^^Y
+"DATA",176.112,31296,0)
+4009888^ISOSOURCE HN LIQUID (CLOSED SYSTEM)
+"DATA",176.112,31296,1)
+311199^^Y
+"DATA",176.112,31297,0)
+4009889^ISOTEIN HN POWDER
+"DATA",176.112,31297,1)
+311201^^Y
+"DATA",176.112,31298,0)
+4012093^JEVITY LIQUID TUBE FEEDING
+"DATA",176.112,31298,1)
+311208^^Y
+"DATA",176.112,31299,0)
+4014098^JEVITY PLUS LIQUID TUBE FEEDING
+"DATA",176.112,31299,1)
+311209^^Y
+"DATA",176.112,31300,0)
+4013113^KAO LECTROLYTE PWDR,ORAL,BUBBLE GUM
+"DATA",176.112,31300,1)
+311216^^Y
+"DATA",176.112,31301,0)
+4013112^KAO LECTROLYTE PWDR,ORAL,UNFLAVORED
+"DATA",176.112,31301,1)
+311217^^Y
+"DATA",176.112,31302,0)
+4010454^KAOLIN PWDR
+"DATA",176.112,31302,1)
+311221^^Y
+"DATA",176.112,31303,0)
+4009460^KAOPECTOLIN W/PAREGORIC LIQUID
+"DATA",176.112,31303,1)
+311222^^Y
+"DATA",176.112,31304,0)
+4009688^KERI CREAM,TOP
+"DATA",176.112,31304,1)
+311225^^Y
+"DATA",176.112,31305,0)
+4009690^KERI FACIAL SOAP
+"DATA",176.112,31305,1)
+311226^^Y
+"DATA",176.112,31306,0)
+4009693^KERI LIGHT LOTION
+"DATA",176.112,31306,1)
+311227^^Y
+"DATA",176.112,31307,0)
+4009206^KETO-DIASTIX (GLUCOSE,KETONE) TEST STRIP
+"DATA",176.112,31307,1)
+311228^^Y
+"DATA",176.112,31308,0)
+4008356^KETOSTIX (KETONE) TEST STRIP
+"DATA",176.112,31308,1)
+311236^^Y
+"DATA",176.112,31309,0)
+4007782^KODONYL EXPECTORANT LIQUID,ORAL
+"DATA",176.112,31309,1)
+311238^^Y
+"DATA",176.112,31310,0)
+4009183^LABSTIX (MULTIPLE) TEST STRIP
+"DATA",176.112,31310,1)
+311243^^Y
+"DATA",176.112,31311,0)
+4009787^LACTIC ACID CREAM,TOP
+"DATA",176.112,31311,1)
+311255^^Y
+"DATA",176.112,31312,0)
+4009788^LACTIC ACID LOTION
+"DATA",176.112,31312,1)
+311257^^Y
+"DATA",176.112,31313,0)
+4006870^LACTOSE 100% CAP
+"DATA",176.112,31313,1)
+311259^^Y
+"DATA",176.112,31314,0)
+4006871^LACTOSE PWDR
+"DATA",176.112,31314,1)
+311261^^Y
+"DATA",176.112,31315,0)
+4010360^LANAPHILIC OINT,TOP
+"DATA",176.112,31315,1)
+311266^^Y
+"DATA",176.112,31316,0)
+4010361^LANAPHILIC W/UREA 10% OINT
+"DATA",176.112,31316,1)
+311267^^Y
+"DATA",176.112,31317,0)
+4010362^LANAPHILIC W/UREA 20% OINT
+"DATA",176.112,31317,1)
+311268^^Y
+"DATA",176.112,31318,0)
+4010019^LANNATES ELIXIR
+"DATA",176.112,31318,1)
+311269^^Y
+"DATA",176.112,31319,0)
+4009385^LANOLIN CREAM,TOP
+"DATA",176.112,31319,1)
+311270^^Y
+"DATA",176.112,31320,0)
+4009384^LANOLIN,HYDROUS CREAM,TOP
+"DATA",176.112,31320,1)
+311270^^Y
+"DATA",176.112,31321,0)
+4009387^LANOLIN,ANHYDROUS CREAM,TOP
+"DATA",176.112,31321,1)
+311271^^Y
+"DATA",176.112,31322,0)
+4009382^LANOLIN,ANHYDROUS OINT,TOP
+"DATA",176.112,31322,1)
+311272^^Y
+"DATA",176.112,31323,0)
+4008554^LANOLIN/MINERAL OIL 42.5%/PETROLATUM 55% (PF) OINT,OPH
+"DATA",176.112,31323,1)
+311274^^Y
+"DATA",176.112,31324,0)
+4010338^LANOLIN/MINERAL OIL/OXYBENZONE OIL,TOP
+"DATA",176.112,31324,1)
+311275^^Y
+"DATA",176.112,31325,0)
+4008552^LANOLIN/MINERAL OIL/PETROLATUM OINT,OPH
+"DATA",176.112,31325,1)
+311276^^Y
+"DATA",176.112,31326,0)
+4004398^LARYNGOTRACHEAL ANESTHESIA KIT
+"DATA",176.112,31326,1)
+311278^^Y
+"DATA",176.112,31327,0)
+4009791^LEAD ACETATE PWDR
+"DATA",176.112,31327,1)
+311279^^Y
+"DATA",176.112,31328,0)
+4009794^LEAD MONOXIDE PWDR
+"DATA",176.112,31328,1)
+311280^^Y
+"DATA",176.112,31329,0)
+4009278^LEVONORGESTREL 36MG/CAP X 6 IMPLANT
+"DATA",176.112,31329,1)
+311298^^Y
+"DATA",176.112,31330,0)
+4014279^LEVOTHYROXINE NA 0.05MG TAB,UD (SYNTHROID)
+"DATA",176.112,31330,1)
+311301^^Y
+"DATA",176.112,31331,0)
+4002337^LEVOTHYROXINE NA 0.05MG TAB (SYNTHROID)
+"DATA",176.112,31331,1)
+311301^^Y
+"DATA",176.112,31332,0)
+4002339^LEVOTHYROXINE NA 0.1MG TAB (SYNTHROID)
+"DATA",176.112,31332,1)
+311304^^Y
+"DATA",176.112,31333,0)
+4014509^LEVOTHYROXINE NA 0.1MG TAB,UD (SYNTHROID)
+"DATA",176.112,31333,1)
+311304^^Y
+"DATA",176.112,31334,0)
+4002344^LEVOTHYROXINE NA 0.2MG TAB (SYNTHROID)
+"DATA",176.112,31334,1)
+311305^^Y
+"DATA",176.112,31335,0)
+4014281^LEVOTHYROXINE NA 0.2MG TAB,UD (SYNTHROID)
+"DATA",176.112,31335,1)
+311305^^Y
+"DATA",176.112,31336,0)
+4009792^LICORICE COMPOUND PWDR
+"DATA",176.112,31336,1)
+311317^^Y
+"DATA",176.112,31337,0)
+4010378^LID WIPES-SPF PAD,OPH
+"DATA",176.112,31337,1)
+311318^^Y
+"DATA",176.112,31338,0)
+4004410^LIDOCAINE HCL PWDR
+"DATA",176.112,31338,1)
+311337^^Y
+"DATA",176.112,31339,0)
+4004409^LIDOCAINE PWDR
+"DATA",176.112,31339,1)
+311338^^Y
+"DATA",176.112,31340,0)
+4009694^LINDORA LIQUID,TOP
+"DATA",176.112,31340,1)
+311344^^Y
+"DATA",176.112,31341,0)
+4010028^LINOLENIC ACID 0.42ML CAP
+"DATA",176.112,31341,1)
+311348^^Y
+"DATA",176.112,31342,0)
+4014645^LIPISORB PWDR
+"DATA",176.112,31342,1)
+311351^^Y
+"DATA",176.112,31343,0)
+4010578^LIPOMUL EMULSION
+"DATA",176.112,31343,1)
+311352^^Y
+"DATA",176.112,31344,0)
+4008391^LOBANA BODY LOTION
+"DATA",176.112,31344,1)
+311360^^Y
+"DATA",176.112,31345,0)
+4012494^LONALAC POWDER,ORAL
+"DATA",176.112,31345,1)
+311366^^Y
+"DATA",176.112,31346,0)
+4009695^LOWILA CAKE SOAP
+"DATA",176.112,31346,1)
+311383^^Y
+"DATA",176.112,31347,0)
+4008645^LUBRICATING JELLY,TOP,PKT,3GM
+"DATA",176.112,31347,1)
+311389^^Y
+"DATA",176.112,31348,0)
+4008644^LUBRICATING JELLY,TOP
+"DATA",176.112,31348,1)
+311389^^Y
+"DATA",176.112,31349,0)
+4007976^LUNG DIFFUSION GAS
+"DATA",176.112,31349,1)
+311390^^Y
+"DATA",176.112,31350,0)
+4006206^LYPHOLYTE-II INJ
+"DATA",176.112,31350,1)
+311392^^Y
+"DATA",176.112,31351,0)
+4007542^M-TRACE 5 INJ
+"DATA",176.112,31351,1)
+311395^^Y
+"DATA",176.112,31352,0)
+4007543^M-TRACE 5 INJ,CONC
+"DATA",176.112,31352,1)
+311396^^Y
+"DATA",176.112,31353,0)
+4010316^M-TRACE TM 5 INJ
+"DATA",176.112,31353,1)
+311397^^Y
+"DATA",176.112,31354,0)
+4010317^M-TRACE TM 5 INJ,CONC
+"DATA",176.112,31354,1)
+311398^^Y
+"DATA",176.112,31355,0)
+4007538^M.T.E.-5 INJ
+"DATA",176.112,31355,1)
+311400^^Y
+"DATA",176.112,31356,0)
+4007539^M.T.E.-5 INJ,CONC
+"DATA",176.112,31356,1)
+311401^^Y
+"DATA",176.112,31357,0)
+4007544^M.T.E.-6 INJ
+"DATA",176.112,31357,1)
+311402^^Y
+"DATA",176.112,31358,0)
+4007545^M.T.E.-6 INJ,CONC
+"DATA",176.112,31358,1)
+311403^^Y
+"DATA",176.112,31359,0)
+4007536^M.T.E.-7 INJ
+"DATA",176.112,31359,1)
+311404^^Y
+"DATA",176.112,31360,0)
+4004345^MAFENIDE 6MG DENTAL CONE
+"DATA",176.112,31360,1)
+311405^^Y
+"DATA",176.112,31361,0)
+4012421^MAGNACAL NUTRITIONAL SUPPLEMENT LIQUID
+"DATA",176.112,31361,1)
+311416^^Y
+"DATA",176.112,31362,0)
+4012422^MAGNACAL RENAL LIQUID,CAN,240ML
+"DATA",176.112,31362,1)
+311417^^Y
+"DATA",176.112,31363,0)
+4009795^MAGNESIUM CARBONATE BLOCKS
+"DATA",176.112,31363,1)
+311421^^Y
+"DATA",176.112,31364,0)
+4009138^MAGNESIUM CITRATE LIQUID,ORAL
+"DATA",176.112,31364,1)
+311424^^Y
+"DATA",176.112,31365,0)
+4010452^MALT SOUP EXT 4GM/PSYLLIUM 3GM/5GM PWDR
+"DATA",176.112,31365,1)
+311438^^Y
+"DATA",176.112,31366,0)
+4009628^MALT SOUP EXTRACT LIQUID
+"DATA",176.112,31366,1)
+311439^^Y
+"DATA",176.112,31367,0)
+4009648^MAMMOL OINT,TOP
+"DATA",176.112,31367,1)
+311440^^Y
+"DATA",176.112,31368,0)
+4007480^MANDEL'S SOLN,TOP
+"DATA",176.112,31368,1)
+311441^^Y
+"DATA",176.112,31369,0)
+4007947^MANN HEMOSTATIC
+"DATA",176.112,31369,1)
+311445^^Y
+"DATA",176.112,31370,0)
+4010354^MASSENGILL DISPOSABLE DOUCHE BELLE-MAI,VAG
+"DATA",176.112,31370,1)
+311455^^Y
+"DATA",176.112,31371,0)
+4010364^MASSENGILL DOUCHE LIQUID CONCENTRATE,VAG
+"DATA",176.112,31371,1)
+311456^^Y
+"DATA",176.112,31372,0)
+4010363^MASSENGILL DOUCHE POWDER,VAG
+"DATA",176.112,31372,1)
+311457^^Y
+"DATA",176.112,31373,0)
+4004859^MASSENGILL EXTRA MILD DOUCHE,VAG
+"DATA",176.112,31373,1)
+311458^^Y
+"DATA",176.112,31374,0)
+4001792^MATERNA PRENATAL TAB
+"DATA",176.112,31374,1)
+311459^^Y
+"DATA",176.112,31375,0)
+4009615^MAXEPA FISH OIL CONCENTRATE CAP
+"DATA",176.112,31375,1)
+311460^^Y
+"DATA",176.112,31376,0)
+4009634^MAXILUBE GEL,TOP
+"DATA",176.112,31376,1)
+311461^^Y
+"DATA",176.112,31377,0)
+4003016^MEASLES/MUMPS/RUBELLA VIRUS VACCINE,LIVE INJ
+"DATA",176.112,31377,1)
+311463^^Y
+"DATA",176.112,31378,0)
+4013604^MEDERMA GEL,TOP
+"DATA",176.112,31378,1)
+311475^^Y
+"DATA",176.112,31379,0)
+4014112^MEDISENSE 2 (GLUCOSE) TEST STRIP
+"DATA",176.112,31379,1)
+311477^^Y
+"DATA",176.112,31380,0)
+4001995^MENINGOCOCCAL POLYSACCHARIDE VACCINE GROUPS A & C COMB. INJ
+"DATA",176.112,31380,1)
+311490^^Y
+"DATA",176.112,31381,0)
+4009513^MENTHOL COMPOUND OINT,TOP
+"DATA",176.112,31381,1)
+311513^^Y
+"DATA",176.112,31382,0)
+4009504^MENTHOL GEL,TOP
+"DATA",176.112,31382,1)
+311514^^Y
+"DATA",176.112,31383,0)
+4009534^MENTHOL/METHYL SALICYLATE GEL,TOP
+"DATA",176.112,31383,1)
+311515^^Y
+"DATA",176.112,31384,0)
+4010481^MENTHOL/MINERAL OIL/VITAMIN A CREAM,TOP
+"DATA",176.112,31384,1)
+311516^^Y
+"DATA",176.112,31385,0)
+4009723^MENTHOL/PHENOL 0.05% LOTION
+"DATA",176.112,31385,1)
+311517^^Y
+"DATA",176.112,31386,0)
+4015464^MENTHOL/ZINC OXIDE PWDR,TOP
+"DATA",176.112,31386,1)
+311518^^Y
+"DATA",176.112,31387,0)
+4003231^MEPERIDINE HCL 10MG/ML INJ,PUMP-JET,30ML
+"DATA",176.112,31387,1)
+311521^^Y
+"DATA",176.112,31388,0)
+4014104^MEPERIDINE HCL 75MG/ML INJ,CARPUJECT,LUER LOCK,1ML
+"DATA",176.112,31388,1)
+311532^^Y
+"DATA",176.112,31389,0)
+4012974^MERETEK UBT BREATH TEST
+"DATA",176.112,31389,1)
+311543^^Y
+"DATA",176.112,31390,0)
+4009891^MERITENE LIQUID (CHOCOLATE)
+"DATA",176.112,31390,1)
+311544^^Y
+"DATA",176.112,31391,0)
+4009892^MERITENE LIQUID (EGG NOG)
+"DATA",176.112,31391,1)
+311545^^Y
+"DATA",176.112,31392,0)
+4009890^MERITENE LIQUID (VANILLA)
+"DATA",176.112,31392,1)
+311546^^Y
+"DATA",176.112,31393,0)
+4009896^MERITENE POWDER (EGG NOG)
+"DATA",176.112,31393,1)
+311547^^Y
+"DATA",176.112,31394,0)
+4009899^MERITENE POWDER (STRAWBERRY)
+"DATA",176.112,31394,1)
+311548^^Y
+"DATA",176.112,31395,0)
+4002579^METHENAMINE PWDR
+"DATA",176.112,31395,1)
+311617^^Y
+"DATA",176.112,31396,0)
+4002580^METHENAMINE TAB FOR TIMED BURNING (DO NOT TAKE)
+"DATA",176.112,31396,1)
+311618^^Y
+"DATA",176.112,31397,0)
+4006271^METHOXYFLURANE INHL
+"DATA",176.112,31397,1)
+311631^^Y
+"DATA",176.112,31398,0)
+4009799^METHYL ETHYL KETONE LIQUID
+"DATA",176.112,31398,1)
+311634^^Y
+"DATA",176.112,31399,0)
+4009220^METHYL SALICYLATE OINT,TOP
+"DATA",176.112,31399,1)
+311637^^Y
+"DATA",176.112,31400,0)
+4008782^METHYL SALICYLATE/TROLAMINE CREAM,TOP
+"DATA",176.112,31400,1)
+311638^^Y
+"DATA",176.112,31401,0)
+4012770^MEXSANA POWDER,TOP
+"DATA",176.112,31401,1)
+311687^^Y
+"DATA",176.112,31402,0)
+4005291^MICONAZOLE 200MG SUPP,3/MICONAZOLE 2% CREAM PAK
+"DATA",176.112,31402,1)
+311691^^Y
+"DATA",176.112,31403,0)
+4005288^MICONAZOLE NITRATE PWDR
+"DATA",176.112,31403,1)
+311696^^Y
+"DATA",176.112,31404,0)
+4012119^MICRO-BUMINTEST (ALBUMIN) TEST KIT
+"DATA",176.112,31404,1)
+311697^^Y
+"DATA",176.112,31405,0)
+4012866^MICROSTIX-3 (BACTERIURIA) TEST STRIP
+"DATA",176.112,31405,1)
+311699^^Y
+"DATA",176.112,31406,0)
+4009129^MINERAL OIL EMULSION
+"DATA",176.112,31406,1)
+311712^^Y
+"DATA",176.112,31407,0)
+4009122^MINERAL OIL JELLY,ORAL
+"DATA",176.112,31407,1)
+311713^^Y
+"DATA",176.112,31408,0)
+4009131^MINERAL OIL,LIGHT,TOP,BTL,10ML
+"DATA",176.112,31408,1)
+311716^^Y
+"DATA",176.112,31409,0)
+4008396^MINERAL OIL/MINERAL WAX/PETROLATUM CREAM,TOP
+"DATA",176.112,31409,1)
+311718^^Y
+"DATA",176.112,31410,0)
+4009371^MINERAL OIL/PETROLATUM CREAM,TOP
+"DATA",176.112,31410,1)
+311719^^Y
+"DATA",176.112,31411,0)
+4001779^MINERALS W/MULTIVITAMINS TAB
+"DATA",176.112,31411,1)
+311721^^Y
+"DATA",176.112,31412,0)
+4001834^MULTIVITAMINS W/MINERALS TAB
+"DATA",176.112,31412,1)
+311721^^Y
+"DATA",176.112,31413,0)
+4001800^MISSION PRENATAL F.A. TAB
+"DATA",176.112,31413,1)
+311728^^Y
+"DATA",176.112,31414,0)
+4001801^MISSION PRENATAL H.P. TAB
+"DATA",176.112,31414,1)
+311729^^Y
+"DATA",176.112,31415,0)
+4001802^MISSION PRENATAL RX TAB
+"DATA",176.112,31415,1)
+311730^^Y
+"DATA",176.112,31416,0)
+4008215^MODEL SP5800 #8 INTRODUCER KIT
+"DATA",176.112,31416,1)
+311733^^Y
+"DATA",176.112,31417,0)
+4008387^MOISTURE DERM LOTION
+"DATA",176.112,31417,1)
+311736^^Y
+"DATA",176.112,31418,0)
+4010328^MOISTURIN LOTION
+"DATA",176.112,31418,1)
+311737^^Y
+"DATA",176.112,31419,0)
+4010397^MOISTURIZING LOTION
+"DATA",176.112,31419,1)
+311738^^Y
+"DATA",176.112,31420,0)
+4009836^MONOBASE CREAM,TOP
+"DATA",176.112,31420,1)
+311755^^Y
+"DATA",176.112,31421,0)
+4010052^MONOCHLOROACETIC ACID CRYSTALS
+"DATA",176.112,31421,1)
+311757^^Y
+"DATA",176.112,31422,0)
+4013078^MONOCTANOIN SOLUTION
+"DATA",176.112,31422,1)
+311758^^Y
+"DATA",176.112,31423,0)
+4001011^MORPHINE SO4 1MG/ML INJ,MIN-I-JET W/INLNK,10ML
+"DATA",176.112,31423,1)
+311773^^Y
+"DATA",176.112,31424,0)
+4001014^MORPHINE SO4 25MG/ML (PF) INJ,SELECT-A-JET,10ML
+"DATA",176.112,31424,1)
+311776^^Y
+"DATA",176.112,31425,0)
+4001005^MORPHINE SULFATE PWDR
+"DATA",176.112,31425,1)
+311786^^Y
+"DATA",176.112,31426,0)
+4007387^MULTE-PAK-4 INJ
+"DATA",176.112,31426,1)
+311788^^Y
+"DATA",176.112,31427,0)
+4009627^MULTE-PAK-5 INJ
+"DATA",176.112,31427,1)
+311789^^Y
+"DATA",176.112,31428,0)
+4006207^MULTILYTE-20 CONC INJ
+"DATA",176.112,31428,1)
+311791^^Y
+"DATA",176.112,31429,0)
+4007632^MULTIPLE ELECTROLYTE ADDITIVE INJ
+"DATA",176.112,31429,1)
+311792^^Y
+"DATA",176.112,31430,0)
+4007634^MULTIPLE ELECTROLYTE ADDITIVE INJ,CONC
+"DATA",176.112,31430,1)
+311793^^Y
+"DATA",176.112,31431,0)
+4007540^MULTIPLE TRACE ELEMENT W/SELENIUM INJ
+"DATA",176.112,31431,1)
+311794^^Y
+"DATA",176.112,31432,0)
+4007541^MULTIPLE TRACE ELEMENT W/SELENIUM INJ,CONC
+"DATA",176.112,31432,1)
+311795^^Y
+"DATA",176.112,31433,0)
+4009193^MULTISTIX (MULTIPLE) TEST STRIP
+"DATA",176.112,31433,1)
+311796^^Y
+"DATA",176.112,31434,0)
+4009184^MULTISTIX 10 SG (MULTIPLE) TEST STRIP
+"DATA",176.112,31434,1)
+311797^^Y
+"DATA",176.112,31435,0)
+4009191^MULTISTIX 2 (LEUKOCYTES,NITRITE) TEST STRIP
+"DATA",176.112,31435,1)
+311798^^Y
+"DATA",176.112,31436,0)
+4009190^MULTISTIX 7 (MULTIPLE) TEST STRIP
+"DATA",176.112,31436,1)
+311799^^Y
+"DATA",176.112,31437,0)
+4009189^MULTISTIX 8 SG (MULTIPLE) TEST STRIP
+"DATA",176.112,31437,1)
+311800^^Y
+"DATA",176.112,31438,0)
+4009186^MULTISTIX 9 (MULTIPLE) TEST STRIP
+"DATA",176.112,31438,1)
+311801^^Y
+"DATA",176.112,31439,0)
+4009185^MULTISTIX 9 SG (MULTIPLE) TEST STRIP
+"DATA",176.112,31439,1)
+311802^^Y
+"DATA",176.112,31440,0)
+4009195^MULTISTIX SG (FOR CLINI-TEK 10) TEST STRIP
+"DATA",176.112,31440,1)
+311803^^Y
+"DATA",176.112,31441,0)
+4009194^MULTISTIX SG (MULTIPLE) TEST STRIP
+"DATA",176.112,31441,1)
+311804^^Y
+"DATA",176.112,31442,0)
+4008150^MULTITEST CMI,SKIN TEST ANTIGENS
+"DATA",176.112,31442,1)
+311805^^Y
+"DATA",176.112,31443,0)
+4005127^MULTITRACE INJ
+"DATA",176.112,31443,1)
+311806^^Y
+"DATA",176.112,31444,0)
+4001852^MULTIVIT W/IRON DROPS,ORAL
+"DATA",176.112,31444,1)
+311807^^Y
+"DATA",176.112,31445,0)
+4002059^MULTIVITAMIN INJ,CONC
+"DATA",176.112,31445,1)
+311809^^Y
+"DATA",176.112,31446,0)
+4002058^MULTIVITAMIN,PEDIATRIC INJ
+"DATA",176.112,31446,1)
+311811^^Y
+"DATA",176.112,31447,0)
+4002074^MULTIVITAMIN,THERAPEUTIC CAP
+"DATA",176.112,31447,1)
+311812^^Y
+"DATA",176.112,31448,0)
+4001883^MULTIVITAMIN/MINERALS SENIOR FORMULA TAB
+"DATA",176.112,31448,1)
+311813^^Y
+"DATA",176.112,31449,0)
+4002112^MULTIVITAMINS (SF) DROPS,ORAL
+"DATA",176.112,31449,1)
+311814^^Y
+"DATA",176.112,31450,0)
+4002111^MULTIVITAMINS (SF) LIQUID
+"DATA",176.112,31450,1)
+311815^^Y
+"DATA",176.112,31451,0)
+4002137^MULTIVITAMINS CAP
+"DATA",176.112,31451,1)
+311816^^Y
+"DATA",176.112,31452,0)
+4001881^MULTIVITAMINS W/FLUORIDE 0.5MG TAB,CHEWABLE
+"DATA",176.112,31452,1)
+311818^^Y
+"DATA",176.112,31453,0)
+4002252^MULTIVITAMINS W/FLUORIDE 0.5MG/ML (SF) DROPS,ORAL
+"DATA",176.112,31453,1)
+311819^^Y
+"DATA",176.112,31454,0)
+4005374^MULTIVITAMINS W/IRON CAP
+"DATA",176.112,31454,1)
+311820^^Y
+"DATA",176.112,31455,0)
+4005359^MULTIVITAMINS W/IRON TAB
+"DATA",176.112,31455,1)
+311821^^Y
+"DATA",176.112,31456,0)
+4001858^MULTIVITAMINS W/IRON TAB,CHEWABLE
+"DATA",176.112,31456,1)
+311822^^Y
+"DATA",176.112,31457,0)
+4001863^MULTIVITAMINS W/MINERALS LIQUID
+"DATA",176.112,31457,1)
+311823^^Y
+"DATA",176.112,31458,0)
+4001778^MULTIVITAMINS W/MINERALS,HIGH POTENCY TAB
+"DATA",176.112,31458,1)
+311824^^Y
+"DATA",176.112,31459,0)
+4001776^MULTIVITAMINS W/MINERALS,PRENATAL TAB
+"DATA",176.112,31459,1)
+311825^^Y
+"DATA",176.112,31460,0)
+4015448^MULTIVITAMINS W/MINERALS,PRENATAL TAB,CHEWABLE
+"DATA",176.112,31460,1)
+311826^^Y
+"DATA",176.112,31461,0)
+4001780^MULTIVITAMINS W/MINERALS,THERAPEUTIC TAB
+"DATA",176.112,31461,1)
+311827^^Y
+"DATA",176.112,31462,0)
+4002090^MULTIVITAMINS,HIGH POTENCY CAP
+"DATA",176.112,31462,1)
+311828^^Y
+"DATA",176.112,31463,0)
+4002089^MULTIVITAMINS,HIGH POTENCY TAB
+"DATA",176.112,31463,1)
+311829^^Y
+"DATA",176.112,31464,0)
+4002098^MULTIVITAMINS,THERAPEUTIC LIQUID
+"DATA",176.112,31464,1)
+311830^^Y
+"DATA",176.112,31465,0)
+4002100^MULTIVITAMINS,THERAPEUTIC TAB
+"DATA",176.112,31465,1)
+311831^^Y
+"DATA",176.112,31466,0)
+4007356^MULTIVITAMINS/ETHINYL ESTRADIOL 0.01MG/ME-TESTOSTERONE 3MG CAP
+"DATA",176.112,31466,1)
+311832^^Y
+"DATA",176.112,31467,0)
+4001763^MULTIVITAMINS/FE FUMARATE 12MG/FLUORIDE 1MG/FA 0.3MG TAB,CHEW
+"DATA",176.112,31467,1)
+311833^^Y
+"DATA",176.112,31468,0)
+4005773^MULTIVITAMINS/FE FUMARATE 304MG/FA 1MG/DOSS 50MG TAB
+"DATA",176.112,31468,1)
+311834^^Y
+"DATA",176.112,31469,0)
+4005342^MULTIVITAMINS/FE FUMARATE 330MG/FA 0.5MG/LIVER CAP
+"DATA",176.112,31469,1)
+311835^^Y
+"DATA",176.112,31470,0)
+4002763^MULTIVITAMINS/FE FUMARATE 350MG/INTRINSIC FACTOR/DOSS 50MG TAB
+"DATA",176.112,31470,1)
+311836^^Y
+"DATA",176.112,31471,0)
+4001768^MULTIVITAMINS/FE FUMARATE 36MG/FLUORIDE 1MG/FA 0.3MG TAB,CHEW
+"DATA",176.112,31471,1)
+311837^^Y
+"DATA",176.112,31472,0)
+4005328^MULTIVITAMINS/FE FUMARATE 45MG/FA 1.5MG CAP
+"DATA",176.112,31472,1)
+311838^^Y
+"DATA",176.112,31473,0)
+4005339^MULTIVITAMINS/FE GLUCONATE 25MG INJ
+"DATA",176.112,31473,1)
+311839^^Y
+"DATA",176.112,31474,0)
+4001752^MULTIVITAMINS/FERROUS SO4 10MG/FLUORIDE 0.25MG/ML DROPS,ORAL
+"DATA",176.112,31474,1)
+311840^^Y
+"DATA",176.112,31475,0)
+4001754^MULTIVITAMINS/FERROUS SO4 10MG/FLUORIDE 0.5MG/ML DROPS,ORAL
+"DATA",176.112,31475,1)
+311841^^Y
+"DATA",176.112,31476,0)
+4007111^MULTIVITAMINS/FERROUS SO4 110MG/GLYCINE 175MG CAP
+"DATA",176.112,31476,1)
+311842^^Y
+"DATA",176.112,31477,0)
+4002250^MULTIVITAMINS/FLUORIDE 0.25MG/5ML LIQUID
+"DATA",176.112,31477,1)
+311843^^Y
+"DATA",176.112,31478,0)
+4002245^MULTIVITAMINS/FLUORIDE 0.25MG/FA 0.3MG TAB,CHEWABLE
+"DATA",176.112,31478,1)
+311844^^Y
+"DATA",176.112,31479,0)
+4002241^MULTIVITAMINS/FLUORIDE 0.25MG/ML DROPS,ORAL
+"DATA",176.112,31479,1)
+311845^^Y
+"DATA",176.112,31480,0)
+4002248^MULTIVITAMINS/FLUORIDE 0.5MG TAB
+"DATA",176.112,31480,1)
+311846^^Y
+"DATA",176.112,31481,0)
+4002238^MULTIVITAMINS/FLUORIDE 0.5MG TAB,CHEWABLE
+"DATA",176.112,31481,1)
+311847^^Y
+"DATA",176.112,31482,0)
+4002240^MULTIVITAMINS/FLUORIDE 0.5MG/0.6ML DROPS,ORAL
+"DATA",176.112,31482,1)
+311848^^Y
+"DATA",176.112,31483,0)
+4002243^MULTIVITAMINS/FLUORIDE 0.5MG/FA 0.3MG TAB,CHEWABLE
+"DATA",176.112,31483,1)
+311849^^Y
+"DATA",176.112,31484,0)
+4001879^MULTIVITAMINS/FLUORIDE 0.5MG/ML DROPS,ORAL
+"DATA",176.112,31484,1)
+311850^^Y
+"DATA",176.112,31485,0)
+4002239^MULTIVITAMINS/FLUORIDE 1MG TAB,CHEWABLE
+"DATA",176.112,31485,1)
+311851^^Y
+"DATA",176.112,31486,0)
+4002242^MULTIVITAMINS/FLUORIDE 1MG/FA 0.3MG TAB,CHEWABLE
+"DATA",176.112,31486,1)
+311852^^Y
+"DATA",176.112,31487,0)
+4002249^MULTIVITAMINS/FLUORIDE 1MG/ML DROPS,ORAL
+"DATA",176.112,31487,1)
+311853^^Y
+"DATA",176.112,31488,0)
+4001762^MULTIVITAMINS/IRON 10MG/FLUORIDE 0.5MG/ML DROPS,ORAL
+"DATA",176.112,31488,1)
+311854^^Y
+"DATA",176.112,31489,0)
+4005373^MULTIVITAMINS/IRON 10MG/ML (SF) DROPS,ORAL
+"DATA",176.112,31489,1)
+311855^^Y
+"DATA",176.112,31490,0)
+4002761^MULTIVITAMINS/IRON 115MG/FA 1MG/INTRINSIC FACTOR/DOSS 50MG TAB
+"DATA",176.112,31490,1)
+311856^^Y
+"DATA",176.112,31491,0)
+4001757^MULTIVITAMINS/IRON 12MG/FLUORIDE 0.5MG/FA 0.3MG TAB,CHEWABLE
+"DATA",176.112,31491,1)
+311857^^Y
+"DATA",176.112,31492,0)
+4001755^MULTIVITAMINS/IRON 12MG/FLUORIDE 1MG/FA 0.3MG TAB,CHEWABLE
+"DATA",176.112,31492,1)
+311858^^Y
+"DATA",176.112,31493,0)
+4005351^MULTIVITAMINS/IRON 60MG/FA 1MG TAB
+"DATA",176.112,31493,1)
+311859^^Y
+"DATA",176.112,31494,0)
+4007354^MULTIVITAMINS/ME-TESTOSTERONE 10MG CAP
+"DATA",176.112,31494,1)
+311860^^Y
+"DATA",176.112,31495,0)
+4014059^MULTIVITAMINS/MINERALS (PRENATAL-RX) TAB
+"DATA",176.112,31495,1)
+311861^^Y
+"DATA",176.112,31496,0)
+4001749^MULTIVITAMINS/MINERALS CAP
+"DATA",176.112,31496,1)
+311862^^Y
+"DATA",176.112,31497,0)
+4001760^MULTIVITAMINS/MINERALS ELIXIR
+"DATA",176.112,31497,1)
+311863^^Y
+"DATA",176.112,31498,0)
+4001877^MULTIVITAMINS/MINERALS PRENATAL TAB
+"DATA",176.112,31498,1)
+311864^^Y
+"DATA",176.112,31499,0)
+4001862^MINERALS/MULTIVITAMINS TAB
+"DATA",176.112,31499,1)
+311865^^Y
+"DATA",176.112,31500,0)
+4001747^MULTIVITAMINS/MINERALS TAB
+"DATA",176.112,31500,1)
+311865^^Y
+"DATA",176.112,31501,0)
+4001751^MULTIVITAMINS/MINERALS TAB,CHEWABLE
+"DATA",176.112,31501,1)
+311866^^Y
+"DATA",176.112,31502,0)
+4001750^MULTIVITAMINS/MINERALS,PRENATAL CAP
+"DATA",176.112,31502,1)
+311867^^Y
+"DATA",176.112,31503,0)
+4001748^MULTIVITAMINS/MINERALS,PRENATAL TAB
+"DATA",176.112,31503,1)
+311868^^Y
+"DATA",176.112,31504,0)
+4007498^MULTIVITAMINS/MINERALS,PRENATAL/DOSS 50MG TAB
+"DATA",176.112,31504,1)
+311869^^Y
+"DATA",176.112,31505,0)
+4006798^MULTIVITAMINS/MINERALS,PRENATAL/TESTOSTERONE TAB
+"DATA",176.112,31505,1)
+311870^^Y
+"DATA",176.112,31506,0)
+4001746^MULTIVITAMINS/MINERALS,THERAPEUTIC TAB
+"DATA",176.112,31506,1)
+311871^^Y
+"DATA",176.112,31507,0)
+4013978^MULTIVITAMINS/MINERALS,THERAPEUTIC TAB,UD
+"DATA",176.112,31507,1)
+311871^^Y
+"DATA",176.112,31508,0)
+4001769^MULTIVITAMINS/MINERALS/BONE MEAL TAB
+"DATA",176.112,31508,1)
+311872^^Y
+"DATA",176.112,31509,0)
+4002779^MULTIVITAMINS/MINERALS/INTRINSIC FACTOR 0.5UNT TAB
+"DATA",176.112,31509,1)
+311873^^Y
+"DATA",176.112,31510,0)
+4004634^MULTIVITAMINS/MINERALS/INTRINSIC FACTOR CAP
+"DATA",176.112,31510,1)
+311874^^Y
+"DATA",176.112,31511,0)
+4015140^MULTIVITS W/MINERALS TAB/CAP (NO VIT K)
+"DATA",176.112,31511,1)
+311875^^Y
+"DATA",176.112,31512,0)
+4012614^MUMPS SKIN TEST (MSTA) ANTIGEN INJ
+"DATA",176.112,31512,1)
+311876^^Y
+"DATA",176.112,31513,0)
+4009480^MYCOCIDE NS SOLN,TOP
+"DATA",176.112,31513,1)
+311879^^Y
+"DATA",176.112,31514,0)
+4009975^MYRRH TINCTURE
+"DATA",176.112,31514,1)
+311882^^Y
+"DATA",176.112,31515,0)
+4009205^N-MULTISTIX (FOR CLINI-TEK) TEST STRIP
+"DATA",176.112,31515,1)
+311883^^Y
+"DATA",176.112,31516,0)
+4009197^N-MULTISTIX (MULTIPLE) TEST STRIP
+"DATA",176.112,31516,1)
+311884^^Y
+"DATA",176.112,31517,0)
+4009199^N-MULTISTIX SG (FOR CLINI-TEK 10) TEST STRIP
+"DATA",176.112,31517,1)
+311885^^Y
+"DATA",176.112,31518,0)
+4009200^N-MULTISTIX SG (FOR CLINI-TEK) TEST STRIP
+"DATA",176.112,31518,1)
+311886^^Y
+"DATA",176.112,31519,0)
+4009198^N-MULTISTIX SG (MULTIPLE) TEST STRIP
+"DATA",176.112,31519,1)
+311887^^Y
+"DATA",176.112,31520,0)
+4005229^NELOVA 1/50 TAB,28
+"DATA",176.112,31520,1)
+311926^^Y
+"DATA",176.112,31521,0)
+4014651^NEOCATE ONE+ PWDR
+"DATA",176.112,31521,1)
+311927^^Y
+"DATA",176.112,31522,0)
+4001184^NEOMYCIN SO4 PWDR
+"DATA",176.112,31522,1)
+311934^^Y
+"DATA",176.112,31523,0)
+4007378^NEOTRACE-4 INJ
+"DATA",176.112,31523,1)
+311937^^Y
+"DATA",176.112,31524,0)
+4010343^NEPHRO-DERM CREAM,TOP
+"DATA",176.112,31524,1)
+311938^^Y
+"DATA",176.112,31525,0)
+4002162^NEPHRO-VITE RX TAB
+"DATA",176.112,31525,1)
+311939^^Y
+"DATA",176.112,31526,0)
+4014753^NEPHRO-VITE TAB
+"DATA",176.112,31526,1)
+311940^^Y
+"DATA",176.112,31527,0)
+4012094^NEPRO LIQUID VANILLA
+"DATA",176.112,31527,1)
+311941^^Y
+"DATA",176.112,31528,0)
+4013957^NIACIN (NIACOR) 500MG TAB
+"DATA",176.112,31528,1)
+311944^^Y
+"DATA",176.112,31529,0)
+4026158^NIACIN (NIASPAN) 1000MG TAB,SA
+"DATA",176.112,31529,1)
+311945^^Y
+"DATA",176.112,31530,0)
+4013955^NIACIN (NIASPAN-KOS) 1000MG TAB,SA
+"DATA",176.112,31530,1)
+311945^^Y
+"DATA",176.112,31531,0)
+4026156^NIACIN (NIASPAN) 500MG TAB,SA
+"DATA",176.112,31531,1)
+311946^^Y
+"DATA",176.112,31532,0)
+4013953^NIACIN (NIASPAN-KOS) 500MG TAB,SA
+"DATA",176.112,31532,1)
+311946^^Y
+"DATA",176.112,31533,0)
+4009957^NIACIN 250MG/RICE BRAN TAB,SA
+"DATA",176.112,31533,1)
+311956^^Y
+"DATA",176.112,31534,0)
+4009424^NIACIN/RIBOFLAVIN/THIAMINE PWDR,ORAL
+"DATA",176.112,31534,1)
+311964^^Y
+"DATA",176.112,31535,0)
+4009355^NITRAZINE (pH) TEST STRIP
+"DATA",176.112,31535,1)
+311987^^Y
+"DATA",176.112,31536,0)
+4010615^NIVEA AFTER SUN
+"DATA",176.112,31536,1)
+312024^^Y
+"DATA",176.112,31537,0)
+4010459^NONOXYNOL 1GM SPONGE,VAG
+"DATA",176.112,31537,1)
+312027^^Y
+"DATA",176.112,31538,0)
+4006015^NORMOSOL-M 900 CAL INJ
+"DATA",176.112,31538,1)
+312034^^Y
+"DATA",176.112,31539,0)
+4006018^NORMOSOL-R PH 7.4 INJ
+"DATA",176.112,31539,1)
+312035^^Y
+"DATA",176.112,31540,0)
+4006017^NORMOSOL-R INJ
+"DATA",176.112,31540,1)
+312035^^Y
+"DATA",176.112,31541,0)
+4009669^NURSOY LIQUID
+"DATA",176.112,31541,1)
+312038^^Y
+"DATA",176.112,31542,0)
+4013076^NUTRADERM CREAM,TOP
+"DATA",176.112,31542,1)
+312041^^Y
+"DATA",176.112,31543,0)
+4014565^NUTRIHEP LIQUID
+"DATA",176.112,31543,1)
+312042^^Y
+"DATA",176.112,31544,0)
+4006210^NUTRILYTE II INJ
+"DATA",176.112,31544,1)
+312043^^Y
+"DATA",176.112,31545,0)
+4007234^NUTRILYTE INJ
+"DATA",176.112,31545,1)
+312044^^Y
+"DATA",176.112,31546,0)
+4007233^NUTRILYTE NEONATAL INJ
+"DATA",176.112,31546,1)
+312045^^Y
+"DATA",176.112,31547,0)
+4007518^NUX VOMICA/PANCREATIN/PAPAIN/PEPSIN/PHENOBARB 16MG/NA BICARB TAB
+"DATA",176.112,31547,1)
+312046^^Y
+"DATA",176.112,31548,0)
+4001501^NYSTATIN 500000UNT/ORAL TAB/NYSTATIN 100000UNT/VAG TAB
+"DATA",176.112,31548,1)
+312060^^Y
+"DATA",176.112,31549,0)
+4001806^O-CAL FA TAB
+"DATA",176.112,31549,1)
+312062^^Y
+"DATA",176.112,31550,0)
+4010267^OATMEAL,COLLOIDAL CLEANSING BAR/DRY SKIN
+"DATA",176.112,31550,1)
+312067^^Y
+"DATA",176.112,31551,0)
+4009701^OCTYL METHOXYCINNAMATE/OCTYL SALICYLATE/OXYBENZONE SPF-29 LOTION
+"DATA",176.112,31551,1)
+312072^^Y
+"DATA",176.112,31552,0)
+4009700^OCTYL METHOXYCINNAMATE/OCTYL SALICYLATE/OXYBENZONE SPF-15 LOTION
+"DATA",176.112,31552,1)
+312072^^Y
+"DATA",176.112,31553,0)
+4010187^OCTYL METHOXYCINNAMATE/OXBENZONE/TITANIUM DIOXIDE CREAM,TOP
+"DATA",176.112,31553,1)
+312073^^Y
+"DATA",176.112,31554,0)
+4010341^OCUCLENZ OPH,IRRG
+"DATA",176.112,31554,1)
+312074^^Y
+"DATA",176.112,31555,0)
+4013514^ONE TOUCH (GLUCOSE) METER
+"DATA",176.112,31555,1)
+312088^^Y
+"DATA",176.112,31556,0)
+4008510^ONE TOUCH HIGH GLUCOSE CONTROL SOLN
+"DATA",176.112,31556,1)
+312089^^Y
+"DATA",176.112,31557,0)
+4008509^ONE TOUCH LOW GLUCOSE CONTROL SOLN
+"DATA",176.112,31557,1)
+312090^^Y
+"DATA",176.112,31558,0)
+4008512^ONE TOUCH NORMAL GLUCOSE CONTROL SOLN
+"DATA",176.112,31558,1)
+312091^^Y
+"DATA",176.112,31559,0)
+4014220^ONE TOUCH PROFILE (GLUCOSE) METER
+"DATA",176.112,31559,1)
+312092^^Y
+"DATA",176.112,31560,0)
+4015492^ONE TOUCH ULTRA (GLUCOSE) TEST STRIP
+"DATA",176.112,31560,1)
+312093^^Y
+"DATA",176.112,31561,0)
+4007447^OPIUM 1.2MG/BI HYDROXIDE/KAOLIN/PECTIN WAFER
+"DATA",176.112,31561,1)
+312094^^Y
+"DATA",176.112,31562,0)
+4006739^OPIUM 1.2MG/BI SUBGALLATE/KAOLIN/PECTIN/ZN PHENOLSULFONATE TAB
+"DATA",176.112,31562,1)
+312095^^Y
+"DATA",176.112,31563,0)
+4007510^OPIUM 1.2MG/BI SUBSALICYLATE/KAOLIN/PECTIN TAB
+"DATA",176.112,31563,1)
+312096^^Y
+"DATA",176.112,31564,0)
+4007519^OPIUM 14.8MG/BISMUTH/KAOLIN/PECTIN/K CITRATE/SALOL/30ML LIQ
+"DATA",176.112,31564,1)
+312098^^Y
+"DATA",176.112,31565,0)
+4007307^OPIUM 2.5MG/BI SUBSALICYLATE/PECTIN/ZN PHENOLSULFONATE/5ML LIQ
+"DATA",176.112,31565,1)
+312101^^Y
+"DATA",176.112,31566,0)
+4004707^OPIUM 24MG/B-DONNA 0.1296MG/KAOLIN/PECTIN/30ML SUSP
+"DATA",176.112,31566,1)
+312102^^Y
+"DATA",176.112,31567,0)
+4007506^OPIUM 3MG/BI SUBCARBONATE/KAOLIN/PECTIN CAP
+"DATA",176.112,31567,1)
+312105^^Y
+"DATA",176.112,31568,0)
+4010421^OPTIGENE EYE WASH
+"DATA",176.112,31568,1)
+312110^^Y
+"DATA",176.112,31569,0)
+4009807^ORRIS ROOT PWDR
+"DATA",176.112,31569,1)
+312114^^Y
+"DATA",176.112,31570,0)
+4010194^OSCILLOCOCCINUM PELLET
+"DATA",176.112,31570,1)
+312121^^Y
+"DATA",176.112,31571,0)
+4012096^OSMOLITE HN LIQUID
+"DATA",176.112,31571,1)
+312123^^Y
+"DATA",176.112,31572,0)
+4012889^OXYBENZONE/PABA (PRE-SUN 46) LOTION
+"DATA",176.112,31572,1)
+312151^^Y
+"DATA",176.112,31573,0)
+4010322^OXYBENZONE/PETROLATUM OINT,TOP
+"DATA",176.112,31573,1)
+312153^^Y
+"DATA",176.112,31574,0)
+4007379^P.T.E.-4 (PF) INJ
+"DATA",176.112,31574,1)
+312197^^Y
+"DATA",176.112,31575,0)
+4007537^P.T.E.-5 (PF) INJ
+"DATA",176.112,31575,1)
+312198^^Y
+"DATA",176.112,31576,0)
+4010339^PALADIN DIAPER RASH OINT,TOP
+"DATA",176.112,31576,1)
+312201^^Y
+"DATA",176.112,31577,0)
+4010502^PANTHENOL/VITAMIN A/VITAMIN D/VITAMIN E OINT,TOP
+"DATA",176.112,31577,1)
+312208^^Y
+"DATA",176.112,31578,0)
+4007755^PARA-AMINOBENZOIC ACID 5% LIPSTICK
+"DATA",176.112,31578,1)
+312224^^Y
+"DATA",176.112,31579,0)
+4007757^PARA-AMINOBENZOIC PWDR
+"DATA",176.112,31579,1)
+312226^^Y
+"DATA",176.112,31580,0)
+4010518^PARACHLOROMETOXYLENOL SKIN CLEANSER
+"DATA",176.112,31580,1)
+312229^^Y
+"DATA",176.112,31581,0)
+4007929^PARAFORMALDEHYDE 6.5%/TITANIUM DIOXIDE 4%/ZN OXIDE 84.5% PWDR
+"DATA",176.112,31581,1)
+312230^^Y
+"DATA",176.112,31582,0)
+4004032^PARALDEHYDE 98% LIQUID,RTL,ORAL
+"DATA",176.112,31582,1)
+312232^^Y
+"DATA",176.112,31583,0)
+4007511^PAREGORIC 3.75ML/BI SUBSALICYLATE/KAOLIN/PECTIN/30ML SUSP
+"DATA",176.112,31583,1)
+312236^^Y
+"DATA",176.112,31584,0)
+4006740^PAREGORIC 5MIN/BI SUBGALLATE/KAOLIN/PECTIN/ZN PHENOSULFONATE TAB
+"DATA",176.112,31584,1)
+312238^^Y
+"DATA",176.112,31585,0)
+4010526^PEDI-BATH SALTS
+"DATA",176.112,31585,1)
+312245^^Y
+"DATA",176.112,31586,0)
+4012098^PEDIASURE LIQUID VANILLA
+"DATA",176.112,31586,1)
+312247^^Y
+"DATA",176.112,31587,0)
+4007383^PEDIATRIC MULTIPLE TRACE ELEMENT INJ
+"DATA",176.112,31587,1)
+312248^^Y
+"DATA",176.112,31588,0)
+4015375^PEGINTERFERON ALPHA-2B 160MCG/ML INJ,KIT
+"DATA",176.112,31588,1)
+312250^^Y
+"DATA",176.112,31589,0)
+4015376^PEGINTERFERON ALPHA-2B 240MCG/ML INJ,KIT
+"DATA",176.112,31589,1)
+312251^^Y
+"DATA",176.112,31590,0)
+4015377^PEGINTERFERON ALPHA-2B 300MCG/ML INJ,KIT
+"DATA",176.112,31590,1)
+312252^^Y
+"DATA",176.112,31591,0)
+4007995^PENTETATE INDIUM DISODIUM (IN-111) INJ
+"DATA",176.112,31591,1)
+312291^^Y
+"DATA",176.112,31592,0)
+4007971^PEPSIN W/BILE SALTS/DEHYDROCHOLIC ACIDS TAB
+"DATA",176.112,31592,1)
+312302^^Y
+"DATA",176.112,31593,0)
+4014692^PEPTAMEN 1.5 LIQUID UNFLAVORED,250ML
+"DATA",176.112,31593,1)
+312303^^Y
+"DATA",176.112,31594,0)
+4014693^PEPTAMEN 1.5 LIQUID VANILLA,250ML
+"DATA",176.112,31594,1)
+312304^^Y
+"DATA",176.112,31595,0)
+4014944^PEPTAMEN JUNIOR UNFLAVORED,250ML
+"DATA",176.112,31595,1)
+312305^^Y
+"DATA",176.112,31596,0)
+4008218^PERCUTANEOUS INTRODUCER SET
+"DATA",176.112,31596,1)
+312306^^Y
+"DATA",176.112,31597,0)
+4012148^PERFLUBRON LIQUID,ORAL
+"DATA",176.112,31597,1)
+312307^^Y
+"DATA",176.112,31598,0)
+4012415^PERINEAL WASH SOLN
+"DATA",176.112,31598,1)
+312314^^Y
+"DATA",176.112,31599,0)
+4006136^PERITONEAL DIALYSIS SOLUTION/DEXTROSE 1.5% SOLN
+"DATA",176.112,31599,1)
+312315^^Y
+"DATA",176.112,31600,0)
+4006138^PERITONEAL DIALYSIS SOLUTION/DEXTROSE 30% SOLN
+"DATA",176.112,31600,1)
+312316^^Y
+"DATA",176.112,31601,0)
+4006139^PERITONEAL DIALYSIS SOLUTION/DEXTROSE 50% SOLN
+"DATA",176.112,31601,1)
+312318^^Y
+"DATA",176.112,31602,0)
+4009697^PERNOX SHAMPOO
+"DATA",176.112,31602,1)
+312322^^Y
+"DATA",176.112,31603,0)
+4008701^PETROLATUM JELLY,TOP
+"DATA",176.112,31603,1)
+312326^^Y
+"DATA",176.112,31604,0)
+4014641^PETROLATUM PASTE,TOP
+"DATA",176.112,31604,1)
+312328^^Y
+"DATA",176.112,31605,0)
+4008702^PETROLATUM,AMBER OINT,TOP
+"DATA",176.112,31605,1)
+312329^^Y
+"DATA",176.112,31606,0)
+4009451^PETROLATUM,HYDROPHILIC OINT,TOP
+"DATA",176.112,31606,1)
+312330^^Y
+"DATA",176.112,31607,0)
+4010506^PHACID CLEANSING SHAMPOO
+"DATA",176.112,31607,1)
+312334^^Y
+"DATA",176.112,31608,0)
+4006036^PHARMALYTE TM II MULTI-ELECTROLYTE INJ
+"DATA",176.112,31608,1)
+312335^^Y
+"DATA",176.112,31609,0)
+4004306^PHENYLEPHRINE HCL 0.5%/MENTHOL SOLN,NASAL,SPRAY
+"DATA",176.112,31609,1)
+312400^^Y
+"DATA",176.112,31610,0)
+4014049^PHENYTOIN NA,EXTENDED 100MG CAP (DILANTIN),UD
+"DATA",176.112,31610,1)
+312407^^Y
+"DATA",176.112,31611,0)
+4002501^PHENYTOIN NA,EXTENDED 100MG CAP (DILANTIN)
+"DATA",176.112,31611,1)
+312407^^Y
+"DATA",176.112,31612,0)
+4009681^PHISODERM FOR BABY SOAP
+"DATA",176.112,31612,1)
+312409^^Y
+"DATA",176.112,31613,0)
+4012820^PHOSPHORATED CARBOHYDRATE SOLN,ORAL
+"DATA",176.112,31613,1)
+312410^^Y
+"DATA",176.112,31614,0)
+4010444^NEUTRA-PHOS K PWDR,75GM
+"DATA",176.112,31614,1)
+312412^^Y
+"DATA",176.112,31615,0)
+4010446^PHOSPHORUS 250MG/POTASSIUM 7.125MEQ/SODIUM 7.125MEQ/PKT PWDR
+"DATA",176.112,31615,1)
+312414^^Y
+"DATA",176.112,31616,0)
+4006028^PHYSIOLYTE SOLN,IRRG
+"DATA",176.112,31616,1)
+312416^^Y
+"DATA",176.112,31617,0)
+4006020^PHYSIOSOL SOLN,IRRG
+"DATA",176.112,31617,1)
+312417^^Y
+"DATA",176.112,31618,0)
+4004116^PILOCARPINE 11MG/UNT OPH,CRC
+"DATA",176.112,31618,1)
+312425^^Y
+"DATA",176.112,31619,0)
+4004115^PILOCARPINE 5MG/UNT OPH,CRC
+"DATA",176.112,31619,1)
+312426^^Y
+"DATA",176.112,31620,0)
+4009811^PLASTER OF PARIS PWDR (DENTAL)
+"DATA",176.112,31620,1)
+312462^^Y
+"DATA",176.112,31621,0)
+4014972^PNEUMOCOCCAL 7-VALENT CONJUGATE VACCINE
+"DATA",176.112,31621,1)
+312464^^Y
+"DATA",176.112,31622,0)
+4002301^PNEUMOCOCCAL POLYSACCHARIDE VACCINE INJ
+"DATA",176.112,31622,1)
+312465^^Y
+"DATA",176.112,31623,0)
+4007878^PODOPHYLLIN PWDR
+"DATA",176.112,31623,1)
+312469^^Y
+"DATA",176.112,31624,0)
+4004508^POISON IVY EXTRACT INJ
+"DATA",176.112,31624,1)
+312470^^Y
+"DATA",176.112,31625,0)
+4007940^POISON IVY/OAK/SUMAC EXTRACTS COMBINED INJ
+"DATA",176.112,31625,1)
+312471^^Y
+"DATA",176.112,31626,0)
+4006933^POLY-HISTINE-D CAP,SA
+"DATA",176.112,31626,1)
+312473^^Y
+"DATA",176.112,31627,0)
+4010618^POLYCOSE LIQUID,ORAL
+"DATA",176.112,31627,1)
+312474^^Y
+"DATA",176.112,31628,0)
+4014612^POLYETHYLENE GLYCOL 3350 PWDR,ORAL
+"DATA",176.112,31628,1)
+312476^^Y
+"DATA",176.112,31629,0)
+4010029^POLYETHYLENE GLYCOL 6000 PWDR
+"DATA",176.112,31629,1)
+312477^^Y
+"DATA",176.112,31630,0)
+4010030^POLYETHYLENE GLYCOL OINT,TOP
+"DATA",176.112,31630,1)
+312478^^Y
+"DATA",176.112,31631,0)
+4010473^POLYVINYL ALCOHOL/THIMEROSAL LENS WETTING SOLN
+"DATA",176.112,31631,1)
+312487^^Y
+"DATA",176.112,31632,0)
+4006650^POTASSIUM BICARBONATE PWDR
+"DATA",176.112,31632,1)
+312500^^Y
+"DATA",176.112,31633,0)
+4009812^POTASSIUM BITARTRATE PWDR
+"DATA",176.112,31633,1)
+312501^^Y
+"DATA",176.112,31634,0)
+4008683^POTASSIUM BITARTRATE/SODIUM BICARBONATE SUPP,RTL
+"DATA",176.112,31634,1)
+312502^^Y
+"DATA",176.112,31635,0)
+4000892^POTASSIUM CHLORIDE 20MEQ TAB,SA (K-DUR)
+"DATA",176.112,31635,1)
+312513^^Y
+"DATA",176.112,31636,0)
+4009813^POTASSIUM NITRATE GRANULES
+"DATA",176.112,31636,1)
+312545^^Y
+"DATA",176.112,31637,0)
+4008168^POVIDONE IODINE 0.75% SPONGE
+"DATA",176.112,31637,1)
+312558^^Y
+"DATA",176.112,31638,0)
+4008198^POVIDONE IODINE 1% PREP PAD
+"DATA",176.112,31638,1)
+312559^^Y
+"DATA",176.112,31639,0)
+4008167^POVIDONE IODINE 1% SPONGE STICK
+"DATA",176.112,31639,1)
+312560^^Y
+"DATA",176.112,31640,0)
+4008187^POVIDONE IODINE 10% SPONGE BRUSH
+"DATA",176.112,31640,1)
+312565^^Y
+"DATA",176.112,31641,0)
+4008197^POVIDONE IODINE 10% VISCOUS GAUZE PAD,TOP
+"DATA",176.112,31641,1)
+312567^^Y
+"DATA",176.112,31642,0)
+4008196^POVIDONE IODINE 7.5% SPONGE BRUSH
+"DATA",176.112,31642,1)
+312572^^Y
+"DATA",176.112,31643,0)
+4008184^POVIDONE IODINE AEROSOL,TOP
+"DATA",176.112,31643,1)
+312573^^Y
+"DATA",176.112,31644,0)
+4008189^POVIDONE IODINE APPLICATOR F#170-1177
+"DATA",176.112,31644,1)
+312574^^Y
+"DATA",176.112,31645,0)
+4008188^POVIDONE IODINE APPLICATOR F#280-9941,3S
+"DATA",176.112,31645,1)
+312575^^Y
+"DATA",176.112,31646,0)
+4015279^PRECISION PCX (GLUCOSE) TEST STRIP
+"DATA",176.112,31646,1)
+312595^^Y
+"DATA",176.112,31647,0)
+4008522^PRECISION Q-I-D (GLUCOSE) TEST STRIP
+"DATA",176.112,31647,1)
+312596^^Y
+"DATA",176.112,31648,0)
+4012695^PRECISION Q-I-D SENSOR,HAND HELD
+"DATA",176.112,31648,1)
+312597^^Y
+"DATA",176.112,31649,0)
+4003029^PREDNISOLONE TEBUTATE 20MG/ML INJ,SUSP
+"DATA",176.112,31649,1)
+312613^^Y
+"DATA",176.112,31650,0)
+4003030^PREDNISOLONE NA PHOSPHATE 20MG/ML INJ,SOLN
+"DATA",176.112,31650,1)
+312613^^Y
+"DATA",176.112,31651,0)
+4002625^PREDNISONE PWDR
+"DATA",176.112,31651,1)
+312619^^Y
+"DATA",176.112,31652,0)
+4001855^PRENATAL RX TAB
+"DATA",176.112,31652,1)
+312621^^Y
+"DATA",176.112,31653,0)
+4001856^PRENATAL TAB
+"DATA",176.112,31653,1)
+312622^^Y
+"DATA",176.112,31654,0)
+4015447^PRESTIGE SMART SYSTEM (GLUCOSE) TEST STRIP
+"DATA",176.112,31654,1)
+312623^^Y
+"DATA",176.112,31655,0)
+4013288^PREVEN EMERGENCY CONTRACEPTIVE KIT
+"DATA",176.112,31655,1)
+312624^^Y
+"DATA",176.112,31656,0)
+4010359^PROGAINE NORMAL TO DRY SHAMPOO
+"DATA",176.112,31656,1)
+312639^^Y
+"DATA",176.112,31657,0)
+4010358^PROGAINE NORMAL TO OILY SHAMPOO
+"DATA",176.112,31657,1)
+312640^^Y
+"DATA",176.112,31658,0)
+4000914^PROGESTERONE 38MG INSERT,CONT REL
+"DATA",176.112,31658,1)
+312642^^Y
+"DATA",176.112,31659,0)
+4007340^PROMETH EXPECTORANT W/CODEINE SYRUP
+"DATA",176.112,31659,1)
+312657^^Y
+"DATA",176.112,31660,0)
+4007336^PROMETHAZINE EXPECTORANT PEDIATRIC LIQUID
+"DATA",176.112,31660,1)
+312658^^Y
+"DATA",176.112,31661,0)
+4007342^PROMETHAZINE EXPECTORANT W/CODEINE LIQUID
+"DATA",176.112,31661,1)
+312659^^Y
+"DATA",176.112,31662,0)
+4007335^PROMETH EXPECTORANT PEDIATRIC LIQUID
+"DATA",176.112,31662,1)
+312660^^Y
+"DATA",176.112,31663,0)
+4007334^PROMETHAZINE EXPECTORANT W/DEXTROMETHORPHAN LIQUID
+"DATA",176.112,31663,1)
+312660^^Y
+"DATA",176.112,31664,0)
+4007682^PROMETHAZINE VC EXPECTORANT W/CODEINE LIQUID
+"DATA",176.112,31664,1)
+312669^^Y
+"DATA",176.112,31665,0)
+4007341^PROMETHAZINE WITH CODEINE LIQUID
+"DATA",176.112,31665,1)
+312670^^Y
+"DATA",176.112,31666,0)
+4014203^PROMOTE W/FIBER LIQUID VANILLA
+"DATA",176.112,31666,1)
+312671^^Y
+"DATA",176.112,31667,0)
+4009816^PROPYLENE GLYCOL LIQUID
+"DATA",176.112,31667,1)
+312693^^Y
+"DATA",176.112,31668,0)
+4013605^PROSHIELD PLUS SKIN PROTECTANT GEL,TOP
+"DATA",176.112,31668,1)
+312695^^Y
+"DATA",176.112,31669,0)
+4015283^PROSHIELD SKIN CARE KIT,TOP
+"DATA",176.112,31669,1)
+312696^^Y
+"DATA",176.112,31670,0)
+4013242^PROSTASCINT KIT (CAPROMAB PENDETIDE)
+"DATA",176.112,31670,1)
+312697^^Y
+"DATA",176.112,31671,0)
+4012730^PROTAIN XL (K.D.S.)TUBE FEEDING,BTL,1000ML
+"DATA",176.112,31671,1)
+312698^^Y
+"DATA",176.112,31672,0)
+4014378^PROTAIN XL TUBE FEEDING,CAN,237ML
+"DATA",176.112,31672,1)
+312699^^Y
+"DATA",176.112,31673,0)
+4012729^PROTAIN XL TUBE FEEDING,CAN,250ML
+"DATA",176.112,31673,1)
+312700^^Y
+"DATA",176.112,31674,0)
+4012130^PROTEOLYTIC FORMULA TAB
+"DATA",176.112,31674,1)
+312702^^Y
+"DATA",176.112,31675,0)
+4007333^PROTHAZINE PEDIATRIC SYRUP
+"DATA",176.112,31675,1)
+312703^^Y
+"DATA",176.112,31676,0)
+4007339^PROTHAZINE W/CODEINE SYRUP
+"DATA",176.112,31676,1)
+312704^^Y
+"DATA",176.112,31677,0)
+4004756^PROTILASE CAP
+"DATA",176.112,31677,1)
+312705^^Y
+"DATA",176.112,31678,0)
+4010351^PROTOSAN POWDER,ORAL
+"DATA",176.112,31678,1)
+312707^^Y
+"DATA",176.112,31679,0)
+4012108^PSYLLIUM 3.4GM/OAT/WHEAT BRAN WAFER,ORAL
+"DATA",176.112,31679,1)
+312720^^Y
+"DATA",176.112,31680,0)
+4010085^PSYLLIUM HYDROPHILIC MUCILLOID 3.4GM/5GM/WHEAT BRAN PWDR,ORAL
+"DATA",176.112,31680,1)
+312722^^Y
+"DATA",176.112,31681,0)
+4010086^PSYLLIUM 3.4GM/WHEAT BRAN/5GM PWDR,ORAL
+"DATA",176.112,31681,1)
+312722^^Y
+"DATA",176.112,31682,0)
+4009538^PSYLLIUM MUCILLOID 3.4GM/SUCROSE 3.5GM PWDR,ORAL
+"DATA",176.112,31682,1)
+312723^^Y
+"DATA",176.112,31683,0)
+4008527^PSYLLIUM PWDR,EFFERVSC
+"DATA",176.112,31683,1)
+312725^^Y
+"DATA",176.112,31684,0)
+4008528^PSYLLIUM PWDR,ORAL
+"DATA",176.112,31684,1)
+312726^^Y
+"DATA",176.112,31685,0)
+4008535^PSYLLIUM SUGAR FREE INSTANT MIX PWDR,PKT
+"DATA",176.112,31685,1)
+312727^^Y
+"DATA",176.112,31686,0)
+4008529^PSYLLIUM SUGAR FREE PWDR,ORAL
+"DATA",176.112,31686,1)
+312728^^Y
+"DATA",176.112,31687,0)
+4012103^PULMOCARE LIQUID STRAWBERRY
+"DATA",176.112,31687,1)
+312729^^Y
+"DATA",176.112,31688,0)
+4012104^PULMOCARE LIQUID TUBE FEEDING
+"DATA",176.112,31688,1)
+312730^^Y
+"DATA",176.112,31689,0)
+4007724^PYRACOF LIQUID,ORAL
+"DATA",176.112,31689,1)
+312731^^Y
+"DATA",176.112,31690,0)
+4007721^PYRADEINE W/ANTIHISTAMINE & CODEINE SYRUP
+"DATA",176.112,31690,1)
+312732^^Y
+"DATA",176.112,31691,0)
+4007840^PYROLITE INJ
+"DATA",176.112,31691,1)
+312742^^Y
+"DATA",176.112,31692,0)
+4015339^QUETIAPINE FUMARATE STARTER PACK
+"DATA",176.112,31692,1)
+312746^^Y
+"DATA",176.112,31693,0)
+4009838^RAYNOX CREAM
+"DATA",176.112,31693,1)
+312777^^Y
+"DATA",176.112,31694,0)
+4012613^REGAIN BAR,MALT W/COCOA COATING
+"DATA",176.112,31694,1)
+312787^^Y
+"DATA",176.112,31695,0)
+4012612^REGAIN BAR,STRAWBERRY W/COCOA COATING
+"DATA",176.112,31695,1)
+312788^^Y
+"DATA",176.112,31696,0)
+4012611^REGAIN BAR,VANILLA W/COCOA COATING
+"DATA",176.112,31696,1)
+312789^^Y
+"DATA",176.112,31697,0)
+4009905^RESOURCE CRYSTALS (CHOCOLATE)
+"DATA",176.112,31697,1)
+312794^^Y
+"DATA",176.112,31698,0)
+4009904^RESOURCE CRYSTALS (VANILLA)
+"DATA",176.112,31698,1)
+312795^^Y
+"DATA",176.112,31699,0)
+4014296^RESOURCE DIABETIC LIQUID (CHOCOLATE)
+"DATA",176.112,31699,1)
+312796^^Y
+"DATA",176.112,31700,0)
+4014298^RESOURCE DIABETIC LIQUID (CLOSED)
+"DATA",176.112,31700,1)
+312797^^Y
+"DATA",176.112,31701,0)
+4014297^RESOURCE DIABETIC LIQUID (VANILLA)
+"DATA",176.112,31701,1)
+312798^^Y
+"DATA",176.112,31702,0)
+4009913^RESOURCE FROZEN JUICE DRINK (CRAN/APPLE)
+"DATA",176.112,31702,1)
+312799^^Y
+"DATA",176.112,31703,0)
+4009912^RESOURCE FROZEN JUICE DRINK (ORANGE)
+"DATA",176.112,31703,1)
+312800^^Y
+"DATA",176.112,31704,0)
+4009903^RESOURCE INSTANT CRYSTALS (RICH CHOCOLATE)
+"DATA",176.112,31704,1)
+312801^^Y
+"DATA",176.112,31705,0)
+4009907^RESOURCE LIQUID (CHOCOLATE)
+"DATA",176.112,31705,1)
+312802^^Y
+"DATA",176.112,31706,0)
+4009908^RESOURCE LIQUID (STRAWBERRY)
+"DATA",176.112,31706,1)
+312803^^Y
+"DATA",176.112,31707,0)
+4009906^RESOURCE LIQUID (VANILLA)
+"DATA",176.112,31707,1)
+312804^^Y
+"DATA",176.112,31708,0)
+4009910^RESOURCE PLUS LIQUID (CHOCOLATE)
+"DATA",176.112,31708,1)
+312805^^Y
+"DATA",176.112,31709,0)
+4009909^RESOURCE PLUS LIQUID (VANILLA)
+"DATA",176.112,31709,1)
+312806^^Y
+"DATA",176.112,31710,0)
+4005143^RHO (D) IMMUNE GLOBULIN,HUMAN (WINRHO SD) 1500UNT/VIL INJ
+"DATA",176.112,31710,1)
+312807^^Y
+"DATA",176.112,31711,0)
+4006034^RICELYTE LIQUID,ORAL
+"DATA",176.112,31711,1)
+312820^^Y
+"DATA",176.112,31712,0)
+4008205^ROSE BENGAL 1.3MG STRIP,OPH
+"DATA",176.112,31712,1)
+312854^^Y
+"DATA",176.112,31713,0)
+4009839^ROSE WATER OINT,TOP
+"DATA",176.112,31713,1)
+312858^^Y
+"DATA",176.112,31714,0)
+4009817^ROSIN PWDR
+"DATA",176.112,31714,1)
+312862^^Y
+"DATA",176.112,31715,0)
+4010155^RUBIDIUM (Rb-82) GENERATOR
+"DATA",176.112,31715,1)
+312864^^Y
+"DATA",176.112,31716,0)
+4002146^RUBRAPLEX CAP
+"DATA",176.112,31716,1)
+312865^^Y
+"DATA",176.112,31717,0)
+4009672^S-M-A IRON FORTIFIED,INFANT FORMULA CONC,ORAL
+"DATA",176.112,31717,1)
+312866^^Y
+"DATA",176.112,31718,0)
+4009671^S-M-A IRON FORTIFIED,INFANT FORMULA LIQUID
+"DATA",176.112,31718,1)
+312867^^Y
+"DATA",176.112,31719,0)
+4009673^S-M-A LO-IRON,INFANT FORMULA CONC,ORAL
+"DATA",176.112,31719,1)
+312868^^Y
+"DATA",176.112,31720,0)
+4009675^S-M-A LO-IRON,INFANT FORMULA LIQUID
+"DATA",176.112,31720,1)
+312869^^Y
+"DATA",176.112,31721,0)
+4009674^S-M-A LO-IRON,INFANT FORMULA PWDR
+"DATA",176.112,31721,1)
+312870^^Y
+"DATA",176.112,31722,0)
+4010522^SACCHARIN SODIUM PWDR
+"DATA",176.112,31722,1)
+312871^^Y
+"DATA",176.112,31723,0)
+4013679^SAF-GEL HYDRATING GEL
+"DATA",176.112,31723,1)
+312873^^Y
+"DATA",176.112,31724,0)
+4005852^SALICYLIC ACID GEL,TOP
+"DATA",176.112,31724,1)
+312895^^Y
+"DATA",176.112,31725,0)
+4005845^SALICYLIC ACID PWDR
+"DATA",176.112,31725,1)
+312896^^Y
+"DATA",176.112,31726,0)
+4014690^SCANDISHAKE PWDR/PKT,85GM CHOCOLATE
+"DATA",176.112,31726,1)
+312904^^Y
+"DATA",176.112,31727,0)
+4014689^SCANDISHAKE PWDR/PKT,85GM STRAWBERRY
+"DATA",176.112,31727,1)
+312905^^Y
+"DATA",176.112,31728,0)
+4013139^SEA-CLENS WOUND CLEANSER
+"DATA",176.112,31728,1)
+312913^^Y
+"DATA",176.112,31729,0)
+4000906^SECOBARBITAL NA PWDR
+"DATA",176.112,31729,1)
+312916^^Y
+"DATA",176.112,31730,0)
+4008847^SENNA EXT 75ML/SUCROSE 50GM/75ML LIQUID
+"DATA",176.112,31730,1)
+312933^^Y
+"DATA",176.112,31731,0)
+4008850^SENNA PWDR
+"DATA",176.112,31731,1)
+312934^^Y
+"DATA",176.112,31732,0)
+4012779^SEVOFLURANE LIQUID,INHL
+"DATA",176.112,31732,1)
+312945^^Y
+"DATA",176.112,31733,0)
+4009556^SILKSKIN BATH OIL
+"DATA",176.112,31733,1)
+312951^^Y
+"DATA",176.112,31734,0)
+4010334^SKIN CREAM,TOP
+"DATA",176.112,31734,1)
+312964^^Y
+"DATA",176.112,31735,0)
+4009819^SODIUM BENZOATE PWDR
+"DATA",176.112,31735,1)
+312970^^Y
+"DATA",176.112,31736,0)
+4001116^SODIUM CHLORIDE (BRONCHO SALINE) 0.9% SOLN 240ML
+"DATA",176.112,31736,1)
+312984^^Y
+"DATA",176.112,31737,0)
+4001107^SODIUM CHLORIDE (NEBU-SOL) 0.9% SOLN 300ML
+"DATA",176.112,31737,1)
+312985^^Y
+"DATA",176.112,31738,0)
+4001106^SODIUM CHLORIDE (NEBU-SOL) 0.9% SOLN 120ML
+"DATA",176.112,31738,1)
+312985^^Y
+"DATA",176.112,31739,0)
+4001085^SODIUM CHLORIDE 0.2% SOLN
+"DATA",176.112,31739,1)
+312987^^Y
+"DATA",176.112,31740,0)
+4001121^SODIUM CHLORIDE 0.9% (PF) INJ,SYRINGE,5ML/10ML
+"DATA",176.112,31740,1)
+312996^^Y
+"DATA",176.112,31741,0)
+4014600^SODIUM CHLORIDE 0.9%/BENZYL ALCOHOL INJ,30ML
+"DATA",176.112,31741,1)
+313001^^Y
+"DATA",176.112,31742,0)
+4003529^SODIUM CHLORIDE 0.9%/BENZYL ALCOHOL INJ
+"DATA",176.112,31742,1)
+313001^^Y
+"DATA",176.112,31743,0)
+4006912^SODIUM CHLORIDE 0.9%/PHENOL 0.4% INJ
+"DATA",176.112,31743,1)
+313003^^Y
+"DATA",176.112,31744,0)
+4006913^SODIUM CHLORIDE 0.9%/PHENOL 0.4% SOLN
+"DATA",176.112,31744,1)
+313004^^Y
+"DATA",176.112,31745,0)
+4001111^SODIUM CHLORIDE SOLN,NASAL
+"DATA",176.112,31745,1)
+313019^^Y
+"DATA",176.112,31746,0)
+4001110^SODIUM CHLORIDE SOLN,OPH
+"DATA",176.112,31746,1)
+313020^^Y
+"DATA",176.112,31747,0)
+4010540^SODIUM CHLORIDE/SORBIC ACID 0.1% SOLN,OPH
+"DATA",176.112,31747,1)
+313021^^Y
+"DATA",176.112,31748,0)
+4001514^SODIUM CHROMATE,CR-51,100MIC/ML INJ
+"DATA",176.112,31748,1)
+313022^^Y
+"DATA",176.112,31749,0)
+4007238^SODIUM CITRATE 4% SOLN
+"DATA",176.112,31749,1)
+313025^^Y
+"DATA",176.112,31750,0)
+4007239^SODIUM CITRATE 46.7% SOLN
+"DATA",176.112,31750,1)
+313027^^Y
+"DATA",176.112,31751,0)
+4004951^SODIUM FLUORIDE PWDR
+"DATA",176.112,31751,1)
+313047^^Y
+"DATA",176.112,31752,0)
+4001524^SODIUM IODIDE,I-131,8-100MIC CAP
+"DATA",176.112,31752,1)
+313059^^Y
+"DATA",176.112,31753,0)
+4010008^SODIUM LAURYL SO4 GREASELESS BASE OINT,TOP
+"DATA",176.112,31753,1)
+313063^^Y
+"DATA",176.112,31754,0)
+4010009^SODIUM LAURYL SO4 PWDR
+"DATA",176.112,31754,1)
+313064^^Y
+"DATA",176.112,31755,0)
+4010366^SODIUM LAURYL SULFATE/SORBIC ACID/STANDAPOL SHAMPOO
+"DATA",176.112,31755,1)
+313065^^Y
+"DATA",176.112,31756,0)
+4009820^SODIUM NITRATE PWDR
+"DATA",176.112,31756,1)
+313066^^Y
+"DATA",176.112,31757,0)
+4006294^SODIUM PHOSPHATE,TRIBASIC PWDR
+"DATA",176.112,31757,1)
+313071^^Y
+"DATA",176.112,31758,0)
+4009822^SODIUM SILICATE SOLN
+"DATA",176.112,31758,1)
+313077^^Y
+"DATA",176.112,31759,0)
+4009152^SODIUM THIOSULFATE CRYSTALS
+"DATA",176.112,31759,1)
+313082^^Y
+"DATA",176.112,31760,0)
+4008386^SOFENOL T LOTION
+"DATA",176.112,31760,1)
+313083^^Y
+"DATA",176.112,31761,0)
+4013589^SOLO SITE WOUND CARE GEL,TOP
+"DATA",176.112,31761,1)
+313084^^Y
+"DATA",176.112,31762,0)
+4008743^SOLUMOL CREAM,TOP
+"DATA",176.112,31762,1)
+313085^^Y
+"DATA",176.112,31763,0)
+4010352^SPECTRO-JEL TOP
+"DATA",176.112,31763,1)
+313095^^Y
+"DATA",176.112,31764,0)
+4002696^SPIRONOLACTONE PWDR
+"DATA",176.112,31764,1)
+313097^^Y
+"DATA",176.112,31765,0)
+4008619^SPONGE,ABSORBABLE GELATIN F#080-2053
+"DATA",176.112,31765,1)
+313098^^Y
+"DATA",176.112,31766,0)
+4008620^SPONGE,ABSORBABLE GELATIN F#080-2054
+"DATA",176.112,31766,1)
+313099^^Y
+"DATA",176.112,31767,0)
+4012701^STAPHAGE LYSATE (SPL) SOLN,VIL,10ML
+"DATA",176.112,31767,1)
+313106^^Y
+"DATA",176.112,31768,0)
+4012700^STAPHAGE LYSATE (SPL) SOLN,AMP,1ML
+"DATA",176.112,31768,1)
+313106^^Y
+"DATA",176.112,31769,0)
+4010035^STEARYL ALCOHOL GRANULES
+"DATA",176.112,31769,1)
+313111^^Y
+"DATA",176.112,31770,0)
+4001874^STRESSTABS + ZINC TAB
+"DATA",176.112,31770,1)
+313117^^Y
+"DATA",176.112,31771,0)
+4007481^STRONG IODINE SOLN,ORAL
+"DATA",176.112,31771,1)
+313118^^Y
+"DATA",176.112,31772,0)
+4008733^SULFONATED CASTOR OIL LIQUID,TOP
+"DATA",176.112,31772,1)
+313145^^Y
+"DATA",176.112,31773,0)
+4008735^SULFONATED CASTOR OIL LOTION
+"DATA",176.112,31773,1)
+313146^^Y
+"DATA",176.112,31774,0)
+4008721^SULFUR 3% SOAP
+"DATA",176.112,31774,1)
+313150^^Y
+"DATA",176.112,31775,0)
+4009830^SULFUR 5%/SULFURATED POTASH/ZINC OXIDE 10% CREAM,TOP
+"DATA",176.112,31775,1)
+313153^^Y
+"DATA",176.112,31776,0)
+4008730^SULFUR 6.4%/ZINC OXIDE LOTION
+"DATA",176.112,31776,1)
+313154^^Y
+"DATA",176.112,31777,0)
+4008728^SULFUR OINT,TOP
+"DATA",176.112,31777,1)
+313155^^Y
+"DATA",176.112,31778,0)
+4008722^SULFUR PWDR
+"DATA",176.112,31778,1)
+313156^^Y
+"DATA",176.112,31779,0)
+4009823^SULFURIC ACID,TECHNICAL LIQUID
+"DATA",176.112,31779,1)
+313158^^Y
+"DATA",176.112,31780,0)
+4013652^SUNSCREEN-30 PABA-FREE COMBINATION GEL
+"DATA",176.112,31780,1)
+313166^^Y
+"DATA",176.112,31781,0)
+4013653^SUNSCREEN-15 PABA-FREE COMBINATION GEL
+"DATA",176.112,31781,1)
+313166^^Y
+"DATA",176.112,31782,0)
+4013435^SUNSCREEN-30 PABA-FREE COMBINATION LOTION
+"DATA",176.112,31782,1)
+313167^^Y
+"DATA",176.112,31783,0)
+4009591^SUPER C-500 300MG TAB
+"DATA",176.112,31783,1)
+313168^^Y
+"DATA",176.112,31784,0)
+4012105^SUPLENA LIQUID VANILLA
+"DATA",176.112,31784,1)
+313169^^Y
+"DATA",176.112,31785,0)
+4010031^SUPPOSITORY BASE
+"DATA",176.112,31785,1)
+313170^^Y
+"DATA",176.112,31786,0)
+4008523^SURE STEP (GLUCOSE) TEST STRIP
+"DATA",176.112,31786,1)
+313173^^Y
+"DATA",176.112,31787,0)
+4014202^SURESTEP GLUCOSE CONTROL SOLN
+"DATA",176.112,31787,1)
+313174^^Y
+"DATA",176.112,31788,0)
+4013350^SURESTEP PRO (GLUCOSE) TEST STRIP
+"DATA",176.112,31788,1)
+313175^^Y
+"DATA",176.112,31789,0)
+4012929^SURESTEP PRO HIGH GLUCOSE CONTROL SOLN
+"DATA",176.112,31789,1)
+313176^^Y
+"DATA",176.112,31790,0)
+4012930^SURESTEP PRO LOW GLUCOSE CONTROL SOLN
+"DATA",176.112,31790,1)
+313177^^Y
+"DATA",176.112,31791,0)
+4012928^SURESTEP PRO NORMAL GLUCOSE CONTROL SOLN
+"DATA",176.112,31791,1)
+313178^^Y
+"DATA",176.112,31792,0)
+4001794^SURGICAL SUPPLEMENT TAB
+"DATA",176.112,31792,1)
+313179^^Y
+"DATA",176.112,31793,0)
+4007427^SURGICEL ABSORBABLE HEMOSTAT 2IN X 14IN
+"DATA",176.112,31793,1)
+313180^^Y
+"DATA",176.112,31794,0)
+4007428^SURGICEL ABSORBABLE HEMOSTAT 4IN X 8IN
+"DATA",176.112,31794,1)
+313181^^Y
+"DATA",176.112,31795,0)
+4010507^SUSPENDING VEHICLE LIQUID,ORAL
+"DATA",176.112,31795,1)
+313182^^Y
+"DATA",176.112,31796,0)
+4010508^SUSPENDING VEHICLE (SF) LIQUID,ORAL
+"DATA",176.112,31796,1)
+313182^^Y
+"DATA",176.112,31797,0)
+4008663^SUSTAGEN PWDR CHOCOLATE
+"DATA",176.112,31797,1)
+313183^^Y
+"DATA",176.112,31798,0)
+4008110^SYRUP #1 (MIKART) LIQUID
+"DATA",176.112,31798,1)
+313184^^Y
+"DATA",176.112,31799,0)
+4009742^TALC PWDR,TOP
+"DATA",176.112,31799,1)
+313192^^Y
+"DATA",176.112,31800,0)
+4010087^TALOIN OINT,TOP
+"DATA",176.112,31800,1)
+313194^^Y
+"DATA",176.112,31801,0)
+4009665^TEARS NATURALE II SOLN,OPH
+"DATA",176.112,31801,1)
+313202^^Y
+"DATA",176.112,31802,0)
+4003973^TECHNESCAN GLUCEPTATE INJ
+"DATA",176.112,31802,1)
+313203^^Y
+"DATA",176.112,31803,0)
+4007960^TECHNETIUM Tc 99m NOFETUMOMAB MERPENTAN INJ
+"DATA",176.112,31803,1)
+313207^^Y
+"DATA",176.112,31804,0)
+4008487^TES-TAPE (GLUCOSE) TEST STRIP
+"DATA",176.112,31804,1)
+313230^^Y
+"DATA",176.112,31805,0)
+4001141^TESTOSTERONE PROPIONATE PWDR
+"DATA",176.112,31805,1)
+313240^^Y
+"DATA",176.112,31806,0)
+4001140^TESTOSTERONE PWDR
+"DATA",176.112,31806,1)
+313241^^Y
+"DATA",176.112,31807,0)
+4007989^TETANUS ANTITOXIN,EQUINE INJ
+"DATA",176.112,31807,1)
+313242^^Y
+"DATA",176.112,31808,0)
+4013020^TETRAMUNE INJ
+"DATA",176.112,31808,1)
+313258^^Y
+"DATA",176.112,31809,0)
+4003751^THEOPHYLLINE 100MG TAB,SA (QUALITEST)
+"DATA",176.112,31809,1)
+313265^^Y
+"DATA",176.112,31810,0)
+4003709^THEOPHYLLINE 100MG TAB,SA (SUSTAIRE)
+"DATA",176.112,31810,1)
+313266^^Y
+"DATA",176.112,31811,0)
+4003745^THEOPHYLLINE 125MG CAP,SA (ELIXOPHYLLIN SR)
+"DATA",176.112,31811,1)
+313267^^Y
+"DATA",176.112,31812,0)
+4003736^THEOPHYLLINE 130MG CAP,SA (THEOBID JR)
+"DATA",176.112,31812,1)
+313268^^Y
+"DATA",176.112,31813,0)
+4003733^THEOPHYLLINE 130MG CAP,SA (THEOCLEAR LA)
+"DATA",176.112,31813,1)
+313269^^Y
+"DATA",176.112,31814,0)
+4003741^THEOPHYLLINE 130MG CAP,SA (THEOSPAN-SR)
+"DATA",176.112,31814,1)
+313270^^Y
+"DATA",176.112,31815,0)
+4003713^THEOPHYLLINE 200MG CAP,SA (SLO-BID GYROCAPS)
+"DATA",176.112,31815,1)
+313273^^Y
+"DATA",176.112,31816,0)
+4003705^THEOPHYLLINE 200MG CAP,SA (THEO-24)
+"DATA",176.112,31816,1)
+313274^^Y
+"DATA",176.112,31817,0)
+4003708^THEOPHYLLINE 200MG TAB,SA (T-PHYL)
+"DATA",176.112,31817,1)
+313275^^Y
+"DATA",176.112,31818,0)
+4003743^THEOPHYLLINE 200MG TAB,SA (THEO-SAV)
+"DATA",176.112,31818,1)
+313276^^Y
+"DATA",176.112,31819,0)
+4003730^THEOPHYLLINE 200MG TAB,SA (THEOCHRON)
+"DATA",176.112,31819,1)
+313277^^Y
+"DATA",176.112,31820,0)
+4003738^THEOPHYLLINE 250MG CAP,SA (AEROLATE SR)
+"DATA",176.112,31820,1)
+313279^^Y
+"DATA",176.112,31821,0)
+4003735^THEOPHYLLINE 260MG CAP,SA (THEOBID)
+"DATA",176.112,31821,1)
+313281^^Y
+"DATA",176.112,31822,0)
+4003734^THEOPHYLLINE 260MG CAP,SA (THEOCLEAR LA)
+"DATA",176.112,31822,1)
+313282^^Y
+"DATA",176.112,31823,0)
+4003740^THEOPHYLLINE 260MG CAP,SA (THEOSPAN-SR)
+"DATA",176.112,31823,1)
+313283^^Y
+"DATA",176.112,31824,0)
+4015110^THEOPHYLLINE 300MG CAP,SA (INWOOD)
+"DATA",176.112,31824,1)
+313286^^Y
+"DATA",176.112,31825,0)
+4003753^THEOPHYLLINE 300MG TAB,SA (QUALITEST)
+"DATA",176.112,31825,1)
+313287^^Y
+"DATA",176.112,31826,0)
+4003710^THEOPHYLLINE 300MG TAB,SA (SUSTAIRE)
+"DATA",176.112,31826,1)
+313288^^Y
+"DATA",176.112,31827,0)
+4003744^THEOPHYLLINE 300MG TAB,SA (THEO-SAV)
+"DATA",176.112,31827,1)
+313289^^Y
+"DATA",176.112,31828,0)
+4013977^THEOPHYLLINE 300MG TAB,SA,UD (MEDIREX)
+"DATA",176.112,31828,1)
+313290^^Y
+"DATA",176.112,31829,0)
+4003755^THEOPHYLLINE 400MG TAB,SA (UNI-DUR)
+"DATA",176.112,31829,1)
+313292^^Y
+"DATA",176.112,31830,0)
+4003754^THEOPHYLLINE 450MG TAB,SA (QUALITEST)
+"DATA",176.112,31830,1)
+313294^^Y
+"DATA",176.112,31831,0)
+4014502^THEOPHYLLINE 450MG TAB,SA (SIDMAK)
+"DATA",176.112,31831,1)
+313295^^Y
+"DATA",176.112,31832,0)
+4003724^THEOPHYLLINE 450MG TAB,SA (THEO-DUR)
+"DATA",176.112,31832,1)
+313296^^Y
+"DATA",176.112,31833,0)
+4003748^THEOPHYLLINE 500MG TAB,SA (RESPBID)
+"DATA",176.112,31833,1)
+313299^^Y
+"DATA",176.112,31834,0)
+4003729^THEOPHYLLINE 500MG TAB,SA (THEOLAIR-SR)
+"DATA",176.112,31834,1)
+313300^^Y
+"DATA",176.112,31835,0)
+4003739^THEOPHYLLINE 65MG CAP,SA (AEROLATE III)
+"DATA",176.112,31835,1)
+313303^^Y
+"DATA",176.112,31836,0)
+4003718^THEOPHYLLINE 75MG CAP,SA (SLO-BID GYROCAPS)
+"DATA",176.112,31836,1)
+313305^^Y
+"DATA",176.112,31837,0)
+4003758^THEOPHYLLINE,ANHYDROUS 450MG TAB,SA (GENEVA)
+"DATA",176.112,31837,1)
+313311^^Y
+"DATA",176.112,31838,0)
+4010337^THERA-P LOTION
+"DATA",176.112,31838,1)
+313314^^Y
+"DATA",176.112,31839,0)
+4001831^THERAGENERIX-H TAB
+"DATA",176.112,31839,1)
+313315^^Y
+"DATA",176.112,31840,0)
+4002147^THERAPEUTIC VITAMIN CAP
+"DATA",176.112,31840,1)
+313316^^Y
+"DATA",176.112,31841,0)
+4002148^THERAPEUTIC VITAMIN TAB
+"DATA",176.112,31841,1)
+313317^^Y
+"DATA",176.112,31842,0)
+4001814^THERAPEUTIC VITAMINS W/IRON TAB
+"DATA",176.112,31842,1)
+313318^^Y
+"DATA",176.112,31843,0)
+4001813^THERAPEUTIC VITAMINS W/MINERALS TAB
+"DATA",176.112,31843,1)
+313319^^Y
+"DATA",176.112,31844,0)
+4009554^THERI BATH OIL
+"DATA",176.112,31844,1)
+313320^^Y
+"DATA",176.112,31845,0)
+4008388^THERI-CARE LOTION
+"DATA",176.112,31845,1)
+313321^^Y
+"DATA",176.112,31846,0)
+4012792^THICKENUP POWDER
+"DATA",176.112,31846,1)
+313332^^Y
+"DATA",176.112,31847,0)
+4009487^THIMEROSAL OPH CONTACT LENS CLEANER
+"DATA",176.112,31847,1)
+313337^^Y
+"DATA",176.112,31848,0)
+4006098^THIOPENTAL NA 250MG/SYRINGE INJ
+"DATA",176.112,31848,1)
+313343^^Y
+"DATA",176.112,31849,0)
+4009927^THIOPENTAL NA 250MG/VIL/NACL 0.9% KIT,INJ
+"DATA",176.112,31849,1)
+313344^^Y
+"DATA",176.112,31850,0)
+4006100^THIOPENTAL NA 400MG/SYRINGE INJ
+"DATA",176.112,31850,1)
+313345^^Y
+"DATA",176.112,31851,0)
+4009244^THROAT DISCS
+"DATA",176.112,31851,1)
+313369^^Y
+"DATA",176.112,31852,0)
+4012622^THYMOL IODIDE PWDR,TOP
+"DATA",176.112,31852,1)
+313374^^Y
+"DATA",176.112,31853,0)
+4007944^TIRFUNGOL SOLN,TOP
+"DATA",176.112,31853,1)
+313411^^Y
+"DATA",176.112,31854,0)
+4002094^TOTAL B W/C,HIGH POTENCY TAB
+"DATA",176.112,31854,1)
+313429^^Y
+"DATA",176.112,31855,0)
+4006208^TPN ELECTROLYTES II INJ
+"DATA",176.112,31855,1)
+313430^^Y
+"DATA",176.112,31856,0)
+4007235^TPN ELECTROLYTES III INJ
+"DATA",176.112,31856,1)
+313431^^Y
+"DATA",176.112,31857,0)
+4006204^TPN ELECTROLYTES INJ
+"DATA",176.112,31857,1)
+313432^^Y
+"DATA",176.112,31858,0)
+4008123^TRACE ELEMENTS MIXED-5 INJ
+"DATA",176.112,31858,1)
+313433^^Y
+"DATA",176.112,31859,0)
+4005128^TRACE METALS ADDITIVE INJ
+"DATA",176.112,31859,1)
+313434^^Y
+"DATA",176.112,31860,0)
+4007384^TRACE-4 MULTIPLE TRACE ELEMENTS INJ
+"DATA",176.112,31860,1)
+313435^^Y
+"DATA",176.112,31861,0)
+4007533^TRACELYTE II (ELECTROLYTE TRACE ELEMENTS COMB) INJ
+"DATA",176.112,31861,1)
+313436^^Y
+"DATA",176.112,31862,0)
+4007532^TRACELYTE W/DOUBLE ELECTROLYTES INJ
+"DATA",176.112,31862,1)
+313437^^Y
+"DATA",176.112,31863,0)
+4008489^TRACER BG (GLUCOSE) TEST STRIP
+"DATA",176.112,31863,1)
+313438^^Y
+"DATA",176.112,31864,0)
+4008492^TRACER BG (TRACER II) TEST STRIP
+"DATA",176.112,31864,1)
+313439^^Y
+"DATA",176.112,31865,0)
+4008506^TRACER II BG (GLUCOSE) TEST KIT
+"DATA",176.112,31865,1)
+313440^^Y
+"DATA",176.112,31866,0)
+4012423^TRIGLYCERIDES,MEDIUM CHAIN OIL
+"DATA",176.112,31866,1)
+313478^^Y
+"DATA",176.112,31867,0)
+4001789^TRINSICON FORTE CAP
+"DATA",176.112,31867,1)
+313500^^Y
+"DATA",176.112,31868,0)
+4013837^TRIPEDIA INJ
+"DATA",176.112,31868,1)
+313501^^Y
+"DATA",176.112,31869,0)
+4006898^TRIPLE DYE LIQUID,TOP
+"DATA",176.112,31869,1)
+313506^^Y
+"DATA",176.112,31870,0)
+4006899^TRIPLE DYE PIN POINT APPLICATOR,TOP
+"DATA",176.112,31870,1)
+313506^^Y
+"DATA",176.112,31871,0)
+4001880^TRIPLE VITAMINS W/FLUORIDE 0.25MG/ML DROPS,ORAL
+"DATA",176.112,31871,1)
+313507^^Y
+"DATA",176.112,31872,0)
+4002251^TRIPLE VITAMINS W/FLUORIDE 0.5MG TAB
+"DATA",176.112,31872,1)
+313508^^Y
+"DATA",176.112,31873,0)
+4002236^TRIPLE VITAMINS W/FLUORIDE 0.5MG/ML DROPS,ORAL
+"DATA",176.112,31873,1)
+313509^^Y
+"DATA",176.112,31874,0)
+4002253^TRIPLE VITAMINS W/FLUORIDE 1MG TAB
+"DATA",176.112,31874,1)
+313510^^Y
+"DATA",176.112,31875,0)
+4002247^TRIPLE VITAMINS W/FLUORIDE 2.2MG TAB
+"DATA",176.112,31875,1)
+313511^^Y
+"DATA",176.112,31876,0)
+4005371^TRIPLE VITAMINS W/IRON DROPS,ORAL
+"DATA",176.112,31876,1)
+313512^^Y
+"DATA",176.112,31877,0)
+4001756^TRIPLE VITAMINS/FE FUMARATE 10MG/FLUORIDE 0.25MG/ML DROPS,ORAL
+"DATA",176.112,31877,1)
+313513^^Y
+"DATA",176.112,31878,0)
+4001753^TRIPLE VITAMINS/FERROUS SO4 10MG/FLUORIDE 0.25MG/ML DROPS,ORAL
+"DATA",176.112,31878,1)
+313514^^Y
+"DATA",176.112,31879,0)
+4009651^TRIPLE VITAMINS/FLUORIDE 1MG/IRON 12MG TAB
+"DATA",176.112,31879,1)
+313515^^Y
+"DATA",176.112,31880,0)
+4002302^TUBERCULIN,OLD 5UNT/TEST INJ
+"DATA",176.112,31880,1)
+313526^^Y
+"DATA",176.112,31881,0)
+4008653^TUSSAGESIC TAB,SA
+"DATA",176.112,31881,1)
+313534^^Y
+"DATA",176.112,31882,0)
+4008656^TUSSAR SF COUGH SYRUP
+"DATA",176.112,31882,1)
+313535^^Y
+"DATA",176.112,31883,0)
+4008657^TUSSAR-2 COUGH SYRUP
+"DATA",176.112,31883,1)
+313536^^Y
+"DATA",176.112,31884,0)
+4012097^TWOCAL HN LIQUID VANILLA
+"DATA",176.112,31884,1)
+313537^^Y
+"DATA",176.112,31885,0)
+4003308^TYPHOID Vi POLYSACCHARIDE (TYPHIM Vi) VACCINE
+"DATA",176.112,31885,1)
+313539^^Y
+"DATA",176.112,31886,0)
+4003307^TYPHOID Vi POLYSACCHARIDE (TYPHIM Vi) VACCINE,SYRINGE,0.5ML
+"DATA",176.112,31886,1)
+313540^^Y
+"DATA",176.112,31887,0)
+4010373^ULTRA-KLENZ,WOUND CLEANSER
+"DATA",176.112,31887,1)
+313542^^Y
+"DATA",176.112,31888,0)
+4012487^ULTRACAL TUBE-FEEDING LIQUID
+"DATA",176.112,31888,1)
+313543^^Y
+"DATA",176.112,31889,0)
+4010413^UNIBASE OINT
+"DATA",176.112,31889,1)
+313553^^Y
+"DATA",176.112,31890,0)
+4005452^URINARY ANTISEPTIC W/METHENAMINE 40.8MG TAB
+"DATA",176.112,31890,1)
+313555^^Y
+"DATA",176.112,31891,0)
+4005454^URINARY ANTISEPTIC W/METHENAMINE 40.8MG TAB,EC
+"DATA",176.112,31891,1)
+313556^^Y
+"DATA",176.112,31892,0)
+4007490^URINARY ANTISEPTIC W/METHENAMINE 40.8MG/GELSEMIUM/AZOPHEN TAB
+"DATA",176.112,31892,1)
+313557^^Y
+"DATA",176.112,31893,0)
+4005455^URINARY ANTISEPTIC W/METHENAMINE 82MG TAB
+"DATA",176.112,31893,1)
+313558^^Y
+"DATA",176.112,31894,0)
+4007792^URISAL TAB
+"DATA",176.112,31894,1)
+313559^^Y
+"DATA",176.112,31895,0)
+4009202^URISTIX (GLUCOSE,PROTEIN) TEST STRIP
+"DATA",176.112,31895,1)
+313560^^Y
+"DATA",176.112,31896,0)
+4000925^VANCOMYCIN HCL 5GM/VIL INJ
+"DATA",176.112,31896,1)
+313573^^Y
+"DATA",176.112,31897,0)
+4013079^VARIVAX VACCINE INJ
+"DATA",176.112,31897,1)
+313576^^Y
+"DATA",176.112,31898,0)
+4010209^VASELINE INTENSIVE CARE LOTION
+"DATA",176.112,31898,1)
+313577^^Y
+"DATA",176.112,31899,0)
+4001832^VIOGEN-C CAP
+"DATA",176.112,31899,1)
+313598^^Y
+"DATA",176.112,31900,0)
+4009389^VIT A/VIT D/ZN OXIDE 15% OINT,TOP
+"DATA",176.112,31900,1)
+313600^^Y
+"DATA",176.112,31901,0)
+4005027^VIT B/ESTROGENS/METHAMPHETAMINE/METHYLTESTOSTERONE LIQUID
+"DATA",176.112,31901,1)
+313601^^Y
+"DATA",176.112,31902,0)
+4005350^VIT B/FE AMMONIUM CITRATE 2MG/LIVER INJ
+"DATA",176.112,31902,1)
+313602^^Y
+"DATA",176.112,31903,0)
+4005477^VIT B/FE GLUCONATE 50MG/LIVER W/PROCAINE INJ
+"DATA",176.112,31903,1)
+313603^^Y
+"DATA",176.112,31904,0)
+4007110^VIT B/FERRIC PYROPHOSPHATE 100MG/FA 0.3MG/LYSINE 100MG LIQUID
+"DATA",176.112,31904,1)
+313604^^Y
+"DATA",176.112,31905,0)
+4005341^VIT B/IRON 20MG/LIVER INJ
+"DATA",176.112,31905,1)
+313605^^Y
+"DATA",176.112,31906,0)
+4005349^VIT B/IRON 59MG INJ
+"DATA",176.112,31906,1)
+313606^^Y
+"DATA",176.112,31907,0)
+4005318^VIT B/VIT C 100MG/FE FUMARATE 300MG/FA 0.5MG TAB
+"DATA",176.112,31907,1)
+313607^^Y
+"DATA",176.112,31908,0)
+4002780^VIT B/VIT C 113MG/FERROUS SO4 294MG/INTRINSIC FACTOR CAP
+"DATA",176.112,31908,1)
+313608^^Y
+"DATA",176.112,31909,0)
+4005358^VIT B/VIT C 150MG/IRON 105MG TAB,SA
+"DATA",176.112,31909,1)
+313609^^Y
+"DATA",176.112,31910,0)
+4005329^VIT B/VIT C 250MG/FE FUMARATE 200MG/STOMACH EXT CAP
+"DATA",176.112,31910,1)
+313610^^Y
+"DATA",176.112,31911,0)
+4015648^VIT B/VIT C 250MG/FE FUMARATE 200MG/STOMACH EXT CAP,UD
+"DATA",176.112,31911,1)
+313610^^Y
+"DATA",176.112,31912,0)
+4005357^VIT B/VIT C 300MG/IRON 100MG TAB
+"DATA",176.112,31912,1)
+313611^^Y
+"DATA",176.112,31913,0)
+4007751^VIT B/VIT C 300MG/IRON 100MG/FA 1MG/INTRINSIC FACTOR/LIVER CAP
+"DATA",176.112,31913,1)
+313612^^Y
+"DATA",176.112,31914,0)
+4005321^VIT B/VIT C 500MG/FERROUS SO4 525MG TAB,SA
+"DATA",176.112,31914,1)
+313613^^Y
+"DATA",176.112,31915,0)
+4005319^VIT B/VIT C 500MG/FERROUS SO4 525MG/FA 0.8MG TAB,SA
+"DATA",176.112,31915,1)
+313614^^Y
+"DATA",176.112,31916,0)
+4002775^VIT B/VIT C 50MG/FE FUMARATE 167MG/FA 0.3MG/INTRINSIC FACTOR CAP
+"DATA",176.112,31916,1)
+313615^^Y
+"DATA",176.112,31917,0)
+4007608^VIT B/VIT C 50MG/FE FUMARATE 200MG/FA 0.25MG/SORBITOL 200MG CAP
+"DATA",176.112,31917,1)
+313616^^Y
+"DATA",176.112,31918,0)
+4005344^VIT B/VIT C 50MG/FERROUS SO4 200MG/FA 0.4MG/LIVER INJ
+"DATA",176.112,31918,1)
+313617^^Y
+"DATA",176.112,31919,0)
+4005326^VIT B/VIT C 75MG/FE FUMARATE 110MG/FA 0.5MG/LIVER CAP
+"DATA",176.112,31919,1)
+313618^^Y
+"DATA",176.112,31920,0)
+4001771^VIT B/VIT C 75MG/FA 0.5MG/IRON 110MG/LIVER CAP
+"DATA",176.112,31920,1)
+313618^^Y
+"DATA",176.112,31921,0)
+4005331^VIT B/VIT C 75MG/IRON 110MG/FA 0.5MG/LIVER CAP
+"DATA",176.112,31921,1)
+313618^^Y
+"DATA",176.112,31922,0)
+4002777^VIT B/VIT C 75MG/FE FUMARATE 110MG/FA 0.5MG/INTRINSIC FACTOR CAP
+"DATA",176.112,31922,1)
+313619^^Y
+"DATA",176.112,31923,0)
+4002778^VIT B/VIT C 75MG/FE FUMARATE 110MG/INTRINSIC FACTOR CAP
+"DATA",176.112,31923,1)
+313620^^Y
+"DATA",176.112,31924,0)
+4005352^VIT B/VIT C 75MG/FE FUMARATE 334MG/FA 0.5MG CAP
+"DATA",176.112,31924,1)
+313621^^Y
+"DATA",176.112,31925,0)
+4005324^VIT B/VIT C 75MG/FE FUMARATE 334MG/FA 0.5MG/LIVER CAP
+"DATA",176.112,31925,1)
+313622^^Y
+"DATA",176.112,31926,0)
+4005478^VIT B/VIT C/FE GLUCONATE 25MG/LIVER W/PROCAINE INJ
+"DATA",176.112,31926,1)
+313623^^Y
+"DATA",176.112,31927,0)
+4002124^VITAMIN A/VITAMIN C/VITAMIN D TAB
+"DATA",176.112,31927,1)
+313658^^Y
+"DATA",176.112,31928,0)
+4008354^VITAMIN A/VITAMIN D CREAM
+"DATA",176.112,31928,1)
+313660^^Y
+"DATA",176.112,31929,0)
+4010569^VITAMIN A/VITAMIN D/VITAMIN E CREAM
+"DATA",176.112,31929,1)
+313662^^Y
+"DATA",176.112,31930,0)
+4001809^VITAMIN AND MINERAL FORMULA #16 TAB
+"DATA",176.112,31930,1)
+313663^^Y
+"DATA",176.112,31931,0)
+4002160^VITAMIN B COMPLEX TAB,SA
+"DATA",176.112,31931,1)
+313664^^Y
+"DATA",176.112,31932,0)
+4002157^VITAMIN B COMPLEX W/B-12 TAB
+"DATA",176.112,31932,1)
+313665^^Y
+"DATA",176.112,31933,0)
+4002081^VITAMIN B COMPLEX W/C & B-12 INJ
+"DATA",176.112,31933,1)
+313666^^Y
+"DATA",176.112,31934,0)
+4002158^VITAMIN B COMPLEX W/C & B-12 TAB
+"DATA",176.112,31934,1)
+313667^^Y
+"DATA",176.112,31935,0)
+4005361^VITAMIN B COMPLEX W/C & IRON TAB
+"DATA",176.112,31935,1)
+313668^^Y
+"DATA",176.112,31936,0)
+4001865^VITAMIN B COMPLEX W/MINERALS LIQUID
+"DATA",176.112,31936,1)
+313669^^Y
+"DATA",176.112,31937,0)
+4002099^VITAMIN B W/C,THERAPEUTIC CAP
+"DATA",176.112,31937,1)
+313670^^Y
+"DATA",176.112,31938,0)
+4005345^VITAMIN B/FE AMMONIUM CITRATE 30MG/LIVER INJ
+"DATA",176.112,31938,1)
+313671^^Y
+"DATA",176.112,31939,0)
+4005336^VITAMIN B/FE AMMONIUM CITRATE 60MG/LIVER INJ
+"DATA",176.112,31939,1)
+313672^^Y
+"DATA",176.112,31940,0)
+4005353^VITAMIN B/FE GLUCONATE 100MG INJ
+"DATA",176.112,31940,1)
+313673^^Y
+"DATA",176.112,31941,0)
+4005335^VITAMIN B/FE GLUCONATE 20MG INJ
+"DATA",176.112,31941,1)
+313674^^Y
+"DATA",176.112,31942,0)
+4005347^VITAMIN B/FE GLUCONATE 20MG/LIVER INJ
+"DATA",176.112,31942,1)
+313675^^Y
+"DATA",176.112,31943,0)
+4005343^VITAMIN B/FE GLUCONATE 25MG INJ
+"DATA",176.112,31943,1)
+313676^^Y
+"DATA",176.112,31944,0)
+4005325^VITAMIN B/FE GLUCONATE 25MG/LIVER INJ
+"DATA",176.112,31944,1)
+313677^^Y
+"DATA",176.112,31945,0)
+4005322^VITAMIN B/FE GLUCONATE 31MG INJ
+"DATA",176.112,31945,1)
+313678^^Y
+"DATA",176.112,31946,0)
+4005334^VITAMIN B/FE GLUCONATE 50MG INJ
+"DATA",176.112,31946,1)
+313679^^Y
+"DATA",176.112,31947,0)
+4005323^VITAMIN B/FE GLUCONATE 50MG/LIVER INJ
+"DATA",176.112,31947,1)
+313680^^Y
+"DATA",176.112,31948,0)
+4005356^VITAMIN B/FE PYROPHOSPHATE 20MG/5ML LIQUID
+"DATA",176.112,31948,1)
+313681^^Y
+"DATA",176.112,31949,0)
+4005337^VITAMIN B/FERRIC AMMONIUM CITRATE 20MG INJ
+"DATA",176.112,31949,1)
+313682^^Y
+"DATA",176.112,31950,0)
+4005332^VITAMIN B/FERRIC AMMONIUM CITRATE 72MG INJ
+"DATA",176.112,31950,1)
+313683^^Y
+"DATA",176.112,31951,0)
+4005327^VITAMIN B/FERRIC PYROPHOSPHATE 100MG/FA 0.25MG LIQUID
+"DATA",176.112,31951,1)
+313684^^Y
+"DATA",176.112,31952,0)
+4005340^VITAMIN B/FERRIC PYROPHOSPHATE 10MG/15ML ELIXIR
+"DATA",176.112,31952,1)
+313685^^Y
+"DATA",176.112,31953,0)
+4005346^VITAMIN B/IRON 19.5MG/LIVER INJ
+"DATA",176.112,31953,1)
+313686^^Y
+"DATA",176.112,31954,0)
+4005338^VITAMIN B/IRON 23MG/LIVER INJ
+"DATA",176.112,31954,1)
+313687^^Y
+"DATA",176.112,31955,0)
+4005355^VITAMIN B/IRON 31MG INJ
+"DATA",176.112,31955,1)
+313688^^Y
+"DATA",176.112,31956,0)
+4005330^VITAMIN B/IRON INJ
+"DATA",176.112,31956,1)
+313689^^Y
+"DATA",176.112,31957,0)
+4002068^VITAMIN B/NIACIN 100MG/VITAMIN C 150MG TAB
+"DATA",176.112,31957,1)
+313690^^Y
+"DATA",176.112,31958,0)
+4002066^VITAMIN B/NIACIN 250MG/VITAMIN C 150MG TAB
+"DATA",176.112,31958,1)
+313691^^Y
+"DATA",176.112,31959,0)
+4002067^VITAMIN B/NIACIN 300MG/VITAMIN C 150MG TAB
+"DATA",176.112,31959,1)
+313692^^Y
+"DATA",176.112,31960,0)
+4002057^VITAMIN B/VITAMIN C 100MG/ML INJ (PN)
+"DATA",176.112,31960,1)
+313693^^Y
+"DATA",176.112,31961,0)
+4009604^VITAMIN B/VITAMIN C 200MG/ZINC 30MG TAB
+"DATA",176.112,31961,1)
+313694^^Y
+"DATA",176.112,31962,0)
+4002079^VITAMIN B/VITAMIN C 300MG CAP
+"DATA",176.112,31962,1)
+313695^^Y
+"DATA",176.112,31963,0)
+4002080^VITAMIN B/VITAMIN C 300MG CAP,SA
+"DATA",176.112,31963,1)
+313696^^Y
+"DATA",176.112,31964,0)
+4002056^VITAMIN B/VITAMIN C 500MG TAB
+"DATA",176.112,31964,1)
+313697^^Y
+"DATA",176.112,31965,0)
+4002062^VIT B/VIT C 500MG/FA 0.5MG TAB
+"DATA",176.112,31965,1)
+313698^^Y
+"DATA",176.112,31966,0)
+4002072^VITAMIN B/VITAMIN C 500MG,THERAPEUTIC TAB
+"DATA",176.112,31966,1)
+313698^^Y
+"DATA",176.112,31967,0)
+4001884^VITAMIN B/VITAMIN C 500MG/FOLIC ACID 0.5MG TAB
+"DATA",176.112,31967,1)
+313699^^Y
+"DATA",176.112,31968,0)
+4009603^VITAMIN B/VITAMIN C 500MG/ZINC 30MG TAB
+"DATA",176.112,31968,1)
+313700^^Y
+"DATA",176.112,31969,0)
+4002070^VITAMIN B/VITAMIN C 50MG INJ
+"DATA",176.112,31969,1)
+313701^^Y
+"DATA",176.112,31970,0)
+4002075^VITAMIN B/VITAMIN C 5MG INJ
+"DATA",176.112,31970,1)
+313702^^Y
+"DATA",176.112,31971,0)
+4002064^VITAMIN B/VITAMIN C 75MG CAP
+"DATA",176.112,31971,1)
+313703^^Y
+"DATA",176.112,31972,0)
+4007771^VITAMIN E OIL,TOP
+"DATA",176.112,31972,1)
+313725^^Y
+"DATA",176.112,31973,0)
+4001807^VITAMIN-MINERAL-SUPPLEMENT LIQUID
+"DATA",176.112,31973,1)
+313726^^Y
+"DATA",176.112,31974,0)
+4012877^VIVONEX FLAVOR PACKET CHERRY-VANILLA
+"DATA",176.112,31974,1)
+313727^^Y
+"DATA",176.112,31975,0)
+4012879^VIVONEX FLAVOR PACKET ORANGE-PINEAPPLE
+"DATA",176.112,31975,1)
+313728^^Y
+"DATA",176.112,31976,0)
+4012875^VIVONEX FLAVOR PACKET RASPBERRY
+"DATA",176.112,31976,1)
+313729^^Y
+"DATA",176.112,31977,0)
+4012881^VIVONEX PLUS POWDER,PKT,84GM
+"DATA",176.112,31977,1)
+313730^^Y
+"DATA",176.112,31978,0)
+4012874^VIVONEX T.E.N. POWDER,PKT,80.4GM
+"DATA",176.112,31978,1)
+313731^^Y
+"DATA",176.112,31979,0)
+4010055^WATER IN OIL OINT,TOP
+"DATA",176.112,31979,1)
+313740^^Y
+"DATA",176.112,31980,0)
+4003519^WATER/BENZYL ALCOHOL INJ
+"DATA",176.112,31980,1)
+313743^^Y
+"DATA",176.112,31981,0)
+4009594^WHEAT GERM OIL 6MIN CAP
+"DATA",176.112,31981,1)
+313746^^Y
+"DATA",176.112,31982,0)
+4009593^WHEAT GERM OIL OINT,TOP
+"DATA",176.112,31982,1)
+313747^^Y
+"DATA",176.112,31983,0)
+4009976^WILD CHERRY SYRUP
+"DATA",176.112,31983,1)
+313748^^Y
+"DATA",176.112,31984,0)
+4003949^XENON (XE-133) 1000MIL/AMP GAS
+"DATA",176.112,31984,1)
+313749^^Y
+"DATA",176.112,31985,0)
+4002007^YELLOW FEVER VACCINE INJ
+"DATA",176.112,31985,1)
+313755^^Y
+"DATA",176.112,31986,0)
+4001885^ZENATE ADVANCED FORMULA TAB
+"DATA",176.112,31986,1)
+313764^^Y
+"DATA",176.112,31987,0)
+4009566^ZINC OXIDE PWDR
+"DATA",176.112,31987,1)
+313769^^Y
+"DATA",176.112,31988,0)
+4008355^ACETEST (KETONE) TAB (NOT FOR ORAL USE)
+"DATA",176.112,31988,1)
+313785^^Y
+"DATA",176.112,31989,0)
+4008841^ALOE/VIT A 100000UNT/VIT E 1500UNT/30GM CREAM,TOP
+"DATA",176.112,31989,1)
+313790^^Y
+"DATA",176.112,31990,0)
+4009832^ALUMINUM ACETATE/ZINC OXIDE PASTE,TOP
+"DATA",176.112,31990,1)
+313791^^Y
+"DATA",176.112,31991,0)
+4006723^AMYLASE/CELLULASE/HYOSCYAMINE/LIPASE/P-TOLOXAMINE/PROTEASE CAP
+"DATA",176.112,31991,1)
+313818^^Y
+"DATA",176.112,31992,0)
+4001882^ADEFLOR-M TAB
+"DATA",176.112,31992,1)
+313828^^Y
+"DATA",176.112,31993,0)
+4008519^ADVANTAGE-H (GLUCOSE) TEST STRIP #787
+"DATA",176.112,31993,1)
+313830^^Y
+"DATA",176.112,31994,0)
+4010418^ALCLOXA 0.2%/PRAMOXINE 1%/WITCH HAZEL 50% WIPE
+"DATA",176.112,31994,1)
+313831^^Y
+"DATA",176.112,31995,0)
+4010321^ALCOHOL/GUM BENZOIN 7% COLD SORE LOTION
+"DATA",176.112,31995,1)
+313832^^Y
+"DATA",176.112,31996,0)
+4001175^AMOBARBITAL NA PWDR
+"DATA",176.112,31996,1)
+313837^^Y
+"DATA",176.112,31997,0)
+4007864^ANATUSS SYRUP
+"DATA",176.112,31997,1)
+313838^^Y
+"DATA",176.112,31998,0)
+4013829^ALOE VESTA BODY WASH,SHAMPOO
+"DATA",176.112,31998,1)
+313848^^Y
+"DATA",176.112,31999,0)
+4010066^BAGENEMA/BISACODYL TAB 5MG #4/CASTILE SOAP 20ML/CASTOR OIL 45ML
+"DATA",176.112,31999,1)
+313856^^Y
+"DATA",176.112,32000,0)
+4008373^NUTRADERM BATH OIL
+"DATA",176.112,32000,1)
+313857^^Y
+"DATA",176.112,32001,0)
+4013757^BIOTENE DENTAL CHEWING GUM
+"DATA",176.112,32001,1)
+313875^^Y
+"DATA",176.112,32002,0)
+4013786^BOOST LIQUID STRAWBERRY
+"DATA",176.112,32002,1)
+313876^^Y
+"DATA",176.112,32003,0)
+4013796^BOOST PWDR VANILLA
+"DATA",176.112,32003,1)
+313877^^Y
+"DATA",176.112,32004,0)
+4013799^BOOST PUDDING BUTTERSCOTCH
+"DATA",176.112,32004,1)
+313878^^Y
+"DATA",176.112,32005,0)
+4013802^BOOST PLUS LIQUID VANILLA
+"DATA",176.112,32005,1)
+313879^^Y
+"DATA",176.112,32006,0)
+4013828^BAZA PRO CREAM,TOP
+"DATA",176.112,32006,1)
+313880^^Y
+"DATA",176.112,32007,0)
+4014215^BIAFINE RE CREAM,TOP
+"DATA",176.112,32007,1)
+313881^^Y
+"DATA",176.112,32008,0)
+4008341^COMBISTIX (GLUCOSE/pH/PROTEIN) TEST STRIP
+"DATA",176.112,32008,1)
+313895^^Y
+"DATA",176.112,32009,0)
+4008490^CHEMSTRIP UG (GLUCOSE) TEST STRIP
+"DATA",176.112,32009,1)
+313901^^Y
+"DATA",176.112,32010,0)
+4009882^COMPLEAT REGULAR LIQUID (CLOSED SYSTEM)
+"DATA",176.112,32010,1)
+313909^^Y
+"DATA",176.112,32011,0)
+4012401^CARRINGTON WHIRLPOOL SOLN
+"DATA",176.112,32011,1)
+313915^^Y
+"DATA",176.112,32012,0)
+4010369^CARRINGTON DRESSING GEL SPRAY,TOP
+"DATA",176.112,32012,1)
+313916^^Y
+"DATA",176.112,32013,0)
+4012616^BASIS SOAP BAR,NORMAL/DRY SKIN
+"DATA",176.112,32013,1)
+313918^^Y
+"DATA",176.112,32014,0)
+4013097^CEFTRIAXONE NA 1GM/VIL/LIDOCAINE 1% INJ,KIT
+"DATA",176.112,32014,1)
+313924^^Y
+"DATA",176.112,32015,0)
+4013082^CETAPHIL CLEANSING BAR
+"DATA",176.112,32015,1)
+313928^^Y
+"DATA",176.112,32016,0)
+4012865^CANDIDA ALBICANS SKIN TEST
+"DATA",176.112,32016,1)
+313930^^Y
+"DATA",176.112,32017,0)
+4013363^CARBAMAZEPINE 300MG CAP,SA (CARBATROL)
+"DATA",176.112,32017,1)
+313931^^Y
+"DATA",176.112,32018,0)
+4015259^CYCLOSPORINE (EON) 25MG CAP
+"DATA",176.112,32018,1)
+313937^^Y
+"DATA",176.112,32019,0)
+4006679^DILTIAZEM (CARDIZEM CD) 120MG SA CAP
+"DATA",176.112,32019,1)
+313959^^Y
+"DATA",176.112,32020,0)
+4013928^DILTIAZEM (CARDIZEM CD) 120MG SA CAP,UD
+"DATA",176.112,32020,1)
+313959^^Y
+"DATA",176.112,32021,0)
+4010083^EVAC-Q-MAG 300ML/EVAC-Q-SERT SUPP #2/EVAC-Q-TAB 130MG #2 KIT
+"DATA",176.112,32021,1)
+313970^^Y
+"DATA",176.112,32022,0)
+4010599^ENSURE HN LIQUID VANILLA
+"DATA",176.112,32022,1)
+313971^^Y
+"DATA",176.112,32023,0)
+4010603^ENSURE PLUS LIQUID TUBE FEEDING
+"DATA",176.112,32023,1)
+313972^^Y
+"DATA",176.112,32024,0)
+4015106^E-Z-EM PREP KIT
+"DATA",176.112,32024,1)
+313976^^Y
+"DATA",176.112,32025,0)
+4015452^ENSURE PLUS LIQUID BUTTER PECAN
+"DATA",176.112,32025,1)
+313977^^Y
+"DATA",176.112,32026,0)
+4013364^FAST TAKE (GLUCOSE) TEST STRIP
+"DATA",176.112,32026,1)
+313984^^Y
+"DATA",176.112,32027,0)
+4013603^FLANDERS BUTTOCKS OINT,TOP
+"DATA",176.112,32027,1)
+313985^^Y
+"DATA",176.112,32028,0)
+4008482^GLUCOSTIX (GLUCOSE) TEST STRIP
+"DATA",176.112,32028,1)
+313998^^Y
+"DATA",176.112,32029,0)
+4001841^GLUTOFAC TAB
+"DATA",176.112,32029,1)
+313999^^Y
+"DATA",176.112,32030,0)
+4009523^MENTHOL/METHYL SALICYLATE CREAM,TOP
+"DATA",176.112,32030,1)
+314003^^Y
+"DATA",176.112,32031,0)
+4012090^GLUCERNA LIQUID VANILLA
+"DATA",176.112,32031,1)
+314005^^Y
+"DATA",176.112,32032,0)
+4001476^INSULIN ULTRALENTE HUMULIN U 100 U/ML INJ
+"DATA",176.112,32032,1)
+314045^^Y
+"DATA",176.112,32033,0)
+4007328^IODINE 2% PREP PAD
+"DATA",176.112,32033,1)
+314048^^Y
+"DATA",176.112,32034,0)
+4013833^INFLUENZA SUBVIRON VACCINE,'99-'00,TUBEX,0.5ML
+"DATA",176.112,32034,1)
+314053^^Y
+"DATA",176.112,32035,0)
+4013834^INFLUENZA SUBVIRON VACCINE,'99-'00,VIL,5ML
+"DATA",176.112,32035,1)
+314054^^Y
+"DATA",176.112,32036,0)
+4013114^KAO LECTROLYTE PWDR,ORAL,GRAPE
+"DATA",176.112,32036,1)
+314060^^Y
+"DATA",176.112,32037,0)
+4009383^LANOLIN,HYDROUS OINT,TOP
+"DATA",176.112,32037,1)
+314064^^Y
+"DATA",176.112,32038,0)
+4008553^LANOLIN/MINERAL OIL 42.5%/PETROLATUM 55% OINT,OPH
+"DATA",176.112,32038,1)
+314069^^Y
+"DATA",176.112,32039,0)
+4009188^MULTISTIX 8 (MULTIPLE) TEST STRIP
+"DATA",176.112,32039,1)
+314083^^Y
+"DATA",176.112,32040,0)
+4009196^MULTISTIX SG (FOR CLINI-TEK) TEST STRIP
+"DATA",176.112,32040,1)
+314084^^Y
+"DATA",176.112,32041,0)
+4002087^MULTIVITAMINS TAB,CHEWABLE
+"DATA",176.112,32041,1)
+314085^^Y
+"DATA",176.112,32042,0)
+4002063^MULTIVITAMIN TAB,CHEWABLE
+"DATA",176.112,32042,1)
+314085^^Y
+"DATA",176.112,32043,0)
+4004573^MEZLOCILLIN NA 1GM/VIL INJ
+"DATA",176.112,32043,1)
+314089^^Y
+"DATA",176.112,32044,0)
+4002096^MULTIVITAMINS LIQUID
+"DATA",176.112,32044,1)
+314090^^Y
+"DATA",176.112,32045,0)
+4001812^STRESS FORMULA W/ZINC TAB
+"DATA",176.112,32045,1)
+314091^^Y
+"DATA",176.112,32046,0)
+4005290^MICONAZOLE 200MG SUPP,7/MICONAZOLE 2% CREAM PAK
+"DATA",176.112,32046,1)
+314094^^Y
+"DATA",176.112,32047,0)
+4001810^MULTIVITAMINS TAB
+"DATA",176.112,32047,1)
+314105^^Y
+"DATA",176.112,32048,0)
+4013962^MULTIVITAMIN TAB,UD
+"DATA",176.112,32048,1)
+314105^^Y
+"DATA",176.112,32049,0)
+4014510^MAGNESIUM 133MG PLUS PROTEIN TAB
+"DATA",176.112,32049,1)
+314112^^Y
+"DATA",176.112,32050,0)
+4015408^MINERALS W/MULTIVITAMINS CAP/TAB,UD
+"DATA",176.112,32050,1)
+314114^^Y
+"DATA",176.112,32051,0)
+4009901^IMPACT LIQUID
+"DATA",176.112,32051,1)
+314125^^Y
+"DATA",176.112,32052,0)
+4009887^ISOSOURCE HN LIQUID (VANILLA)
+"DATA",176.112,32052,1)
+314126^^Y
+"DATA",176.112,32053,0)
+4009893^MERITENE LIQUID (VANILLA SUPREME)
+"DATA",176.112,32053,1)
+314127^^Y
+"DATA",176.112,32054,0)
+4009911^RESOURCE PLUS LIQUID (STRAWBERRY)
+"DATA",176.112,32054,1)
+314128^^Y
+"DATA",176.112,32055,0)
+4009902^RESOURCE INSTANT CRYSTALS (VANILLA)
+"DATA",176.112,32055,1)
+314129^^Y
+"DATA",176.112,32056,0)
+4010617^POLYCOSE PWDR,ORAL
+"DATA",176.112,32056,1)
+314130^^Y
+"DATA",176.112,32057,0)
+4012878^VIVONEX FLAVOR PACKET LEMON-LIME
+"DATA",176.112,32057,1)
+314134^^Y
+"DATA",176.112,32058,0)
+4008481^ONE TOUCH (GLUCOSE) TEST STRIP
+"DATA",176.112,32058,1)
+314143^^Y
+"DATA",176.112,32059,0)
+4015481^MULTIVITAMIN/OPTH ANTIOXIDANT TAB/CAP
+"DATA",176.112,32059,1)
+314158^^Y
+"DATA",176.112,32060,0)
+4001875^OCUVITE TAB
+"DATA",176.112,32060,1)
+314159^^Y
+"DATA",176.112,32061,0)
+4008530^PSYLLIUM SUGAR FREE INSTANT MIX PWDR
+"DATA",176.112,32061,1)
+314169^^Y
+"DATA",176.112,32062,0)
+4012102^PULMOCARE LIQUID VANILLA
+"DATA",176.112,32062,1)
+314179^^Y
+"DATA",176.112,32063,0)
+4012099^PERATIVE LIQUID UNFLAVORED
+"DATA",176.112,32063,1)
+314180^^Y
+"DATA",176.112,32064,0)
+4012101^PROMOTE LIQUID VANILLA
+"DATA",176.112,32064,1)
+314181^^Y
+"DATA",176.112,32065,0)
+4009877^GLYCERIN/MINERAL OIL/PHENOL LIQUID,TOP
+"DATA",176.112,32065,1)
+314185^^Y
+"DATA",176.112,32066,0)
+4012782^PONARIS NASAL EMOLLIENT
+"DATA",176.112,32066,1)
+314191^^Y
+"DATA",176.112,32067,0)
+4006035^PHARMALYTE TM MULTI-ELECTROLYTE INJ
+"DATA",176.112,32067,1)
+314194^^Y
+"DATA",176.112,32068,0)
+4015374^PEGINTERFERON ALPHA-2B 100MCG/ML INJ,KIT
+"DATA",176.112,32068,1)
+314202^^Y
+"DATA",176.112,32069,0)
+4014295^RESOURCE DIABETIC LIQUID (STRAWBERRY)
+"DATA",176.112,32069,1)
+314213^^Y
+"DATA",176.112,32070,0)
+4008664^SUSTAGEN PWDR VANILLA
+"DATA",176.112,32070,1)
+314218^^Y
+"DATA",176.112,32071,0)
+4009670^S-M-A IRON FORTIFIED,INFANT FORMULA PWDR
+"DATA",176.112,32071,1)
+314219^^Y
+"DATA",176.112,32072,0)
+4014691^SCANDISHAKE PWDR/PKT,85GM VANILLA
+"DATA",176.112,32072,1)
+314233^^Y
+"DATA",176.112,32073,0)
+4009847^TOPIC GEL,TOP
+"DATA",176.112,32073,1)
+314246^^Y
+"DATA",176.112,32074,0)
+4003737^THEOPHYLLINE 125MG CAP,SA (AEROLATE JR)
+"DATA",176.112,32074,1)
+314251^^Y
+"DATA",176.112,32075,0)
+4003752^THEOPHYLLINE 200MG TAB,SA (QUALITEST)
+"DATA",176.112,32075,1)
+314252^^Y
+"DATA",176.112,32076,0)
+4006105^THIOPENTAL NA 2GM KIT SUSP,RTL
+"DATA",176.112,32076,1)
+314260^^Y
+"DATA",176.112,32077,0)
+4014564^TRAUMACAL LIQUID
+"DATA",176.112,32077,1)
+314263^^Y
+"DATA",176.112,32078,0)
+4015109^THEOPHYLLINE 200MG CAP,SA (INWOOD)
+"DATA",176.112,32078,1)
+314264^^Y
+"DATA",176.112,32079,0)
+4009201^URISTIX 4 (MULTIPLE) TEST STRIP
+"DATA",176.112,32079,1)
+314269^^Y
+"DATA",176.112,32080,0)
+4005453^URINARY ANTISEPTIC W/METHENAMINE 120MG TAB
+"DATA",176.112,32080,1)
+314270^^Y
+"DATA",176.112,32081,0)
+4002077^VITAMIN B/VITAMIN C 300MG TAB
+"DATA",176.112,32081,1)
+314274^^Y
+"DATA",176.112,32082,0)
+4008486^VISIDEX II (GLUCOSE) TEST STRIP
+"DATA",176.112,32082,1)
+314275^^Y
+"DATA",176.112,32083,0)
+4008513^GLUCOSE CONTROL 3L ACCU-CHEK ADVANTAGE SOLN
+"DATA",176.112,32083,1)
+314281^^Y
+"DATA",176.112,32084,0)
+4008514^GLUCOSE CONTROL 2 LEVEL ACCU-CHEK ADVANTAGE SOLN
+"DATA",176.112,32084,1)
+314282^^Y
+"DATA",176.112,32085,0)
+4012862^MICROSTIX (CANDIDA ALBICANS) TEST STRIP
+"DATA",176.112,32085,1)
+314283^^Y
+"DATA",176.112,32086,0)
+4009746^BEESWAX,YELLOW
+"DATA",176.112,32086,1)
+314516^^Y
+"DATA",176.112,32087,0)
+4009124^MINERAL OIL,EXTRA HEAVY
+"DATA",176.112,32087,1)
+314736^^Y
+"DATA",176.112,32088,0)
+4006033^MULTI-ELECTROLYTES INJ
+"DATA",176.112,32088,1)
+314916^^Y
+"DATA",176.112,32089,0)
+4002078^BETALIN COMPLEX ELIXIR
+"DATA",176.112,32089,1)
+314924^^Y
+"DATA",176.112,32090,0)
+4001857^VIMINATE ELIXIR
+"DATA",176.112,32090,1)
+314925^^Y
+"DATA",176.112,32091,0)
+4001843^I-L-X B12 ELIXIR
+"DATA",176.112,32091,1)
+314934^^Y
+"DATA",176.112,32092,0)
+4003939^IOTHALAMATE NA 54.3% KIT
+"DATA",176.112,32092,1)
+314936^^Y
+"DATA",176.112,32093,0)
+4007932^TRIVA JELLY,VAG
+"DATA",176.112,32093,1)
+314937^^Y
+"DATA",176.112,32094,0)
+4004501^ALLERGENIC EXTRACT, HOUSE DUST INJ,SUSP
+"DATA",176.112,32094,1)
+314948^^Y
+"DATA",176.112,32095,0)
+4010527^PEDI-DRI PWDR,TOP
+"DATA",176.112,32095,1)
+314959^^Y
+"DATA",176.112,32096,0)
+4007915^AMMONIUM CL/GLYCYRRHIZA/HYOSCYAMUS 8MG/PB 8MG/TERPIN HYDRATE LOZ
+"DATA",176.112,32096,1)
+314962^^Y
+"DATA",176.112,32097,0)
+4005975^ISOLYTE G/DEXTROSE 5% GASTRIC REPL INJ
+"DATA",176.112,32097,1)
+314963^^Y
+"DATA",176.112,32098,0)
+4004984^VIT B/VIT C/ESTROGENS/FE SO4/METHAMPHETAMINE/ME-TESTOSTERONE CAP
+"DATA",176.112,32098,1)
+314967^^Y
+"DATA",176.112,32099,0)
+4004985^VIT B/VIT C/ESTROGENS/FE SO4/METHAMPHETAMINE/ME-TESTOSTERONE TAB
+"DATA",176.112,32099,1)
+314968^^Y
+"DATA",176.112,32100,0)
+4001759^MULTIVITAMINS/MINERALS TAB,EC
+"DATA",176.112,32100,1)
+314970^^Y
+"DATA",176.112,32101,0)
+4001766^MULTIVITAMINS/MINERALS,THERAPEUTIC CAP
+"DATA",176.112,32101,1)
+314972^^Y
+"DATA",176.112,32102,0)
+4001878^MULTIVITAMINS W/FLUORIDE 0.25MG/ML DROPS,ORAL
+"DATA",176.112,32102,1)
+314975^^Y
+"DATA",176.112,32103,0)
+4001758^MULTIVITAMINS/IRON 10MG/FLUORIDE 0.25MG/ML DROPS,ORAL
+"DATA",176.112,32103,1)
+314976^^Y
+"DATA",176.112,32104,0)
+4009650^TRIPLE VITAMINS/FLUORIDE 0.25MG/IRON 10MG/ML DROPS,ORAL
+"DATA",176.112,32104,1)
+314977^^Y
+"DATA",176.112,32105,0)
+4002237^MULTIVITAMINS/FLUORIDE 0.5MG/ML LIQUID
+"DATA",176.112,32105,1)
+314978^^Y
+"DATA",176.112,32106,0)
+4002073^VITAMIN B/VITAMIN C 50MG/ML INJ
+"DATA",176.112,32106,1)
+314979^^Y
+"DATA",176.112,32107,0)
+4002076^MULTIVITAMIN INJ
+"DATA",176.112,32107,1)
+314980^^Y
+"DATA",176.112,32108,0)
+4002082^MULTI-VITAMIN INJ
+"DATA",176.112,32108,1)
+314980^^Y
+"DATA",176.112,32109,0)
+4002244^TRIPLE VITAMINS W/FLUORIDE 1MG TAB,CHEWABLE
+"DATA",176.112,32109,1)
+314981^^Y
+"DATA",176.112,32110,0)
+4002762^MULTIVITAMINS/IRON 350MG/FA 1MG/INTRINSIC FACTOR/DOSS 50MG CAP
+"DATA",176.112,32110,1)
+314983^^Y
+"DATA",176.112,32111,0)
+4002246^MULTIVITAMINS/FLUORIDE 1MG TAB
+"DATA",176.112,32111,1)
+314984^^Y
+"DATA",176.112,32112,0)
+4001777^BE-C 800 W/IRON TAB
+"DATA",176.112,32112,1)
+314985^^Y
+"DATA",176.112,32113,0)
+4009519^B-DONNA 0.1296MG/KAOLIN/PECTIN/NA BENZOATE 60MG/30ML SUSP,ORAL
+"DATA",176.112,32113,1)
+314989^^Y
+"DATA",176.112,32114,0)
+4007749^B-DONNA 0.083MG/CTM 1.5MG/P-EPHRINE 5MG TAB
+"DATA",176.112,32114,1)
+314990^^Y
+"DATA",176.112,32115,0)
+4007748^B-DONNA/BUTABARB 7.5MG/OX BILE/PEPSIN TAB
+"DATA",176.112,32115,1)
+314991^^Y
+"DATA",176.112,32116,0)
+4007622^URINARY ANTISEPTIC W/METHENAMINE 40.8MG/GELSEMIUM TAB
+"DATA",176.112,32116,1)
+314992^^Y
+"DATA",176.112,32117,0)
+4007464^BARBITAL 65MG/HYOSCYAMINE/HYOSCYAMUS/PASSIFLORA/SCOP/VALERIAN TB
+"DATA",176.112,32117,1)
+314995^^Y
+"DATA",176.112,32118,0)
+4003984^BARIUM SO4 1.5% SUSP,ORAL
+"DATA",176.112,32118,1)
+314996^^Y
+"DATA",176.112,32119,0)
+4004002^BARIUM SO4 PWDR 18OZ,RTL
+"DATA",176.112,32119,1)
+314997^^Y
+"DATA",176.112,32120,0)
+4003998^BARIUM SO4 18OZ PWDR,RTL
+"DATA",176.112,32120,1)
+314997^^Y
+"DATA",176.112,32121,0)
+4004007^BARIUM SO4 315GM PWDR,ORAL
+"DATA",176.112,32121,1)
+314998^^Y
+"DATA",176.112,32122,0)
+4004014^BARIUM SO4 37.5% LIQUID
+"DATA",176.112,32122,1)
+314999^^Y
+"DATA",176.112,32123,0)
+4007985^BUTABARB 15MG/GG 150MG/PSEUDEFED 30MG/THEOPHYLLINE 150MG ELIX
+"DATA",176.112,32123,1)
+315010^^Y
+"DATA",176.112,32124,0)
+4007404^DEXTROSE 5%/LACTATED RINGER'S/KCL 40MEQ/L INJ
+"DATA",176.112,32124,1)
+315012^^Y
+"DATA",176.112,32125,0)
+4005956^DEXTROSE 10%/LACTATED RINGER'S INJ
+"DATA",176.112,32125,1)
+315016^^Y
+"DATA",176.112,32126,0)
+4006130^INPERSOL/DEXTROSE 1.5% SOLN
+"DATA",176.112,32126,1)
+315017^^Y
+"DATA",176.112,32127,0)
+4005320^VITAMIN B/FERROUS SO4 525MG TAB
+"DATA",176.112,32127,1)
+315018^^Y
+"DATA",176.112,32128,0)
+4006930^VITAMIN B/LYSINE 275MG SYRUP
+"DATA",176.112,32128,1)
+315019^^Y
+"DATA",176.112,32129,0)
+4003877^CEFORANIDE 20GM/VIL INJ
+"DATA",176.112,32129,1)
+315024^^Y
+"DATA",176.112,32130,0)
+4001770^MULTIVITAMINS/MINERALS LIQUID
+"DATA",176.112,32130,1)
+315039^^Y
+"DATA",176.112,32131,0)
+4007388^CONTE-PAK-4 INJ
+"DATA",176.112,32131,1)
+315040^^Y
+"DATA",176.112,32132,0)
+4007377^PEDTRACE-4 INJ
+"DATA",176.112,32132,1)
+315042^^Y
+"DATA",176.112,32133,0)
+4005053^CHYMOPAPAIN 10000UNT/VIL INJ
+"DATA",176.112,32133,1)
+315044^^Y
+"DATA",176.112,32134,0)
+4005348^VITAMIN B/FERRIC AMMONIUM CITRATE 100MG ELIXIR
+"DATA",176.112,32134,1)
+315053^^Y
+"DATA",176.112,32135,0)
+4005354^VITAMIN B/FE GLUCONATE 100MG/LIVER INJ
+"DATA",176.112,32135,1)
+315054^^Y
+"DATA",176.112,32136,0)
+4005333^VITAMIN B/FE GLUCONATE 40MG INJ
+"DATA",176.112,32136,1)
+315055^^Y
+"DATA",176.112,32137,0)
+4009540^PSYLLIUM 50%/DEXTROSE 50% PWDR,ORAL
+"DATA",176.112,32137,1)
+315068^^Y
+"DATA",176.112,32138,0)
+4013252^DILTIAZEM (WATSON-XR) 240MG SA CAP
+"DATA",176.112,32138,1)
+315079^^Y
+"DATA",176.112,32139,0)
+4006075^FAT EMULSION (SAFFLOWER) 20% INJ
+"DATA",176.112,32139,1)
+315084^^Y
+"DATA",176.112,32140,0)
+4007912^HYOSCYAMUS/PASSIFLORA/PHENOBARB 15MG/VALERIAN EXT TAB
+"DATA",176.112,32140,1)
+315124^^Y
+"DATA",176.112,32141,0)
+4001492^INSULIN NPH BEEF 100 U/ML INJ NOVO
+"DATA",176.112,32141,1)
+315126^^Y
+"DATA",176.112,32142,0)
+4006019^NORMOSOL-M INJ
+"DATA",176.112,32142,1)
+315137^^Y
+"DATA",176.112,32143,0)
+4003950^SODIUM HYDROXYMETHANE DIPHOSPHONATE 2MG/STANNOUS CL 0.16MG INJ
+"DATA",176.112,32143,1)
+315162^^Y
+"DATA",176.112,32144,0)
+4001080^SODIUM CHLORIDE 0.9% PROCESSING SOLN
+"DATA",176.112,32144,1)
+315210^^Y
+"DATA",176.112,32145,0)
+4001090^SODIUM CHLORIDE 0.9% SOLN
+"DATA",176.112,32145,1)
+315210^^Y
+"DATA",176.112,32146,0)
+4004940^SODIUM FLUORIDE 0.2% SOLN
+"DATA",176.112,32146,1)
+315212^^Y
+"DATA",176.112,32147,0)
+4004929^SODIUM FLUORIDE 0.2% SOLN,DENT
+"DATA",176.112,32147,1)
+315212^^Y
+"DATA",176.112,32148,0)
+4006109^THIOPENTAL NA 500MG/SYRINGE INJ
+"DATA",176.112,32148,1)
+315230^^Y
+"DATA",176.112,32149,0)
+4009592^WHEAT GERM OIL 20MIN CAP
+"DATA",176.112,32149,1)
+315244^^Y
+"DATA",176.112,32150,0)
+4001861^MULTIVITAMINS W/MINERALS SYRUP
+"DATA",176.112,32150,1)
+317013^^Y
+"DATA",176.112,32151,0)
+4013954^NIACIN (NIASPAN-KOS) 750MG TAB,SA
+"DATA",176.112,32151,1)
+317015^^Y
+"DATA",176.112,32152,0)
+4026157^NIACIN (NIASPAN) 750MG TAB,SA
+"DATA",176.112,32152,1)
+317015^^Y
+"DATA",176.112,32153,0)
+4008900^ACETIC AC/BENZALKONIUM CL/PARACHLOROMETOXYLENOL/PRAMOXINE OTIC
+"DATA",176.112,32153,1)
+317052^^Y
+"DATA",176.112,32154,0)
+4004856^ACETIC ACID,GLACIAL LIQUID
+"DATA",176.112,32154,1)
+317053^^Y
+"DATA",176.112,32155,0)
+4012133^AL CHLORHYDRATE/MENTHOL/UNDECYLENIC ACID PWDR,AEROSOL
+"DATA",176.112,32155,1)
+317054^^Y
+"DATA",176.112,32156,0)
+4006902^ALLERGENIC EXTRACT,WASP INJ
+"DATA",176.112,32156,1)
+317057^^Y
+"DATA",176.112,32157,0)
+4004000^BARIUM SO4 100% PWDR
+"DATA",176.112,32157,1)
+317062^^Y
+"DATA",176.112,32158,0)
+4007614^BENZYL BENZOATE 50% EMULSION,TOP
+"DATA",176.112,32158,1)
+317063^^Y
+"DATA",176.112,32159,0)
+4008441^BILI-LABSTIX (MULTIPLE) TEST STRIP
+"DATA",176.112,32159,1)
+317064^^Y
+"DATA",176.112,32160,0)
+4013758^BIOTENE ANTIBACTERIAL DRY MOUTH TOOTHPASTE
+"DATA",176.112,32160,1)
+317065^^Y
+"DATA",176.112,32161,0)
+4013793^BOOST HIGH PROTEIN LIQUID VANILLA
+"DATA",176.112,32161,1)
+317066^^Y
+"DATA",176.112,32162,0)
+4013441^BUPROPION HCL (ZYBAN) 150MG TAB,SA
+"DATA",176.112,32162,1)
+317068^^Y
+"DATA",176.112,32163,0)
+4013247^BUPROPION HCL (ZYBAN) 150MG TAB,SA,PACK,60
+"DATA",176.112,32163,1)
+317068^^Y
+"DATA",176.112,32164,0)
+4008922^CALCIUM CARBONATE/SIMETHICONE POWDER,ORAL
+"DATA",176.112,32164,1)
+317070^^Y
+"DATA",176.112,32165,0)
+4009756^CAMPHOR GUM BLOCKS
+"DATA",176.112,32165,1)
+317071^^Y
+"DATA",176.112,32166,0)
+4009419^CAMPHOR/EUCALYPTUS/MENTHOL/METHYL SALICYLATE LOTION
+"DATA",176.112,32166,1)
+317072^^Y
+"DATA",176.112,32167,0)
+4010367^CARRINGTON GEL,TOP
+"DATA",176.112,32167,1)
+317074^^Y
+"DATA",176.112,32168,0)
+4009996^CHERALIN W/CODEINE 12MG/5ML SYRUP
+"DATA",176.112,32168,1)
+317076^^Y
+"DATA",176.112,32169,0)
+4007151^CITRIC ACID 1.5GM/SIMETHICONE/NA BICARB 2GM/PKT PWDR
+"DATA",176.112,32169,1)
+317078^^Y
+"DATA",176.112,32170,0)
+4008483^CLINISTIX (GLUCOSE) TEST STRIP
+"DATA",176.112,32170,1)
+317079^^Y
+"DATA",176.112,32171,0)
+4004354^COPPER 120MG/UNT IUD
+"DATA",176.112,32171,1)
+317083^^Y
+"DATA",176.112,32172,0)
+4008521^DIASCAN (GLUCOSE) TEST STRIP
+"DATA",176.112,32172,1)
+317087^^Y
+"DATA",176.112,32173,0)
+4010545^EDTA/POLYQUATERNIUM-1/SODIUM CHLORIDE SOLN,OPH
+"DATA",176.112,32173,1)
+317091^^Y
+"DATA",176.112,32174,0)
+4007949^EMERSAL EMULSION,TOP
+"DATA",176.112,32174,1)
+317092^^Y
+"DATA",176.112,32175,0)
+4010539^ENZYMATIC CLEANER (PANCREATIN) TAB,OPH
+"DATA",176.112,32175,1)
+317095^^Y
+"DATA",176.112,32176,0)
+4003252^EPINEPHRINE HCL 0.3MG RETRACTION CORD #1
+"DATA",176.112,32176,1)
+317096^^Y
+"DATA",176.112,32177,0)
+4010492^FLEX-ALL 454 GEL,TOP
+"DATA",176.112,32177,1)
+317098^^Y
+"DATA",176.112,32178,0)
+4008606^GELATIN,ABSORBABLE 25MM X 50MM FILM
+"DATA",176.112,32178,1)
+317099^^Y
+"DATA",176.112,32179,0)
+4008613^GELATIN,ABSORBABLE SPONGE,6CM
+"DATA",176.112,32179,1)
+317100^^Y
+"DATA",176.112,32180,0)
+4008615^GELATIN,ABSORBABLE SPONGE,SZ 12,7MM
+"DATA",176.112,32180,1)
+317101^^Y
+"DATA",176.112,32181,0)
+4010080^HYDROXYETHYL CELLULOSE SOLN,OPH
+"DATA",176.112,32181,1)
+317107^^Y
+"DATA",176.112,32182,0)
+4003941^IOTHALAMATE MEGLUMINE 43% KIT
+"DATA",176.112,32182,1)
+317109^^Y
+"DATA",176.112,32183,0)
+4009689^KERI FACIAL CLEANSER LIQUID,TOP
+"DATA",176.112,32183,1)
+317111^^Y
+"DATA",176.112,32184,0)
+4009692^KERI LOTION (FRESH HERBAL)
+"DATA",176.112,32184,1)
+317112^^Y
+"DATA",176.112,32185,0)
+4009394^KONDREMUL PLAIN LIQUID,ORAL
+"DATA",176.112,32185,1)
+317113^^Y
+"DATA",176.112,32186,0)
+4010016^LANABURN OINT,TOP
+"DATA",176.112,32186,1)
+317115^^Y
+"DATA",176.112,32187,0)
+4008556^LANOLIN/MINERAL OIL/PETROLATUM LOTION
+"DATA",176.112,32187,1)
+317116^^Y
+"DATA",176.112,32188,0)
+4010356^MASSENGILL DOUCHE,VAG
+"DATA",176.112,32188,1)
+317122^^Y
+"DATA",176.112,32189,0)
+4003015^MEASLES/RUBELLA VIRUS VACCINE,LIVE INJ
+"DATA",176.112,32189,1)
+317123^^Y
+"DATA",176.112,32190,0)
+4009529^MENTHOL 10%/METHYL SALICYLATE 30% STICK
+"DATA",176.112,32190,1)
+317124^^Y
+"DATA",176.112,32191,0)
+4009217^METHYL SALICYLATE,SYNTHETIC LIQUID
+"DATA",176.112,32191,1)
+317125^^Y
+"DATA",176.112,32192,0)
+4009126^MINERAL OIL,MEDIUM
+"DATA",176.112,32192,1)
+317126^^Y
+"DATA",176.112,32193,0)
+4001799^MISSION PRENATAL TAB
+"DATA",176.112,32193,1)
+317129^^Y
+"DATA",176.112,32194,0)
+4009204^MULTISTIX (FOR CLINI-TEK) TEST STRIP
+"DATA",176.112,32194,1)
+317132^^Y
+"DATA",176.112,32195,0)
+4010485^NAIL FUNGAL SOLN,TOP
+"DATA",176.112,32195,1)
+317133^^Y
+"DATA",176.112,32196,0)
+4014650^NEOCATE ONE+ LIQUID ORG/PINEAPPLE
+"DATA",176.112,32196,1)
+317134^^Y
+"DATA",176.112,32197,0)
+4008700^PETROLATUM,HYDROPHYLIC SOAP,TOP
+"DATA",176.112,32197,1)
+317140^^Y
+"DATA",176.112,32198,0)
+4009680^PHISODERM SOAP
+"DATA",176.112,32198,1)
+317142^^Y
+"DATA",176.112,32199,0)
+4009837^POLYETHYLENE GLYCOL 400/POLYETHYLENE GLYCOL 3350 OINT,TOP
+"DATA",176.112,32199,1)
+317144^^Y
+"DATA",176.112,32200,0)
+4008365^POVIDONE SOLN,OPH
+"DATA",176.112,32200,1)
+317147^^Y
+"DATA",176.112,32201,0)
+4010230^RESORCINOL/SULFUR ACNE CREAM
+"DATA",176.112,32201,1)
+317149^^Y
+"DATA",176.112,32202,0)
+4008734^SULFONATED CASTOR OIL CREAM,TOP
+"DATA",176.112,32202,1)
+317157^^Y
+"DATA",176.112,32203,0)
+4008741^TEA-DODECYLBENZENESULFONATE LIQUID,TOP
+"DATA",176.112,32203,1)
+317158^^Y
+"DATA",176.112,32204,0)
+4009657^TRAUM-AID HBC PWDR (LEMONCREME)
+"DATA",176.112,32204,1)
+317163^^Y
+"DATA",176.112,32205,0)
+4005475^VITAMIN B/FE GLUCONATE 25MG/LIVER W/PROCAINE INJ
+"DATA",176.112,32205,1)
+317165^^Y
+"DATA",176.112,32206,0)
+4005476^VIT B/FE GLUCONATE 25MG/LIVER W/PROCAINE INJ
+"DATA",176.112,32206,1)
+317165^^Y
+"DATA",176.112,32207,0)
+4002065^VITAMIN B/VITAMIN C 1000MG INJ
+"DATA",176.112,32207,1)
+317166^^Y
+"DATA",176.112,32208,0)
+4012876^VIVONEX FLAVOR PACKET VANILLA
+"DATA",176.112,32208,1)
+317167^^Y
+"DATA",176.112,32209,0)
+4015090^ZINC ACETATE SPRAY,TOP
+"DATA",176.112,32209,1)
+317170^^Y
+"DATA",176.112,32210,0)
+4008297^CARBAMIDE PEROXIDE 10%/GLYCERIN SOLN,ORAL
+"DATA",176.112,32210,1)
+317171^^Y
+"DATA",176.112,32211,0)
+4010272^CHEMSTRIP 10 WITH SG (MULTIPLE) TEST STRIP
+"DATA",176.112,32211,1)
+317172^^Y
+"DATA",176.112,32212,0)
+4012694^PRECISION LINK
+"DATA",176.112,32212,1)
+317175^^Y
+"DATA",176.112,32213,0)
+4009745^BEESWAX,WHITE
+"DATA",176.112,32213,1)
+317203^^Y
+"DATA",176.112,32214,0)
+4010391^DECANTING DEVICE,ASEPTIC
+"DATA",176.112,32214,1)
+317222^^Y
+"DATA",176.112,32215,0)
+4008450^SPACER-INHALER
+"DATA",176.112,32215,1)
+317272^^Y
+"DATA",176.112,32216,0)
+4004858^ACETIC ACID LIQUID
+"DATA",176.112,32216,1)
+317558^^Y
+"DATA",176.112,32217,0)
+4009261^CETYL ALCOHOL/COLFOSCERIL PALMITATE/TYLOXAPOL SUSP,ITRC
+"DATA",176.112,32217,1)
+317559^^Y
+"DATA",176.112,32218,0)
+4007606^COAL TAR/SALICYLIC ACID LOTION
+"DATA",176.112,32218,1)
+317560^^Y
+"DATA",176.112,32219,0)
+4008737^COLLADERM LOTION
+"DATA",176.112,32219,1)
+317561^^Y
+"DATA",176.112,32220,0)
+4001826^GENERIX T CAP,SA
+"DATA",176.112,32220,1)
+317563^^Y
+"DATA",176.112,32221,0)
+4009629^MALT SOUP EXTRACT PWDR
+"DATA",176.112,32221,1)
+317568^^Y
+"DATA",176.112,32222,0)
+4006072^MASSENGILL DISPOSABLE DOUCHE BAKING SODA,VAG
+"DATA",176.112,32222,1)
+317569^^Y
+"DATA",176.112,32223,0)
+4009810^PERUVIAN BALSAM PWDR
+"DATA",176.112,32223,1)
+317572^^Y
+"DATA",176.112,32224,0)
+4009416^STEP 2 CREME RINSE,TOP
+"DATA",176.112,32224,1)
+317575^^Y
+"DATA",176.112,32225,0)
+4009829^ZINC STEARATE PWDR
+"DATA",176.112,32225,1)
+317578^^Y
+"DATA",176.112,32226,0)
+4009773^FLAXSEED,WHOLE
+"DATA",176.112,32226,1)
+317594^^Y
+"DATA",176.112,32227,0)
+4003742^THEOPHYLLINE 100MG TAB,SA (THEO-SAV)
+"DATA",176.112,32227,1)
+317770^^Y
+"DATA",176.112,32228,0)
+4003746^THEOPHYLLINE 250MG CAP,SA (ELIXOPHYLLIN SR)
+"DATA",176.112,32228,1)
+317771^^Y
+"DATA",176.112,32229,0)
+4003174^OVRAL TAB,21
+"DATA",176.112,32229,1)
+317779^^Y
+"DATA",176.112,32230,0)
+4005251^NELOVA 0.5/35 TAB,21
+"DATA",176.112,32230,1)
+317782^^Y
+"DATA",176.112,32231,0)
+4005249^NELOVA 0.5/35 TAB,28
+"DATA",176.112,32231,1)
+317786^^Y
+"DATA",176.112,32232,0)
+4005247^NELOVA 10/11 TAB #21
+"DATA",176.112,32232,1)
+317787^^Y
+"DATA",176.112,32233,0)
+4005248^NELOVA 10/11 TAB #28
+"DATA",176.112,32233,1)
+317788^^Y
+"DATA",176.112,32234,0)
+4005228^NELOVA 1/50 TAB,21
+"DATA",176.112,32234,1)
+317789^^Y
+"DATA",176.112,32235,0)
+4005232^GENORA 1/50 TAB,21
+"DATA",176.112,32235,1)
+317790^^Y
+"DATA",176.112,32236,0)
+4005267^N.E.E. 1/35 TAB,21
+"DATA",176.112,32236,1)
+317791^^Y
+"DATA",176.112,32237,0)
+4005268^N.E.E. 1/35 TAB,28
+"DATA",176.112,32237,1)
+317792^^Y
+"DATA",176.112,32238,0)
+4005250^NELOVA 1/35 TAB,28
+"DATA",176.112,32238,1)
+317793^^Y
+"DATA",176.112,32239,0)
+4005252^NELOVA 1/35 TAB,21
+"DATA",176.112,32239,1)
+317794^^Y
+"DATA",176.112,32240,0)
+4001775^POLYVITAMIN FLUORIDE W/IRON TAB,CHEWABLE
+"DATA",176.112,32240,1)
+317795^^Y
+"DATA",176.112,32241,0)
+4001851^MULTIVIT FLUOR W/IRON 1MG TAB,CHEWABLE
+"DATA",176.112,32241,1)
+317795^^Y
+"DATA",176.112,32242,0)
+4007938^CITRIC ACID 1GM/POTASSIUM CITRATE 3.3GM/PKT PWDR
+"DATA",176.112,32242,1)
+317803^^Y
+"DATA",176.112,32243,0)
+4006131^INPERSOL/DEXTROSE 2.5% SOLN
+"DATA",176.112,32243,1)
+317814^^Y
+"DATA",176.112,32244,0)
+4005266^OVCON-50 TAB,21
+"DATA",176.112,32244,1)
+317818^^Y
+"DATA",176.112,32245,0)
+4003715^THEOPHYLLINE 60MG CAP,SA (SLO-PHYLLIN GYROCAPS)
+"DATA",176.112,32245,1)
+317823^^Y
+"DATA",176.112,32246,0)
+4005898^AMINOSYN 7% PERIPHERAL INJ
+"DATA",176.112,32246,1)
+317833^^Y
+"DATA",176.112,32247,0)
+4008546^ALUMINUM SULFATE/CALCIUM ACETATE PWDR FOR SOLN
+"DATA",176.112,32247,1)
+317837^^Y
+"DATA",176.112,32248,0)
+4009659^HEXATUSSIN SYRUP
+"DATA",176.112,32248,1)
+317838^^Y
+"DATA",176.112,32249,0)
+4007683^PROMETHAZINE VC W/CODEINE SYRUP
+"DATA",176.112,32249,1)
+317839^^Y
+"DATA",176.112,32250,0)
+4007358^B-DONNA/PANCREATIN/PEPSIN/PHENOBARB 8MG TAB
+"DATA",176.112,32250,1)
+317851^^Y
+"DATA",176.112,32251,0)
+4001808^MYADEC TAB
+"DATA",176.112,32251,1)
+317866^^Y
+"DATA",176.112,32252,0)
+4007463^HYOSCYAMUS 16MG/CAMPHOR/PASSION FLOWR/PHENOBARB 30MG/VALERIAN TB
+"DATA",176.112,32252,1)
+317867^^Y
+"DATA",176.112,32253,0)
+4009735^ANUSERT SUPP,RTL
+"DATA",176.112,32253,1)
+317868^^Y
+"DATA",176.112,32254,0)
+4007530^TRACELYTE INJ
+"DATA",176.112,32254,1)
+317873^^Y
+"DATA",176.112,32255,0)
+4007531^TRACELYTE II INJ
+"DATA",176.112,32255,1)
+317877^^Y
+"DATA",176.112,32256,0)
+4007232^MULTILYTE-40 CONC INJ
+"DATA",176.112,32256,1)
+317878^^Y
+"DATA",176.112,32257,0)
+4006037^PHARMALYTE INJ
+"DATA",176.112,32257,1)
+317879^^Y
+"DATA",176.112,32258,0)
+4005897^AMINOSYN II 10% INJ
+"DATA",176.112,32258,1)
+317880^^Y
+"DATA",176.112,32259,0)
+4006038^PHARMALYTE II INJ
+"DATA",176.112,32259,1)
+317882^^Y
+"DATA",176.112,32260,0)
+4008070^TRIMONIL PWDR,VAG
+"DATA",176.112,32260,1)
+317884^^Y
+"DATA",176.112,32261,0)
+4007399^FREAMINE III 2.125%/DEXTROSE 15%/ELECTROLYTES INFANT INJ
+"DATA",176.112,32261,1)
+317886^^Y
+"DATA",176.112,32262,0)
+4007396^FREAMINE III 2.75%/DEXTROSE 10% INJ
+"DATA",176.112,32262,1)
+317887^^Y
+"DATA",176.112,32263,0)
+4007398^FREAMINE III 2.75%/DEXTROSE 5% INJ
+"DATA",176.112,32263,1)
+317888^^Y
+"DATA",176.112,32264,0)
+4007395^FREAMINE III 4.25%/DEXTROSE 25% INJ
+"DATA",176.112,32264,1)
+317889^^Y
+"DATA",176.112,32265,0)
+4007397^FREAMINE III 4.25%/DEXTROSE 10% INJ
+"DATA",176.112,32265,1)
+317890^^Y
+"DATA",176.112,32266,0)
+4005880^FREAMINE 8.5% INJ
+"DATA",176.112,32266,1)
+317891^^Y
+"DATA",176.112,32267,0)
+4005879^NEPHRAMINE 5.1% INJ
+"DATA",176.112,32267,1)
+317892^^Y
+"DATA",176.112,32268,0)
+4005870^AMINOSYN-PF 7% INJ
+"DATA",176.112,32268,1)
+317896^^Y
+"DATA",176.112,32269,0)
+4005875^AMINOSYN-RF 5.2% INJ
+"DATA",176.112,32269,1)
+317897^^Y
+"DATA",176.112,32270,0)
+4010004^EFRICON EXPECTORANT LIQUID
+"DATA",176.112,32270,1)
+317898^^Y
+"DATA",176.112,32271,0)
+4005997^ISOLYTE G/INVERT SUGAR 10% GASTRIC REPL INJ
+"DATA",176.112,32271,1)
+317899^^Y
+"DATA",176.112,32272,0)
+4007984^M-END LIQUID,ORAL
+"DATA",176.112,32272,1)
+317900^^Y
+"DATA",176.112,32273,0)
+4007708^BROMANYL EXPECTORANT LIQUID
+"DATA",176.112,32273,1)
+317901^^Y
+"DATA",176.112,32274,0)
+4007725^HISTA-COF LIQUID,ORAL
+"DATA",176.112,32274,1)
+317902^^Y
+"DATA",176.112,32275,0)
+4010040^LUBRASEPTIC JELLY,TOP
+"DATA",176.112,32275,1)
+317903^^Y
+"DATA",176.112,32276,0)
+4012828^CHOICE DM LIQUID,ORAL,CAN,240ML
+"DATA",176.112,32276,1)
+317905^^Y
+"DATA",176.112,32277,0)
+4013042^PRO-PEPTIDE VHN LIQUID UNFLAVORED,250ML
+"DATA",176.112,32277,1)
+317906^^Y
+"DATA",176.112,32278,0)
+4012508^LIPOFLAVONOID TAB
+"DATA",176.112,32278,1)
+317908^^Y
+"DATA",176.112,32279,0)
+4009614^LIPONOID TAB
+"DATA",176.112,32279,1)
+317909^^Y
+"DATA",176.112,32280,0)
+4002161^NEPHROCAPS CAP
+"DATA",176.112,32280,1)
+317910^^Y
+"DATA",176.112,32281,0)
+4002144^ZYLAN CAP
+"DATA",176.112,32281,1)
+317911^^Y
+"DATA",176.112,32282,0)
+4002127^CHOLINOID CAP
+"DATA",176.112,32282,1)
+317912^^Y
+"DATA",176.112,32283,0)
+4001866^ROGENIC TABS
+"DATA",176.112,32283,1)
+317913^^Y
+"DATA",176.112,32284,0)
+4002140^LANAVITE DROPS,ORAL
+"DATA",176.112,32284,1)
+317914^^Y
+"DATA",176.112,32285,0)
+4005372^VI-DAYLIN PLUS IRON LIQUID
+"DATA",176.112,32285,1)
+317915^^Y
+"DATA",176.112,32286,0)
+4002110^VI-DAYLIN LIQUID
+"DATA",176.112,32286,1)
+317916^^Y
+"DATA",176.112,32287,0)
+4001783^THERAVIT M,HIGH POTENCY TAB
+"DATA",176.112,32287,1)
+317918^^Y
+"DATA",176.112,32288,0)
+4002093^THERAVITS,HIGH POTENCY TAB
+"DATA",176.112,32288,1)
+317919^^Y
+"DATA",176.112,32289,0)
+4007499^PRENATE 90 TAB
+"DATA",176.112,32289,1)
+317920^^Y
+"DATA",176.112,32290,0)
+4001886^STUARTNATAL PLUS TAB
+"DATA",176.112,32290,1)
+317921^^Y
+"DATA",176.112,32291,0)
+4001853^NATAL PLUS ONE IMPROVED TAB
+"DATA",176.112,32291,1)
+317922^^Y
+"DATA",176.112,32292,0)
+4001844^I-L-X B12 TAB
+"DATA",176.112,32292,1)
+317923^^Y
+"DATA",176.112,32293,0)
+4001784^TOTAL VITE,HIGH POTENCY TAB
+"DATA",176.112,32293,1)
+317924^^Y
+"DATA",176.112,32294,0)
+4001840^THERAVILAN TAB
+"DATA",176.112,32294,1)
+317925^^Y
+"DATA",176.112,32295,0)
+4002136^BECOTIN W/VIT C CAP
+"DATA",176.112,32295,1)
+317926^^Y
+"DATA",176.112,32296,0)
+4001820^MEGA VITA AND IRON TAB
+"DATA",176.112,32296,1)
+317927^^Y
+"DATA",176.112,32297,0)
+4001819^MEGA VITE TAB
+"DATA",176.112,32297,1)
+317928^^Y
+"DATA",176.112,32298,0)
+4008003^MPI MDP KIT INJ
+"DATA",176.112,32298,1)
+317929^^Y
+"DATA",176.112,32299,0)
+4002120^THERAVEE TAB
+"DATA",176.112,32299,1)
+317930^^Y
+"DATA",176.112,32300,0)
+4001838^LANOPLEX FORTE CAP
+"DATA",176.112,32300,1)
+317931^^Y
+"DATA",176.112,32301,0)
+4002106^SURBEX W/C FILMTAB
+"DATA",176.112,32301,1)
+317932^^Y
+"DATA",176.112,32302,0)
+4001888^CHROMAGEN FA CAP,UD
+"DATA",176.112,32302,1)
+317933^^Y
+"DATA",176.112,32303,0)
+4007930^CITRA FORTE SYRUP
+"DATA",176.112,32303,1)
+317934^^Y
+"DATA",176.112,32304,0)
+4001815^B-SCORBIC TAB
+"DATA",176.112,32304,1)
+317935^^Y
+"DATA",176.112,32305,0)
+4001836^LANABEE-C CAP
+"DATA",176.112,32305,1)
+317936^^Y
+"DATA",176.112,32306,0)
+4001786^UNAVIT THERAPEUTIC,HIGH POTENCY TAB
+"DATA",176.112,32306,1)
+317937^^Y
+"DATA",176.112,32307,0)
+4002135^BECOTIN-T TAB
+"DATA",176.112,32307,1)
+317938^^Y
+"DATA",176.112,32308,0)
+4001872^VICON C CAP
+"DATA",176.112,32308,1)
+317939^^Y
+"DATA",176.112,32309,0)
+4002101^STRESS B COMPLEX W/VITAMIN C TAB,SA
+"DATA",176.112,32309,1)
+317940^^Y
+"DATA",176.112,32310,0)
+4005370^VI-DAYLIN PLUS IRON DROPS,ORAL
+"DATA",176.112,32310,1)
+317941^^Y
+"DATA",176.112,32311,0)
+4002109^VI-DAYLIN DROPS,ORAL
+"DATA",176.112,32311,1)
+317942^^Y
+"DATA",176.112,32312,0)
+4001848^MULTIVI FLUOR 0.25MG/ML DROPS,ORAL
+"DATA",176.112,32312,1)
+317943^^Y
+"DATA",176.112,32313,0)
+4001849^MULTIVI FLUOR 0.5MG/ML DROPS,ORAL
+"DATA",176.112,32313,1)
+317944^^Y
+"DATA",176.112,32314,0)
+4010597^ENSURE PWDR VANILLA
+"DATA",176.112,32314,1)
+317945^^Y
+"DATA",176.112,32315,0)
+4001837^LANAVITE CAP
+"DATA",176.112,32315,1)
+317946^^Y
+"DATA",176.112,32316,0)
+4007500^NEPHRON FA TAB
+"DATA",176.112,32316,1)
+317947^^Y
+"DATA",176.112,32317,0)
+4002133^THERAVITE LIQUID
+"DATA",176.112,32317,1)
+317948^^Y
+"DATA",176.112,32318,0)
+4002154^HARBERVITE LIQUID
+"DATA",176.112,32318,1)
+317949^^Y
+"DATA",176.112,32319,0)
+4001839^PRELAN TAB
+"DATA",176.112,32319,1)
+317950^^Y
+"DATA",176.112,32320,0)
+4002142^MUTALAN CAP
+"DATA",176.112,32320,1)
+317951^^Y
+"DATA",176.112,32321,0)
+4002097^MULTIVITAMINS ROWELL TAB
+"DATA",176.112,32321,1)
+317952^^Y
+"DATA",176.112,32322,0)
+4003967^RED CELL TAGGING KIT INJ
+"DATA",176.112,32322,1)
+317953^^Y
+"DATA",176.112,32323,0)
+4002107^VITACAPS TAB
+"DATA",176.112,32323,1)
+317954^^Y
+"DATA",176.112,32324,0)
+4005362^PEE WEE'S TAB,CHEWABLE
+"DATA",176.112,32324,1)
+317955^^Y
+"DATA",176.112,32325,0)
+4002152^KEY-PLEX INJ
+"DATA",176.112,32325,1)
+317956^^Y
+"DATA",176.112,32326,0)
+4002119^STRESS FORMULA 600 TAB
+"DATA",176.112,32326,1)
+317957^^Y
+"DATA",176.112,32327,0)
+4001782^STRESS FORMULA 500 PLUS ZINC,BIOTIN ENRICHED TAB
+"DATA",176.112,32327,1)
+317958^^Y
+"DATA",176.112,32328,0)
+4001781^STRESS FORMULA 500 PLUS IRON,BIOTIN ENRICHED TAB
+"DATA",176.112,32328,1)
+317959^^Y
+"DATA",176.112,32329,0)
+4002091^STRESS FORMULA 500,BIOTIN ENRICHED TAB
+"DATA",176.112,32329,1)
+317960^^Y
+"DATA",176.112,32330,0)
+4001793^CALCET PLUS TAB
+"DATA",176.112,32330,1)
+317961^^Y
+"DATA",176.112,32331,0)
+4005365^IBERET 500 TAB,SA
+"DATA",176.112,32331,1)
+317962^^Y
+"DATA",176.112,32332,0)
+4001846^FERRO BC 500 W/FOLIC TAB,SA
+"DATA",176.112,32332,1)
+317963^^Y
+"DATA",176.112,32333,0)
+4001803^OPTILETS-M-500 TAB
+"DATA",176.112,32333,1)
+317964^^Y
+"DATA",176.112,32334,0)
+4002104^OPTILETS-500 TAB
+"DATA",176.112,32334,1)
+317965^^Y
+"DATA",176.112,32335,0)
+4002102^THERABID TAB
+"DATA",176.112,32335,1)
+317966^^Y
+"DATA",176.112,32336,0)
+4002118^ECONO B AND C CAP
+"DATA",176.112,32336,1)
+317968^^Y
+"DATA",176.112,32337,0)
+4002115^THERA-COMBEX HP CAP
+"DATA",176.112,32337,1)
+317969^^Y
+"DATA",176.112,32338,0)
+4002132^SURBU-GEN-T TAB
+"DATA",176.112,32338,1)
+317970^^Y
+"DATA",176.112,32339,0)
+4001847^FERRO BC 500 TAB,SA
+"DATA",176.112,32339,1)
+317971^^Y
+"DATA",176.112,32340,0)
+4002130^GENERET-500 TAB,SA
+"DATA",176.112,32340,1)
+317972^^Y
+"DATA",176.112,32341,0)
+4010598^ENSURE HN LIQUID CHOCOLATE
+"DATA",176.112,32341,1)
+317973^^Y
+"DATA",176.112,32342,0)
+4005376^NEPHRO-VITE RX + FE TAB
+"DATA",176.112,32342,1)
+317974^^Y
+"DATA",176.112,32343,0)
+4001816^NATA PAR TAB
+"DATA",176.112,32343,1)
+317976^^Y
+"DATA",176.112,32344,0)
+4001785^UNAVIT-M TAB
+"DATA",176.112,32344,1)
+317977^^Y
+"DATA",176.112,32345,0)
+4001859^FILIBON TAB
+"DATA",176.112,32345,1)
+317978^^Y
+"DATA",176.112,32346,0)
+4002155^SUNKIST TAB,CHEW
+"DATA",176.112,32346,1)
+317979^^Y
+"DATA",176.112,32347,0)
+4002128^FRUITY CHEWS TAB
+"DATA",176.112,32347,1)
+317980^^Y
+"DATA",176.112,32348,0)
+4001828^POLY VITAMINS W/FLUORIDE TAB
+"DATA",176.112,32348,1)
+317981^^Y
+"DATA",176.112,32349,0)
+4001854^PRENATAL FA TAB
+"DATA",176.112,32349,1)
+317983^^Y
+"DATA",176.112,32350,0)
+4001829^PRENATAL-S TAB
+"DATA",176.112,32350,1)
+317984^^Y
+"DATA",176.112,32351,0)
+4001850^MULTIVIT FLUOR 0.5MG TAB,CHEWABLE
+"DATA",176.112,32351,1)
+317985^^Y
+"DATA",176.112,32352,0)
+4002121^SOLUVITE C.T. TAB
+"DATA",176.112,32352,1)
+317986^^Y
+"DATA",176.112,32353,0)
+4005369^VI-DAYLIN W/IRON TAB,CHEWABLE
+"DATA",176.112,32353,1)
+317987^^Y
+"DATA",176.112,32354,0)
+4001825^FRUITY CHEW W/IRON TAB
+"DATA",176.112,32354,1)
+317988^^Y
+"DATA",176.112,32355,0)
+4002116^CHILDRENS CHEWABLE VITAMINS TAB
+"DATA",176.112,32355,1)
+317989^^Y
+"DATA",176.112,32356,0)
+4002108^VI-DAYLIN TAB,CHEWABLE
+"DATA",176.112,32356,1)
+317990^^Y
+"DATA",176.112,32357,0)
+4005363^DAYALETS PLUS IRON TAB
+"DATA",176.112,32357,1)
+317991^^Y
+"DATA",176.112,32358,0)
+4002103^DAYALETS TAB
+"DATA",176.112,32358,1)
+317992^^Y
+"DATA",176.112,32359,0)
+4001833^Z-GEN TAB
+"DATA",176.112,32359,1)
+317993^^Y
+"DATA",176.112,32360,0)
+4001887^CHROMAGEN FORTE CAP,UD
+"DATA",176.112,32360,1)
+317994^^Y
+"DATA",176.112,32361,0)
+4001830^STRESS FORMULA 600 W/IRON TAB
+"DATA",176.112,32361,1)
+317995^^Y
+"DATA",176.112,32362,0)
+4001811^STRESS FORMULA W/IRON TAB
+"DATA",176.112,32362,1)
+317996^^Y
+"DATA",176.112,32363,0)
+4005890^TRAVASOL 10% WITHOUT ELECTROLYTES INJ
+"DATA",176.112,32363,1)
+317997^^Y
+"DATA",176.112,32364,0)
+4005878^FREAMINE II 8.5% INJ
+"DATA",176.112,32364,1)
+318000^^Y
+"DATA",176.112,32365,0)
+4005886^TRAVASOL 5.5% WITHOUT ELECTROLYTES INJ
+"DATA",176.112,32365,1)
+318003^^Y
+"DATA",176.112,32366,0)
+4006176^TRAVASOL 8.5%/ELECTROLYTES INJ
+"DATA",176.112,32366,1)
+318010^^Y
+"DATA",176.112,32367,0)
+4003970^SCHILLING TEST KIT
+"DATA",176.112,32367,1)
+318011^^Y
+"DATA",176.112,32368,0)
+4002134^BECOTIN CAP
+"DATA",176.112,32368,1)
+318012^^Y
+"DATA",176.112,32369,0)
+4012110^ASA 325MG/CTM 2MG/P-PROPANOL 25MG/ACETYLSALICYLATE NA 506MG
+"DATA",176.112,32369,1)
+318016^^Y
+"DATA",176.112,32370,0)
+4002085^ACTION B-100 TAB
+"DATA",176.112,32370,1)
+318017^^Y
+"DATA",176.112,32371,0)
+4002084^ACTION B-50 TAB
+"DATA",176.112,32371,1)
+318018^^Y
+"DATA",176.112,32372,0)
+4006996^ANTICOAGULANT CPDA-1 THE CLX SYSTEM SOLN
+"DATA",176.112,32372,1)
+318021^^Y
+"DATA",176.112,32373,0)
+4006999^ANTICOAGULANT CP2D W/AS-2 NUTRICEL INJ
+"DATA",176.112,32373,1)
+318022^^Y
+"DATA",176.112,32374,0)
+4009667^AK-RINSE SOLN,OPH IRRG
+"DATA",176.112,32374,1)
+318023^^Y
+"DATA",176.112,32375,0)
+4002113^AKOLINE CB CAP
+"DATA",176.112,32375,1)
+318024^^Y
+"DATA",176.112,32376,0)
+4006175^TRAVASOL 5.5%/ELECTROLYTES INJ
+"DATA",176.112,32376,1)
+318027^^Y
+"DATA",176.112,32377,0)
+4005904^AMINOSYN II 15% INJ,BULK,2000ML
+"DATA",176.112,32377,1)
+318029^^Y
+"DATA",176.112,32378,0)
+4005888^TRAVASOL 8.5% WITHOUT ELECTROLYTES INJ
+"DATA",176.112,32378,1)
+318032^^Y
+"DATA",176.112,32379,0)
+4013213^HYLAN G-F20 16MG/2ML INJ,SYRINGE,2ML
+"DATA",176.112,32379,1)
+318035^^Y
+"DATA",176.112,32380,0)
+4006173^PERIPHRAMINE INJ
+"DATA",176.112,32380,1)
+318038^^Y
+"DATA",176.112,32381,0)
+4006312^AMINOSYN II 3.5%/DEXTROSE 25% INJ
+"DATA",176.112,32381,1)
+318039^^Y
+"DATA",176.112,32382,0)
+4007400^AMINOSYN II 3.5% M/DEXTROSE 5% INJ
+"DATA",176.112,32382,1)
+318040^^Y
+"DATA",176.112,32383,0)
+4005894^AMINOSYN II 3.5% INJ
+"DATA",176.112,32383,1)
+318041^^Y
+"DATA",176.112,32384,0)
+4006317^AMINOSYN II 4.25%/DEXTROSE 20% INJ
+"DATA",176.112,32384,1)
+318042^^Y
+"DATA",176.112,32385,0)
+4006313^AMINOSYN II 4.25%/DEXTROSE 25% INJ
+"DATA",176.112,32385,1)
+318043^^Y
+"DATA",176.112,32386,0)
+4006305^AMINOSYN 3.5%/DEXTROSE 25% INJ
+"DATA",176.112,32386,1)
+318045^^Y
+"DATA",176.112,32387,0)
+4006315^AMINOSYN II 5%/DEXTROSE 25% INJ
+"DATA",176.112,32387,1)
+318047^^Y
+"DATA",176.112,32388,0)
+4012100^PROMOD PWDR,ORAL
+"DATA",176.112,32388,1)
+318048^^Y
+"DATA",176.112,32389,0)
+4006309^FREAMINE III 8.5%/DEXTROSE 50% KIT INJ
+"DATA",176.112,32389,1)
+318051^^Y
+"DATA",176.112,32390,0)
+4005895^AMINOSYN II 7% INJ
+"DATA",176.112,32390,1)
+318053^^Y
+"DATA",176.112,32391,0)
+4006308^FREAMINE II/DEXTROSE 40% KIT INJ
+"DATA",176.112,32391,1)
+318055^^Y
+"DATA",176.112,32392,0)
+4005877^FREAMINE III 10% INJ
+"DATA",176.112,32392,1)
+318056^^Y
+"DATA",176.112,32393,0)
+4005905^FREAMINE III 10% INJ,BTL,500ML
+"DATA",176.112,32393,1)
+318056^^Y
+"DATA",176.112,32394,0)
+4005896^AMINOSYN II 8.5% INJ
+"DATA",176.112,32394,1)
+318057^^Y
+"DATA",176.112,32395,0)
+4006179^AMINOSYN II 8.5%/ELECTROLYTES INJ
+"DATA",176.112,32395,1)
+318058^^Y
+"DATA",176.112,32396,0)
+4006183^AMINOSYN TPN 7%/ELECTROLYTES INJ
+"DATA",176.112,32396,1)
+318059^^Y
+"DATA",176.112,32397,0)
+4005902^AMINOSYN 7% INJ,KIT,500ML
+"DATA",176.112,32397,1)
+318060^^Y
+"DATA",176.112,32398,0)
+4005903^AMINOSYN II 10% INJ,BULK,2000ML
+"DATA",176.112,32398,1)
+318061^^Y
+"DATA",176.112,32399,0)
+4007998^TECHNETIUM TC 99M MAA UNIT DOSE INJ,SUSP
+"DATA",176.112,32399,1)
+318063^^Y
+"DATA",176.112,32400,0)
+4007999^TECHNETIUM TC 99M MAA MULTIDOSE INJ,SUSP
+"DATA",176.112,32400,1)
+318064^^Y
+"DATA",176.112,32401,0)
+4007964^PULMOLITE INJ,SUSP
+"DATA",176.112,32401,1)
+318065^^Y
+"DATA",176.112,32402,0)
+4003944^TECHNESCAN MAA INJ,SUSP
+"DATA",176.112,32402,1)
+318066^^Y
+"DATA",176.112,32403,0)
+4007841^MICROLITE INJ
+"DATA",176.112,32403,1)
+318067^^Y
+"DATA",176.112,32404,0)
+4005994^IONOSOL B/INVERT SUGAR 10% INJ
+"DATA",176.112,32404,1)
+318071^^Y
+"DATA",176.112,32405,0)
+4006004^TRAVERT 10%/ELECTROLYTE NO.4 INJ
+"DATA",176.112,32405,1)
+318072^^Y
+"DATA",176.112,32406,0)
+4006001^TRAVERT 5%/ELECTROLYTE NO.2 INJ
+"DATA",176.112,32406,1)
+318073^^Y
+"DATA",176.112,32407,0)
+4006002^TRAVERT 5%/ELECTROLYTE NO.4 INJ
+"DATA",176.112,32407,1)
+318074^^Y
+"DATA",176.112,32408,0)
+4007229^HYPERLYTE INJ
+"DATA",176.112,32408,1)
+318075^^Y
+"DATA",176.112,32409,0)
+4004148^SURGISOL SOLN,IRRG
+"DATA",176.112,32409,1)
+318077^^Y
+"DATA",176.112,32410,0)
+4005995^IONOSOL D/INVERT SUGAR 10% INJ
+"DATA",176.112,32410,1)
+318078^^Y
+"DATA",176.112,32411,0)
+4006157^DIANEAL PD-1/DEXTROSE 3.5% SOLN
+"DATA",176.112,32411,1)
+318080^^Y
+"DATA",176.112,32412,0)
+4006149^DIANEAL K-141/DEXTROSE 4.25% SOLN
+"DATA",176.112,32412,1)
+318081^^Y
+"DATA",176.112,32413,0)
+4006141^DIALYTE/DEXTROSE 1.5%/SODIUM 131MEQ SOLN
+"DATA",176.112,32413,1)
+318082^^Y
+"DATA",176.112,32414,0)
+4006145^DIANEAL/DEXTROSE 1.5% SOLN
+"DATA",176.112,32414,1)
+318083^^Y
+"DATA",176.112,32415,0)
+4006144^DIALYTE/DEXTROSE 2.5%/SODIUM 131MEQ SOLN
+"DATA",176.112,32415,1)
+318084^^Y
+"DATA",176.112,32416,0)
+4006143^DIALYTE/DEXTROSE 4.25%/SODIUM 131MEQ SOLN
+"DATA",176.112,32416,1)
+318085^^Y
+"DATA",176.112,32417,0)
+4006146^DIANEAL/DEXTROSE 4.25% SOLN
+"DATA",176.112,32417,1)
+318086^^Y
+"DATA",176.112,32418,0)
+4006140^DIALYTE/DEXTROSE 1.5% SOLN
+"DATA",176.112,32418,1)
+318087^^Y
+"DATA",176.112,32419,0)
+4006142^DIALYTE/DEXTROSE 4.25%/SODIUM 141.5MEQ SOLN
+"DATA",176.112,32419,1)
+318088^^Y
+"DATA",176.112,32420,0)
+4006003^TRAVERT 10%/ELECTROLYTE NO.1 INJ
+"DATA",176.112,32420,1)
+318089^^Y
+"DATA",176.112,32421,0)
+4005973^ISOLYTE E/DEXTROSE 5% EXTRACELLULAR REPL INJ
+"DATA",176.112,32421,1)
+318090^^Y
+"DATA",176.112,32422,0)
+4005980^ISOLYTE E/DEXTROSE 5% INJ
+"DATA",176.112,32422,1)
+318091^^Y
+"DATA",176.112,32423,0)
+4009658^ISOLYTE E MULTI-ELEC INJ
+"DATA",176.112,32423,1)
+318092^^Y
+"DATA",176.112,32424,0)
+4006025^ISOLYTE E INJ
+"DATA",176.112,32424,1)
+318092^^Y
+"DATA",176.112,32425,0)
+4006022^ISOLYTE E EXTRACELLULAR REPLACEMENT SOLN,INJ
+"DATA",176.112,32425,1)
+318093^^Y
+"DATA",176.112,32426,0)
+4005989^PLASMA-LYTE/DEXTROSE 5% INJ
+"DATA",176.112,32426,1)
+318094^^Y
+"DATA",176.112,32427,0)
+4005986^PLASMA-LYTE M/DEXTROSE 5% INJ
+"DATA",176.112,32427,1)
+318096^^Y
+"DATA",176.112,32428,0)
+4005979^ISOLYTE R/DEXTROSE 5% MAINTENANCE SOLN INJ
+"DATA",176.112,32428,1)
+318097^^Y
+"DATA",176.112,32429,0)
+4005983^ISOLYTE R/DEXTROSE 5% INJ
+"DATA",176.112,32429,1)
+318098^^Y
+"DATA",176.112,32430,0)
+4006205^HYPERLYTE R INJ
+"DATA",176.112,32430,1)
+318099^^Y
+"DATA",176.112,32431,0)
+4006021^PLEGISOL SOLN,IRRG
+"DATA",176.112,32431,1)
+318100^^Y
+"DATA",176.112,32432,0)
+4006027^SUPER-VIAL HYPERLYTE MULTIELECTROLYTE CONC INJ
+"DATA",176.112,32432,1)
+318101^^Y
+"DATA",176.112,32433,0)
+4006152^DIANEAL/DEXTROSE 10% SOLN
+"DATA",176.112,32433,1)
+318102^^Y
+"DATA",176.112,32434,0)
+4006153^DIANEAL/DEXTROSE 30% SOLN
+"DATA",176.112,32434,1)
+318103^^Y
+"DATA",176.112,32435,0)
+4006150^DIANEAL 134.5/DEXTROSE 30% SOLN
+"DATA",176.112,32435,1)
+318104^^Y
+"DATA",176.112,32436,0)
+4006151^DIANEAL 134.5/DEXTROSE 50% SOLN
+"DATA",176.112,32436,1)
+318105^^Y
+"DATA",176.112,32437,0)
+4006023^ISOLYTE S EXTRACELLULAR REPLACEMENT SOLN,INJ
+"DATA",176.112,32437,1)
+318106^^Y
+"DATA",176.112,32438,0)
+4006024^ISOLYTE S INJ
+"DATA",176.112,32438,1)
+318107^^Y
+"DATA",176.112,32439,0)
+4006128^INPERSOL CONCENTRATE/DEXTROSE 30% SOLN
+"DATA",176.112,32439,1)
+318109^^Y
+"DATA",176.112,32440,0)
+4006129^INPERSOL CONCENTRATE/DEXTROSE 50% SOLN
+"DATA",176.112,32440,1)
+318110^^Y
+"DATA",176.112,32441,0)
+4001818^HEMAGLO INJ
+"DATA",176.112,32441,1)
+318111^^Y
+"DATA",176.112,32442,0)
+4008294^KENALAN 15 TAB,EFFERVSC
+"DATA",176.112,32442,1)
+318112^^Y
+"DATA",176.112,32443,0)
+4008295^KENALAN 25 TAB,EFFERVSC
+"DATA",176.112,32443,1)
+318113^^Y
+"DATA",176.112,32444,0)
+4002141^LANOPLEX ELIXIR
+"DATA",176.112,32444,1)
+318114^^Y
+"DATA",176.112,32445,0)
+4008099^PEG-400/ELECTROLYTES SOLN
+"DATA",176.112,32445,1)
+318116^^Y
+"DATA",176.112,32446,0)
+4001805^VITAKAPS-M TAB
+"DATA",176.112,32446,1)
+318122^^Y
+"DATA",176.112,32447,0)
+4009631^HIBTITER INJ
+"DATA",176.112,32447,1)
+318123^^Y
+"DATA",176.112,32448,0)
+4007337^NORMATANE DC EXPECTORANT LIQUID
+"DATA",176.112,32448,1)
+318127^^Y
+"DATA",176.112,32449,0)
+4012747^CALMOSEPTINE OINT
+"DATA",176.112,32449,1)
+318128^^Y
+"DATA",176.112,32450,0)
+4012880^VIVONEX PEDIATRIC POWDER,PKT,51GM
+"DATA",176.112,32450,1)
+318129^^Y
+"DATA",176.112,32451,0)
+4008542^ENUCLENE (FOR ARTIFICIAL EYES) DROPS
+"DATA",176.112,32451,1)
+318131^^Y
+"DATA",176.112,32452,0)
+4010567^BOIL-EASE
+"DATA",176.112,32452,1)
+318132^^Y
+"DATA",176.112,32453,0)
+4007185^DERMA MEDICONE-HC OINT,TOP
+"DATA",176.112,32453,1)
+318134^^Y
+"DATA",176.112,32454,0)
+4007443^TUSSIREX W/CODEINE SYRUP
+"DATA",176.112,32454,1)
+318135^^Y
+"DATA",176.112,32455,0)
+4010448^NEUTRA-PHOS PWDR,67.5GM
+"DATA",176.112,32455,1)
+318136^^Y
+"DATA",176.112,32456,0)
+4013396^HEPATITIS B VACCINE (RECOMBINANT) 5MCG/0.5ML INJ,SYRINGE,0.5ML
+"DATA",176.112,32456,1)
+318139^^Y
+"DATA",176.112,32457,0)
+4009309^RENACIDIN SOLN,IRRG
+"DATA",176.112,32457,1)
+318140^^Y
+"DATA",176.112,32458,0)
+4013448^HEPATITIS B VACCINE (RECOMBINANT) 10MCG/ML INJ,SYRINGE,1ML
+"DATA",176.112,32458,1)
+318141^^Y
+"DATA",176.112,32459,0)
+4009616^VITAMIN B-COMPLEX (PLUS LIVER) TAB
+"DATA",176.112,32459,1)
+318143^^Y
+"DATA",176.112,32460,0)
+4002149^TRIASYN B CAP
+"DATA",176.112,32460,1)
+318144^^Y
+"DATA",176.112,32461,0)
+4002150^TRIASYN B TAB
+"DATA",176.112,32461,1)
+318145^^Y
+"DATA",176.112,32462,0)
+4005969^IONOSOL MB/DEXTROSE 10% INJ
+"DATA",176.112,32462,1)
+318148^^Y
+"DATA",176.112,32463,0)
+4005966^NORMOSOL-R/DEXTROSE 5% INJ
+"DATA",176.112,32463,1)
+318153^^Y
+"DATA",176.112,32464,0)
+4005962^IONOSOL B/DEXTROSE 5% INJ
+"DATA",176.112,32464,1)
+318154^^Y
+"DATA",176.112,32465,0)
+4005974^ISOLYTE S/DEXTROSE 5% EXTRACELLULAR REPL INJ
+"DATA",176.112,32465,1)
+318156^^Y
+"DATA",176.112,32466,0)
+4005981^ISOLYTE S/DEXTROSE 5% INJ
+"DATA",176.112,32466,1)
+318157^^Y
+"DATA",176.112,32467,0)
+4005976^ISOLYTE H/DEXTROSE 5% MAINTENANCE INJ
+"DATA",176.112,32467,1)
+318158^^Y
+"DATA",176.112,32468,0)
+4005978^ISOLYTE P/DEXTROSE 5% INJ
+"DATA",176.112,32468,1)
+318160^^Y
+"DATA",176.112,32469,0)
+4005964^IONOSOL T/DEXTROSE 5% INJ
+"DATA",176.112,32469,1)
+318161^^Y
+"DATA",176.112,32470,0)
+4010269^OATMEAL,COLLOIDAL CLEANSING BAR/COMBINATION SKIN
+"DATA",176.112,32470,1)
+318170^^Y
+"DATA",176.112,32471,0)
+4008216^DIGITAL KIT
+"DATA",176.112,32471,1)
+318171^^Y
+"DATA",176.112,32472,0)
+4007442^S-T FORTE SUGAR FREE LIQUID
+"DATA",176.112,32472,1)
+318172^^Y
+"DATA",176.112,32473,0)
+4007441^S-T FORTE SYRUP
+"DATA",176.112,32473,1)
+318173^^Y
+"DATA",176.112,32474,0)
+4013561^OCTREOTIDE ACETATE 10MG/KIT INJ,SUSP,SA
+"DATA",176.112,32474,1)
+318174^^Y
+"DATA",176.112,32475,0)
+4002393^ERGOLOID MESYLATES 0.5MG TAB,ORAL
+"DATA",176.112,32475,1)
+318175^^Y
+"DATA",176.112,32476,0)
+4013562^OCTREOTIDE ACETATE 20MG/KIT INJ,SUSP,SA
+"DATA",176.112,32476,1)
+318176^^Y
+"DATA",176.112,32477,0)
+4013563^OCTREOTIDE ACETATE 30MG/KIT INJ,SUSP,SA
+"DATA",176.112,32477,1)
+318177^^Y
+"DATA",176.112,32478,0)
+4006688^DILTIAZEM (TIAMATE) 120MG SA TAB
+"DATA",176.112,32478,1)
+318181^^Y
+"DATA",176.112,32479,0)
+4006689^DILTIAZEM (TIAMATE) 180MG SA TAB
+"DATA",176.112,32479,1)
+318182^^Y
+"DATA",176.112,32480,0)
+4006690^DILTIAZEM (TIAMATE) 240MG SA TAB
+"DATA",176.112,32480,1)
+318183^^Y
+"DATA",176.112,32481,0)
+4013367^DILTIAZEM (TIAZAC) 420MG SA CAP
+"DATA",176.112,32481,1)
+318184^^Y
+"DATA",176.112,32482,0)
+4010450^RYNA-TUSSADINE LIQUID,ORAL
+"DATA",176.112,32482,1)
+318187^^Y
+"DATA",176.112,32483,0)
+4010018^LANATUSS EXPECTORANT LIQUID
+"DATA",176.112,32483,1)
+318188^^Y
+"DATA",176.112,32484,0)
+4013436^DURASCREEN SPF-30 LOTION
+"DATA",176.112,32484,1)
+318189^^Y
+"DATA",176.112,32485,0)
+4007329^PHENATUSS SYRUP
+"DATA",176.112,32485,1)
+318191^^Y
+"DATA",176.112,32486,0)
+4006927^LEMOTUSSIN-DM LIQUID
+"DATA",176.112,32486,1)
+318192^^Y
+"DATA",176.112,32487,0)
+4006867^HISTA-FIVE CAP
+"DATA",176.112,32487,1)
+318194^^Y
+"DATA",176.112,32488,0)
+4006932^POLY-HISTINE-D ELIXIR
+"DATA",176.112,32488,1)
+318195^^Y
+"DATA",176.112,32489,0)
+4006934^POLY-HISTINE-D PEDIATRIC CAP,SA
+"DATA",176.112,32489,1)
+318196^^Y
+"DATA",176.112,32490,0)
+4002131^LIPOGEN CAP
+"DATA",176.112,32490,1)
+318198^^Y
+"DATA",176.112,32491,0)
+4001827^METHATROPIC CAP
+"DATA",176.112,32491,1)
+318199^^Y
+"DATA",176.112,32492,0)
+4001868^GERITOL LIQUID
+"DATA",176.112,32492,1)
+318201^^Y
+"DATA",176.112,32493,0)
+4008206^PRO-SYMBIOFLOR SUSP,ORAL
+"DATA",176.112,32493,1)
+318203^^Y
+"DATA",176.112,32494,0)
+4002502^PHENYTOIN NA,EXTENDED 30MG CAP (DILANTIN)
+"DATA",176.112,32494,1)
+318204^^Y
+"DATA",176.112,32495,0)
+4007295^STANNOUS FLUORIDE CONC LIQUID,DENT
+"DATA",176.112,32495,1)
+318214^^Y
+"DATA",176.112,32496,0)
+4008742^MENTHOL 0.15%/PHENOL 1%/ZN OXIDE/LIME WATER LOTION
+"DATA",176.112,32496,1)
+318221^^Y
+"DATA",176.112,32497,0)
+4006911^CHLORPHENIRAMINE 2MG TAB #4/EPINEPHRINE 1MG SYR/KIT
+"DATA",176.112,32497,1)
+318223^^Y
+"DATA",176.112,32498,0)
+4007215^FRUCTOSE 5%/ELECTROLYTE NO.48 INJ
+"DATA",176.112,32498,1)
+318230^^Y
+"DATA",176.112,32499,0)
+4007214^ISOLYTE P/FRUCTOSE 5% INJ
+"DATA",176.112,32499,1)
+318231^^Y
+"DATA",176.112,32500,0)
+4007213^ISOLYTE M/FRUCTOSE 5% INJ
+"DATA",176.112,32500,1)
+318232^^Y
+"DATA",176.112,32501,0)
+4013497^GLUCAGON 1MG/VIL INJ,EMERGENCY KIT
+"DATA",176.112,32501,1)
+318233^^Y
+"DATA",176.112,32502,0)
+4007240^HAEMO-PAK UNIT FOR PLASMAPHERESIS
+"DATA",176.112,32502,1)
+318234^^Y
+"DATA",176.112,32503,0)
+4008774^HEMORRHOIDAL CREAM,RTL
+"DATA",176.112,32503,1)
+318235^^Y
+"DATA",176.112,32504,0)
+4000974^HISTAMINE POSITIVE SKIN TEST CONTROL
+"DATA",176.112,32504,1)
+318237^^Y
+"DATA",176.112,32505,0)
+4007599^RONI-TUSS GREEN LIQUID,ORAL
+"DATA",176.112,32505,1)
+318238^^Y
+"DATA",176.112,32506,0)
+4003749^THEOPHYLLINE 400MG CAP,SA (THEO-24)
+"DATA",176.112,32506,1)
+318245^^Y
+"DATA",176.112,32507,0)
+4006103^THIOPENTAL NA 2.5GM KIT INJ
+"DATA",176.112,32507,1)
+318247^^Y
+"DATA",176.112,32508,0)
+4002765^THIOTEPA (THIOPLEX) 15MG/VIL INJ
+"DATA",176.112,32508,1)
+318248^^Y
+"DATA",176.112,32509,0)
+4025376^MISTLETOE EXTRACT
+"DATA",176.112,32509,1)
+319831^^Y
+"DATA",176.112,32510,0)
+4002752^METHOTREXATE NA 2.5MG TAB DOSE PACK,20
+"DATA",176.112,32510,1)
+333824^^Y
+"DATA",176.112,32511,0)
+4002751^METHOTREXATE NA 2.5MG TAB DOSE PACK,16
+"DATA",176.112,32511,1)
+333825^^Y
+"DATA",176.112,32512,0)
+4012696^SITZ BATH
+"DATA",176.112,32512,1)
+342978^^Y
+"DATA",176.112,32513,0)
+4015867^THEOPHYLLINE 250MG TAB (THEOLAIR)
+"DATA",176.112,32513,1)
+343020^^Y
+"DATA",176.112,32514,0)
+4016930^LEVOTHYROXINE NA 0.137MG TAB (SYNTHROID)
+"DATA",176.112,32514,1)
+351354^^Y
+"DATA",176.112,32515,0)
+4016599^LEVOTHYROXINE NA 137MCG TAB (SYNTHROID)
+"DATA",176.112,32515,1)
+351354^^Y
+"DATA",176.112,32516,0)
+4015946^NIFEDIPINE (NIFEDICAL XL) 60MG SA TAB
+"DATA",176.112,32516,1)
+351438^^Y
+"DATA",176.112,32517,0)
+4003707^THEOPHYLLINE 400MG TAB,SA (UNIPHYL)
+"DATA",176.112,32517,1)
+351464^^Y
+"DATA",176.112,32518,0)
+4003757^THEOPHYLLINE 600MG TAB,SA (UNIPHYL)
+"DATA",176.112,32518,1)
+351465^^Y
+"DATA",176.112,32519,0)
+4015944^OCUVITE PRESERVISION TAB
+"DATA",176.112,32519,1)
+351809^^Y
+"DATA",176.112,32520,0)
+4001467^INSULIN REG PURE PORK 100 U/ML INJ LILLY
+"DATA",176.112,32520,1)
+351857^^Y
+"DATA",176.112,32521,0)
+4001500^INSULIN,REGULAR,HUMAN 500 UNT/ML INJ HUMULIN R
+"DATA",176.112,32521,1)
+351859^^Y
+"DATA",176.112,32522,0)
+4026490^INSULIN,REGULAR,HUMAN CONCENTRATED 500 UNIT/ML INJ HUMULIN R
+"DATA",176.112,32522,1)
+351859^^Y
+"DATA",176.112,32523,0)
+4016835^ESTRADIOL 25MCG/DAY (VIVELLE-DOT) PATCH
+"DATA",176.112,32523,1)
+351876^^Y
+"DATA",176.112,32524,0)
+4016643^INSULIN,ASPART,HUMAN 100U/ML,NOVOLOG,FLEXPEN,3ML
+"DATA",176.112,32524,1)
+351926^^Y
+"DATA",176.112,32525,0)
+4016454^METHYLPHENIDATE HCL (RITALIN LA) 20MG CAP,SA
+"DATA",176.112,32525,1)
+351966^^Y
+"DATA",176.112,32526,0)
+4015842^ORTHO EVRA 150/20MCG/24HR PATCH
+"DATA",176.112,32526,1)
+352065^^Y
+"DATA",176.112,32527,0)
+4016290^DAPTACEL INJ,SUSP
+"DATA",176.112,32527,1)
+352221^^Y
+"DATA",176.112,32528,0)
+4016455^METHYLPHENIDATE HCL (RITALIN LA) 30MG CAP,SA
+"DATA",176.112,32528,1)
+352223^^Y
+"DATA",176.112,32529,0)
+4016456^METHYLPHENIDATE HCL (RITALIN LA) 40MG CAP,SA
+"DATA",176.112,32529,1)
+352225^^Y
+"DATA",176.112,32530,0)
+4016626^INSULIN,ASPART,HUMAN 70/30 INJ,NOVOLOG
+"DATA",176.112,32530,1)
+352343^^Y
+"DATA",176.112,32531,0)
+4016628^INSULIN,ASPART,HUMAN 70/30 INJ,NOVOLOG,FLEXPEN,3ML
+"DATA",176.112,32531,1)
+352343^^Y
+"DATA",176.112,32532,0)
+4016627^INSULIN,ASPART,HUMAN 70/30 INJ,NOVOLOG,PENFILL,3ML
+"DATA",176.112,32532,1)
+352343^^Y
+"DATA",176.112,32533,0)
+4014219^LANCET,ONE-TOUCH
+"DATA",176.112,32533,1)
+353198^^Y
+"DATA",176.112,32534,0)
+4001484^INSULIN NPH HUMAN 100 U/ML INJ PEN 1.5ML
+"DATA",176.112,32534,1)
+358852^^Y
+"DATA",176.112,32535,0)
+4016287^ACCU-CHEK ACTIVE (GLUCOSE) HI/LO CONTROL SOLN
+"DATA",176.112,32535,1)
+358900^^Y
+"DATA",176.112,32536,0)
+4015933^ACCU-CHEK ACTIVE (GLUCOSE) TEST STRIP
+"DATA",176.112,32536,1)
+358901^^Y
+"DATA",176.112,32537,0)
+4016092^ACCU-CHEK COMPACT (GLUCOSE) TEST DRUM,17
+"DATA",176.112,32537,1)
+358902^^Y
+"DATA",176.112,32538,0)
+4015644^ACCU-CHEK VOICEMATE (GLUCOSE) SYSTEM KIT
+"DATA",176.112,32538,1)
+358903^^Y
+"DATA",176.112,32539,0)
+4016348^ALITRAQ VANILLA 76GM/PKT PWDR
+"DATA",176.112,32539,1)
+358909^^Y
+"DATA",176.112,32540,0)
+4016271^ALOE VESTA 2-N-1 BODY WASH,SHAMPOO
+"DATA",176.112,32540,1)
+358910^^Y
+"DATA",176.112,32541,0)
+4016005^ASTRAGALUS EXTRACT PWDR
+"DATA",176.112,32541,1)
+358914^^Y
+"DATA",176.112,32542,0)
+4015639^AT-LAST (GLUCOSE) METER
+"DATA",176.112,32542,1)
+358915^^Y
+"DATA",176.112,32543,0)
+4016207^BENZOIN COMPOUND STICK TOP
+"DATA",176.112,32543,1)
+358916^^Y
+"DATA",176.112,32544,0)
+4015990^BILBERRY EXTRACT CAP/TAB
+"DATA",176.112,32544,1)
+358918^^Y
+"DATA",176.112,32545,0)
+4016062^BISACODYL 10MG SUPP/BISACODYL 5MG TAB #3/MG CIT 300ML
+"DATA",176.112,32545,1)
+358919^^Y
+"DATA",176.112,32546,0)
+4015991^BLACK COHOSH EXTRACT CAP/TAB
+"DATA",176.112,32546,1)
+358920^^Y
+"DATA",176.112,32547,0)
+4015994^BORAGE OIL CAP/TAB
+"DATA",176.112,32547,1)
+358921^^Y
+"DATA",176.112,32548,0)
+4015928^CARMEX OINT,TOP
+"DATA",176.112,32548,1)
+358923^^Y
+"DATA",176.112,32549,0)
+4016451^CASTOR OIL 788MG/PERUVIAN BALSAM 87MG/TRYPSIN 90U/GM CREAM,TOP
+"DATA",176.112,32549,1)
+358924^^Y
+"DATA",176.112,32550,0)
+4016008^CELERY LEAF PWDR
+"DATA",176.112,32550,1)
+358925^^Y
+"DATA",176.112,32551,0)
+4016333^CHLORHEXIDINE GLUCONATE 2%/ISOPROPYL ALCHOHOL 70% 1.5ML
+"DATA",176.112,32551,1)
+358926^^Y
+"DATA",176.112,32552,0)
+4016316^CHONDROITIN/GLUCOSAMINE CAP/TAB
+"DATA",176.112,32552,1)
+358928^^Y
+"DATA",176.112,32553,0)
+4015728^CLOZAPINE (IVAX) 25MG TAB,UD
+"DATA",176.112,32553,1)
+358929^^Y
+"DATA",176.112,32554,0)
+4015729^CLOZAPINE (IVAX) 25MG TAB
+"DATA",176.112,32554,1)
+358929^^Y
+"DATA",176.112,32555,0)
+4015978^COENZYME Q10 CAP/TAB
+"DATA",176.112,32555,1)
+358930^^Y
+"DATA",176.112,32556,0)
+4015917^CONTACT LENS REWETTING (RENU) SOLN
+"DATA",176.112,32556,1)
+358931^^Y
+"DATA",176.112,32557,0)
+4015916^CONTACT LENS SOLN (RENU MULTI-PURPOSE)
+"DATA",176.112,32557,1)
+358932^^Y
+"DATA",176.112,32558,0)
+4016322^CURAFIL WOUND DRESSING GEL,TOP
+"DATA",176.112,32558,1)
+358933^^Y
+"DATA",176.112,32559,0)
+4016439^CYCLOSPORINE (GENGRAF) 100MG/ML SOLN,ORAL
+"DATA",176.112,32559,1)
+358934^^Y
+"DATA",176.112,32560,0)
+4016440^CYCLOSPORINE (SIDMAK) 100MG/ML SOLN,ORAL
+"DATA",176.112,32560,1)
+358935^^Y
+"DATA",176.112,32561,0)
+4016001^DANDELION PWDR
+"DATA",176.112,32561,1)
+358937^^Y
+"DATA",176.112,32562,0)
+4016317^DEHYDROEPIANDROSTERONE (DHEA) CAP/TAB
+"DATA",176.112,32562,1)
+358938^^Y
+"DATA",176.112,32563,0)
+4016009^DEVILS CLAW CAP/TAB
+"DATA",176.112,32563,1)
+358939^^Y
+"DATA",176.112,32564,0)
+4013379^DIABETES PATIENT EDUCATION PACK
+"DATA",176.112,32564,1)
+358940^^Y
+"DATA",176.112,32565,0)
+4015940^DIALYVITE TAB
+"DATA",176.112,32565,1)
+358941^^Y
+"DATA",176.112,32566,0)
+4015727^DILTIAZEM (MYLAN-SR) 60MG SA CAP
+"DATA",176.112,32566,1)
+358943^^Y
+"DATA",176.112,32567,0)
+4016002^DONG QUAI CAP/TAB
+"DATA",176.112,32567,1)
+358945^^Y
+"DATA",176.112,32568,0)
+4015980^ECHINACEA CAP/TAB
+"DATA",176.112,32568,1)
+358948^^Y
+"DATA",176.112,32569,0)
+4015783^ENSURE HC LIQUID CHOCOLATE
+"DATA",176.112,32569,1)
+358950^^Y
+"DATA",176.112,32570,0)
+4015784^ENSURE HC LIQUID VANILLA
+"DATA",176.112,32570,1)
+358951^^Y
+"DATA",176.112,32571,0)
+4015781^ENSURE HP LIQUID BANANA
+"DATA",176.112,32571,1)
+358952^^Y
+"DATA",176.112,32572,0)
+4015780^ENSURE HP LIQUID CHOCOLATE
+"DATA",176.112,32572,1)
+358953^^Y
+"DATA",176.112,32573,0)
+4015779^ENSURE HP LIQUID VANILLA
+"DATA",176.112,32573,1)
+358954^^Y
+"DATA",176.112,32574,0)
+4015782^ENSURE HP LIQUID WILD BERRY
+"DATA",176.112,32574,1)
+358955^^Y
+"DATA",176.112,32575,0)
+4015993^EPHEDRA CAP/TAB
+"DATA",176.112,32575,1)
+358956^^Y
+"DATA",176.112,32576,0)
+4015987^EVENING PRIMROSE CAP/TAB
+"DATA",176.112,32576,1)
+358958^^Y
+"DATA",176.112,32577,0)
+4016010^FENUGREEK SEED PWDR
+"DATA",176.112,32577,1)
+358959^^Y
+"DATA",176.112,32578,0)
+4015705^FERROUS FUMARATE 324-325MG TAB,UD
+"DATA",176.112,32578,1)
+358960^^Y
+"DATA",176.112,32579,0)
+4015718^FERROUS GLUCONATE 324-325MG TAB,UD
+"DATA",176.112,32579,1)
+358961^^Y
+"DATA",176.112,32580,0)
+4015992^FEVERFEW CAP/TAB
+"DATA",176.112,32580,1)
+358962^^Y
+"DATA",176.112,32581,0)
+4016277^FISH OIL CAP/TAB
+"DATA",176.112,32581,1)
+358963^^Y
+"DATA",176.112,32582,0)
+4016358^GELCLAIR,GEL,ORAL,PKT,15ML
+"DATA",176.112,32582,1)
+358964^^Y
+"DATA",176.112,32583,0)
+4016314^GINGER CAP/TAB
+"DATA",176.112,32583,1)
+358965^^Y
+"DATA",176.112,32584,0)
+4015979^GINSENG CAP/TAB
+"DATA",176.112,32584,1)
+358966^^Y
+"DATA",176.112,32585,0)
+4016315^GLUCOSAMINE CAP/TAB
+"DATA",176.112,32585,1)
+358967^^Y
+"DATA",176.112,32586,0)
+4015989^GRAPE SEED EXTRACT CAP/TAB
+"DATA",176.112,32586,1)
+358969^^Y
+"DATA",176.112,32587,0)
+4016230^GRAPEFRUIT SEED CAP/TAB
+"DATA",176.112,32587,1)
+358970^^Y
+"DATA",176.112,32588,0)
+4016004^GUAR GUM PWDR
+"DATA",176.112,32588,1)
+358971^^Y
+"DATA",176.112,32589,0)
+4015542^HAEMOPHILUS B 7.5/HEPATITIS 5MCG/0.5ML VACCINE (RECOMB) INJ
+"DATA",176.112,32589,1)
+358972^^Y
+"DATA",176.112,32590,0)
+4015998^HAWTHORN BERRY CAP/TAB
+"DATA",176.112,32590,1)
+358973^^Y
+"DATA",176.112,32591,0)
+4016011^HORSE CHESTNUT CAP/TAB
+"DATA",176.112,32591,1)
+358974^^Y
+"DATA",176.112,32592,0)
+4015882^IBRITUMOMAB TIUXETAN IN-111 INJ,KIT
+"DATA",176.112,32592,1)
+358976^^Y
+"DATA",176.112,32593,0)
+4015883^IBRITUMOMAB TIUXETAN Y-90 INJ,KIT
+"DATA",176.112,32593,1)
+358977^^Y
+"DATA",176.112,32594,0)
+4015588^INFLUENZA SUBVIRON VACCINE,VIL,5ML
+"DATA",176.112,32594,1)
+358979^^Y
+"DATA",176.112,32595,0)
+4015767^ISOSOURCE 1.5 CAL LIQUID,1000ML (CLOSED SYSTEM)
+"DATA",176.112,32595,1)
+358983^^Y
+"DATA",176.112,32596,0)
+4015768^ISOSOURCE 1.5 CAL LIQUID,1500ML (CLOSED SYSTEM)
+"DATA",176.112,32596,1)
+358984^^Y
+"DATA",176.112,32597,0)
+4015766^ISOSOURCE 1.5 CAL LIQUID,250ML
+"DATA",176.112,32597,1)
+358985^^Y
+"DATA",176.112,32598,0)
+4015773^ISOSOURCE VHN LIQUID,1000ML (CLOSED SYSTEM)
+"DATA",176.112,32598,1)
+358986^^Y
+"DATA",176.112,32599,0)
+4015774^ISOSOURCE VHN LIQUID,1500ML (CLOSED SYSTEM)
+"DATA",176.112,32599,1)
+358987^^Y
+"DATA",176.112,32600,0)
+4015772^ISOSOURCE VHN LIQUID,250ML
+"DATA",176.112,32600,1)
+358988^^Y
+"DATA",176.112,32601,0)
+4015986^KAVA CAP/TAB
+"DATA",176.112,32601,1)
+358989^^Y
+"DATA",176.112,32602,0)
+4016007^KELP CAP/TAB
+"DATA",176.112,32602,1)
+358990^^Y
+"DATA",176.112,32603,0)
+4015996^LICORICE EXTRACT LIQUID
+"DATA",176.112,32603,1)
+358993^^Y
+"DATA",176.112,32604,0)
+4016012^MEADOWSWEET EXTRACT PWDR
+"DATA",176.112,32604,1)
+358995^^Y
+"DATA",176.112,32605,0)
+4015792^MED PASS 2.0 LIQUID BUTTER PECAN,32OZ
+"DATA",176.112,32605,1)
+358996^^Y
+"DATA",176.112,32606,0)
+4015791^MED PASS 2.0 LIQUID VANILLA,32OZ
+"DATA",176.112,32606,1)
+358997^^Y
+"DATA",176.112,32607,0)
+4016006^MELATONIN CAP/TAB
+"DATA",176.112,32607,1)
+358998^^Y
+"DATA",176.112,32608,0)
+4015988^MILK THISTLE CAP/TAB
+"DATA",176.112,32608,1)
+358999^^Y
+"DATA",176.112,32609,0)
+4015764^NOVASOURCE 2.0 LIQUID (ORANGE CREME)
+"DATA",176.112,32609,1)
+359001^^Y
+"DATA",176.112,32610,0)
+4015765^NOVASOURCE 2.0 LIQUID (VANILLA)
+"DATA",176.112,32610,1)
+359002^^Y
+"DATA",176.112,32611,0)
+4015787^NUTRIRENAL LIQUID VANILLA,250ML
+"DATA",176.112,32611,1)
+359003^^Y
+"DATA",176.112,32612,0)
+4016013^ONION PWDR
+"DATA",176.112,32612,1)
+359005^^Y
+"DATA",176.112,32613,0)
+4027511^PAPAIN/UREA 10% (ACCUZYME) OINT,TOP
+"DATA",176.112,32613,1)
+359008^^Y
+"DATA",176.112,32614,0)
+4016041^PAPAIN 830000 UNT/UREA 10% (ACCUZYME) OINT,TOP
+"DATA",176.112,32614,1)
+359008^^Y
+"DATA",176.112,32615,0)
+4016040^PAPAIN 830000UNT/UREA 10% (ETHEZYME) OINT,TOP
+"DATA",176.112,32615,1)
+359009^^Y
+"DATA",176.112,32616,0)
+4016015^PASSION FLOWER CAP/TAB
+"DATA",176.112,32616,1)
+359010^^Y
+"DATA",176.112,32617,0)
+4016003^PECTIN CAP/TAB
+"DATA",176.112,32617,1)
+359011^^Y
+"DATA",176.112,32618,0)
+4015786^PEPTAMEN 1.5 LIQUID UNFLAVORED,1000ML
+"DATA",176.112,32618,1)
+359016^^Y
+"DATA",176.112,32619,0)
+4016254^PERFLEXANE LIPID MICROSPHERE INJ,SUSP
+"DATA",176.112,32619,1)
+359017^^Y
+"DATA",176.112,32620,0)
+4015970^PERFLUTREN LIPID MICROSPHERE INJ,2ML
+"DATA",176.112,32620,1)
+359018^^Y
+"DATA",176.112,32621,0)
+4015861^POLYSILOXENE GEL,TOP
+"DATA",176.112,32621,1)
+359019^^Y
+"DATA",176.112,32622,0)
+4015560^PRECISION (GLUCOSE) LOW/NORMAL/HIGH CONTROL SOLN
+"DATA",176.112,32622,1)
+359020^^Y
+"DATA",176.112,32623,0)
+4015559^PRECISION (GLUCOSE) NORMAL/MID CONTROL SOLN
+"DATA",176.112,32623,1)
+359021^^Y
+"DATA",176.112,32624,0)
+4015858^PRECISION XTRA (GLUCOSE) TEST STRIP
+"DATA",176.112,32624,1)
+359022^^Y
+"DATA",176.112,32625,0)
+4015785^PRO-PEPTIDE LIQUID VANILLA,250ML
+"DATA",176.112,32625,1)
+359023^^Y
+"DATA",176.112,32626,0)
+4015790^PROBALANCE LIQUID ULTRAPAK,1500ML
+"DATA",176.112,32626,1)
+359024^^Y
+"DATA",176.112,32627,0)
+4015789^PROBALANCE LIQUID ULTRAPAK,1000ML
+"DATA",176.112,32627,1)
+359024^^Y
+"DATA",176.112,32628,0)
+4015788^PROBALANCE LIQUID VANILLA,250ML
+"DATA",176.112,32628,1)
+359025^^Y
+"DATA",176.112,32629,0)
+4016313^PYCNOGENOL CAP/TAB
+"DATA",176.112,32629,1)
+359026^^Y
+"DATA",176.112,32630,0)
+4016340^RADIAGEL WOUND DRESSING GEL
+"DATA",176.112,32630,1)
+359027^^Y
+"DATA",176.112,32631,0)
+4015997^RED CLOVER EXTRACT CAP/TAB
+"DATA",176.112,32631,1)
+359028^^Y
+"DATA",176.112,32632,0)
+4016060^RESOURCE FRUIT BEVERAGE LIQUID (ORANGE)
+"DATA",176.112,32632,1)
+359029^^Y
+"DATA",176.112,32633,0)
+4016058^RESOURCE FRUIT BEVERAGE LIQUID (PEACH)
+"DATA",176.112,32633,1)
+359030^^Y
+"DATA",176.112,32634,0)
+4016059^RESOURCE FRUIT BEVERAGE LIQUID (WILD BERRY)
+"DATA",176.112,32634,1)
+359031^^Y
+"DATA",176.112,32635,0)
+4015995^SAGE OIL
+"DATA",176.112,32635,1)
+359032^^Y
+"DATA",176.112,32636,0)
+4015770^SANDOSOURCE PEPTIDE LIQUID,1000ML (CLOSED SYSTEM)
+"DATA",176.112,32636,1)
+359034^^Y
+"DATA",176.112,32637,0)
+4015771^SANDOSOURCE PEPTIDE LIQUID,1500ML (CLOSED SYSTEM)
+"DATA",176.112,32637,1)
+359035^^Y
+"DATA",176.112,32638,0)
+4015769^SANDOSOURCE PEPTIDE LIQUID,250ML
+"DATA",176.112,32638,1)
+359036^^Y
+"DATA",176.112,32639,0)
+4015982^SAW PALMETTO CAP/TAB
+"DATA",176.112,32639,1)
+359037^^Y
+"DATA",176.112,32640,0)
+4016019^SENSI-CARE PROTECTIVE OINT,TOP
+"DATA",176.112,32640,1)
+359040^^Y
+"DATA",176.112,32641,0)
+4016020^SENSI-CREAM MOISTURIZING CREAM,TOP
+"DATA",176.112,32641,1)
+359041^^Y
+"DATA",176.112,32642,0)
+4016318^SHARK CARTILAGE CAP/TAB
+"DATA",176.112,32642,1)
+359042^^Y
+"DATA",176.112,32643,0)
+4015762^SOF-TACT (GLUCOSE) TEST STRIP
+"DATA",176.112,32643,1)
+359043^^Y
+"DATA",176.112,32644,0)
+4015983^SOY CAP/TAB
+"DATA",176.112,32644,1)
+359044^^Y
+"DATA",176.112,32645,0)
+4015981^ST. JOHN'S WORT CAP/TAB
+"DATA",176.112,32645,1)
+359045^^Y
+"DATA",176.112,32646,0)
+4016094^SUNSCREEN-15 PABA-FREE COMBINATION LOTION
+"DATA",176.112,32646,1)
+359046^^Y
+"DATA",176.112,32647,0)
+4015714^THEOPHYLLINE 100MG TAB,SA (INWOOD)
+"DATA",176.112,32647,1)
+359047^^Y
+"DATA",176.112,32648,0)
+4016357^THEOPHYLLINE 125MG CAP,SA (INWOOD)
+"DATA",176.112,32648,1)
+359048^^Y
+"DATA",176.112,32649,0)
+4015499^THEOPHYLLINE 200MG CAP,SA (QUALITIEST)
+"DATA",176.112,32649,1)
+359049^^Y
+"DATA",176.112,32650,0)
+4015999^UVA URSI CAP/TAB
+"DATA",176.112,32650,1)
+359052^^Y
+"DATA",176.112,32651,0)
+4015985^VALERIAN CAP/TAB
+"DATA",176.112,32651,1)
+359053^^Y
+"DATA",176.112,32652,0)
+4015984^VALERIAN LIQUID
+"DATA",176.112,32652,1)
+359054^^Y
+"DATA",176.112,32653,0)
+4026332^CONDOM,NON-LATEX,NON-LUBRICATED
+"DATA",176.112,32653,1)
+359409^^Y
+"DATA",176.112,32654,0)
+4016591^PAPAIN PWDR
+"DATA",176.112,32654,1)
+359848^^Y
+"DATA",176.112,32655,0)
+4005129^4-MIXED TRACE ELEMENTS INJ
+"DATA",176.112,32655,1)
+360352^^Y
+"DATA",176.112,32656,0)
+4015734^CLOZAPINE (UDL) 25MG TAB,UD
+"DATA",176.112,32656,1)
+360365^^Y
+"DATA",176.112,32657,0)
+4015733^CLOZAPINE (MYLAN) 25MG TAB
+"DATA",176.112,32657,1)
+360366^^Y
+"DATA",176.112,32658,0)
+4015732^CLOZAPINE (MYLAN) 100MG TAB
+"DATA",176.112,32658,1)
+360367^^Y
+"DATA",176.112,32659,0)
+4015730^CLOZAPINE (IVAX) 100MG TAB
+"DATA",176.112,32659,1)
+360368^^Y
+"DATA",176.112,32660,0)
+4015731^CLOZAPINE (IVAX) 100MG TAB,UD
+"DATA",176.112,32660,1)
+360368^^Y
+"DATA",176.112,32661,0)
+4015735^CLOZAPINE (UDL) 100MG TAB,UD
+"DATA",176.112,32661,1)
+360369^^Y
+"DATA",176.112,32662,0)
+4016289^INFANRIX INJ,SUSP,SYRINGE
+"DATA",176.112,32662,1)
+360371^^Y
+"DATA",176.112,32663,0)
+4015618^DILTIAZEM (MYLAN-SR) 90MG SA CAP
+"DATA",176.112,32663,1)
+360384^^Y
+"DATA",176.112,32664,0)
+4015587^INFLUENZA SUBVIRON VACCINE,SYRINGE,0.5ML
+"DATA",176.112,32664,1)
+360386^^Y
+"DATA",176.112,32665,0)
+4015942^NIFEDIPINE (MYLAN-XL) 30MG SA TAB
+"DATA",176.112,32665,1)
+360392^^Y
+"DATA",176.112,32666,0)
+4015947^NIFEDIPINE (TEVA-CC) 30MG TAB SA TAB
+"DATA",176.112,32666,1)
+360393^^Y
+"DATA",176.112,32667,0)
+4015945^NIFEDIPINE (NIFEDICAL XL) 30MG SA TAB
+"DATA",176.112,32667,1)
+360394^^Y
+"DATA",176.112,32668,0)
+4015949^NIFEDIPINE (MYLAN-XL) 60MG SA TAB
+"DATA",176.112,32668,1)
+360395^^Y
+"DATA",176.112,32669,0)
+4015948^NIFEDIPINE (TEVA-CC) 60MG TAB SA TAB
+"DATA",176.112,32669,1)
+360396^^Y
+"DATA",176.112,32670,0)
+4015950^NIFEDIPINE (MYLAN-XL) 90MG SA TAB
+"DATA",176.112,32670,1)
+360397^^Y
+"DATA",176.112,32671,0)
+4015891^NITROGLYCERIN (ABLE) 0.3MG TAB,SUBLINGUAL
+"DATA",176.112,32671,1)
+360399^^Y
+"DATA",176.112,32672,0)
+4015892^NITROGLYCERIN (ABLE) 0.4MG TAB,SUBLINGUAL
+"DATA",176.112,32672,1)
+360400^^Y
+"DATA",176.112,32673,0)
+4015893^NITROGLYCERIN (ABLE) 0.6MG TAB,SUBLINGUAL
+"DATA",176.112,32673,1)
+360401^^Y
+"DATA",176.112,32674,0)
+4015715^THEOPHYLLINE 200MG TAB,SA (INWOOD)
+"DATA",176.112,32674,1)
+360407^^Y
+"DATA",176.112,32675,0)
+4015498^THEOPHYLLINE 125MG CAP,SA (QUALITEST)
+"DATA",176.112,32675,1)
+360408^^Y
+"DATA",176.112,32676,0)
+4015500^THEOPHYLLINE 300MG CAP,SA (QUALITEST)
+"DATA",176.112,32676,1)
+360409^^Y
+"DATA",176.112,32677,0)
+4009410^TING CREAM,TOP
+"DATA",176.112,32677,1)
+362111^^Y
+"DATA",176.112,32678,0)
+4008699^PETROLATUM OINT,TOP
+"DATA",176.112,32678,1)
+367375^^Y
+"DATA",176.112,32679,0)
+4010333^UROGESIC-BLUE TAB
+"DATA",176.112,32679,1)
+368729^^Y
+"DATA",176.112,32680,0)
+4009365^MINERAL OIL/PETROLATUM OINT,OPH
+"DATA",176.112,32680,1)
+376515^^Y
+"DATA",176.112,32681,0)
+4009366^MINERAL OIL,LIGHT/PETROLATUM (PF) OINT,OPH
+"DATA",176.112,32681,1)
+376515^^Y
+"DATA",176.112,32682,0)
+4008703^PETROLATUM OINT,OPH
+"DATA",176.112,32682,1)
+377036^^Y
+"DATA",176.112,32683,0)
+4017366^LACTOBACILLUS CAP
+"DATA",176.112,32683,1)
+381174^^Y
+"DATA",176.112,32684,0)
+4012095^OSMOLITE LIQUID
+"DATA",176.112,32684,1)
+393232^^Y
+"DATA",176.112,32685,0)
+4016928^ESTRADIOL 0.045MG/LEVONORGESTREL 0.015MG/DAY (CLIMARA PRO) PATCH
+"DATA",176.112,32685,1)
+402252^^Y
+"DATA",176.112,32686,0)
+4015951^MICONAZOLE NITRATE 2% (BAZA) CREAM,TOP
+"DATA",176.112,32686,1)
+404088^^Y
+"DATA",176.112,32687,0)
+4025156^PROPRANOLOL HCL (INNOPRAN XL) 80MG CAP,SA
+"DATA",176.112,32687,1)
+404111^^Y
+"DATA",176.112,32688,0)
+4025155^PROPRANOLOL HCL (INNOPRAN XL) 120MG CAP,SA
+"DATA",176.112,32688,1)
+404112^^Y
+"DATA",176.112,32689,0)
+4025798^METHYLPHENIDATE HCL (METADATE CD) 30MG CAP,SA
+"DATA",176.112,32689,1)
+404402^^Y
+"DATA",176.112,32690,0)
+4024784^DILTIAZEM (CARDIZEM LA) 120MG SA TAB
+"DATA",176.112,32690,1)
+404596^^Y
+"DATA",176.112,32691,0)
+4025132^DILTIAZEM (CARDIZEM LA) 180MG SA TAB
+"DATA",176.112,32691,1)
+404597^^Y
+"DATA",176.112,32692,0)
+4024530^DILTIAZEM (CARDIZEM LA) 240MG SA TAB
+"DATA",176.112,32692,1)
+404598^^Y
+"DATA",176.112,32693,0)
+4025133^DILTIAZEM (CARDIZEM LA) 300MG SA TAB
+"DATA",176.112,32693,1)
+404599^^Y
+"DATA",176.112,32694,0)
+4025134^DILTIAZEM (CARDIZEM LA) 360MG SA TAB
+"DATA",176.112,32694,1)
+404600^^Y
+"DATA",176.112,32695,0)
+4025131^DILTIAZEM (CARDIZEM LA) 420MG SA TAB
+"DATA",176.112,32695,1)
+404601^^Y
+"DATA",176.112,32696,0)
+4016821^BUPROPION HCL (WELLBUTRIN XL) 150MG TAB,SA
+"DATA",176.112,32696,1)
+404648^^Y
+"DATA",176.112,32697,0)
+4016822^BUPROPION HCL (WELLBUTRIN XL) 300MG TAB,SA
+"DATA",176.112,32697,1)
+404649^^Y
+"DATA",176.112,32698,0)
+4017144^ESTRADIOL 0.0375MG/DAY (CLIMARA) PATCH
+"DATA",176.112,32698,1)
+404656^^Y
+"DATA",176.112,32699,0)
+4024527^ESTRADIOL 0.06MG/DAY (CLIMARA) PATCH
+"DATA",176.112,32699,1)
+404657^^Y
+"DATA",176.112,32700,0)
+4026050^METHYLPHENIDATE HCL (METADATE CD) 10MG CAP,SA
+"DATA",176.112,32700,1)
+404674^^Y
+"DATA",176.112,32701,0)
+4024887^CARBAMAZEPINE 100MG CAP,SA (CARBATROL)
+"DATA",176.112,32701,1)
+404742^^Y
+"DATA",176.112,32702,0)
+4015502^AEROCHAMBER PLUS
+"DATA",176.112,32702,1)
+405433^^Y
+"DATA",176.112,32703,0)
+4012055^DEPEND FITTED BRIEF MEDIUM
+"DATA",176.112,32703,1)
+405497^^Y
+"DATA",176.112,32704,0)
+4026385^GLUCERNA SHAKE LIQUID PECAN
+"DATA",176.112,32704,1)
+405546^^Y
+"DATA",176.112,32705,0)
+4026383^GLUCERNA SHAKE LIQUID CHOCOLATE
+"DATA",176.112,32705,1)
+405547^^Y
+"DATA",176.112,32706,0)
+4026380^GLUCERNA SHAKE LIQUID VANILLA
+"DATA",176.112,32706,1)
+405548^^Y
+"DATA",176.112,32707,0)
+4026198^PROSURE LIQUID VANILLA
+"DATA",176.112,32707,1)
+405635^^Y
+"DATA",176.112,32708,0)
+4009727^EUCALYPTUS OIL/MENTHOL LOZENGE
+"DATA",176.112,32708,1)
+439469^^Y
+"DATA",176.112,32709,0)
+4016578^ALOE VERA CAP/TAB
+"DATA",176.112,32709,1)
+442174^^Y
+"DATA",176.112,32710,0)
+4016689^ALPHA-1-PROTEINASE INHIBITOR,HUMAN INJ
+"DATA",176.112,32710,1)
+442175^^Y
+"DATA",176.112,32711,0)
+4016579^ANDROSTENEDIONE CAP/TAB
+"DATA",176.112,32711,1)
+442247^^Y
+"DATA",176.112,32712,0)
+4016730^ASCENSIA ELITE (GLUCOSE) TEST STRIP
+"DATA",176.112,32712,1)
+442302^^Y
+"DATA",176.112,32713,0)
+4016589^CAT'S CLAW CAP/TAB
+"DATA",176.112,32713,1)
+442670^^Y
+"DATA",176.112,32714,0)
+4016839^DILTIAZEM (INWOOD) 120MG CAP,SA
+"DATA",176.112,32714,1)
+443110^^Y
+"DATA",176.112,32715,0)
+4016841^DILTIAZEM (INWOOD) 240MG CAP,SA
+"DATA",176.112,32715,1)
+443112^^Y
+"DATA",176.112,32716,0)
+4016842^DILTIAZEM (INWOOD) 300MG CAP,SA
+"DATA",176.112,32716,1)
+443113^^Y
+"DATA",176.112,32717,0)
+4016592^EVENING PRIMROSE OIL CAP/TAB
+"DATA",176.112,32717,1)
+443239^^Y
+"DATA",176.112,32718,0)
+4016583^GOTU KOLA CAP/TAB
+"DATA",176.112,32718,1)
+443463^^Y
+"DATA",176.112,32719,0)
+4016584^GREEN TEA CAP/TAB
+"DATA",176.112,32719,1)
+443466^^Y
+"DATA",176.112,32720,0)
+4016585^GUARANA CAP/TAB
+"DATA",176.112,32720,1)
+443469^^Y
+"DATA",176.112,32721,0)
+4016559^HYDROCHLORIC ACID 37% SOLN
+"DATA",176.112,32721,1)
+443534^^Y
+"DATA",176.112,32722,0)
+4016762^INFLUENZA LIVE VACCINE, NASAL
+"DATA",176.112,32722,1)
+443606^^Y
+"DATA",176.112,32723,0)
+4016586^NETTLE CAP/TAB
+"DATA",176.112,32723,1)
+444274^^Y
+"DATA",176.112,32724,0)
+4016874^PRUSSIAN BLUE INSOLUBLE 500MG CAP,ORAL
+"DATA",176.112,32724,1)
+444926^^Y
+"DATA",176.112,32725,0)
+4016590^RED YEAST RICE CAP/TAB
+"DATA",176.112,32725,1)
+445032^^Y
+"DATA",176.112,32726,0)
+4016629^SUNSCREEN 30/AVOBENZONE/PABA-FREE LOTION
+"DATA",176.112,32726,1)
+445565^^Y
+"DATA",176.112,32727,0)
+4016630^SUNSCREEN-15/AVOBENZONE/PABA-FREE LOTION
+"DATA",176.112,32727,1)
+445566^^Y
+"DATA",176.112,32728,0)
+4016542^THICK-IT 2 POWDER
+"DATA",176.112,32728,1)
+445684^^Y
+"DATA",176.112,32729,0)
+4016722^TOSITUMOMAB 14MG/ML INJ
+"DATA",176.112,32729,1)
+445779^^Y
+"DATA",176.112,32730,0)
+4016723^TOSITUMOMAB IODINE-131 0.61MCI/ML INJ
+"DATA",176.112,32730,1)
+445781^^Y
+"DATA",176.112,32731,0)
+4016724^TOSITUMOMAB IODINE-131 VIAL 5.6MCI/ML
+"DATA",176.112,32731,1)
+445782^^Y
+"DATA",176.112,32732,0)
+4016794^WATER FOR INJECTION,BACTERIOSTATIC,10ML
+"DATA",176.112,32732,1)
+446095^^Y
+"DATA",176.112,32733,0)
+4016795^WATER FOR INJECTION,BACTERIOSTATIC,30ML
+"DATA",176.112,32733,1)
+446096^^Y
+"DATA",176.112,32734,0)
+4016793^WATER FOR INJECTION,STERILE,100ML
+"DATA",176.112,32734,1)
+446097^^Y
+"DATA",176.112,32735,0)
+4016788^WATER FOR INJECTION,STERILE,30ML
+"DATA",176.112,32735,1)
+446098^^Y
+"DATA",176.112,32736,0)
+4016792^WATER FOR INJECTION,STERILE,50ML
+"DATA",176.112,32736,1)
+446099^^Y
+"DATA",176.112,32737,0)
+4016789^WATER FOR INJECTION,STERILE,5ML
+"DATA",176.112,32737,1)
+446100^^Y
+"DATA",176.112,32738,0)
+4002151^B-COMPLEX 100 INJ
+"DATA",176.112,32738,1)
+451780^^Y
+"DATA",176.112,32739,0)
+4016419^ICODEXTRIN 7.5% SOLN
+"DATA",176.112,32739,1)
+466434^^Y
+"DATA",176.112,32740,0)
+4008802^ADHESIVE BANDAGE,ELASTIC
+"DATA",176.112,32740,1)
+484384^^Y
+"DATA",176.112,32741,0)
+4008210^ACCU-BLOC CUSTOM EPIDURAL ANESTHESIA
+"DATA",176.112,32741,1)
+484385^^Y
+"DATA",176.112,32742,0)
+4014875^CLEANSER,ODO-KLEEN SOLN
+"DATA",176.112,32742,1)
+484386^^Y
+"DATA",176.112,32743,0)
+4013141^CANDIDA ALBICANS/COCCIDIOIDIN INJ TEST KIT
+"DATA",176.112,32743,1)
+484388^^Y
+"DATA",176.112,32744,0)
+4013140^CANDIDA ALBICANS/HISTOPLASMIN INJ TEST KIT
+"DATA",176.112,32744,1)
+484389^^Y
+"DATA",176.112,32745,0)
+4013142^CANDIDA ALBICANS/MUMPS INJ TEST KIT
+"DATA",176.112,32745,1)
+484390^^Y
+"DATA",176.112,32746,0)
+4017239^DIMETHYL ETHER,PROPANE PLANTAR WART REMOVAL KIT
+"DATA",176.112,32746,1)
+484391^^Y
+"DATA",176.112,32747,0)
+4017238^DIMETHYL ETHER,PROPANE WART REMOVAL KIT
+"DATA",176.112,32747,1)
+484392^^Y
+"DATA",176.112,32748,0)
+4016941^INTERFERON BETA-1B,RECOMBINANT 300MCG/VIL INJ,KIT
+"DATA",176.112,32748,1)
+484395^^Y
+"DATA",176.112,32749,0)
+4017067^LO SO PREP KIT
+"DATA",176.112,32749,1)
+484396^^Y
+"DATA",176.112,32750,0)
+4013564^OCTREOTIDE SA DEMONSTRATION KIT INJ
+"DATA",176.112,32750,1)
+484398^^Y
+"DATA",176.112,32751,0)
+4014514^CENTRAL LINE DRESSING CHANGE KIT CHURCH#AMS9801
+"DATA",176.112,32751,1)
+484410^^Y
+"DATA",176.112,32752,0)
+4016801^CENTRAL LINE DRESSING CHANGE KIT, LSL #3096
+"DATA",176.112,32752,1)
+484411^^Y
+"DATA",176.112,32753,0)
+4012687^DOUCHE,REUSABLE KIT
+"DATA",176.112,32753,1)
+484413^^Y
+"DATA",176.112,32754,0)
+4015482^TRIPLE CARE SKIN CARE KIT
+"DATA",176.112,32754,1)
+484417^^Y
+"DATA",176.112,32755,0)
+4017015^BEE POLLEN CAP/TAB
+"DATA",176.112,32755,1)
+484421^^Y
+"DATA",176.112,32756,0)
+4017299^BETA SITOSTEROL CAP/TAB
+"DATA",176.112,32756,1)
+484423^^Y
+"DATA",176.112,32757,0)
+4017002^BUTCHER'S BROOM CAP/TAB
+"DATA",176.112,32757,1)
+484428^^Y
+"DATA",176.112,32758,0)
+4010350^AMYLAS 43750U/LIPAS 6750U/PANCREAT 250MG/PROTEAS 41250 TAB,EC
+"DATA",176.112,32758,1)
+484430^^Y
+"DATA",176.112,32759,0)
+4012023^EAR SYRINGE,ADULT,90ML
+"DATA",176.112,32759,1)
+484444^^Y
+"DATA",176.112,32760,0)
+4014073^EAR SYRINGE,INFANT,30ML
+"DATA",176.112,32760,1)
+484445^^Y
+"DATA",176.112,32761,0)
+4017121^IRRIGATING SYRINGE CONTRO-PISTON 60ML MED#DYND20325
+"DATA",176.112,32761,1)
+484446^^Y
+"DATA",176.112,32762,0)
+4012014^IRRIGATING SYRINGE,BULB CATHETER TIP 60ML
+"DATA",176.112,32762,1)
+484447^^Y
+"DATA",176.112,32763,0)
+4012013^IRRIGATING SYRINGE CATHETER TIP 60ML
+"DATA",176.112,32763,1)
+484448^^Y
+"DATA",176.112,32764,0)
+4003025^HEPATITIS B VACCINE (RECOMBINANAT) 10MCG/0.5ML INJ,SYRINGE,0.5ML
+"DATA",176.112,32764,1)
+484451^^Y
+"DATA",176.112,32765,0)
+4012024^RECTAL SYRINGE,ADULT,240ML
+"DATA",176.112,32765,1)
+484458^^Y
+"DATA",176.112,32766,0)
+4012010^TUBEX SYRINGE 1ML
+"DATA",176.112,32766,1)
+484463^^Y
+"DATA",176.112,32767,0)
+4012011^TUBEX SYRINGE 2ML
+"DATA",176.112,32767,1)
+484464^^Y
+"DATA",176.112,32768,0)
+4009216^ALGINIC ACID/AL OH 80MG/CA STEARATE/MG TRISIL 20MG TAB,CHEW
+"DATA",176.112,32768,1)
+484467^^Y
+"DATA",176.112,32769,0)
+4014907^CLOG ZAPPER ENTERAL TUBE DECLOGGING SYSTEM
+"DATA",176.112,32769,1)
+484468^^Y
+"DATA",176.112,32770,0)
+4012293^NON-ADHESIVE UROSTOMY SYSTEM MED #501001
+"DATA",176.112,32770,1)
+484469^^Y
+"DATA",176.112,32771,0)
+4017061^BD MINIMED SYSTEM (GLUCOSE) TEST STRIP
+"DATA",176.112,32771,1)
+484474^^Y
+"DATA",176.112,32772,0)
+4012408^INSPIREASE SYSTEM
+"DATA",176.112,32772,1)
+484475^^Y
+"DATA",176.112,32773,0)
+4017014^CAYENNE CAP/TAB
+"DATA",176.112,32773,1)
+484476^^Y
+"DATA",176.112,32774,0)
+4017006^CALENDULA CAP/TAB
+"DATA",176.112,32774,1)
+484477^^Y
+"DATA",176.112,32775,0)
+4017323^BOSWELLIA SERRATA CAP/TAB
+"DATA",176.112,32775,1)
+484481^^Y
+"DATA",176.112,32776,0)
+4017271^ALPHA-LIPOIC ACID CAP/TAB
+"DATA",176.112,32776,1)
+484493^^Y
+"DATA",176.112,32777,0)
+4011425^ADAPTER,UROSTOMY DRAIN TUBE H#7331
+"DATA",176.112,32777,1)
+484502^^Y
+"DATA",176.112,32778,0)
+4016461^ARGYLE SALEM SUMP TUBE 16FR KENDALL #264960
+"DATA",176.112,32778,1)
+484503^^Y
+"DATA",176.112,32779,0)
+4012506^AUTO-LANCET (AMES AUTOLET) INJECTOR
+"DATA",176.112,32779,1)
+484504^^Y
+"DATA",176.112,32780,0)
+4011693^BURN DRESSING 18IN X 18IN,10PLY
+"DATA",176.112,32780,1)
+484505^^Y
+"DATA",176.112,32781,0)
+4011804^CATH'N SLEEVE,PLASTIC 14FR BARD #8914
+"DATA",176.112,32781,1)
+484506^^Y
+"DATA",176.112,32782,0)
+4012629^AUTOLET PLATFORM,AMES SUPER
+"DATA",176.112,32782,1)
+484507^^Y
+"DATA",176.112,32783,0)
+4016913^ASCENSIA AUTODISC (GLUCOSE) TEST STRIP
+"DATA",176.112,32783,1)
+484508^^Y
+"DATA",176.112,32784,0)
+4011929^AUTO-LANCET,PALCO #A100
+"DATA",176.112,32784,1)
+484509^^Y
+"DATA",176.112,32785,0)
+4017320^BREATHERITE SPACER RIGID BR100
+"DATA",176.112,32785,1)
+484510^^Y
+"DATA",176.112,32786,0)
+4017142^BD (GLUCOSE) TEST STRIP
+"DATA",176.112,32786,1)
+484511^^Y
+"DATA",176.112,32787,0)
+4010383^BUTTERFLY SET 23G 3/4IN,12IN TUBING
+"DATA",176.112,32787,1)
+484512^^Y
+"DATA",176.112,32788,0)
+4011787^CATH'N SLEEVE,PLASTIC 18FR BARD #8918
+"DATA",176.112,32788,1)
+484513^^Y
+"DATA",176.112,32789,0)
+4012507^AUTOINJECTOR (PENINJECT 2.25) FOR CAVERJECT
+"DATA",176.112,32789,1)
+484514^^Y
+"DATA",176.112,32790,0)
+4016462^ARGYLE SALEM SUMP TUBE 18FR KENDALL #8888266148
+"DATA",176.112,32790,1)
+484515^^Y
+"DATA",176.112,32791,0)
+4016031^CARTRIDGE,DISETRONIC 3ML #CAR 3000421
+"DATA",176.112,32791,1)
+484516^^Y
+"DATA",176.112,32792,0)
+4016029^CARTRIDGE,DISETRONIC 3ML #CAR 3000419
+"DATA",176.112,32792,1)
+484517^^Y
+"DATA",176.112,32793,0)
+4016030^CARTRIDGE,DISETRONIC 10ML #CAR 3000423
+"DATA",176.112,32793,1)
+484518^^Y
+"DATA",176.112,32794,0)
+4012402^CARRINGTON ODOR ELIMINATOR SOLN
+"DATA",176.112,32794,1)
+484520^^Y
+"DATA",176.112,32795,0)
+4014156^CARRA GAUZE 4IN X 4IN
+"DATA",176.112,32795,1)
+484521^^Y
+"DATA",176.112,32796,0)
+4015472^CAP,NEEDLELESS IV BRAUN B2000-654493
+"DATA",176.112,32796,1)
+484522^^Y
+"DATA",176.112,32797,0)
+4011595^ABSORBTIVE DRESSING 6GM #740036
+"DATA",176.112,32797,1)
+484523^^Y
+"DATA",176.112,32798,0)
+4015503^AEROTRACH PLUS
+"DATA",176.112,32798,1)
+484524^^Y
+"DATA",176.112,32799,0)
+4011935^AIR WARMING MASK
+"DATA",176.112,32799,1)
+484525^^Y
+"DATA",176.112,32800,0)
+4011424^ADAPTER,ACCUSEAL C#0219-15
+"DATA",176.112,32800,1)
+484526^^Y
+"DATA",176.112,32801,0)
+4008803^BAND-AID 1IN X 3IN
+"DATA",176.112,32801,1)
+484527^^Y
+"DATA",176.112,32802,0)
+4008826^BAND-AID 2IN EXTRA LARGE
+"DATA",176.112,32802,1)
+484528^^Y
+"DATA",176.112,32803,0)
+4016862^BANDADE TUBULAR ELASTIC NET SZ 12 X 25YD
+"DATA",176.112,32803,1)
+484529^^Y
+"DATA",176.112,32804,0)
+4012032^BEDPAN,DISPOSABLE
+"DATA",176.112,32804,1)
+484530^^Y
+"DATA",176.112,32805,0)
+4014585^BEDPAN,FRACTURE,PLASTIC,DISPOSABLE
+"DATA",176.112,32805,1)
+484531^^Y
+"DATA",176.112,32806,0)
+4011577^COTTON BALL 2000
+"DATA",176.112,32806,1)
+484534^^Y
+"DATA",176.112,32807,0)
+4011576^COTTON BALL 4000
+"DATA",176.112,32807,1)
+484535^^Y
+"DATA",176.112,32808,0)
+4008839^COTTON-TIP APPLICATOR NONSTERILE
+"DATA",176.112,32808,1)
+484536^^Y
+"DATA",176.112,32809,0)
+4014472^APPLICATOR,COTTON TIP NONSTERILE
+"DATA",176.112,32809,1)
+484536^^Y
+"DATA",176.112,32810,0)
+4014470^APPLICATOR,COTTON TIP STERILE
+"DATA",176.112,32810,1)
+484537^^Y
+"DATA",176.112,32811,0)
+4008840^COTTON-TIP APPLICATOR STERILE
+"DATA",176.112,32811,1)
+484537^^Y
+"DATA",176.112,32812,0)
+4012931^ELLIPSE COMPACT SPACER
+"DATA",176.112,32812,1)
+484539^^Y
+"DATA",176.112,32813,0)
+4012360^CONNECTING TUBE STERILE 3/16IN X 6FT
+"DATA",176.112,32813,1)
+484540^^Y
+"DATA",176.112,32814,0)
+4012374^EXTENSION TUBE FOR HURRICANE SPRAY
+"DATA",176.112,32814,1)
+484541^^Y
+"DATA",176.112,32815,0)
+4016992^BIODERM TUBE HOLDER DEVICE #51300
+"DATA",176.112,32815,1)
+484543^^Y
+"DATA",176.112,32816,0)
+4014201^GASTROSTOMY TUBE HOLDER DALE #340
+"DATA",176.112,32816,1)
+484544^^Y
+"DATA",176.112,32817,0)
+4011727^NASAL OXYGEN TUBE F#166-8099
+"DATA",176.112,32817,1)
+484545^^Y
+"DATA",176.112,32818,0)
+4012367^EXTENSION TUBING H#9803
+"DATA",176.112,32818,1)
+484547^^Y
+"DATA",176.112,32819,0)
+4012369^EXTENSION TUBING H#9813
+"DATA",176.112,32819,1)
+484548^^Y
+"DATA",176.112,32820,0)
+4015272^NEBULIZER,MASK & TUBING MEDLINE #HCS4485
+"DATA",176.112,32820,1)
+484549^^Y
+"DATA",176.112,32821,0)
+4012072^ALLKARE ADHESIVE REMOVER PAD C#0374-43
+"DATA",176.112,32821,1)
+484551^^Y
+"DATA",176.112,32822,0)
+4012637^ALLKARE PROTECTIVE BARRIER WIPE C#0374-44
+"DATA",176.112,32822,1)
+484552^^Y
+"DATA",176.112,32823,0)
+4012628^AUTOLET PLATFORM,AMES REGULAR
+"DATA",176.112,32823,1)
+484553^^Y
+"DATA",176.112,32824,0)
+4017261^CLEANSING CLOTH,ALEOTOUCH PKT M#MSC263750A
+"DATA",176.112,32824,1)
+484554^^Y
+"DATA",176.112,32825,0)
+4014584^BEDPAN,REGULAR,PLASTIC,DISPOSABLE
+"DATA",176.112,32825,1)
+484556^^Y
+"DATA",176.112,32826,0)
+4008540^EMPTY FLEXIBLE CONTAINER
+"DATA",176.112,32826,1)
+484557^^Y
+"DATA",176.112,32827,0)
+4012633^FINGER COT
+"DATA",176.112,32827,1)
+484558^^Y
+"DATA",176.112,32828,0)
+4012214^ENEMA BAG GREER #7011
+"DATA",176.112,32828,1)
+484559^^Y
+"DATA",176.112,32829,0)
+4012681^FLEXI-TRAK ANCHORING DEVICE C#0374-48
+"DATA",176.112,32829,1)
+484560^^Y
+"DATA",176.112,32830,0)
+4012635^ELASTIC ROUND TORBOT #TT264
+"DATA",176.112,32830,1)
+484561^^Y
+"DATA",176.112,32831,0)
+4015271^ELECTRODE,DERMATRODE SA 2IN X 2IN AI#200-140
+"DATA",176.112,32831,1)
+484562^^Y
+"DATA",176.112,32832,0)
+4017012^CHONDROITIN SULFATE CAP/TAB
+"DATA",176.112,32832,1)
+484563^^Y
+"DATA",176.112,32833,0)
+4012458^FLEXIBLE MOUNTING RING MARLEN
+"DATA",176.112,32833,1)
+484564^^Y
+"DATA",176.112,32834,0)
+4017389^EXTERNAL CONTINENCE DEVICE BIODERM ECD #20006
+"DATA",176.112,32834,1)
+484565^^Y
+"DATA",176.112,32835,0)
+4016547^EXTERNAL CONTINENCE DEVICE BIODERM XLS #20026
+"DATA",176.112,32835,1)
+484566^^Y
+"DATA",176.112,32836,0)
+4012682^FLEXI-TRAK ANCHORING DEVICE C#0374-49
+"DATA",176.112,32836,1)
+484567^^Y
+"DATA",176.112,32837,0)
+4016205^STATLOCK FOLEY,VFDSS FOLEY ANCHORING DEVICE
+"DATA",176.112,32837,1)
+484568^^Y
+"DATA",176.112,32838,0)
+4014897^STATLOCK FOLEY, FOLEY ANCHORING DEVICE
+"DATA",176.112,32838,1)
+484569^^Y
+"DATA",176.112,32839,0)
+4016203^STATLOCK FOLEY,VFDS FOLEY ANCHORING DEVICE
+"DATA",176.112,32839,1)
+484570^^Y
+"DATA",176.112,32840,0)
+4016204^STATLOCK FOLEY,VFDSP FOLEY ANCHORING DEVICE
+"DATA",176.112,32840,1)
+484571^^Y
+"DATA",176.112,32841,0)
+4010390^TRANSFER DEVICE,ASEPTIC
+"DATA",176.112,32841,1)
+484573^^Y
+"DATA",176.112,32842,0)
+4011933^MASK,SURGICAL CUP SHAPE
+"DATA",176.112,32842,1)
+484574^^Y
+"DATA",176.112,32843,0)
+4011934^MASK,SURGICAL RECTANGULAR SHAPE
+"DATA",176.112,32843,1)
+484575^^Y
+"DATA",176.112,32844,0)
+4017160^CLEANSING CLOTH,ALOETOUCH PKT M#MSC263700
+"DATA",176.112,32844,1)
+484576^^Y
+"DATA",176.112,32845,0)
+4017363^MEDIPORE H SOFT CLOTH 2IN X 2YD 3M #2862S
+"DATA",176.112,32845,1)
+484577^^Y
+"DATA",176.112,32846,0)
+4011948^FILTER NEEDLE,19G,5 MICRON,1 1/2IN
+"DATA",176.112,32846,1)
+484579^^Y
+"DATA",176.112,32847,0)
+4011947^NOVO FINE 30 DISPOSABLE NEEDLE
+"DATA",176.112,32847,1)
+484580^^Y
+"DATA",176.112,32848,0)
+4011946^PEN NEEDLE DISPOSABLE
+"DATA",176.112,32848,1)
+484581^^Y
+"DATA",176.112,32849,0)
+4016047^VALVE PORT LEUR-LOCK NEEDLE FREE ALARIS #2000E
+"DATA",176.112,32849,1)
+484582^^Y
+"DATA",176.112,32850,0)
+4017226^VALVE PORT LEUR-LOCK NEEDLE FREE ALARIS #42293E
+"DATA",176.112,32850,1)
+484583^^Y
+"DATA",176.112,32851,0)
+4012625^QUICK DRAIN VALVE UROCARE #7001
+"DATA",176.112,32851,1)
+484584^^Y
+"DATA",176.112,32852,0)
+4014979^VALVE,LEG BAG,ALPINE SIERRA #68300
+"DATA",176.112,32852,1)
+484585^^Y
+"DATA",176.112,32853,0)
+4008515^GLUCOMETER ELITE (GLUCOSE) TEST STRIP
+"DATA",176.112,32853,1)
+484586^^Y
+"DATA",176.112,32854,0)
+4017132^PRECISION SOF-TACT (GLUCOSE) TEST STRIP
+"DATA",176.112,32854,1)
+484587^^Y
+"DATA",176.112,32855,0)
+4012251^DRIP COLLECTOR CONVEEN #5420
+"DATA",176.112,32855,1)
+484604^^Y
+"DATA",176.112,32856,0)
+4012250^DRIP COLLECTOR MANHOOD POUCH #4200B
+"DATA",176.112,32856,1)
+484605^^Y
+"DATA",176.112,32857,0)
+4011692^FLUFF,LARGE STERILE #11-128 PKG OF 3
+"DATA",176.112,32857,1)
+484606^^Y
+"DATA",176.112,32858,0)
+4012033^ENEMA SET,BAG TYPE F#117-8991
+"DATA",176.112,32858,1)
+484607^^Y
+"DATA",176.112,32859,0)
+4012034^ENEMA SET,BUCKET TYPE F#761-0314
+"DATA",176.112,32859,1)
+484608^^Y
+"DATA",176.112,32860,0)
+4012350^KANGAROO PUMP SET EASY-CAP CLOSE 500ML
+"DATA",176.112,32860,1)
+484609^^Y
+"DATA",176.112,32861,0)
+4011154^LOOP OSTOMY STARTER SET H#7340
+"DATA",176.112,32861,1)
+484610^^Y
+"DATA",176.112,32862,0)
+4011155^LOOP OSTOMY STARTER SET H#7341
+"DATA",176.112,32862,1)
+484611^^Y
+"DATA",176.112,32863,0)
+4016037^PISTON ROD DISETRONIC 3ML #SUP 3000208
+"DATA",176.112,32863,1)
+484612^^Y
+"DATA",176.112,32864,0)
+4010381^UNIVERSAL SET (IVAC) 20GTTS/ML #52073
+"DATA",176.112,32864,1)
+484613^^Y
+"DATA",176.112,32865,0)
+4010377^PUMP,LUTREPULSE PROGRAMMABLE
+"DATA",176.112,32865,1)
+484614^^Y
+"DATA",176.112,32866,0)
+4016787^GOWN,ENVIROMENTAL,UNIVERSAL ONE-SIZE YELLOW
+"DATA",176.112,32866,1)
+484615^^Y
+"DATA",176.112,32867,0)
+4012653^UNIVERSAL ACCESS PORT H#9779
+"DATA",176.112,32867,1)
+484616^^Y
+"DATA",176.112,32868,0)
+4016210^BEG,LEG ALPINE SPORT #68006R
+"DATA",176.112,32868,1)
+484617^^Y
+"DATA",176.112,32869,0)
+4014873^LEG,BAG STRAP,LARGE,MENTOR #22303
+"DATA",176.112,32869,1)
+484618^^Y
+"DATA",176.112,32870,0)
+4014872^LEG,BAG STRAP,SMALL,MENTOR #22321
+"DATA",176.112,32870,1)
+484619^^Y
+"DATA",176.112,32871,0)
+4013717^INSULIN NPH HUMAN 100 U/ML INJ PEN 3ML
+"DATA",176.112,32871,1)
+484621^^Y
+"DATA",176.112,32872,0)
+4017093^TRIMSPA EPHEDRA FREE CAP/TAB
+"DATA",176.112,32872,1)
+484626^^Y
+"DATA",176.112,32873,0)
+4017096^TOTAL LEAN EPHEDRA-FREE CAP/TAB
+"DATA",176.112,32873,1)
+484627^^Y
+"DATA",176.112,32874,0)
+4017317^PROSTA-PRIME CAP/TAB
+"DATA",176.112,32874,1)
+484628^^Y
+"DATA",176.112,32875,0)
+4017220^COBRA POWERFUL MEN'S PERFORMANCE ENHANCER CAP/TAB
+"DATA",176.112,32875,1)
+484629^^Y
+"DATA",176.112,32876,0)
+4017098^COBRA POWERFUL MEN'S PREFORMANCE ENHANCER CAP/TAB
+"DATA",176.112,32876,1)
+484630^^Y
+"DATA",176.112,32877,0)
+4017092^ESTROVEN JOINT & BONE CAP/TAB
+"DATA",176.112,32877,1)
+484631^^Y
+"DATA",176.112,32878,0)
+4017079^COMMIPHORA MUKUL EXTRACT (GUGGUL) CAP/TAB
+"DATA",176.112,32878,1)
+484632^^Y
+"DATA",176.112,32879,0)
+4017322^COPPER CAP/TAB
+"DATA",176.112,32879,1)
+484633^^Y
+"DATA",176.112,32880,0)
+4017013^CRANBERRY EXTRACT CAP/TAB
+"DATA",176.112,32880,1)
+484634^^Y
+"DATA",176.112,32881,0)
+4016581^GLUCOMANNAN CAP/TAB
+"DATA",176.112,32881,1)
+484635^^Y
+"DATA",176.112,32882,0)
+4017182^GLUCOSAMINE/S-ADENOSYLMETHIONINE (SAM-e) CAP/TAB
+"DATA",176.112,32882,1)
+484636^^Y
+"DATA",176.112,32883,0)
+4017391^SACCHAROMYCES BOULARDII CAP/TAB
+"DATA",176.112,32883,1)
+484637^^Y
+"DATA",176.112,32884,0)
+4017078^SPIRULINA CAP/TAB
+"DATA",176.112,32884,1)
+484638^^Y
+"DATA",176.112,32885,0)
+4017302^TAURINE CAP/TAB
+"DATA",176.112,32885,1)
+484639^^Y
+"DATA",176.112,32886,0)
+4017080^HORNY GOAT WEED CAP/TAB
+"DATA",176.112,32886,1)
+484640^^Y
+"DATA",176.112,32887,0)
+4017010^LUTEIN CAP/TAB
+"DATA",176.112,32887,1)
+484641^^Y
+"DATA",176.112,32888,0)
+4017011^LYCOPENE CAP/TAB
+"DATA",176.112,32888,1)
+484642^^Y
+"DATA",176.112,32889,0)
+4017076^MACA CAP/TAB
+"DATA",176.112,32889,1)
+484643^^Y
+"DATA",176.112,32890,0)
+4017183^MULTIVITAMINS FOR JOINT HEALTH HERBAL CAP/TAB
+"DATA",176.112,32890,1)
+484644^^Y
+"DATA",176.112,32891,0)
+4017319^METHYLSULFONYLMETHANE CAP/TAB
+"DATA",176.112,32891,1)
+484645^^Y
+"DATA",176.112,32892,0)
+4017270^POLICOSANOL CAP/TAB
+"DATA",176.112,32892,1)
+484646^^Y
+"DATA",176.112,32893,0)
+4017025^S-ADENOSYLMETHIONINE (SAM-E) CAP/TAB
+"DATA",176.112,32893,1)
+484647^^Y
+"DATA",176.112,32894,0)
+4017097^XENADRINE EFX EPHEDRINE FREE FAT LOSS CAP/TAB
+"DATA",176.112,32894,1)
+484648^^Y
+"DATA",176.112,32895,0)
+4017077^CHASTEBERRY (CHASTE TREE FRUIT) CAP/TAB
+"DATA",176.112,32895,1)
+484649^^Y
+"DATA",176.112,32896,0)
+4016449^DISPENSING PIN PENTOTHAL AB#6682
+"DATA",176.112,32896,1)
+484650^^Y
+"DATA",176.112,32897,0)
+4012247^ICE BAG,LARGE
+"DATA",176.112,32897,1)
+484651^^Y
+"DATA",176.112,32898,0)
+4012246^ICE BAG,MEDIUM
+"DATA",176.112,32898,1)
+484652^^Y
+"DATA",176.112,32899,0)
+4012245^ICE BAG,SMALL
+"DATA",176.112,32899,1)
+484653^^Y
+"DATA",176.112,32900,0)
+4012409^INSPIREASE RESERVOIR BAG
+"DATA",176.112,32900,1)
+484654^^Y
+"DATA",176.112,32901,0)
+4016580^CAPSACIAN PWDR
+"DATA",176.112,32901,1)
+484699^^Y
+"DATA",176.112,32902,0)
+4016640^CAPSAICIN PWDR
+"DATA",176.112,32902,1)
+484700^^Y
+"DATA",176.112,32903,0)
+4017377^AMIODARONE HCL (SANDOZ) 200MG TAB
+"DATA",176.112,32903,1)
+484725^^Y
+"DATA",176.112,32904,0)
+4012652^LOOP OSTOMY BRIDGE H#7767
+"DATA",176.112,32904,1)
+484727^^Y
+"DATA",176.112,32905,0)
+4014309^COVELET,PATCH 1.5IN X 2IN #0330
+"DATA",176.112,32905,1)
+484728^^Y
+"DATA",176.112,32906,0)
+4017321^BREATHERITE SPACER COLLAPSIBLE BR200
+"DATA",176.112,32906,1)
+484729^^Y
+"DATA",176.112,32907,0)
+4011772^CATH-SECURE #5445-2
+"DATA",176.112,32907,1)
+484731^^Y
+"DATA",176.112,32908,0)
+4012249^DRIP COLLECTOR CONVEEN #5410
+"DATA",176.112,32908,1)
+484732^^Y
+"DATA",176.112,32909,0)
+4014913^LINER,SECURELY YOURS,AHDESIVE,PAPER PAK #GH-2
+"DATA",176.112,32909,1)
+484734^^Y
+"DATA",176.112,32910,0)
+4011587^KLING 2IN STERILE
+"DATA",176.112,32910,1)
+484735^^Y
+"DATA",176.112,32911,0)
+4012088^EYE PAD STERILE
+"DATA",176.112,32911,1)
+484736^^Y
+"DATA",176.112,32912,0)
+4011581^KLING 3IN STERILE
+"DATA",176.112,32912,1)
+484737^^Y
+"DATA",176.112,32913,0)
+4011583^KLING 4IN STERILE
+"DATA",176.112,32913,1)
+484738^^Y
+"DATA",176.112,32914,0)
+4011588^KLING 6IN STERILE
+"DATA",176.112,32914,1)
+484739^^Y
+"DATA",176.112,32915,0)
+4010389^SPIKE,ASPIRATING,STERILE
+"DATA",176.112,32915,1)
+484740^^Y
+"DATA",176.112,32916,0)
+4015378^STERILE FIELD 16IN X 29IN
+"DATA",176.112,32916,1)
+484741^^Y
+"DATA",176.112,32917,0)
+4012655^TRANSVERSE ROD,STERILE COLOPLAST #2919
+"DATA",176.112,32917,1)
+484742^^Y
+"DATA",176.112,32918,0)
+4012873^FILTRODOR GAS FILTER COLOPLAST#00509
+"DATA",176.112,32918,1)
+484743^^Y
+"DATA",176.112,32919,0)
+4012639^HOLLISTER REPLACEMENT FILTER H#7766
+"DATA",176.112,32919,1)
+484744^^Y
+"DATA",176.112,32920,0)
+4008183^MEDICATED DISPOSABLE DOUCHE
+"DATA",176.112,32920,1)
+484745^^Y
+"DATA",176.112,32921,0)
+4016107^MEDICATION ORGANIZER 1 DAY/4 SLOT
+"DATA",176.112,32921,1)
+484746^^Y
+"DATA",176.112,32922,0)
+4016106^MEDICATION ORGANIZER 7 DAY
+"DATA",176.112,32922,1)
+484747^^Y
+"DATA",176.112,32923,0)
+4014824^MEDICATION ORGANIZER 7 DAY/4 SLOT APEX#70027PL
+"DATA",176.112,32923,1)
+484748^^Y
+"DATA",176.112,32924,0)
+4016105^MEDICATION ORGANIZER 7DAY/4 SLOT
+"DATA",176.112,32924,1)
+484749^^Y
+"DATA",176.112,32925,0)
+4014836^MEDICATION ORGANIZER 7DAY/4 SLOT APEX#70027
+"DATA",176.112,32925,1)
+484750^^Y
+"DATA",176.112,32926,0)
+4009885^ISOSOURCE LIQUID (VANILLA)
+"DATA",176.112,32926,1)
+484751^^Y
+"DATA",176.112,32927,0)
+4012349^FOLEY CATH TRAY 16FR BARD #899616
+"DATA",176.112,32927,1)
+484753^^Y
+"DATA",176.112,32928,0)
+4012348^FOLEY CATHETERIZATION TRAY W/O CATHETER
+"DATA",176.112,32928,1)
+484754^^Y
+"DATA",176.112,32929,0)
+4017094^HYDROXYCUT ADVANCED WEIGHT LOSS FORMULA, EPHEDRA-FREE
+"DATA",176.112,32929,1)
+484757^^Y
+"DATA",176.112,32930,0)
+4011636^FILLER,COMFEEL SEASORB COLOPLAST #3740
+"DATA",176.112,32930,1)
+484758^^Y
+"DATA",176.112,32931,0)
+4012410^INSPIREASE MOUTHPIECE
+"DATA",176.112,32931,1)
+484759^^Y
+"DATA",176.112,32932,0)
+4012597^CUNNINGHAM CLAMP,LARGE,BARD #004054
+"DATA",176.112,32932,1)
+484763^^Y
+"DATA",176.112,32933,0)
+4012596^CUNNINGHAM CLAMP,REGULAR,BARD #004053
+"DATA",176.112,32933,1)
+484764^^Y
+"DATA",176.112,32934,0)
+4017185^HERBAL MENS PERFORMANCE ENHANCER
+"DATA",176.112,32934,1)
+484765^^Y
+"DATA",176.112,32935,0)
+4017184^HERBAL WEIGHT LOSS AID
+"DATA",176.112,32935,1)
+484766^^Y
+"DATA",176.112,32936,0)
+4012672^GRADUATE,URINE CUP,PLASTIC,1000ML
+"DATA",176.112,32936,1)
+484768^^Y
+"DATA",176.112,32937,0)
+4017034^CLOZAPINE (IVAX) 12.5MG TAB,UD
+"DATA",176.112,32937,1)
+484770^^Y
+"DATA",176.112,32938,0)
+4017035^CLOZAPINE (IVAX) 12.5MG TAB
+"DATA",176.112,32938,1)
+484770^^Y
+"DATA",176.112,32939,0)
+4012697^LINER,UROSAN PLUS,DOUBLE-SIDED ADHESIVE
+"DATA",176.112,32939,1)
+484771^^Y
+"DATA",176.112,32940,0)
+4016843^DILTIAZEM (INWOOD) 360MG CAP,SA
+"DATA",176.112,32940,1)
+484782^^Y
+"DATA",176.112,32941,0)
+4008856^SENNA 8.6MG TAB
+"DATA",176.112,32941,1)
+484792^^Y
+"DATA",176.112,32942,0)
+4017120^FISH OIL (SEA OMEGA) 1000MG CAP
+"DATA",176.112,32942,1)
+484799^^Y
+"DATA",176.112,32943,0)
+4012624^STERICOL DEODORANT TAB -NOT FOR ORAL USE
+"DATA",176.112,32943,1)
+484804^^Y
+"DATA",176.112,32944,0)
+4016300^TABLET CRUSHER
+"DATA",176.112,32944,1)
+484810^^Y
+"DATA",176.112,32945,0)
+4016039^TABLET CUTTER, AMI #04065
+"DATA",176.112,32945,1)
+484811^^Y
+"DATA",176.112,32946,0)
+4013756^TABLET CUTTER
+"DATA",176.112,32946,1)
+484812^^Y
+"DATA",176.112,32947,0)
+4011570^MEFIX 1IN X 11YD SCOTT #65210
+"DATA",176.112,32947,1)
+484825^^Y
+"DATA",176.112,32948,0)
+4017253^ICAPS AREDS FORMULA TAB,SA
+"DATA",176.112,32948,1)
+484840^^Y
+"DATA",176.112,32949,0)
+4017254^ICAPS LUTEIN & ZEAXANTHIN TAB,SA
+"DATA",176.112,32949,1)
+484841^^Y
+"DATA",176.112,32950,0)
+4011571^MEFIX 2IN X 11YD SCOTT #65220
+"DATA",176.112,32950,1)
+484856^^Y
+"DATA",176.112,32951,0)
+4011573^MEFIX 6IN X 11YD SCOTT #65260
+"DATA",176.112,32951,1)
+484857^^Y
+"DATA",176.112,32952,0)
+4011569^MEFIX 8IN X 11YD SCOTT #65280
+"DATA",176.112,32952,1)
+484858^^Y
+"DATA",176.112,32953,0)
+4014364^CARRA GAUZE 2IN X 2IN
+"DATA",176.112,32953,1)
+484859^^Y
+"DATA",176.112,32954,0)
+4011797^URETHRAL CATH TRAY 14FR BAXTER #4727B
+"DATA",176.112,32954,1)
+484860^^Y
+"DATA",176.112,32955,0)
+4012642^TOPPER SPONGE 4IN X 4IN
+"DATA",176.112,32955,1)
+484861^^Y
+"DATA",176.112,32956,0)
+4011599^TRANSPARENT DRESSING 2 3/8IN X 2 3/4IN
+"DATA",176.112,32956,1)
+484863^^Y
+"DATA",176.112,32957,0)
+4013622^TRANSPARENT DRESSING TEGADERM 6IN X 8IN
+"DATA",176.112,32957,1)
+484864^^Y
+"DATA",176.112,32958,0)
+4011602^TRANSPARENT DRESSING 8IN X 12IN
+"DATA",176.112,32958,1)
+484865^^Y
+"DATA",176.112,32959,0)
+4011600^TRANSPARENT DRESSING 4IN X 4 3/4IN
+"DATA",176.112,32959,1)
+484866^^Y
+"DATA",176.112,32960,0)
+4011601^TRANSPARENT DRESSING 4IN X 10IN
+"DATA",176.112,32960,1)
+484867^^Y
+"DATA",176.112,32961,0)
+4016899^POISE PAD,EXTRA PLUS ABSORBENCY
+"DATA",176.112,32961,1)
+484868^^Y
+"DATA",176.112,32962,0)
+4013528^UNNA-FLEX 3 IN X 10 YDS
+"DATA",176.112,32962,1)
+484869^^Y
+"DATA",176.112,32963,0)
+4008641^WAFER,STERILE 4IN X 4IN C#0218-01
+"DATA",176.112,32963,1)
+484870^^Y
+"DATA",176.112,32964,0)
+4008643^WAFER,STERILE 4IN X 4IN C#0219-01
+"DATA",176.112,32964,1)
+484872^^Y
+"DATA",176.112,32965,0)
+4014439^TRANSPARENT DRESSING 1 3/4IN X 1 3/4IN
+"DATA",176.112,32965,1)
+484874^^Y
+"DATA",176.112,32966,0)
+4008824^TRANSPARENT DRESSING TEGADERM 4 X 4.75IN
+"DATA",176.112,32966,1)
+484875^^Y
+"DATA",176.112,32967,0)
+4013529^UNNA-FLEX 4 IN X 10 YDS
+"DATA",176.112,32967,1)
+484876^^Y
+"DATA",176.112,32968,0)
+4017066^SANITARY NAPKIN, KOTEX OVERNITE
+"DATA",176.112,32968,1)
+484877^^Y
+"DATA",176.112,32969,0)
+4017118^SHEEPSKIN PAD 36IN X 80IN
+"DATA",176.112,32969,1)
+484878^^Y
+"DATA",176.112,32970,0)
+4013817^MEDICAL ADHESIVE H#7730
+"DATA",176.112,32970,1)
+484879^^Y
+"DATA",176.112,32971,0)
+4001804^SURBEX 750 W/IRON TAB
+"DATA",176.112,32971,1)
+484911^^Y
+"DATA",176.112,32972,0)
+4009602^SURBEX 750 W/ZINC TAB
+"DATA",176.112,32972,1)
+484912^^Y
+"DATA",176.112,32973,0)
+4002105^SURBEX FIMLTAB
+"DATA",176.112,32973,1)
+484913^^Y
+"DATA",176.112,32974,0)
+4016882^VITAMIN B COMPLEX W/C & FOLIC (DIATX) TAB
+"DATA",176.112,32974,1)
+484917^^Y
+"DATA",176.112,32975,0)
+4001817^THERAGRAN M TAB
+"DATA",176.112,32975,1)
+484932^^Y
+"DATA",176.112,32976,0)
+4008543^DOMEBORO TAB,EFFERVSC,TOP
+"DATA",176.112,32976,1)
+484957^^Y
+"DATA",176.112,32977,0)
+4002826^DEXAMETHASONE 1.5MG #6/DEXAMETHASONE 0.75MG #8 TAB
+"DATA",176.112,32977,1)
+484969^^Y
+"DATA",176.112,32978,0)
+4014280^LEVOTHYROXINE NA 0.01MG TAB,UD (SYNTHROID)
+"DATA",176.112,32978,1)
+484997^^Y
+"DATA",176.112,32979,0)
+4017349^MULTIVITS W/MINERALS TAB/CAP (WITH VIT K)
+"DATA",176.112,32979,1)
+485008^^Y
+"DATA",176.112,32980,0)
+4012712^PREMPRO TAB,28 PACK
+"DATA",176.112,32980,1)
+485016^^Y
+"DATA",176.112,32981,0)
+4008681^SPINHALER FOR CROMOLYN
+"DATA",176.112,32981,1)
+485030^^Y
+"DATA",176.112,32982,0)
+4003385^PENICILLIN G PROCAINE 2400000UNT TUBEX/PROBENECID 0.5GM TAB
+"DATA",176.112,32982,1)
+485044^^Y
+"DATA",176.112,32983,0)
+4012643^POSEY INCONTINENT SHEATH HOLDER #6550
+"DATA",176.112,32983,1)
+485051^^Y
+"DATA",176.112,32984,0)
+4012268^POISE PAD,REGULAR ABSORBENCY
+"DATA",176.112,32984,1)
+485052^^Y
+"DATA",176.112,32985,0)
+4012339^PRN ADAPTER LUER LOCK 0.1ML #38-816-1
+"DATA",176.112,32985,1)
+485065^^Y
+"DATA",176.112,32986,0)
+4012340^PRN ADAPTER LUER SLIP 0.3ML #38-1255-1
+"DATA",176.112,32986,1)
+485066^^Y
+"DATA",176.112,32987,0)
+4015273^NEBULIZER,MICRO MIST HUDSON #1883
+"DATA",176.112,32987,1)
+485069^^Y
+"DATA",176.112,32988,0)
+4016027^RESERVOIR,MINIMED #MMT-326
+"DATA",176.112,32988,1)
+485070^^Y
+"DATA",176.112,32989,0)
+4012698^OPTICHAMBER
+"DATA",176.112,32989,1)
+485071^^Y
+"DATA",176.112,32990,0)
+4011574^MONTGOMERY STRAP F#003-3058
+"DATA",176.112,32990,1)
+485072^^Y
+"DATA",176.112,32991,0)
+4014513^PEAK FLOW METER TRI-ANIM #96510
+"DATA",176.112,32991,1)
+485073^^Y
+"DATA",176.112,32992,0)
+4012287^NET PANTS,LARGE COLOPLAST #5604
+"DATA",176.112,32992,1)
+485074^^Y
+"DATA",176.112,32993,0)
+4012199^PLASTIC POUCH MARLEN
+"DATA",176.112,32993,1)
+485075^^Y
+"DATA",176.112,32994,0)
+4011572^MEFIX 4IN X 11YD SCOTT #65240
+"DATA",176.112,32994,1)
+485076^^Y
+"DATA",176.112,32995,0)
+4017063^RESERVOIR,MINIMED #MMT-332A
+"DATA",176.112,32995,1)
+485077^^Y
+"DATA",176.112,32996,0)
+4011060^PLASTIC POUCH DRYING FRAME ATLANTIC#0030
+"DATA",176.112,32996,1)
+485078^^Y
+"DATA",176.112,32997,0)
+4008539^EVACUATED CONTAINER
+"DATA",176.112,32997,1)
+485079^^Y
+"DATA",176.112,32998,0)
+4017385^INSERTER,QUICK-SERTER MINIMED #MMT-395
+"DATA",176.112,32998,1)
+485080^^Y
+"DATA",176.112,32999,0)
+4016028^INSERTER,SIL-SERTER MINIMED #MMT-385
+"DATA",176.112,32999,1)
+485081^^Y
+"DATA",176.112,33000,0)
+4012085^ROOM DEODORIZER POWER MENTOR #3202
+"DATA",176.112,33000,1)
+485082^^Y
+"DATA",176.112,33001,0)
+4012671^MAGNI-GUIDE (B-D)
+"DATA",176.112,33001,1)
+485083^^Y
+"DATA",176.112,33002,0)
+4003899^ALBUMIN,HUMAN INJ
+"DATA",176.112,33002,1)
+485103^^Y
+"DATA",176.112,33003,0)
+4016790^WATER FOR INJECTION,STERILE,10ML
+"DATA",176.112,33003,1)
+485111^^Y
+"DATA",176.112,33004,0)
+4013586^SEAL,EAKIN COHESIVE,LARGE C#8390-01
+"DATA",176.112,33004,1)
+485115^^Y
+"DATA",176.112,33005,0)
+4017365^FLUDEOXYGLUCOSE F 18 (10-100 MCI/ML) INJ
+"DATA",176.112,33005,1)
+485186^^Y
+"DATA",176.112,33006,0)
+4017400^GADOBENOATE DIMEGLUMINE 529MG/ML INJ,SOLN
+"DATA",176.112,33006,1)
+485188^^Y
+"DATA",176.112,33007,0)
+4012411^INTERMITTENT INJECTION CAP BURRON IN-1000
+"DATA",176.112,33007,1)
+485194^^Y
+"DATA",176.112,33008,0)
+4012468^RING,COLOPLAST #2325
+"DATA",176.112,33008,1)
+485216^^Y
+"DATA",176.112,33009,0)
+4012470^RING,COLOPLAST #2340
+"DATA",176.112,33009,1)
+485217^^Y
+"DATA",176.112,33010,0)
+4012469^RING,COLOPLAST #2330
+"DATA",176.112,33010,1)
+485218^^Y
+"DATA",176.112,33011,0)
+4012467^RING,COLOPLAST #2320
+"DATA",176.112,33011,1)
+485219^^Y
+"DATA",176.112,33012,0)
+4012632^SLEEVE AND RING 2 1/2IN GREER #N07006
+"DATA",176.112,33012,1)
+485220^^Y
+"DATA",176.112,33013,0)
+4013475^RING,BEAD O SN#1148-70
+"DATA",176.112,33013,1)
+485221^^Y
+"DATA",176.112,33014,0)
+4012465^RING,COLOPLAST #2310
+"DATA",176.112,33014,1)
+485222^^Y
+"DATA",176.112,33015,0)
+4012466^RING,COLOPLAST #2315
+"DATA",176.112,33015,1)
+485223^^Y
+"DATA",176.112,33016,0)
+4012459^RUBBER 0-RING SEAL MARLEN
+"DATA",176.112,33016,1)
+485224^^Y
+"DATA",176.112,33017,0)
+4012461^RUBBER O-RING 1.5IN TORBOT #256
+"DATA",176.112,33017,1)
+485225^^Y
+"DATA",176.112,33018,0)
+4012471^RING,COLOPLAST #2350
+"DATA",176.112,33018,1)
+485226^^Y
+"DATA",176.112,33019,0)
+4013587^SEAL,EAKIN COHESIVE,SMALL C#8390-02
+"DATA",176.112,33019,1)
+485227^^Y
+"DATA",176.112,33020,0)
+4002013^IOPAMIDOL 51MG/ML INJ
+"DATA",176.112,33020,1)
+485261^^Y
+"DATA",176.112,33021,0)
+4003896^ALBUMIN,AGGREGATED 0.03% (STERILE DILUENT) INJ
+"DATA",176.112,33021,1)
+485265^^Y
+"DATA",176.112,33022,0)
+4017346^SUTURES,CHROMIC CATGUT
+"DATA",176.112,33022,1)
+485295^^Y
+"DATA",176.112,33023,0)
+4012286^NET PANTS,MEDIUM COLOPLAST #5603
+"DATA",176.112,33023,1)
+485296^^Y
+"DATA",176.112,33024,0)
+4016910^PSYLLIUM CAP,ORAL
+"DATA",176.112,33024,1)
+485306^^Y
+"DATA",176.112,33025,0)
+4017104^NEBULIZER,MICRO MIST W/TEE HUDSON #1884
+"DATA",176.112,33025,1)
+485336^^Y
+"DATA",176.112,33026,0)
+4015918^TUBLET CUTTER, AMI #04065
+"DATA",176.112,33026,1)
+485342^^Y
+"DATA",176.112,33027,0)
+4012685^VAGINAL WEIGHTS 20-70GM C#6501-13
+"DATA",176.112,33027,1)
+485357^^Y
+"DATA",176.112,33028,0)
+4012106^VITAL HIGH NITROGEN PWDR VANILLA
+"DATA",176.112,33028,1)
+485358^^Y
+"DATA",176.112,33029,0)
+4014508^VITAL HIGH NITROGEN 79GM PWDR/PKT VANILLA
+"DATA",176.112,33029,1)
+485359^^Y
+"DATA",176.112,33030,0)
+4012649^URINE CUP GRADUATE,1000ML MCP#10005
+"DATA",176.112,33030,1)
+485360^^Y
+"DATA",176.112,33031,0)
+4014406^URINE METER LSL#1460
+"DATA",176.112,33031,1)
+485361^^Y
+"DATA",176.112,33032,0)
+4016046^VIAL ADAPTER MULTI-DOSE ALARIS #2205E
+"DATA",176.112,33032,1)
+485362^^Y
+"DATA",176.112,33033,0)
+4016852^VIVONEX RTF LIQUID,250ML
+"DATA",176.112,33033,1)
+485365^^Y
+"DATA",176.112,33034,0)
+4016853^VIVONEX RTF LIQUID,1000ML
+"DATA",176.112,33034,1)
+485366^^Y
+"DATA",176.112,33035,0)
+4016854^VIVONEX RTF LIQUID,1500ML
+"DATA",176.112,33035,1)
+485370^^Y
+"DATA",176.112,33036,0)
+4013455^UNDERGARMENT REGULAR ABSROBENCY,ONE SIZE FITS ALL
+"DATA",176.112,33036,1)
+485371^^Y
+"DATA",176.112,33037,0)
+4012026^TOOTHBRUSH,DISPOSABLE
+"DATA",176.112,33037,1)
+485372^^Y
+"DATA",176.112,33038,0)
+4012690^WATER BOTTLE
+"DATA",176.112,33038,1)
+485380^^Y
+"DATA",176.112,33039,0)
+4012679^TAIL CLOSURE,CURVED C#1756-52
+"DATA",176.112,33039,1)
+485385^^Y
+"DATA",176.112,33040,0)
+4013145^LOXILAN 300mgI/ml INJ
+"DATA",176.112,33040,1)
+485578^^Y
+"DATA",176.112,33041,0)
+4013146^LOXILAN 350mgI/ml INJ
+"DATA",176.112,33041,1)
+485579^^Y
+"DATA",176.112,33042,0)
+4017383^AMERIGEL TOP,OINT
+"DATA",176.112,33042,1)
+485614^^Y
+"DATA",176.112,33043,0)
+4015544^RADIACARE WOUND RINSE, ORAL,SUSP
+"DATA",176.112,33043,1)
+485628^^Y
+"DATA",176.112,33044,0)
+4012871^KERODEX-51 CREAM,TOP
+"DATA",176.112,33044,1)
+485629^^Y
+"DATA",176.112,33045,0)
+4012870^KERODEX-71 CREAM,TOP
+"DATA",176.112,33045,1)
+485630^^Y
+"DATA",176.112,33046,0)
+4014934^LANTISEPTIC CREAM,TOP
+"DATA",176.112,33046,1)
+485631^^Y
+"DATA",176.112,33047,0)
+4008358^ALUMINUM ACETATE CREAM,TOP
+"DATA",176.112,33047,1)
+485635^^Y
+"DATA",176.112,33048,0)
+4009377^PRO-CUTE CREAM,TOP
+"DATA",176.112,33048,1)
+485636^^Y
+"DATA",176.112,33049,0)
+4017049^LACTIC ACID 10%/VITAMIN E CREAM,TOP
+"DATA",176.112,33049,1)
+485639^^Y
+"DATA",176.112,33050,0)
+4017201^DEXTRAN 70/HYPROMELLOSE 0.3% (PF) SOLN,OPH,0.6ML
+"DATA",176.112,33050,1)
+485666^^Y
+"DATA",176.112,33051,0)
+4017276^DEXTRAN 70/HYPROMELLOSE 0.3% (PF) SOLN,OPH,UD
+"DATA",176.112,33051,1)
+485667^^Y
+"DATA",176.112,33052,0)
+4017199^DEXTRAN 70/HYPROMELLOSE 0.3% SOLN,OPH
+"DATA",176.112,33052,1)
+485668^^Y
+"DATA",176.112,33053,0)
+4017200^DEXTRAN 70/HYPROMELLOSE 0.8% (PF) SOLN,OPH,0.5ML
+"DATA",176.112,33053,1)
+485669^^Y
+"DATA",176.112,33054,0)
+4017198^DEXTRAN 70/HYPROMELLOSE 0.8% SOLN,OPH
+"DATA",176.112,33054,1)
+485670^^Y
+"DATA",176.112,33055,0)
+4010546^EDTA/HYDROXYPROPYL ME CELLULOSE/POLYQYARTERNIUM-1 SOLN,OPH
+"DATA",176.112,33055,1)
+485673^^Y
+"DATA",176.112,33056,0)
+4017318^MULTIVITAMIN/PROSTATE FORMULA
+"DATA",176.112,33056,1)
+485675^^Y
+"DATA",176.112,33057,0)
+4017004^CALENDULA GEL,TOP
+"DATA",176.112,33057,1)
+485710^^Y
+"DATA",176.112,33058,0)
+4017005^CALENDULA SPRAY,TOP
+"DATA",176.112,33058,1)
+485711^^Y
+"DATA",176.112,33059,0)
+4017161^COMFEEL ULCER CARE PASTE,TOP
+"DATA",176.112,33059,1)
+485712^^Y
+"DATA",176.112,33060,0)
+4016990^COAL TAR 2.5%/LANOLIN SOLN,TOP
+"DATA",176.112,33060,1)
+485716^^Y
+"DATA",176.112,33061,0)
+4009380^COMPOUND BENZOIN CONC TINCTURE,TOP
+"DATA",176.112,33061,1)
+485717^^Y
+"DATA",176.112,33062,0)
+4007781^COMPOUND BENZOIN TINCTURE,TOP
+"DATA",176.112,33062,1)
+485718^^Y
+"DATA",176.112,33063,0)
+4009375^DETACHOL LIQUID,TOP
+"DATA",176.112,33063,1)
+485720^^Y
+"DATA",176.112,33064,0)
+4017257^KETOPROFEN PWDR
+"DATA",176.112,33064,1)
+485721^^Y
+"DATA",176.112,33065,0)
+4017258^PHENOL LIQUIFIED 89% SWABSTICK,TOP
+"DATA",176.112,33065,1)
+485724^^Y
+"DATA",176.112,33066,0)
+4010038^OXYCHLOROSENE NA PWDR,TOP
+"DATA",176.112,33066,1)
+485725^^Y
+"DATA",176.112,33067,0)
+4010039^OXYCHLOROSENE PWDR,TOP
+"DATA",176.112,33067,1)
+485726^^Y
+"DATA",176.112,33068,0)
+4017223^PENTAFLUOROPROPANE/TETRAFLUOROETHANE AEROSOL,TOP
+"DATA",176.112,33068,1)
+485727^^Y
+"DATA",176.112,33069,0)
+4017287^SILVASORB GEL,TOP
+"DATA",176.112,33069,1)
+485728^^Y
+"DATA",176.112,33070,0)
+4015977^ALEO VESTA 2-N-1 BODY WASH,SHAMPOO
+"DATA",176.112,33070,1)
+485741^^Y
+"DATA",176.112,33071,0)
+4012083^BANISH II LIQUID
+"DATA",176.112,33071,1)
+485744^^Y
+"DATA",176.112,33072,0)
+4015467^BANISH SUPER LIQUID
+"DATA",176.112,33072,1)
+485745^^Y
+"DATA",176.112,33073,0)
+4009381^BENZOIN SPRAY,CAN,180GM
+"DATA",176.112,33073,1)
+485763^^Y
+"DATA",176.112,33074,0)
+4017344^MYCELIA EXTRACT
+"DATA",176.112,33074,1)
+485844^^Y
+"DATA",176.112,33075,0)
+4012615^BASIS SOAP BAR,EXTRA DRY SKIN
+"DATA",176.112,33075,1)
+485869^^Y
+"DATA",176.112,33076,0)
+4017300^BETA SITOSTEROL/ZINC CITRATE
+"DATA",176.112,33076,1)
+485876^^Y
+"DATA",176.112,33077,0)
+4016993^BIODERM WAFER #20001
+"DATA",176.112,33077,1)
+485881^^Y
+"DATA",176.112,33078,0)
+4016809^PASTE,ADAPT H#79300
+"DATA",176.112,33078,1)
+485885^^Y
+"DATA",176.112,33079,0)
+4012768^DUODERM PASTE C#1879-30
+"DATA",176.112,33079,1)
+485886^^Y
+"DATA",176.112,33080,0)
+4011510^PASTE,HOLLIHESIVE H#7920,135GM
+"DATA",176.112,33080,1)
+485887^^Y
+"DATA",176.112,33081,0)
+4011509^PASTE,PREMIUM H#7930,60GM
+"DATA",176.112,33081,1)
+485888^^Y
+"DATA",176.112,33082,0)
+4012648^PASTE,PREMIUM STERILE H#7931,36GM
+"DATA",176.112,33082,1)
+485889^^Y
+"DATA",176.112,33083,0)
+4010625^PASTE,STOMAHESIVE C#1839-10
+"DATA",176.112,33083,1)
+485890^^Y
+"DATA",176.112,33084,0)
+4016016^INDIAN SHAKEROOT PWDR
+"DATA",176.112,33084,1)
+485892^^Y
+"DATA",176.112,33085,0)
+4014484^CETPHIL GENTLE SKIN CLEANSER
+"DATA",176.112,33085,1)
+485906^^Y
+"DATA",176.112,33086,0)
+4007201^DM 10MG/GG 100MG/P-PROPANOL 12.5MG/5ML LIQUID
+"DATA",176.112,33086,1)
+485956^^Y
+"DATA",176.112,33087,0)
+4007338^BPM 2MG/GG 100MG/MENTHOL 1MG/P-EPHRINE 5MG/P-PROPANOL 5MG/5ML
+"DATA",176.112,33087,1)
+485978^^Y
+"DATA",176.112,33088,0)
+4007089^BPM 2MG/GG 100MG/P-EPHRINE 5MG/P-PROPANOL 5MG/5ML LIQUID
+"DATA",176.112,33088,1)
+485979^^Y
+"DATA",176.112,33089,0)
+4017147^CARBINOXAMINE MALEATE 1.75MG/5ML LIQUID
+"DATA",176.112,33089,1)
+485981^^Y
+"DATA",176.112,33090,0)
+4003149^CARAMIPHEN EDISYLATE 6.7MG/PHENYLPROPANOLAMINE 12.5MG/5ML LIQUID
+"DATA",176.112,33090,1)
+485986^^Y
+"DATA",176.112,33091,0)
+4017091^CINNAMON PWDR
+"DATA",176.112,33091,1)
+485989^^Y
+"DATA",176.112,33092,0)
+4017099^CHONDROITIN/GLUCOSAMINE/METHYLSULFONYLMETHAMANE
+"DATA",176.112,33092,1)
+486001^^Y
+"DATA",176.112,33093,0)
+4014482^CETAPHIL GENTLE SKIN CLEASER
+"DATA",176.112,33093,1)
+486035^^Y
+"DATA",176.112,33094,0)
+4014443^COMFORT BATH SAGE #7900
+"DATA",176.112,33094,1)
+486043^^Y
+"DATA",176.112,33095,0)
+4017225^CRANBERRY JUICE
+"DATA",176.112,33095,1)
+486045^^Y
+"DATA",176.112,33096,0)
+4016295^PAPAIN 830000 UNT/UREA 10% (KOVIA) OINT,TOP
+"DATA",176.112,33096,1)
+486096^^Y
+"DATA",176.112,33097,0)
+4016042^PAPIAN 830000 UNT/UREA 10% (KOVIA) OINT,TOP
+"DATA",176.112,33097,1)
+486096^^Y
+"DATA",176.112,33098,0)
+4027512^PAPAIN/UREA 10% (KOVIA) OINT,TOP
+"DATA",176.112,33098,1)
+486096^^Y
+"DATA",176.112,33099,0)
+4016293^PAPAIN 830000 UNT/UREA 10% (GLADASE) OINT,TOP
+"DATA",176.112,33099,1)
+486099^^Y
+"DATA",176.112,33100,0)
+4017008^TEA TREE OIL,TOP
+"DATA",176.112,33100,1)
+486101^^Y
+"DATA",176.112,33101,0)
+4015463^ALOE VESTA 2-N-1 PERINEAL SKIN CLEANSER SOLN,TOP
+"DATA",176.112,33101,1)
+486102^^Y
+"DATA",176.112,33102,0)
+4017275^ALUMINUM CL HEXAHYDRATE 25% (LUMICAIN) SOLN,TOP
+"DATA",176.112,33102,1)
+486109^^Y
+"DATA",176.112,33103,0)
+4009379^BENZOIN TINCTURE,TOP
+"DATA",176.112,33103,1)
+486125^^Y
+"DATA",176.112,33104,0)
+4008544^DOMEBORO PWDR PKTS,TOP
+"DATA",176.112,33104,1)
+486143^^Y
+"DATA",176.112,33105,0)
+4017394^ESTRADIOL 0.025MG/DAY (ALORA) PATCH
+"DATA",176.112,33105,1)
+486155^^Y
+"DATA",176.112,33106,0)
+4016907^TESTOSTERONE 30MG PATCH,SA,BUCCAL
+"DATA",176.112,33106,1)
+486159^^Y
+"DATA",176.112,33107,0)
+4009376^MASTISOL LIQUID,TOP
+"DATA",176.112,33107,1)
+486160^^Y
+"DATA",176.112,33108,0)
+4008170^POVIDONE IODINE 10% GAUZE PAD,TOP
+"DATA",176.112,33108,1)
+486161^^Y
+"DATA",176.112,33109,0)
+4012192^GOLDEN DRAIN DELUXE #GC20L
+"DATA",176.112,33109,1)
+486167^^Y
+"DATA",176.112,33110,0)
+4016611^PEPTINEX DT LIQUID UNFLAVORED,1000ML
+"DATA",176.112,33110,1)
+486168^^Y
+"DATA",176.112,33111,0)
+4016017^WORMWOOD OIL
+"DATA",176.112,33111,1)
+486190^^Y
+"DATA",176.112,33112,0)
+4003842^CODEINE 10MG/GG 100MG/P-PROPANOL 12.5MG/5ML LIQUID
+"DATA",176.112,33112,1)
+486224^^Y
+"DATA",176.112,33113,0)
+4003844^CODEINE 10MG/GG 100MG/P-PROPANOL 18.75MG/5ML LIQUID
+"DATA",176.112,33113,1)
+486226^^Y
+"DATA",176.112,33114,0)
+4003845^CODEINE 10MG/GG 200MG/P-PROPANOL 12.5MG/5ML LIQUID
+"DATA",176.112,33114,1)
+486227^^Y
+"DATA",176.112,33115,0)
+4003846^CODEINE 10MG/GG 200MG/P-PROPANOL 18MG/5ML LIQUID
+"DATA",176.112,33115,1)
+486228^^Y
+"DATA",176.112,33116,0)
+4008115^CODEINE 10MG/P-EPHRINE 10MG/P-PROPANOL 5MG LIQUID
+"DATA",176.112,33116,1)
+486231^^Y
+"DATA",176.112,33117,0)
+4009619^CTM 1.3MG/DM 6.7MG/P-PROPANOLAMINE 8.3MG/5ML LIQUID
+"DATA",176.112,33117,1)
+486232^^Y
+"DATA",176.112,33118,0)
+4014212^CTM 1MG/DM 5MG/P-PROPANOLAMINE 6.25MG/5ML LIQUID
+"DATA",176.112,33118,1)
+486233^^Y
+"DATA",176.112,33119,0)
+4009618^CTM 2MG/DM 10MG/P-PROPANOL 12.5MG/5ML LIQUID
+"DATA",176.112,33119,1)
+486234^^Y
+"DATA",176.112,33120,0)
+4009715^DEXTROMETHORPHAN 10MG/PSEUDOEPHEDRINE 20MG/5ML LIQUID
+"DATA",176.112,33120,1)
+486237^^Y
+"DATA",176.112,33121,0)
+4017269^GLUCOSE 100GM/300ML LIQUID,ORAL
+"DATA",176.112,33121,1)
+486239^^Y
+"DATA",176.112,33122,0)
+4017268^GLUCOSE 75GM/300ML LIQUID,ORAL
+"DATA",176.112,33122,1)
+486241^^Y
+"DATA",176.112,33123,0)
+4006966^GG 100MG/P-EPHRINE 5MG/P-PROPANOL 20MG/5ML LIQUID
+"DATA",176.112,33123,1)
+486242^^Y
+"DATA",176.112,33124,0)
+4010376^ISOPROPYL ALCOHOL/METHYLENE CHLORIDE LIQUID,AEROSOL
+"DATA",176.112,33124,1)
+486243^^Y
+"DATA",176.112,33125,0)
+4017378^HEMORRHOIDAL GEL,RTL
+"DATA",176.112,33125,1)
+486254^^Y
+"DATA",176.112,33126,0)
+4007202^DM 10MG/GG 200MG/P-PROPANOL 12.5MG/5ML LIQUID
+"DATA",176.112,33126,1)
+486255^^Y
+"DATA",176.112,33127,0)
+4007199^DM 15MG/GG 200MG/P-PROPANOL 18MG/5ML LIQUID
+"DATA",176.112,33127,1)
+486258^^Y
+"DATA",176.112,33128,0)
+4016582^GOTU KOLA LIQUID
+"DATA",176.112,33128,1)
+486260^^Y
+"DATA",176.112,33129,0)
+4017262^HEMORRHOIDAL W/CALAMINE-ZINC SUPP,RTL
+"DATA",176.112,33129,1)
+486269^^Y
+"DATA",176.112,33130,0)
+4016796^LUBRICANT MOISTURIZER VAG,GEL,APPLICATOR,2.5GM
+"DATA",176.112,33130,1)
+486273^^Y
+"DATA",176.112,33131,0)
+4012087^ODO-CLEAN DEODORANT CLEANER
+"DATA",176.112,33131,1)
+486276^^Y
+"DATA",176.112,33132,0)
+4012867^TRIPLE CARE LIQUID CLEANSER
+"DATA",176.112,33132,1)
+486298^^Y
+"DATA",176.112,33133,0)
+4012086^HOSPITAL GRADE DEODORIZER/GERMICIDE SPRAY H#7711
+"DATA",176.112,33133,1)
+486314^^Y
+"DATA",176.112,33134,0)
+4017289^DYE FDC (BLUE #1) SOLN,ORAL
+"DATA",176.112,33134,1)
+486334^^Y
+"DATA",176.112,33135,0)
+4017090^FIBRIN SEALANT (HUMAN) SOLN
+"DATA",176.112,33135,1)
+486335^^Y
+"DATA",176.112,33136,0)
+4013442^GLUCOSE CONTROL ACCU-CHEK ADVANTAGE SOLN
+"DATA",176.112,33136,1)
+486346^^Y
+"DATA",176.112,33137,0)
+4017133^ONE TOUCH ULTRA (GLUCOSE) METER
+"DATA",176.112,33137,1)
+486350^^Y
+"DATA",176.112,33138,0)
+4008518^GLUCOSE CONTROL GLUCOMETER ELITE NORMAL SOLN
+"DATA",176.112,33138,1)
+486354^^Y
+"DATA",176.112,33139,0)
+4017181^JOINT MOVEMENT GLUCOSEAMINE,CHONDROITIN,MSN SOLN
+"DATA",176.112,33139,1)
+486355^^Y
+"DATA",176.112,33140,0)
+4014426^MICROKLENZ SOLN,SPRAY
+"DATA",176.112,33140,1)
+486357^^Y
+"DATA",176.112,33141,0)
+4016556^NORMOCARB MAG CL/NACL/NAHCO3 240ML SOLN
+"DATA",176.112,33141,1)
+486373^^Y
+"DATA",176.112,33142,0)
+4016818^ORAL BALANCE ARTIFICIAL SALIVA GEL
+"DATA",176.112,33142,1)
+486379^^Y
+"DATA",176.112,33143,0)
+4017082^INDIAN SNAKEROOT PWDR
+"DATA",176.112,33143,1)
+486410^^Y
+"DATA",176.112,33144,0)
+4017095^RELACORE STRESS REDUCER/MOOD ELEVATOR
+"DATA",176.112,33144,1)
+486413^^Y
+"DATA",176.112,33145,0)
+4017187^JOINT MOVEMENT GLUCOSAMINE,CHONDROITIN,MSM
+"DATA",176.112,33145,1)
+486529^^Y
+"DATA",176.112,33146,0)
+4017264^JAR,OINTMENT 500GM
+"DATA",176.112,33146,1)
+486530^^Y
+"DATA",176.112,33147,0)
+4012882^LAMBS WOOL 100%,PKG,11.25GM
+"DATA",176.112,33147,1)
+486547^^Y
+"DATA",176.112,33148,0)
+4007086^CODEINE 10MG/BPM 1MG/GG 100MG/P-EPHRINE 5MG/P-PROPANOL 5MG/5ML
+"DATA",176.112,33148,1)
+486552^^Y
+"DATA",176.112,33149,0)
+4007084^CODEINE 10MG/BPM 2MG/GG 100MG/P-EPHRINE 5MG/P-PROPANOL 5MG/5ML
+"DATA",176.112,33149,1)
+486553^^Y
+"DATA",176.112,33150,0)
+4007085^CODEINE 10MG/BPM 4MG/GG 100MG/P-EPHRINE 5MG/P-PROPANOL 5MG/5ML
+"DATA",176.112,33150,1)
+486554^^Y
+"DATA",176.112,33151,0)
+4014161^CRITIC-AID SKIN PASTE
+"DATA",176.112,33151,1)
+486570^^Y
+"DATA",176.112,33152,0)
+4012686^CITRIC-AID PASTE,PKT,71GM
+"DATA",176.112,33152,1)
+486571^^Y
+"DATA",176.112,33153,0)
+4003829^CTM 0.5MG/P-EPHRINE 1.25MG/P-PROPANOL 5MG/P-TOLOXAMINE 2MG/ML
+"DATA",176.112,33153,1)
+486572^^Y
+"DATA",176.112,33154,0)
+4004799^CTM 1MG/P-EPHRINE 3.75MG/P-PROPANOL 6.25MG/PYRILAMINE 6.25MG/5ML
+"DATA",176.112,33154,1)
+486575^^Y
+"DATA",176.112,33155,0)
+4012071^DERMASOL PERMA-TYPE SOLVENT MASON #457
+"DATA",176.112,33155,1)
+486584^^Y
+"DATA",176.112,33156,0)
+4009317^EXTRAOCULAR IRRIGATING SOL
+"DATA",176.112,33156,1)
+486645^^Y
+"DATA",176.112,33157,0)
+4012767^DUODERM HYDROGEL C#1879-87
+"DATA",176.112,33157,1)
+486650^^Y
+"DATA",176.112,33158,0)
+4012769^DUODERM HYDROGEL C#1879-90
+"DATA",176.112,33158,1)
+486651^^Y
+"DATA",176.112,33159,0)
+4017343^ESTRADIOL 0.05MG/DAY (MYLAN) PATCH
+"DATA",176.112,33159,1)
+486671^^Y
+"DATA",176.112,33160,0)
+4017342^ESTRADIOL 0.1MG/DAY (MYLAN) PATCH
+"DATA",176.112,33160,1)
+486680^^Y
+"DATA",176.112,33161,0)
+4007631^ATROPINE SO4 1.2MG/NEOSTIGMINE METHYLSULFATE 2.5MG/VIL INJ
+"DATA",176.112,33161,1)
+486688^^Y
+"DATA",176.112,33162,0)
+4007197^DM 7.5MG/GG 30MG/P-PROPANOL 9MG/ML DROPS,ORAL
+"DATA",176.112,33162,1)
+486718^^Y
+"DATA",176.112,33163,0)
+4004846^CHYMOTRYPSIN 750UNT/VIL SOLN,OPH
+"DATA",176.112,33163,1)
+486733^^Y
+"DATA",176.112,33164,0)
+4003215^HYALURONIDASE 1500UNT/VIL INJ
+"DATA",176.112,33164,1)
+486737^^Y
+"DATA",176.112,33165,0)
+4003214^HYALURONIDASE 150UNT/VIL INJ
+"DATA",176.112,33165,1)
+486738^^Y
+"DATA",176.112,33166,0)
+4009153^FLUOSOL 20% EMULSION,INTRAVASCULAR
+"DATA",176.112,33166,1)
+486742^^Y
+"DATA",176.112,33167,0)
+4010626^POWDER,STOMAHESIVE C#0255-10,30GM
+"DATA",176.112,33167,1)
+486774^^Y
+"DATA",176.112,33168,0)
+4011512^MEDICAL ADHESIVE H#7730,180GM
+"DATA",176.112,33168,1)
+486781^^Y
+"DATA",176.112,33169,0)
+4017050^MANNITOL PWDR
+"DATA",176.112,33169,1)
+486791^^Y
+"DATA",176.112,33170,0)
+4012670^MULTIDEX HYDROPHILIC WOUND DRESSING PWDR,DEROYAL #46-700,BTL,6GM
+"DATA",176.112,33170,1)
+486801^^Y
+"DATA",176.112,33171,0)
+4011508^MOISTURE BARRIER SKIN OINT H#7230,75GM
+"DATA",176.112,33171,1)
+486810^^Y
+"DATA",176.112,33172,0)
+4017153^WATER FOR IRRIGATION,STERILE,75ML
+"DATA",176.112,33172,1)
+486893^^Y
+"DATA",176.112,33173,0)
+4012414^NILODOR CONCENTRATE
+"DATA",176.112,33173,1)
+486902^^Y
+"DATA",176.112,33174,0)
+4012082^URI KLEEN DETERGENT
+"DATA",176.112,33174,1)
+486910^^Y
+"DATA",176.112,33175,0)
+4012631^PERI-WASH II CLEANSER
+"DATA",176.112,33175,1)
+486919^^Y
+"DATA",176.112,33176,0)
+4012656^PASTE,COLOPLAST #2650
+"DATA",176.112,33176,1)
+486924^^Y
+"DATA",176.112,33177,0)
+4016991^PHOSPHOURUS 250MG/POTASSIUM 7.125/SODIUM 7.125MEQ/PKT PWDR
+"DATA",176.112,33177,1)
+486951^^Y
+"DATA",176.112,33178,0)
+4016849^PRUSSIAN BLUE INSOLUBLE CAP,ORAL
+"DATA",176.112,33178,1)
+486993^^Y
+"DATA",176.112,33179,0)
+4012640^PREMIUM POWDER H#7906
+"DATA",176.112,33179,1)
+486999^^Y
+"DATA",176.112,33180,0)
+4009378^PRO-CUTE LOTION
+"DATA",176.112,33180,1)
+487000^^Y
+"DATA",176.112,33181,0)
+4012429^ADHESIVE DISC 4IN STOMASEAL
+"DATA",176.112,33181,1)
+487274^^Y
+"DATA",176.112,33182,0)
+4012431^ADHESIVE DISC,DBL-FACED 1.5IN MAR107-12
+"DATA",176.112,33182,1)
+487275^^Y
+"DATA",176.112,33183,0)
+4012425^ADHESIVE DISC,DBL-FACED 7/8IN MAR107-07
+"DATA",176.112,33183,1)
+487276^^Y
+"DATA",176.112,33184,0)
+4012424^ADHESIVE DISC,DOUBLE-FACED MARLEN
+"DATA",176.112,33184,1)
+487277^^Y
+"DATA",176.112,33185,0)
+4012472^ADHESIVE FOAM STRIP UROFOAM-1
+"DATA",176.112,33185,1)
+487278^^Y
+"DATA",176.112,33186,0)
+4012623^ADHESIVE PERMA-TYPE FORMULA TORBOT #0106
+"DATA",176.112,33186,1)
+487279^^Y
+"DATA",176.112,33187,0)
+4012069^ADHESIVE REMOVER AEROSOL 170GM H#7731
+"DATA",176.112,33187,1)
+487280^^Y
+"DATA",176.112,33188,0)
+4012066^ADHESIVE REMOVER LIQUID
+"DATA",176.112,33188,1)
+487281^^Y
+"DATA",176.112,33189,0)
+4012068^ADHESIVE REMOVER NON-FLAMMABLE LIQUID
+"DATA",176.112,33189,1)
+487282^^Y
+"DATA",176.112,33190,0)
+4013816^ADHESIVE REMOVER SPRAY H#7731
+"DATA",176.112,33190,1)
+487284^^Y
+"DATA",176.112,33191,0)
+4012073^ADHESIVE REMOVER SPRAY H#7755
+"DATA",176.112,33191,1)
+487285^^Y
+"DATA",176.112,33192,0)
+4012070^ADHESIVE REMOVER SWAB
+"DATA",176.112,33192,1)
+487286^^Y
+"DATA",176.112,33193,0)
+4012074^ADHESIVE REMOVER WIPE H#7760
+"DATA",176.112,33193,1)
+487287^^Y
+"DATA",176.112,33194,0)
+4014601^ADHESIVE REMOVER WIPE SN#403100
+"DATA",176.112,33194,1)
+487288^^Y
+"DATA",176.112,33195,0)
+4011543^ADHESIVE STRIP 0.25IN X 4IN F#054-7255
+"DATA",176.112,33195,1)
+487289^^Y
+"DATA",176.112,33196,0)
+4011544^ADHESIVE STRIP 0.5IN X 4IN F#054-7254
+"DATA",176.112,33196,1)
+487290^^Y
+"DATA",176.112,33197,0)
+4012473^ADHESIVE STRIP,URIHESIVE C#1739-29
+"DATA",176.112,33197,1)
+487291^^Y
+"DATA",176.112,33198,0)
+4017171^ADHESIVE,NU-HOPE IS STAYS
+"DATA",176.112,33198,1)
+487292^^Y
+"DATA",176.112,33199,0)
+4012626^ADHESIVE,TORBOT CEMENT #410
+"DATA",176.112,33199,1)
+487293^^Y
+"DATA",176.112,33200,0)
+4012636^ADHESIVE,URO-BOND 5000 LIQUID
+"DATA",176.112,33200,1)
+487294^^Y
+"DATA",176.112,33201,0)
+4016807^ADHESIVE,URO-BOND 5004-03 LIQUID,TOP
+"DATA",176.112,33201,1)
+487295^^Y
+"DATA",176.112,33202,0)
+4008367^AEROCHAMBER
+"DATA",176.112,33202,1)
+487296^^Y
+"DATA",176.112,33203,0)
+4015501^AEROCHAMBER PLUS W/MASK LARGE
+"DATA",176.112,33203,1)
+487298^^Y
+"DATA",176.112,33204,0)
+4008368^AEROCHAMBER W/MASK
+"DATA",176.112,33204,1)
+487299^^Y
+"DATA",176.112,33205,0)
+4012699^APPLIANCE ADHESIVE,BARD #262
+"DATA",176.112,33205,1)
+487300^^Y
+"DATA",176.112,33206,0)
+4015251^APPLIANCE DEODORANT DROPS M-9
+"DATA",176.112,33206,1)
+487301^^Y
+"DATA",176.112,33207,0)
+4014404^APPLIANCE DEODORANT M-9 H#7716
+"DATA",176.112,33207,1)
+487302^^Y
+"DATA",176.112,33208,0)
+4014898^APPLIANCE DEODORANT O.A.D. COLOPLAST
+"DATA",176.112,33208,1)
+487303^^Y
+"DATA",176.112,33209,0)
+4015149^APPLIANCE DEODORANT SOLN
+"DATA",176.112,33209,1)
+487304^^Y
+"DATA",176.112,33210,0)
+4016816^APPLIANCE DEODORANT SPRAY M-9
+"DATA",176.112,33210,1)
+487305^^Y
+"DATA",176.112,33211,0)
+4012084^APPLIANCE DEODORANT TAB (DO NOT TAKE)
+"DATA",176.112,33211,1)
+487306^^Y
+"DATA",176.112,33212,0)
+4015962^ATTENDS BRIEF LARGE #60107
+"DATA",176.112,33212,1)
+487307^^Y
+"DATA",176.112,33213,0)
+4015961^ATTENDS BRIEF MEDIUM #06707
+"DATA",176.112,33213,1)
+487308^^Y
+"DATA",176.112,33214,0)
+4017167^ATTENDS BRIEF PULL-ON LARGE
+"DATA",176.112,33214,1)
+487309^^Y
+"DATA",176.112,33215,0)
+4017168^ATTENDS BRIEF PULL-ON MEDIUM
+"DATA",176.112,33215,1)
+487310^^Y
+"DATA",176.112,33216,0)
+4012258^ATTENDS INSERT PAD
+"DATA",176.112,33216,1)
+487311^^Y
+"DATA",176.112,33217,0)
+4012046^ATTENDS PLUS BRIEF LARGE
+"DATA",176.112,33217,1)
+487312^^Y
+"DATA",176.112,33218,0)
+4012045^ATTENDS PLUS BRIEF MEDIUM #06613
+"DATA",176.112,33218,1)
+487313^^Y
+"DATA",176.112,33219,0)
+4012044^ATTENDS PLUS BRIEF SMALL #06511
+"DATA",176.112,33219,1)
+487314^^Y
+"DATA",176.112,33220,0)
+4012049^ATTENDS REGULAR BRIEF LARGE
+"DATA",176.112,33220,1)
+487315^^Y
+"DATA",176.112,33221,0)
+4012048^ATTENDS REGULAR BRIEF MEDIUM
+"DATA",176.112,33221,1)
+487316^^Y
+"DATA",176.112,33222,0)
+4012047^ATTENDS REGULAR BRIEF SMALL
+"DATA",176.112,33222,1)
+487317^^Y
+"DATA",176.112,33223,0)
+4012051^ATTENDS UNDERGARMENT LARGE
+"DATA",176.112,33223,1)
+487318^^Y
+"DATA",176.112,33224,0)
+4012050^ATTENDS UNDERGARMENT MEDIUM
+"DATA",176.112,33224,1)
+487319^^Y
+"DATA",176.112,33225,0)
+4014531^BREIF,LARGE FQP #IBF-013
+"DATA",176.112,33225,1)
+487321^^Y
+"DATA",176.112,33226,0)
+4014530^BREIF,MEDIUM FQP #IBF-012
+"DATA",176.112,33226,1)
+487322^^Y
+"DATA",176.112,33227,0)
+4014553^BREIF,VALUE BUY MEDIUM FQP #VB-012
+"DATA",176.112,33227,1)
+487323^^Y
+"DATA",176.112,33228,0)
+4012290^BRIEF,DISPOSABLE STRETCH,EXTRA LARGE COLOPLAST #5607
+"DATA",176.112,33228,1)
+487324^^Y
+"DATA",176.112,33229,0)
+4012289^BRIEF,DISPOSABLE STRETCH,LARGE COLOPLAST #5606
+"DATA",176.112,33229,1)
+487325^^Y
+"DATA",176.112,33230,0)
+4012288^BRIEF,DISPOSABLE STRETCH,MEDIUM COLOPLAST #5605
+"DATA",176.112,33230,1)
+487326^^Y
+"DATA",176.112,33231,0)
+4016475^BRIEF,DRY COMFORT EXTRA LARGE TENA
+"DATA",176.112,33231,1)
+487327^^Y
+"DATA",176.112,33232,0)
+4016474^BRIEF,DRY COMFORT EXTRA MEDIUM TENA
+"DATA",176.112,33232,1)
+487328^^Y
+"DATA",176.112,33233,0)
+4016473^BRIEF,DRY COMFORT EXTRA SMALL TENA
+"DATA",176.112,33233,1)
+487329^^Y
+"DATA",176.112,33234,0)
+4016476^BRIEF,DRY COMFORT EXTRA X-LARGE TENA
+"DATA",176.112,33234,1)
+487330^^Y
+"DATA",176.112,33235,0)
+4016467^BRIEF,EXTRA ABSORBENT PROTECTIVE UNDERWEAR LARGE TENA
+"DATA",176.112,33235,1)
+487331^^Y
+"DATA",176.112,33236,0)
+4016466^BRIEF,EXTRA ABSORBENT PROTECTIVE UNDERWEAR MEDIUM TENA
+"DATA",176.112,33236,1)
+487332^^Y
+"DATA",176.112,33237,0)
+4016465^BRIEF,EXTRA ABSORBENT PROTECTIVE UNDERWEAR SMALL TENA
+"DATA",176.112,33237,1)
+487333^^Y
+"DATA",176.112,33238,0)
+4013459^BRIEF,FITTED LARGE EXTRA ABSORBENT
+"DATA",176.112,33238,1)
+487334^^Y
+"DATA",176.112,33239,0)
+4013457^BRIEF,FITTED MEDIUM EXTRA ABSORBENT
+"DATA",176.112,33239,1)
+487335^^Y
+"DATA",176.112,33240,0)
+4013456^BRIEF,FITTED SMALL EXTRA ABSORBENT
+"DATA",176.112,33240,1)
+487336^^Y
+"DATA",176.112,33241,0)
+4013458^BRIEF,FITTED X-LARGE EXTRA ABSORBENT
+"DATA",176.112,33241,1)
+487337^^Y
+"DATA",176.112,33242,0)
+4014699^BRIEF,HEALTH DRI,TRANSAQUA #BH00L
+"DATA",176.112,33242,1)
+487338^^Y
+"DATA",176.112,33243,0)
+4014066^BRIEF,HEALTH DRI,TRANSAQUA #BH00M010
+"DATA",176.112,33243,1)
+487339^^Y
+"DATA",176.112,33244,0)
+4012291^BRIEF,HEALTH DRI,TRANSAQUA #BH00S010
+"DATA",176.112,33244,1)
+487340^^Y
+"DATA",176.112,33245,0)
+4014065^BRIEF,HEALTH DRI,TRANSAQUA #BH0XL010
+"DATA",176.112,33245,1)
+487341^^Y
+"DATA",176.112,33246,0)
+4012292^BRIEF,HEALTH DRI,TRANSAQUA #BL00M010
+"DATA",176.112,33246,1)
+487342^^Y
+"DATA",176.112,33247,0)
+4014067^BRIEF,HEALTH DRI,TRANSAQUA #PHC016
+"DATA",176.112,33247,1)
+487343^^Y
+"DATA",176.112,33248,0)
+4014068^BRIEF,HEALTH DRI,TRANSAQUA #PMC010
+"DATA",176.112,33248,1)
+487344^^Y
+"DATA",176.112,33249,0)
+4014548^BRIEF,LARGE FQP #AB-013
+"DATA",176.112,33249,1)
+487345^^Y
+"DATA",176.112,33250,0)
+4014538^BRIEF,LARGE FQP #IB-013
+"DATA",176.112,33250,1)
+487346^^Y
+"DATA",176.112,33251,0)
+4014535^BRIEF,LARGE FQP #IBF-013
+"DATA",176.112,33251,1)
+487347^^Y
+"DATA",176.112,33252,0)
+4014543^BRIEF,LARGE FQP #LC-013
+"DATA",176.112,33252,1)
+487348^^Y
+"DATA",176.112,33253,0)
+4014547^BRIEF,MEDIUM FQP #AB-012
+"DATA",176.112,33253,1)
+487349^^Y
+"DATA",176.112,33254,0)
+4014537^BRIEF,MEDIUM FQP #IB-012
+"DATA",176.112,33254,1)
+487350^^Y
+"DATA",176.112,33255,0)
+4014534^BRIEF,MEDIUM FQP #IBF-012
+"DATA",176.112,33255,1)
+487351^^Y
+"DATA",176.112,33256,0)
+4014542^BRIEF,MEDIUM FQP #LC-012
+"DATA",176.112,33256,1)
+487352^^Y
+"DATA",176.112,33257,0)
+4014551^BRIEF,NU-FIT LARGE FQP #NU-013
+"DATA",176.112,33257,1)
+487353^^Y
+"DATA",176.112,33258,0)
+4014549^BRIEF,NU-FIT MEDIUM FQP #NU-012
+"DATA",176.112,33258,1)
+487354^^Y
+"DATA",176.112,33259,0)
+4014587^BRIEF,NU-FIT REGULAR FQP #NU-016
+"DATA",176.112,33259,1)
+487355^^Y
+"DATA",176.112,33260,0)
+4014550^BRIEF,NU-FIT REGULAR NU-016
+"DATA",176.112,33260,1)
+487356^^Y
+"DATA",176.112,33261,0)
+4014552^BRIEF,NU-FIT X-LARGE FQP #NU-014
+"DATA",176.112,33261,1)
+487357^^Y
+"DATA",176.112,33262,0)
+4014545^BRIEF,PER-FIT MEDIUM FQP #PF-012
+"DATA",176.112,33262,1)
+487358^^Y
+"DATA",176.112,33263,0)
+4014544^BRIEF,PER-FIT REGULAR FQP #PF-016
+"DATA",176.112,33263,1)
+487359^^Y
+"DATA",176.112,33264,0)
+4014546^BRIEF,PER-FIT X-LARGE FQP #PF-014
+"DATA",176.112,33264,1)
+487360^^Y
+"DATA",176.112,33265,0)
+4014751^BRIEF,PLUS,PROMISE #63203
+"DATA",176.112,33265,1)
+487361^^Y
+"DATA",176.112,33266,0)
+4014529^BRIEF,PREVAIL LARGE FQP#PV-513
+"DATA",176.112,33266,1)
+487362^^Y
+"DATA",176.112,33267,0)
+4014528^BRIEF,PREVAIL SM/MED FQP#PV-512
+"DATA",176.112,33267,1)
+487363^^Y
+"DATA",176.112,33268,0)
+4013278^BRIEF,PROMISE LARGE,SCOTT #61123
+"DATA",176.112,33268,1)
+487364^^Y
+"DATA",176.112,33269,0)
+4013277^BRIEF,PROMISE MEDIUM,SCOTT #61122
+"DATA",176.112,33269,1)
+487365^^Y
+"DATA",176.112,33270,0)
+4016784^BRIEF,PROTECTION PLUS LARGE #MSC33505
+"DATA",176.112,33270,1)
+487366^^Y
+"DATA",176.112,33271,0)
+4016783^BRIEF,PROTECTION PLUS MEDIUM #MSC33005
+"DATA",176.112,33271,1)
+487367^^Y
+"DATA",176.112,33272,0)
+4016785^BRIEF,PROTECTION PLUS SMALL #MSC33255
+"DATA",176.112,33272,1)
+487368^^Y
+"DATA",176.112,33273,0)
+4016786^BRIEF,PROTECTION PLUS X-LARGE #MSC33600
+"DATA",176.112,33273,1)
+487369^^Y
+"DATA",176.112,33274,0)
+4014541^BRIEF,REGULAR FQP #IB-016
+"DATA",176.112,33274,1)
+487370^^Y
+"DATA",176.112,33275,0)
+4014533^BRIEF,REGULAR FQP #IBF-016
+"DATA",176.112,33275,1)
+487371^^Y
+"DATA",176.112,33276,0)
+4014750^BRIEF,REGULAR,PROMISE #63202
+"DATA",176.112,33276,1)
+487372^^Y
+"DATA",176.112,33277,0)
+4014536^BRIEF,SMALL FQP #IB-011
+"DATA",176.112,33277,1)
+487373^^Y
+"DATA",176.112,33278,0)
+4014588^BRIEF,SMALL FQP #IB-015
+"DATA",176.112,33278,1)
+487374^^Y
+"DATA",176.112,33279,0)
+4016471^BRIEF,SUPER BRIEF LARGE TENA
+"DATA",176.112,33279,1)
+487375^^Y
+"DATA",176.112,33280,0)
+4016470^BRIEF,SUPER BRIEF MEDIUM TENA
+"DATA",176.112,33280,1)
+487376^^Y
+"DATA",176.112,33281,0)
+4016472^BRIEF,SUPER BRIEF X-LARGE TENA
+"DATA",176.112,33281,1)
+487377^^Y
+"DATA",176.112,33282,0)
+4016469^BRIEF,ULTRA BRIEF LARGE TENA
+"DATA",176.112,33282,1)
+487378^^Y
+"DATA",176.112,33283,0)
+4016468^BRIEF,ULTRA BRIEF MEDIUM TENA
+"DATA",176.112,33283,1)
+487379^^Y
+"DATA",176.112,33284,0)
+4014555^BRIEF,VALUE BUY FQP #VB-012
+"DATA",176.112,33284,1)
+487380^^Y
+"DATA",176.112,33285,0)
+4014554^BRIEF,VALUE BUY LARGE FQP #VB-013
+"DATA",176.112,33285,1)
+487381^^Y
+"DATA",176.112,33286,0)
+4014556^BRIEF,VALUE BUY MEDIUM FQP #VB-012
+"DATA",176.112,33286,1)
+487382^^Y
+"DATA",176.112,33287,0)
+4014539^BRIEF,X-LARGE FQP #IB-014
+"DATA",176.112,33287,1)
+487383^^Y
+"DATA",176.112,33288,0)
+4014532^BRIEF,X-LARGE FQP #IBF-014
+"DATA",176.112,33288,1)
+487384^^Y
+"DATA",176.112,33289,0)
+4014589^BRIEF,YOUTH FQP #IB-015
+"DATA",176.112,33289,1)
+487385^^Y
+"DATA",176.112,33290,0)
+4014540^BRIEF,YOUTH IB-015
+"DATA",176.112,33290,1)
+487386^^Y
+"DATA",176.112,33291,0)
+4012702^CONDOM,LATEX,PLAIN
+"DATA",176.112,33291,1)
+487389^^Y
+"DATA",176.112,33292,0)
+4016539^CONDOM,NON-LATEX,PLAIN
+"DATA",176.112,33292,1)
+487391^^Y
+"DATA",176.112,33293,0)
+4016302^CONDOM,NON-LATEX,SPERMICIDAL
+"DATA",176.112,33293,1)
+487392^^Y
+"DATA",176.112,33294,0)
+4012346^CONNECTOR 5-IN-1,NON-STERILE #1350-00
+"DATA",176.112,33294,1)
+487393^^Y
+"DATA",176.112,33295,0)
+4016206^CONNECTOR 5-IN-1,STERILE MMG#TC-5002
+"DATA",176.112,33295,1)
+487394^^Y
+"DATA",176.112,33296,0)
+4014371^CONNECTOR,PLASTIC 3/8IN TUBING BAXTER #355A
+"DATA",176.112,33296,1)
+487395^^Y
+"DATA",176.112,33297,0)
+4012344^CONNECTOR,PLASTIC TUBING #354A
+"DATA",176.112,33297,1)
+487396^^Y
+"DATA",176.112,33298,0)
+4012345^CONNECTOR,PLASTIC TUBING #360
+"DATA",176.112,33298,1)
+487397^^Y
+"DATA",176.112,33299,0)
+4015591^CONNECTOR,Y-PORT 14-16FR ROSS #835
+"DATA",176.112,33299,1)
+487398^^Y
+"DATA",176.112,33300,0)
+4015590^CONNECTOR,Y-PORT 18-20FR ROSS #836
+"DATA",176.112,33300,1)
+487399^^Y
+"DATA",176.112,33301,0)
+4015592^CONNECTOR,Y-PORT KIT ROSS #371
+"DATA",176.112,33301,1)
+487400^^Y
+"DATA",176.112,33302,0)
+4012689^CUSHION,FOAM LARGE
+"DATA",176.112,33302,1)
+487402^^Y
+"DATA",176.112,33303,0)
+4012688^CUSHION,FOAM,MEDIUM
+"DATA",176.112,33303,1)
+487403^^Y
+"DATA",176.112,33304,0)
+4012692^CUSHION,INFLATABLE,VINYL,16IN
+"DATA",176.112,33304,1)
+487404^^Y
+"DATA",176.112,33305,0)
+4012054^DEPEND FITTED BRIEF SMALL
+"DATA",176.112,33305,1)
+487407^^Y
+"DATA",176.112,33306,0)
+4016896^DEPEND OVERNITE BRIEF MEDIUM
+"DATA",176.112,33306,1)
+487408^^Y
+"DATA",176.112,33307,0)
+4016448^DEPEND PROTECTIVE UNDERWEAR LARGE
+"DATA",176.112,33307,1)
+487409^^Y
+"DATA",176.112,33308,0)
+4016447^DEPEND PROTECTIVE UNDERWEAR SMALL/MEDIUM
+"DATA",176.112,33308,1)
+487410^^Y
+"DATA",176.112,33309,0)
+4016857^DEPEND PROTECTIVE UNDERWEAR X-LARGE
+"DATA",176.112,33309,1)
+487411^^Y
+"DATA",176.112,33310,0)
+4017065^DEPEND SUPER PLUS UNDERWEAR LARGE
+"DATA",176.112,33310,1)
+487412^^Y
+"DATA",176.112,33311,0)
+4016897^DEPEND UNDERGARMENT EASFIT XABS
+"DATA",176.112,33311,1)
+487413^^Y
+"DATA",176.112,33312,0)
+4012065^DEPEND W/ELASTIC LEG X-ABSORB #19241-10
+"DATA",176.112,33312,1)
+487416^^Y
+"DATA",176.112,33313,0)
+4015470^DEPEND W/ELASTIC LEG X-ABSORB #19241-51
+"DATA",176.112,33313,1)
+487417^^Y
+"DATA",176.112,33314,0)
+4015382^DEPEND W/ELASTIC LEG X-ABSORB #19696
+"DATA",176.112,33314,1)
+487418^^Y
+"DATA",176.112,33315,0)
+4014101^DIAPER ADULT EXTRA LARGE
+"DATA",176.112,33315,1)
+487420^^Y
+"DATA",176.112,33316,0)
+4012042^DIAPER ADULT LARGE
+"DATA",176.112,33316,1)
+487421^^Y
+"DATA",176.112,33317,0)
+4013453^DIAPER ADULT LARGE EXTRA ABSORBENT
+"DATA",176.112,33317,1)
+487422^^Y
+"DATA",176.112,33318,0)
+4012043^DIAPER ADULT MEDIUM
+"DATA",176.112,33318,1)
+487423^^Y
+"DATA",176.112,33319,0)
+4013454^DIAPER ADULT MEDIUM EXTRA ABSORBENT
+"DATA",176.112,33319,1)
+487424^^Y
+"DATA",176.112,33320,0)
+4012061^DIAPER ADULT SMALL
+"DATA",176.112,33320,1)
+487425^^Y
+"DATA",176.112,33321,0)
+4012040^DIAPER,ADULTS F#096-1361
+"DATA",176.112,33321,1)
+487426^^Y
+"DATA",176.112,33322,0)
+4012041^DIAPER,ADULTS F#137-9888
+"DATA",176.112,33322,1)
+487427^^Y
+"DATA",176.112,33323,0)
+4012650^GASKET,LOOP OSTOMY H#7344
+"DATA",176.112,33323,1)
+487428^^Y
+"DATA",176.112,33324,0)
+4012651^GASKET,LOOP OSTOMY H#7345
+"DATA",176.112,33324,1)
+487429^^Y
+"DATA",176.112,33325,0)
+4014127^GASKET,SEAL-TITE 1-1/2IN,SN#1137-40
+"DATA",176.112,33325,1)
+487430^^Y
+"DATA",176.112,33326,0)
+4014136^GASKET,SEAL-TITE 1-1/2IN,SN#1138-30
+"DATA",176.112,33326,1)
+487431^^Y
+"DATA",176.112,33327,0)
+4014132^GASKET,SEAL-TITE 1-1/4IN,SN#1137-20
+"DATA",176.112,33327,1)
+487432^^Y
+"DATA",176.112,33328,0)
+4014142^GASKET,SEAL-TITE 1-1/4IN,SN#1138-10
+"DATA",176.112,33328,1)
+487433^^Y
+"DATA",176.112,33329,0)
+4014131^GASKET,SEAL-TITE 1-1/8IN,SN#1137-10
+"DATA",176.112,33329,1)
+487434^^Y
+"DATA",176.112,33330,0)
+4014141^GASKET,SEAL-TITE 1-1/8IN,SN#1138-00
+"DATA",176.112,33330,1)
+487435^^Y
+"DATA",176.112,33331,0)
+4014133^GASKET,SEAL-TITE 1-3/8IN,SN#1137-30
+"DATA",176.112,33331,1)
+487436^^Y
+"DATA",176.112,33332,0)
+4014143^GASKET,SEAL-TITE 1-3/8IN,SN#1138-20
+"DATA",176.112,33332,1)
+487437^^Y
+"DATA",176.112,33333,0)
+4014144^GASKET,SEAL-TITE 1/2IN,SN#1137-50
+"DATA",176.112,33333,1)
+487438^^Y
+"DATA",176.112,33334,0)
+4014130^GASKET,SEAL-TITE 1IN,SN#1137-00
+"DATA",176.112,33334,1)
+487439^^Y
+"DATA",176.112,33335,0)
+4014139^GASKET,SEAL-TITE 1IN,SN#1137-90
+"DATA",176.112,33335,1)
+487440^^Y
+"DATA",176.112,33336,0)
+4014128^GASKET,SEAL-TITE 3/4IN,SN#1136-80
+"DATA",176.112,33336,1)
+487441^^Y
+"DATA",176.112,33337,0)
+4014138^GASKET,SEAL-TITE 3/4IN,SN#1137-70
+"DATA",176.112,33337,1)
+487442^^Y
+"DATA",176.112,33338,0)
+4014134^GASKET,SEAL-TITE 5/8IN,SN#1136-70
+"DATA",176.112,33338,1)
+487443^^Y
+"DATA",176.112,33339,0)
+4014135^GASKET,SEAL-TITE 5/8IN,SN#1137-60
+"DATA",176.112,33339,1)
+487444^^Y
+"DATA",176.112,33340,0)
+4012432^GASKET,SEAL-TITE 5/8IN,U#4302-05
+"DATA",176.112,33340,1)
+487445^^Y
+"DATA",176.112,33341,0)
+4014129^GASKET,SEAL-TITE 7/8IN,SN#1136-90
+"DATA",176.112,33341,1)
+487446^^Y
+"DATA",176.112,33342,0)
+4014137^GASKET,SEAL-TITE 7/8IN,SN#1137-80
+"DATA",176.112,33342,1)
+487447^^Y
+"DATA",176.112,33343,0)
+4012683^GLOVE COTTON LARGE (PAIR)
+"DATA",176.112,33343,1)
+487448^^Y
+"DATA",176.112,33344,0)
+4012627^GLOVE COTTON MEDIUM (PAIR)
+"DATA",176.112,33344,1)
+487449^^Y
+"DATA",176.112,33345,0)
+4012684^GLOVE COTTON SMALL (PAIR)
+"DATA",176.112,33345,1)
+487450^^Y
+"DATA",176.112,33346,0)
+4015925^GLOVE COTTON X-LARGE (PAIR)
+"DATA",176.112,33346,1)
+487451^^Y
+"DATA",176.112,33347,0)
+4011925^GLOVE LATEX LARGE NONSTERILE
+"DATA",176.112,33347,1)
+487452^^Y
+"DATA",176.112,33348,0)
+4013527^GLOVE LATEX LARGE PWDR-FREE NONSTERILE
+"DATA",176.112,33348,1)
+487453^^Y
+"DATA",176.112,33349,0)
+4014293^GLOVE LATEX LARGE PWDR-FREE NONSTERILE #455-2782
+"DATA",176.112,33349,1)
+487454^^Y
+"DATA",176.112,33350,0)
+4011918^GLOVE LATEX MEDIUM NONSTERILE
+"DATA",176.112,33350,1)
+487455^^Y
+"DATA",176.112,33351,0)
+4013525^GLOVE LATEX MEDIUM PWDR-FREE NONSTERILE
+"DATA",176.112,33351,1)
+487456^^Y
+"DATA",176.112,33352,0)
+4014292^GLOVE LATEX MEDIUM PWDR-FREE NONSTERILE #455-2778
+"DATA",176.112,33352,1)
+487457^^Y
+"DATA",176.112,33353,0)
+4011919^GLOVE LATEX SMALL NONSTERILE
+"DATA",176.112,33353,1)
+487458^^Y
+"DATA",176.112,33354,0)
+4013526^GLOVE LATEX SMALL PWDR-FREE NONSTERILE
+"DATA",176.112,33354,1)
+487459^^Y
+"DATA",176.112,33355,0)
+4014291^GLOVE LATEX SMALL PWDR-FREE NONSTERILE TEXTURED #455-5281
+"DATA",176.112,33355,1)
+487460^^Y
+"DATA",176.112,33356,0)
+4011920^GLOVE LATEX SZ 6.5 STERILE (PAIR)
+"DATA",176.112,33356,1)
+487461^^Y
+"DATA",176.112,33357,0)
+4011921^GLOVE LATEX SZ 7 STERILE (PAIR)
+"DATA",176.112,33357,1)
+487462^^Y
+"DATA",176.112,33358,0)
+4011922^GLOVE LATEX SZ 7.5 STERILE (PAIR)
+"DATA",176.112,33358,1)
+487463^^Y
+"DATA",176.112,33359,0)
+4011923^GLOVE LATEX SZ 8 STERILE (PAIR)
+"DATA",176.112,33359,1)
+487464^^Y
+"DATA",176.112,33360,0)
+4011924^GLOVE LATEX SZ 8.5 STERILE (PAIR)
+"DATA",176.112,33360,1)
+487465^^Y
+"DATA",176.112,33361,0)
+4013905^GLOVE LATEX SZ 9 STERILE (PAIR)
+"DATA",176.112,33361,1)
+487466^^Y
+"DATA",176.112,33362,0)
+4013558^GLOVE LATEX X-LARGE NONSTERILE
+"DATA",176.112,33362,1)
+487467^^Y
+"DATA",176.112,33363,0)
+4013557^GLOVE LATEX X-LARGE PWDR-FREE NONSTERILE
+"DATA",176.112,33363,1)
+487468^^Y
+"DATA",176.112,33364,0)
+4014294^GLOVE LATEX X-LARGE PWDR-FREE NONSTERILE 461-8414
+"DATA",176.112,33364,1)
+487469^^Y
+"DATA",176.112,33365,0)
+4014285^GLOVE NITRILE LARGE PWDR-FREE NONSTERILE TEXTURED #455-5293
+"DATA",176.112,33365,1)
+487470^^Y
+"DATA",176.112,33366,0)
+4014284^GLOVE NITRILE MEDIUM PWDR-FREE NONSTERILE TEXTURED #461-3209
+"DATA",176.112,33366,1)
+487471^^Y
+"DATA",176.112,33367,0)
+4014283^GLOVE NITRILE SMALL PWDR-FREE NONSTERILE TEXTURED #461-3208
+"DATA",176.112,33367,1)
+487472^^Y
+"DATA",176.112,33368,0)
+4014286^GLOVE NITRILE X-LARGE PWDR-FREE NONSTERILE TEXTURED #461-8271
+"DATA",176.112,33368,1)
+487473^^Y
+"DATA",176.112,33369,0)
+4011916^GLOVE VINYL LARGE NONSTERILE
+"DATA",176.112,33369,1)
+487474^^Y
+"DATA",176.112,33370,0)
+4013555^GLOVE VINYL LARGE PWDR-FREE NONSTERILE
+"DATA",176.112,33370,1)
+487475^^Y
+"DATA",176.112,33371,0)
+4014289^GLOVE VINYL LARGE PWDR-FREE NONSTERILE #455-2759
+"DATA",176.112,33371,1)
+487476^^Y
+"DATA",176.112,33372,0)
+4011917^GLOVE VINYL MEDIUM NONSTERILE
+"DATA",176.112,33372,1)
+487477^^Y
+"DATA",176.112,33373,0)
+4013554^GLOVE VINYL MEDIUM PWDR-FREE NONSTERILE
+"DATA",176.112,33373,1)
+487478^^Y
+"DATA",176.112,33374,0)
+4014288^GLOVE VINYL MEDIUM PWDR-FREE NONSTERILE #455-2768
+"DATA",176.112,33374,1)
+487479^^Y
+"DATA",176.112,33375,0)
+4013302^GLOVE VINYL SMALL NONSTERILE
+"DATA",176.112,33375,1)
+487480^^Y
+"DATA",176.112,33376,0)
+4013553^GLOVE VINYL SMALL PWDR-FREE NONSTERILE
+"DATA",176.112,33376,1)
+487481^^Y
+"DATA",176.112,33377,0)
+4014287^GLOVE VINYL SMALL PWDR-FREE NONSTERILE #455-5278
+"DATA",176.112,33377,1)
+487482^^Y
+"DATA",176.112,33378,0)
+4013556^GLOVE VINYL X-LARGE PWDR-FREE NONSTERILE
+"DATA",176.112,33378,1)
+487483^^Y
+"DATA",176.112,33379,0)
+4014290^GLOVE VINYL X-LARGE PWDR-FREE NONSTERILE #461-8507
+"DATA",176.112,33379,1)
+487484^^Y
+"DATA",176.112,33380,0)
+4013552^GLOVE VINYL X-SMALL PWDR-FREE NONSTERILE
+"DATA",176.112,33380,1)
+487485^^Y
+"DATA",176.112,33381,0)
+4011950^HOSE ANTI-EMBOLISM CALF LEN LARGE
+"DATA",176.112,33381,1)
+487486^^Y
+"DATA",176.112,33382,0)
+4011951^HOSE ANTI-EMBOLISM CALF LEN MEDIUM
+"DATA",176.112,33382,1)
+487487^^Y
+"DATA",176.112,33383,0)
+4011979^HOSE ANTI-EMBOLISM CLSD TOE LRG-REG
+"DATA",176.112,33383,1)
+487488^^Y
+"DATA",176.112,33384,0)
+4011980^HOSE ANTI-EMBOLISM CLSD TOE LRG-X-LEN
+"DATA",176.112,33384,1)
+487489^^Y
+"DATA",176.112,33385,0)
+4011981^HOSE ANTI-EMBOLISM CLSD TOE MED-REG
+"DATA",176.112,33385,1)
+487490^^Y
+"DATA",176.112,33386,0)
+4011982^HOSE ANTI-EMBOLISM CLSD TOE MED-X-LEN
+"DATA",176.112,33386,1)
+487491^^Y
+"DATA",176.112,33387,0)
+4011983^HOSE ANTI-EMBOLISM CLSD TOE SM-REG
+"DATA",176.112,33387,1)
+487492^^Y
+"DATA",176.112,33388,0)
+4011984^HOSE ANTI-EMBOLISM CLSD TOE SM-X-LEN
+"DATA",176.112,33388,1)
+487493^^Y
+"DATA",176.112,33389,0)
+4011985^HOSE ANTI-EMBOLISM CLSD TOE X-LRG-REG
+"DATA",176.112,33389,1)
+487494^^Y
+"DATA",176.112,33390,0)
+4011986^HOSE ANTI-EMBOLISM CLSD TOE X-LRG-X-LEN
+"DATA",176.112,33390,1)
+487495^^Y
+"DATA",176.112,33391,0)
+4011952^HOSE ANTI-EMBOLISM FULL LEG LRG-LONG
+"DATA",176.112,33391,1)
+487496^^Y
+"DATA",176.112,33392,0)
+4011953^HOSE ANTI-EMBOLISM FULL LEG LRG-REG
+"DATA",176.112,33392,1)
+487497^^Y
+"DATA",176.112,33393,0)
+4011954^HOSE ANTI-EMBOLISM FULL LEG MED-LONG
+"DATA",176.112,33393,1)
+487498^^Y
+"DATA",176.112,33394,0)
+4011955^HOSE ANTI-EMBOLISM FULL LEG MED-REG
+"DATA",176.112,33394,1)
+487499^^Y
+"DATA",176.112,33395,0)
+4011956^HOSE ANTI-EMBOLISM FULL LEG SM-LONG
+"DATA",176.112,33395,1)
+487500^^Y
+"DATA",176.112,33396,0)
+4011957^HOSE ANTI-EMBOLISM FULL LEG SM-REG
+"DATA",176.112,33396,1)
+487501^^Y
+"DATA",176.112,33397,0)
+4011958^HOSE ANTI-EMBOLISM FULL LEG X-LRG-LONG
+"DATA",176.112,33397,1)
+487502^^Y
+"DATA",176.112,33398,0)
+4011959^HOSE ANTI-EMBOLISM FULL LEG X-LRG-REG
+"DATA",176.112,33398,1)
+487503^^Y
+"DATA",176.112,33399,0)
+4011960^HOSE ANTI-EMBOLISM FULL LEG X-SM-LONG
+"DATA",176.112,33399,1)
+487504^^Y
+"DATA",176.112,33400,0)
+4011961^HOSE ANTI-EMBOLISM FULL LEG X-SM-REG
+"DATA",176.112,33400,1)
+487505^^Y
+"DATA",176.112,33401,0)
+4013437^HOSE ANTI-EMBOLISM KNEE LEN LRG-LONG
+"DATA",176.112,33401,1)
+487506^^Y
+"DATA",176.112,33402,0)
+4011962^HOSE ANTI-EMBOLISM KNEE LEN LRG-REG
+"DATA",176.112,33402,1)
+487507^^Y
+"DATA",176.112,33403,0)
+4011963^HOSE ANTI-EMBOLISM KNEE LEN LRG-X-LEN
+"DATA",176.112,33403,1)
+487508^^Y
+"DATA",176.112,33404,0)
+4013438^HOSE ANTI-EMBOLISM KNEE LEN MED-LONG
+"DATA",176.112,33404,1)
+487509^^Y
+"DATA",176.112,33405,0)
+4011964^HOSE ANTI-EMBOLISM KNEE LEN MED-REG
+"DATA",176.112,33405,1)
+487510^^Y
+"DATA",176.112,33406,0)
+4011965^HOSE ANTI-EMBOLISM KNEE LEN MED-X-LEN
+"DATA",176.112,33406,1)
+487511^^Y
+"DATA",176.112,33407,0)
+4013439^HOSE ANTI-EMBOLISM KNEE LEN SM-LONG
+"DATA",176.112,33407,1)
+487512^^Y
+"DATA",176.112,33408,0)
+4011966^HOSE ANTI-EMBOLISM KNEE LEN SM-REG
+"DATA",176.112,33408,1)
+487513^^Y
+"DATA",176.112,33409,0)
+4011967^HOSE ANTI-EMBOLISM KNEE LEN SM-X-LEN
+"DATA",176.112,33409,1)
+487514^^Y
+"DATA",176.112,33410,0)
+4013440^HOSE ANTI-EMBOLISM KNEE LEN X-LRG-LONG
+"DATA",176.112,33410,1)
+487515^^Y
+"DATA",176.112,33411,0)
+4011969^HOSE ANTI-EMBOLISM KNEE LEN X-LRG-REG
+"DATA",176.112,33411,1)
+487516^^Y
+"DATA",176.112,33412,0)
+4011968^HOSE ANTI-EMBOLISM KNEE LEN X-LRG-X-LEN
+"DATA",176.112,33412,1)
+487517^^Y
+"DATA",176.112,33413,0)
+4015553^HOSE ANTI-EMBOLISM KNEE LEN XX-LRG-LONG
+"DATA",176.112,33413,1)
+487518^^Y
+"DATA",176.112,33414,0)
+4015552^HOSE ANTI-EMBOLISM KNEE LEN XX-LRG-REG
+"DATA",176.112,33414,1)
+487519^^Y
+"DATA",176.112,33415,0)
+4011970^HOSE ANTI-EMBOLISM THIGH LEN LRG-LONG
+"DATA",176.112,33415,1)
+487520^^Y
+"DATA",176.112,33416,0)
+4011971^HOSE ANTI-EMBOLISM THIGH LEN LRG-REG
+"DATA",176.112,33416,1)
+487521^^Y
+"DATA",176.112,33417,0)
+4011972^HOSE ANTI-EMBOLISM THIGH LEN LRG-SHORT
+"DATA",176.112,33417,1)
+487522^^Y
+"DATA",176.112,33418,0)
+4011973^HOSE ANTI-EMBOLISM THIGH LEN MED-LONG
+"DATA",176.112,33418,1)
+487523^^Y
+"DATA",176.112,33419,0)
+4011974^HOSE ANTI-EMBOLISM THIGH LEN MED-REG
+"DATA",176.112,33419,1)
+487524^^Y
+"DATA",176.112,33420,0)
+4011975^HOSE ANTI-EMBOLISM THIGH LEN MED-SHORT
+"DATA",176.112,33420,1)
+487525^^Y
+"DATA",176.112,33421,0)
+4011976^HOSE ANTI-EMBOLISM THIGH LEN SM-LONG
+"DATA",176.112,33421,1)
+487526^^Y
+"DATA",176.112,33422,0)
+4011977^HOSE ANTI-EMBOLISM THIGH LEN SM-REG
+"DATA",176.112,33422,1)
+487527^^Y
+"DATA",176.112,33423,0)
+4011978^HOSE ANTI-EMBOLISM THIGH LEN SM-SHORT
+"DATA",176.112,33423,1)
+487528^^Y
+"DATA",176.112,33424,0)
+4014438^HOSE ANTI-EMBOLISM THIGH LEN X-LRG-LONG
+"DATA",176.112,33424,1)
+487529^^Y
+"DATA",176.112,33425,0)
+4014437^HOSE ANTI-EMBOLISM THIGH LEN X-LRG-REG
+"DATA",176.112,33425,1)
+487530^^Y
+"DATA",176.112,33426,0)
+4012280^INCONT BRIEF FREE & ACTIVE LG #26938
+"DATA",176.112,33426,1)
+487531^^Y
+"DATA",176.112,33427,0)
+4012279^INCONT BRIEF FREE & ACTIVE MED #26937
+"DATA",176.112,33427,1)
+487532^^Y
+"DATA",176.112,33428,0)
+4012278^INCONT BRIEF FREE & ACTIVE SM #26936
+"DATA",176.112,33428,1)
+487533^^Y
+"DATA",176.112,33429,0)
+4012281^INCONT BRIEF FREE & ACTIVE XLG #26939
+"DATA",176.112,33429,1)
+487534^^Y
+"DATA",176.112,33430,0)
+4012276^INCONT BRIEF SIR DIGNITY PLUS LG #30213
+"DATA",176.112,33430,1)
+487535^^Y
+"DATA",176.112,33431,0)
+4012275^INCONT BRIEF SIR DIGNITY PLUS MED #30212
+"DATA",176.112,33431,1)
+487536^^Y
+"DATA",176.112,33432,0)
+4012274^INCONT BRIEF SIR DIGNITY PLUS SM #30211
+"DATA",176.112,33432,1)
+487537^^Y
+"DATA",176.112,33433,0)
+4012277^INCONT BRIEF SIR DIGNITY XLG 30214
+"DATA",176.112,33433,1)
+487538^^Y
+"DATA",176.112,33434,0)
+4016855^INCONT BRIEF SIR DIGNITY XXL #30215
+"DATA",176.112,33434,1)
+487539^^Y
+"DATA",176.112,33435,0)
+4016564^INCONT BRIEF SLIP-ON KENDALL #1500/05
+"DATA",176.112,33435,1)
+487540^^Y
+"DATA",176.112,33436,0)
+4017298^INCONT BRIEF SURECARE REFASTENABLE LARGE
+"DATA",176.112,33436,1)
+487541^^Y
+"DATA",176.112,33437,0)
+4017297^INCONT BRIEF SURECARE REFASTENABLE MED
+"DATA",176.112,33437,1)
+487542^^Y
+"DATA",176.112,33438,0)
+4017293^INCONT BRIEF SURECARE REG ABSORBENCY LARGE
+"DATA",176.112,33438,1)
+487543^^Y
+"DATA",176.112,33439,0)
+4017292^INCONT BRIEF SURECARE REG ABSORBENCY MED
+"DATA",176.112,33439,1)
+487544^^Y
+"DATA",176.112,33440,0)
+4017294^INCONT BRIEF SURECARE REG ABSORBENCY X-LARGE
+"DATA",176.112,33440,1)
+487545^^Y
+"DATA",176.112,33441,0)
+4017296^INCONT BRIEF SURECARE SUPER ABSORBENCY LARGE
+"DATA",176.112,33441,1)
+487546^^Y
+"DATA",176.112,33442,0)
+4017295^INCONT BRIEF SURECARE SUPER ABSORBENCY MED
+"DATA",176.112,33442,1)
+487547^^Y
+"DATA",176.112,33443,0)
+4017290^INCONT LINER DEPEND GUARDS
+"DATA",176.112,33443,1)
+487548^^Y
+"DATA",176.112,33444,0)
+4015943^INCONT LINER DEPEND GUARDS #19035/19038
+"DATA",176.112,33444,1)
+487549^^Y
+"DATA",176.112,33445,0)
+4016304^INCONT LINER DEPEND GUARDS #19278
+"DATA",176.112,33445,1)
+487550^^Y
+"DATA",176.112,33446,0)
+4015381^INCONT LINER DEPEND GUARDS #19279-7
+"DATA",176.112,33446,1)
+487551^^Y
+"DATA",176.112,33447,0)
+4017180^INCONT LINER DIGNITY EXTRA DUTY DOUBLE
+"DATA",176.112,33447,1)
+487552^^Y
+"DATA",176.112,33448,0)
+4012254^INCONT LINER FREE & ACTIVE REG #26970
+"DATA",176.112,33448,1)
+487553^^Y
+"DATA",176.112,33449,0)
+4012255^INCONT LINER FREE & ACTIVE SUPER #26972
+"DATA",176.112,33449,1)
+487554^^Y
+"DATA",176.112,33450,0)
+4015353^INCONT LINER KENDALL SUPER PLUS #1120B16
+"DATA",176.112,33450,1)
+487555^^Y
+"DATA",176.112,33451,0)
+4014904^INCONT LINER LARGE KENDALL #931B24
+"DATA",176.112,33451,1)
+487556^^Y
+"DATA",176.112,33452,0)
+4016836^INCONT LINER POISE ULTRA PLUS
+"DATA",176.112,33452,1)
+487557^^Y
+"DATA",176.112,33453,0)
+4014747^INCONT LINER PROMISE LIGHT #62312
+"DATA",176.112,33453,1)
+487558^^Y
+"DATA",176.112,33454,0)
+4014746^INCONT LINER PROMISE PLUS #62614
+"DATA",176.112,33454,1)
+487559^^Y
+"DATA",176.112,33455,0)
+4014748^INCONT LINER PROMISE REG #62414
+"DATA",176.112,33455,1)
+487560^^Y
+"DATA",176.112,33456,0)
+4014749^INCONT LINER PROMISE SUPER #62714
+"DATA",176.112,33456,1)
+487561^^Y
+"DATA",176.112,33457,0)
+4015383^INCONT LINER SERENITY EXTRA
+"DATA",176.112,33457,1)
+487562^^Y
+"DATA",176.112,33458,0)
+4015384^INCONT LINER SERENITY EXTRA PLUS
+"DATA",176.112,33458,1)
+487563^^Y
+"DATA",176.112,33459,0)
+4015385^INCONT LINER SERENTIY ULTRA
+"DATA",176.112,33459,1)
+487564^^Y
+"DATA",176.112,33460,0)
+4016201^INCONT LINER SURETY EXTRA KENDALL #21175
+"DATA",176.112,33460,1)
+487565^^Y
+"DATA",176.112,33461,0)
+4016200^INCONT LINER SURETY LONG KENDALL #23218
+"DATA",176.112,33461,1)
+487566^^Y
+"DATA",176.112,33462,0)
+4016199^INCONT LINER SURETY REG KENDALL #23216
+"DATA",176.112,33462,1)
+487567^^Y
+"DATA",176.112,33463,0)
+4014905^INCONT LINER X-LARGE KENDALL #932B24
+"DATA",176.112,33463,1)
+487568^^Y
+"DATA",176.112,33464,0)
+4012284^INCONT PANTY FREE & ACTIVE LG #26948
+"DATA",176.112,33464,1)
+487569^^Y
+"DATA",176.112,33465,0)
+4012283^INCONT PANTY FREE & ACTIVE MED #26947
+"DATA",176.112,33465,1)
+487570^^Y
+"DATA",176.112,33466,0)
+4012282^INCONT PANTY FREE & ACTIVE SM #26946
+"DATA",176.112,33466,1)
+487571^^Y
+"DATA",176.112,33467,0)
+4012285^INCONT PANTY FREE & ACTIVE XLG #26949
+"DATA",176.112,33467,1)
+487572^^Y
+"DATA",176.112,33468,0)
+4012271^INCONT PANTY LADY DIGNITY PLUS LG #30202
+"DATA",176.112,33468,1)
+487573^^Y
+"DATA",176.112,33469,0)
+4012270^INCONT PANTY LADY DIGNITY PLUS MED#30202
+"DATA",176.112,33469,1)
+487574^^Y
+"DATA",176.112,33470,0)
+4012269^INCONT PANTY LADY DIGNITY PLUS SM #30201
+"DATA",176.112,33470,1)
+487575^^Y
+"DATA",176.112,33471,0)
+4012272^INCONT PANTY LADY DIGNITY PLUS XLG#30204
+"DATA",176.112,33471,1)
+487576^^Y
+"DATA",176.112,33472,0)
+4012273^INCONT PANTY LADY DIGNITY PLUS XXL#30205
+"DATA",176.112,33472,1)
+487577^^Y
+"DATA",176.112,33473,0)
+4015351^INCONTINENCE BRIEF KENDALL LARGE #1086A
+"DATA",176.112,33473,1)
+487578^^Y
+"DATA",176.112,33474,0)
+4015346^INCONTINENCE BRIEF KENDALL LARGE #60004
+"DATA",176.112,33474,1)
+487579^^Y
+"DATA",176.112,33475,0)
+4015350^INCONTINENCE BRIEF KENDALL LARGE #60007
+"DATA",176.112,33475,1)
+487580^^Y
+"DATA",176.112,33476,0)
+4015398^INCONTINENCE BRIEF KENDALL LARGE #60034/60134
+"DATA",176.112,33476,1)
+487581^^Y
+"DATA",176.112,33477,0)
+4016023^INCONTINENCE BRIEF KENDALL LARGE #60044
+"DATA",176.112,33477,1)
+487582^^Y
+"DATA",176.112,33478,0)
+4012060^INCONTINENCE BRIEF KENDALL LARGE #9003
+"DATA",176.112,33478,1)
+487583^^Y
+"DATA",176.112,33479,0)
+4016022^INCONTINENCE BRIEF KENDALL MED #60043
+"DATA",176.112,33479,1)
+487584^^Y
+"DATA",176.112,33480,0)
+4015352^INCONTINENCE BRIEF KENDALL MEDIUM #1076A
+"DATA",176.112,33480,1)
+487585^^Y
+"DATA",176.112,33481,0)
+4015345^INCONTINENCE BRIEF KENDALL MEDIUM #60003
+"DATA",176.112,33481,1)
+487586^^Y
+"DATA",176.112,33482,0)
+4015349^INCONTINENCE BRIEF KENDALL MEDIUM #60006
+"DATA",176.112,33482,1)
+487587^^Y
+"DATA",176.112,33483,0)
+4014586^INCONTINENCE BRIEF KENDALL MEDIUM #60033
+"DATA",176.112,33483,1)
+487588^^Y
+"DATA",176.112,33484,0)
+4016400^INCONTINENCE BRIEF KENDALL MEDIUM #60033/60133R
+"DATA",176.112,33484,1)
+487589^^Y
+"DATA",176.112,33485,0)
+4012059^INCONTINENCE BRIEF KENDALL MEDIUM #9002
+"DATA",176.112,33485,1)
+487590^^Y
+"DATA",176.112,33486,0)
+4015344^INCONTINENCE BRIEF KENDALL SMALL #60002
+"DATA",176.112,33486,1)
+487591^^Y
+"DATA",176.112,33487,0)
+4015347^INCONTINENCE BRIEF KENDALL SMALL #60005
+"DATA",176.112,33487,1)
+487592^^Y
+"DATA",176.112,33488,0)
+4015397^INCONTINENCE BRIEF KENDALL SMALL #60032
+"DATA",176.112,33488,1)
+487593^^Y
+"DATA",176.112,33489,0)
+4015396^INCONTINENCE BRIEF KENDALL SMALL #60033/60133R
+"DATA",176.112,33489,1)
+487594^^Y
+"DATA",176.112,33490,0)
+4012058^INCONTINENCE BRIEF KENDALL SMALL #9001
+"DATA",176.112,33490,1)
+487595^^Y
+"DATA",176.112,33491,0)
+4015348^INCONTINENCE BRIEF KENDALL X-LRG #60010
+"DATA",176.112,33491,1)
+487596^^Y
+"DATA",176.112,33492,0)
+4015399^INCONTINENCE BRIEF KENDALL XLG #60035
+"DATA",176.112,33492,1)
+487597^^Y
+"DATA",176.112,33493,0)
+4016024^INCONTINENCE BRIEF KENDALL XLG #60045
+"DATA",176.112,33493,1)
+487598^^Y
+"DATA",176.112,33494,0)
+4015343^INCONTINENCE BRIEF KENDALL YOUTH #60001
+"DATA",176.112,33494,1)
+487599^^Y
+"DATA",176.112,33495,0)
+4015395^INCONTINENCE BRIEF KENDALL YOUTH #60031
+"DATA",176.112,33495,1)
+487600^^Y
+"DATA",176.112,33496,0)
+4016602^INCONTINENCE DEVICE MALE C3 LARGE ENDOCARE
+"DATA",176.112,33496,1)
+487601^^Y
+"DATA",176.112,33497,0)
+4016601^INCONTINENCE DEVICE MALE C3 REGULAR ENDOCARE
+"DATA",176.112,33497,1)
+487602^^Y
+"DATA",176.112,33498,0)
+4012252^INCONTINENCE LINER DEPEND REG #19020
+"DATA",176.112,33498,1)
+487603^^Y
+"DATA",176.112,33499,0)
+4012253^INCONTINENCE LINER,DEPEND EXTRA #19031
+"DATA",176.112,33499,1)
+487604^^Y
+"DATA",176.112,33500,0)
+4011720^PAD BISMUTH ANTISEPTIC F#259-4667
+"DATA",176.112,33500,1)
+487605^^Y
+"DATA",176.112,33501,0)
+4011719^PAD BISMUTH ANTISEPTIC F#900-6187
+"DATA",176.112,33501,1)
+487606^^Y
+"DATA",176.112,33502,0)
+4011717^PAD TELFA 3IN X 8IN STERILE
+"DATA",176.112,33502,1)
+487607^^Y
+"DATA",176.112,33503,0)
+4011711^PAD,ABDOMIINAL 5 X 9 STERILE
+"DATA",176.112,33503,1)
+487608^^Y
+"DATA",176.112,33504,0)
+4011713^PAD,ABDOMINAL (TENDERSORB) 8X10 STERILE
+"DATA",176.112,33504,1)
+487609^^Y
+"DATA",176.112,33505,0)
+4011709^PAD,ABDOMINAL 10 X 12 NONSTERILE
+"DATA",176.112,33505,1)
+487610^^Y
+"DATA",176.112,33506,0)
+4011710^PAD,ABDOMINAL 12 X 16 NONSTERILE
+"DATA",176.112,33506,1)
+487611^^Y
+"DATA",176.112,33507,0)
+4014407^PAD,ABDOMINAL 5 X 9 NONSTERILE
+"DATA",176.112,33507,1)
+487612^^Y
+"DATA",176.112,33508,0)
+4011708^PAD,ABDOMINAL 7.5 X 8 NONSTERILE
+"DATA",176.112,33508,1)
+487613^^Y
+"DATA",176.112,33509,0)
+4011712^PAD,ABDOMINAL 7.5 X 8 STERILE
+"DATA",176.112,33509,1)
+487614^^Y
+"DATA",176.112,33510,0)
+4011715^PAD,ABDOMINAL 8 X 10 NONSTERILE
+"DATA",176.112,33510,1)
+487615^^Y
+"DATA",176.112,33511,0)
+4011714^PAD,ABDOMINAL 8 X 10 STERILE
+"DATA",176.112,33511,1)
+487616^^Y
+"DATA",176.112,33512,0)
+4014060^PAD,ABDOMINAL 8 X 12 NONSTERILE
+"DATA",176.112,33512,1)
+487617^^Y
+"DATA",176.112,33513,0)
+4014411^PAD,ABDOMINAL MOISTURE BARRIER 5 X 9 NONSTERILE
+"DATA",176.112,33513,1)
+487618^^Y
+"DATA",176.112,33514,0)
+4014408^PAD,ABDOMINAL MOISTURE BARRIER 5 X 9 STERILE
+"DATA",176.112,33514,1)
+487619^^Y
+"DATA",176.112,33515,0)
+4014409^PAD,ABDOMINAL MOISTURE BARRIER 7.5 X 8 NONSTERILE
+"DATA",176.112,33515,1)
+487620^^Y
+"DATA",176.112,33516,0)
+4014412^PAD,ABDOMINAL MOISTURE BARRIER 7.5 X 8 STERILE
+"DATA",176.112,33516,1)
+487621^^Y
+"DATA",176.112,33517,0)
+4014410^PAD,ABDOMINAL MOISTURE BARRIER 8 X 10 NONSTERILE
+"DATA",176.112,33517,1)
+487622^^Y
+"DATA",176.112,33518,0)
+4014413^PAD,ABDOMINAL MOISTURE BARRIER 8 X 10 STERILE
+"DATA",176.112,33518,1)
+487623^^Y
+"DATA",176.112,33519,0)
+4011716^PAD,FOAM 20CM X 29.8CM F#928-5811
+"DATA",176.112,33519,1)
+487624^^Y
+"DATA",176.112,33520,0)
+4012257^PAD,FOAM SELF-ADHERE 20CM X 30CM #1560M
+"DATA",176.112,33520,1)
+487625^^Y
+"DATA",176.112,33521,0)
+4012256^PAD,FOAM SELF-ADHERE 20CM X 30CM #1561H
+"DATA",176.112,33521,1)
+487626^^Y
+"DATA",176.112,33522,0)
+4014884^PAD,OSTOMY PROTEX POWDER MARLEN #112D
+"DATA",176.112,33522,1)
+487627^^Y
+"DATA",176.112,33523,0)
+4014473^PAD,OSTOMY PROTEX POWDER MARLEN #112M
+"DATA",176.112,33523,1)
+487628^^Y
+"DATA",176.112,33524,0)
+4015594^PAD,PERI VERSALON KENDALL #1380
+"DATA",176.112,33524,1)
+487629^^Y
+"DATA",176.112,33525,0)
+4015595^PAD,PERI VERSALON KENDALL #1480
+"DATA",176.112,33525,1)
+487630^^Y
+"DATA",176.112,33526,0)
+4015593^PAD,PERI VERSALON KENDALL #1580
+"DATA",176.112,33526,1)
+487631^^Y
+"DATA",176.112,33527,0)
+4017382^PAD,SLEEVE,PEDIFOAM LARGE
+"DATA",176.112,33527,1)
+487632^^Y
+"DATA",176.112,33528,0)
+4017381^PAD,SLEEVE,PEDIFOAM MEDIUM
+"DATA",176.112,33528,1)
+487633^^Y
+"DATA",176.112,33529,0)
+4017380^PAD,SLEEVE,PEDIFOAM SMALL
+"DATA",176.112,33529,1)
+487634^^Y
+"DATA",176.112,33530,0)
+4012262^PAD.COMBINATION 8 X 10 STERILE
+"DATA",176.112,33530,1)
+487635^^Y
+"DATA",176.112,33531,0)
+4016512^SHARPS DISPOSAL CONTAINER 1 GALLON SIZE
+"DATA",176.112,33531,1)
+487636^^Y
+"DATA",176.112,33532,0)
+4012641^SHARPS DISPOSAL CONTAINER 1 QUART SIZE
+"DATA",176.112,33532,1)
+487637^^Y
+"DATA",176.112,33533,0)
+4016513^SHARPS DISPOSAL CONTAINER 2 GALLON SIZE
+"DATA",176.112,33533,1)
+487638^^Y
+"DATA",176.112,33534,0)
+4016514^SHARPS DISPOSAL CONTAINER 3 GALLON SIZE
+"DATA",176.112,33534,1)
+487639^^Y
+"DATA",176.112,33535,0)
+4016515^SHARPS DISPOSAL CONTAINER 5 GALLON SIZE
+"DATA",176.112,33535,1)
+487640^^Y
+"DATA",176.112,33536,0)
+4012079^SUSPENSORY SUPPORTER
+"DATA",176.112,33536,1)
+487641^^Y
+"DATA",176.112,33537,0)
+4012397^SUSPENSORY WITH LEG STRAPS EXTRA LARGE
+"DATA",176.112,33537,1)
+487642^^Y
+"DATA",176.112,33538,0)
+4012398^SUSPENSORY WITH LEG STRAPS LARGE
+"DATA",176.112,33538,1)
+487643^^Y
+"DATA",176.112,33539,0)
+4012399^SUSPENSORY WITH LEG STRAPS MEDIUM
+"DATA",176.112,33539,1)
+487644^^Y
+"DATA",176.112,33540,0)
+4012396^SUSPENSORY WITHOUT LEG STRAPS EX LARGE
+"DATA",176.112,33540,1)
+487645^^Y
+"DATA",176.112,33541,0)
+4012395^SUSPENSORY WITHOUT LEG STRAPS LARGE
+"DATA",176.112,33541,1)
+487646^^Y
+"DATA",176.112,33542,0)
+4012394^SUSPENSORY WITHOUT LEG STRAPS MEDIUM
+"DATA",176.112,33542,1)
+487647^^Y
+"DATA",176.112,33543,0)
+4014562^UNDERPAD,BED 17.5IN X 24IN FQP #UP-300
+"DATA",176.112,33543,1)
+487648^^Y
+"DATA",176.112,33544,0)
+4014557^UNDERPAD,BED 23IN X 24IN FQP #UP-200
+"DATA",176.112,33544,1)
+487649^^Y
+"DATA",176.112,33545,0)
+4016093^UNDERPAD,BED 23IN X 24IN KENDALL #1038
+"DATA",176.112,33545,1)
+487650^^Y
+"DATA",176.112,33546,0)
+4014396^UNDERPAD,BED 23IN X 36IN
+"DATA",176.112,33546,1)
+487651^^Y
+"DATA",176.112,33547,0)
+4015477^UNDERPAD,BED 23IN X 36IN ALLEGIANCE #50460-236/Z
+"DATA",176.112,33547,1)
+487652^^Y
+"DATA",176.112,33548,0)
+4015960^UNDERPAD,BED 23IN X 36IN ALLEGIANCE #50555-625
+"DATA",176.112,33548,1)
+487653^^Y
+"DATA",176.112,33549,0)
+4014561^UNDERPAD,BED 23IN X 36IN FQP #UP-080
+"DATA",176.112,33549,1)
+487654^^Y
+"DATA",176.112,33550,0)
+4014558^UNDERPAD,BED 23IN X 36IN FQP #UP-150
+"DATA",176.112,33550,1)
+487655^^Y
+"DATA",176.112,33551,0)
+4014910^UNDERPAD,BED 23IN X 36IN KENDALL #988/988B6
+"DATA",176.112,33551,1)
+487656^^Y
+"DATA",176.112,33552,0)
+4015476^UNDERPAD,BED 23IN X 36IN PAPER PAK #100-003-0004
+"DATA",176.112,33552,1)
+487657^^Y
+"DATA",176.112,33553,0)
+4014918^UNDERPAD,BED 23IN X 36IN PAPER PAK #FCP2336/5
+"DATA",176.112,33553,1)
+487658^^Y
+"DATA",176.112,33554,0)
+4015474^UNDERPAD,BED 23IN X 36IN PAPER PAK #FCPP2336/3
+"DATA",176.112,33554,1)
+487659^^Y
+"DATA",176.112,33555,0)
+4016398^UNDERPAD,BED 23IN X 36IN PAPER PAK #UFPP-236
+"DATA",176.112,33555,1)
+487660^^Y
+"DATA",176.112,33556,0)
+4014397^UNDERPAD,BED 30IN X 30IN
+"DATA",176.112,33556,1)
+487661^^Y
+"DATA",176.112,33557,0)
+4015478^UNDERPAD,BED 30IN X 30IN ALLEGIANCE #50460-300/Z
+"DATA",176.112,33557,1)
+487662^^Y
+"DATA",176.112,33558,0)
+4014559^UNDERPAD,BED 30IN X 30IN FQP #UP-100
+"DATA",176.112,33558,1)
+487663^^Y
+"DATA",176.112,33559,0)
+4015473^UNDERPAD,BED 30IN X 30IN PAPER PAK #FCP3030/5
+"DATA",176.112,33559,1)
+487664^^Y
+"DATA",176.112,33560,0)
+4014398^UNDERPAD,BED 30IN X 36IN
+"DATA",176.112,33560,1)
+487665^^Y
+"DATA",176.112,33561,0)
+4015479^UNDERPAD,BED 30IN X 36IN ALLEGIANCE #50460-360/Z
+"DATA",176.112,33561,1)
+487666^^Y
+"DATA",176.112,33562,0)
+4015475^UNDERPAD,BED 30IN X 36IN PAPER PAK #FCPP3036/3
+"DATA",176.112,33562,1)
+487667^^Y
+"DATA",176.112,33563,0)
+4016397^UNDERPAD,BED 30IN X 36IN PAPER PAK #UFFP-360
+"DATA",176.112,33563,1)
+487668^^Y
+"DATA",176.112,33564,0)
+4014560^UNDERPAD,BED 34IN X 36IN FQP #UP-050
+"DATA",176.112,33564,1)
+487669^^Y
+"DATA",176.112,33565,0)
+4016399^UNDERPAD,BED 36IN X 36IN PAPER PAK #UFPP-366
+"DATA",176.112,33565,1)
+487670^^Y
+"DATA",176.112,33566,0)
+4012260^UNDERPAD,BED LARGE
+"DATA",176.112,33566,1)
+487671^^Y
+"DATA",176.112,33567,0)
+4012261^UNDERPAD,BED LARGE EXTRA ABSORBENT
+"DATA",176.112,33567,1)
+487672^^Y
+"DATA",176.112,33568,0)
+4012259^UNDERPAD,BED MEDIUM
+"DATA",176.112,33568,1)
+487673^^Y
+"DATA",176.112,33569,0)
+4015134^UNDERPAD,BED,WASHABLE 34IN X 36IN
+"DATA",176.112,33569,1)
+487674^^Y
+"DATA",176.112,33570,0)
+4014322^UNDERPAD,BED,WASHABLE 34IN X 36IN SOFNIT300 MSC#015050
+"DATA",176.112,33570,1)
+487675^^Y
+"DATA",176.112,33571,0)
+4014399^UNDERPAD,WASHABLE 23IN X 36IN
+"DATA",176.112,33571,1)
+487676^^Y
+"DATA",176.112,33572,0)
+4011789^URINAL INCONTINENT BOTTOM URO-TEX SL32
+"DATA",176.112,33572,1)
+487677^^Y
+"DATA",176.112,33573,0)
+4011770^URINAL MALE INCONTINENCE LATEX UR0-TEX
+"DATA",176.112,33573,1)
+487678^^Y
+"DATA",176.112,33574,0)
+4012039^URINAL,FEMALE PLASTIC REUSABLE
+"DATA",176.112,33574,1)
+487679^^Y
+"DATA",176.112,33575,0)
+4012037^URINAL,MALE PLASTIC DISPOSABLE
+"DATA",176.112,33575,1)
+487680^^Y
+"DATA",176.112,33576,0)
+4012038^URINAL,MALE PLASTIC REUSABLE
+"DATA",176.112,33576,1)
+487681^^Y
+"DATA",176.112,33577,0)
+4011766^URINARY CATH SYSTEM 14FR #SONK-141-3
+"DATA",176.112,33577,1)
+487682^^Y
+"DATA",176.112,33578,0)
+4012195^URINARY DRAINABLE UNIT 2L BAG VENTED
+"DATA",176.112,33578,1)
+487683^^Y
+"DATA",176.112,33579,0)
+4012218^URINARY DRAINAGE BAG BARD #153504
+"DATA",176.112,33579,1)
+487684^^Y
+"DATA",176.112,33580,0)
+4012219^URINARY DRAINAGE BAG BARD #153509
+"DATA",176.112,33580,1)
+487685^^Y
+"DATA",176.112,33581,0)
+4012200^URINARY DRAINAGE BAG BARD #154002
+"DATA",176.112,33581,1)
+487686^^Y
+"DATA",176.112,33582,0)
+4014906^URINARY DRAINAGE BAG BARD #154102
+"DATA",176.112,33582,1)
+487687^^Y
+"DATA",176.112,33583,0)
+4014405^URINARY DRAINAGE BAG LSL#1450VA
+"DATA",176.112,33583,1)
+487688^^Y
+"DATA",176.112,33584,0)
+4012355^URINARY DRAINAGE SET,SUR-FIT C#0270-60
+"DATA",176.112,33584,1)
+487689^^Y
+"DATA",176.112,33585,0)
+4012225^URINARY DRAINAGE SYSTEM H#9839
+"DATA",176.112,33585,1)
+487690^^Y
+"DATA",176.112,33586,0)
+4012217^URINARY DRAINAGE UNIT,9/32IN MONO-FLO,KENDALL #3057
+"DATA",176.112,33586,1)
+487691^^Y
+"DATA",176.112,33587,0)
+4012338^URINARY NIGHT DRAINAGE BOTTLE
+"DATA",176.112,33587,1)
+487692^^Y
+"DATA",176.112,33588,0)
+4012064^WINGS BELTLESS UNDERGARMENT 9IN X 20IN #6592
+"DATA",176.112,33588,1)
+487693^^Y
+"DATA",176.112,33589,0)
+4012057^WINGS CONTOURED INCONTINENT BRIEF LARGE
+"DATA",176.112,33589,1)
+487694^^Y
+"DATA",176.112,33590,0)
+4012062^WINGS CONTOURED INCONTINENT BRIEF MEDIUM
+"DATA",176.112,33590,1)
+487695^^Y
+"DATA",176.112,33591,0)
+4013925^WINGS MAXICARE UNDERGARMENT 9IN X 20IN #181B30
+"DATA",176.112,33591,1)
+487696^^Y
+"DATA",176.112,33592,0)
+4014501^WINGS MAXICARE UNDERGARMENT ONE SIZE FITS ALL KEN#1058
+"DATA",176.112,33592,1)
+487697^^Y
+"DATA",176.112,33593,0)
+4014500^WINGS MAXICARE UNDERGARMENT ONE SIZE FITS ALL KEN#171B10
+"DATA",176.112,33593,1)
+487698^^Y
+"DATA",176.112,33594,0)
+4008209^ACCU-BLOC PERIFIX CONTINUOUS EPIDURAL ANESTHESIA
+"DATA",176.112,33594,1)
+487700^^Y
+"DATA",176.112,33595,0)
+4004277^ACCU-BLOC PERIFIX CUSTOM EPIDURAL ANESTHESIA
+"DATA",176.112,33595,1)
+487701^^Y
+"DATA",176.112,33596,0)
+4004401^ACCU-BLOC PLEXUFIX BRACHIAL PLEXUS ANESTHESIA KIT
+"DATA",176.112,33596,1)
+487702^^Y
+"DATA",176.112,33597,0)
+4008838^APPLICATOR 3 INCH POINTED
+"DATA",176.112,33597,1)
+487713^^Y
+"DATA",176.112,33598,0)
+4014469^APPLICATOR,RAYON TIP NONSTERILE
+"DATA",176.112,33598,1)
+487716^^Y
+"DATA",176.112,33599,0)
+4014468^APPLICATOR,RAYON TIP PROCTO NONSTERILE
+"DATA",176.112,33599,1)
+487717^^Y
+"DATA",176.112,33600,0)
+4014471^APPLICATOR,RAYON TIP PROCTO STERILE
+"DATA",176.112,33600,1)
+487718^^Y
+"DATA",176.112,33601,0)
+4012197^BAG,BEDSIDE DRAIN KIT MARLEN
+"DATA",176.112,33601,1)
+487719^^Y
+"DATA",176.112,33602,0)
+4012212^BAG,BEDSIDE,CURITY 2000ML,W/O VALVE KENDALL #3057
+"DATA",176.112,33602,1)
+487720^^Y
+"DATA",176.112,33603,0)
+4012237^BAG,BEDSIDE,KENDALL #6206
+"DATA",176.112,33603,1)
+487721^^Y
+"DATA",176.112,33604,0)
+4012213^BAG,ILEO-APPLIANCE,CONVEX 3/4IN,PT603MCX
+"DATA",176.112,33604,1)
+487722^^Y
+"DATA",176.112,33605,0)
+4012238^BAG,LEG 32OZ STRAIGHT PORT SIERRA #68001
+"DATA",176.112,33605,1)
+487723^^Y
+"DATA",176.112,33606,0)
+4014705^BAG,LEG ALPINE #68002L
+"DATA",176.112,33606,1)
+487724^^Y
+"DATA",176.112,33607,0)
+4016122^BAG,LEG ALPINE #68002R
+"DATA",176.112,33607,1)
+487725^^Y
+"DATA",176.112,33608,0)
+4016216^BAG,LEG ALPINE #68003L
+"DATA",176.112,33608,1)
+487726^^Y
+"DATA",176.112,33609,0)
+4016217^BAG,LEG ALPINE #68003R
+"DATA",176.112,33609,1)
+487727^^Y
+"DATA",176.112,33610,0)
+4016213^BAG,LEG ALPINE #68004
+"DATA",176.112,33610,1)
+487728^^Y
+"DATA",176.112,33611,0)
+4016212^BAG,LEG ALPINE #68005
+"DATA",176.112,33611,1)
+487729^^Y
+"DATA",176.112,33612,0)
+4016218^BAG,LEG ALPINE #68007
+"DATA",176.112,33612,1)
+487730^^Y
+"DATA",176.112,33613,0)
+4016219^BAG,LEG ALPINE #68008L
+"DATA",176.112,33613,1)
+487731^^Y
+"DATA",176.112,33614,0)
+4016220^BAG,LEG ALPINE #68008R
+"DATA",176.112,33614,1)
+487732^^Y
+"DATA",176.112,33615,0)
+4016215^BAG,LEG ALPINE #68009L
+"DATA",176.112,33615,1)
+487733^^Y
+"DATA",176.112,33616,0)
+4016214^BAG,LEG ALPINE #68009R
+"DATA",176.112,33616,1)
+487734^^Y
+"DATA",176.112,33617,0)
+4014978^BAG,LEG ALPINE SIERRA #68003
+"DATA",176.112,33617,1)
+487735^^Y
+"DATA",176.112,33618,0)
+4016208^BAG,LEG ALPINE SPORT #68006
+"DATA",176.112,33618,1)
+487736^^Y
+"DATA",176.112,33619,0)
+4016209^BAG,LEG ALPINE SPORT #68006L
+"DATA",176.112,33619,1)
+487737^^Y
+"DATA",176.112,33620,0)
+4016211^BAG,LEG ALPINE SPORT #68006R
+"DATA",176.112,33620,1)
+487738^^Y
+"DATA",176.112,33621,0)
+4013880^BAG,LEG BARD #150101
+"DATA",176.112,33621,1)
+487739^^Y
+"DATA",176.112,33622,0)
+4013879^BAG,LEG BARD #150102
+"DATA",176.112,33622,1)
+487740^^Y
+"DATA",176.112,33623,0)
+4012243^BAG,LEG BARD #150103,32 OZ
+"DATA",176.112,33623,1)
+487741^^Y
+"DATA",176.112,33624,0)
+4013881^BAG,LEG BARD #150319
+"DATA",176.112,33624,1)
+487742^^Y
+"DATA",176.112,33625,0)
+4013876^BAG,LEG BARD #150419
+"DATA",176.112,33625,1)
+487743^^Y
+"DATA",176.112,33626,0)
+4013875^BAG,LEG BARD #150432
+"DATA",176.112,33626,1)
+487744^^Y
+"DATA",176.112,33627,0)
+4014223^BAG,LEG BARD #150832,32 0Z
+"DATA",176.112,33627,1)
+487745^^Y
+"DATA",176.112,33628,0)
+4014273^BAG,LEG BARD #150832,32 OZ
+"DATA",176.112,33628,1)
+487746^^Y
+"DATA",176.112,33629,0)
+4015075^BAG,LEG BARD #150919
+"DATA",176.112,33629,1)
+487747^^Y
+"DATA",176.112,33630,0)
+4013878^BAG,LEG BARD #4A4173
+"DATA",176.112,33630,1)
+487748^^Y
+"DATA",176.112,33631,0)
+4013877^BAG,LEG BARD #4A4174
+"DATA",176.112,33631,1)
+487749^^Y
+"DATA",176.112,33632,0)
+4012240^BAG,LEG CONVEEN #5170
+"DATA",176.112,33632,1)
+487750^^Y
+"DATA",176.112,33633,0)
+4012241^BAG,LEG CONVEEN #5171
+"DATA",176.112,33633,1)
+487751^^Y
+"DATA",176.112,33634,0)
+4012242^BAG,LEG CONVEEN #5174
+"DATA",176.112,33634,1)
+487752^^Y
+"DATA",176.112,33635,0)
+4012198^BAG,LEG DRAIN KIT MARLEN
+"DATA",176.112,33635,1)
+487753^^Y
+"DATA",176.112,33636,0)
+4011529^BAG,LEG H#9805
+"DATA",176.112,33636,1)
+487754^^Y
+"DATA",176.112,33637,0)
+4011530^BAG,LEG H#9814
+"DATA",176.112,33637,1)
+487755^^Y
+"DATA",176.112,33638,0)
+4012031^BAG,LEG LARGE
+"DATA",176.112,33638,1)
+487756^^Y
+"DATA",176.112,33639,0)
+4012210^BAG,LEG LARGE 32 OZ (DOVER)
+"DATA",176.112,33639,1)
+487757^^Y
+"DATA",176.112,33640,0)
+4012216^BAG,LEG LARGE 32 OZ (RUSCH #4520-32)
+"DATA",176.112,33640,1)
+487758^^Y
+"DATA",176.112,33641,0)
+4012248^BAG,LEG LARGE 32 OZ (RUSCH #4527-32)
+"DATA",176.112,33641,1)
+487759^^Y
+"DATA",176.112,33642,0)
+4012221^BAG,LEG LARGE CONSOLIDATED #0932
+"DATA",176.112,33642,1)
+487760^^Y
+"DATA",176.112,33643,0)
+4014835^BAG,LEG LARGE KEN#145516
+"DATA",176.112,33643,1)
+487761^^Y
+"DATA",176.112,33644,0)
+4016555^BAG,LEG LARGE MEDLINE #DYND12578
+"DATA",176.112,33644,1)
+487762^^Y
+"DATA",176.112,33645,0)
+4011531^BAG,LEG LATEX
+"DATA",176.112,33645,1)
+487763^^Y
+"DATA",176.112,33646,0)
+4014331^BAG,LEG LATEX REUSABLE UROCARE #8010
+"DATA",176.112,33646,1)
+487764^^Y
+"DATA",176.112,33647,0)
+4012206^BAG,LEG LATEX REUSABLE UROCARE #8026
+"DATA",176.112,33647,1)
+487765^^Y
+"DATA",176.112,33648,0)
+4014332^BAG,LEG LATEX REUSABLE UROCARE #9010
+"DATA",176.112,33648,1)
+487766^^Y
+"DATA",176.112,33649,0)
+4012205^BAG,LEG LATEX REUSABLE UROCARE #9026
+"DATA",176.112,33649,1)
+487767^^Y
+"DATA",176.112,33650,0)
+4012203^BAG,LEG LATEX REUSABLE UROCARE #9032
+"DATA",176.112,33650,1)
+487768^^Y
+"DATA",176.112,33651,0)
+4012204^BAG,LEG LATEX REUSABLE UROCARE #9044
+"DATA",176.112,33651,1)
+487769^^Y
+"DATA",176.112,33652,0)
+4016863^BAG,LEG LATEX URO-TEX MENTOR #4157
+"DATA",176.112,33652,1)
+487770^^Y
+"DATA",176.112,33653,0)
+4012030^BAG,LEG MEDIUM
+"DATA",176.112,33653,1)
+487771^^Y
+"DATA",176.112,33654,0)
+4012220^BAG,LEG MEDIUM CONSOLIDATED #0936
+"DATA",176.112,33654,1)
+487772^^Y
+"DATA",176.112,33655,0)
+4014834^BAG,LEG MEDIUM KEN#145514
+"DATA",176.112,33655,1)
+487773^^Y
+"DATA",176.112,33656,0)
+4016554^BAG,LEG MEDIUM MEDLINE #DYND12574
+"DATA",176.112,33656,1)
+487774^^Y
+"DATA",176.112,33657,0)
+4012196^BAG,LEG MEDIUM STERILE DISPOSABLE
+"DATA",176.112,33657,1)
+487775^^Y
+"DATA",176.112,33658,0)
+4017149^BAG,LEG MEDIUM UROCARE #8018
+"DATA",176.112,33658,1)
+487776^^Y
+"DATA",176.112,33659,0)
+4014853^BAG,LEG MEDLINE #DYND12451
+"DATA",176.112,33659,1)
+487777^^Y
+"DATA",176.112,33660,0)
+4014854^BAG,LEG MEDLINE #DYND12452
+"DATA",176.112,33660,1)
+487778^^Y
+"DATA",176.112,33661,0)
+4014855^BAG,LEG MEDLINE #DYND12456
+"DATA",176.112,33661,1)
+487779^^Y
+"DATA",176.112,33662,0)
+4014856^BAG,LEG MEDLINE #DYND12457
+"DATA",176.112,33662,1)
+487780^^Y
+"DATA",176.112,33663,0)
+4014857^BAG,LEG MEDLINE #DYND12462
+"DATA",176.112,33663,1)
+487781^^Y
+"DATA",176.112,33664,0)
+4014858^BAG,LEG MEDLINE #DYND12467
+"DATA",176.112,33664,1)
+487782^^Y
+"DATA",176.112,33665,0)
+4013806^BAG,LEG MMG #A3032
+"DATA",176.112,33665,1)
+487783^^Y
+"DATA",176.112,33666,0)
+4012222^BAG,LEG RUBBER REUSABLE 32OZ LONG KIT
+"DATA",176.112,33666,1)
+487784^^Y
+"DATA",176.112,33667,0)
+4011726^BAG,TUBE FEEDING F#072-3412
+"DATA",176.112,33667,1)
+487785^^Y
+"DATA",176.112,33668,0)
+4011725^BAG,TUBE FEEDING GRAVITY F#481-2049
+"DATA",176.112,33668,1)
+487786^^Y
+"DATA",176.112,33669,0)
+4016463^BAG,TUBE FEEDING TOP-FILL W/PUMP SET ROSS #71
+"DATA",176.112,33669,1)
+487787^^Y
+"DATA",176.112,33670,0)
+4012229^BAG,TUBE FEEDING,1200ML CONSOLIDATED #2049
+"DATA",176.112,33670,1)
+487788^^Y
+"DATA",176.112,33671,0)
+4012215^BAG,TUBE FEEDING,500ML POLAR,CORPAK #20-2513
+"DATA",176.112,33671,1)
+487789^^Y
+"DATA",176.112,33672,0)
+4014423^BAG,URINARY DRAINAGE 2000CC LSL#1450VA
+"DATA",176.112,33672,1)
+487790^^Y
+"DATA",176.112,33673,0)
+4015469^BAG,URINARY DRAINAGE 4000ML KEN#6261
+"DATA",176.112,33673,1)
+487791^^Y
+"DATA",176.112,33674,0)
+4015468^BAG,URINARY DRAINAGE 4000ML KEN#KB2589
+"DATA",176.112,33674,1)
+487792^^Y
+"DATA",176.112,33675,0)
+4014425^BAG,URINARY DRAINAGE CLOSED 16FR LSL#1616
+"DATA",176.112,33675,1)
+487793^^Y
+"DATA",176.112,33676,0)
+4012239^BAG,URINARY DRAINAGE MEDLINE #DYND15202
+"DATA",176.112,33676,1)
+487794^^Y
+"DATA",176.112,33677,0)
+4014424^BAG,URINARY DRAINAGE W/METER LSL#1460
+"DATA",176.112,33677,1)
+487795^^Y
+"DATA",176.112,33678,0)
+4013460^BAG,URINARY DRAINAGE,BEDSIDE,CLOSED
+"DATA",176.112,33678,1)
+487796^^Y
+"DATA",176.112,33679,0)
+4012028^BAG,URINE,BEDSIDE F#036-0309
+"DATA",176.112,33679,1)
+487797^^Y
+"DATA",176.112,33680,0)
+4012029^BAG,URINE,BEDSIDE F#074-6600
+"DATA",176.112,33680,1)
+487798^^Y
+"DATA",176.112,33681,0)
+4012027^BAG,URINE,BEDSIDE F#869-5062
+"DATA",176.112,33681,1)
+487799^^Y
+"DATA",176.112,33682,0)
+4014337^BANDAGE 1IN X 3IN
+"DATA",176.112,33682,1)
+487800^^Y
+"DATA",176.112,33683,0)
+4014335^BANDAGE 3/4IN X 3IN
+"DATA",176.112,33683,1)
+487801^^Y
+"DATA",176.112,33684,0)
+4014336^BANDAGE 3/8IN X 1.5IN
+"DATA",176.112,33684,1)
+487802^^Y
+"DATA",176.112,33685,0)
+4014773^BANDAGE TUBULAR ELASTIC NET SZ 0 X 25YD
+"DATA",176.112,33685,1)
+487803^^Y
+"DATA",176.112,33686,0)
+4008811^BANDAGE TUBULAR ELASTIC NET SZ 0.5 X25YD
+"DATA",176.112,33686,1)
+487804^^Y
+"DATA",176.112,33687,0)
+4008812^BANDAGE TUBULAR ELASTIC NET SZ 1 X 25YD
+"DATA",176.112,33687,1)
+487805^^Y
+"DATA",176.112,33688,0)
+4008822^BANDAGE TUBULAR ELASTIC NET SZ 10 X 25YD
+"DATA",176.112,33688,1)
+487806^^Y
+"DATA",176.112,33689,0)
+4008823^BANDAGE TUBULAR ELASTIC NET SZ 11 X 25YD
+"DATA",176.112,33689,1)
+487807^^Y
+"DATA",176.112,33690,0)
+4016873^BANDAGE TUBULAR ELASTIC NET SZ 12 X 25YD
+"DATA",176.112,33690,1)
+487808^^Y
+"DATA",176.112,33691,0)
+4008813^BANDAGE TUBULAR ELASTIC NET SZ 2 X 25YD
+"DATA",176.112,33691,1)
+487809^^Y
+"DATA",176.112,33692,0)
+4014400^BANDAGE TUBULAR ELASTIC NET SZ 22 X 25YD
+"DATA",176.112,33692,1)
+487810^^Y
+"DATA",176.112,33693,0)
+4008814^BANDAGE TUBULAR ELASTIC NET SZ 3 X 25YD
+"DATA",176.112,33693,1)
+487811^^Y
+"DATA",176.112,33694,0)
+4008815^BANDAGE TUBULAR ELASTIC NET SZ 4 X 25YD
+"DATA",176.112,33694,1)
+487812^^Y
+"DATA",176.112,33695,0)
+4008816^BANDAGE TUBULAR ELASTIC NET SZ 5 X 25YD
+"DATA",176.112,33695,1)
+487813^^Y
+"DATA",176.112,33696,0)
+4008817^BANDAGE TUBULAR ELASTIC NET SZ 5.5 X25YD
+"DATA",176.112,33696,1)
+487814^^Y
+"DATA",176.112,33697,0)
+4008818^BANDAGE TUBULAR ELASTIC NET SZ 6 X 25YD
+"DATA",176.112,33697,1)
+487815^^Y
+"DATA",176.112,33698,0)
+4008819^BANDAGE TUBULAR ELASTIC NET SZ 7 X 25YD
+"DATA",176.112,33698,1)
+487816^^Y
+"DATA",176.112,33699,0)
+4008820^BANDAGE TUBULAR ELASTIC NET SZ 8 X 25YD
+"DATA",176.112,33699,1)
+487817^^Y
+"DATA",176.112,33700,0)
+4008821^BANDAGE TUBULAR ELASTIC NET SZ 9 X 25YD
+"DATA",176.112,33700,1)
+487818^^Y
+"DATA",176.112,33701,0)
+4016865^BANDAGE TUBULAR ELASTIC SZ B C#151436
+"DATA",176.112,33701,1)
+487819^^Y
+"DATA",176.112,33702,0)
+4016866^BANDAGE TUBULAR ELASTIC SZ D C#151437
+"DATA",176.112,33702,1)
+487820^^Y
+"DATA",176.112,33703,0)
+4016864^BANDAGE TUBULAR ELASTIC SZ E C#151434
+"DATA",176.112,33703,1)
+487821^^Y
+"DATA",176.112,33704,0)
+4016867^BANDAGE TUBULAR ELASTIC SZ F C#151438
+"DATA",176.112,33704,1)
+487822^^Y
+"DATA",176.112,33705,0)
+4016868^BANDAGE TUBULAR ELASTIC SZ G C#151439
+"DATA",176.112,33705,1)
+487823^^Y
+"DATA",176.112,33706,0)
+4014516^BANDAGE,ADHESIVE FLEXIBLE FABRIC 1IN X 3IN
+"DATA",176.112,33706,1)
+487824^^Y
+"DATA",176.112,33707,0)
+4014517^BANDAGE,ADHESIVE FLEXIBLE FABRIC 2IN X 3-1/2IN
+"DATA",176.112,33707,1)
+487825^^Y
+"DATA",176.112,33708,0)
+4014515^BANDAGE,ADHESIVE FLEXIBLE FABRIC 3/4IN X 3IN
+"DATA",176.112,33708,1)
+487826^^Y
+"DATA",176.112,33709,0)
+4014519^BANDAGE,ADHESIVE PLASTIC 1IN X 3IN
+"DATA",176.112,33709,1)
+487827^^Y
+"DATA",176.112,33710,0)
+4014518^BANDAGE,ADHESIVE PLASTIC 3/4IN X 3IN
+"DATA",176.112,33710,1)
+487828^^Y
+"DATA",176.112,33711,0)
+4014522^BANDAGE,ADHESIVE SHEER 1IN X 3IN
+"DATA",176.112,33711,1)
+487829^^Y
+"DATA",176.112,33712,0)
+4014520^BANDAGE,ADHESIVE SHEER 3/4IN X 3IN
+"DATA",176.112,33712,1)
+487830^^Y
+"DATA",176.112,33713,0)
+4014521^BANDAGE,ADHESIVE SHEER 7/8IN SPOT
+"DATA",176.112,33713,1)
+487831^^Y
+"DATA",176.112,33714,0)
+4008835^BANDAGE,ELASTIC 1.5IN X 5YD (COBAN)
+"DATA",176.112,33714,1)
+487832^^Y
+"DATA",176.112,33715,0)
+4008831^BANDAGE,ELASTIC 1IN X 5YD (COBAN)
+"DATA",176.112,33715,1)
+487833^^Y
+"DATA",176.112,33716,0)
+4013462^BANDAGE,ELASTIC 1IN X 5YD,SELF-ADHERING
+"DATA",176.112,33716,1)
+487834^^Y
+"DATA",176.112,33717,0)
+4008827^BANDAGE,ELASTIC 2IN F#721-9790
+"DATA",176.112,33717,1)
+487835^^Y
+"DATA",176.112,33718,0)
+4014478^BANDAGE,ELASTIC 2IN X 5YD
+"DATA",176.112,33718,1)
+487836^^Y
+"DATA",176.112,33719,0)
+4008832^BANDAGE,ELASTIC 2IN X 5YD (COBAN)
+"DATA",176.112,33719,1)
+487837^^Y
+"DATA",176.112,33720,0)
+4013463^BANDAGE,ELASTIC 2IN X 5YD,SELF-ADHERING
+"DATA",176.112,33720,1)
+487838^^Y
+"DATA",176.112,33721,0)
+4008806^BANDAGE,ELASTIC 3IN F#721-9793
+"DATA",176.112,33721,1)
+487839^^Y
+"DATA",176.112,33722,0)
+4014479^BANDAGE,ELASTIC 3IN X 5YD
+"DATA",176.112,33722,1)
+487840^^Y
+"DATA",176.112,33723,0)
+4008833^BANDAGE,ELASTIC 3IN X 5YD (COBAN)
+"DATA",176.112,33723,1)
+487841^^Y
+"DATA",176.112,33724,0)
+4014440^BANDAGE,ELASTIC 3IN X 5YD (COBAN) STERILE
+"DATA",176.112,33724,1)
+487842^^Y
+"DATA",176.112,33725,0)
+4013464^BANDAGE,ELASTIC 3IN X 5YD,SELF-ADHERING
+"DATA",176.112,33725,1)
+487843^^Y
+"DATA",176.112,33726,0)
+4008807^BANDAGE,ELASTIC 4IN F#721-9792
+"DATA",176.112,33726,1)
+487844^^Y
+"DATA",176.112,33727,0)
+4008809^BANDAGE,ELASTIC 4IN F#721-9821
+"DATA",176.112,33727,1)
+487845^^Y
+"DATA",176.112,33728,0)
+4014480^BANDAGE,ELASTIC 4IN X 5YD
+"DATA",176.112,33728,1)
+487846^^Y
+"DATA",176.112,33729,0)
+4008828^BANDAGE,ELASTIC 4IN X 5YD (COBAN)
+"DATA",176.112,33729,1)
+487847^^Y
+"DATA",176.112,33730,0)
+4014441^BANDAGE,ELASTIC 4IN X 5YD (COBAN) STERILE
+"DATA",176.112,33730,1)
+487848^^Y
+"DATA",176.112,33731,0)
+4013465^BANDAGE,ELASTIC 4IN X 5YD,SELF-ADHERING
+"DATA",176.112,33731,1)
+487849^^Y
+"DATA",176.112,33732,0)
+4008808^BANDAGE,ELASTIC 6IN F#721-9791
+"DATA",176.112,33732,1)
+487850^^Y
+"DATA",176.112,33733,0)
+4008810^BANDAGE,ELASTIC 6IN F#721-9822
+"DATA",176.112,33733,1)
+487851^^Y
+"DATA",176.112,33734,0)
+4014481^BANDAGE,ELASTIC 6IN X 5YD
+"DATA",176.112,33734,1)
+487852^^Y
+"DATA",176.112,33735,0)
+4008834^BANDAGE,ELASTIC 6IN X 5YD (COBAN)
+"DATA",176.112,33735,1)
+487853^^Y
+"DATA",176.112,33736,0)
+4014442^BANDAGE,ELASTIC 6IN X 5YD (COBAN) STERILE
+"DATA",176.112,33736,1)
+487854^^Y
+"DATA",176.112,33737,0)
+4014474^BANDAGE,ELASTIC MATRIX 2IN X 5YD MDS#087002
+"DATA",176.112,33737,1)
+487855^^Y
+"DATA",176.112,33738,0)
+4014475^BANDAGE,ELASTIC MATRIX 3IN X 5YD MDS#087003
+"DATA",176.112,33738,1)
+487856^^Y
+"DATA",176.112,33739,0)
+4014476^BANDAGE,ELASTIC MATRIX 4IN X 5YD MDS#087004
+"DATA",176.112,33739,1)
+487857^^Y
+"DATA",176.112,33740,0)
+4014477^BANDAGE,ELASTIC MATRIX 6IN X 5YD MDS#087004
+"DATA",176.112,33740,1)
+487858^^Y
+"DATA",176.112,33741,0)
+4014488^BANDAGE,ELASTIC MATRIX 6IN X 5YD MDS#087006
+"DATA",176.112,33741,1)
+487859^^Y
+"DATA",176.112,33742,0)
+4008829^BANDAGE,ELASTIC,ADHESIVE 3IN X 5YD
+"DATA",176.112,33742,1)
+487860^^Y
+"DATA",176.112,33743,0)
+4014418^BANDAGE,GAUZE ELASTIC 1IN X 4.1YD NONSTERILE
+"DATA",176.112,33743,1)
+487861^^Y
+"DATA",176.112,33744,0)
+4014419^BANDAGE,GAUZE ELASTIC 2IN X 4.1YD NONSTERILE
+"DATA",176.112,33744,1)
+487862^^Y
+"DATA",176.112,33745,0)
+4014414^BANDAGE,GAUZE ELASTIC 2IN X 4.1YD STERILE
+"DATA",176.112,33745,1)
+487863^^Y
+"DATA",176.112,33746,0)
+4014420^BANDAGE,GAUZE ELASTIC 3IN X 4.1YD NONSTERILE
+"DATA",176.112,33746,1)
+487864^^Y
+"DATA",176.112,33747,0)
+4014415^BANDAGE,GAUZE ELASTIC 3IN X 4.1YD STERILE
+"DATA",176.112,33747,1)
+487865^^Y
+"DATA",176.112,33748,0)
+4014421^BANDAGE,GAUZE ELASTIC 4IN X 4.1YD NONSTERILE
+"DATA",176.112,33748,1)
+487866^^Y
+"DATA",176.112,33749,0)
+4014416^BANDAGE,GAUZE ELASTIC 4IN X 4.1YD STERILE
+"DATA",176.112,33749,1)
+487867^^Y
+"DATA",176.112,33750,0)
+4014422^BANDAGE,GAUZE ELASTIC 6IN X 4.1YD NONSTERILE
+"DATA",176.112,33750,1)
+487868^^Y
+"DATA",176.112,33751,0)
+4014417^BANDAGE,GAUZE ELASTIC 6IN X 4.1YD STERILE
+"DATA",176.112,33751,1)
+487869^^Y
+"DATA",176.112,33752,0)
+4015411^BANDAGE,HIGH COMPRESSION 4IN X 3.2YD C#650947
+"DATA",176.112,33752,1)
+487870^^Y
+"DATA",176.112,33753,0)
+4014804^BANDAGE,KERLIX LITE 2IN X 3.5YD STERILE KEN#8072
+"DATA",176.112,33753,1)
+487871^^Y
+"DATA",176.112,33754,0)
+4014808^BANDAGE,KERLIX LITE 2IN X 4.1YD NONSTERILE KEN#8052
+"DATA",176.112,33754,1)
+487872^^Y
+"DATA",176.112,33755,0)
+4014805^BANDAGE,KERLIX LITE 3IN X 3.5YD STERILE KEN#8073
+"DATA",176.112,33755,1)
+487873^^Y
+"DATA",176.112,33756,0)
+4014809^BANDAGE,KERLIX LITE 3IN X 4.1YD NONSTERILE KEN#8053
+"DATA",176.112,33756,1)
+487874^^Y
+"DATA",176.112,33757,0)
+4016642^BANDAGE,KERLIX LITE 3IN X 4.1YD STERILE KEN#8073
+"DATA",176.112,33757,1)
+487875^^Y
+"DATA",176.112,33758,0)
+4014810^BANDAGE,KERLIX LITE 4IN X 4.1YD NOSTERILE KEN#8054
+"DATA",176.112,33758,1)
+487876^^Y
+"DATA",176.112,33759,0)
+4014806^BANDAGE,KERLIX LITE 4IN X 4.1YD STERILE KEN#8074
+"DATA",176.112,33759,1)
+487877^^Y
+"DATA",176.112,33760,0)
+4014811^BANDAGE,KERLIX LITE 6IN X 4.1YD NONSTERILE KEN#8056
+"DATA",176.112,33760,1)
+487878^^Y
+"DATA",176.112,33761,0)
+4014807^BANDAGE,KERLIX LITE 6IN X 4.1YD STERILE KEN#8076
+"DATA",176.112,33761,1)
+487879^^Y
+"DATA",176.112,33762,0)
+4008836^BANDAGE,PROFORE FOUR LAYER SYSTEM,S-N #66000016
+"DATA",176.112,33762,1)
+487880^^Y
+"DATA",176.112,33763,0)
+4014818^BANDAGE,STA-TITE 2IN X 4.5YD NONSTERILE KEN#6602
+"DATA",176.112,33763,1)
+487881^^Y
+"DATA",176.112,33764,0)
+4014812^BANDAGE,STA-TITE 2IN X 4.5YD STERILE KEN#6612
+"DATA",176.112,33764,1)
+487882^^Y
+"DATA",176.112,33765,0)
+4014819^BANDAGE,STA-TITE 3IN X 4.5YD NONSTERILE KEN#6603
+"DATA",176.112,33765,1)
+487883^^Y
+"DATA",176.112,33766,0)
+4014815^BANDAGE,STA-TITE 3IN X 4.5YD STERILE KEN#6613
+"DATA",176.112,33766,1)
+487884^^Y
+"DATA",176.112,33767,0)
+4014820^BANDAGE,STA-TITE 4IN X 4.5YD NONSTERILE KEN#6604
+"DATA",176.112,33767,1)
+487885^^Y
+"DATA",176.112,33768,0)
+4014816^BANDAGE,STA-TITE 4IN X 4.5YD STERILE KEN#6614
+"DATA",176.112,33768,1)
+487886^^Y
+"DATA",176.112,33769,0)
+4014821^BANDAGE,STA-TITE 6IN X 4.5YD NONSTERILE KEN#6606
+"DATA",176.112,33769,1)
+487887^^Y
+"DATA",176.112,33770,0)
+4014817^BANDAGE,STA-TITE 6IN X 4.5YD STERILE KEN#6616
+"DATA",176.112,33770,1)
+487888^^Y
+"DATA",176.112,33771,0)
+4014638^BANDAGE,STERI-STRIP
+"DATA",176.112,33771,1)
+487889^^Y
+"DATA",176.112,33772,0)
+4015049^BANDAGE,STERI-STRIP 1/2IN X 4IN
+"DATA",176.112,33772,1)
+487890^^Y
+"DATA",176.112,33773,0)
+4015046^BANDAGE,STERI-STRIP 1/4IN X 1-1/2IN
+"DATA",176.112,33773,1)
+487891^^Y
+"DATA",176.112,33774,0)
+4015047^BANDAGE,STERI-STRIP 1/4IN X 3IN
+"DATA",176.112,33774,1)
+487892^^Y
+"DATA",176.112,33775,0)
+4015050^BANDAGE,STERI-STRIP 1/4IN X 4IN
+"DATA",176.112,33775,1)
+487893^^Y
+"DATA",176.112,33776,0)
+4015048^BANDAGE,STERI-STRIP 1/8IN X 3IN
+"DATA",176.112,33776,1)
+487894^^Y
+"DATA",176.112,33777,0)
+4015045^BANDAGE,STERI-STRIP 1IN X 5IN
+"DATA",176.112,33777,1)
+487895^^Y
+"DATA",176.112,33778,0)
+4017230^BANDAGE,STRETCH,CONFORM 1IN X 75IN NONSTERILE K#2239
+"DATA",176.112,33778,1)
+487896^^Y
+"DATA",176.112,33779,0)
+4017234^BANDAGE,STRETCH,CONFORM 1IN X 75IN STERILE K#2230
+"DATA",176.112,33779,1)
+487897^^Y
+"DATA",176.112,33780,0)
+4017231^BANDAGE,STRETCH,CONFORM 2IN X 75IN NONSTERILE K#2242
+"DATA",176.112,33780,1)
+487898^^Y
+"DATA",176.112,33781,0)
+4017233^BANDAGE,STRETCH,CONFORM 2IN X 75IN STERILE K#2231
+"DATA",176.112,33781,1)
+487899^^Y
+"DATA",176.112,33782,0)
+4017232^BANDAGE,STRETCH,CONFORM 3IN X 75IN NONSTERILE K#2244
+"DATA",176.112,33782,1)
+487900^^Y
+"DATA",176.112,33783,0)
+4017236^BANDAGE,STRETCH,CONFORM 3IN X 75IN STERILE K#2232
+"DATA",176.112,33783,1)
+487901^^Y
+"DATA",176.112,33784,0)
+4017235^BANDAGE,STRETCH,CONFORM 4IN X 75IN NONSTERILE K#2247
+"DATA",176.112,33784,1)
+487902^^Y
+"DATA",176.112,33785,0)
+4017237^BANDAGE,STRETCH,CONFORM 4IN X 75IN STERILE K#2236
+"DATA",176.112,33785,1)
+487903^^Y
+"DATA",176.112,33786,0)
+4017228^BANDAGE,STRETCH,CONFORM 6IN X 75IN NONSTERILE K#2249
+"DATA",176.112,33786,1)
+487904^^Y
+"DATA",176.112,33787,0)
+4017229^BANDAGE,STRETCH,CONFORM 6IN X 82IN STERILE K#2238
+"DATA",176.112,33787,1)
+487905^^Y
+"DATA",176.112,33788,0)
+4008837^BANDAGE,TRIANGULAR
+"DATA",176.112,33788,1)
+487906^^Y
+"DATA",176.112,33789,0)
+4016700^BANDAGE,VISCOPASTE PB7 3IN X 10YD SN#4956
+"DATA",176.112,33789,1)
+487907^^Y
+"DATA",176.112,33790,0)
+4016701^BANDAGE,VISCOPASTE PB7 3IN X 6.5YD SN#4948
+"DATA",176.112,33790,1)
+487908^^Y
+"DATA",176.112,33791,0)
+4012585^BARRIER CREAM,RESTORE H#9979
+"DATA",176.112,33791,1)
+487909^^Y
+"DATA",176.112,33792,0)
+4016190^BARRIER,ASSURA COLOPLAST #2881
+"DATA",176.112,33792,1)
+487910^^Y
+"DATA",176.112,33793,0)
+4016191^BARRIER,ASSURA COLOPLAST #2882
+"DATA",176.112,33793,1)
+487911^^Y
+"DATA",176.112,33794,0)
+4016192^BARRIER,ASSURA COLOPLAST #2883
+"DATA",176.112,33794,1)
+487912^^Y
+"DATA",176.112,33795,0)
+4016120^BARRIER,CENTERPOINTLOCK 1-1/2IN H#3738
+"DATA",176.112,33795,1)
+487913^^Y
+"DATA",176.112,33796,0)
+4016118^BARRIER,CENTERPOINTLOCK 1-1/4IN H#3736
+"DATA",176.112,33796,1)
+487914^^Y
+"DATA",176.112,33797,0)
+4016111^BARRIER,CENTERPOINTLOCK 1-3/4IN H#37310
+"DATA",176.112,33797,1)
+487915^^Y
+"DATA",176.112,33798,0)
+4016119^BARRIER,CENTERPOINTLOCK 1-3/8IN H#3737
+"DATA",176.112,33798,1)
+487916^^Y
+"DATA",176.112,33799,0)
+4016121^BARRIER,CENTERPOINTLOCK 1-5/8IN H#3739
+"DATA",176.112,33799,1)
+487917^^Y
+"DATA",176.112,33800,0)
+4016116^BARRIER,CENTERPOINTLOCK 1IN H#3734
+"DATA",176.112,33800,1)
+487918^^Y
+"DATA",176.112,33801,0)
+4016108^BARRIER,CENTERPOINTLOCK, 1-1/2IN H#3730
+"DATA",176.112,33801,1)
+487919^^Y
+"DATA",176.112,33802,0)
+4016117^BARRIER,CENTERPOINTLOCK, 1-1/8IN H#3735
+"DATA",176.112,33802,1)
+487920^^Y
+"DATA",176.112,33803,0)
+4016115^BARRIER,CENTERPOINTLOCK, 1-3/4IN H#3734
+"DATA",176.112,33803,1)
+487921^^Y
+"DATA",176.112,33804,0)
+4016110^BARRIER,CENTERPOINTLOCK, 1/2IN H#3730
+"DATA",176.112,33804,1)
+487922^^Y
+"DATA",176.112,33805,0)
+4016112^BARRIER,CENTERPOINTLOCK, 2IN H#37311
+"DATA",176.112,33805,1)
+487923^^Y
+"DATA",176.112,33806,0)
+4016113^BARRIER,CENTERPOINTLOCK, 3/4IN H#3732
+"DATA",176.112,33806,1)
+487924^^Y
+"DATA",176.112,33807,0)
+4016109^BARRIER,CENTERPOINTLOCK, 5/8IN H#3731
+"DATA",176.112,33807,1)
+487925^^Y
+"DATA",176.112,33808,0)
+4016114^BARRIER,CENTERPOINTLOCK, 7/8IN H#3733
+"DATA",176.112,33808,1)
+487926^^Y
+"DATA",176.112,33809,0)
+4016169^BARRIER,CONVEX,ASSURA COLOPLAST #12701
+"DATA",176.112,33809,1)
+487927^^Y
+"DATA",176.112,33810,0)
+4016170^BARRIER,CONVEX,ASSURA COLOPLAST #12702
+"DATA",176.112,33810,1)
+487928^^Y
+"DATA",176.112,33811,0)
+4016171^BARRIER,CONVEX,ASSURA COLOPLAST #12703
+"DATA",176.112,33811,1)
+487929^^Y
+"DATA",176.112,33812,0)
+4016172^BARRIER,CONVEX,ASSURA COLOPLAST #12704
+"DATA",176.112,33812,1)
+487930^^Y
+"DATA",176.112,33813,0)
+4016173^BARRIER,CONVEX,ASSURA COLOPLAST #12705
+"DATA",176.112,33813,1)
+487931^^Y
+"DATA",176.112,33814,0)
+4016174^BARRIER,CONVEX,ASSURA COLOPLAST #12706
+"DATA",176.112,33814,1)
+487932^^Y
+"DATA",176.112,33815,0)
+4016175^BARRIER,CONVEX,ASSURA COLOPLAST #12707
+"DATA",176.112,33815,1)
+487933^^Y
+"DATA",176.112,33816,0)
+4016176^BARRIER,CONVEX,ASSURA COLOPLAST #12708
+"DATA",176.112,33816,1)
+487934^^Y
+"DATA",176.112,33817,0)
+4016177^BARRIER,CONVEX,ASSURA COLOPLAST #12709
+"DATA",176.112,33817,1)
+487935^^Y
+"DATA",176.112,33818,0)
+4017152^BARRIER,ESTEEM SYNERGY C#409268
+"DATA",176.112,33818,1)
+487936^^Y
+"DATA",176.112,33819,0)
+4017150^BARRIER,ESTEEM SYNERGY C#409269
+"DATA",176.112,33819,1)
+487937^^Y
+"DATA",176.112,33820,0)
+4017151^BARRIER,ESTEEM SYNERGY C#409270
+"DATA",176.112,33820,1)
+487938^^Y
+"DATA",176.112,33821,0)
+4011497^BARRIER,FIRSTCHOICE H#3730
+"DATA",176.112,33821,1)
+487939^^Y
+"DATA",176.112,33822,0)
+4011468^BARRIER,FIRSTCHOICE H#3731
+"DATA",176.112,33822,1)
+487940^^Y
+"DATA",176.112,33823,0)
+4011504^BARRIER,FIRSTCHOICE H#37310
+"DATA",176.112,33823,1)
+487941^^Y
+"DATA",176.112,33824,0)
+4012529^BARRIER,FIRSTCHOICE H#37311
+"DATA",176.112,33824,1)
+487942^^Y
+"DATA",176.112,33825,0)
+4011469^BARRIER,FIRSTCHOICE H#3732
+"DATA",176.112,33825,1)
+487943^^Y
+"DATA",176.112,33826,0)
+4011470^BARRIER,FIRSTCHOICE H#3733
+"DATA",176.112,33826,1)
+487944^^Y
+"DATA",176.112,33827,0)
+4011498^BARRIER,FIRSTCHOICE H#3734
+"DATA",176.112,33827,1)
+487945^^Y
+"DATA",176.112,33828,0)
+4011499^BARRIER,FIRSTCHOICE H#3735
+"DATA",176.112,33828,1)
+487946^^Y
+"DATA",176.112,33829,0)
+4011500^BARRIER,FIRSTCHOICE H#3736
+"DATA",176.112,33829,1)
+487947^^Y
+"DATA",176.112,33830,0)
+4011501^BARRIER,FIRSTCHOICE H#3737
+"DATA",176.112,33830,1)
+487948^^Y
+"DATA",176.112,33831,0)
+4011502^BARRIER,FIRSTCHOICE H#3738
+"DATA",176.112,33831,1)
+487949^^Y
+"DATA",176.112,33832,0)
+4011503^BARRIER,FIRSTCHOICE H#3739
+"DATA",176.112,33832,1)
+487950^^Y
+"DATA",176.112,33833,0)
+4012577^BARRIER,FLEXTEND H#8800
+"DATA",176.112,33833,1)
+487951^^Y
+"DATA",176.112,33834,0)
+4012578^BARRIER,FLEXTEND H#8801
+"DATA",176.112,33834,1)
+487952^^Y
+"DATA",176.112,33835,0)
+4014373^BARRIER,FOAM PAD TORBOT #431R
+"DATA",176.112,33835,1)
+487953^^Y
+"DATA",176.112,33836,0)
+4012581^BARRIER,HOLLIHESIVE H#7701
+"DATA",176.112,33836,1)
+487954^^Y
+"DATA",176.112,33837,0)
+4012582^BARRIER,HOLLIHESIVE STERILE H#7704
+"DATA",176.112,33837,1)
+487955^^Y
+"DATA",176.112,33838,0)
+4012583^BARRIER,HOLLIHESIVE STERILE H#7705
+"DATA",176.112,33838,1)
+487956^^Y
+"DATA",176.112,33839,0)
+4012584^BARRIER,HOLLISEAL H#7708
+"DATA",176.112,33839,1)
+487957^^Y
+"DATA",176.112,33840,0)
+4014100^BARRIER,NO STING FILM LIQUID
+"DATA",176.112,33840,1)
+487958^^Y
+"DATA",176.112,33841,0)
+4014099^BARRIER,NO STING FILM WIPE
+"DATA",176.112,33841,1)
+487959^^Y
+"DATA",176.112,33842,0)
+4012586^BARRIER,OSTOMY COLOPLAST #3210
+"DATA",176.112,33842,1)
+487960^^Y
+"DATA",176.112,33843,0)
+4012587^BARRIER,OSTOMY COLOPLAST #3215
+"DATA",176.112,33843,1)
+487961^^Y
+"DATA",176.112,33844,0)
+4012588^BARRIER,OSTOMY COLOPLAST #3220
+"DATA",176.112,33844,1)
+487962^^Y
+"DATA",176.112,33845,0)
+4011463^BARRIER,OSTOMY H#3702
+"DATA",176.112,33845,1)
+487963^^Y
+"DATA",176.112,33846,0)
+4011464^BARRIER,OSTOMY H#3703
+"DATA",176.112,33846,1)
+487964^^Y
+"DATA",176.112,33847,0)
+4011465^BARRIER,OSTOMY H#3704
+"DATA",176.112,33847,1)
+487965^^Y
+"DATA",176.112,33848,0)
+4011466^BARRIER,OSTOMY H#3706
+"DATA",176.112,33848,1)
+487966^^Y
+"DATA",176.112,33849,0)
+4011462^BARRIER,OSTOMY H#3707
+"DATA",176.112,33849,1)
+487967^^Y
+"DATA",176.112,33850,0)
+4011494^BARRIER,OSTOMY H#3722
+"DATA",176.112,33850,1)
+487968^^Y
+"DATA",176.112,33851,0)
+4011495^BARRIER,OSTOMY H#3723
+"DATA",176.112,33851,1)
+487969^^Y
+"DATA",176.112,33852,0)
+4011496^BARRIER,OSTOMY H#3724
+"DATA",176.112,33852,1)
+487970^^Y
+"DATA",176.112,33853,0)
+4012528^BARRIER,OSTOMY H#3726
+"DATA",176.112,33853,1)
+487971^^Y
+"DATA",176.112,33854,0)
+4011493^BARRIER,OSTOMY H#3727
+"DATA",176.112,33854,1)
+487972^^Y
+"DATA",176.112,33855,0)
+4012531^BARRIER,OSTOMY H#3742
+"DATA",176.112,33855,1)
+487973^^Y
+"DATA",176.112,33856,0)
+4012533^BARRIER,OSTOMY H#3743
+"DATA",176.112,33856,1)
+487974^^Y
+"DATA",176.112,33857,0)
+4012535^BARRIER,OSTOMY H#3744
+"DATA",176.112,33857,1)
+487975^^Y
+"DATA",176.112,33858,0)
+4012536^BARRIER,OSTOMY H#3746
+"DATA",176.112,33858,1)
+487976^^Y
+"DATA",176.112,33859,0)
+4012530^BARRIER,OSTOMY H#3747
+"DATA",176.112,33859,1)
+487977^^Y
+"DATA",176.112,33860,0)
+4012532^BARRIER,OSTOMY H#3748
+"DATA",176.112,33860,1)
+487978^^Y
+"DATA",176.112,33861,0)
+4012534^BARRIER,OSTOMY H#3749
+"DATA",176.112,33861,1)
+487979^^Y
+"DATA",176.112,33862,0)
+4012524^BARRIER,OSTOMY H#3762
+"DATA",176.112,33862,1)
+487980^^Y
+"DATA",176.112,33863,0)
+4012525^BARRIER,OSTOMY H#3763
+"DATA",176.112,33863,1)
+487981^^Y
+"DATA",176.112,33864,0)
+4012526^BARRIER,OSTOMY H#3764
+"DATA",176.112,33864,1)
+487982^^Y
+"DATA",176.112,33865,0)
+4012527^BARRIER,OSTOMY H#3766
+"DATA",176.112,33865,1)
+487983^^Y
+"DATA",176.112,33866,0)
+4012523^BARRIER,OSTOMY H#3767
+"DATA",176.112,33866,1)
+487984^^Y
+"DATA",176.112,33867,0)
+4012537^BARRIER,OSTOMY H#8722
+"DATA",176.112,33867,1)
+487985^^Y
+"DATA",176.112,33868,0)
+4012538^BARRIER,OSTOMY H#8723
+"DATA",176.112,33868,1)
+487986^^Y
+"DATA",176.112,33869,0)
+4013358^BARRIER,OSTOMY H#8724
+"DATA",176.112,33869,1)
+487987^^Y
+"DATA",176.112,33870,0)
+4012539^BARRIER,OSTOMY H#8726
+"DATA",176.112,33870,1)
+487988^^Y
+"DATA",176.112,33871,0)
+4012519^BARRIER,OSTOMY H#8727
+"DATA",176.112,33871,1)
+487989^^Y
+"DATA",176.112,33872,0)
+4012555^BARRIER,OSTOMY H#8730
+"DATA",176.112,33872,1)
+487990^^Y
+"DATA",176.112,33873,0)
+4012522^BARRIER,OSTOMY H#8731
+"DATA",176.112,33873,1)
+487991^^Y
+"DATA",176.112,33874,0)
+4012563^BARRIER,OSTOMY H#87310
+"DATA",176.112,33874,1)
+487992^^Y
+"DATA",176.112,33875,0)
+4012564^BARRIER,OSTOMY H#87311
+"DATA",176.112,33875,1)
+487993^^Y
+"DATA",176.112,33876,0)
+4012556^BARRIER,OSTOMY H#8732
+"DATA",176.112,33876,1)
+487994^^Y
+"DATA",176.112,33877,0)
+4012557^BARRIER,OSTOMY H#8733
+"DATA",176.112,33877,1)
+487995^^Y
+"DATA",176.112,33878,0)
+4012558^BARRIER,OSTOMY H#8734
+"DATA",176.112,33878,1)
+487996^^Y
+"DATA",176.112,33879,0)
+4012559^BARRIER,OSTOMY H#8735
+"DATA",176.112,33879,1)
+487997^^Y
+"DATA",176.112,33880,0)
+4012560^BARRIER,OSTOMY H#8736
+"DATA",176.112,33880,1)
+487998^^Y
+"DATA",176.112,33881,0)
+4012561^BARRIER,OSTOMY H#8737
+"DATA",176.112,33881,1)
+487999^^Y
+"DATA",176.112,33882,0)
+4012521^BARRIER,OSTOMY H#8738
+"DATA",176.112,33882,1)
+488000^^Y
+"DATA",176.112,33883,0)
+4012562^BARRIER,OSTOMY H#8739
+"DATA",176.112,33883,1)
+488001^^Y
+"DATA",176.112,33884,0)
+4012540^BARRIER,OSTOMY H#8740
+"DATA",176.112,33884,1)
+488002^^Y
+"DATA",176.112,33885,0)
+4012541^BARRIER,OSTOMY H#8741
+"DATA",176.112,33885,1)
+488003^^Y
+"DATA",176.112,33886,0)
+4012549^BARRIER,OSTOMY H#87410
+"DATA",176.112,33886,1)
+488004^^Y
+"DATA",176.112,33887,0)
+4012550^BARRIER,OSTOMY H#87411
+"DATA",176.112,33887,1)
+488005^^Y
+"DATA",176.112,33888,0)
+4012551^BARRIER,OSTOMY H#87412
+"DATA",176.112,33888,1)
+488006^^Y
+"DATA",176.112,33889,0)
+4012542^BARRIER,OSTOMY H#8742
+"DATA",176.112,33889,1)
+488007^^Y
+"DATA",176.112,33890,0)
+4012543^BARRIER,OSTOMY H#8743
+"DATA",176.112,33890,1)
+488008^^Y
+"DATA",176.112,33891,0)
+4012544^BARRIER,OSTOMY H#8744
+"DATA",176.112,33891,1)
+488009^^Y
+"DATA",176.112,33892,0)
+4012545^BARRIER,OSTOMY H#8745
+"DATA",176.112,33892,1)
+488010^^Y
+"DATA",176.112,33893,0)
+4012546^BARRIER,OSTOMY H#8746
+"DATA",176.112,33893,1)
+488011^^Y
+"DATA",176.112,33894,0)
+4012547^BARRIER,OSTOMY H#8747
+"DATA",176.112,33894,1)
+488012^^Y
+"DATA",176.112,33895,0)
+4012520^BARRIER,OSTOMY H#8748
+"DATA",176.112,33895,1)
+488013^^Y
+"DATA",176.112,33896,0)
+4012548^BARRIER,OSTOMY H#8749
+"DATA",176.112,33896,1)
+488014^^Y
+"DATA",176.112,33897,0)
+4012566^BARRIER,OSTOMY H#8752
+"DATA",176.112,33897,1)
+488015^^Y
+"DATA",176.112,33898,0)
+4012567^BARRIER,OSTOMY H#8753
+"DATA",176.112,33898,1)
+488016^^Y
+"DATA",176.112,33899,0)
+4012568^BARRIER,OSTOMY H#8754
+"DATA",176.112,33899,1)
+488017^^Y
+"DATA",176.112,33900,0)
+4012569^BARRIER,OSTOMY H#8756
+"DATA",176.112,33900,1)
+488018^^Y
+"DATA",176.112,33901,0)
+4012565^BARRIER,OSTOMY H#8757
+"DATA",176.112,33901,1)
+488019^^Y
+"DATA",176.112,33902,0)
+4012571^BARRIER,OSTOMY H#8762
+"DATA",176.112,33902,1)
+488020^^Y
+"DATA",176.112,33903,0)
+4012573^BARRIER,OSTOMY H#8763
+"DATA",176.112,33903,1)
+488021^^Y
+"DATA",176.112,33904,0)
+4012575^BARRIER,OSTOMY H#8764
+"DATA",176.112,33904,1)
+488022^^Y
+"DATA",176.112,33905,0)
+4012576^BARRIER,OSTOMY H#8766
+"DATA",176.112,33905,1)
+488023^^Y
+"DATA",176.112,33906,0)
+4012570^BARRIER,OSTOMY H#8767
+"DATA",176.112,33906,1)
+488024^^Y
+"DATA",176.112,33907,0)
+4012572^BARRIER,OSTOMY H#8768
+"DATA",176.112,33907,1)
+488025^^Y
+"DATA",176.112,33908,0)
+4012574^BARRIER,OSTOMY H#8769
+"DATA",176.112,33908,1)
+488026^^Y
+"DATA",176.112,33909,0)
+4012554^BARRIER,OSTOMY H#87711
+"DATA",176.112,33909,1)
+488027^^Y
+"DATA",176.112,33910,0)
+4012552^BARRIER,OSTOMY H#8774
+"DATA",176.112,33910,1)
+488028^^Y
+"DATA",176.112,33911,0)
+4012553^BARRIER,OSTOMY H#8778
+"DATA",176.112,33911,1)
+488029^^Y
+"DATA",176.112,33912,0)
+4011505^BARRIER,OSTOMY W/FLANGE F#144-5968
+"DATA",176.112,33912,1)
+488030^^Y
+"DATA",176.112,33913,0)
+4011506^BARRIER,OSTOMY W/FLANGE F#176-0724
+"DATA",176.112,33913,1)
+488031^^Y
+"DATA",176.112,33914,0)
+4011471^BARRIER,OSTOMY,GUARDIAN-F H#4412
+"DATA",176.112,33914,1)
+488032^^Y
+"DATA",176.112,33915,0)
+4011455^BARRIER,OSTOMY,GUARDIAN-F H#4413
+"DATA",176.112,33915,1)
+488033^^Y
+"DATA",176.112,33916,0)
+4011472^BARRIER,OSTOMY,GUARDIAN-F H#4414
+"DATA",176.112,33916,1)
+488034^^Y
+"DATA",176.112,33917,0)
+4011456^BARRIER,OSTOMY,GUARDIAN-F H#4415
+"DATA",176.112,33917,1)
+488035^^Y
+"DATA",176.112,33918,0)
+4011457^BARRIER,OSTOMY,GUARDIAN-F H#4416
+"DATA",176.112,33918,1)
+488036^^Y
+"DATA",176.112,33919,0)
+4011479^BARRIER,OSTOMY,GUARDIAN-F H#4430
+"DATA",176.112,33919,1)
+488037^^Y
+"DATA",176.112,33920,0)
+4011480^BARRIER,OSTOMY,GUARDIAN-F H#4431
+"DATA",176.112,33920,1)
+488038^^Y
+"DATA",176.112,33921,0)
+4011487^BARRIER,OSTOMY,GUARDIAN-F H#44310
+"DATA",176.112,33921,1)
+488039^^Y
+"DATA",176.112,33922,0)
+4011488^BARRIER,OSTOMY,GUARDIAN-F H#44311
+"DATA",176.112,33922,1)
+488040^^Y
+"DATA",176.112,33923,0)
+4011481^BARRIER,OSTOMY,GUARDIAN-F H#4432
+"DATA",176.112,33923,1)
+488041^^Y
+"DATA",176.112,33924,0)
+4011482^BARRIER,OSTOMY,GUARDIAN-F H#4433
+"DATA",176.112,33924,1)
+488042^^Y
+"DATA",176.112,33925,0)
+4011460^BARRIER,OSTOMY,GUARDIAN-F H#4434
+"DATA",176.112,33925,1)
+488043^^Y
+"DATA",176.112,33926,0)
+4011483^BARRIER,OSTOMY,GUARDIAN-F H#4435
+"DATA",176.112,33926,1)
+488044^^Y
+"DATA",176.112,33927,0)
+4011461^BARRIER,OSTOMY,GUARDIAN-F H#4436
+"DATA",176.112,33927,1)
+488045^^Y
+"DATA",176.112,33928,0)
+4011484^BARRIER,OSTOMY,GUARDIAN-F H#4437
+"DATA",176.112,33928,1)
+488046^^Y
+"DATA",176.112,33929,0)
+4011485^BARRIER,OSTOMY,GUARDIAN-F H#4438
+"DATA",176.112,33929,1)
+488047^^Y
+"DATA",176.112,33930,0)
+4011486^BARRIER,OSTOMY,GUARDIAN-F H#4439
+"DATA",176.112,33930,1)
+488048^^Y
+"DATA",176.112,33931,0)
+4011458^BARRIER,OSTOMY,GUARDIAN-F H#4442
+"DATA",176.112,33931,1)
+488049^^Y
+"DATA",176.112,33932,0)
+4011474^BARRIER,OSTOMY,GUARDIAN-F H#4443
+"DATA",176.112,33932,1)
+488050^^Y
+"DATA",176.112,33933,0)
+4011476^BARRIER,OSTOMY,GUARDIAN-F H#4444
+"DATA",176.112,33933,1)
+488051^^Y
+"DATA",176.112,33934,0)
+4011478^BARRIER,OSTOMY,GUARDIAN-F H#4445
+"DATA",176.112,33934,1)
+488052^^Y
+"DATA",176.112,33935,0)
+4011477^BARRIER,OSTOMY,GUARDIAN-F H#4446
+"DATA",176.112,33935,1)
+488053^^Y
+"DATA",176.112,33936,0)
+4011473^BARRIER,OSTOMY,GUARDIAN-F H#4447
+"DATA",176.112,33936,1)
+488054^^Y
+"DATA",176.112,33937,0)
+4011459^BARRIER,OSTOMY,GUARDIAN-F H#4448
+"DATA",176.112,33937,1)
+488055^^Y
+"DATA",176.112,33938,0)
+4011475^BARRIER,OSTOMY,GUARDIAN-F H#4449
+"DATA",176.112,33938,1)
+488056^^Y
+"DATA",176.112,33939,0)
+4011489^BARRIER,OSTOMY,GUARDIAN-S H#4422
+"DATA",176.112,33939,1)
+488057^^Y
+"DATA",176.112,33940,0)
+4011490^BARRIER,OSTOMY,GUARDIAN-S H#4423
+"DATA",176.112,33940,1)
+488058^^Y
+"DATA",176.112,33941,0)
+4011491^BARRIER,OSTOMY,GUARDIAN-S H#4424
+"DATA",176.112,33941,1)
+488059^^Y
+"DATA",176.112,33942,0)
+4011492^BARRIER,OSTOMY,GUARDIAN-S H#4425
+"DATA",176.112,33942,1)
+488060^^Y
+"DATA",176.112,33943,0)
+4011467^BARRIER,OSTOMY,HOLLIHESIVE H#7700
+"DATA",176.112,33943,1)
+488061^^Y
+"DATA",176.112,33944,0)
+4016053^BARRIER,OSTOMY,NEW IMAG H#16304
+"DATA",176.112,33944,1)
+488062^^Y
+"DATA",176.112,33945,0)
+4015535^BARRIER,OSTOMY,NEW IMAGE H#15202
+"DATA",176.112,33945,1)
+488063^^Y
+"DATA",176.112,33946,0)
+4015549^BARRIER,OSTOMY,NEW IMAGE H#15203
+"DATA",176.112,33946,1)
+488064^^Y
+"DATA",176.112,33947,0)
+4015536^BARRIER,OSTOMY,NEW IMAGE H#15204
+"DATA",176.112,33947,1)
+488065^^Y
+"DATA",176.112,33948,0)
+4015537^BARRIER,OSTOMY,NEW IMAGE H#15602
+"DATA",176.112,33948,1)
+488066^^Y
+"DATA",176.112,33949,0)
+4015548^BARRIER,OSTOMY,NEW IMAGE H#15603
+"DATA",176.112,33949,1)
+488067^^Y
+"DATA",176.112,33950,0)
+4015538^BARRIER,OSTOMY,NEW IMAGE H#15604
+"DATA",176.112,33950,1)
+488068^^Y
+"DATA",176.112,33951,0)
+4015897^BARRIER,OSTOMY,NEW IMAGE H#15802
+"DATA",176.112,33951,1)
+488069^^Y
+"DATA",176.112,33952,0)
+4015898^BARRIER,OSTOMY,NEW IMAGE H#15803
+"DATA",176.112,33952,1)
+488070^^Y
+"DATA",176.112,33953,0)
+4015899^BARRIER,OSTOMY,NEW IMAGE H#15804
+"DATA",176.112,33953,1)
+488071^^Y
+"DATA",176.112,33954,0)
+4016050^BARRIER,OSTOMY,NEW IMAGE H#16301
+"DATA",176.112,33954,1)
+488072^^Y
+"DATA",176.112,33955,0)
+4016051^BARRIER,OSTOMY,NEW IMAGE H#16302
+"DATA",176.112,33955,1)
+488073^^Y
+"DATA",176.112,33956,0)
+4016052^BARRIER,OSTOMY,NEW IMAGE H#16303
+"DATA",176.112,33956,1)
+488074^^Y
+"DATA",176.112,33957,0)
+4016231^BARRIER,OSTOMY,NEW IMAGE H#16304
+"DATA",176.112,33957,1)
+488075^^Y
+"DATA",176.112,33958,0)
+4016054^BARRIER,OSTOMY,NEW IMAGE H#16305
+"DATA",176.112,33958,1)
+488076^^Y
+"DATA",176.112,33959,0)
+4016055^BARRIER,OSTOMY,NEW IMAGE H#16306
+"DATA",176.112,33959,1)
+488077^^Y
+"DATA",176.112,33960,0)
+4016056^BARRIER,OSTOMY,NEW IMAGE H#16307
+"DATA",176.112,33960,1)
+488078^^Y
+"DATA",176.112,33961,0)
+4016057^BARRIER,OSTOMY,NEW IMAGE H#16308
+"DATA",176.112,33961,1)
+488079^^Y
+"DATA",176.112,33962,0)
+4016386^BARRIER,OSTOMY,NEW IMAGE H#16701
+"DATA",176.112,33962,1)
+488080^^Y
+"DATA",176.112,33963,0)
+4016387^BARRIER,OSTOMY,NEW IMAGE H#16702
+"DATA",176.112,33963,1)
+488081^^Y
+"DATA",176.112,33964,0)
+4016388^BARRIER,OSTOMY,NEW IMAGE H#16703
+"DATA",176.112,33964,1)
+488082^^Y
+"DATA",176.112,33965,0)
+4016389^BARRIER,OSTOMY,NEW IMAGE H#16704
+"DATA",176.112,33965,1)
+488083^^Y
+"DATA",176.112,33966,0)
+4016390^BARRIER,OSTOMY,NEW IMAGE H#16705
+"DATA",176.112,33966,1)
+488084^^Y
+"DATA",176.112,33967,0)
+4016391^BARRIER,OSTOMY,NEW IMAGE H#16706
+"DATA",176.112,33967,1)
+488085^^Y
+"DATA",176.112,33968,0)
+4016392^BARRIER,OSTOMY,NEW IMAGE H#16707
+"DATA",176.112,33968,1)
+488086^^Y
+"DATA",176.112,33969,0)
+4016393^BARRIER,OSTOMY,NEW IMAGE H#16708
+"DATA",176.112,33969,1)
+488087^^Y
+"DATA",176.112,33970,0)
+4017172^BARRIER,OSTOMY,SUR-FIT NATURA C#404592
+"DATA",176.112,33970,1)
+488088^^Y
+"DATA",176.112,33971,0)
+4017173^BARRIER,OSTOMY,SUR-FIT NATURA C#404593
+"DATA",176.112,33971,1)
+488089^^Y
+"DATA",176.112,33972,0)
+4017174^BARRIER,OSTOMY,SUR-FIT NATURA C#404594
+"DATA",176.112,33972,1)
+488090^^Y
+"DATA",176.112,33973,0)
+4016180^BARRIER,POST-OP COLOPLAST #6828
+"DATA",176.112,33973,1)
+488091^^Y
+"DATA",176.112,33974,0)
+4016181^BARRIER,POST-OP COLOPLAST #6830
+"DATA",176.112,33974,1)
+488092^^Y
+"DATA",176.112,33975,0)
+4012517^BARRIER,PREMIUM H#7800
+"DATA",176.112,33975,1)
+488093^^Y
+"DATA",176.112,33976,0)
+4012518^BARRIER,PREMIUM H#7801
+"DATA",176.112,33976,1)
+488094^^Y
+"DATA",176.112,33977,0)
+4012579^BARRIER,PREMIUM STERILE H#7810
+"DATA",176.112,33977,1)
+488095^^Y
+"DATA",176.112,33978,0)
+4012580^BARRIER,PREMIUM STERILE H#7811
+"DATA",176.112,33978,1)
+488096^^Y
+"DATA",176.112,33979,0)
+4012591^BARRIER,SOFT-FLEX RING H#7805
+"DATA",176.112,33979,1)
+488097^^Y
+"DATA",176.112,33980,0)
+4012589^BARRIER,SOFT-FLEX RING H#7806
+"DATA",176.112,33980,1)
+488098^^Y
+"DATA",176.112,33981,0)
+4014942^BARRIER,SOFT-FLEX RING H#7807
+"DATA",176.112,33981,1)
+488099^^Y
+"DATA",176.112,33982,0)
+4012590^BARRIER,SOFT-FLEX RING H#7808
+"DATA",176.112,33982,1)
+488100^^Y
+"DATA",176.112,33983,0)
+4012451^BELT ADAPTER H#4202
+"DATA",176.112,33983,1)
+488101^^Y
+"DATA",176.112,33984,0)
+4012452^BELT ADAPTER H#4203
+"DATA",176.112,33984,1)
+488102^^Y
+"DATA",176.112,33985,0)
+4012453^BELT ADAPTER H#4204
+"DATA",176.112,33985,1)
+488103^^Y
+"DATA",176.112,33986,0)
+4012454^BELT ADAPTER H#4205
+"DATA",176.112,33986,1)
+488104^^Y
+"DATA",176.112,33987,0)
+4012455^BELT ADAPTER H#4206
+"DATA",176.112,33987,1)
+488105^^Y
+"DATA",176.112,33988,0)
+4012445^BELT W/BUCKLE SET ATLANTIC #0106
+"DATA",176.112,33988,1)
+488106^^Y
+"DATA",176.112,33989,0)
+4012434^BELT,ELASTIC MARLEN
+"DATA",176.112,33989,1)
+488107^^Y
+"DATA",176.112,33990,0)
+4010627^BELT,OSTOMY,ADJUSTABLE C#1755-07
+"DATA",176.112,33990,1)
+488108^^Y
+"DATA",176.112,33991,0)
+4012450^BELT,OSTOMY,ADJUSTABLE C#1755-10
+"DATA",176.112,33991,1)
+488109^^Y
+"DATA",176.112,33992,0)
+4012456^BELT,OSTOMY,ADJUSTABLE COLOPLAST #0420
+"DATA",176.112,33992,1)
+488110^^Y
+"DATA",176.112,33993,0)
+4016194^BELT,OSTOMY,ADJUSTABLE COLOPLAST #0421
+"DATA",176.112,33993,1)
+488111^^Y
+"DATA",176.112,33994,0)
+4010630^BELT,OSTOMY,LARGE H#7299
+"DATA",176.112,33994,1)
+488112^^Y
+"DATA",176.112,33995,0)
+4010629^BELT,OSTOMY,MEDIUM H#7300
+"DATA",176.112,33995,1)
+488113^^Y
+"DATA",176.112,33996,0)
+4010628^BELT,OSTOMY,SMALL H#7298
+"DATA",176.112,33996,1)
+488114^^Y
+"DATA",176.112,33997,0)
+4014446^BELT,RIB COMFORT PANEL MENS ZIMMER #584-11
+"DATA",176.112,33997,1)
+488115^^Y
+"DATA",176.112,33998,0)
+4014448^BELT,RIB UNIVERSAL 8IN WOMENS ZIMMER #2722-08
+"DATA",176.112,33998,1)
+488116^^Y
+"DATA",176.112,33999,0)
+4014447^BELT,RIB UNIVERSAL 8IN ZIMMER #2721-08
+"DATA",176.112,33999,1)
+488117^^Y
+"DATA",176.112,34000,0)
+4012448^BELT,RUBBER,ADJUSTABLE TORBOT #TT438
+"DATA",176.112,34000,1)
+488118^^Y
+"DATA",176.112,34001,0)
+4012444^BELT,SUPPORT 4IN LG NU-HOPE #2662
+"DATA",176.112,34001,1)
+488119^^Y
+"DATA",176.112,34002,0)
+4012443^BELT,SUPPORT 4IN MED NU-HOPE #2661
+"DATA",176.112,34002,1)
+488120^^Y
+"DATA",176.112,34003,0)
+4012446^BELT,SUPPORT 4IN MEDIUM NU-HOPE #2666
+"DATA",176.112,34003,1)
+488121^^Y
+"DATA",176.112,34004,0)
+4013769^BELT,SUPPORT 4IN SM NU-HOPE #2660
+"DATA",176.112,34004,1)
+488122^^Y
+"DATA",176.112,34005,0)
+4012435^BELT,SUPPORT 4IN X-LG NU-HOPE #2663
+"DATA",176.112,34005,1)
+488123^^Y
+"DATA",176.112,34006,0)
+4012449^BELT,SUPPORT 4IN X-LG NU-HOPE #2668-SP
+"DATA",176.112,34006,1)
+488124^^Y
+"DATA",176.112,34007,0)
+4013770^BELT,SUPPORT 4IN XX-LG NU-HOPE #2664
+"DATA",176.112,34007,1)
+488125^^Y
+"DATA",176.112,34008,0)
+4012442^BELT,SUPPORT 6IN LARGE NU-HOPE #6602
+"DATA",176.112,34008,1)
+488126^^Y
+"DATA",176.112,34009,0)
+4013761^BELT,SUPPORT 6IN LG NU-HOPE #6702
+"DATA",176.112,34009,1)
+488127^^Y
+"DATA",176.112,34010,0)
+4013766^BELT,SUPPORT 6IN LG NU-HOPE #6712
+"DATA",176.112,34010,1)
+488128^^Y
+"DATA",176.112,34011,0)
+4013760^BELT,SUPPORT 6IN MED NU-HOPE #6701
+"DATA",176.112,34011,1)
+488129^^Y
+"DATA",176.112,34012,0)
+4013765^BELT,SUPPORT 6IN MED NU-HOPE #6711
+"DATA",176.112,34012,1)
+488130^^Y
+"DATA",176.112,34013,0)
+4012436^BELT,SUPPORT 6IN MEDIUM NU-HOPE #6601
+"DATA",176.112,34013,1)
+488131^^Y
+"DATA",176.112,34014,0)
+4013759^BELT,SUPPORT 6IN SM NU-HOPE #6700
+"DATA",176.112,34014,1)
+488132^^Y
+"DATA",176.112,34015,0)
+4013764^BELT,SUPPORT 6IN SM NU-HOPE #6710
+"DATA",176.112,34015,1)
+488133^^Y
+"DATA",176.112,34016,0)
+4012437^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6603
+"DATA",176.112,34016,1)
+488134^^Y
+"DATA",176.112,34017,0)
+4013762^BELT,SUPPORT 6IN X-LG NU-HOPE #6703
+"DATA",176.112,34017,1)
+488135^^Y
+"DATA",176.112,34018,0)
+4013767^BELT,SUPPORT 6IN X-LG NU-HOPE #6713
+"DATA",176.112,34018,1)
+488136^^Y
+"DATA",176.112,34019,0)
+4012438^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6604
+"DATA",176.112,34019,1)
+488137^^Y
+"DATA",176.112,34020,0)
+4012447^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6614
+"DATA",176.112,34020,1)
+488138^^Y
+"DATA",176.112,34021,0)
+4013763^BELT,SUPPORT 6IN XX-LG NU-HOPE #6704
+"DATA",176.112,34021,1)
+488139^^Y
+"DATA",176.112,34022,0)
+4013768^BELT,SUPPORT 6IN XX-LG NU-HOPE #6714
+"DATA",176.112,34022,1)
+488140^^Y
+"DATA",176.112,34023,0)
+4016431^BELT,SUPPORT 7IN LG NU-HOPE #6442
+"DATA",176.112,34023,1)
+488141^^Y
+"DATA",176.112,34024,0)
+4016430^BELT,SUPPORT 7IN MEDIUM NU-HOPE #6441
+"DATA",176.112,34024,1)
+488142^^Y
+"DATA",176.112,34025,0)
+4016429^BELT,SUPPORT 7IN SM NU-HOPE #6440
+"DATA",176.112,34025,1)
+488143^^Y
+"DATA",176.112,34026,0)
+4016432^BELT,SUPPORT 7IN X-LARGE NU-HOPE #6443
+"DATA",176.112,34026,1)
+488144^^Y
+"DATA",176.112,34027,0)
+4016433^BELT,SUPPORT 7IN XX-LARGE NU-HOPE #6444
+"DATA",176.112,34027,1)
+488145^^Y
+"DATA",176.112,34028,0)
+4012440^BELT,SUPPORT 9IN LARGE NU-HOPE #6642
+"DATA",176.112,34028,1)
+488146^^Y
+"DATA",176.112,34029,0)
+4012439^BELT,SUPPORT 9IN MEDIUM NU-HOPE #6641
+"DATA",176.112,34029,1)
+488147^^Y
+"DATA",176.112,34030,0)
+4012457^BELT,SUPPORT 9IN X-LARGE NU-HOPE #6633-SP
+"DATA",176.112,34030,1)
+488148^^Y
+"DATA",176.112,34031,0)
+4012441^BELT,SUPPORT 9IN X-LARGE NU-HOPE #6643
+"DATA",176.112,34031,1)
+488149^^Y
+"DATA",176.112,34032,0)
+4014445^BINDER,ABDOMINAL,10IN ZIMMER #2732-10
+"DATA",176.112,34032,1)
+488150^^Y
+"DATA",176.112,34033,0)
+4014444^BINDER,ABDOMINAL,12IN ZIMMER #2732-12
+"DATA",176.112,34033,1)
+488151^^Y
+"DATA",176.112,34034,0)
+4012676^BINDER,ABDOMINAL,EXTRA-LARGE
+"DATA",176.112,34034,1)
+488152^^Y
+"DATA",176.112,34035,0)
+4012673^BINDER,ABDOMINAL,LARGE
+"DATA",176.112,34035,1)
+488153^^Y
+"DATA",176.112,34036,0)
+4012674^BINDER,ABDOMINAL,MEDIUM
+"DATA",176.112,34036,1)
+488154^^Y
+"DATA",176.112,34037,0)
+4012675^BINDER,ABDOMINAL,SMALL
+"DATA",176.112,34037,1)
+488155^^Y
+"DATA",176.112,34038,0)
+4012677^BINDER,ABDOMINAL,XX-LARGE
+"DATA",176.112,34038,1)
+488156^^Y
+"DATA",176.112,34039,0)
+4015145^CATHERIZATION SET, CENTER ENTRY FOLEY BARD #897400
+"DATA",176.112,34039,1)
+488157^^Y
+"DATA",176.112,34040,0)
+4017159^CATHERIZATION SET,FOLEY 18FR BARD #899618
+"DATA",176.112,34040,1)
+488158^^Y
+"DATA",176.112,34041,0)
+4016459^CATHERIZATION SET,FOLEY W/O CATH KENDALL #782100
+"DATA",176.112,34041,1)
+488159^^Y
+"DATA",176.112,34042,0)
+4014359^CATHERIZATION SET,INTERMITTENT 10FR MMG/ONEIL #RLA-102-3
+"DATA",176.112,34042,1)
+488160^^Y
+"DATA",176.112,34043,0)
+4015963^CATHERIZATION SET,INTERMITTENT 12FR BARD #4A5042
+"DATA",176.112,34043,1)
+488161^^Y
+"DATA",176.112,34044,0)
+4014360^CATHERIZATION SET,INTERMITTENT 12FR MMG/ONEIL #RLA122-3
+"DATA",176.112,34044,1)
+488162^^Y
+"DATA",176.112,34045,0)
+4016518^CATHERIZATION SET,INTERMITTENT 12FR SOFT RUSCH #RLA122-30
+"DATA",176.112,34045,1)
+488163^^Y
+"DATA",176.112,34046,0)
+4016546^CATHERIZATION SET,INTERMITTENT 14FR BARD #4A2044
+"DATA",176.112,34046,1)
+488164^^Y
+"DATA",176.112,34047,0)
+4015964^CATHERIZATION SET,INTERMITTENT 14FR BARD #4A5044
+"DATA",176.112,34047,1)
+488165^^Y
+"DATA",176.112,34048,0)
+4016552^CATHERIZATION SET,INTERMITTENT 14FR BARD #4A6144
+"DATA",176.112,34048,1)
+488166^^Y
+"DATA",176.112,34049,0)
+4015965^CATHERIZATION SET,INTERMITTENT 14FR BARD #4A7044
+"DATA",176.112,34049,1)
+488167^^Y
+"DATA",176.112,34050,0)
+4014361^CATHERIZATION SET,INTERMITTENT 14FR MMG/ONEIL #RLA-142-3
+"DATA",176.112,34050,1)
+488168^^Y
+"DATA",176.112,34051,0)
+4014349^CATHERIZATION SET,INTERMITTENT 14FR MMG/ONEIL #SONK-141-3
+"DATA",176.112,34051,1)
+488169^^Y
+"DATA",176.112,34052,0)
+4015880^CATHERIZATION SET,INTERMITTENT 14FR PERSONAL ROCHESTER #63814
+"DATA",176.112,34052,1)
+488170^^Y
+"DATA",176.112,34053,0)
+4016517^CATHERIZATION SET,INTERMITTENT 14FR SOFT RUSCH #RLA142-30
+"DATA",176.112,34053,1)
+488171^^Y
+"DATA",176.112,34054,0)
+4014317^CATHERIZATION SET,INTERMITTENT 16FR MMG/ONEIL #0NK-141-3
+"DATA",176.112,34054,1)
+488172^^Y
+"DATA",176.112,34055,0)
+4014363^CATHERIZATION SET,INTERMITTENT 16FR MMG/ONEIL #ONK-141-3
+"DATA",176.112,34055,1)
+488173^^Y
+"DATA",176.112,34056,0)
+4014362^CATHERIZATION SET,INTERMITTENT 16FR MMG/ONEIL #RLA-162-3
+"DATA",176.112,34056,1)
+488174^^Y
+"DATA",176.112,34057,0)
+4014358^CATHERIZATION SET,INTERMITTENT 8FR MMG/ONEIL #RLA-82-3
+"DATA",176.112,34057,1)
+488175^^Y
+"DATA",176.112,34058,0)
+4017040^CATHERIZATION SET,URETHRAL 14FR CURITY #3217
+"DATA",176.112,34058,1)
+488176^^Y
+"DATA",176.112,34059,0)
+4014597^CATHERIZATION SET,URETHRAL 14FR KENDALL #2480
+"DATA",176.112,34059,1)
+488177^^Y
+"DATA",176.112,34060,0)
+4014593^CATHERIZATION SET,URETHRAL 14FR KENDALL #3410
+"DATA",176.112,34060,1)
+488178^^Y
+"DATA",176.112,34061,0)
+4014372^CATHERIZATION SET,URETHRAL 14FR KENDALL #3450
+"DATA",176.112,34061,1)
+488179^^Y
+"DATA",176.112,34062,0)
+4014598^CATHERIZATION SET,URETHRAL 14FR KENDALL #406624
+"DATA",176.112,34062,1)
+488180^^Y
+"DATA",176.112,34063,0)
+4014595^CATHERIZATION SET,URETHRAL 14FR KENDALL #406724
+"DATA",176.112,34063,1)
+488181^^Y
+"DATA",176.112,34064,0)
+4014594^CATHERIZATION SET,URETHRAL 16FR KENDALL #3408
+"DATA",176.112,34064,1)
+488182^^Y
+"DATA",176.112,34065,0)
+4011913^CATHERIZATION SET,URETHRAL F#519-3353
+"DATA",176.112,34065,1)
+488183^^Y
+"DATA",176.112,34066,0)
+4014596^CATHERIZATION SET,URETHRAL KENDALL #3450LF
+"DATA",176.112,34066,1)
+488184^^Y
+"DATA",176.112,34067,0)
+4014395^CATHERIZATION SET,W/O CATH LSL#1510PF
+"DATA",176.112,34067,1)
+488185^^Y
+"DATA",176.112,34068,0)
+4011744^CATHETER BALLOON SILASTIC 16FR 5CC
+"DATA",176.112,34068,1)
+488186^^Y
+"DATA",176.112,34069,0)
+4011745^CATHETER BALLOON SILASTIC 22FR 5CC
+"DATA",176.112,34069,1)
+488187^^Y
+"DATA",176.112,34070,0)
+4011746^CATHETER BALLOON SILASTIC 24FR 5CC
+"DATA",176.112,34070,1)
+488188^^Y
+"DATA",176.112,34071,0)
+4011747^CATHETER BALLOON SILICONE 18FR 5CC
+"DATA",176.112,34071,1)
+488189^^Y
+"DATA",176.112,34072,0)
+4011751^CATHETER BALLOON SILICONE 20FR 30CC
+"DATA",176.112,34072,1)
+488190^^Y
+"DATA",176.112,34073,0)
+4011748^CATHETER BALLOON SILICONE 20FR 5CC
+"DATA",176.112,34073,1)
+488191^^Y
+"DATA",176.112,34074,0)
+4011749^CATHETER BALLOON SILICONE 24FR 5CC
+"DATA",176.112,34074,1)
+488192^^Y
+"DATA",176.112,34075,0)
+4011750^CATHETER BALLOON SILICONE 26FR 5CC
+"DATA",176.112,34075,1)
+488193^^Y
+"DATA",176.112,34076,0)
+4011752^CATHETER BALLOON SILICONE 28FR 30CC
+"DATA",176.112,34076,1)
+488194^^Y
+"DATA",176.112,34077,0)
+4013493^CATHETER COUDE 12FR
+"DATA",176.112,34077,1)
+488195^^Y
+"DATA",176.112,34078,0)
+4011753^CATHETER COUDE 14FR
+"DATA",176.112,34078,1)
+488196^^Y
+"DATA",176.112,34079,0)
+4011754^CATHETER COUDE 16FR
+"DATA",176.112,34079,1)
+488197^^Y
+"DATA",176.112,34080,0)
+4011755^CATHETER COUDE 18FR
+"DATA",176.112,34080,1)
+488198^^Y
+"DATA",176.112,34081,0)
+4011756^CATHETER COUDE 20FR
+"DATA",176.112,34081,1)
+488199^^Y
+"DATA",176.112,34082,0)
+4013495^CATHETER FOLEY 12FR
+"DATA",176.112,34082,1)
+488200^^Y
+"DATA",176.112,34083,0)
+4014829^CATHETER FOLEY 12FR 5CC LUBRICATH BARD#0165L12
+"DATA",176.112,34083,1)
+488201^^Y
+"DATA",176.112,34084,0)
+4015016^CATHETER FOLEY 12FR 5CC ROCHESTER #14212
+"DATA",176.112,34084,1)
+488202^^Y
+"DATA",176.112,34085,0)
+4013496^CATHETER FOLEY 14FR
+"DATA",176.112,34085,1)
+488203^^Y
+"DATA",176.112,34086,0)
+4014832^CATHETER FOLEY 14FR 5CC LUBRICATH BARD#0165L14
+"DATA",176.112,34086,1)
+488204^^Y
+"DATA",176.112,34087,0)
+4015017^CATHETER FOLEY 14FR 5CC ROCHESTER #14214
+"DATA",176.112,34087,1)
+488205^^Y
+"DATA",176.112,34088,0)
+4014830^CATHETER FOLEY 14FR LUBRICATH BARD#0165L14
+"DATA",176.112,34088,1)
+488206^^Y
+"DATA",176.112,34089,0)
+4011757^CATHETER FOLEY 16FR
+"DATA",176.112,34089,1)
+488207^^Y
+"DATA",176.112,34090,0)
+4014828^CATHETER FOLEY 16FR 5CC LUBRICATH BARD#0165L16
+"DATA",176.112,34090,1)
+488208^^Y
+"DATA",176.112,34091,0)
+4015018^CATHETER FOLEY 16FR 5CC ROCHESTER #14216
+"DATA",176.112,34091,1)
+488209^^Y
+"DATA",176.112,34092,0)
+4014831^CATHETER FOLEY 18FR 5CC LUBRICATH BARD#0165L18
+"DATA",176.112,34092,1)
+488210^^Y
+"DATA",176.112,34093,0)
+4015019^CATHETER FOLEY 18FR 5CC ROCHESTER #14218
+"DATA",176.112,34093,1)
+488211^^Y
+"DATA",176.112,34094,0)
+4011758^CATHETER FOLEY 20FR
+"DATA",176.112,34094,1)
+488212^^Y
+"DATA",176.112,34095,0)
+4014833^CATHETER FOLEY 20FR 5CC LUBRICATH BARD#0165L20
+"DATA",176.112,34095,1)
+488213^^Y
+"DATA",176.112,34096,0)
+4015020^CATHETER FOLEY 20FR 5CC ROCHESTER #14220
+"DATA",176.112,34096,1)
+488214^^Y
+"DATA",176.112,34097,0)
+4011759^CATHETER FOLEY 22FR
+"DATA",176.112,34097,1)
+488215^^Y
+"DATA",176.112,34098,0)
+4014503^CATHETER FOLEY 22FR 5CC LUBRICATH BARD#0165L22
+"DATA",176.112,34098,1)
+488216^^Y
+"DATA",176.112,34099,0)
+4015021^CATHETER FOLEY 22FR 5CC ROCHESTER #14222
+"DATA",176.112,34099,1)
+488217^^Y
+"DATA",176.112,34100,0)
+4011760^CATHETER FOLEY 24FR
+"DATA",176.112,34100,1)
+488218^^Y
+"DATA",176.112,34101,0)
+4014504^CATHETER FOLEY 24FR 5CC LUBRICATH BARD#0165L24
+"DATA",176.112,34101,1)
+488219^^Y
+"DATA",176.112,34102,0)
+4015022^CATHETER FOLEY 24FR 5CC ROCHESTER #14224
+"DATA",176.112,34102,1)
+488220^^Y
+"DATA",176.112,34103,0)
+4011761^CATHETER FOLEY 26FR
+"DATA",176.112,34103,1)
+488221^^Y
+"DATA",176.112,34104,0)
+4014864^CATHETER FOLEY 26FR 5CC LUBRICATH BARD#0165L26
+"DATA",176.112,34104,1)
+488222^^Y
+"DATA",176.112,34105,0)
+4014865^CATHETER FOLEY 28FR 5CC LUBRICATH BARD#0165L28
+"DATA",176.112,34105,1)
+488223^^Y
+"DATA",176.112,34106,0)
+4014866^CATHETER FOLEY 30FR 5CC LUBRICATH BARD#0165L30
+"DATA",176.112,34106,1)
+488224^^Y
+"DATA",176.112,34107,0)
+4015649^CATHETER FOLEY 5CC BARD#0168L12
+"DATA",176.112,34107,1)
+488225^^Y
+"DATA",176.112,34108,0)
+4015651^CATHETER FOLEY 5CC BARD#0168L14
+"DATA",176.112,34108,1)
+488226^^Y
+"DATA",176.112,34109,0)
+4015652^CATHETER FOLEY 5CC BARD#0168L16
+"DATA",176.112,34109,1)
+488227^^Y
+"DATA",176.112,34110,0)
+4015653^CATHETER FOLEY 5CC BARD#0168L18
+"DATA",176.112,34110,1)
+488228^^Y
+"DATA",176.112,34111,0)
+4015654^CATHETER FOLEY 5CC BARD#0168L20
+"DATA",176.112,34111,1)
+488229^^Y
+"DATA",176.112,34112,0)
+4015655^CATHETER FOLEY 5CC BARD#0168L22
+"DATA",176.112,34112,1)
+488230^^Y
+"DATA",176.112,34113,0)
+4015656^CATHETER FOLEY 5CC BARD#0168L24
+"DATA",176.112,34113,1)
+488231^^Y
+"DATA",176.112,34114,0)
+4017348^CATHETER FOLEY 8FR 3CC MEDLINE #DYND11708
+"DATA",176.112,34114,1)
+488232^^Y
+"DATA",176.112,34115,0)
+4016543^CATHETER HOLDER,FOLEY NON-LATEX DALE
+"DATA",176.112,34115,1)
+488233^^Y
+"DATA",176.112,34116,0)
+4012669^CATHETER HOLDER,LATEX NU-HOPE #9070
+"DATA",176.112,34116,1)
+488234^^Y
+"DATA",176.112,34117,0)
+4012342^CATHETER PLUG W/DRAIN TUBE COVER
+"DATA",176.112,34117,1)
+488235^^Y
+"DATA",176.112,34118,0)
+4014244^CATHETER SILASTIC 14FR 5CC
+"DATA",176.112,34118,1)
+488236^^Y
+"DATA",176.112,34119,0)
+4014249^CATHETER SILASTIC 16FR 30CC
+"DATA",176.112,34119,1)
+488237^^Y
+"DATA",176.112,34120,0)
+4014245^CATHETER SILASTIC 16FR 5CC
+"DATA",176.112,34120,1)
+488238^^Y
+"DATA",176.112,34121,0)
+4014250^CATHETER SILASTIC 18FR 30CC
+"DATA",176.112,34121,1)
+488239^^Y
+"DATA",176.112,34122,0)
+4014246^CATHETER SILASTIC 18FR 5CC
+"DATA",176.112,34122,1)
+488240^^Y
+"DATA",176.112,34123,0)
+4014251^CATHETER SILASTIC 20FR 30CC
+"DATA",176.112,34123,1)
+488241^^Y
+"DATA",176.112,34124,0)
+4014247^CATHETER SILASTIC 20FR 5CC
+"DATA",176.112,34124,1)
+488242^^Y
+"DATA",176.112,34125,0)
+4014252^CATHETER SILASTIC 22FR 30CC
+"DATA",176.112,34125,1)
+488243^^Y
+"DATA",176.112,34126,0)
+4014343^CATHETER SILASTIC 22FR 5CC
+"DATA",176.112,34126,1)
+488244^^Y
+"DATA",176.112,34127,0)
+4014253^CATHETER SILASTIC 24FR 30CC
+"DATA",176.112,34127,1)
+488245^^Y
+"DATA",176.112,34128,0)
+4014248^CATHETER SILASTIC 24FR 5CC
+"DATA",176.112,34128,1)
+488246^^Y
+"DATA",176.112,34129,0)
+4014254^CATHETER SILASTIC 26FR 30CC
+"DATA",176.112,34129,1)
+488247^^Y
+"DATA",176.112,34130,0)
+4015953^CATHETER SILASTIC 26FR 5CC
+"DATA",176.112,34130,1)
+488248^^Y
+"DATA",176.112,34131,0)
+4014255^CATHETER SILASTIC 28FR 30CC
+"DATA",176.112,34131,1)
+488249^^Y
+"DATA",176.112,34132,0)
+4016479^CATHETER,CLEAN-CATH VINYL 10FR BARD#421610
+"DATA",176.112,34132,1)
+488250^^Y
+"DATA",176.112,34133,0)
+4016478^CATHETER,CLEAN-CATH VINYL 12FR BARD#421612
+"DATA",176.112,34133,1)
+488251^^Y
+"DATA",176.112,34134,0)
+4016477^CATHETER,CLEAN-CATH VINYL 14FR BARD#421614
+"DATA",176.112,34134,1)
+488252^^Y
+"DATA",176.112,34135,0)
+4011832^CATHETER,COMFORT CATH 1 SIERRA#51001B,SM
+"DATA",176.112,34135,1)
+488253^^Y
+"DATA",176.112,34136,0)
+4011833^CATHETER,COMFORT CATH 1 SIERRA#51002B,MED
+"DATA",176.112,34136,1)
+488254^^Y
+"DATA",176.112,34137,0)
+4011834^CATHETER,COMFORT CATH 1 SIERRA#51003B,LG
+"DATA",176.112,34137,1)
+488255^^Y
+"DATA",176.112,34138,0)
+4015514^CATHETER,COUDE LOFRIC 10FR ASTRATECH #961040
+"DATA",176.112,34138,1)
+488256^^Y
+"DATA",176.112,34139,0)
+4015515^CATHETER,COUDE LOFRIC 12FR ASTATECH #961240
+"DATA",176.112,34139,1)
+488257^^Y
+"DATA",176.112,34140,0)
+4015516^CATHETER,COUDE LOFRIC 14FR ASTRATECH #961440
+"DATA",176.112,34140,1)
+488258^^Y
+"DATA",176.112,34141,0)
+4015517^CATHETER,COUDE LOFRIC 16FR ASTRATECH #961640
+"DATA",176.112,34141,1)
+488259^^Y
+"DATA",176.112,34142,0)
+4015518^CATHETER,COUDE LOFRIC 18FR ASTRATECH #961840
+"DATA",176.112,34142,1)
+488260^^Y
+"DATA",176.112,34143,0)
+4015519^CATHETER,COUDE LOFRIC 20FR ASTRATECH #962040
+"DATA",176.112,34143,1)
+488261^^Y
+"DATA",176.112,34144,0)
+4016534^CATHETER,EXTERNAL 2IN TUBE LG UROCARE #510235
+"DATA",176.112,34144,1)
+488262^^Y
+"DATA",176.112,34145,0)
+4016528^CATHETER,EXTERNAL 2IN TUBE LG UROCARE #511235
+"DATA",176.112,34145,1)
+488263^^Y
+"DATA",176.112,34146,0)
+4016522^CATHETER,EXTERNAL 2IN TUBE LG UROCARE #512235
+"DATA",176.112,34146,1)
+488264^^Y
+"DATA",176.112,34147,0)
+4016535^CATHETER,EXTERNAL 2IN TUBE SM UROCARE #510225
+"DATA",176.112,34147,1)
+488265^^Y
+"DATA",176.112,34148,0)
+4016530^CATHETER,EXTERNAL 2IN TUBE SM UROCARE #511225
+"DATA",176.112,34148,1)
+488266^^Y
+"DATA",176.112,34149,0)
+4016529^CATHETER,EXTERNAL 2IN TUBE STD UROCARE #511230
+"DATA",176.112,34149,1)
+488267^^Y
+"DATA",176.112,34150,0)
+4016523^CATHETER,EXTERNAL 2IN TUBE STD UROCARE #512230
+"DATA",176.112,34150,1)
+488268^^Y
+"DATA",176.112,34151,0)
+4011798^CATHETER,EXTERNAL 2IN TUBE UROCARE501230
+"DATA",176.112,34151,1)
+488269^^Y
+"DATA",176.112,34152,0)
+4016641^CATHETER,EXTERNAL 2IN TUBE UROCARE510230
+"DATA",176.112,34152,1)
+488270^^Y
+"DATA",176.112,34153,0)
+4016531^CATHETER,EXTERNAL 4IN TUBE LG UROCARE #510435
+"DATA",176.112,34153,1)
+488271^^Y
+"DATA",176.112,34154,0)
+4016524^CATHETER,EXTERNAL 4IN TUBE LG UROCARE #511435
+"DATA",176.112,34154,1)
+488272^^Y
+"DATA",176.112,34155,0)
+4016520^CATHETER,EXTERNAL 4IN TUBE LG UROCARE #512435
+"DATA",176.112,34155,1)
+488273^^Y
+"DATA",176.112,34156,0)
+4011796^CATHETER,EXTERNAL 4IN TUBE SHIELD#45010
+"DATA",176.112,34156,1)
+488274^^Y
+"DATA",176.112,34157,0)
+4016533^CATHETER,EXTERNAL 4IN TUBE SM UROCARE #510425
+"DATA",176.112,34157,1)
+488275^^Y
+"DATA",176.112,34158,0)
+4016527^CATHETER,EXTERNAL 4IN TUBE SM UROCARE #511425
+"DATA",176.112,34158,1)
+488276^^Y
+"DATA",176.112,34159,0)
+4016526^CATHETER,EXTERNAL 4IN TUBE SM UROCARE #511430
+"DATA",176.112,34159,1)
+488277^^Y
+"DATA",176.112,34160,0)
+4016532^CATHETER,EXTERNAL 4IN TUBE STD UROCARE #510430
+"DATA",176.112,34160,1)
+488278^^Y
+"DATA",176.112,34161,0)
+4016525^CATHETER,EXTERNAL 4IN TUBE STD UROCARE #511430
+"DATA",176.112,34161,1)
+488279^^Y
+"DATA",176.112,34162,0)
+4016521^CATHETER,EXTERNAL 4IN TUBE STD UROCARE #512430
+"DATA",176.112,34162,1)
+488280^^Y
+"DATA",176.112,34163,0)
+4011857^CATHETER,EXTERNAL CONVEEN #5025 SMALL
+"DATA",176.112,34163,1)
+488281^^Y
+"DATA",176.112,34164,0)
+4011856^CATHETER,EXTERNAL CONVEEN #5030 MEDIUM
+"DATA",176.112,34164,1)
+488282^^Y
+"DATA",176.112,34165,0)
+4011855^CATHETER,EXTERNAL CONVEEN #5035 LARGE
+"DATA",176.112,34165,1)
+488283^^Y
+"DATA",176.112,34166,0)
+4011849^CATHETER,EXTERNAL CONVEEN #5120 GERIATRIC/PEDIATRIC
+"DATA",176.112,34166,1)
+488284^^Y
+"DATA",176.112,34167,0)
+4011819^CATHETER,EXTERNAL CONVEEN #5125 SMALL
+"DATA",176.112,34167,1)
+488285^^Y
+"DATA",176.112,34168,0)
+4011820^CATHETER,EXTERNAL CONVEEN #5130 MEDIUM
+"DATA",176.112,34168,1)
+488286^^Y
+"DATA",176.112,34169,0)
+4011821^CATHETER,EXTERNAL CONVEEN #5135 LARGE
+"DATA",176.112,34169,1)
+488287^^Y
+"DATA",176.112,34170,0)
+4011822^CATHETER,EXTERNAL CONVEEN #5140 X-LARGE
+"DATA",176.112,34170,1)
+488288^^Y
+"DATA",176.112,34171,0)
+4011854^CATHETER,EXTERNAL CONVEEN #5161 MEDIUM
+"DATA",176.112,34171,1)
+488289^^Y
+"DATA",176.112,34172,0)
+4011846^CATHETER,EXTERNAL CONVEEN #5200 SMALL
+"DATA",176.112,34172,1)
+488290^^Y
+"DATA",176.112,34173,0)
+4011847^CATHETER,EXTERNAL CONVEEN #5205 MEDIUM
+"DATA",176.112,34173,1)
+488291^^Y
+"DATA",176.112,34174,0)
+4011848^CATHETER,EXTERNAL CONVEEN #5210 LARGE
+"DATA",176.112,34174,1)
+488292^^Y
+"DATA",176.112,34175,0)
+4011859^CATHETER,EXTERNAL CONVEEN #5225 SMALL
+"DATA",176.112,34175,1)
+488293^^Y
+"DATA",176.112,34176,0)
+4011823^CATHETER,EXTERNAL CONVEEN #5230 S/S MED
+"DATA",176.112,34176,1)
+488294^^Y
+"DATA",176.112,34177,0)
+4011858^CATHETER,EXTERNAL CONVEEN #5235 LARGE
+"DATA",176.112,34177,1)
+488295^^Y
+"DATA",176.112,34178,0)
+4016441^CATHETER,EXTERNAL EVERYDAY H#9626
+"DATA",176.112,34178,1)
+488296^^Y
+"DATA",176.112,34179,0)
+4016442^CATHETER,EXTERNAL EVERYDAY H#9627
+"DATA",176.112,34179,1)
+488297^^Y
+"DATA",176.112,34180,0)
+4016443^CATHETER,EXTERNAL EVERYDAY H#9628
+"DATA",176.112,34180,1)
+488298^^Y
+"DATA",176.112,34181,0)
+4016444^CATHETER,EXTERNAL EVERYDAY H#9629
+"DATA",176.112,34181,1)
+488299^^Y
+"DATA",176.112,34182,0)
+4017156^CATHETER,EXTERNAL EXO-CATH LG M#DYND12301
+"DATA",176.112,34182,1)
+488300^^Y
+"DATA",176.112,34183,0)
+4017157^CATHETER,EXTERNAL EXO-CATH MED M#DYND12302
+"DATA",176.112,34183,1)
+488301^^Y
+"DATA",176.112,34184,0)
+4017158^CATHETER,EXTERNAL EXO-CATH SMALL M#DYND12303
+"DATA",176.112,34184,1)
+488302^^Y
+"DATA",176.112,34185,0)
+4011767^CATHETER,EXTERNAL EXTENDED WEAR H#9806
+"DATA",176.112,34185,1)
+488303^^Y
+"DATA",176.112,34186,0)
+4011784^CATHETER,EXTERNAL EXTENDED WEAR H#9807
+"DATA",176.112,34186,1)
+488304^^Y
+"DATA",176.112,34187,0)
+4011768^CATHETER,EXTERNAL EXTENDED WEAR H#9808
+"DATA",176.112,34187,1)
+488305^^Y
+"DATA",176.112,34188,0)
+4011785^CATHETER,EXTERNAL EXTENDED WEAR H#9809
+"DATA",176.112,34188,1)
+488306^^Y
+"DATA",176.112,34189,0)
+4011739^CATHETER,EXTERNAL EXTENDED WEAR H#9827
+"DATA",176.112,34189,1)
+488307^^Y
+"DATA",176.112,34190,0)
+4011771^CATHETER,EXTERNAL EXTENDED WEAR H#9828
+"DATA",176.112,34190,1)
+488308^^Y
+"DATA",176.112,34191,0)
+4015255^CATHETER,EXTERNAL EXTENDED WEAR H#9829
+"DATA",176.112,34191,1)
+488309^^Y
+"DATA",176.112,34192,0)
+4011844^CATHETER,EXTERNAL EXTENDED WEAR H#9897
+"DATA",176.112,34192,1)
+488310^^Y
+"DATA",176.112,34193,0)
+4011845^CATHETER,EXTERNAL EXTENDED WEAR H#9898
+"DATA",176.112,34193,1)
+488311^^Y
+"DATA",176.112,34194,0)
+4015919^CATHETER,EXTERNAL FREEDOM MENTOR #5190
+"DATA",176.112,34194,1)
+488312^^Y
+"DATA",176.112,34195,0)
+4015920^CATHETER,EXTERNAL FREEDOM MENTOR #5290
+"DATA",176.112,34195,1)
+488313^^Y
+"DATA",176.112,34196,0)
+4015921^CATHETER,EXTERNAL FREEDOM MENTOR #5390
+"DATA",176.112,34196,1)
+488314^^Y
+"DATA",176.112,34197,0)
+4015922^CATHETER,EXTERNAL FREEDOM MENTOR #5490
+"DATA",176.112,34197,1)
+488315^^Y
+"DATA",176.112,34198,0)
+4015923^CATHETER,EXTERNAL FREEDOM MENTOR #5590
+"DATA",176.112,34198,1)
+488316^^Y
+"DATA",176.112,34199,0)
+4016480^CATHETER,EXTERNAL GOLDEN DRAIN LG #A1300
+"DATA",176.112,34199,1)
+488317^^Y
+"DATA",176.112,34200,0)
+4011782^CATHETER,EXTERNAL GOLDEN DRAIN LG #A1400
+"DATA",176.112,34200,1)
+488318^^Y
+"DATA",176.112,34201,0)
+4011795^CATHETER,EXTERNAL GOLDEN DRAIN LG #A2000
+"DATA",176.112,34201,1)
+488319^^Y
+"DATA",176.112,34202,0)
+4016481^CATHETER,EXTERNAL GOLDEN DRAIN MED #A1300M
+"DATA",176.112,34202,1)
+488320^^Y
+"DATA",176.112,34203,0)
+4016482^CATHETER,EXTERNAL GOLDEN DRAIN SMALL #A1300S
+"DATA",176.112,34203,1)
+488321^^Y
+"DATA",176.112,34204,0)
+4011828^CATHETER,EXTERNAL H#9606
+"DATA",176.112,34204,1)
+488322^^Y
+"DATA",176.112,34205,0)
+4011829^CATHETER,EXTERNAL H#9607
+"DATA",176.112,34205,1)
+488323^^Y
+"DATA",176.112,34206,0)
+4011830^CATHETER,EXTERNAL H#9608
+"DATA",176.112,34206,1)
+488324^^Y
+"DATA",176.112,34207,0)
+4011831^CATHETER,EXTERNAL H#9609
+"DATA",176.112,34207,1)
+488325^^Y
+"DATA",176.112,34208,0)
+4014995^CATHETER,EXTERNAL INTERM LHB #451-7652
+"DATA",176.112,34208,1)
+488326^^Y
+"DATA",176.112,34209,0)
+4014996^CATHETER,EXTERNAL INTERM LHB #451-7653
+"DATA",176.112,34209,1)
+488327^^Y
+"DATA",176.112,34210,0)
+4015003^CATHETER,EXTERNAL INTERM LHB #451-8065
+"DATA",176.112,34210,1)
+488328^^Y
+"DATA",176.112,34211,0)
+4015004^CATHETER,EXTERNAL INTERM LHB #451-8066
+"DATA",176.112,34211,1)
+488329^^Y
+"DATA",176.112,34212,0)
+4014888^CATHETER,EXTERNAL INTERM ROCHESTER #33103/33303
+"DATA",176.112,34212,1)
+488330^^Y
+"DATA",176.112,34213,0)
+4014869^CATHETER,EXTERNAL INTERM. ROCHESTER #33103
+"DATA",176.112,34213,1)
+488331^^Y
+"DATA",176.112,34214,0)
+4013486^CATHETER,EXTERNAL INTERMED MENTOR #8305
+"DATA",176.112,34214,1)
+488332^^Y
+"DATA",176.112,34215,0)
+4013489^CATHETER,EXTERNAL INTERMED MENTOR #8335
+"DATA",176.112,34215,1)
+488333^^Y
+"DATA",176.112,34216,0)
+4015030^CATHETER,EXTERNAL INTERMED ROCHESTER #32303/32103
+"DATA",176.112,34216,1)
+488334^^Y
+"DATA",176.112,34217,0)
+4015063^CATHETER,EXTERNAL INTERMED ROCHESTER #38303
+"DATA",176.112,34217,1)
+488335^^Y
+"DATA",176.112,34218,0)
+4015025^CATHETER,EXTERNAL INTERMED. ROCHESTER #36303/36103
+"DATA",176.112,34218,1)
+488336^^Y
+"DATA",176.112,34219,0)
+4014893^CATHETER,EXTERNAL KENDALL #3201 STD
+"DATA",176.112,34219,1)
+488337^^Y
+"DATA",176.112,34220,0)
+4014894^CATHETER,EXTERNAL KENDALL #3597 MEDIUM
+"DATA",176.112,34220,1)
+488338^^Y
+"DATA",176.112,34221,0)
+4014895^CATHETER,EXTERNAL KENDALL #3655 STD
+"DATA",176.112,34221,1)
+488339^^Y
+"DATA",176.112,34222,0)
+4014896^CATHETER,EXTERNAL KENDALL #3928 MEDIUM
+"DATA",176.112,34222,1)
+488340^^Y
+"DATA",176.112,34223,0)
+4014998^CATHETER,EXTERNAL LARGE LHB #451-7654
+"DATA",176.112,34223,1)
+488341^^Y
+"DATA",176.112,34224,0)
+4014997^CATHETER,EXTERNAL LARGE LHB #451-7655
+"DATA",176.112,34224,1)
+488342^^Y
+"DATA",176.112,34225,0)
+4015005^CATHETER,EXTERNAL LARGE LHB #451-8068
+"DATA",176.112,34225,1)
+488343^^Y
+"DATA",176.112,34226,0)
+4015006^CATHETER,EXTERNAL LARGE LHB #451-8069
+"DATA",176.112,34226,1)
+488344^^Y
+"DATA",176.112,34227,0)
+4015031^CATHETER,EXTERNAL LARGE ROCHESTER #32304/32104
+"DATA",176.112,34227,1)
+488345^^Y
+"DATA",176.112,34228,0)
+4015026^CATHETER,EXTERNAL LARGE ROCHESTER #36304/36104
+"DATA",176.112,34228,1)
+488346^^Y
+"DATA",176.112,34229,0)
+4015064^CATHETER,EXTERNAL LARGE ROCHESTER #38304
+"DATA",176.112,34229,1)
+488347^^Y
+"DATA",176.112,34230,0)
+4013487^CATHETER,EXTERNAL LG MENTOR #8500
+"DATA",176.112,34230,1)
+488348^^Y
+"DATA",176.112,34231,0)
+4013490^CATHETER,EXTERNAL LG MENTOR #8530
+"DATA",176.112,34231,1)
+488349^^Y
+"DATA",176.112,34232,0)
+4015082^CATHETER,EXTERNAL LHB #6530-00-290-8292
+"DATA",176.112,34232,1)
+488350^^Y
+"DATA",176.112,34233,0)
+4015083^CATHETER,EXTERNAL LHB #6530-01-004-8969
+"DATA",176.112,34233,1)
+488351^^Y
+"DATA",176.112,34234,0)
+4015084^CATHETER,EXTERNAL LHB #6530-01-081-5303
+"DATA",176.112,34234,1)
+488352^^Y
+"DATA",176.112,34235,0)
+4015085^CATHETER,EXTERNAL LHB #6530-01-081-5304
+"DATA",176.112,34235,1)
+488353^^Y
+"DATA",176.112,34236,0)
+4014870^CATHETER,EXTERNAL LRG ROCHESTER #33104
+"DATA",176.112,34236,1)
+488354^^Y
+"DATA",176.112,34237,0)
+4014889^CATHETER,EXTERNAL LRG ROCHESTER #33104/33304
+"DATA",176.112,34237,1)
+488355^^Y
+"DATA",176.112,34238,0)
+4013485^CATHETER,EXTERNAL MED MENTOR #8300
+"DATA",176.112,34238,1)
+488356^^Y
+"DATA",176.112,34239,0)
+4013488^CATHETER,EXTERNAL MED MENTOR #8330
+"DATA",176.112,34239,1)
+488357^^Y
+"DATA",176.112,34240,0)
+4014868^CATHETER,EXTERNAL MED ROCHESTER #33102
+"DATA",176.112,34240,1)
+488358^^Y
+"DATA",176.112,34241,0)
+4014887^CATHETER,EXTERNAL MED ROCHESTER #33102/33302
+"DATA",176.112,34241,1)
+488359^^Y
+"DATA",176.112,34242,0)
+4014993^CATHETER,EXTERNAL MEDIUM LBH #451-7658
+"DATA",176.112,34242,1)
+488360^^Y
+"DATA",176.112,34243,0)
+4014994^CATHETER,EXTERNAL MEDIUM LHB #451-7657
+"DATA",176.112,34243,1)
+488361^^Y
+"DATA",176.112,34244,0)
+4015001^CATHETER,EXTERNAL MEDIUM LHB #451-8071
+"DATA",176.112,34244,1)
+488362^^Y
+"DATA",176.112,34245,0)
+4015002^CATHETER,EXTERNAL MEDIUM LHB #451-8072
+"DATA",176.112,34245,1)
+488363^^Y
+"DATA",176.112,34246,0)
+4015029^CATHETER,EXTERNAL MEDIUM ROCHESTER #32302/32102
+"DATA",176.112,34246,1)
+488364^^Y
+"DATA",176.112,34247,0)
+4015024^CATHETER,EXTERNAL MEDIUM ROCHESTER #36302/36102
+"DATA",176.112,34247,1)
+488365^^Y
+"DATA",176.112,34248,0)
+4015062^CATHETER,EXTERNAL MEDIUM ROCHESTER #38302
+"DATA",176.112,34248,1)
+488366^^Y
+"DATA",176.112,34249,0)
+4011836^CATHETER,EXTERNAL NON-LATEX H#9305
+"DATA",176.112,34249,1)
+488367^^Y
+"DATA",176.112,34250,0)
+4011837^CATHETER,EXTERNAL NON-LATEX H#9306
+"DATA",176.112,34250,1)
+488368^^Y
+"DATA",176.112,34251,0)
+4011838^CATHETER,EXTERNAL NON-LATEX H#9307
+"DATA",176.112,34251,1)
+488369^^Y
+"DATA",176.112,34252,0)
+4011839^CATHETER,EXTERNAL NON-LATEX H#9308
+"DATA",176.112,34252,1)
+488370^^Y
+"DATA",176.112,34253,0)
+4011840^CATHETER,EXTERNAL NON-LATEX H#9309
+"DATA",176.112,34253,1)
+488371^^Y
+"DATA",176.112,34254,0)
+4013503^CATHETER,EXTERNAL NON-LATEX SELF ADHESIVE H#9315
+"DATA",176.112,34254,1)
+488372^^Y
+"DATA",176.112,34255,0)
+4013502^CATHETER,EXTERNAL NON-LATEX SELF ADHESIVE H#9316
+"DATA",176.112,34255,1)
+488373^^Y
+"DATA",176.112,34256,0)
+4013501^CATHETER,EXTERNAL NON-LATEX SELF ADHESIVE H#9317
+"DATA",176.112,34256,1)
+488374^^Y
+"DATA",176.112,34257,0)
+4013500^CATHETER,EXTERNAL NON-LATEX SELF ADHESIVE H#9318
+"DATA",176.112,34257,1)
+488375^^Y
+"DATA",176.112,34258,0)
+4013499^CATHETER,EXTERNAL NON-LATEX SELF ADHESIVE H#9319
+"DATA",176.112,34258,1)
+488376^^Y
+"DATA",176.112,34259,0)
+4011738^CATHETER,EXTERNAL SELF-ADHESIVE H#9826
+"DATA",176.112,34259,1)
+488377^^Y
+"DATA",176.112,34260,0)
+4015011^CATHETER,EXTERNAL SILICONE INTERM LHB #451-7660
+"DATA",176.112,34260,1)
+488378^^Y
+"DATA",176.112,34261,0)
+4015074^CATHETER,EXTERNAL SILICONE INTERM LHB #451-7663
+"DATA",176.112,34261,1)
+488379^^Y
+"DATA",176.112,34262,0)
+4011780^CATHETER,EXTERNAL SILICONE INTERMED 6330
+"DATA",176.112,34262,1)
+488380^^Y
+"DATA",176.112,34263,0)
+4011865^CATHETER,EXTERNAL SILICONE INTERMED MENTOR #6300
+"DATA",176.112,34263,1)
+488381^^Y
+"DATA",176.112,34264,0)
+4016705^CATHETER,EXTERNAL SILICONE INTERMEDIATE LHB #NIB-0063
+"DATA",176.112,34264,1)
+488382^^Y
+"DATA",176.112,34265,0)
+4016709^CATHETER,EXTERNAL SILICONE INTERMEDIATE LHB #NIB-0067
+"DATA",176.112,34265,1)
+488383^^Y
+"DATA",176.112,34266,0)
+4015013^CATHETER,EXTERNAL SILICONE LARGE LHB #451-7662
+"DATA",176.112,34266,1)
+488384^^Y
+"DATA",176.112,34267,0)
+4015012^CATHETER,EXTERNAL SILICONE LARGE LHB #451-7665
+"DATA",176.112,34267,1)
+488385^^Y
+"DATA",176.112,34268,0)
+4016706^CATHETER,EXTERNAL SILICONE LARGE LHB #NIB-0064
+"DATA",176.112,34268,1)
+488386^^Y
+"DATA",176.112,34269,0)
+4016710^CATHETER,EXTERNAL SILICONE LARGE LHB #NIB-0068
+"DATA",176.112,34269,1)
+488387^^Y
+"DATA",176.112,34270,0)
+4011866^CATHETER,EXTERNAL SILICONE LG MENTOR #6400
+"DATA",176.112,34270,1)
+488388^^Y
+"DATA",176.112,34271,0)
+4011861^CATHETER,EXTERNAL SILICONE LG MENTOR #6430
+"DATA",176.112,34271,1)
+488389^^Y
+"DATA",176.112,34272,0)
+4013832^CATHETER,EXTERNAL SILICONE LHB#451-7663
+"DATA",176.112,34272,1)
+488390^^Y
+"DATA",176.112,34273,0)
+4011864^CATHETER,EXTERNAL SILICONE MED MENTOR #6200
+"DATA",176.112,34273,1)
+488391^^Y
+"DATA",176.112,34274,0)
+4011781^CATHETER,EXTERNAL SILICONE MEDIUM #6230
+"DATA",176.112,34274,1)
+488392^^Y
+"DATA",176.112,34275,0)
+4015009^CATHETER,EXTERNAL SILICONE MEDIUM LHB #451-7664
+"DATA",176.112,34275,1)
+488393^^Y
+"DATA",176.112,34276,0)
+4015010^CATHETER,EXTERNAL SILICONE MEDIUM LHB #451-7669
+"DATA",176.112,34276,1)
+488394^^Y
+"DATA",176.112,34277,0)
+4016704^CATHETER,EXTERNAL SILICONE MEDIUM LHB #NIB-0062
+"DATA",176.112,34277,1)
+488395^^Y
+"DATA",176.112,34278,0)
+4016708^CATHETER,EXTERNAL SILICONE MEDIUM LHB #NIB-0066
+"DATA",176.112,34278,1)
+488396^^Y
+"DATA",176.112,34279,0)
+4011863^CATHETER,EXTERNAL SILICONE SM MENTOR #6100
+"DATA",176.112,34279,1)
+488397^^Y
+"DATA",176.112,34280,0)
+4011860^CATHETER,EXTERNAL SILICONE SM MENTOR #6130
+"DATA",176.112,34280,1)
+488398^^Y
+"DATA",176.112,34281,0)
+4015008^CATHETER,EXTERNAL SILICONE SMALL LHB #451-7666
+"DATA",176.112,34281,1)
+488399^^Y
+"DATA",176.112,34282,0)
+4015007^CATHETER,EXTERNAL SILICONE SMALL LHB #451-7668
+"DATA",176.112,34282,1)
+488400^^Y
+"DATA",176.112,34283,0)
+4016702^CATHETER,EXTERNAL SILICONE SMALL LHB #NIB-0060
+"DATA",176.112,34283,1)
+488401^^Y
+"DATA",176.112,34284,0)
+4016703^CATHETER,EXTERNAL SILICONE SMALL LHB #NIB-0061
+"DATA",176.112,34284,1)
+488402^^Y
+"DATA",176.112,34285,0)
+4015014^CATHETER,EXTERNAL SILICONE X-LARGE LHB #451-7667
+"DATA",176.112,34285,1)
+488403^^Y
+"DATA",176.112,34286,0)
+4015015^CATHETER,EXTERNAL SILICONE X-LARGE LHB #451-8067
+"DATA",176.112,34286,1)
+488404^^Y
+"DATA",176.112,34287,0)
+4016707^CATHETER,EXTERNAL SILICONE X-LARGE LHB #NIB-0065
+"DATA",176.112,34287,1)
+488405^^Y
+"DATA",176.112,34288,0)
+4016711^CATHETER,EXTERNAL SILICONE X-LARGE LHB #NIB-0069
+"DATA",176.112,34288,1)
+488406^^Y
+"DATA",176.112,34289,0)
+4011867^CATHETER,EXTERNAL SILICONE XLG MENTOR #6500
+"DATA",176.112,34289,1)
+488407^^Y
+"DATA",176.112,34290,0)
+4011862^CATHETER,EXTERNAL SILICONE XLG MENTOR #6530
+"DATA",176.112,34290,1)
+488408^^Y
+"DATA",176.112,34291,0)
+4013484^CATHETER,EXTERNAL SM MENTOR #8100
+"DATA",176.112,34291,1)
+488409^^Y
+"DATA",176.112,34292,0)
+4014867^CATHETER,EXTERNAL SM ROCHESTER #33101
+"DATA",176.112,34292,1)
+488410^^Y
+"DATA",176.112,34293,0)
+4014886^CATHETER,EXTERNAL SM ROCHESTER #33101/33301
+"DATA",176.112,34293,1)
+488411^^Y
+"DATA",176.112,34294,0)
+4014991^CATHETER,EXTERNAL SMALL LHB #451-7656
+"DATA",176.112,34294,1)
+488412^^Y
+"DATA",176.112,34295,0)
+4014992^CATHETER,EXTERNAL SMALL LHB #451-7659
+"DATA",176.112,34295,1)
+488413^^Y
+"DATA",176.112,34296,0)
+4014999^CATHETER,EXTERNAL SMALL LHB #451-8070
+"DATA",176.112,34296,1)
+488414^^Y
+"DATA",176.112,34297,0)
+4015000^CATHETER,EXTERNAL SMALL LHB #451-8073
+"DATA",176.112,34297,1)
+488415^^Y
+"DATA",176.112,34298,0)
+4015028^CATHETER,EXTERNAL SMALL ROCHESTER #32301/32101
+"DATA",176.112,34298,1)
+488416^^Y
+"DATA",176.112,34299,0)
+4015023^CATHETER,EXTERNAL SMALL ROCHESTER #36301/36101
+"DATA",176.112,34299,1)
+488417^^Y
+"DATA",176.112,34300,0)
+4015061^CATHETER,EXTERNAL SMALL ROCHESTER #38301
+"DATA",176.112,34300,1)
+488418^^Y
+"DATA",176.112,34301,0)
+4011841^CATHETER,EXTERNAL STARTER KIT H#9816
+"DATA",176.112,34301,1)
+488419^^Y
+"DATA",176.112,34302,0)
+4011842^CATHETER,EXTERNAL STARTER KIT H#9817
+"DATA",176.112,34302,1)
+488420^^Y
+"DATA",176.112,34303,0)
+4011843^CATHETER,EXTERNAL STARTER SET H#9818
+"DATA",176.112,34303,1)
+488421^^Y
+"DATA",176.112,34304,0)
+4016860^CATHETER,EXTERNAL STD K#8884730200/300
+"DATA",176.112,34304,1)
+488422^^Y
+"DATA",176.112,34305,0)
+4011786^CATHETER,EXTERNAL STD URI-DRAIN #732300
+"DATA",176.112,34305,1)
+488423^^Y
+"DATA",176.112,34306,0)
+4016861^CATHETER,EXTERNAL STD W/ADH K#8884731300
+"DATA",176.112,34306,1)
+488424^^Y
+"DATA",176.112,34307,0)
+4015966^CATHETER,EXTERNAL URIDRAIN MEDIUM SHERWOOD #SD-734600
+"DATA",176.112,34307,1)
+488425^^Y
+"DATA",176.112,34308,0)
+4015967^CATHETER,EXTERNAL URIDRAIN STANDARD SHERWOOD #SD-732300
+"DATA",176.112,34308,1)
+488426^^Y
+"DATA",176.112,34309,0)
+4011825^CATHETER,EXTERNAL UROSAN PLUS LG #7800
+"DATA",176.112,34309,1)
+488427^^Y
+"DATA",176.112,34310,0)
+4011871^CATHETER,EXTERNAL UROSAN PLUS LG #78003
+"DATA",176.112,34310,1)
+488428^^Y
+"DATA",176.112,34311,0)
+4011826^CATHETER,EXTERNAL UROSAN PLUS MED #7850
+"DATA",176.112,34311,1)
+488429^^Y
+"DATA",176.112,34312,0)
+4011870^CATHETER,EXTERNAL UROSAN PLUS MED #78503
+"DATA",176.112,34312,1)
+488430^^Y
+"DATA",176.112,34313,0)
+4011868^CATHETER,EXTERNAL UROSAN PLUS SM #7875
+"DATA",176.112,34313,1)
+488431^^Y
+"DATA",176.112,34314,0)
+4011869^CATHETER,EXTERNAL UROSAN PLUS SM #78753
+"DATA",176.112,34314,1)
+488432^^Y
+"DATA",176.112,34315,0)
+4011824^CATHETER,EXTERNAL W/DRAIN TUBE
+"DATA",176.112,34315,1)
+488433^^Y
+"DATA",176.112,34316,0)
+4015032^CATHETER,EXTERNAL X-LARGE ROCHESTER #32305/32105
+"DATA",176.112,34316,1)
+488434^^Y
+"DATA",176.112,34317,0)
+4015027^CATHETER,EXTERNAL X-LARGE ROCHESTER #36305/36105
+"DATA",176.112,34317,1)
+488435^^Y
+"DATA",176.112,34318,0)
+4014871^CATHETER,EXTERNAL X-LRG ROCHESTER #33105
+"DATA",176.112,34318,1)
+488436^^Y
+"DATA",176.112,34319,0)
+4014890^CATHETER,EXTERNAL X-LRG ROCHESTER #33105/33305
+"DATA",176.112,34319,1)
+488437^^Y
+"DATA",176.112,34320,0)
+4011765^CATHETER,EXTERNAL/ADHESIVE STRIP LG#5135
+"DATA",176.112,34320,1)
+488438^^Y
+"DATA",176.112,34321,0)
+4015606^CATHETER,FOLEY 12FR 5CC BARD#0165SI-12
+"DATA",176.112,34321,1)
+488439^^Y
+"DATA",176.112,34322,0)
+4015906^CATHETER,FOLEY 12FR 5CC BARD#0165V12
+"DATA",176.112,34322,1)
+488440^^Y
+"DATA",176.112,34323,0)
+4015629^CATHETER,FOLEY 12FR 5CC BARD#165812
+"DATA",176.112,34323,1)
+488441^^Y
+"DATA",176.112,34324,0)
+4015619^CATHETER,FOLEY 14FR 30CC BARD#0166SI-14
+"DATA",176.112,34324,1)
+488442^^Y
+"DATA",176.112,34325,0)
+4015607^CATHETER,FOLEY 14FR 5CC BARD#0165SI-14
+"DATA",176.112,34325,1)
+488443^^Y
+"DATA",176.112,34326,0)
+4015907^CATHETER,FOLEY 14FR 5CC BARD#0165V14
+"DATA",176.112,34326,1)
+488444^^Y
+"DATA",176.112,34327,0)
+4015630^CATHETER,FOLEY 14FR 5CC BARD#165814
+"DATA",176.112,34327,1)
+488445^^Y
+"DATA",176.112,34328,0)
+4015620^CATHETER,FOLEY 16FR 30CC BARD#0166SI-16
+"DATA",176.112,34328,1)
+488446^^Y
+"DATA",176.112,34329,0)
+4015608^CATHETER,FOLEY 16FR 5CC BARD#0165SI-16
+"DATA",176.112,34329,1)
+488447^^Y
+"DATA",176.112,34330,0)
+4015631^CATHETER,FOLEY 16FR 5CC BARD#165816
+"DATA",176.112,34330,1)
+488448^^Y
+"DATA",176.112,34331,0)
+4015908^CATHETER,FOLEY 16FR BARD#0165V16
+"DATA",176.112,34331,1)
+488449^^Y
+"DATA",176.112,34332,0)
+4015621^CATHETER,FOLEY 18FR 30CC BARD#0166SI-18
+"DATA",176.112,34332,1)
+488450^^Y
+"DATA",176.112,34333,0)
+4015609^CATHETER,FOLEY 18FR 5CC BARD#0165SI-18
+"DATA",176.112,34333,1)
+488451^^Y
+"DATA",176.112,34334,0)
+4015632^CATHETER,FOLEY 18FR 5CC BARD#165818
+"DATA",176.112,34334,1)
+488452^^Y
+"DATA",176.112,34335,0)
+4015909^CATHETER,FOLEY 18FR BARD#0165V18
+"DATA",176.112,34335,1)
+488453^^Y
+"DATA",176.112,34336,0)
+4015622^CATHETER,FOLEY 20FR 30CC BARD#0166SI-20
+"DATA",176.112,34336,1)
+488454^^Y
+"DATA",176.112,34337,0)
+4015610^CATHETER,FOLEY 20FR 5CC BARD#0165SI-20
+"DATA",176.112,34337,1)
+488455^^Y
+"DATA",176.112,34338,0)
+4015633^CATHETER,FOLEY 20FR 5CC BARD#165820
+"DATA",176.112,34338,1)
+488456^^Y
+"DATA",176.112,34339,0)
+4015910^CATHETER,FOLEY 20FR BARD#0165V20
+"DATA",176.112,34339,1)
+488457^^Y
+"DATA",176.112,34340,0)
+4015623^CATHETER,FOLEY 22FR 30CC BARD#0166SI-22
+"DATA",176.112,34340,1)
+488458^^Y
+"DATA",176.112,34341,0)
+4015611^CATHETER,FOLEY 22FR 5CC BARD#0165SI-22
+"DATA",176.112,34341,1)
+488459^^Y
+"DATA",176.112,34342,0)
+4015634^CATHETER,FOLEY 22FR 5CC BARD#165822
+"DATA",176.112,34342,1)
+488460^^Y
+"DATA",176.112,34343,0)
+4015911^CATHETER,FOLEY 22FR BARD#0165V22
+"DATA",176.112,34343,1)
+488461^^Y
+"DATA",176.112,34344,0)
+4015624^CATHETER,FOLEY 24FR 30CC BARD#0166SI-24
+"DATA",176.112,34344,1)
+488462^^Y
+"DATA",176.112,34345,0)
+4015613^CATHETER,FOLEY 24FR 5CC BARD#0165SI-24
+"DATA",176.112,34345,1)
+488463^^Y
+"DATA",176.112,34346,0)
+4015635^CATHETER,FOLEY 24FR 5CC BARD#165824
+"DATA",176.112,34346,1)
+488464^^Y
+"DATA",176.112,34347,0)
+4015612^CATHETER,FOLEY 24FR BARD#0165SI-24
+"DATA",176.112,34347,1)
+488465^^Y
+"DATA",176.112,34348,0)
+4015912^CATHETER,FOLEY 24FR BARD#0165V24
+"DATA",176.112,34348,1)
+488466^^Y
+"DATA",176.112,34349,0)
+4015625^CATHETER,FOLEY 26FR 30CC BARD#0166SI-26
+"DATA",176.112,34349,1)
+488467^^Y
+"DATA",176.112,34350,0)
+4015614^CATHETER,FOLEY 26FR 5CC BARD#0165SI-26
+"DATA",176.112,34350,1)
+488468^^Y
+"DATA",176.112,34351,0)
+4015636^CATHETER,FOLEY 26FR 5CC BARD#165826
+"DATA",176.112,34351,1)
+488469^^Y
+"DATA",176.112,34352,0)
+4015913^CATHETER,FOLEY 26FR BARD#0165V26
+"DATA",176.112,34352,1)
+488470^^Y
+"DATA",176.112,34353,0)
+4015626^CATHETER,FOLEY 28FR 30CC BARD#0166SI-28
+"DATA",176.112,34353,1)
+488471^^Y
+"DATA",176.112,34354,0)
+4015615^CATHETER,FOLEY 28FR 5CC BARD#0165SI-28
+"DATA",176.112,34354,1)
+488472^^Y
+"DATA",176.112,34355,0)
+4015637^CATHETER,FOLEY 28FR 5CC BARD#165828
+"DATA",176.112,34355,1)
+488473^^Y
+"DATA",176.112,34356,0)
+4015914^CATHETER,FOLEY 28FR BARD#0165V28
+"DATA",176.112,34356,1)
+488474^^Y
+"DATA",176.112,34357,0)
+4015627^CATHETER,FOLEY 30FR 30CC BARD#0166SI-30
+"DATA",176.112,34357,1)
+488475^^Y
+"DATA",176.112,34358,0)
+4015616^CATHETER,FOLEY 30FR 5CC BARD#0165SI-30
+"DATA",176.112,34358,1)
+488476^^Y
+"DATA",176.112,34359,0)
+4015638^CATHETER,FOLEY 30FR 5CC BARD#165830
+"DATA",176.112,34359,1)
+488477^^Y
+"DATA",176.112,34360,0)
+4015915^CATHETER,FOLEY 30FR BARD#0165V30
+"DATA",176.112,34360,1)
+488478^^Y
+"DATA",176.112,34361,0)
+4011827^CATHETER,FOLEY 30FR,30CC
+"DATA",176.112,34361,1)
+488479^^Y
+"DATA",176.112,34362,0)
+4011806^CATHETER,FOLEY SILICONE 14FR 30CC
+"DATA",176.112,34362,1)
+488480^^Y
+"DATA",176.112,34363,0)
+4011805^CATHETER,FOLEY SILICONE 14FR 5CC
+"DATA",176.112,34363,1)
+488481^^Y
+"DATA",176.112,34364,0)
+4011807^CATHETER,FOLEY SILICONE 16FR 30CC
+"DATA",176.112,34364,1)
+488482^^Y
+"DATA",176.112,34365,0)
+4011912^CATHETER,FOLEY SILICONE 16FR 5CC
+"DATA",176.112,34365,1)
+488483^^Y
+"DATA",176.112,34366,0)
+4011808^CATHETER,FOLEY SILICONE 18FR 30CC
+"DATA",176.112,34366,1)
+488484^^Y
+"DATA",176.112,34367,0)
+4015488^CATHETER,FOLEY SILICONE 18FR 5CC
+"DATA",176.112,34367,1)
+488485^^Y
+"DATA",176.112,34368,0)
+4017169^CATHETER,FOLEY SILICONE 20FR 5CC
+"DATA",176.112,34368,1)
+488486^^Y
+"DATA",176.112,34369,0)
+4011809^CATHETER,FOLEY SILICONE 22FR 30CC
+"DATA",176.112,34369,1)
+488487^^Y
+"DATA",176.112,34370,0)
+4015489^CATHETER,FOLEY SILICONE 22FR 5CC
+"DATA",176.112,34370,1)
+488488^^Y
+"DATA",176.112,34371,0)
+4015490^CATHETER,FOLEY SILICONE 24FR 5CC
+"DATA",176.112,34371,1)
+488489^^Y
+"DATA",176.112,34372,0)
+4011810^CATHETER,FOLEY SILICONE 26FR 30CC
+"DATA",176.112,34372,1)
+488490^^Y
+"DATA",176.112,34373,0)
+4015589^CATHETER,FOLEY SILICONE 28FR 30CC
+"DATA",176.112,34373,1)
+488491^^Y
+"DATA",176.112,34374,0)
+4011811^CATHETER,FOLEY SILICONE 28FR 5CC
+"DATA",176.112,34374,1)
+488492^^Y
+"DATA",176.112,34375,0)
+4015429^CATHETER,INSERTION SET DOVER 10CC KENDALL #1220
+"DATA",176.112,34375,1)
+488493^^Y
+"DATA",176.112,34376,0)
+4015430^CATHETER,INSERTION SET DOVER 10CC KENDALL #1238
+"DATA",176.112,34376,1)
+488494^^Y
+"DATA",176.112,34377,0)
+4015431^CATHETER,INSERTION SET DOVER 30CC KENDALL #1261
+"DATA",176.112,34377,1)
+488495^^Y
+"DATA",176.112,34378,0)
+4015432^CATHETER,INSERTION SET DOVER 30CC KENDALL #1295
+"DATA",176.112,34378,1)
+488496^^Y
+"DATA",176.112,34379,0)
+4014975^CATHETER,INTERM,SILICONE 12FR ROCHESTER #63312
+"DATA",176.112,34379,1)
+488497^^Y
+"DATA",176.112,34380,0)
+4014976^CATHETER,INTERM,SILICONE 14FR ROCHESTER #63314
+"DATA",176.112,34380,1)
+488498^^Y
+"DATA",176.112,34381,0)
+4014977^CATHETER,INTERM,SILICONE 16FR ROCHESTER #63316
+"DATA",176.112,34381,1)
+488499^^Y
+"DATA",176.112,34382,0)
+4015659^CATHETER,INTERMITTENT 10FR CONVEEN #5320
+"DATA",176.112,34382,1)
+488500^^Y
+"DATA",176.112,34383,0)
+4015660^CATHETER,INTERMITTENT 12FR CONVEEN #5322
+"DATA",176.112,34383,1)
+488501^^Y
+"DATA",176.112,34384,0)
+4015661^CATHETER,INTERMITTENT 14FR CONVEEN #5324
+"DATA",176.112,34384,1)
+488502^^Y
+"DATA",176.112,34385,0)
+4015957^CATHETER,INTERMITTENT 16FR CONVEEN #5326
+"DATA",176.112,34385,1)
+488503^^Y
+"DATA",176.112,34386,0)
+4015662^CATHETER,INTERMITTENT 18FR CONVEEN #5326
+"DATA",176.112,34386,1)
+488504^^Y
+"DATA",176.112,34387,0)
+4015658^CATHETER,INTERMITTENT 8FR CONVEEN #5328
+"DATA",176.112,34387,1)
+488505^^Y
+"DATA",176.112,34388,0)
+4011852^CATHETER,INTERMITTENT CONVEEN #5312,14IN
+"DATA",176.112,34388,1)
+488506^^Y
+"DATA",176.112,34389,0)
+4011851^CATHETER,INTERMITTENT CONVEEN #5314,14IN
+"DATA",176.112,34389,1)
+488507^^Y
+"DATA",176.112,34390,0)
+4011853^CATHETER,INTERMITTENT CONVEEN #5316,14IN
+"DATA",176.112,34390,1)
+488508^^Y
+"DATA",176.112,34391,0)
+4015480^CATHETER,INTERMITTENT CONVEEN 16FR #5316 16IN
+"DATA",176.112,34391,1)
+488509^^Y
+"DATA",176.112,34392,0)
+4015872^CATHETER,INTERMITTENT FEMALE 12FR ROCHESTER #61912
+"DATA",176.112,34392,1)
+488510^^Y
+"DATA",176.112,34393,0)
+4015873^CATHETER,INTERMITTENT FEMALE 14FR ROCHESTER #61914
+"DATA",176.112,34393,1)
+488511^^Y
+"DATA",176.112,34394,0)
+4015874^CATHETER,INTERMITTENT FEMALE 16FR ROCHESTER #61916
+"DATA",176.112,34394,1)
+488512^^Y
+"DATA",176.112,34395,0)
+4015875^CATHETER,INTERMITTENT FEMALE 18FR ROCHESTER #61918
+"DATA",176.112,34395,1)
+488513^^Y
+"DATA",176.112,34396,0)
+4015507^CATHETER,INTERMITTENT LOFRIC 10FR ASTRATECH #901040
+"DATA",176.112,34396,1)
+488514^^Y
+"DATA",176.112,34397,0)
+4015508^CATHETER,INTERMITTENT LOFRIC 12FR ASTRATECH #901240
+"DATA",176.112,34397,1)
+488515^^Y
+"DATA",176.112,34398,0)
+4015509^CATHETER,INTERMITTENT LOFRIC 14FR ASTRATECH #901440
+"DATA",176.112,34398,1)
+488516^^Y
+"DATA",176.112,34399,0)
+4015505^CATHETER,INTERMITTENT LOFRIC 16FR ASTRATECH #900840
+"DATA",176.112,34399,1)
+488517^^Y
+"DATA",176.112,34400,0)
+4015146^CATHETER,INTERMITTENT LOFRIC 16FR ASTRATECH #901640
+"DATA",176.112,34400,1)
+488518^^Y
+"DATA",176.112,34401,0)
+4015510^CATHETER,INTERMITTENT LOFRIC 18FR ASTRATECH #901840
+"DATA",176.112,34401,1)
+488519^^Y
+"DATA",176.112,34402,0)
+4015511^CATHETER,INTERMITTENT LOFRIC 20FR ASTRATECH #902040
+"DATA",176.112,34402,1)
+488520^^Y
+"DATA",176.112,34403,0)
+4015512^CATHETER,INTERMITTENT LOFRIC 22FR ASTRATECH #902240
+"DATA",176.112,34403,1)
+488521^^Y
+"DATA",176.112,34404,0)
+4015513^CATHETER,INTERMITTENT LOFRIC 24FR ASTRATECH #902440
+"DATA",176.112,34404,1)
+488522^^Y
+"DATA",176.112,34405,0)
+4015506^CATHETER,INTERMITTENT LOFRIC 8FR ASTRATECH #900840
+"DATA",176.112,34405,1)
+488523^^Y
+"DATA",176.112,34406,0)
+4015876^CATHETER,INTERMITTENT PERSONAL 12FR ROCHESTER #63912
+"DATA",176.112,34406,1)
+488524^^Y
+"DATA",176.112,34407,0)
+4015877^CATHETER,INTERMITTENT PERSONAL 14FR ROCHESTER #63914
+"DATA",176.112,34407,1)
+488525^^Y
+"DATA",176.112,34408,0)
+4015878^CATHETER,INTERMITTENT PERSONAL 14FR ROCHESTER #63916
+"DATA",176.112,34408,1)
+488526^^Y
+"DATA",176.112,34409,0)
+4015879^CATHETER,INTERMITTENT PERSONAL 18FR ROCHESTER #63918
+"DATA",176.112,34409,1)
+488527^^Y
+"DATA",176.112,34410,0)
+4015160^CATHETER,INTERMITTENT SILICONE 12FR
+"DATA",176.112,34410,1)
+488528^^Y
+"DATA",176.112,34411,0)
+4015161^CATHETER,INTERMITTENT SILICONE 14FR
+"DATA",176.112,34411,1)
+488529^^Y
+"DATA",176.112,34412,0)
+4015162^CATHETER,INTERMITTENT SILICONE 16FR
+"DATA",176.112,34412,1)
+488530^^Y
+"DATA",176.112,34413,0)
+4015163^CATHETER,INTERMITTENT SILICONE 18FR
+"DATA",176.112,34413,1)
+488531^^Y
+"DATA",176.112,34414,0)
+4015164^CATHETER,INTERMITTENT SILICONE 20FR
+"DATA",176.112,34414,1)
+488532^^Y
+"DATA",176.112,34415,0)
+4015165^CATHETER,INTERMITTENT SILICONE 8FR
+"DATA",176.112,34415,1)
+488533^^Y
+"DATA",176.112,34416,0)
+4011850^CATHETER,INTERMITTENT,FEMALE CONVEEN #5304,6IN
+"DATA",176.112,34416,1)
+488534^^Y
+"DATA",176.112,34417,0)
+4015504^CATHETER,INTERMITTENT,SILICONE LOFRIC 8FR AT#900840
+"DATA",176.112,34417,1)
+488535^^Y
+"DATA",176.112,34418,0)
+4017041^CATHETER,PLASTIC,10FR RUSCH #238500100
+"DATA",176.112,34418,1)
+488536^^Y
+"DATA",176.112,34419,0)
+4017044^CATHETER,PLASTIC,12FR RUSCH #238500120
+"DATA",176.112,34419,1)
+488537^^Y
+"DATA",176.112,34420,0)
+4017043^CATHETER,PLASTIC,12FR RUSCH #2385001200
+"DATA",176.112,34420,1)
+488538^^Y
+"DATA",176.112,34421,0)
+4011800^CATHETER,PLASTIC,14FR,RUSCH #238500140
+"DATA",176.112,34421,1)
+488539^^Y
+"DATA",176.112,34422,0)
+4017042^CATHETER,PLASTIC,16FR RUSCH #238500160
+"DATA",176.112,34422,1)
+488540^^Y
+"DATA",176.112,34423,0)
+4016061^CATHETER,PLASTIC,16FR,ROUSCH #238500160
+"DATA",176.112,34423,1)
+488541^^Y
+"DATA",176.112,34424,0)
+4017045^CATHETER,PLASTIC,18FR RUSCH #238500180
+"DATA",176.112,34424,1)
+488542^^Y
+"DATA",176.112,34425,0)
+4017046^CATHETER,PLASTIC,20FR RUSCH #238500200
+"DATA",176.112,34425,1)
+488543^^Y
+"DATA",176.112,34426,0)
+4017047^CATHETER,PLASTIC,22FR RUSCH #238500220
+"DATA",176.112,34426,1)
+488544^^Y
+"DATA",176.112,34427,0)
+4014512^CATHETER,RED RUBBER 10FR 16IN BARD #9410
+"DATA",176.112,34427,1)
+488545^^Y
+"DATA",176.112,34428,0)
+4016570^CATHETER,RED RUBBER 10FR BARD #056108-10
+"DATA",176.112,34428,1)
+488546^^Y
+"DATA",176.112,34429,0)
+4011790^CATHETER,RED RUBBER 12FR 16IN BARD #9412
+"DATA",176.112,34429,1)
+488547^^Y
+"DATA",176.112,34430,0)
+4016571^CATHETER,RED RUBBER 12FR BARD #056108-12
+"DATA",176.112,34430,1)
+488548^^Y
+"DATA",176.112,34431,0)
+4011791^CATHETER,RED RUBBER 14FR 16IN BARD #9414
+"DATA",176.112,34431,1)
+488549^^Y
+"DATA",176.112,34432,0)
+4016572^CATHETER,RED RUBBER 14FR BARD #056108-14
+"DATA",176.112,34432,1)
+488550^^Y
+"DATA",176.112,34433,0)
+4011792^CATHETER,RED RUBBER 16FR 16IN BARD #9416
+"DATA",176.112,34433,1)
+488551^^Y
+"DATA",176.112,34434,0)
+4016573^CATHETER,RED RUBBER 16FR BARD #056108-16
+"DATA",176.112,34434,1)
+488552^^Y
+"DATA",176.112,34435,0)
+4011812^CATHETER,RED RUBBER 18FR 16IN BARD #9418
+"DATA",176.112,34435,1)
+488553^^Y
+"DATA",176.112,34436,0)
+4011813^CATHETER,RED RUBBER 20FR 16IN BARD #9420
+"DATA",176.112,34436,1)
+488554^^Y
+"DATA",176.112,34437,0)
+4014511^CATHETER,RED RUBBER 8FR 16IN BARD #9408
+"DATA",176.112,34437,1)
+488555^^Y
+"DATA",176.112,34438,0)
+4016569^CATHETER,RED RUBBER 8FR BARD #056108-08
+"DATA",176.112,34438,1)
+488556^^Y
+"DATA",176.112,34439,0)
+4011814^CATHETER,ROB-NEL 10FR
+"DATA",176.112,34439,1)
+488557^^Y
+"DATA",176.112,34440,0)
+4011815^CATHETER,ROB-NEL 12FR
+"DATA",176.112,34440,1)
+488558^^Y
+"DATA",176.112,34441,0)
+4011816^CATHETER,ROB-NEL 14FR
+"DATA",176.112,34441,1)
+488559^^Y
+"DATA",176.112,34442,0)
+4011817^CATHETER,ROB-NEL 16FR
+"DATA",176.112,34442,1)
+488560^^Y
+"DATA",176.112,34443,0)
+4011818^CATHETER,ROB-NEL 18FR
+"DATA",176.112,34443,1)
+488561^^Y
+"DATA",176.112,34444,0)
+4015663^CATHETER,ROB-NEL RED RUBBER 10FR
+"DATA",176.112,34444,1)
+488562^^Y
+"DATA",176.112,34445,0)
+4015664^CATHETER,ROB-NEL RED RUBBER 12FR
+"DATA",176.112,34445,1)
+488563^^Y
+"DATA",176.112,34446,0)
+4015665^CATHETER,ROB-NEL RED RUBBER 14FR
+"DATA",176.112,34446,1)
+488564^^Y
+"DATA",176.112,34447,0)
+4015666^CATHETER,ROB-NEL RED RUBBER 16FR
+"DATA",176.112,34447,1)
+488565^^Y
+"DATA",176.112,34448,0)
+4015667^CATHETER,ROB-NEL RED RUBBER 18FR
+"DATA",176.112,34448,1)
+488566^^Y
+"DATA",176.112,34449,0)
+4015150^CATHETER,SELF-CATH 10FR FEMALE
+"DATA",176.112,34449,1)
+488567^^Y
+"DATA",176.112,34450,0)
+4011874^CATHETER,SELF-CATH 10FR FEMALE MENTR#210
+"DATA",176.112,34450,1)
+488568^^Y
+"DATA",176.112,34451,0)
+4011884^CATHETER,SELF-CATH 10FR MENTOR #410
+"DATA",176.112,34451,1)
+488569^^Y
+"DATA",176.112,34452,0)
+4016412^CATHETER,SELF-CATH 10FR MENTOR#4410
+"DATA",176.112,34452,1)
+488570^^Y
+"DATA",176.112,34453,0)
+4011882^CATHETER,SELF-CATH 10FR PED MENTOR#520
+"DATA",176.112,34453,1)
+488571^^Y
+"DATA",176.112,34454,0)
+4015151^CATHETER,SELF-CATH 12FR FEMALE
+"DATA",176.112,34454,1)
+488572^^Y
+"DATA",176.112,34455,0)
+4015128^CATHETER,SELF-CATH 12FR FEMALE MENTOR#212
+"DATA",176.112,34455,1)
+488573^^Y
+"DATA",176.112,34456,0)
+4011876^CATHETER,SELF-CATH 12FR FEMALE MENTR#442
+"DATA",176.112,34456,1)
+488574^^Y
+"DATA",176.112,34457,0)
+4011885^CATHETER,SELF-CATH 12FR MENTOR #412
+"DATA",176.112,34457,1)
+488575^^Y
+"DATA",176.112,34458,0)
+4011889^CATHETER,SELF-CATH 12FR MENTOR #460
+"DATA",176.112,34458,1)
+488576^^Y
+"DATA",176.112,34459,0)
+4011890^CATHETER,SELF-CATH 12FR MENTOR #461
+"DATA",176.112,34459,1)
+488577^^Y
+"DATA",176.112,34460,0)
+4016413^CATHETER,SELF-CATH 12FR MENTOR#4412
+"DATA",176.112,34460,1)
+488578^^Y
+"DATA",176.112,34461,0)
+4015152^CATHETER,SELF-CATH 14FR FEMALE
+"DATA",176.112,34461,1)
+488579^^Y
+"DATA",176.112,34462,0)
+4015129^CATHETER,SELF-CATH 14FR FEMALE MENTOR#214
+"DATA",176.112,34462,1)
+488580^^Y
+"DATA",176.112,34463,0)
+4011877^CATHETER,SELF-CATH 14FR FEMALE MENTR#240
+"DATA",176.112,34463,1)
+488581^^Y
+"DATA",176.112,34464,0)
+4011878^CATHETER,SELF-CATH 14FR FEMALE MENTR#245
+"DATA",176.112,34464,1)
+488582^^Y
+"DATA",176.112,34465,0)
+4011875^CATHETER,SELF-CATH 14FR FEMALE MENTR#440
+"DATA",176.112,34465,1)
+488583^^Y
+"DATA",176.112,34466,0)
+4011872^CATHETER,SELF-CATH 14FR FEMALE MENTR#445
+"DATA",176.112,34466,1)
+488584^^Y
+"DATA",176.112,34467,0)
+4011886^CATHETER,SELF-CATH 14FR MENTOR #414
+"DATA",176.112,34467,1)
+488585^^Y
+"DATA",176.112,34468,0)
+4011835^CATHETER,SELF-CATH 14FR MENTOR #445
+"DATA",176.112,34468,1)
+488586^^Y
+"DATA",176.112,34469,0)
+4011788^CATHETER,SELF-CATH 14FR MENTOR #450
+"DATA",176.112,34469,1)
+488587^^Y
+"DATA",176.112,34470,0)
+4011888^CATHETER,SELF-CATH 14FR MENTOR #451
+"DATA",176.112,34470,1)
+488588^^Y
+"DATA",176.112,34471,0)
+4016414^CATHETER,SELF-CATH 14FR MENTOR#4414
+"DATA",176.112,34471,1)
+488589^^Y
+"DATA",176.112,34472,0)
+4015153^CATHETER,SELF-CATH 16FR FEMALE
+"DATA",176.112,34472,1)
+488590^^Y
+"DATA",176.112,34473,0)
+4011794^CATHETER,SELF-CATH 16FR MENTOR #416
+"DATA",176.112,34473,1)
+488591^^Y
+"DATA",176.112,34474,0)
+4016415^CATHETER,SELF-CATH 16FR MENTOR#4416
+"DATA",176.112,34474,1)
+488592^^Y
+"DATA",176.112,34475,0)
+4015154^CATHETER,SELF-CATH 18FR FEMALE
+"DATA",176.112,34475,1)
+488593^^Y
+"DATA",176.112,34476,0)
+4011887^CATHETER,SELF-CATH 18FR MENTOR #418
+"DATA",176.112,34476,1)
+488594^^Y
+"DATA",176.112,34477,0)
+4011879^CATHETER,SELF-CATH 5FR PED MENTOR#305
+"DATA",176.112,34477,1)
+488595^^Y
+"DATA",176.112,34478,0)
+4011880^CATHETER,SELF-CATH 6FR PED MENTOR#306
+"DATA",176.112,34478,1)
+488596^^Y
+"DATA",176.112,34479,0)
+4015155^CATHETER,SELF-CATH 8FR FEMALE
+"DATA",176.112,34479,1)
+488597^^Y
+"DATA",176.112,34480,0)
+4011873^CATHETER,SELF-CATH 8FR FEMALE MENTOR#208
+"DATA",176.112,34480,1)
+488598^^Y
+"DATA",176.112,34481,0)
+4011883^CATHETER,SELF-CATH 8FR MENTOR #408
+"DATA",176.112,34481,1)
+488599^^Y
+"DATA",176.112,34482,0)
+4016411^CATHETER,SELF-CATH 8FR MENTOR#4408
+"DATA",176.112,34482,1)
+488600^^Y
+"DATA",176.112,34483,0)
+4011881^CATHETER,SELF-CATH 8FR PED MENTOR#360
+"DATA",176.112,34483,1)
+488601^^Y
+"DATA",176.112,34484,0)
+4015157^CATHETER,SELF-CATH COUDE 10FR FEMALE
+"DATA",176.112,34484,1)
+488602^^Y
+"DATA",176.112,34485,0)
+4011900^CATHETER,SELF-CATH COUDE 10FR MENTOR#586
+"DATA",176.112,34485,1)
+488603^^Y
+"DATA",176.112,34486,0)
+4011896^CATHETER,SELF-CATH COUDE 10FR MENTOR#610
+"DATA",176.112,34486,1)
+488604^^Y
+"DATA",176.112,34487,0)
+4011905^CATHETER,SELF-CATH COUDE 10FR MENTOR#810
+"DATA",176.112,34487,1)
+488605^^Y
+"DATA",176.112,34488,0)
+4015158^CATHETER,SELF-CATH COUDE 12FR FEMALE
+"DATA",176.112,34488,1)
+488606^^Y
+"DATA",176.112,34489,0)
+4011901^CATHETER,SELF-CATH COUDE 12FR MENTOR#582
+"DATA",176.112,34489,1)
+488607^^Y
+"DATA",176.112,34490,0)
+4011897^CATHETER,SELF-CATH COUDE 12FR MENTOR#612
+"DATA",176.112,34490,1)
+488608^^Y
+"DATA",176.112,34491,0)
+4011906^CATHETER,SELF-CATH COUDE 12FR MENTOR#812
+"DATA",176.112,34491,1)
+488609^^Y
+"DATA",176.112,34492,0)
+4015159^CATHETER,SELF-CATH COUDE 14FR FEMALE
+"DATA",176.112,34492,1)
+488610^^Y
+"DATA",176.112,34493,0)
+4011902^CATHETER,SELF-CATH COUDE 14FR MENTOR#486
+"DATA",176.112,34493,1)
+488611^^Y
+"DATA",176.112,34494,0)
+4011898^CATHETER,SELF-CATH COUDE 14FR MENTOR#614
+"DATA",176.112,34494,1)
+488612^^Y
+"DATA",176.112,34495,0)
+4011907^CATHETER,SELF-CATH COUDE 14FR MENTOR#814
+"DATA",176.112,34495,1)
+488613^^Y
+"DATA",176.112,34496,0)
+4011908^CATHETER,SELF-CATH COUDE 16FR MENTOR#816
+"DATA",176.112,34496,1)
+488614^^Y
+"DATA",176.112,34497,0)
+4011909^CATHETER,SELF-CATH COUDE 18FR MENTOR#818
+"DATA",176.112,34497,1)
+488615^^Y
+"DATA",176.112,34498,0)
+4011910^CATHETER,SELF-CATH COUDE 20FR MENTOR#820
+"DATA",176.112,34498,1)
+488616^^Y
+"DATA",176.112,34499,0)
+4011911^CATHETER,SELF-CATH COUDE 22FR MENTOR#822
+"DATA",176.112,34499,1)
+488617^^Y
+"DATA",176.112,34500,0)
+4011903^CATHETER,SELF-CATH COUDE 6FR MENTOR#806
+"DATA",176.112,34500,1)
+488618^^Y
+"DATA",176.112,34501,0)
+4015156^CATHETER,SELF-CATH COUDE 8FR FEMALE
+"DATA",176.112,34501,1)
+488619^^Y
+"DATA",176.112,34502,0)
+4011899^CATHETER,SELF-CATH COUDE 8FR MENTOR#588
+"DATA",176.112,34502,1)
+488620^^Y
+"DATA",176.112,34503,0)
+4011895^CATHETER,SELF-CATH COUDE 8FR MENTOR#608
+"DATA",176.112,34503,1)
+488621^^Y
+"DATA",176.112,34504,0)
+4011904^CATHETER,SELF-CATH COUDE 8FR MENTOR#808
+"DATA",176.112,34504,1)
+488622^^Y
+"DATA",176.112,34505,0)
+4011891^CATHETER,SELF-CATH SOFT 10FR MENTOR #110
+"DATA",176.112,34505,1)
+488623^^Y
+"DATA",176.112,34506,0)
+4011892^CATHETER,SELF-CATH SOFT 12FR MENTOR #112
+"DATA",176.112,34506,1)
+488624^^Y
+"DATA",176.112,34507,0)
+4011893^CATHETER,SELF-CATH SOFT 14FR MENTOR #114
+"DATA",176.112,34507,1)
+488625^^Y
+"DATA",176.112,34508,0)
+4011894^CATHETER,SELF-CATH SOFT 16FR MENTOR #116
+"DATA",176.112,34508,1)
+488626^^Y
+"DATA",176.112,34509,0)
+4011773^CATHETER,STRAIGHT OPAQUE RUBBER 10FR
+"DATA",176.112,34509,1)
+488627^^Y
+"DATA",176.112,34510,0)
+4011802^CATHETER,STRAIGHT RED RUBBER 10FR
+"DATA",176.112,34510,1)
+488628^^Y
+"DATA",176.112,34511,0)
+4011803^CATHETER,STRAIGHT RED RUBBER 12FR
+"DATA",176.112,34511,1)
+488629^^Y
+"DATA",176.112,34512,0)
+4011774^CATHETER,STRAIGHT RED RUBBER 14FR
+"DATA",176.112,34512,1)
+488630^^Y
+"DATA",176.112,34513,0)
+4011799^CATHETER,STRAIGHT RED RUBBER 16FR
+"DATA",176.112,34513,1)
+488631^^Y
+"DATA",176.112,34514,0)
+4011775^CATHETER,STRAIGHT RED RUBBER 18FR
+"DATA",176.112,34514,1)
+488632^^Y
+"DATA",176.112,34515,0)
+4011776^CATHETER,STRAIGHT RED RUBBER 20FR
+"DATA",176.112,34515,1)
+488633^^Y
+"DATA",176.112,34516,0)
+4013494^CATHETER,STRAIGHT RED RUBBER 24FR
+"DATA",176.112,34516,1)
+488634^^Y
+"DATA",176.112,34517,0)
+4011801^CATHETER,STRAIGHT RED RUBBER 8FR
+"DATA",176.112,34517,1)
+488635^^Y
+"DATA",176.112,34518,0)
+4015138^CATHETER,SUCTION 14FR
+"DATA",176.112,34518,1)
+488636^^Y
+"DATA",176.112,34519,0)
+4025187^SUCTION CATHETER,14FR KENDALL #37424
+"DATA",176.112,34519,1)
+488637^^Y
+"DATA",176.112,34520,0)
+4015379^CATHETER,SUCTION 14FR KENDALL #37424
+"DATA",176.112,34520,1)
+488637^^Y
+"DATA",176.112,34521,0)
+4014874^SUCTION CATHETER,14FR KENDALL #37425
+"DATA",176.112,34521,1)
+488638^^Y
+"DATA",176.112,34522,0)
+4015380^CATHETER,SUCTION 14FR KENDALL #37425
+"DATA",176.112,34522,1)
+488638^^Y
+"DATA",176.112,34523,0)
+4011793^CATHETER,SUCTION 14FR MAXIFLO SIMS#6250
+"DATA",176.112,34523,1)
+488639^^Y
+"DATA",176.112,34524,0)
+4016974^CATHETER,THORACIC TROCAR PVC 10FR 9IN K#8888-561019
+"DATA",176.112,34524,1)
+488640^^Y
+"DATA",176.112,34525,0)
+4016975^CATHETER,THORACIC TROCAR PVC 12FR 9IN K#8888-561027
+"DATA",176.112,34525,1)
+488641^^Y
+"DATA",176.112,34526,0)
+4016976^CATHETER,THORACIC TROCAR PVC 16FR 10IN K#8888-561035
+"DATA",176.112,34526,1)
+488642^^Y
+"DATA",176.112,34527,0)
+4016977^CATHETER,THORACIC TROCAR PVC 20FR 16IN K#8888-561043
+"DATA",176.112,34527,1)
+488643^^Y
+"DATA",176.112,34528,0)
+4016978^CATHETER,THORACIC TROCAR PVC 24FR 16IN K#8888-561050
+"DATA",176.112,34528,1)
+488644^^Y
+"DATA",176.112,34529,0)
+4016979^CATHETER,THORACIC TROCAR PVC 28FR 16IN K#8888-561068
+"DATA",176.112,34529,1)
+488645^^Y
+"DATA",176.112,34530,0)
+4016980^CATHETER,THORACIC TROCAR PVC 32FR 16IN K#8888-561076
+"DATA",176.112,34530,1)
+488646^^Y
+"DATA",176.112,34531,0)
+4016973^CATHETER,THORACIC TROCAR PVC 8FR 9IN K#8888-560805
+"DATA",176.112,34531,1)
+488647^^Y
+"DATA",176.112,34532,0)
+4016960^CATHETER,THORACIC, RT ANGLE PVC FIRM 16FR K#8888-57018
+"DATA",176.112,34532,1)
+488648^^Y
+"DATA",176.112,34533,0)
+4017203^CATHETER,THORACIC, RT ANGLE PVC FIRM 16FR K#8888-571018
+"DATA",176.112,34533,1)
+488649^^Y
+"DATA",176.112,34534,0)
+4016961^CATHETER,THORACIC, RT ANGLE PVC FIRM 20FR K#8888-57026
+"DATA",176.112,34534,1)
+488650^^Y
+"DATA",176.112,34535,0)
+4017204^CATHETER,THORACIC, RT ANGLE PVC FIRM 20FR K#8888-571026
+"DATA",176.112,34535,1)
+488651^^Y
+"DATA",176.112,34536,0)
+4016962^CATHETER,THORACIC, RT ANGLE PVC FIRM 24FR K#8888-571034
+"DATA",176.112,34536,1)
+488652^^Y
+"DATA",176.112,34537,0)
+4016963^CATHETER,THORACIC, RT ANGLE PVC FIRM 28FR K#8888-571042
+"DATA",176.112,34537,1)
+488653^^Y
+"DATA",176.112,34538,0)
+4016964^CATHETER,THORACIC, RT ANGLE PVC FIRM 32FR K#8888-57059
+"DATA",176.112,34538,1)
+488654^^Y
+"DATA",176.112,34539,0)
+4017205^CATHETER,THORACIC, RT ANGLE PVC FIRM 32FR K#8888-571059
+"DATA",176.112,34539,1)
+488655^^Y
+"DATA",176.112,34540,0)
+4016965^CATHETER,THORACIC, RT ANGLE PVC FIRM 36FR K#8888-571067
+"DATA",176.112,34540,1)
+488656^^Y
+"DATA",176.112,34541,0)
+4016966^CATHETER,THORACIC, RT ANGLE PVC FIRM 40FR K#8888-571075
+"DATA",176.112,34541,1)
+488657^^Y
+"DATA",176.112,34542,0)
+4016967^CATHETER,THORACIC, RT ANGLE PVC SOFT 16FR K#8888-570408
+"DATA",176.112,34542,1)
+488658^^Y
+"DATA",176.112,34543,0)
+4016968^CATHETER,THORACIC, RT ANGLE PVC SOFT 20FR K#8888-570416
+"DATA",176.112,34543,1)
+488659^^Y
+"DATA",176.112,34544,0)
+4016969^CATHETER,THORACIC, RT ANGLE PVC SOFT 28FR K#8888-570432
+"DATA",176.112,34544,1)
+488660^^Y
+"DATA",176.112,34545,0)
+4016970^CATHETER,THORACIC, RT ANGLE PVC SOFT 32FR K#8888-570440
+"DATA",176.112,34545,1)
+488661^^Y
+"DATA",176.112,34546,0)
+4016971^CATHETER,THORACIC, RT ANGLE PVC SOFT 36FR K#8888-570457
+"DATA",176.112,34546,1)
+488662^^Y
+"DATA",176.112,34547,0)
+4016972^CATHETER,THORACIC, RT ANGLE PVC SOFT 40FR K#8888-570465
+"DATA",176.112,34547,1)
+488663^^Y
+"DATA",176.112,34548,0)
+4016987^CATHETER,THORACIC, RT ANGLE SILICONE 28FR K#8888-573048
+"DATA",176.112,34548,1)
+488664^^Y
+"DATA",176.112,34549,0)
+4016988^CATHETER,THORACIC, RT ANGLE SILICONE 32FR K#8888-573055
+"DATA",176.112,34549,1)
+488665^^Y
+"DATA",176.112,34550,0)
+4016989^CATHETER,THORACIC, RT ANGLE SILICONE 36FR K#8888-573063
+"DATA",176.112,34550,1)
+488666^^Y
+"DATA",176.112,34551,0)
+4016981^CATHETER,THORACIC, STRAIGHT SILICONE 20FR K#8888-572537
+"DATA",176.112,34551,1)
+488667^^Y
+"DATA",176.112,34552,0)
+4016982^CATHETER,THORACIC, STRAIGHT SILICONE 24FR K#8888-572545
+"DATA",176.112,34552,1)
+488668^^Y
+"DATA",176.112,34553,0)
+4016983^CATHETER,THORACIC, STRAIGHT SILICONE 28FR K#8888-572552
+"DATA",176.112,34553,1)
+488669^^Y
+"DATA",176.112,34554,0)
+4016984^CATHETER,THORACIC, STRAIGHT SILICONE 32FR K#8888-572560
+"DATA",176.112,34554,1)
+488670^^Y
+"DATA",176.112,34555,0)
+4016985^CATHETER,THORACIC, STRAIGHT SILICONE 36FR K#8888-572578
+"DATA",176.112,34555,1)
+488671^^Y
+"DATA",176.112,34556,0)
+4016986^CATHETER,THORACIC, STRAIGHT SILICONE 40FR K#8888-572586
+"DATA",176.112,34556,1)
+488672^^Y
+"DATA",176.112,34557,0)
+4016949^CATHETER,THORACIC,STRAIGHT PVC FIRM 12FR K#8888-570507
+"DATA",176.112,34557,1)
+488673^^Y
+"DATA",176.112,34558,0)
+4016950^CATHETER,THORACIC,STRAIGHT PVC FIRM 16FR K#8888-570515
+"DATA",176.112,34558,1)
+488674^^Y
+"DATA",176.112,34559,0)
+4016951^CATHETER,THORACIC,STRAIGHT PVC FIRM 20FR K#8888-570523
+"DATA",176.112,34559,1)
+488675^^Y
+"DATA",176.112,34560,0)
+4016952^CATHETER,THORACIC,STRAIGHT PVC FIRM 24FR K#8888-570531
+"DATA",176.112,34560,1)
+488676^^Y
+"DATA",176.112,34561,0)
+4016953^CATHETER,THORACIC,STRAIGHT PVC FIRM 28FR K#8888-570549
+"DATA",176.112,34561,1)
+488677^^Y
+"DATA",176.112,34562,0)
+4016954^CATHETER,THORACIC,STRAIGHT PVC FIRM 32FR K#8888-570556
+"DATA",176.112,34562,1)
+488678^^Y
+"DATA",176.112,34563,0)
+4016955^CATHETER,THORACIC,STRAIGHT PVC FIRM 36FR K#8888-570564
+"DATA",176.112,34563,1)
+488679^^Y
+"DATA",176.112,34564,0)
+4016956^CATHETER,THORACIC,STRAIGHT PVC FIRM 40FR K#8888-570572
+"DATA",176.112,34564,1)
+488680^^Y
+"DATA",176.112,34565,0)
+4016957^CATHETER,THORACIC,STRAIGHT PVC SOFT 28FR K#8888-570341
+"DATA",176.112,34565,1)
+488681^^Y
+"DATA",176.112,34566,0)
+4016958^CATHETER,THORACIC,STRAIGHT PVC SOFT 32FR K#8888-570359
+"DATA",176.112,34566,1)
+488682^^Y
+"DATA",176.112,34567,0)
+4016959^CATHETER,THORACIC,STRAIGHT PVC SOFT 36FR K#8888-570366
+"DATA",176.112,34567,1)
+488683^^Y
+"DATA",176.112,34568,0)
+4011728^CATHETER,URETHRAL 14FR 5CC F#828-2464
+"DATA",176.112,34568,1)
+488684^^Y
+"DATA",176.112,34569,0)
+4011735^CATHETER,URETHRAL 16FR 30CC F#762-1867
+"DATA",176.112,34569,1)
+488685^^Y
+"DATA",176.112,34570,0)
+4011729^CATHETER,URETHRAL 16FR 5CC F#762-1850
+"DATA",176.112,34570,1)
+488686^^Y
+"DATA",176.112,34571,0)
+4011736^CATHETER,URETHRAL 18FR 30CC F#762-1872
+"DATA",176.112,34571,1)
+488687^^Y
+"DATA",176.112,34572,0)
+4011730^CATHETER,URETHRAL 18FR 5CC F#762-1851
+"DATA",176.112,34572,1)
+488688^^Y
+"DATA",176.112,34573,0)
+4011741^CATHETER,URETHRAL 20FR 30CC
+"DATA",176.112,34573,1)
+488689^^Y
+"DATA",176.112,34574,0)
+4011731^CATHETER,URETHRAL 20FR 5CC F#762-1852
+"DATA",176.112,34574,1)
+488690^^Y
+"DATA",176.112,34575,0)
+4011742^CATHETER,URETHRAL 22FR 30CC
+"DATA",176.112,34575,1)
+488691^^Y
+"DATA",176.112,34576,0)
+4011732^CATHETER,URETHRAL 22FR 5CC F#762-1857
+"DATA",176.112,34576,1)
+488692^^Y
+"DATA",176.112,34577,0)
+4011737^CATHETER,URETHRAL 24FR 30CC F#728-6861
+"DATA",176.112,34577,1)
+488693^^Y
+"DATA",176.112,34578,0)
+4011733^CATHETER,URETHRAL 24FR 5CC F#762-1858
+"DATA",176.112,34578,1)
+488694^^Y
+"DATA",176.112,34579,0)
+4011734^CATHETER,URETHRAL 26FR 5CC F#828-2463
+"DATA",176.112,34579,1)
+488695^^Y
+"DATA",176.112,34580,0)
+4011743^CATHETER,URETHRAL 28FR 30CC
+"DATA",176.112,34580,1)
+488696^^Y
+"DATA",176.112,34581,0)
+4011740^CATHETER,URETHRAL 30FR 5CC
+"DATA",176.112,34581,1)
+488697^^Y
+"DATA",176.112,34582,0)
+4015054^CATHETER,URETHRAL COUDE LATEX 10FR BARD #120610
+"DATA",176.112,34582,1)
+488698^^Y
+"DATA",176.112,34583,0)
+4015055^CATHETER,URETHRAL COUDE LATEX 12FR BARD #120612
+"DATA",176.112,34583,1)
+488699^^Y
+"DATA",176.112,34584,0)
+4015056^CATHETER,URETHRAL COUDE LATEX 14FR BARD #120614
+"DATA",176.112,34584,1)
+488700^^Y
+"DATA",176.112,34585,0)
+4015057^CATHETER,URETHRAL COUDE LATEX 16FR BARD #120616
+"DATA",176.112,34585,1)
+488701^^Y
+"DATA",176.112,34586,0)
+4015059^CATHETER,URETHRAL COUDE LATEX 18FR BARD #120618
+"DATA",176.112,34586,1)
+488702^^Y
+"DATA",176.112,34587,0)
+4015058^CATHETER,URETHRAL COUDE LATEX 20FR BARD #120620
+"DATA",176.112,34587,1)
+488703^^Y
+"DATA",176.112,34588,0)
+4015060^CATHETER,URETHRAL COUDE LATEX 22FR BARD #120622
+"DATA",176.112,34588,1)
+488704^^Y
+"DATA",176.112,34589,0)
+4015053^CATHETER,URETHRAL COUDE LATEX 8FR BARD #120608
+"DATA",176.112,34589,1)
+488705^^Y
+"DATA",176.112,34590,0)
+4011779^CATHETER,URETHRAL LATEX TEFLON 28FR 5CC
+"DATA",176.112,34590,1)
+488706^^Y
+"DATA",176.112,34591,0)
+4011777^CATHETER,URETHRAL SILICONE 22FR 30CC
+"DATA",176.112,34591,1)
+488707^^Y
+"DATA",176.112,34592,0)
+4011778^CATHETER,URETHRAL SILICONE 22FR 5CC
+"DATA",176.112,34592,1)
+488708^^Y
+"DATA",176.112,34593,0)
+4011769^CATHETER,URETHRAL SILICONE 26FR 30CC
+"DATA",176.112,34593,1)
+488709^^Y
+"DATA",176.112,34594,0)
+4015038^CATHETER,URETHRAL VINYL 10FR KENDALL #400610
+"DATA",176.112,34594,1)
+488710^^Y
+"DATA",176.112,34595,0)
+4015039^CATHETER,URETHRAL VINYL 12FR KENDALL #400612
+"DATA",176.112,34595,1)
+488711^^Y
+"DATA",176.112,34596,0)
+4015040^CATHETER,URETHRAL VINYL 14FR KENDALL #400614
+"DATA",176.112,34596,1)
+488712^^Y
+"DATA",176.112,34597,0)
+4015041^CATHETER,URETHRAL VINYL 16FR KENDALL #400616
+"DATA",176.112,34597,1)
+488713^^Y
+"DATA",176.112,34598,0)
+4015042^CATHETER,URETHRAL VINYL 18FR KENDALL #400618
+"DATA",176.112,34598,1)
+488714^^Y
+"DATA",176.112,34599,0)
+4015037^CATHETER,URETHRAL VINYL 8FR KENDALL #400608
+"DATA",176.112,34599,1)
+488715^^Y
+"DATA",176.112,34600,0)
+4010632^CLAMP,BAG C#1756-00
+"DATA",176.112,34600,1)
+488716^^Y
+"DATA",176.112,34601,0)
+4010631^CLAMP,BAG C#1756-35
+"DATA",176.112,34601,1)
+488717^^Y
+"DATA",176.112,34602,0)
+4010633^CLAMP,BAG H#7765
+"DATA",176.112,34602,1)
+488718^^Y
+"DATA",176.112,34603,0)
+4010634^CLAMP,BAG H#7770
+"DATA",176.112,34603,1)
+488719^^Y
+"DATA",176.112,34604,0)
+4010635^CLAMP,BAG H#8770
+"DATA",176.112,34604,1)
+488720^^Y
+"DATA",176.112,34605,0)
+4012598^CLAMP,CUNNINGHAM REGULAR
+"DATA",176.112,34605,1)
+488721^^Y
+"DATA",176.112,34606,0)
+4011421^CLAMP,IRRIGATION SLEEVE C#1756-50
+"DATA",176.112,34606,1)
+488722^^Y
+"DATA",176.112,34607,0)
+4012599^CLAMP,METAL TORBOT #266
+"DATA",176.112,34607,1)
+488723^^Y
+"DATA",176.112,34608,0)
+4010664^COLLAR,TAN,SUR-FIT FLEX C#0225-20
+"DATA",176.112,34608,1)
+488724^^Y
+"DATA",176.112,34609,0)
+4010665^COLLAR,TAN,SUR-FIT FLEX C#0225-21
+"DATA",176.112,34609,1)
+488725^^Y
+"DATA",176.112,34610,0)
+4010666^COLLAR,TAN,SUR-FIT FLEX C#0225-22
+"DATA",176.112,34610,1)
+488726^^Y
+"DATA",176.112,34611,0)
+4010667^COLLAR,TAN,SUR-FIT FLEX C#0225-23
+"DATA",176.112,34611,1)
+488727^^Y
+"DATA",176.112,34612,0)
+4010668^COLLAR,TAN,SUR-FIT FLEX C#0225-24
+"DATA",176.112,34612,1)
+488728^^Y
+"DATA",176.112,34613,0)
+4010669^COLLAR,WHITE,SUR-FIT FLEX C#0225-25
+"DATA",176.112,34613,1)
+488729^^Y
+"DATA",176.112,34614,0)
+4010670^COLLAR,WHITE,SUR-FIT FLEX C#0225-26
+"DATA",176.112,34614,1)
+488730^^Y
+"DATA",176.112,34615,0)
+4010671^COLLAR,WHITE,SUR-FIT FLEX C#0225-27
+"DATA",176.112,34615,1)
+488731^^Y
+"DATA",176.112,34616,0)
+4010672^COLLAR,WHITE,SUR-FIT FLEX C#0225-28
+"DATA",176.112,34616,1)
+488732^^Y
+"DATA",176.112,34617,0)
+4010673^COLLAR,WHITE,SUR-FIT FLEX C#0225-29
+"DATA",176.112,34617,1)
+488733^^Y
+"DATA",176.112,34618,0)
+4012426^COLLY-SEEL DISC 2IN MASON #221Y
+"DATA",176.112,34618,1)
+488734^^Y
+"DATA",176.112,34619,0)
+4012428^COLLY-SEEL DISC 3 1/2IN M#223Y
+"DATA",176.112,34619,1)
+488735^^Y
+"DATA",176.112,34620,0)
+4012433^COLLY-SEEL DISC 3/4IN MASON #313
+"DATA",176.112,34620,1)
+488736^^Y
+"DATA",176.112,34621,0)
+4012427^COLLY-SEEL DISC 3IN MASON #222Y
+"DATA",176.112,34621,1)
+488737^^Y
+"DATA",176.112,34622,0)
+4012430^COLLY-SEEL DISC 4 1/2IN MASON #224Y
+"DATA",176.112,34622,1)
+488738^^Y
+"DATA",176.112,34623,0)
+4012663^COLOSTOMY SYSTEM,CONSEAL COLOPLAST #1201
+"DATA",176.112,34623,1)
+488739^^Y
+"DATA",176.112,34624,0)
+4012664^COLOSTOMY SYSTEM,CONSEAL COLOPLAST #1251
+"DATA",176.112,34624,1)
+488740^^Y
+"DATA",176.112,34625,0)
+4012661^COLOSTOMY SYSTEM,CONSEAL COLOPLAST #4540
+"DATA",176.112,34625,1)
+488741^^Y
+"DATA",176.112,34626,0)
+4012662^COLOSTOMY SYSTEM,CONSEAL COLOPLAST #4550
+"DATA",176.112,34626,1)
+488742^^Y
+"DATA",176.112,34627,0)
+4010683^CONVEX INSERT H#5101
+"DATA",176.112,34627,1)
+488743^^Y
+"DATA",176.112,34628,0)
+4010684^CONVEX INSERT H#5102
+"DATA",176.112,34628,1)
+488744^^Y
+"DATA",176.112,34629,0)
+4010682^CONVEX INSERT H#5103
+"DATA",176.112,34629,1)
+488745^^Y
+"DATA",176.112,34630,0)
+4010685^CONVEX INSERT H#5104
+"DATA",176.112,34630,1)
+488746^^Y
+"DATA",176.112,34631,0)
+4010686^CONVEX INSERT H#5105
+"DATA",176.112,34631,1)
+488747^^Y
+"DATA",176.112,34632,0)
+4010687^CONVEX INSERT H#5106
+"DATA",176.112,34632,1)
+488748^^Y
+"DATA",176.112,34633,0)
+4010688^CONVEX INSERT H#5107
+"DATA",176.112,34633,1)
+488749^^Y
+"DATA",176.112,34634,0)
+4010689^CONVEX INSERT H#5108
+"DATA",176.112,34634,1)
+488750^^Y
+"DATA",176.112,34635,0)
+4010690^CONVEX INSERT,SUR-FIT C#1259-40
+"DATA",176.112,34635,1)
+488751^^Y
+"DATA",176.112,34636,0)
+4010691^CONVEX INSERT,SUR-FIT C#1259-41
+"DATA",176.112,34636,1)
+488752^^Y
+"DATA",176.112,34637,0)
+4010692^CONVEX INSERT,SUR-FIT C#1259-42
+"DATA",176.112,34637,1)
+488753^^Y
+"DATA",176.112,34638,0)
+4010693^CONVEX INSERT,SUR-FIT C#1259-43
+"DATA",176.112,34638,1)
+488754^^Y
+"DATA",176.112,34639,0)
+4010694^CONVEX INSERT,SUR-FIT C#1259-44
+"DATA",176.112,34639,1)
+488755^^Y
+"DATA",176.112,34640,0)
+4010695^CONVEX INSERT,SUR-FIT C#1259-45
+"DATA",176.112,34640,1)
+488756^^Y
+"DATA",176.112,34641,0)
+4010696^CONVEX INSERT,SUR-FIT C#1259-46
+"DATA",176.112,34641,1)
+488757^^Y
+"DATA",176.112,34642,0)
+4010697^CONVEX INSERT,SUR-FIT C#1259-47
+"DATA",176.112,34642,1)
+488758^^Y
+"DATA",176.112,34643,0)
+4010674^CONVEX INSERT,SUR-FIT C#1850-10
+"DATA",176.112,34643,1)
+488759^^Y
+"DATA",176.112,34644,0)
+4010675^CONVEX INSERT,SUR-FIT C#1850-11
+"DATA",176.112,34644,1)
+488760^^Y
+"DATA",176.112,34645,0)
+4010676^CONVEX INSERT,SUR-FIT C#1850-12
+"DATA",176.112,34645,1)
+488761^^Y
+"DATA",176.112,34646,0)
+4010677^CONVEX INSERT,SUR-FIT C#1850-15
+"DATA",176.112,34646,1)
+488762^^Y
+"DATA",176.112,34647,0)
+4010678^CONVEX INSERT,SUR-FIT C#1850-16
+"DATA",176.112,34647,1)
+488763^^Y
+"DATA",176.112,34648,0)
+4010679^CONVEX INSERT,SUR-FIT C#1850-17
+"DATA",176.112,34648,1)
+488764^^Y
+"DATA",176.112,34649,0)
+4010680^CONVEX INSERT,SUR-FIT C#1850-20
+"DATA",176.112,34649,1)
+488765^^Y
+"DATA",176.112,34650,0)
+4010681^CONVEX INSERT,SUR-FIT C#1850-21
+"DATA",176.112,34650,1)
+488766^^Y
+"DATA",176.112,34651,0)
+4015044^CONVEX INSERT,SUR-FIT C#4040-06
+"DATA",176.112,34651,1)
+488767^^Y
+"DATA",176.112,34652,0)
+4014988^CONVEX INSERT,SUR-FIT C#4040-07
+"DATA",176.112,34652,1)
+488768^^Y
+"DATA",176.112,34653,0)
+4014603^CONVEX INSERT,SUR-FIT C#4040-08
+"DATA",176.112,34653,1)
+488769^^Y
+"DATA",176.112,34654,0)
+4014366^CONVEX INSERT,SUR-FIT C#4040-09
+"DATA",176.112,34654,1)
+488770^^Y
+"DATA",176.112,34655,0)
+4014199^CONVEX INSERT,SUR-FIT C#4040-10
+"DATA",176.112,34655,1)
+488771^^Y
+"DATA",176.112,34656,0)
+4014367^CONVEX INSERT,SUR-FIT C#4040-11
+"DATA",176.112,34656,1)
+488772^^Y
+"DATA",176.112,34657,0)
+4014368^CONVEX INSERT,SUR-FIT C#4040-12
+"DATA",176.112,34657,1)
+488773^^Y
+"DATA",176.112,34658,0)
+4014369^CONVEX INSERT,SUR-FIT C#4040-13
+"DATA",176.112,34658,1)
+488774^^Y
+"DATA",176.112,34659,0)
+4011591^COVER-ROLL ADHESIVE GAUZE 12IN X 10YD #2043
+"DATA",176.112,34659,1)
+488775^^Y
+"DATA",176.112,34660,0)
+4011592^COVER-ROLL ADHESIVE GAUZE 2IN X 10YD #2034
+"DATA",176.112,34660,1)
+488776^^Y
+"DATA",176.112,34661,0)
+4011593^COVER-ROLL ADHESIVE GAUZE 4IN X 10YD #2035
+"DATA",176.112,34661,1)
+488777^^Y
+"DATA",176.112,34662,0)
+4011589^COVER-ROLL ADHESIVE GAUZE 6IN X 10YD #2041
+"DATA",176.112,34662,1)
+488778^^Y
+"DATA",176.112,34663,0)
+4011590^COVER-ROLL ADHESIVE GAUZE 8IN X 10YD #2042
+"DATA",176.112,34663,1)
+488779^^Y
+"DATA",176.112,34664,0)
+4014314^COVERLET,4-WING 3IN X 3IN #0385
+"DATA",176.112,34664,1)
+488780^^Y
+"DATA",176.112,34665,0)
+4014315^COVERLET,KNUCKLE 1.5IN X 3IN #1390
+"DATA",176.112,34665,1)
+488781^^Y
+"DATA",176.112,34666,0)
+4014313^COVERLET,LARGE DIGIT 2IN X 2.5IN #1307
+"DATA",176.112,34666,1)
+488782^^Y
+"DATA",176.112,34667,0)
+4014310^COVERLET,PATCH 2IN X 3IN #340000
+"DATA",176.112,34667,1)
+488783^^Y
+"DATA",176.112,34668,0)
+4014312^COVERLET,SMALL DIGIT 1.5IN X 2.5IN #1306
+"DATA",176.112,34668,1)
+488784^^Y
+"DATA",176.112,34669,0)
+4014311^COVERLET,TOE SHIELD 1.75IN X 2.5IN #0801
+"DATA",176.112,34669,1)
+488785^^Y
+"DATA",176.112,34670,0)
+4012316^DIAPHRAGM KIT ALL-FLEX 55MM
+"DATA",176.112,34670,1)
+488786^^Y
+"DATA",176.112,34671,0)
+4012317^DIAPHRAGM KIT ALL-FLEX 60MM
+"DATA",176.112,34671,1)
+488787^^Y
+"DATA",176.112,34672,0)
+4012318^DIAPHRAGM KIT ALL-FLEX 65MM
+"DATA",176.112,34672,1)
+488788^^Y
+"DATA",176.112,34673,0)
+4012319^DIAPHRAGM KIT ALL-FLEX 70MM
+"DATA",176.112,34673,1)
+488789^^Y
+"DATA",176.112,34674,0)
+4012320^DIAPHRAGM KIT ALL-FLEX 75MM
+"DATA",176.112,34674,1)
+488790^^Y
+"DATA",176.112,34675,0)
+4012321^DIAPHRAGM KIT ALL-FLEX 80MM
+"DATA",176.112,34675,1)
+488791^^Y
+"DATA",176.112,34676,0)
+4012322^DIAPHRAGM KIT ALL-FLEX 85MM
+"DATA",176.112,34676,1)
+488792^^Y
+"DATA",176.112,34677,0)
+4012323^DIAPHRAGM KIT ALL-FLEX 90MM
+"DATA",176.112,34677,1)
+488793^^Y
+"DATA",176.112,34678,0)
+4012324^DIAPHRAGM KIT ALL-FLEX 95MM
+"DATA",176.112,34678,1)
+488794^^Y
+"DATA",176.112,34679,0)
+4012331^DIAPHRAGM KIT COIL SPRING SIZE 100
+"DATA",176.112,34679,1)
+488795^^Y
+"DATA",176.112,34680,0)
+4012330^DIAPHRAGM KIT COIL SPRING SIZE 105
+"DATA",176.112,34680,1)
+488796^^Y
+"DATA",176.112,34681,0)
+4012311^DIAPHRAGM KIT COIL SPRING SIZE 50
+"DATA",176.112,34681,1)
+488797^^Y
+"DATA",176.112,34682,0)
+4012315^DIAPHRAGM KIT COIL SPRING SIZE 55
+"DATA",176.112,34682,1)
+488798^^Y
+"DATA",176.112,34683,0)
+4012329^DIAPHRAGM KIT COIL SPRING SIZE 60
+"DATA",176.112,34683,1)
+488799^^Y
+"DATA",176.112,34684,0)
+4012312^DIAPHRAGM KIT COIL SPRING SIZE 65
+"DATA",176.112,34684,1)
+488800^^Y
+"DATA",176.112,34685,0)
+4012328^DIAPHRAGM KIT COIL SPRING SIZE 70
+"DATA",176.112,34685,1)
+488801^^Y
+"DATA",176.112,34686,0)
+4012327^DIAPHRAGM KIT COIL SPRING SIZE 75
+"DATA",176.112,34686,1)
+488802^^Y
+"DATA",176.112,34687,0)
+4012313^DIAPHRAGM KIT COIL SPRING SIZE 80
+"DATA",176.112,34687,1)
+488803^^Y
+"DATA",176.112,34688,0)
+4012326^DIAPHRAGM KIT COIL SPRING SIZE 85
+"DATA",176.112,34688,1)
+488804^^Y
+"DATA",176.112,34689,0)
+4012325^DIAPHRAGM KIT COIL SPRING SIZE 90
+"DATA",176.112,34689,1)
+488805^^Y
+"DATA",176.112,34690,0)
+4012314^DIAPHRAGM KIT COIL SPRING SIZE 95
+"DATA",176.112,34690,1)
+488806^^Y
+"DATA",176.112,34691,0)
+4012384^DRAIN TUBE ATTACHMENT DEVICE H#9781
+"DATA",176.112,34691,1)
+488807^^Y
+"DATA",176.112,34692,0)
+4012385^DRAIN TUBE ATTACHMENT DEVICE H#9782
+"DATA",176.112,34692,1)
+488808^^Y
+"DATA",176.112,34693,0)
+4012362^DRAIN TUBE EXTENSION MARLEN
+"DATA",176.112,34693,1)
+488809^^Y
+"DATA",176.112,34694,0)
+4012373^DRAIN TUBE H#9831
+"DATA",176.112,34694,1)
+488810^^Y
+"DATA",176.112,34695,0)
+4011454^DRAIN TUBE,UROSTOMY H#7328
+"DATA",176.112,34695,1)
+488811^^Y
+"DATA",176.112,34696,0)
+4011453^DRAIN TUBE,UROSTOMY,LO-PROFILE H#7330
+"DATA",176.112,34696,1)
+488812^^Y
+"DATA",176.112,34697,0)
+4014330^DRAIN TUBE,UROSTOMY,VALVE UROCARE#6005
+"DATA",176.112,34697,1)
+488813^^Y
+"DATA",176.112,34698,0)
+4012379^DRAIN,ODOR-BARRIER MEDIUM BONGORT #1103
+"DATA",176.112,34698,1)
+488814^^Y
+"DATA",176.112,34699,0)
+4012380^DRAIN,ODORPROOF BONGORT #1110
+"DATA",176.112,34699,1)
+488815^^Y
+"DATA",176.112,34700,0)
+4012377^DRAIN,OPEN-END BONGORT #1000-00
+"DATA",176.112,34700,1)
+488816^^Y
+"DATA",176.112,34701,0)
+4012386^DRAIN,OPEN-END BONGORT U#1080-00
+"DATA",176.112,34701,1)
+488817^^Y
+"DATA",176.112,34702,0)
+4012383^DRAIN/TUBE ATTACHMENT DEVICE H#9780
+"DATA",176.112,34702,1)
+488818^^Y
+"DATA",176.112,34703,0)
+4011605^DRESSING NON-ADHERE OIL/EMULSION 3INX3IN
+"DATA",176.112,34703,1)
+488819^^Y
+"DATA",176.112,34704,0)
+4011597^DRESSING NON-ADHERE OIL/EMULSION 3INX8IN
+"DATA",176.112,34704,1)
+488820^^Y
+"DATA",176.112,34705,0)
+4011598^DRESSING TRAY FOR CENTRAL LINE
+"DATA",176.112,34705,1)
+488821^^Y
+"DATA",176.112,34706,0)
+4011596^DRESSING TRAY,DISPOSABLE PHARMASEL#4611A
+"DATA",176.112,34706,1)
+488822^^Y
+"DATA",176.112,34707,0)
+4015121^DRESSING,ADAPTIC NON-ADHERING 3IN X 3IN
+"DATA",176.112,34707,1)
+488823^^Y
+"DATA",176.112,34708,0)
+4015122^DRESSING,ADAPTIC NON-ADHERING 3IN X 8IN
+"DATA",176.112,34708,1)
+488824^^Y
+"DATA",176.112,34709,0)
+4014860^DRESSING,ALLEVYN ADHESIVE 3IN X 3IN,U#0043
+"DATA",176.112,34709,1)
+488825^^Y
+"DATA",176.112,34710,0)
+4014861^DRESSING,ALLEVYN ADHESIVE 5IN X 5IN,U#0044
+"DATA",176.112,34710,1)
+488826^^Y
+"DATA",176.112,34711,0)
+4014862^DRESSING,ALLEVYN ADHESIVE 7IN X 7IN,U#0045
+"DATA",176.112,34711,1)
+488827^^Y
+"DATA",176.112,34712,0)
+4011607^DRESSING,ALLEVYN HYDROPHILIC POLYURETHANE 4IN X 4IN,U#7637
+"DATA",176.112,34712,1)
+488828^^Y
+"DATA",176.112,34713,0)
+4011608^DRESSING,ALLEVYN HYDROPHILIC POLYURETHANE 8IN X 8IN,U#7638
+"DATA",176.112,34713,1)
+488829^^Y
+"DATA",176.112,34714,0)
+4011631^DRESSING,ALLEVYN ISLAND 4IN X 4IN,U#7644
+"DATA",176.112,34714,1)
+488830^^Y
+"DATA",176.112,34715,0)
+4011632^DRESSING,ALLEVYN ISLAND 5IN X 5IN,U#7645
+"DATA",176.112,34715,1)
+488831^^Y
+"DATA",176.112,34716,0)
+4014863^DRESSING,ALLEVYN ISLAND 6IN X 6IN,U#4600
+"DATA",176.112,34716,1)
+488832^^Y
+"DATA",176.112,34717,0)
+4011633^DRESSING,ALLEVYN ISLAND 6IN X 6IN,U#7646
+"DATA",176.112,34717,1)
+488833^^Y
+"DATA",176.112,34718,0)
+4013505^DRESSING,ALLEVYN TRACH 3.5IN X 3.5IN,U#7640
+"DATA",176.112,34718,1)
+488834^^Y
+"DATA",176.112,34719,0)
+4017166^DRESSING,AQUACEL AG 0.75IN X 18IN C#403712
+"DATA",176.112,34719,1)
+488835^^Y
+"DATA",176.112,34720,0)
+4017162^DRESSING,AQUACEL AG 2IN X 2IN C#403706
+"DATA",176.112,34720,1)
+488836^^Y
+"DATA",176.112,34721,0)
+4017163^DRESSING,AQUACEL AG 4IN X 4IN C#403708
+"DATA",176.112,34721,1)
+488837^^Y
+"DATA",176.112,34722,0)
+4017164^DRESSING,AQUACEL AG 6IN X 6IN C#403710
+"DATA",176.112,34722,1)
+488838^^Y
+"DATA",176.112,34723,0)
+4017165^DRESSING,AQUACEL AG 8IN X 12IN C#403711
+"DATA",176.112,34723,1)
+488839^^Y
+"DATA",176.112,34724,0)
+4011665^DRESSING,AQUACEL HYDROFIBER 0.75IN X 18IN C#1779-04
+"DATA",176.112,34724,1)
+488840^^Y
+"DATA",176.112,34725,0)
+4011662^DRESSING,AQUACEL HYDROFIBER 2IN X 2IN C#1779-01
+"DATA",176.112,34725,1)
+488841^^Y
+"DATA",176.112,34726,0)
+4011663^DRESSING,AQUACEL HYDROFIBER 4IN X 4IN C#1779-02
+"DATA",176.112,34726,1)
+488842^^Y
+"DATA",176.112,34727,0)
+4011664^DRESSING,AQUACEL HYDROFIBER 6IN X 6IN C#1779-03
+"DATA",176.112,34727,1)
+488843^^Y
+"DATA",176.112,34728,0)
+4013848^DRESSING,AQUASORB 1.25INX2.25IN GEL,DEROYAL #46-517
+"DATA",176.112,34728,1)
+488844^^Y
+"DATA",176.112,34729,0)
+4013844^DRESSING,AQUASORB 2.5INX2.5IN GEL,DEROYAL #46-511
+"DATA",176.112,34729,1)
+488845^^Y
+"DATA",176.112,34730,0)
+4013846^DRESSING,AQUASORB 2.5INX2.5IN GEL,DEROYAL #46-515
+"DATA",176.112,34730,1)
+488846^^Y
+"DATA",176.112,34731,0)
+4013838^DRESSING,AQUASORB 2.5INX2.5IN,DEROYAL #46-501
+"DATA",176.112,34731,1)
+488847^^Y
+"DATA",176.112,34732,0)
+4013839^DRESSING,AQUASORB 3.75INX3.75IN,DEROYAL #46-502
+"DATA",176.112,34732,1)
+488848^^Y
+"DATA",176.112,34733,0)
+4013845^DRESSING,AQUASORB 3.75INX4.5IN GEL,DEROYAL #46-512
+"DATA",176.112,34733,1)
+488849^^Y
+"DATA",176.112,34734,0)
+4013847^DRESSING,AQUASORB 3.75INX4.5IN GEL,DEROYAL #46-516
+"DATA",176.112,34734,1)
+488850^^Y
+"DATA",176.112,34735,0)
+4013842^DRESSING,AQUASORB 3.75INX4.5IN,DEROYAL #46-505
+"DATA",176.112,34735,1)
+488851^^Y
+"DATA",176.112,34736,0)
+4013840^DRESSING,AQUASORB 3.75INX6IN,DEROYAL #46-503
+"DATA",176.112,34736,1)
+488852^^Y
+"DATA",176.112,34737,0)
+4013843^DRESSING,AQUASORB 7.5INX18IN,DEROYAL #46-525
+"DATA",176.112,34737,1)
+488853^^Y
+"DATA",176.112,34738,0)
+4013841^DRESSING,AQUASORB 7.5INX7.5IN,DEROYAL #46-504
+"DATA",176.112,34738,1)
+488854^^Y
+"DATA",176.112,34739,0)
+4017328^DRESSING,BIATAIN 3D NON-ADHESIVE FOAM 2IN ROUND
+"DATA",176.112,34739,1)
+488855^^Y
+"DATA",176.112,34740,0)
+4017329^DRESSING,BIATAIN 3D NON-ADHESIVE FOAM 3IN ROUND
+"DATA",176.112,34740,1)
+488856^^Y
+"DATA",176.112,34741,0)
+4017330^DRESSING,BIATAIN 3D NON-ADHESIVE FOAM 4IN X 4IN
+"DATA",176.112,34741,1)
+488857^^Y
+"DATA",176.112,34742,0)
+4017331^DRESSING,BIATAIN 3D NON-ADHESIVE FOAM 5IN X 5IN
+"DATA",176.112,34742,1)
+488858^^Y
+"DATA",176.112,34743,0)
+4017327^DRESSING,BIATAIN 3D NON-ADHESIVE FOAM 6IN X 6IN
+"DATA",176.112,34743,1)
+488859^^Y
+"DATA",176.112,34744,0)
+4017326^DRESSING,BIATAIN 3D NON-ADHESIVE FOAM 7IN X 7IN
+"DATA",176.112,34744,1)
+488860^^Y
+"DATA",176.112,34745,0)
+4017325^DRESSING,BIATAIN 3D NON-ADHESIVE FOAM 8IN X 8IN
+"DATA",176.112,34745,1)
+488861^^Y
+"DATA",176.112,34746,0)
+4015389^DRESSING,BIOPATCH 1.5MM JJ#2151
+"DATA",176.112,34746,1)
+488862^^Y
+"DATA",176.112,34747,0)
+4015390^DRESSING,BIOPATCH 4MM JJ#2150
+"DATA",176.112,34747,1)
+488863^^Y
+"DATA",176.112,34748,0)
+4015388^DRESSING,BIOPATCH 7MM JJ#2152
+"DATA",176.112,34748,1)
+488864^^Y
+"DATA",176.112,34749,0)
+4015166^DRESSING,CALCIUM ALGINATE 12IN
+"DATA",176.112,34749,1)
+488865^^Y
+"DATA",176.112,34750,0)
+4015170^DRESSING,CALCIUM ALGINATE 2IN X 2IN
+"DATA",176.112,34750,1)
+488866^^Y
+"DATA",176.112,34751,0)
+4015167^DRESSING,CALCIUM ALGINATE 3IN X 3IN
+"DATA",176.112,34751,1)
+488867^^Y
+"DATA",176.112,34752,0)
+4015168^DRESSING,CALCIUM ALGINATE 4IN X 4IN
+"DATA",176.112,34752,1)
+488868^^Y
+"DATA",176.112,34753,0)
+4015169^DRESSING,CALCIUM ALGINATE 4IN X 8IN
+"DATA",176.112,34753,1)
+488869^^Y
+"DATA",176.112,34754,0)
+4015325^DRESSING,CARBOFLEX 3IN X 6IN C#4032-03
+"DATA",176.112,34754,1)
+488870^^Y
+"DATA",176.112,34755,0)
+4014706^DRESSING,CARBOFLEX 4IN X 4IN C#4032-02
+"DATA",176.112,34755,1)
+488871^^Y
+"DATA",176.112,34756,0)
+4014707^DRESSING,CARBOFLEX 6IN X 8IN C#4032-04
+"DATA",176.112,34756,1)
+488872^^Y
+"DATA",176.112,34757,0)
+4011672^DRESSING,CARRASMART FOAM 2IN X 3IN,#0142-20
+"DATA",176.112,34757,1)
+488873^^Y
+"DATA",176.112,34758,0)
+4014701^DRESSING,CICA-CARE 2.36IN X 4.72IN SN#6272
+"DATA",176.112,34758,1)
+488874^^Y
+"DATA",176.112,34759,0)
+4014700^DRESSING,CICA-CARE 5IN X 6IN SN#6270
+"DATA",176.112,34759,1)
+488875^^Y
+"DATA",176.112,34760,0)
+4016464^DRESSING,CICA-CARE 5IN X 6IN SN#66250707
+"DATA",176.112,34760,1)
+488876^^Y
+"DATA",176.112,34761,0)
+4015400^DRESSING,CLEARSITE 2IN X 3IN CNMED#40-9220
+"DATA",176.112,34761,1)
+488877^^Y
+"DATA",176.112,34762,0)
+4014720^DRESSING,CLEARSITE 3IN X 4IN CNMED#40-9220
+"DATA",176.112,34762,1)
+488878^^Y
+"DATA",176.112,34763,0)
+4014696^DRESSING,CLEARSITE 3IN X 4IN,NDM#40-9020
+"DATA",176.112,34763,1)
+488879^^Y
+"DATA",176.112,34764,0)
+4011609^DRESSING,CLEARSITE 3IN X 4IN,NDM#40-9023
+"DATA",176.112,34764,1)
+488880^^Y
+"DATA",176.112,34765,0)
+4014721^DRESSING,CLEARSITE 4.5IN X 5IN CNMED#40-9225
+"DATA",176.112,34765,1)
+488881^^Y
+"DATA",176.112,34766,0)
+4015401^DRESSING,CLEARSITE 4.5IN X 5IN CNMED#40-9255
+"DATA",176.112,34766,1)
+488882^^Y
+"DATA",176.112,34767,0)
+4014724^DRESSING,CLEARSITE 4IN X 48IN ROLL CNMED#40-9248
+"DATA",176.112,34767,1)
+488883^^Y
+"DATA",176.112,34768,0)
+4011657^DRESSING,CLEARSITE 4IN X 4IN,NDM#40-9240
+"DATA",176.112,34768,1)
+488884^^Y
+"DATA",176.112,34769,0)
+4014722^DRESSING,CLEARSITE 5IN X 11.5IN CNMED#40-9252
+"DATA",176.112,34769,1)
+488885^^Y
+"DATA",176.112,34770,0)
+4014725^DRESSING,CLEARSITE 5IN X 5IN CNMED#40-9040
+"DATA",176.112,34770,1)
+488886^^Y
+"DATA",176.112,34771,0)
+4011610^DRESSING,CLEARSITE 5IN X 5IN,NDM#40-9044
+"DATA",176.112,34771,1)
+488887^^Y
+"DATA",176.112,34772,0)
+4011611^DRESSING,CLEARSITE 7.5IN X 9.5IN,NDM#40-9068
+"DATA",176.112,34772,1)
+488888^^Y
+"DATA",176.112,34773,0)
+4014723^DRESSING,CLEARSITE 8IN X 8IN CNMED#40-9288
+"DATA",176.112,34773,1)
+488889^^Y
+"DATA",176.112,34774,0)
+4014727^DRESSING,CLEARSITE ISLAND 1.75IN X 2.5IN CNMED#40-9315
+"DATA",176.112,34774,1)
+488890^^Y
+"DATA",176.112,34775,0)
+4014728^DRESSING,CLEARSITE ISLAND 3IN X 4IN CNMED#40-9320
+"DATA",176.112,34775,1)
+488891^^Y
+"DATA",176.112,34776,0)
+4014729^DRESSING,CLEARSITE ISLAND 4.5IN X 9.5IN CNMED#40-9338
+"DATA",176.112,34776,1)
+488892^^Y
+"DATA",176.112,34777,0)
+4014730^DRESSING,CLEARSITE ISLAND 5IN X 5IN CNMED#40-9340
+"DATA",176.112,34777,1)
+488893^^Y
+"DATA",176.112,34778,0)
+4014731^DRESSING,CLEARSITE ISLAND 5IN X 6IN CNMED#40-9355
+"DATA",176.112,34778,1)
+488894^^Y
+"DATA",176.112,34779,0)
+4014732^DRESSING,CLEARSITE ISLAND 8.5IN X 9.5IN CNMED#40-9388
+"DATA",176.112,34779,1)
+488895^^Y
+"DATA",176.112,34780,0)
+4015171^DRESSING,COLLAGEN ALGINATE 2IN X 2IN
+"DATA",176.112,34780,1)
+488896^^Y
+"DATA",176.112,34781,0)
+4015172^DRESSING,COLLAGEN ALGINATE 4IN X 4 3/8IN
+"DATA",176.112,34781,1)
+488897^^Y
+"DATA",176.112,34782,0)
+4015173^DRESSING,COLLAGEN ALGINATE 4IN X 8 3/4IN
+"DATA",176.112,34782,1)
+488898^^Y
+"DATA",176.112,34783,0)
+4011671^DRESSING,COMBI-DERM ACD 4IN X 4IN C#6510-31
+"DATA",176.112,34783,1)
+488899^^Y
+"DATA",176.112,34784,0)
+4011668^DRESSING,COMBI-DERM ACD 5.25IN X 5.25IN C#1877-25
+"DATA",176.112,34784,1)
+488900^^Y
+"DATA",176.112,34785,0)
+4011670^DRESSING,COMBI-DERM ACD 6IN X 10IN C#6510-29
+"DATA",176.112,34785,1)
+488901^^Y
+"DATA",176.112,34786,0)
+4011669^DRESSING,COMBI-DERM ACD 6IN X 7IN TRIANGULAR C#6510-27
+"DATA",176.112,34786,1)
+488902^^Y
+"DATA",176.112,34787,0)
+4015969^DRESSING,COMFEEL 6GM PWDR COLOPLAST #4703
+"DATA",176.112,34787,1)
+488903^^Y
+"DATA",176.112,34788,0)
+4011637^DRESSING,COMFEEL PLUS CLEAR COLOPLAST #3530
+"DATA",176.112,34788,1)
+488904^^Y
+"DATA",176.112,34789,0)
+4011638^DRESSING,COMFEEL PLUS CLEAR COLOPLAST #3533
+"DATA",176.112,34789,1)
+488905^^Y
+"DATA",176.112,34790,0)
+4011639^DRESSING,COMFEEL PLUS CLEAR COLOPLAST #3536
+"DATA",176.112,34790,1)
+488906^^Y
+"DATA",176.112,34791,0)
+4011640^DRESSING,COMFEEL PLUS CLEAR COLOPLAST #3539
+"DATA",176.112,34791,1)
+488907^^Y
+"DATA",176.112,34792,0)
+4011641^DRESSING,COMFEEL PLUS CLEAR COLOPLAST #3542
+"DATA",176.112,34792,1)
+488908^^Y
+"DATA",176.112,34793,0)
+4011642^DRESSING,COMFEEL PLUS CLEAR COLOPLAST #3545
+"DATA",176.112,34793,1)
+488909^^Y
+"DATA",176.112,34794,0)
+4011643^DRESSING,COMFEEL PLUS CLEAR COLOPLAST #3548
+"DATA",176.112,34794,1)
+488910^^Y
+"DATA",176.112,34795,0)
+4011644^DRESSING,COMFEEL PLUS CONTOUR COLOPLAST #3280
+"DATA",176.112,34795,1)
+488911^^Y
+"DATA",176.112,34796,0)
+4011645^DRESSING,COMFEEL PLUS CONTOUR COLOPLAST #3283
+"DATA",176.112,34796,1)
+488912^^Y
+"DATA",176.112,34797,0)
+4011646^DRESSING,COMFEEL PLUS PRESSURE RELIEF COLOPLAST #3350
+"DATA",176.112,34797,1)
+488913^^Y
+"DATA",176.112,34798,0)
+4011647^DRESSING,COMFEEL PLUS PRESSURE RELIEF COLOPLAST #3353
+"DATA",176.112,34798,1)
+488914^^Y
+"DATA",176.112,34799,0)
+4011648^DRESSING,COMFEEL PLUS PRESSURE RELIEF COLOPLAST #3356
+"DATA",176.112,34799,1)
+488915^^Y
+"DATA",176.112,34800,0)
+4011634^DRESSING,COMFEEL SEASORB COLOPLAST #3705
+"DATA",176.112,34800,1)
+488916^^Y
+"DATA",176.112,34801,0)
+4011635^DRESSING,COMFEEL SEASORB COLOPLAST #3710
+"DATA",176.112,34801,1)
+488917^^Y
+"DATA",176.112,34802,0)
+4011653^DRESSING,COMFEEL ULCER CARE COLOPLAST #3213
+"DATA",176.112,34802,1)
+488918^^Y
+"DATA",176.112,34803,0)
+4011654^DRESSING,COMFEEL ULCER CARE COLOPLAST #3218
+"DATA",176.112,34803,1)
+488919^^Y
+"DATA",176.112,34804,0)
+4011655^DRESSING,COMFEEL ULCER CARE COLOPLAST #3223
+"DATA",176.112,34804,1)
+488920^^Y
+"DATA",176.112,34805,0)
+4011652^DRESSING,COMFEEL ULCER CARE COLOPLAST #3233
+"DATA",176.112,34805,1)
+488921^^Y
+"DATA",176.112,34806,0)
+4011649^DRESSING,COMFEEL ULCER COLOPLAST #3110
+"DATA",176.112,34806,1)
+488922^^Y
+"DATA",176.112,34807,0)
+4011650^DRESSING,COMFEEL ULCER COLOPLAST #3115
+"DATA",176.112,34807,1)
+488923^^Y
+"DATA",176.112,34808,0)
+4011651^DRESSING,COMFEEL ULCER COLOPLAST #3120
+"DATA",176.112,34808,1)
+488924^^Y
+"DATA",176.112,34809,0)
+4014710^DRESSING,COVADERM PLUS 4IN X 4IN DEROYAL #46-401
+"DATA",176.112,34809,1)
+488925^^Y
+"DATA",176.112,34810,0)
+4014709^DRESSING,COVADERM PLUS 6IN X 6IN DEROYAL #46-402
+"DATA",176.112,34810,1)
+488926^^Y
+"DATA",176.112,34811,0)
+4016402^DRESSING,CURAFOAM 2IN X 2IN K#9390
+"DATA",176.112,34811,1)
+488927^^Y
+"DATA",176.112,34812,0)
+4016404^DRESSING,CURAFOAM 4IN X 4IN DRAIN SPONGE K#9392
+"DATA",176.112,34812,1)
+488928^^Y
+"DATA",176.112,34813,0)
+4016403^DRESSING,CURAFOAM 4IN X 4IN K#9391
+"DATA",176.112,34813,1)
+488929^^Y
+"DATA",176.112,34814,0)
+4016409^DRESSING,CURAFOAM 4IN X 5IN K#9396
+"DATA",176.112,34814,1)
+488930^^Y
+"DATA",176.112,34815,0)
+4016405^DRESSING,CURAFOAM 4IN X 8IN K#9393
+"DATA",176.112,34815,1)
+488931^^Y
+"DATA",176.112,34816,0)
+4016407^DRESSING,CURAFOAM 6IN X 8IN K#9394
+"DATA",176.112,34816,1)
+488932^^Y
+"DATA",176.112,34817,0)
+4016408^DRESSING,CURAFOAM 8IN X 10IN K#9395
+"DATA",176.112,34817,1)
+488933^^Y
+"DATA",176.112,34818,0)
+4016406^DRESSING,CURAFOAM 8IN X 8IN K#9394
+"DATA",176.112,34818,1)
+488934^^Y
+"DATA",176.112,34819,0)
+4017036^DRESSING,CURAFOAM ISLAND 4IN X 4IN K#9090
+"DATA",176.112,34819,1)
+488935^^Y
+"DATA",176.112,34820,0)
+4017037^DRESSING,CURAFOAM ISLAND 6IN X 6IN K#9091
+"DATA",176.112,34820,1)
+488936^^Y
+"DATA",176.112,34821,0)
+4017038^DRESSING,CURAFOAM ISLAND 8IN X 8IN K#9092
+"DATA",176.112,34821,1)
+488937^^Y
+"DATA",176.112,34822,0)
+4016401^DRESSING,CURAFORM 2IN X 2IN K#9390
+"DATA",176.112,34822,1)
+488938^^Y
+"DATA",176.112,34823,0)
+4016294^DRESSING,CURASOL HYDROGEL 4IN X 4IN HP#6044
+"DATA",176.112,34823,1)
+488939^^Y
+"DATA",176.112,34824,0)
+4015356^DRESSING,DOUDERM 1.5IN X 1.75IN C#1879-32
+"DATA",176.112,34824,1)
+488940^^Y
+"DATA",176.112,34825,0)
+4011412^DRESSING,DUODERM 1.25IN X 1.5IN C#1879-32
+"DATA",176.112,34825,1)
+488941^^Y
+"DATA",176.112,34826,0)
+4016097^DRESSING,DUODERM 1.5IN X 1.75IN C#1879-32
+"DATA",176.112,34826,1)
+488942^^Y
+"DATA",176.112,34827,0)
+4011409^DRESSING,DUODERM 2.5IN X 2.5IN C#1879-70
+"DATA",176.112,34827,1)
+488943^^Y
+"DATA",176.112,34828,0)
+4011404^DRESSING,DUODERM 2IN X 4IN C#1879-00
+"DATA",176.112,34828,1)
+488944^^Y
+"DATA",176.112,34829,0)
+4011405^DRESSING,DUODERM 2IN X 8IN C#1879-61
+"DATA",176.112,34829,1)
+488945^^Y
+"DATA",176.112,34830,0)
+4011406^DRESSING,DUODERM 3IN X 3IN C#1879-01
+"DATA",176.112,34830,1)
+488946^^Y
+"DATA",176.112,34831,0)
+4011399^DRESSING,DUODERM 4IN X 4IN C#1876-10
+"DATA",176.112,34831,1)
+488947^^Y
+"DATA",176.112,34832,0)
+4011400^DRESSING,DUODERM 4IN X 4IN C#1876-11
+"DATA",176.112,34832,1)
+488948^^Y
+"DATA",176.112,34833,0)
+4011393^DRESSING,DUODERM 4IN X 4IN C#1876-58
+"DATA",176.112,34833,1)
+488949^^Y
+"DATA",176.112,34834,0)
+4011391^DRESSING,DUODERM 4IN X 4IN C#1876-60
+"DATA",176.112,34834,1)
+488950^^Y
+"DATA",176.112,34835,0)
+4011390^DRESSING,DUODERM 4IN X 4IN C#1879-55
+"DATA",176.112,34835,1)
+488951^^Y
+"DATA",176.112,34836,0)
+4011403^DRESSING,DUODERM 4IN X 4IN C#1879-71
+"DATA",176.112,34836,1)
+488952^^Y
+"DATA",176.112,34837,0)
+4011411^DRESSING,DUODERM 4IN X 5IN C#1879-73
+"DATA",176.112,34837,1)
+488953^^Y
+"DATA",176.112,34838,0)
+4011407^DRESSING,DUODERM 4IN X 6IN C#1879-02
+"DATA",176.112,34838,1)
+488954^^Y
+"DATA",176.112,34839,0)
+4011395^DRESSING,DUODERM 6IN X 6IN C#1876-59
+"DATA",176.112,34839,1)
+488955^^Y
+"DATA",176.112,34840,0)
+4011394^DRESSING,DUODERM 6IN X 6IN C#1876-61
+"DATA",176.112,34840,1)
+488956^^Y
+"DATA",176.112,34841,0)
+4011392^DRESSING,DUODERM 6IN X 6IN C#1879-57
+"DATA",176.112,34841,1)
+488957^^Y
+"DATA",176.112,34842,0)
+4011402^DRESSING,DUODERM 6IN X 6IN C#1879-72
+"DATA",176.112,34842,1)
+488958^^Y
+"DATA",176.112,34843,0)
+4011408^DRESSING,DUODERM 6IN X 7IN C#1879-03
+"DATA",176.112,34843,1)
+488959^^Y
+"DATA",176.112,34844,0)
+4011410^DRESSING,DUODERM 6IN X 7IN C#1879-74
+"DATA",176.112,34844,1)
+488960^^Y
+"DATA",176.112,34845,0)
+4011396^DRESSING,DUODERM 6IN X 8IN C#1876-43
+"DATA",176.112,34845,1)
+488961^^Y
+"DATA",176.112,34846,0)
+4011398^DRESSING,DUODERM 8IN X 12IN C#1876-44
+"DATA",176.112,34846,1)
+488962^^Y
+"DATA",176.112,34847,0)
+4011401^DRESSING,DUODERM 8IN X 8IN C#1876-20
+"DATA",176.112,34847,1)
+488963^^Y
+"DATA",176.112,34848,0)
+4011397^DRESSING,DUODERM 8IN X 8IN C#1876-62
+"DATA",176.112,34848,1)
+488964^^Y
+"DATA",176.112,34849,0)
+4014146^DRESSING,FIBRACOL 2IN X 2IN,J&J #2481
+"DATA",176.112,34849,1)
+488965^^Y
+"DATA",176.112,34850,0)
+4011656^DRESSING,FIBRACOL 4IN X 4 3/8IN,J&J #2494
+"DATA",176.112,34850,1)
+488966^^Y
+"DATA",176.112,34851,0)
+4014145^DRESSING,FIBRACOL 4IN X 8 3/4IN,J&J #2495
+"DATA",176.112,34851,1)
+488967^^Y
+"DATA",176.112,34852,0)
+4015863^DRESSING,FIBRACOL PLUS 2IN X 2IN,J&J #2981
+"DATA",176.112,34852,1)
+488968^^Y
+"DATA",176.112,34853,0)
+4015864^DRESSING,FIBRACOL PLUS 4IN X 4 3/8IN,J&J #2982
+"DATA",176.112,34853,1)
+488969^^Y
+"DATA",176.112,34854,0)
+4015866^DRESSING,FIBRACOL PLUS 4IN X 8 3/4IN,J&J #2983
+"DATA",176.112,34854,1)
+488970^^Y
+"DATA",176.112,34855,0)
+4015865^DRESSING,FIBRACOL PLUS ROPE J&J #2984
+"DATA",176.112,34855,1)
+488971^^Y
+"DATA",176.112,34856,0)
+4011627^DRESSING,FLEXZAN 2IN X 3IN
+"DATA",176.112,34856,1)
+488972^^Y
+"DATA",176.112,34857,0)
+4011628^DRESSING,FLEXZAN 4IN X 4IN
+"DATA",176.112,34857,1)
+488973^^Y
+"DATA",176.112,34858,0)
+4011629^DRESSING,FLEXZAN 4IN X 8IN
+"DATA",176.112,34858,1)
+488974^^Y
+"DATA",176.112,34859,0)
+4011630^DRESSING,FLEXZAN 8IN X 8IN
+"DATA",176.112,34859,1)
+488975^^Y
+"DATA",176.112,34860,0)
+4014165^DRESSING,FLEXZAN EXTRA 4IN X 8IN
+"DATA",176.112,34860,1)
+488976^^Y
+"DATA",176.112,34861,0)
+4014166^DRESSING,FLEXZAN EXTRA 8IN X 8IN
+"DATA",176.112,34861,1)
+488977^^Y
+"DATA",176.112,34862,0)
+4013319^DRESSING,HYDRASORB 3 1/8IN X 3 5/8IN C#1694-05
+"DATA",176.112,34862,1)
+488978^^Y
+"DATA",176.112,34863,0)
+4014433^DRESSING,HYDRASORB 3 1/8IN X 3 5/8IN KEN#1694-NZ
+"DATA",176.112,34863,1)
+488979^^Y
+"DATA",176.112,34864,0)
+4013318^DRESSING,HYDRASORB 4IN X 4IN C#1694-01
+"DATA",176.112,34864,1)
+488980^^Y
+"DATA",176.112,34865,0)
+4014432^DRESSING,HYDRASORB 4IN X 4IN KEN#1694-NW
+"DATA",176.112,34865,1)
+488981^^Y
+"DATA",176.112,34866,0)
+4013320^DRESSING,HYDRASORB 4IN X 8IN C#1694-14
+"DATA",176.112,34866,1)
+488982^^Y
+"DATA",176.112,34867,0)
+4014436^DRESSING,HYDRASORB 4IN X 8IN KEN#1694-NX
+"DATA",176.112,34867,1)
+488983^^Y
+"DATA",176.112,34868,0)
+4013321^DRESSING,HYDRASORB 6IN X 6IN C#1694-06
+"DATA",176.112,34868,1)
+488984^^Y
+"DATA",176.112,34869,0)
+4014434^DRESSING,HYDRASORB 6IN X 6IN KEN#1694-06
+"DATA",176.112,34869,1)
+488985^^Y
+"DATA",176.112,34870,0)
+4013322^DRESSING,HYDRASORB 8IN X 8IN C#1694-07
+"DATA",176.112,34870,1)
+488986^^Y
+"DATA",176.112,34871,0)
+4016410^DRESSING,HYDRASORB 8IN X 8IN KEN#1694-07
+"DATA",176.112,34871,1)
+488987^^Y
+"DATA",176.112,34872,0)
+4014435^DRESSING,HYDRASORB 8IN X 8IN KEN#1964-07
+"DATA",176.112,34872,1)
+488988^^Y
+"DATA",176.112,34873,0)
+4014167^DRESSING,HYDROCOL 3IN X 3IN
+"DATA",176.112,34873,1)
+488989^^Y
+"DATA",176.112,34874,0)
+4014168^DRESSING,HYDROCOL 4IN X 4IN
+"DATA",176.112,34874,1)
+488990^^Y
+"DATA",176.112,34875,0)
+4014169^DRESSING,HYDROCOL 6IN X 8IN
+"DATA",176.112,34875,1)
+488991^^Y
+"DATA",176.112,34876,0)
+4014170^DRESSING,HYDROCOL 8IN X 8IN
+"DATA",176.112,34876,1)
+488992^^Y
+"DATA",176.112,34877,0)
+4014171^DRESSING,HYDROCOL SACRAL
+"DATA",176.112,34877,1)
+488993^^Y
+"DATA",176.112,34878,0)
+4014172^DRESSING,HYDROCOL THIN 3IN X 3IN
+"DATA",176.112,34878,1)
+488994^^Y
+"DATA",176.112,34879,0)
+4014173^DRESSING,HYDROCOL THIN 4IN X 4IN
+"DATA",176.112,34879,1)
+488995^^Y
+"DATA",176.112,34880,0)
+4014174^DRESSING,HYDROCOL THIN 6IN X 6IN
+"DATA",176.112,34880,1)
+488996^^Y
+"DATA",176.112,34881,0)
+4015100^DRESSING,IODOFLEX 10GM, 6CM X 8CM
+"DATA",176.112,34881,1)
+489001^^Y
+"DATA",176.112,34882,0)
+4013073^DRESSING,IODOFLEX 4IN X 6IN
+"DATA",176.112,34882,1)
+489002^^Y
+"DATA",176.112,34883,0)
+4015099^DRESSING,IODOFLEX 5GM, 4CM X 6CM
+"DATA",176.112,34883,1)
+489003^^Y
+"DATA",176.112,34884,0)
+4013072^DRESSING,IODOFLEX 8IN X 6IN
+"DATA",176.112,34884,1)
+489004^^Y
+"DATA",176.112,34885,0)
+4013704^DRESSING,LYOFOAM 10IN X 12IN C#1646-70
+"DATA",176.112,34885,1)
+489005^^Y
+"DATA",176.112,34886,0)
+4013699^DRESSING,LYOFOAM 15 3/4IN X 27 5/8IN C#1646-85
+"DATA",176.112,34886,1)
+489006^^Y
+"DATA",176.112,34887,0)
+4013703^DRESSING,LYOFOAM 3IN X 3IN C#1646-50
+"DATA",176.112,34887,1)
+489007^^Y
+"DATA",176.112,34888,0)
+4013705^DRESSING,LYOFOAM 4IN X 10IN C#1646-60
+"DATA",176.112,34888,1)
+489008^^Y
+"DATA",176.112,34889,0)
+4013701^DRESSING,LYOFOAM 4IN X 4IN C#1646-55
+"DATA",176.112,34889,1)
+489009^^Y
+"DATA",176.112,34890,0)
+4013702^DRESSING,LYOFOAM 4IN X 7IN C#1646-58
+"DATA",176.112,34890,1)
+489010^^Y
+"DATA",176.112,34891,0)
+4013700^DRESSING,LYOFOAM 6IN X 8IN C#1646-63
+"DATA",176.112,34891,1)
+489011^^Y
+"DATA",176.112,34892,0)
+4013693^DRESSING,LYOFOAM A 2IN X 2IN C#1648-45
+"DATA",176.112,34892,1)
+489012^^Y
+"DATA",176.112,34893,0)
+4013692^DRESSING,LYOFOAM A 4IN X 4IN C#1648-55
+"DATA",176.112,34893,1)
+489013^^Y
+"DATA",176.112,34894,0)
+4013695^DRESSING,LYOFOAM C 4IN X 4IN C#1647-55
+"DATA",176.112,34894,1)
+489014^^Y
+"DATA",176.112,34895,0)
+4013694^DRESSING,LYOFOAM C 6IN X 8IN C#1647-63
+"DATA",176.112,34895,1)
+489015^^Y
+"DATA",176.112,34896,0)
+4013696^DRESSING,LYOFOAM EXTRA 10IN X 12IN C#1656-70
+"DATA",176.112,34896,1)
+489016^^Y
+"DATA",176.112,34897,0)
+4013698^DRESSING,LYOFOAM EXTRA 4IN X 4IN C#1656-55
+"DATA",176.112,34897,1)
+489017^^Y
+"DATA",176.112,34898,0)
+4014454^DRESSING,LYOFOAM EXTRA 4IN X 7IN C#1656-58
+"DATA",176.112,34898,1)
+489018^^Y
+"DATA",176.112,34899,0)
+4013697^DRESSING,LYOFOAM EXTRA 6IN X 8IN C#1656-63
+"DATA",176.112,34899,1)
+489019^^Y
+"DATA",176.112,34900,0)
+4013706^DRESSING,LYOFOAM T 3.5IN X 2.5IN C#1648-75
+"DATA",176.112,34900,1)
+489021^^Y
+"DATA",176.112,34901,0)
+4013782^DRESSING,LYOFOAM T 2.5IN X 3.5IN C#1648-75
+"DATA",176.112,34901,1)
+489021^^Y
+"DATA",176.112,34902,0)
+4014523^DRESSING,MEDIPORE 3-7/8IN X 4-5/8IN 3M#2954
+"DATA",176.112,34902,1)
+489022^^Y
+"DATA",176.112,34903,0)
+4014525^DRESSING,MEDIPORE 3-7/8IN X 7-7/8IN 3M#2955
+"DATA",176.112,34903,1)
+489023^^Y
+"DATA",176.112,34904,0)
+4014526^DRESSING,MEDIPORE 5-7/8IN X 11IN 3M#2957
+"DATA",176.112,34904,1)
+489024^^Y
+"DATA",176.112,34905,0)
+4014524^DRESSING,MEDIPORE 5-7/8IN X 5-7/8IN 3M#2956
+"DATA",176.112,34905,1)
+489025^^Y
+"DATA",176.112,34906,0)
+4014527^DRESSING,MEDIPORE 7-7/8IN X 11IN 3M#2958
+"DATA",176.112,34906,1)
+489026^^Y
+"DATA",176.112,34907,0)
+4011685^DRESSING,OCCLUSIVE F#135-4267
+"DATA",176.112,34907,1)
+489027^^Y
+"DATA",176.112,34908,0)
+4011686^DRESSING,OCCLUSIVE F#135-4268
+"DATA",176.112,34908,1)
+489028^^Y
+"DATA",176.112,34909,0)
+4011594^DRESSING,OCCLUSIVE F#171-8905
+"DATA",176.112,34909,1)
+489029^^Y
+"DATA",176.112,34910,0)
+4011612^DRESSING,ODOR ABSORBENT H#9904
+"DATA",176.112,34910,1)
+489030^^Y
+"DATA",176.112,34911,0)
+4011613^DRESSING,ODOR ABSORBENT H#9906
+"DATA",176.112,34911,1)
+489031^^Y
+"DATA",176.112,34912,0)
+4014791^DRESSING,OIL EMULSION 3IN X 16IN KEN#6114
+"DATA",176.112,34912,1)
+489032^^Y
+"DATA",176.112,34913,0)
+4014788^DRESSING,OIL EMULSION 3IN X 3IN KEN#6112
+"DATA",176.112,34913,1)
+489033^^Y
+"DATA",176.112,34914,0)
+4014789^DRESSING,OIL EMULSION 3IN X 8IN KEN#6113
+"DATA",176.112,34914,1)
+489034^^Y
+"DATA",176.112,34915,0)
+4014790^DRESSING,OIL EMULSION 3IN X 8IN KEN#6115
+"DATA",176.112,34915,1)
+489035^^Y
+"DATA",176.112,34916,0)
+4014085^DRESSING,OPSITE FLEXIGRID 2.375IN X 2.75IN SN#0462-80
+"DATA",176.112,34916,1)
+489036^^Y
+"DATA",176.112,34917,0)
+4014083^DRESSING,OPSITE FLEXIGRID 4.75IN X 10IN SN#4632-00
+"DATA",176.112,34917,1)
+489037^^Y
+"DATA",176.112,34918,0)
+4014081^DRESSING,OPSITE FLEXIGRID 4IN X 4.75IN SN#0462-90
+"DATA",176.112,34918,1)
+489038^^Y
+"DATA",176.112,34919,0)
+4014084^DRESSING,OPSITE FLEXIGRID 4IN X 4.75IN SN#0463-00
+"DATA",176.112,34919,1)
+489039^^Y
+"DATA",176.112,34920,0)
+4014082^DRESSING,OPSITE FLEXIGRID 6IN X 8IN SN#0463-10
+"DATA",176.112,34920,1)
+489040^^Y
+"DATA",176.112,34921,0)
+4015423^DRESSING,OPSITE IV3000 FRAME 2 3/8IN X 3 3/4IN SN#59410000
+"DATA",176.112,34921,1)
+489041^^Y
+"DATA",176.112,34922,0)
+4015424^DRESSING,OPSITE IV3000 FRAME 4IN X 4 3/4 SN#59410800
+"DATA",176.112,34922,1)
+489042^^Y
+"DATA",176.112,34923,0)
+4015426^DRESSING,OPSITE IV3000 HAND 2 3/8IN X 2 3/4IN SN#4007
+"DATA",176.112,34923,1)
+489043^^Y
+"DATA",176.112,34924,0)
+4015425^DRESSING,OPSITE IV3000 HAND 2IN X 1 1/2IN SN#4654
+"DATA",176.112,34924,1)
+489044^^Y
+"DATA",176.112,34925,0)
+4015427^DRESSING,OPSITE IV3000 HAND 4IN X 4 3/4IN SN#4008
+"DATA",176.112,34925,1)
+489045^^Y
+"DATA",176.112,34926,0)
+4015421^DRESSING,OPSITE TAPE HANDLE 4IN X 5IN SN#4925
+"DATA",176.112,34926,1)
+489046^^Y
+"DATA",176.112,34927,0)
+4015422^DRESSING,OPSITE TAPE HANDLE 4IN X 5IN SN#4973
+"DATA",176.112,34927,1)
+489047^^Y
+"DATA",176.112,34928,0)
+4015420^DRESSING,OPSITE TAPE HANDLE 4IN X 8IN SN#4649
+"DATA",176.112,34928,1)
+489048^^Y
+"DATA",176.112,34929,0)
+4013884^DRESSING,POLYMEM 1IN X 3IN,FERRIS #3031
+"DATA",176.112,34929,1)
+489049^^Y
+"DATA",176.112,34930,0)
+4013885^DRESSING,POLYMEM 1IN X 3IN,FERRIS #7031
+"DATA",176.112,34930,1)
+489050^^Y
+"DATA",176.112,34931,0)
+4013883^DRESSING,POLYMEM 2IN X 2IN,FERRIS #0203
+"DATA",176.112,34931,1)
+489051^^Y
+"DATA",176.112,34932,0)
+4013882^DRESSING,POLYMEM 2IN X 2IN,FERRIS #7203
+"DATA",176.112,34932,1)
+489052^^Y
+"DATA",176.112,34933,0)
+4013886^DRESSING,POLYMEM 2IN X 4IN,FERRIS #3042
+"DATA",176.112,34933,1)
+489053^^Y
+"DATA",176.112,34934,0)
+4013887^DRESSING,POLYMEM 2IN X 4IN,FERRIS #7042
+"DATA",176.112,34934,1)
+489054^^Y
+"DATA",176.112,34935,0)
+4013902^DRESSING,POLYMEM 2IN X 4IN,FERRIS #7842
+"DATA",176.112,34935,1)
+489055^^Y
+"DATA",176.112,34936,0)
+4013895^DRESSING,POLYMEM 2IN X 8IN,FERRIS #7048
+"DATA",176.112,34936,1)
+489056^^Y
+"DATA",176.112,34937,0)
+4013890^DRESSING,POLYMEM 3.5IN X 3.5IN,FERRIS #5335
+"DATA",176.112,34937,1)
+489057^^Y
+"DATA",176.112,34938,0)
+4013889^DRESSING,POLYMEM 3IN X 3IN,FERRIS #5033
+"DATA",176.112,34938,1)
+489058^^Y
+"DATA",176.112,34939,0)
+4013903^DRESSING,POLYMEM 3IN X 3IN,FERRIS #5833
+"DATA",176.112,34939,1)
+489059^^Y
+"DATA",176.112,34940,0)
+4013888^DRESSING,POLYMEM 4IN X 12.5IN,FERRIS #5124
+"DATA",176.112,34940,1)
+489060^^Y
+"DATA",176.112,34941,0)
+4013898^DRESSING,POLYMEM 4IN X 12.5IN,FERRIS #7412
+"DATA",176.112,34941,1)
+489061^^Y
+"DATA",176.112,34942,0)
+4013894^DRESSING,POLYMEM 4IN X 24IN,FERRIS #5244
+"DATA",176.112,34942,1)
+489062^^Y
+"DATA",176.112,34943,0)
+4011658^DRESSING,POLYMEM 4IN X 4IN,FERRIS #5044
+"DATA",176.112,34943,1)
+489063^^Y
+"DATA",176.112,34944,0)
+4013897^DRESSING,POLYMEM 4IN X 5IN,FERRIS #0405
+"DATA",176.112,34944,1)
+489064^^Y
+"DATA",176.112,34945,0)
+4013896^DRESSING,POLYMEM 4IN X 5IN,FERRIS #7405
+"DATA",176.112,34945,1)
+489065^^Y
+"DATA",176.112,34946,0)
+4013899^DRESSING,POLYMEM 5IN X 5IN,FERRIS #5055
+"DATA",176.112,34946,1)
+489066^^Y
+"DATA",176.112,34947,0)
+4013904^DRESSING,POLYMEM 5IN X 5IN,FERRIS #5855
+"DATA",176.112,34947,1)
+489067^^Y
+"DATA",176.112,34948,0)
+4013621^DRESSING,POLYMEM 6.5IN X 7.5IN,FERRIS #5077
+"DATA",176.112,34948,1)
+489068^^Y
+"DATA",176.112,34949,0)
+4013901^DRESSING,POLYMEM 6IN X 6IN,FERRIS #0606
+"DATA",176.112,34949,1)
+489069^^Y
+"DATA",176.112,34950,0)
+4013900^DRESSING,POLYMEM 6IN X 6IN,FERRIS #7606
+"DATA",176.112,34950,1)
+489070^^Y
+"DATA",176.112,34951,0)
+4016771^DRESSING,POLYSKIN II 1.5IN X 1.5IN KEN#6651
+"DATA",176.112,34951,1)
+489071^^Y
+"DATA",176.112,34952,0)
+4016772^DRESSING,POLYSKIN II 2IN X 2.75IN KEN#6640
+"DATA",176.112,34952,1)
+489072^^Y
+"DATA",176.112,34953,0)
+4016773^DRESSING,POLYSKIN II 4IN X 4.75IN KEN#6641
+"DATA",176.112,34953,1)
+489073^^Y
+"DATA",176.112,34954,0)
+4016774^DRESSING,POLYSKIN II 4IN X 8IN KEN#6647
+"DATA",176.112,34954,1)
+489074^^Y
+"DATA",176.112,34955,0)
+4016775^DRESSING,POLYSKIN II 6IN X 8IN KEN#6642
+"DATA",176.112,34955,1)
+489075^^Y
+"DATA",176.112,34956,0)
+4016776^DRESSING,POLYSKIN II 8IN X 10IN KEN#6648
+"DATA",176.112,34956,1)
+489076^^Y
+"DATA",176.112,34957,0)
+4014574^DRESSING,PROFORE 4-LAYER SN#66020016
+"DATA",176.112,34957,1)
+489077^^Y
+"DATA",176.112,34958,0)
+4016713^DRESSING,PROFORE-LF 4-LAYER SN#66020626
+"DATA",176.112,34958,1)
+489078^^Y
+"DATA",176.112,34959,0)
+4016714^DRESSING,PROFORE-LITE 3-LAYER SN#66000415
+"DATA",176.112,34959,1)
+489079^^Y
+"DATA",176.112,34960,0)
+4016715^DRESSING,PROFORE-WCL SN#66000701
+"DATA",176.112,34960,1)
+489080^^Y
+"DATA",176.112,34961,0)
+4011614^DRESSING,RESTORE 4IN X 4IN H#9921
+"DATA",176.112,34961,1)
+489081^^Y
+"DATA",176.112,34962,0)
+4011528^DRESSING,RESTORE 4IN X 4IN H#9927
+"DATA",176.112,34962,1)
+489082^^Y
+"DATA",176.112,34963,0)
+4011618^DRESSING,RESTORE 4IN X 4IN H#9930
+"DATA",176.112,34963,1)
+489083^^Y
+"DATA",176.112,34964,0)
+4011615^DRESSING,RESTORE 6IN X 8IN H#9923
+"DATA",176.112,34964,1)
+489084^^Y
+"DATA",176.112,34965,0)
+4011619^DRESSING,RESTORE 6IN X 8IN H#9932
+"DATA",176.112,34965,1)
+489085^^Y
+"DATA",176.112,34966,0)
+4011621^DRESSING,RESTORE 6IN X 8IN H#9935
+"DATA",176.112,34966,1)
+489086^^Y
+"DATA",176.112,34967,0)
+4011616^DRESSING,RESTORE 8IN X 8IN H#9925
+"DATA",176.112,34967,1)
+489087^^Y
+"DATA",176.112,34968,0)
+4011617^DRESSING,RESTORE 8IN X 8IN H#9928
+"DATA",176.112,34968,1)
+489088^^Y
+"DATA",176.112,34969,0)
+4011673^DRESSING,RESTORE PLUS 4IN X 4IN H#9953
+"DATA",176.112,34969,1)
+489089^^Y
+"DATA",176.112,34970,0)
+4011674^DRESSING,RESTORE PLUS 6IN X 6IN H#9963
+"DATA",176.112,34970,1)
+489090^^Y
+"DATA",176.112,34971,0)
+4011675^DRESSING,RESTORE PLUS 6IN X 8IN H#9954
+"DATA",176.112,34971,1)
+489091^^Y
+"DATA",176.112,34972,0)
+4011676^DRESSING,RESTORE PLUS 8IN X 8IN H#9955
+"DATA",176.112,34972,1)
+489092^^Y
+"DATA",176.112,34973,0)
+4014302^DRESSING,RESTORE PLUS TAPERED 4IN X 4IN H#9956
+"DATA",176.112,34973,1)
+489093^^Y
+"DATA",176.112,34974,0)
+4014303^DRESSING,RESTORE PLUS TAPERED 6IN X 8IN H#9957
+"DATA",176.112,34974,1)
+489094^^Y
+"DATA",176.112,34975,0)
+4014304^DRESSING,RESTORE PLUS TAPERED 8IN X 8IN H#9958
+"DATA",176.112,34975,1)
+489095^^Y
+"DATA",176.112,34976,0)
+4014305^DRESSING,RESTORE PLUS TAPERED TRIANGLE 17IN H#9959
+"DATA",176.112,34976,1)
+489096^^Y
+"DATA",176.112,34977,0)
+4014306^DRESSING,RESTORE PLUS TAPERED TRIANGLE 26.5IN H#9965
+"DATA",176.112,34977,1)
+489097^^Y
+"DATA",176.112,34978,0)
+4016326^DRESSING,RESTORE,CALCICARE 12IN ROPE H#9940
+"DATA",176.112,34978,1)
+489098^^Y
+"DATA",176.112,34979,0)
+4016329^DRESSING,RESTORE,CALCICARE 2IN X 2IN H#9938
+"DATA",176.112,34979,1)
+489099^^Y
+"DATA",176.112,34980,0)
+4016328^DRESSING,RESTORE,CALCICARE 4IN X 4IN H#9937
+"DATA",176.112,34980,1)
+489100^^Y
+"DATA",176.112,34981,0)
+4016327^DRESSING,RESTORE,CALCICARE 4IN X 8IN H#9939
+"DATA",176.112,34981,1)
+489101^^Y
+"DATA",176.112,34982,0)
+4011623^DRESSING,RESTORE,HYDROGEL H#9970
+"DATA",176.112,34982,1)
+489102^^Y
+"DATA",176.112,34983,0)
+4011624^DRESSING,RESTORE,HYDROGEL H#9971
+"DATA",176.112,34983,1)
+489103^^Y
+"DATA",176.112,34984,0)
+4011625^DRESSING,RESTORE,HYDROGEL H#9972
+"DATA",176.112,34984,1)
+489104^^Y
+"DATA",176.112,34985,0)
+4011626^DRESSING,RESTORE,HYDROGEL H#9973
+"DATA",176.112,34985,1)
+489105^^Y
+"DATA",176.112,34986,0)
+4016202^DRESSING,RESTORE,HYDROGEL H#9974
+"DATA",176.112,34986,1)
+489106^^Y
+"DATA",176.112,34987,0)
+4011527^DRESSING,RESTORE-CX 4IN X 4IN H#9931
+"DATA",176.112,34987,1)
+489107^^Y
+"DATA",176.112,34988,0)
+4011620^DRESSING,RESTORE-CX 6IN X 8IN H#9933
+"DATA",176.112,34988,1)
+489108^^Y
+"DATA",176.112,34989,0)
+4011622^DRESSING,RESTORE-CX 8IN X 8IN H#9936
+"DATA",176.112,34989,1)
+489109^^Y
+"DATA",176.112,34990,0)
+4017393^DRESSING,SILVASORB 2IN X 2IN MSC9322
+"DATA",176.112,34990,1)
+489110^^Y
+"DATA",176.112,34991,0)
+4017392^DRESSING,SILVASORB 4.25IN X 4.25IN MSC9344
+"DATA",176.112,34991,1)
+489111^^Y
+"DATA",176.112,34992,0)
+4013907^DRESSING,SOF-WICK 2IN X 2IN JJ#0023-92
+"DATA",176.112,34992,1)
+489112^^Y
+"DATA",176.112,34993,0)
+4014702^DRESSING,SOFSORB 6IN X 9IN DEROYAL#46-102
+"DATA",176.112,34993,1)
+489113^^Y
+"DATA",176.112,34994,0)
+4012500^DRESSING,SORBSAN 1/4IN X 1/4IN X 12IN
+"DATA",176.112,34994,1)
+489114^^Y
+"DATA",176.112,34995,0)
+4012501^DRESSING,SORBSAN 12IN
+"DATA",176.112,34995,1)
+489115^^Y
+"DATA",176.112,34996,0)
+4012497^DRESSING,SORBSAN 2IN X 2IN
+"DATA",176.112,34996,1)
+489116^^Y
+"DATA",176.112,34997,0)
+4012498^DRESSING,SORBSAN 3IN X 3IN
+"DATA",176.112,34997,1)
+489117^^Y
+"DATA",176.112,34998,0)
+4012496^DRESSING,SORBSAN 4IN X 4IN
+"DATA",176.112,34998,1)
+489118^^Y
+"DATA",176.112,34999,0)
+4012499^DRESSING,SORBSAN 4IN X 8IN
+"DATA",176.112,34999,1)
+489119^^Y
+"DATA",176.112,35000,0)
+4011603^DRESSING,STOMASEAL 4IN X 4IN W/SILK TAPE
+"DATA",176.112,35000,1)
+489120^^Y
+"DATA",176.112,35001,0)
+4014451^DRESSING,STRATASORB 4IN X 4IN MSC#3044
+"DATA",176.112,35001,1)
+489121^^Y
+"DATA",176.112,35002,0)
+4014452^DRESSING,STRATASORB 6IN X 6IN MSC#3066
+"DATA",176.112,35002,1)
+489122^^Y
+"DATA",176.112,35003,0)
+4014453^DRESSING,STRATASORB 6IN X 7.5IN MSC#3068
+"DATA",176.112,35003,1)
+489123^^Y
+"DATA",176.112,35004,0)
+4013634^DRESSING,TEGASORB 2.75IN X 3.5IN #900010
+"DATA",176.112,35004,1)
+489124^^Y
+"DATA",176.112,35005,0)
+4017337^DRESSING,TEGASORB 4.9IN X 5.5IN #900070
+"DATA",176.112,35005,1)
+489125^^Y
+"DATA",176.112,35006,0)
+4013635^DRESSING,TEGASORB 4IN X 4.75IN #900030
+"DATA",176.112,35006,1)
+489126^^Y
+"DATA",176.112,35007,0)
+4013633^DRESSING,TEGASORB 4IN X 4IN #900020
+"DATA",176.112,35007,1)
+489127^^Y
+"DATA",176.112,35008,0)
+4013632^DRESSING,TEGASORB 5.5IN X 6.75IN #900040
+"DATA",176.112,35008,1)
+489128^^Y
+"DATA",176.112,35009,0)
+4013631^DRESSING,TEGASORB 6IN X 6IN #900050
+"DATA",176.112,35009,1)
+489129^^Y
+"DATA",176.112,35010,0)
+4013642^DRESSING,TEGASORB THIN 2.75IN X 3.5IN #900210
+"DATA",176.112,35010,1)
+489130^^Y
+"DATA",176.112,35011,0)
+4013637^DRESSING,TEGASORB THIN 4IN X 4.75IN #900230
+"DATA",176.112,35011,1)
+489131^^Y
+"DATA",176.112,35012,0)
+4013641^DRESSING,TEGASORB THIN 4IN X 4IN #900220
+"DATA",176.112,35012,1)
+489132^^Y
+"DATA",176.112,35013,0)
+4013640^DRESSING,TEGASORB THIN 5.5IN X 6.75IN #900240
+"DATA",176.112,35013,1)
+489133^^Y
+"DATA",176.112,35014,0)
+4013636^DRESSING,TEGASORB THIN 6IN X 6IN #900250
+"DATA",176.112,35014,1)
+489134^^Y
+"DATA",176.112,35015,0)
+4011678^DRESSING,TEGASPORE 3IN X 4IN #5634
+"DATA",176.112,35015,1)
+489135^^Y
+"DATA",176.112,35016,0)
+4011679^DRESSING,TEGASPORE 3IN X 8IN #5638
+"DATA",176.112,35016,1)
+489136^^Y
+"DATA",176.112,35017,0)
+4011677^DRESSING,TEGASPORE 8IN X 10IN #5640
+"DATA",176.112,35017,1)
+489137^^Y
+"DATA",176.112,35018,0)
+4013608^DRESSING,TOPICLUDE
+"DATA",176.112,35018,1)
+489138^^Y
+"DATA",176.112,35019,0)
+4011681^DRESSING,TRANSORBENT 4IN X 4IN #00400
+"DATA",176.112,35019,1)
+489139^^Y
+"DATA",176.112,35020,0)
+4011680^DRESSING,TRANSORBENT 6IN X 6IN #00600
+"DATA",176.112,35020,1)
+489140^^Y
+"DATA",176.112,35021,0)
+4011682^DRESSING,TRANSORBENT 8IN X 8IN #00800
+"DATA",176.112,35021,1)
+489141^^Y
+"DATA",176.112,35022,0)
+4013333^DRESSING,VIASORB 2IN X 3IN S#4726-41
+"DATA",176.112,35022,1)
+489142^^Y
+"DATA",176.112,35023,0)
+4013335^DRESSING,VIASORB 3IN X 10IN S#4721-04
+"DATA",176.112,35023,1)
+489143^^Y
+"DATA",176.112,35024,0)
+4013334^DRESSING,VIASORB 4IN X 6IN S#4724-01
+"DATA",176.112,35024,1)
+489144^^Y
+"DATA",176.112,35025,0)
+4013332^DRESSING,VIASORB 6IN X 10IN S#4720-05
+"DATA",176.112,35025,1)
+489145^^Y
+"DATA",176.112,35026,0)
+4013331^DRESSING,VIASORB 7IN X 7IN S#4725-00
+"DATA",176.112,35026,1)
+489146^^Y
+"DATA",176.112,35027,0)
+4011606^DRESSING,VIGILON 3IN X 6IN
+"DATA",176.112,35027,1)
+489147^^Y
+"DATA",176.112,35028,0)
+4011683^DRESSING,VIGILON 4IN X 4IN,NON-STERILE
+"DATA",176.112,35028,1)
+489148^^Y
+"DATA",176.112,35029,0)
+4011684^DRESSING,VIGILON 4IN X 4IN,STERILE
+"DATA",176.112,35029,1)
+489149^^Y
+"DATA",176.112,35030,0)
+4015550^DRESSING,WET SALINE 4IN X 8IN KEN#3606
+"DATA",176.112,35030,1)
+489150^^Y
+"DATA",176.112,35031,0)
+4015551^DRESSING,WET SALINE 6IN X 6-3/4IN KEN#3338
+"DATA",176.112,35031,1)
+489151^^Y
+"DATA",176.112,35032,0)
+4011659^DRESSING,XEROFLO 2IN X 2IN SMC#436400
+"DATA",176.112,35032,1)
+489152^^Y
+"DATA",176.112,35033,0)
+4011661^DRESSING,XEROFLO 5IN X 9IN SMC#437100
+"DATA",176.112,35033,1)
+489153^^Y
+"DATA",176.112,35034,0)
+4014088^DRESSING,XEROFORM 1IN X 8IN SMC#431302
+"DATA",176.112,35034,1)
+489154^^Y
+"DATA",176.112,35035,0)
+4013515^DRESSING,XEROFORM 1IN X 8IN SMC#433301
+"DATA",176.112,35035,1)
+489155^^Y
+"DATA",176.112,35036,0)
+4011660^DRESSING,XEROFORM 2IN X 2IN SMC#433400
+"DATA",176.112,35036,1)
+489156^^Y
+"DATA",176.112,35037,0)
+4014086^DRESSING,XEROFORM 4IN X 3YD SMC#432000
+"DATA",176.112,35037,1)
+489157^^Y
+"DATA",176.112,35038,0)
+4014087^DRESSING,XEROFORM 4IN X 4IN SMC#433500
+"DATA",176.112,35038,1)
+489158^^Y
+"DATA",176.112,35039,0)
+4014089^DRESSING,XEROFORM 5IN X 9IN SMC#431605
+"DATA",176.112,35039,1)
+489159^^Y
+"DATA",176.112,35040,0)
+4011604^DRESSING,XEROFORM 5IN X 9IN SMC#433605
+"DATA",176.112,35040,1)
+489160^^Y
+"DATA",176.112,35041,0)
+4008825^ELASTO-GEL DRESSING 4IN X 4IN STERILE
+"DATA",176.112,35041,1)
+489161^^Y
+"DATA",176.112,35042,0)
+4008804^ELASTOPLAST 1IN
+"DATA",176.112,35042,1)
+489162^^Y
+"DATA",176.112,35043,0)
+4008830^ELASTOPLAST 2IN
+"DATA",176.112,35043,1)
+489163^^Y
+"DATA",176.112,35044,0)
+4008805^ELASTOPLAST 3IN
+"DATA",176.112,35044,1)
+489164^^Y
+"DATA",176.112,35045,0)
+4013491^ELASTOPLAST 4IN
+"DATA",176.112,35045,1)
+489165^^Y
+"DATA",176.112,35046,0)
+4013492^ELASTOPLAST 6IN
+"DATA",176.112,35046,1)
+489166^^Y
+"DATA",176.112,35047,0)
+4011422^FACEPLATE,IRRIGATION ADAPTER C#0227-42
+"DATA",176.112,35047,1)
+489167^^Y
+"DATA",176.112,35048,0)
+4011423^FACEPLATE,IRRIGATION ADAPTER C#0227-44
+"DATA",176.112,35048,1)
+489168^^Y
+"DATA",176.112,35049,0)
+4013869^FACEPLATE,IRRIGATION ADAPTER C#4019-18
+"DATA",176.112,35049,1)
+489169^^Y
+"DATA",176.112,35050,0)
+4013870^FACEPLATE,IRRIGATION ADAPTER C#4019-19
+"DATA",176.112,35050,1)
+489170^^Y
+"DATA",176.112,35051,0)
+4012920^FACEPLATE,IRRIGATION COLOPLAST #1120
+"DATA",176.112,35051,1)
+489171^^Y
+"DATA",176.112,35052,0)
+4012462^FACEPLATE,NEOPRENE,OVAL CONVEX 1IN,MARLEN #GN60
+"DATA",176.112,35052,1)
+489172^^Y
+"DATA",176.112,35053,0)
+4012634^FACEPLATE,RUBBER,REGULAR CONVEX 3 5/8IN,TORBOT #TT131
+"DATA",176.112,35053,1)
+489173^^Y
+"DATA",176.112,35054,0)
+4012244^FECAL COLLECTOR C#6500-78
+"DATA",176.112,35054,1)
+489174^^Y
+"DATA",176.112,35055,0)
+4012194^FECAL INCONTINENCE COLLECTOR H#9821
+"DATA",176.112,35055,1)
+489175^^Y
+"DATA",176.112,35056,0)
+4014387^FECAL INCONTINENCE COLLECTOR H#9822
+"DATA",176.112,35056,1)
+489176^^Y
+"DATA",176.112,35057,0)
+4014388^FECAL INCONTINENCE COLLECTOR H#9823
+"DATA",176.112,35057,1)
+489177^^Y
+"DATA",176.112,35058,0)
+4015147^FEEDING BAG 1200ML JWOD #2049
+"DATA",176.112,35058,1)
+489178^^Y
+"DATA",176.112,35059,0)
+4012227^FEEDING BAG FLEXIFLO
+"DATA",176.112,35059,1)
+489179^^Y
+"DATA",176.112,35060,0)
+4012228^FEEDING BAG W/PUMP SET FLEXIFLO
+"DATA",176.112,35060,1)
+489180^^Y
+"DATA",176.112,35061,0)
+4015142^FEEDING BAG W/PUMP SET FLEXIFLO #50606
+"DATA",176.112,35061,1)
+489181^^Y
+"DATA",176.112,35062,0)
+4014159^FEEDING BAG W/PUMP SET FLEXIFLO #50608
+"DATA",176.112,35062,1)
+489182^^Y
+"DATA",176.112,35063,0)
+4016021^FEEDING BAG W/PUMP SET KANGAROO #8884706220
+"DATA",176.112,35063,1)
+489183^^Y
+"DATA",176.112,35064,0)
+4014222^FEEDING BAG,1000ML KENDAL #8884773600
+"DATA",176.112,35064,1)
+489184^^Y
+"DATA",176.112,35065,0)
+4014102^FEEDING BAG,100ML KENDALL #8884773600
+"DATA",176.112,35065,1)
+489185^^Y
+"DATA",176.112,35066,0)
+4011915^FEEDING SET,ENTERAL PUMP F#141-7322
+"DATA",176.112,35066,1)
+489186^^Y
+"DATA",176.112,35067,0)
+4012372^FEEDING TUBE ATTACHMENT DEVICE H#9786
+"DATA",176.112,35067,1)
+489187^^Y
+"DATA",176.112,35068,0)
+4012366^FEEDING TUBE,8FR
+"DATA",176.112,35068,1)
+489188^^Y
+"DATA",176.112,35069,0)
+4011413^FLANGE CAP,SUR-FIT C#0242-60
+"DATA",176.112,35069,1)
+489189^^Y
+"DATA",176.112,35070,0)
+4011414^FLANGE CAP,SUR-FIT C#0242-61
+"DATA",176.112,35070,1)
+489190^^Y
+"DATA",176.112,35071,0)
+4011415^FLANGE CAP,SUR-FIT C#0242-62
+"DATA",176.112,35071,1)
+489191^^Y
+"DATA",176.112,35072,0)
+4013854^FLANGE CAP,SUR-FIT C#4019-08
+"DATA",176.112,35072,1)
+489192^^Y
+"DATA",176.112,35073,0)
+4013855^FLANGE CAP,SUR-FIT C#4019-09
+"DATA",176.112,35073,1)
+489193^^Y
+"DATA",176.112,35074,0)
+4013856^FLANGE CAP,SUR-FIT C#4019-10
+"DATA",176.112,35074,1)
+489194^^Y
+"DATA",176.112,35075,0)
+4011764^FREEDOM CATH EXTERNAL CATHETER LG #8400
+"DATA",176.112,35075,1)
+489195^^Y
+"DATA",176.112,35076,0)
+4013483^FREEDOM CATH EXTERNAL CATHETER LG #8430
+"DATA",176.112,35076,1)
+489196^^Y
+"DATA",176.112,35077,0)
+4011762^FREEDOM CATH EXTERNAL CATHETER MED #8200
+"DATA",176.112,35077,1)
+489197^^Y
+"DATA",176.112,35078,0)
+4013481^FREEDOM CATH EXTERNAL CATHETER MED #8230
+"DATA",176.112,35078,1)
+489198^^Y
+"DATA",176.112,35079,0)
+4013480^FREEDOM CATH EXTERNAL CATHETER SM #8030
+"DATA",176.112,35079,1)
+489199^^Y
+"DATA",176.112,35080,0)
+4013479^FREEDOM CATH EXTERNAL INTERMED #8205
+"DATA",176.112,35080,1)
+489200^^Y
+"DATA",176.112,35081,0)
+4013482^FREEDOM CATH EXTERNAL INTERMED #8235
+"DATA",176.112,35081,1)
+489201^^Y
+"DATA",176.112,35082,0)
+4011763^FREEDOM CATH EXTERNAL YOUTH/GERIAT #8000
+"DATA",176.112,35082,1)
+489202^^Y
+"DATA",176.112,35083,0)
+4014915^GAUZE ADAPTIC 3IN X 16IN
+"DATA",176.112,35083,1)
+489203^^Y
+"DATA",176.112,35084,0)
+4011705^GAUZE ADAPTIC 3IN X 3IN
+"DATA",176.112,35084,1)
+489204^^Y
+"DATA",176.112,35085,0)
+4011706^GAUZE ADAPTIC 3IN X 8 IN
+"DATA",176.112,35085,1)
+489205^^Y
+"DATA",176.112,35086,0)
+4014917^GAUZE ADAPTIC 5IN X 9IN
+"DATA",176.112,35086,1)
+489206^^Y
+"DATA",176.112,35087,0)
+4014916^GAUZE ADAPTIC ROLL 3IN X 60IN
+"DATA",176.112,35087,1)
+489207^^Y
+"DATA",176.112,35088,0)
+4014914^GAUZE ADAPTIC STRIP 0.5IN X 4YD
+"DATA",176.112,35088,1)
+489208^^Y
+"DATA",176.112,35089,0)
+4014798^GAUZE PAD 2IN X 2IN 12-PLY NONSTERILE
+"DATA",176.112,35089,1)
+489209^^Y
+"DATA",176.112,35090,0)
+4014799^GAUZE PAD 2IN X 2IN 8-PLY NONSTERILE
+"DATA",176.112,35090,1)
+489210^^Y
+"DATA",176.112,35091,0)
+4014794^GAUZE PAD 2IN X 2IN 8-PLY STERILE
+"DATA",176.112,35091,1)
+489211^^Y
+"DATA",176.112,35092,0)
+4011721^GAUZE PAD 2IN X 2IN NONSTERILE
+"DATA",176.112,35092,1)
+489212^^Y
+"DATA",176.112,35093,0)
+4011722^GAUZE PAD 2IN X 2IN STERILE
+"DATA",176.112,35093,1)
+489213^^Y
+"DATA",176.112,35094,0)
+4014796^GAUZE PAD 4IN X 4IN 12-PLY NONSTERILE
+"DATA",176.112,35094,1)
+489214^^Y
+"DATA",176.112,35095,0)
+4014792^GAUZE PAD 4IN X 4IN 12-PLY STERILE
+"DATA",176.112,35095,1)
+489215^^Y
+"DATA",176.112,35096,0)
+4014797^GAUZE PAD 4IN X 4IN 8-PLY NONSTERILE
+"DATA",176.112,35096,1)
+489216^^Y
+"DATA",176.112,35097,0)
+4014793^GAUZE PAD 4IN X 4IN 8-PLY STERILE
+"DATA",176.112,35097,1)
+489217^^Y
+"DATA",176.112,35098,0)
+4011691^GAUZE PAD 4IN X 4IN NONSTERILE
+"DATA",176.112,35098,1)
+489218^^Y
+"DATA",176.112,35099,0)
+4011723^GAUZE PAD 4IN X 4IN STERILE
+"DATA",176.112,35099,1)
+489219^^Y
+"DATA",176.112,35100,0)
+4014800^GAUZE PAD 4IN X 8IN 12-PLY NONSTERILE
+"DATA",176.112,35100,1)
+489220^^Y
+"DATA",176.112,35101,0)
+4014795^GAUZE PAD 4IN X 8IN 12-PLY STERILE
+"DATA",176.112,35101,1)
+489221^^Y
+"DATA",176.112,35102,0)
+4011690^GAUZE PAD 4IN X 8IN NONSTERILE
+"DATA",176.112,35102,1)
+489222^^Y
+"DATA",176.112,35103,0)
+4011724^GAUZE PAD 4IN X 8IN STERILE
+"DATA",176.112,35103,1)
+489223^^Y
+"DATA",176.112,35104,0)
+4011579^GAUZE,ELASTIC 2IN F#715-3102
+"DATA",176.112,35104,1)
+489224^^Y
+"DATA",176.112,35105,0)
+4011580^GAUZE,ELASTIC 3IN F#717-5094
+"DATA",176.112,35105,1)
+489225^^Y
+"DATA",176.112,35106,0)
+4011584^GAUZE,ELASTIC 4.5IN STERILE F#351-0608
+"DATA",176.112,35106,1)
+489226^^Y
+"DATA",176.112,35107,0)
+4011582^GAUZE,ELASTIC 4IN F#717-5095
+"DATA",176.112,35107,1)
+489227^^Y
+"DATA",176.112,35108,0)
+4011586^GAUZE,ELASTIC 6IN STERILE F#724-1017
+"DATA",176.112,35108,1)
+489228^^Y
+"DATA",176.112,35109,0)
+4011701^GAUZE,FINE MESH 2IN X 2IN STERILE
+"DATA",176.112,35109,1)
+489229^^Y
+"DATA",176.112,35110,0)
+4011702^GAUZE,FINE MESH 4IN X 4IN STERILE
+"DATA",176.112,35110,1)
+489230^^Y
+"DATA",176.112,35111,0)
+4011688^GAUZE,PACKING PLAIN 0.5IN F#153-4559
+"DATA",176.112,35111,1)
+489236^^Y
+"DATA",176.112,35112,0)
+4011687^GAUZE,PACKING PLAIN 0.5IN F#559-3172
+"DATA",176.112,35112,1)
+489237^^Y
+"DATA",176.112,35113,0)
+4011698^GAUZE,PACKING PLAIN 1/2IN X 5YD
+"DATA",176.112,35113,1)
+489238^^Y
+"DATA",176.112,35114,0)
+4011697^GAUZE,PACKING PLAIN 1/4IN X 5YD
+"DATA",176.112,35114,1)
+489239^^Y
+"DATA",176.112,35115,0)
+4011689^GAUZE,PACKING PLAIN 1IN F#559-3162
+"DATA",176.112,35115,1)
+489240^^Y
+"DATA",176.112,35116,0)
+4011695^GAUZE,PACKING PLAIN 1IN X 5YD
+"DATA",176.112,35116,1)
+489241^^Y
+"DATA",176.112,35117,0)
+4011696^GAUZE,PACKING PLAIN 2IN X 5YD
+"DATA",176.112,35117,1)
+489242^^Y
+"DATA",176.112,35118,0)
+4011151^ILEOSTOMY,COLOSTOMY SET H#3715
+"DATA",176.112,35118,1)
+489258^^Y
+"DATA",176.112,35119,0)
+4011152^ILEOSTOMY,COLOSTOMY SET H#3716
+"DATA",176.112,35119,1)
+489259^^Y
+"DATA",176.112,35120,0)
+4011153^ILEOSTOMY,COLOSTOMY SET H#3717
+"DATA",176.112,35120,1)
+489260^^Y
+"DATA",176.112,35121,0)
+4015225^ILEOSTOMY,COLOSTOMY SET H#3718
+"DATA",176.112,35121,1)
+489261^^Y
+"DATA",176.112,35122,0)
+4014695^INSULIN SYRINGE 0.3ML 28G 0.5IN
+"DATA",176.112,35122,1)
+489262^^Y
+"DATA",176.112,35123,0)
+4017206^INSULIN SYRINGE 0.3ML 30G 0.5ML
+"DATA",176.112,35123,1)
+489263^^Y
+"DATA",176.112,35124,0)
+4017178^INSULIN SYRINGE 0.3ML 31G 5/16IN
+"DATA",176.112,35124,1)
+489264^^Y
+"DATA",176.112,35125,0)
+4011997^INSULIN SYRINGE 0.5ML 28G 0.5IN
+"DATA",176.112,35125,1)
+489265^^Y
+"DATA",176.112,35126,0)
+4014599^INSULIN SYRINGE 0.5ML 29G 0.5IN
+"DATA",176.112,35126,1)
+489266^^Y
+"DATA",176.112,35127,0)
+4013519^INSULIN SYRINGE 0.5ML 30G 5/16IN
+"DATA",176.112,35127,1)
+489267^^Y
+"DATA",176.112,35128,0)
+4017177^INSULIN SYRINGE 0.5ML 31G 5/16IN
+"DATA",176.112,35128,1)
+489268^^Y
+"DATA",176.112,35129,0)
+4013521^INSULIN SYRINGE 1ML 25G 1.5IN
+"DATA",176.112,35129,1)
+489269^^Y
+"DATA",176.112,35130,0)
+4013524^INSULIN SYRINGE 1ML 25G 1IN
+"DATA",176.112,35130,1)
+489270^^Y
+"DATA",176.112,35131,0)
+4013517^INSULIN SYRINGE 1ML 25G 5/8IN
+"DATA",176.112,35131,1)
+489271^^Y
+"DATA",176.112,35132,0)
+4013516^INSULIN SYRINGE 1ML 26G 0.5IN
+"DATA",176.112,35132,1)
+489272^^Y
+"DATA",176.112,35133,0)
+4013523^INSULIN SYRINGE 1ML 27G 5/8IN
+"DATA",176.112,35133,1)
+489273^^Y
+"DATA",176.112,35134,0)
+4011999^INSULIN SYRINGE 1ML 28G 0.5IN
+"DATA",176.112,35134,1)
+489274^^Y
+"DATA",176.112,35135,0)
+4014826^INSULIN SYRINGE 1ML 28G 0.5IN DOUBLE SCALE
+"DATA",176.112,35135,1)
+489275^^Y
+"DATA",176.112,35136,0)
+4013520^INSULIN SYRINGE 1ML 29G 0.5IN
+"DATA",176.112,35136,1)
+489276^^Y
+"DATA",176.112,35137,0)
+4013518^INSULIN SYRINGE 1ML 30G 5/16IN
+"DATA",176.112,35137,1)
+489277^^Y
+"DATA",176.112,35138,0)
+4017179^INSULIN SYRINGE 1ML 31G 5/16IN
+"DATA",176.112,35138,1)
+489278^^Y
+"DATA",176.112,35139,0)
+4011998^INSULIN SYRINGE 1ML LOW DOSE 28G 0.5IN
+"DATA",176.112,35139,1)
+489279^^Y
+"DATA",176.112,35140,0)
+4013522^INSULIN SYRINGE 2ML 27.5G 5/8IN
+"DATA",176.112,35140,1)
+489280^^Y
+"DATA",176.112,35141,0)
+4016123^IRRIGATION CAP, BAXTER #2C4010
+"DATA",176.112,35141,1)
+489281^^Y
+"DATA",176.112,35142,0)
+4016124^IRRIGATION CAP, BAXTER #2C4020
+"DATA",176.112,35142,1)
+489282^^Y
+"DATA",176.112,35143,0)
+4014228^IRRIGATION KIT BARD #750307
+"DATA",176.112,35143,1)
+489283^^Y
+"DATA",176.112,35144,0)
+4012035^IRRIGATION KIT W/BULB SYRINGE F#852-4751
+"DATA",176.112,35144,1)
+489284^^Y
+"DATA",176.112,35145,0)
+4014428^IRRIGATION KIT W/BULB SYRINGE LSL#2101
+"DATA",176.112,35145,1)
+489285^^Y
+"DATA",176.112,35146,0)
+4014427^IRRIGATION KIT W/BULB SYRINGE LSL#2105
+"DATA",176.112,35146,1)
+489286^^Y
+"DATA",176.112,35147,0)
+4016797^IRRIGATION KIT W/PISTON SYRINGE #DYND20302
+"DATA",176.112,35147,1)
+489287^^Y
+"DATA",176.112,35148,0)
+4017039^IRRIGATION KIT W/PISTON SYRINGE K#68000
+"DATA",176.112,35148,1)
+489288^^Y
+"DATA",176.112,35149,0)
+4014772^IRRIGATION KIT W/PISTON SYRINGE LSL#2301F
+"DATA",176.112,35149,1)
+489289^^Y
+"DATA",176.112,35150,0)
+4014429^IRRIGATION KIT W/PISTON SYRINGE LSL#2305F
+"DATA",176.112,35150,1)
+489290^^Y
+"DATA",176.112,35151,0)
+4014430^IRRIGATION KIT W/PISTON SYRINGE LSL#2310F
+"DATA",176.112,35151,1)
+489291^^Y
+"DATA",176.112,35152,0)
+4012036^IRRIGATION KIT W/PLUNGER SYR F#865-1950
+"DATA",176.112,35152,1)
+489292^^Y
+"DATA",176.112,35153,0)
+4011223^IRRIGATION SET H#7722
+"DATA",176.112,35153,1)
+489293^^Y
+"DATA",176.112,35154,0)
+4011224^IRRIGATION SET H#7726
+"DATA",176.112,35154,1)
+489294^^Y
+"DATA",176.112,35155,0)
+4016193^IRRIGATION SET,COLOPLAST #1500H
+"DATA",176.112,35155,1)
+489295^^Y
+"DATA",176.112,35156,0)
+4011221^IRRIGATION SET,VISI-FLOW C#0227-12
+"DATA",176.112,35156,1)
+489296^^Y
+"DATA",176.112,35157,0)
+4011222^IRRIGATION SET,VISI-FLOW C#0227-15
+"DATA",176.112,35157,1)
+489297^^Y
+"DATA",176.112,35158,0)
+4013862^IRRIGATION SET,VISI-FLOW C#4019-16
+"DATA",176.112,35158,1)
+489298^^Y
+"DATA",176.112,35159,0)
+4013863^IRRIGATION SET,VISI-FLOW C#4019-17
+"DATA",176.112,35159,1)
+489299^^Y
+"DATA",176.112,35160,0)
+4011217^IRRIGATION SLEEVE,COLOPLAST #1003
+"DATA",176.112,35160,1)
+489300^^Y
+"DATA",176.112,35161,0)
+4011218^IRRIGATION SLEEVE,COLOPLAST #1540
+"DATA",176.112,35161,1)
+489301^^Y
+"DATA",176.112,35162,0)
+4011219^IRRIGATION SLEEVE,COLOPLAST #1550
+"DATA",176.112,35162,1)
+489302^^Y
+"DATA",176.112,35163,0)
+4011220^IRRIGATION SLEEVE,COLOPLAST #1560
+"DATA",176.112,35163,1)
+489303^^Y
+"DATA",176.112,35164,0)
+4011212^IRRIGATION SLEEVE,SUR-FIT C#0242-50
+"DATA",176.112,35164,1)
+489304^^Y
+"DATA",176.112,35165,0)
+4011213^IRRIGATION SLEEVE,SUR-FIT C#0242-52
+"DATA",176.112,35165,1)
+489305^^Y
+"DATA",176.112,35166,0)
+4011214^IRRIGATION SLEEVE,SUR-FIT C#0242-53
+"DATA",176.112,35166,1)
+489306^^Y
+"DATA",176.112,35167,0)
+4011215^IRRIGATION SLEEVE,SUR-FIT C#0242-54
+"DATA",176.112,35167,1)
+489307^^Y
+"DATA",176.112,35168,0)
+4011216^IRRIGATION SLEEVE,SUR-FIT C#0242-55
+"DATA",176.112,35168,1)
+489308^^Y
+"DATA",176.112,35169,0)
+4013865^IRRIGATION SLEEVE,SUR-FIT C#4019-11
+"DATA",176.112,35169,1)
+489309^^Y
+"DATA",176.112,35170,0)
+4013866^IRRIGATION SLEEVE,SUR-FIT C#4019-12
+"DATA",176.112,35170,1)
+489310^^Y
+"DATA",176.112,35171,0)
+4013867^IRRIGATION SLEEVE,SUR-FIT C#4019-13
+"DATA",176.112,35171,1)
+489311^^Y
+"DATA",176.112,35172,0)
+4013868^IRRIGATION SLEEVE,SUR-FIT C#4019-14
+"DATA",176.112,35172,1)
+489312^^Y
+"DATA",176.112,35173,0)
+4016541^IRRIGATION SYRINGE LUER TIP 70ML
+"DATA",176.112,35173,1)
+489313^^Y
+"DATA",176.112,35174,0)
+4012412^IRRIGATION TRAY MEDLINE #20101
+"DATA",176.112,35174,1)
+489314^^Y
+"DATA",176.112,35175,0)
+4012381^IRRIGATOR DRAIN H#3822
+"DATA",176.112,35175,1)
+489315^^Y
+"DATA",176.112,35176,0)
+4012382^IRRIGATOR DRAIN H#3823
+"DATA",176.112,35176,1)
+489316^^Y
+"DATA",176.112,35177,0)
+4011445^IRRIGATOR DRAIN H#3824
+"DATA",176.112,35177,1)
+489317^^Y
+"DATA",176.112,35178,0)
+4011450^IRRIGATOR DRAIN H#3826
+"DATA",176.112,35178,1)
+489318^^Y
+"DATA",176.112,35179,0)
+4011451^IRRIGATOR DRAIN H#3827
+"DATA",176.112,35179,1)
+489319^^Y
+"DATA",176.112,35180,0)
+4011442^IRRIGATOR DRAIN H#7194
+"DATA",176.112,35180,1)
+489320^^Y
+"DATA",176.112,35181,0)
+4011443^IRRIGATOR DRAIN H#7196
+"DATA",176.112,35181,1)
+489321^^Y
+"DATA",176.112,35182,0)
+4011441^IRRIGATOR DRAIN H#7724
+"DATA",176.112,35182,1)
+489322^^Y
+"DATA",176.112,35183,0)
+4011440^IRRIGATOR DRAIN H#7728
+"DATA",176.112,35183,1)
+489323^^Y
+"DATA",176.112,35184,0)
+4011446^IRRIGATOR DRAIN,GUARDIAN H#4802
+"DATA",176.112,35184,1)
+489324^^Y
+"DATA",176.112,35185,0)
+4011444^IRRIGATOR DRAIN,GUARDIAN H#4803
+"DATA",176.112,35185,1)
+489325^^Y
+"DATA",176.112,35186,0)
+4011447^IRRIGATOR DRAIN,GUARDIAN H#4804
+"DATA",176.112,35186,1)
+489326^^Y
+"DATA",176.112,35187,0)
+4011448^IRRIGATOR DRAIN,GUARDIAN H#4805
+"DATA",176.112,35187,1)
+489327^^Y
+"DATA",176.112,35188,0)
+4011449^IRRIGATOR DRAIN,GUARDIAN H#4806
+"DATA",176.112,35188,1)
+489328^^Y
+"DATA",176.112,35189,0)
+4015900^IRRIGATOR DRAIN,NEW IMAGE H#18152
+"DATA",176.112,35189,1)
+489329^^Y
+"DATA",176.112,35190,0)
+4015901^IRRIGATOR DRAIN,NEW IMAGE H#18153
+"DATA",176.112,35190,1)
+489330^^Y
+"DATA",176.112,35191,0)
+4015902^IRRIGATOR DRAIN,NEW IMAGE H#18154
+"DATA",176.112,35191,1)
+489331^^Y
+"DATA",176.112,35192,0)
+4011417^IRRIGATOR KIT H#7721
+"DATA",176.112,35192,1)
+489332^^Y
+"DATA",176.112,35193,0)
+4012413^IRRIGATOR,GREER MENTOR #6004
+"DATA",176.112,35193,1)
+489333^^Y
+"DATA",176.112,35194,0)
+4011416^IRRIGATOR,VISI-FLOW C#0227-35
+"DATA",176.112,35194,1)
+489334^^Y
+"DATA",176.112,35195,0)
+4013864^IRRIGATOR,VISI-FLOW C#4019-89
+"DATA",176.112,35195,1)
+489335^^Y
+"DATA",176.112,35196,0)
+4012343^IV CATHETER ADAPTER B-D#3250
+"DATA",176.112,35196,1)
+489336^^Y
+"DATA",176.112,35197,0)
+4012341^IV CATHETER PLUG LUER LOCK #N2030
+"DATA",176.112,35197,1)
+489337^^Y
+"DATA",176.112,35198,0)
+4010412^IV INFUSION SET (WINTHROP)
+"DATA",176.112,35198,1)
+489338^^Y
+"DATA",176.112,35199,0)
+4012347^IV PREP KIT (CEPTI-SEAL) #26-48-53
+"DATA",176.112,35199,1)
+489339^^Y
+"DATA",176.112,35200,0)
+4013433^IV SET PRIMARY,NON-VENTED MCGAW V7410
+"DATA",176.112,35200,1)
+489340^^Y
+"DATA",176.112,35201,0)
+4013432^IV SET PRIMARY,VENTED MCGAW V7425
+"DATA",176.112,35201,1)
+489341^^Y
+"DATA",176.112,35202,0)
+4010385^IV SET SECONDARY 15GTTS/ML 19G
+"DATA",176.112,35202,1)
+489342^^Y
+"DATA",176.112,35203,0)
+4010382^IV SET SECONDARY/TRANSFER 15GTTS/ML 18G
+"DATA",176.112,35203,1)
+489343^^Y
+"DATA",176.112,35204,0)
+4010387^IV SET TRAVENOL #2C5401
+"DATA",176.112,35204,1)
+489344^^Y
+"DATA",176.112,35205,0)
+4010386^IV SET VOLUME,UNVENTED Y SITES 20GTTS/ML
+"DATA",176.112,35205,1)
+489345^^Y
+"DATA",176.112,35206,0)
+4010384^IV SET W/2 INJECTION SITES 15GTTS/ML
+"DATA",176.112,35206,1)
+489346^^Y
+"DATA",176.112,35207,0)
+4012388^KALTOSTAT CA/NA ALGINATE WOUND PACKING
+"DATA",176.112,35207,1)
+489347^^Y
+"DATA",176.112,35208,0)
+4012392^KALTOSTAT DRESSING 10CM X 20CM
+"DATA",176.112,35208,1)
+489348^^Y
+"DATA",176.112,35209,0)
+4012393^KALTOSTAT DRESSING 15CM X 25CM
+"DATA",176.112,35209,1)
+489349^^Y
+"DATA",176.112,35210,0)
+4012389^KALTOSTAT DRESSING 30CM X 60CM
+"DATA",176.112,35210,1)
+489350^^Y
+"DATA",176.112,35211,0)
+4012390^KALTOSTAT DRESSING 5CM X 5CM
+"DATA",176.112,35211,1)
+489351^^Y
+"DATA",176.112,35212,0)
+4012391^KALTOSTAT DRESSING 7.5CM X 12CM
+"DATA",176.112,35212,1)
+489352^^Y
+"DATA",176.112,35213,0)
+4012387^KALTOSTAT FORTEX CA/NA ALGINATE DRESSING
+"DATA",176.112,35213,1)
+489353^^Y
+"DATA",176.112,35214,0)
+4009777^KARAYA PASTE H#7910,135GM
+"DATA",176.112,35214,1)
+489354^^Y
+"DATA",176.112,35215,0)
+4009778^KARAYA PASTE H#7919,60GM
+"DATA",176.112,35215,1)
+489355^^Y
+"DATA",176.112,35216,0)
+4009776^KARAYA POWDER H#7905,75GM
+"DATA",176.112,35216,1)
+489356^^Y
+"DATA",176.112,35217,0)
+4009783^KARAYA RING 1 1/2IN H#7394
+"DATA",176.112,35217,1)
+489357^^Y
+"DATA",176.112,35218,0)
+4009781^KARAYA RING 1 1/8IN H#7393
+"DATA",176.112,35218,1)
+489358^^Y
+"DATA",176.112,35219,0)
+4009782^KARAYA RING 1 3/8IN H#7399
+"DATA",176.112,35219,1)
+489359^^Y
+"DATA",176.112,35220,0)
+4012460^KARAYA RING 1/2IN H#7397
+"DATA",176.112,35220,1)
+489360^^Y
+"DATA",176.112,35221,0)
+4009785^KARAYA RING 2 1/2IN H#7396
+"DATA",176.112,35221,1)
+489361^^Y
+"DATA",176.112,35222,0)
+4009784^KARAYA RING 2IN H#7395
+"DATA",176.112,35222,1)
+489362^^Y
+"DATA",176.112,35223,0)
+4012464^KARAYA RING 5/8IN H#7392
+"DATA",176.112,35223,1)
+489363^^Y
+"DATA",176.112,35224,0)
+4009780^KARAYA RING 7/8IN H#7398
+"DATA",176.112,35224,1)
+489364^^Y
+"DATA",176.112,35225,0)
+4012463^KARAYA RING,2IN,7/8IN HOLE,BLANCHARD #5020
+"DATA",176.112,35225,1)
+489365^^Y
+"DATA",176.112,35226,0)
+4009779^KARAYA WASHER,HEALSKIN 5/8IN TORBOT#0312
+"DATA",176.112,35226,1)
+489366^^Y
+"DATA",176.112,35227,0)
+4011578^KERLIX 4.5IN NONSTERILE
+"DATA",176.112,35227,1)
+489367^^Y
+"DATA",176.112,35228,0)
+4011585^KERLIX 4.5IN STERILE
+"DATA",176.112,35228,1)
+489368^^Y
+"DATA",176.112,35229,0)
+4014801^KERLIX 4IN X 4IN STERILE
+"DATA",176.112,35229,1)
+489369^^Y
+"DATA",176.112,35230,0)
+4013685^KERLIX SUPER SPONGE LARGE NONSTERILE #1272
+"DATA",176.112,35230,1)
+489370^^Y
+"DATA",176.112,35231,0)
+4013686^KERLIX SUPER SPONGE LARGE STERILE #4308
+"DATA",176.112,35231,1)
+489371^^Y
+"DATA",176.112,35232,0)
+4013688^KERLIX SUPER SPONGE MEDIUM NONSTERILE #1167
+"DATA",176.112,35232,1)
+489372^^Y
+"DATA",176.112,35233,0)
+4013690^KERLIX SUPER SPONGE MEDIUM STERILE #2585
+"DATA",176.112,35233,1)
+489373^^Y
+"DATA",176.112,35234,0)
+4013691^KERLIX SUPER SPONGE MEDIUM STERILE #3085
+"DATA",176.112,35234,1)
+489374^^Y
+"DATA",176.112,35235,0)
+4013687^KERLIX SUPER SPONGE MEDIUM STERILE #7310
+"DATA",176.112,35235,1)
+489375^^Y
+"DATA",176.112,35236,0)
+4013684^KERLIX SUPER SPONGE X-LARGE NONSTERILE #6035
+"DATA",176.112,35236,1)
+489376^^Y
+"DATA",176.112,35237,0)
+4017188^LANCET,26G
+"DATA",176.112,35237,1)
+489378^^Y
+"DATA",176.112,35238,0)
+4017189^LANCET,28G
+"DATA",176.112,35238,1)
+489379^^Y
+"DATA",176.112,35239,0)
+4012630^LANCET,AMES GLUCO SYSTEM
+"DATA",176.112,35239,1)
+489380^^Y
+"DATA",176.112,35240,0)
+4015066^LANCET,AT-LAST
+"DATA",176.112,35240,1)
+489381^^Y
+"DATA",176.112,35241,0)
+4016324^LANCET,FINGER STICK SAFETY 2.4MM
+"DATA",176.112,35241,1)
+489382^^Y
+"DATA",176.112,35242,0)
+4016323^LANCET,FINGER STICK SAFETY 2MM
+"DATA",176.112,35242,1)
+489383^^Y
+"DATA",176.112,35243,0)
+4016325^LANCET,FINGER STICK SAFETY 3MM
+"DATA",176.112,35243,1)
+489384^^Y
+"DATA",176.112,35244,0)
+4013512^LANCET,GLUCOLET
+"DATA",176.112,35244,1)
+489387^^Y
+"DATA",176.112,35245,0)
+4013509^LANCET,GLUCOLET 2 DEVICE
+"DATA",176.112,35245,1)
+489388^^Y
+"DATA",176.112,35246,0)
+4013508^LANCET,GLUCOLET DEVICE
+"DATA",176.112,35246,1)
+489389^^Y
+"DATA",176.112,35247,0)
+4017390^LANCET,LITE TOUCH
+"DATA",176.112,35247,1)
+489390^^Y
+"DATA",176.112,35248,0)
+4013434^LANCET,MEDI-LANCE
+"DATA",176.112,35248,1)
+489391^^Y
+"DATA",176.112,35249,0)
+4016544^LANCET,MEDISENSE THIN
+"DATA",176.112,35249,1)
+489392^^Y
+"DATA",176.112,35250,0)
+4013616^LANCET,MICROLET VACULANCE DEVICE
+"DATA",176.112,35250,1)
+489394^^Y
+"DATA",176.112,35251,0)
+4011931^LANCET,MICROTAINER B-D #36-6357
+"DATA",176.112,35251,1)
+489395^^Y
+"DATA",176.112,35252,0)
+4011930^LANCET,MICROTAINER B-D #36-6359
+"DATA",176.112,35252,1)
+489396^^Y
+"DATA",176.112,35253,0)
+4013814^LANCET,MONOJECTOR DEVICE
+"DATA",176.112,35253,1)
+489397^^Y
+"DATA",176.112,35254,0)
+4015466^LANCET,PENLET PLUS DEVICE
+"DATA",176.112,35254,1)
+489402^^Y
+"DATA",176.112,35255,0)
+4013511^LANCET,SOFTCLIX DEVICE
+"DATA",176.112,35255,1)
+489407^^Y
+"DATA",176.112,35256,0)
+4014118^LANCET,TECHLITE 21G
+"DATA",176.112,35256,1)
+489408^^Y
+"DATA",176.112,35257,0)
+4014117^LANCET,TECHLITE 25G
+"DATA",176.112,35257,1)
+489409^^Y
+"DATA",176.112,35258,0)
+4013667^LANCET,ULTRA-FINE II
+"DATA",176.112,35258,1)
+489411^^Y
+"DATA",176.112,35259,0)
+4013656^LANCET,UNISTIK-2
+"DATA",176.112,35259,1)
+489412^^Y
+"DATA",176.112,35260,0)
+4013657^LANCET,UNISTIK-2 DEEP PENETRATION
+"DATA",176.112,35260,1)
+489413^^Y
+"DATA",176.112,35261,0)
+4012224^LEG BAG 4 PACK H#9825
+"DATA",176.112,35261,1)
+489414^^Y
+"DATA",176.112,35262,0)
+4013409^LEG BAG 4 PACK H#9834
+"DATA",176.112,35262,1)
+489415^^Y
+"DATA",176.112,35263,0)
+4013410^LEG BAG 4 PACK H#9835
+"DATA",176.112,35263,1)
+489416^^Y
+"DATA",176.112,35264,0)
+4015461^LEG BAG COMBINATION PACK H#9349 LATEX FREE
+"DATA",176.112,35264,1)
+489417^^Y
+"DATA",176.112,35265,0)
+4013261^LEG BAG COMBINATION PACK H#9354 LATEX FREE
+"DATA",176.112,35265,1)
+489418^^Y
+"DATA",176.112,35266,0)
+4013262^LEG BAG COMBINATION PACK H#9355 LATEX FREE
+"DATA",176.112,35266,1)
+489419^^Y
+"DATA",176.112,35267,0)
+4012230^LEG BAG COMBINATION PACK H#9622
+"DATA",176.112,35267,1)
+489420^^Y
+"DATA",176.112,35268,0)
+4012231^LEG BAG COMBINATION PACK H#9623
+"DATA",176.112,35268,1)
+489421^^Y
+"DATA",176.112,35269,0)
+4012223^LEG BAG COMBINATION PACK H#9824
+"DATA",176.112,35269,1)
+489422^^Y
+"DATA",176.112,35270,0)
+4013304^LEG BAG COMBINATION PACK H#9825
+"DATA",176.112,35270,1)
+489423^^Y
+"DATA",176.112,35271,0)
+4016445^LEG BAG FREEDOM MENTOR #7087
+"DATA",176.112,35271,1)
+489424^^Y
+"DATA",176.112,35272,0)
+4012233^LEG BAG H#9834
+"DATA",176.112,35272,1)
+489425^^Y
+"DATA",176.112,35273,0)
+4012234^LEG BAG H#9835
+"DATA",176.112,35273,1)
+489426^^Y
+"DATA",176.112,35274,0)
+4016565^LEG BAG SECURITY+ CONVEEN C#5161
+"DATA",176.112,35274,1)
+489427^^Y
+"DATA",176.112,35275,0)
+4016566^LEG BAG SECURITY+ CONVEEN C#5167
+"DATA",176.112,35275,1)
+489428^^Y
+"DATA",176.112,35276,0)
+4016639^LEG BAG STRAP CATH-MATE II BC#0814-8214
+"DATA",176.112,35276,1)
+489429^^Y
+"DATA",176.112,35277,0)
+4016224^LEG BAG STRAP COMB ALPINE #22312
+"DATA",176.112,35277,1)
+489430^^Y
+"DATA",176.112,35278,0)
+4014224^LEG BAG STRAP FABRIC BARD #150507
+"DATA",176.112,35278,1)
+489431^^Y
+"DATA",176.112,35279,0)
+4012188^LEG BAG STRAP H#9802
+"DATA",176.112,35279,1)
+489432^^Y
+"DATA",176.112,35280,0)
+4012190^LEG BAG STRAP H#9804
+"DATA",176.112,35280,1)
+489433^^Y
+"DATA",176.112,35281,0)
+4012189^LEG BAG STRAP H#9812
+"DATA",176.112,35281,1)
+489434^^Y
+"DATA",176.112,35282,0)
+4012207^LEG BAG STRAP KIT,LARGE,UROCARE #6350
+"DATA",176.112,35282,1)
+489435^^Y
+"DATA",176.112,35283,0)
+4014912^LEG BAG STRAP KIT,SMALL,UROCARE #6349
+"DATA",176.112,35283,1)
+489436^^Y
+"DATA",176.112,35284,0)
+4014911^LEG BAG STRAP KIT,X-LARGE,UROCARE #6351
+"DATA",176.112,35284,1)
+489437^^Y
+"DATA",176.112,35285,0)
+4016223^LEG BAG STRAP LARGE ALPINE #22303
+"DATA",176.112,35285,1)
+489438^^Y
+"DATA",176.112,35286,0)
+4013260^LEG BAG STRAP LARGE H#9344 LATEX FREE
+"DATA",176.112,35286,1)
+489439^^Y
+"DATA",176.112,35287,0)
+4016222^LEG BAG STRAP MED ALPINE #22322
+"DATA",176.112,35287,1)
+489440^^Y
+"DATA",176.112,35288,0)
+4013259^LEG BAG STRAP MEDIUM H#9343 LATEX FREE
+"DATA",176.112,35288,1)
+489441^^Y
+"DATA",176.112,35289,0)
+4016221^LEG BAG STRAP SMALL ALPINE #22321
+"DATA",176.112,35289,1)
+489442^^Y
+"DATA",176.112,35290,0)
+4013258^LEG BAG STRAP SMALL H#9342 LATEX FREE
+"DATA",176.112,35290,1)
+489443^^Y
+"DATA",176.112,35291,0)
+4012209^LEG BAG STRAP,LOWER,LARGE,UROCARE #6345
+"DATA",176.112,35291,1)
+489444^^Y
+"DATA",176.112,35292,0)
+4016548^LEG BAG STRAP,LOWER,SMALL,UROCARE #6348
+"DATA",176.112,35292,1)
+489445^^Y
+"DATA",176.112,35293,0)
+4014704^LEG BAG STRAP,MEDIUM,MENTOR #22322
+"DATA",176.112,35293,1)
+489446^^Y
+"DATA",176.112,35294,0)
+4012208^LEG BAG STRAP,UPPER,LARGE,UROCARE #6344
+"DATA",176.112,35294,1)
+489447^^Y
+"DATA",176.112,35295,0)
+4016549^LEG BAG STRAP,UPPER,SMALL,UROCARE #6347
+"DATA",176.112,35295,1)
+489448^^Y
+"DATA",176.112,35296,0)
+4016550^LEG BAG STRAP,UPPER,X-LARGE,UROCARE #6346
+"DATA",176.112,35296,1)
+489449^^Y
+"DATA",176.112,35297,0)
+4012232^LEG BAG,VENTED COMBINATION PACK H#9645
+"DATA",176.112,35297,1)
+489450^^Y
+"DATA",176.112,35298,0)
+4012191^LEG BAG,VENTED COMBINATION PACK H#9655
+"DATA",176.112,35298,1)
+489451^^Y
+"DATA",176.112,35299,0)
+4012236^LEG BAG,VENTED SYSTEM H#9845
+"DATA",176.112,35299,1)
+489452^^Y
+"DATA",176.112,35300,0)
+4012193^LEG BAG,VENTED SYSTEM H#9855
+"DATA",176.112,35300,1)
+489453^^Y
+"DATA",176.112,35301,0)
+4013542^NEEDLE 16G 1.5IN
+"DATA",176.112,35301,1)
+489454^^Y
+"DATA",176.112,35302,0)
+4011936^NEEDLE 18G 1.5IN
+"DATA",176.112,35302,1)
+489455^^Y
+"DATA",176.112,35303,0)
+4013550^NEEDLE 18G 1IN
+"DATA",176.112,35303,1)
+489456^^Y
+"DATA",176.112,35304,0)
+4011937^NEEDLE 19G 1.5IN
+"DATA",176.112,35304,1)
+489457^^Y
+"DATA",176.112,35305,0)
+4013551^NEEDLE 19G 1IN
+"DATA",176.112,35305,1)
+489458^^Y
+"DATA",176.112,35306,0)
+4011939^NEEDLE 20G 1.5IN
+"DATA",176.112,35306,1)
+489459^^Y
+"DATA",176.112,35307,0)
+4011938^NEEDLE 20G 1IN
+"DATA",176.112,35307,1)
+489460^^Y
+"DATA",176.112,35308,0)
+4013545^NEEDLE 21G 1.5IN
+"DATA",176.112,35308,1)
+489461^^Y
+"DATA",176.112,35309,0)
+4013546^NEEDLE 21G 1IN
+"DATA",176.112,35309,1)
+489462^^Y
+"DATA",176.112,35310,0)
+4013547^NEEDLE 22G 0.75IN
+"DATA",176.112,35310,1)
+489463^^Y
+"DATA",176.112,35311,0)
+4013549^NEEDLE 22G 1.25IN
+"DATA",176.112,35311,1)
+489464^^Y
+"DATA",176.112,35312,0)
+4011941^NEEDLE 22G 1.5IN
+"DATA",176.112,35312,1)
+489465^^Y
+"DATA",176.112,35313,0)
+4011940^NEEDLE 22G 1IN
+"DATA",176.112,35313,1)
+489466^^Y
+"DATA",176.112,35314,0)
+4011942^NEEDLE 23G 0.75IN
+"DATA",176.112,35314,1)
+489467^^Y
+"DATA",176.112,35315,0)
+4013541^NEEDLE 23G 1.25IN
+"DATA",176.112,35315,1)
+489468^^Y
+"DATA",176.112,35316,0)
+4013535^NEEDLE 23G 1.5IN
+"DATA",176.112,35316,1)
+489469^^Y
+"DATA",176.112,35317,0)
+4013544^NEEDLE 23G 1IN
+"DATA",176.112,35317,1)
+489470^^Y
+"DATA",176.112,35318,0)
+4013548^NEEDLE 24G 1IN
+"DATA",176.112,35318,1)
+489471^^Y
+"DATA",176.112,35319,0)
+4013539^NEEDLE 25G 0.5IN
+"DATA",176.112,35319,1)
+489472^^Y
+"DATA",176.112,35320,0)
+4011949^NEEDLE 25G 1.5IN
+"DATA",176.112,35320,1)
+489473^^Y
+"DATA",176.112,35321,0)
+4013536^NEEDLE 25G 1IN
+"DATA",176.112,35321,1)
+489474^^Y
+"DATA",176.112,35322,0)
+4011943^NEEDLE 25G 5/8IN
+"DATA",176.112,35322,1)
+489475^^Y
+"DATA",176.112,35323,0)
+4011944^NEEDLE 26G 0.5IN
+"DATA",176.112,35323,1)
+489476^^Y
+"DATA",176.112,35324,0)
+4011945^NEEDLE 26G 3/8IN
+"DATA",176.112,35324,1)
+489477^^Y
+"DATA",176.112,35325,0)
+4013534^NEEDLE 26G 5/8IN
+"DATA",176.112,35325,1)
+489478^^Y
+"DATA",176.112,35326,0)
+4013537^NEEDLE 27G 0.5IN
+"DATA",176.112,35326,1)
+489479^^Y
+"DATA",176.112,35327,0)
+4013538^NEEDLE 27G 1.25IN
+"DATA",176.112,35327,1)
+489480^^Y
+"DATA",176.112,35328,0)
+4016645^NEEDLE 30G 0.5IN
+"DATA",176.112,35328,1)
+489481^^Y
+"DATA",176.112,35329,0)
+4013540^NEEDLE 30G 1.5IN
+"DATA",176.112,35329,1)
+489482^^Y
+"DATA",176.112,35330,0)
+4013543^NEEDLE 30G 1IN
+"DATA",176.112,35330,1)
+489483^^Y
+"DATA",176.112,35331,0)
+4014071^NEEDLE,PEN 29G,0.5IN
+"DATA",176.112,35331,1)
+489484^^Y
+"DATA",176.112,35332,0)
+4014072^NEEDLE,PEN 31G,5/16IN
+"DATA",176.112,35332,1)
+489485^^Y
+"DATA",176.112,35333,0)
+4011149^OSTOMY KIT,STERILE H#3710
+"DATA",176.112,35333,1)
+489486^^Y
+"DATA",176.112,35334,0)
+4011147^OSTOMY SET,STERILE H#3712
+"DATA",176.112,35334,1)
+489487^^Y
+"DATA",176.112,35335,0)
+4011148^OSTOMY SET,STERILE H#3714
+"DATA",176.112,35335,1)
+489488^^Y
+"DATA",176.112,35336,0)
+4011056^OSTOMY SET,STERILE O.R.GUARDIAN H#4673
+"DATA",176.112,35336,1)
+489489^^Y
+"DATA",176.112,35337,0)
+4011057^OSTOMY SET,STERILE O.R.GUARDIAN H#4675
+"DATA",176.112,35337,1)
+489490^^Y
+"DATA",176.112,35338,0)
+4011058^OSTOMY SET,STERILE O.R.GUARDIAN H#4676
+"DATA",176.112,35338,1)
+489491^^Y
+"DATA",176.112,35339,0)
+4011036^OSTOMY SET,STERILE,GUARDIAN H#4666
+"DATA",176.112,35339,1)
+489492^^Y
+"DATA",176.112,35340,0)
+4012665^PLUG,CONSEAL ONE-PIECE COLOPLAST #1435
+"DATA",176.112,35340,1)
+489493^^Y
+"DATA",176.112,35341,0)
+4012666^PLUG,CONSEAL ONE-PIECE COLOPLAST #1445
+"DATA",176.112,35341,1)
+489494^^Y
+"DATA",176.112,35342,0)
+4012667^PLUG,CONSEAL ONE-PIECE COLOPLAST #1485
+"DATA",176.112,35342,1)
+489495^^Y
+"DATA",176.112,35343,0)
+4012668^PLUG,CONSEAL ONE-PIECE COLOPLAST #1495
+"DATA",176.112,35343,1)
+489496^^Y
+"DATA",176.112,35344,0)
+4012657^PLUG,CONSEAL TWO-PIECE COLOPLAST #1235
+"DATA",176.112,35344,1)
+489497^^Y
+"DATA",176.112,35345,0)
+4012658^PLUG,CONSEAL TWO-PIECE COLOPLAST #1245
+"DATA",176.112,35345,1)
+489498^^Y
+"DATA",176.112,35346,0)
+4012659^PLUG,CONSEAL TWO-PIECE COLOPLAST #1285
+"DATA",176.112,35346,1)
+489499^^Y
+"DATA",176.112,35347,0)
+4012660^PLUG,CONSEAL TWO-PIECE COLOPLAST #1295
+"DATA",176.112,35347,1)
+489500^^Y
+"DATA",176.112,35348,0)
+4011514^POUCH COVER H#7035
+"DATA",176.112,35348,1)
+489501^^Y
+"DATA",176.112,35349,0)
+4011513^POUCH COVER H#7037
+"DATA",176.112,35349,1)
+489502^^Y
+"DATA",176.112,35350,0)
+4011515^POUCH COVER H#7040
+"DATA",176.112,35350,1)
+489503^^Y
+"DATA",176.112,35351,0)
+4011516^POUCH COVER H#7041
+"DATA",176.112,35351,1)
+489504^^Y
+"DATA",176.112,35352,0)
+4011525^POUCH COVER H#70410
+"DATA",176.112,35352,1)
+489505^^Y
+"DATA",176.112,35353,0)
+4011526^POUCH COVER H#70411
+"DATA",176.112,35353,1)
+489506^^Y
+"DATA",176.112,35354,0)
+4011517^POUCH COVER H#7042
+"DATA",176.112,35354,1)
+489507^^Y
+"DATA",176.112,35355,0)
+4011518^POUCH COVER H#7043
+"DATA",176.112,35355,1)
+489508^^Y
+"DATA",176.112,35356,0)
+4011519^POUCH COVER H#7044
+"DATA",176.112,35356,1)
+489509^^Y
+"DATA",176.112,35357,0)
+4011520^POUCH COVER H#7045
+"DATA",176.112,35357,1)
+489510^^Y
+"DATA",176.112,35358,0)
+4011521^POUCH COVER H#7046
+"DATA",176.112,35358,1)
+489511^^Y
+"DATA",176.112,35359,0)
+4011522^POUCH COVER H#7047
+"DATA",176.112,35359,1)
+489512^^Y
+"DATA",176.112,35360,0)
+4011523^POUCH COVER H#7048
+"DATA",176.112,35360,1)
+489513^^Y
+"DATA",176.112,35361,0)
+4011524^POUCH COVER H#7049
+"DATA",176.112,35361,1)
+489514^^Y
+"DATA",176.112,35362,0)
+4011062^POUCH,BLACK RUBBER REG A,TORBOT #210
+"DATA",176.112,35362,1)
+489515^^Y
+"DATA",176.112,35363,0)
+4011063^POUCH,BLACK RUBBER REG A,TORBOT #214
+"DATA",176.112,35363,1)
+489516^^Y
+"DATA",176.112,35364,0)
+4011138^POUCH,CLOSED H#3332
+"DATA",176.112,35364,1)
+489517^^Y
+"DATA",176.112,35365,0)
+4011139^POUCH,CLOSED H#3333
+"DATA",176.112,35365,1)
+489518^^Y
+"DATA",176.112,35366,0)
+4011140^POUCH,CLOSED H#3334
+"DATA",176.112,35366,1)
+489519^^Y
+"DATA",176.112,35367,0)
+4011137^POUCH,CLOSED H#3337
+"DATA",176.112,35367,1)
+489520^^Y
+"DATA",176.112,35368,0)
+4011078^POUCH,CLOSED H#3342
+"DATA",176.112,35368,1)
+489521^^Y
+"DATA",176.112,35369,0)
+4011079^POUCH,CLOSED H#3343
+"DATA",176.112,35369,1)
+489522^^Y
+"DATA",176.112,35370,0)
+4011142^POUCH,CLOSED H#3344
+"DATA",176.112,35370,1)
+489523^^Y
+"DATA",176.112,35371,0)
+4011141^POUCH,CLOSED H#3347
+"DATA",176.112,35371,1)
+489524^^Y
+"DATA",176.112,35372,0)
+4011144^POUCH,CLOSED H#8342
+"DATA",176.112,35372,1)
+489525^^Y
+"DATA",176.112,35373,0)
+4011145^POUCH,CLOSED H#8343
+"DATA",176.112,35373,1)
+489526^^Y
+"DATA",176.112,35374,0)
+4011146^POUCH,CLOSED H#8344
+"DATA",176.112,35374,1)
+489527^^Y
+"DATA",176.112,35375,0)
+4011143^POUCH,CLOSED H#8347
+"DATA",176.112,35375,1)
+489528^^Y
+"DATA",176.112,35376,0)
+4015200^POUCH,CLOSED,CONTOUR I 25MM H#1701
+"DATA",176.112,35376,1)
+489529^^Y
+"DATA",176.112,35377,0)
+4015206^POUCH,CLOSED,CONTOUR I 25MM H#1711
+"DATA",176.112,35377,1)
+489530^^Y
+"DATA",176.112,35378,0)
+4015201^POUCH,CLOSED,CONTOUR I 30MM H#1702
+"DATA",176.112,35378,1)
+489531^^Y
+"DATA",176.112,35379,0)
+4015207^POUCH,CLOSED,CONTOUR I 30MM H#1712
+"DATA",176.112,35379,1)
+489532^^Y
+"DATA",176.112,35380,0)
+4015202^POUCH,CLOSED,CONTOUR I 35MM H#1703
+"DATA",176.112,35380,1)
+489533^^Y
+"DATA",176.112,35381,0)
+4015208^POUCH,CLOSED,CONTOUR I 35MM H#1713
+"DATA",176.112,35381,1)
+489534^^Y
+"DATA",176.112,35382,0)
+4015203^POUCH,CLOSED,CONTOUR I 40MM H#1704
+"DATA",176.112,35382,1)
+489535^^Y
+"DATA",176.112,35383,0)
+4015209^POUCH,CLOSED,CONTOUR I 40MM H#1714
+"DATA",176.112,35383,1)
+489536^^Y
+"DATA",176.112,35384,0)
+4015204^POUCH,CLOSED,CONTOUR I 45MM H#1705
+"DATA",176.112,35384,1)
+489537^^Y
+"DATA",176.112,35385,0)
+4015211^POUCH,CLOSED,CONTOUR I 45MM H#1715
+"DATA",176.112,35385,1)
+489538^^Y
+"DATA",176.112,35386,0)
+4015205^POUCH,CLOSED,CONTOUR I 50MM H#1706
+"DATA",176.112,35386,1)
+489539^^Y
+"DATA",176.112,35387,0)
+4015212^POUCH,CLOSED,CONTOUR I 50MM H#1716
+"DATA",176.112,35387,1)
+489540^^Y
+"DATA",176.112,35388,0)
+4015213^POUCH,CLOSED,CONTOUR I 60MM H#1717
+"DATA",176.112,35388,1)
+489541^^Y
+"DATA",176.112,35389,0)
+4015199^POUCH,CLOSED,CONTOUR I CTF H#1700
+"DATA",176.112,35389,1)
+489542^^Y
+"DATA",176.112,35390,0)
+4015210^POUCH,CLOSED,CONTOUR I CTF H#1710
+"DATA",176.112,35390,1)
+489543^^Y
+"DATA",176.112,35391,0)
+4010983^POUCH,CLOSED,FILTER H#2172
+"DATA",176.112,35391,1)
+489544^^Y
+"DATA",176.112,35392,0)
+4010985^POUCH,CLOSED,FILTER H#2173
+"DATA",176.112,35392,1)
+489545^^Y
+"DATA",176.112,35393,0)
+4010987^POUCH,CLOSED,FILTER H#2174
+"DATA",176.112,35393,1)
+489546^^Y
+"DATA",176.112,35394,0)
+4010988^POUCH,CLOSED,FILTER H#2175
+"DATA",176.112,35394,1)
+489547^^Y
+"DATA",176.112,35395,0)
+4010989^POUCH,CLOSED,FILTER H#2176
+"DATA",176.112,35395,1)
+489548^^Y
+"DATA",176.112,35396,0)
+4010984^POUCH,CLOSED,FILTER H#2178
+"DATA",176.112,35396,1)
+489549^^Y
+"DATA",176.112,35397,0)
+4010986^POUCH,CLOSED,FILTER H#2179
+"DATA",176.112,35397,1)
+489550^^Y
+"DATA",176.112,35398,0)
+4010912^POUCH,CLOSED,FIRSTCHOICE H#3450
+"DATA",176.112,35398,1)
+489551^^Y
+"DATA",176.112,35399,0)
+4010919^POUCH,CLOSED,FIRSTCHOICE H#3452
+"DATA",176.112,35399,1)
+489552^^Y
+"DATA",176.112,35400,0)
+4010921^POUCH,CLOSED,FIRSTCHOICE H#3453
+"DATA",176.112,35400,1)
+489553^^Y
+"DATA",176.112,35401,0)
+4010923^POUCH,CLOSED,FIRSTCHOICE H#3454
+"DATA",176.112,35401,1)
+489554^^Y
+"DATA",176.112,35402,0)
+4010924^POUCH,CLOSED,FIRSTCHOICE H#3455
+"DATA",176.112,35402,1)
+489555^^Y
+"DATA",176.112,35403,0)
+4010920^POUCH,CLOSED,FIRSTCHOICE H#3458
+"DATA",176.112,35403,1)
+489556^^Y
+"DATA",176.112,35404,0)
+4010922^POUCH,CLOSED,FIRSTCHOICE H#3459
+"DATA",176.112,35404,1)
+489557^^Y
+"DATA",176.112,35405,0)
+4015215^POUCH,CLOSED,FIRSTCHOICE H#3490
+"DATA",176.112,35405,1)
+489558^^Y
+"DATA",176.112,35406,0)
+4015216^POUCH,CLOSED,FIRSTCHOICE H#3491
+"DATA",176.112,35406,1)
+489559^^Y
+"DATA",176.112,35407,0)
+4015217^POUCH,CLOSED,FIRSTCHOICE H#3492
+"DATA",176.112,35407,1)
+489560^^Y
+"DATA",176.112,35408,0)
+4015218^POUCH,CLOSED,FIRSTCHOICE H#3493
+"DATA",176.112,35408,1)
+489561^^Y
+"DATA",176.112,35409,0)
+4015219^POUCH,CLOSED,FIRSTCHOICE H#3494
+"DATA",176.112,35409,1)
+489562^^Y
+"DATA",176.112,35410,0)
+4015220^POUCH,CLOSED,FIRSTCHOICE H#3495
+"DATA",176.112,35410,1)
+489563^^Y
+"DATA",176.112,35411,0)
+4015221^POUCH,CLOSED,FIRSTCHOICE H#3496
+"DATA",176.112,35411,1)
+489564^^Y
+"DATA",176.112,35412,0)
+4015222^POUCH,CLOSED,FIRSTCHOICE H#3497
+"DATA",176.112,35412,1)
+489565^^Y
+"DATA",176.112,35413,0)
+4015223^POUCH,CLOSED,FIRSTCHOICE H#3498
+"DATA",176.112,35413,1)
+489566^^Y
+"DATA",176.112,35414,0)
+4015224^POUCH,CLOSED,FIRSTCHOICE H#3499
+"DATA",176.112,35414,1)
+489567^^Y
+"DATA",176.112,35415,0)
+4010911^POUCH,CLOSED,FIRSTCHOICE H#3520
+"DATA",176.112,35415,1)
+489568^^Y
+"DATA",176.112,35416,0)
+4010913^POUCH,CLOSED,FIRSTCHOICE H#3522
+"DATA",176.112,35416,1)
+489569^^Y
+"DATA",176.112,35417,0)
+4010915^POUCH,CLOSED,FIRSTCHOICE H#3523
+"DATA",176.112,35417,1)
+489570^^Y
+"DATA",176.112,35418,0)
+4010917^POUCH,CLOSED,FIRSTCHOICE H#3524
+"DATA",176.112,35418,1)
+489571^^Y
+"DATA",176.112,35419,0)
+4010918^POUCH,CLOSED,FIRSTCHOICE H#3525
+"DATA",176.112,35419,1)
+489572^^Y
+"DATA",176.112,35420,0)
+4010914^POUCH,CLOSED,FIRSTCHOICE H#3528
+"DATA",176.112,35420,1)
+489573^^Y
+"DATA",176.112,35421,0)
+4010916^POUCH,CLOSED,FIRSTCHOICE H#3529
+"DATA",176.112,35421,1)
+489574^^Y
+"DATA",176.112,35422,0)
+4010789^POUCH,CLOSED,GUARDIAN H#4502
+"DATA",176.112,35422,1)
+489575^^Y
+"DATA",176.112,35423,0)
+4011015^POUCH,CLOSED,GUARDIAN H#4503
+"DATA",176.112,35423,1)
+489576^^Y
+"DATA",176.112,35424,0)
+4011016^POUCH,CLOSED,GUARDIAN H#4504
+"DATA",176.112,35424,1)
+489577^^Y
+"DATA",176.112,35425,0)
+4011017^POUCH,CLOSED,GUARDIAN H#4505
+"DATA",176.112,35425,1)
+489578^^Y
+"DATA",176.112,35426,0)
+4011018^POUCH,CLOSED,GUARDIAN H#4512
+"DATA",176.112,35426,1)
+489579^^Y
+"DATA",176.112,35427,0)
+4011019^POUCH,CLOSED,GUARDIAN H#4513
+"DATA",176.112,35427,1)
+489580^^Y
+"DATA",176.112,35428,0)
+4011020^POUCH,CLOSED,GUARDIAN H#4514
+"DATA",176.112,35428,1)
+489581^^Y
+"DATA",176.112,35429,0)
+4011021^POUCH,CLOSED,GUARDIAN H#4515
+"DATA",176.112,35429,1)
+489582^^Y
+"DATA",176.112,35430,0)
+4011002^POUCH,CLOSED,HOLLIGARD SEAL H#4122
+"DATA",176.112,35430,1)
+489583^^Y
+"DATA",176.112,35431,0)
+4011004^POUCH,CLOSED,HOLLIGARD SEAL H#4123
+"DATA",176.112,35431,1)
+489584^^Y
+"DATA",176.112,35432,0)
+4011006^POUCH,CLOSED,HOLLIGARD SEAL H#4124
+"DATA",176.112,35432,1)
+489585^^Y
+"DATA",176.112,35433,0)
+4011007^POUCH,CLOSED,HOLLIGARD SEAL H#4125
+"DATA",176.112,35433,1)
+489586^^Y
+"DATA",176.112,35434,0)
+4011008^POUCH,CLOSED,HOLLIGARD SEAL H#4126
+"DATA",176.112,35434,1)
+489587^^Y
+"DATA",176.112,35435,0)
+4011003^POUCH,CLOSED,HOLLIGARD SEAL H#4128
+"DATA",176.112,35435,1)
+489588^^Y
+"DATA",176.112,35436,0)
+4011005^POUCH,CLOSED,HOLLIGARD SEAL H#4129
+"DATA",176.112,35436,1)
+489589^^Y
+"DATA",176.112,35437,0)
+4010996^POUCH,CLOSED,KARAYA SEAL H#3322
+"DATA",176.112,35437,1)
+489590^^Y
+"DATA",176.112,35438,0)
+4010788^POUCH,CLOSED,KARAYA SEAL H#3323
+"DATA",176.112,35438,1)
+489591^^Y
+"DATA",176.112,35439,0)
+4010999^POUCH,CLOSED,KARAYA SEAL H#3324
+"DATA",176.112,35439,1)
+489592^^Y
+"DATA",176.112,35440,0)
+4011000^POUCH,CLOSED,KARAYA SEAL H#3325
+"DATA",176.112,35440,1)
+489593^^Y
+"DATA",176.112,35441,0)
+4011001^POUCH,CLOSED,KARAYA SEAL H#3326
+"DATA",176.112,35441,1)
+489594^^Y
+"DATA",176.112,35442,0)
+4010997^POUCH,CLOSED,KARAYA SEAL H#3328
+"DATA",176.112,35442,1)
+489595^^Y
+"DATA",176.112,35443,0)
+4010998^POUCH,CLOSED,KARAYA SEAL H#3329
+"DATA",176.112,35443,1)
+489596^^Y
+"DATA",176.112,35444,0)
+4010990^POUCH,CLOSED,KARAYA SEAL H#7162
+"DATA",176.112,35444,1)
+489597^^Y
+"DATA",176.112,35445,0)
+4010787^POUCH,CLOSED,KARAYA SEAL H#7163
+"DATA",176.112,35445,1)
+489598^^Y
+"DATA",176.112,35446,0)
+4010993^POUCH,CLOSED,KARAYA SEAL H#7164
+"DATA",176.112,35446,1)
+489599^^Y
+"DATA",176.112,35447,0)
+4010994^POUCH,CLOSED,KARAYA SEAL H#7165
+"DATA",176.112,35447,1)
+489600^^Y
+"DATA",176.112,35448,0)
+4010995^POUCH,CLOSED,KARAYA SEAL H#7166
+"DATA",176.112,35448,1)
+489601^^Y
+"DATA",176.112,35449,0)
+4010991^POUCH,CLOSED,KARAYA SEAL H#7168
+"DATA",176.112,35449,1)
+489602^^Y
+"DATA",176.112,35450,0)
+4010992^POUCH,CLOSED,KARAYA SEAL H#7169
+"DATA",176.112,35450,1)
+489603^^Y
+"DATA",176.112,35451,0)
+4017115^POUCH,CLOSED,NEW IMAGE H#18312
+"DATA",176.112,35451,1)
+489604^^Y
+"DATA",176.112,35452,0)
+4017116^POUCH,CLOSED,NEW IMAGE H#18313
+"DATA",176.112,35452,1)
+489605^^Y
+"DATA",176.112,35453,0)
+4017117^POUCH,CLOSED,NEW IMAGE H#18314
+"DATA",176.112,35453,1)
+489606^^Y
+"DATA",176.112,35454,0)
+4010925^POUCH,CLOSED,PREMIUM H#3502
+"DATA",176.112,35454,1)
+489607^^Y
+"DATA",176.112,35455,0)
+4010927^POUCH,CLOSED,PREMIUM H#3503
+"DATA",176.112,35455,1)
+489608^^Y
+"DATA",176.112,35456,0)
+4010929^POUCH,CLOSED,PREMIUM H#3504
+"DATA",176.112,35456,1)
+489609^^Y
+"DATA",176.112,35457,0)
+4010930^POUCH,CLOSED,PREMIUM H#3505
+"DATA",176.112,35457,1)
+489610^^Y
+"DATA",176.112,35458,0)
+4010931^POUCH,CLOSED,PREMIUM H#3506
+"DATA",176.112,35458,1)
+489611^^Y
+"DATA",176.112,35459,0)
+4010926^POUCH,CLOSED,PREMIUM H#3508
+"DATA",176.112,35459,1)
+489612^^Y
+"DATA",176.112,35460,0)
+4010928^POUCH,CLOSED,PREMIUM H#3509
+"DATA",176.112,35460,1)
+489613^^Y
+"DATA",176.112,35461,0)
+4010939^POUCH,CLOSED,PREMIUM H#3532
+"DATA",176.112,35461,1)
+489614^^Y
+"DATA",176.112,35462,0)
+4010941^POUCH,CLOSED,PREMIUM H#3533
+"DATA",176.112,35462,1)
+489615^^Y
+"DATA",176.112,35463,0)
+4010943^POUCH,CLOSED,PREMIUM H#3534
+"DATA",176.112,35463,1)
+489616^^Y
+"DATA",176.112,35464,0)
+4010944^POUCH,CLOSED,PREMIUM H#3535
+"DATA",176.112,35464,1)
+489617^^Y
+"DATA",176.112,35465,0)
+4010945^POUCH,CLOSED,PREMIUM H#3536
+"DATA",176.112,35465,1)
+489618^^Y
+"DATA",176.112,35466,0)
+4010940^POUCH,CLOSED,PREMIUM H#3538
+"DATA",176.112,35466,1)
+489619^^Y
+"DATA",176.112,35467,0)
+4010942^POUCH,CLOSED,PREMIUM H#3539
+"DATA",176.112,35467,1)
+489620^^Y
+"DATA",176.112,35468,0)
+4010966^POUCH,CLOSED,PREMIUM H#3542
+"DATA",176.112,35468,1)
+489621^^Y
+"DATA",176.112,35469,0)
+4010968^POUCH,CLOSED,PREMIUM H#3543
+"DATA",176.112,35469,1)
+489622^^Y
+"DATA",176.112,35470,0)
+4010969^POUCH,CLOSED,PREMIUM H#3544
+"DATA",176.112,35470,1)
+489623^^Y
+"DATA",176.112,35471,0)
+4010970^POUCH,CLOSED,PREMIUM H#3545
+"DATA",176.112,35471,1)
+489624^^Y
+"DATA",176.112,35472,0)
+4010971^POUCH,CLOSED,PREMIUM H#3546
+"DATA",176.112,35472,1)
+489625^^Y
+"DATA",176.112,35473,0)
+4010967^POUCH,CLOSED,PREMIUM H#3548
+"DATA",176.112,35473,1)
+489626^^Y
+"DATA",176.112,35474,0)
+4011009^POUCH,CLOSED,PREMIUM H#3549
+"DATA",176.112,35474,1)
+489627^^Y
+"DATA",176.112,35475,0)
+4010932^POUCH,CLOSED,PREMIUM H#3552
+"DATA",176.112,35475,1)
+489628^^Y
+"DATA",176.112,35476,0)
+4010934^POUCH,CLOSED,PREMIUM H#3553
+"DATA",176.112,35476,1)
+489629^^Y
+"DATA",176.112,35477,0)
+4010936^POUCH,CLOSED,PREMIUM H#3554
+"DATA",176.112,35477,1)
+489630^^Y
+"DATA",176.112,35478,0)
+4010937^POUCH,CLOSED,PREMIUM H#3555
+"DATA",176.112,35478,1)
+489631^^Y
+"DATA",176.112,35479,0)
+4010938^POUCH,CLOSED,PREMIUM H#3556
+"DATA",176.112,35479,1)
+489632^^Y
+"DATA",176.112,35480,0)
+4010933^POUCH,CLOSED,PREMIUM H#3558
+"DATA",176.112,35480,1)
+489633^^Y
+"DATA",176.112,35481,0)
+4010935^POUCH,CLOSED,PREMIUM H#3559
+"DATA",176.112,35481,1)
+489634^^Y
+"DATA",176.112,35482,0)
+4010732^POUCH,CLOSED,SUR-FIT C#0256-20
+"DATA",176.112,35482,1)
+489635^^Y
+"DATA",176.112,35483,0)
+4010733^POUCH,CLOSED,SUR-FIT C#0256-21
+"DATA",176.112,35483,1)
+489636^^Y
+"DATA",176.112,35484,0)
+4010734^POUCH,CLOSED,SUR-FIT C#0256-22
+"DATA",176.112,35484,1)
+489637^^Y
+"DATA",176.112,35485,0)
+4010735^POUCH,CLOSED,SUR-FIT C#0256-23
+"DATA",176.112,35485,1)
+489638^^Y
+"DATA",176.112,35486,0)
+4010709^POUCH,CLOSED,SUR-FIT C#1784-58
+"DATA",176.112,35486,1)
+489639^^Y
+"DATA",176.112,35487,0)
+4010710^POUCH,CLOSED,SUR-FIT C#1784-59
+"DATA",176.112,35487,1)
+489640^^Y
+"DATA",176.112,35488,0)
+4010711^POUCH,CLOSED,SUR-FIT C#1784-60
+"DATA",176.112,35488,1)
+489641^^Y
+"DATA",176.112,35489,0)
+4010712^POUCH,CLOSED,SUR-FIT C#1784-61
+"DATA",176.112,35489,1)
+489642^^Y
+"DATA",176.112,35490,0)
+4011189^POUCH,CLOSED,SUR-FIT C#4015-21
+"DATA",176.112,35490,1)
+489643^^Y
+"DATA",176.112,35491,0)
+4011190^POUCH,CLOSED,SUR-FIT C#4015-22
+"DATA",176.112,35491,1)
+489644^^Y
+"DATA",176.112,35492,0)
+4011191^POUCH,CLOSED,SUR-FIT C#4015-23
+"DATA",176.112,35492,1)
+489645^^Y
+"DATA",176.112,35493,0)
+4011192^POUCH,CLOSED,SUR-FIT C#4015-24
+"DATA",176.112,35493,1)
+489646^^Y
+"DATA",176.112,35494,0)
+4011193^POUCH,CLOSED,SUR-FIT C#4015-25
+"DATA",176.112,35494,1)
+489647^^Y
+"DATA",176.112,35495,0)
+4011194^POUCH,CLOSED,SUR-FIT C#4015-26
+"DATA",176.112,35495,1)
+489648^^Y
+"DATA",176.112,35496,0)
+4011195^POUCH,CLOSED,SUR-FIT C#4015-27
+"DATA",176.112,35496,1)
+489649^^Y
+"DATA",176.112,35497,0)
+4011196^POUCH,CLOSED,SUR-FIT C#4015-28
+"DATA",176.112,35497,1)
+489650^^Y
+"DATA",176.112,35498,0)
+4014624^POUCH,CLOSED,SUR-FIT,1-3/4IN C#4016-78
+"DATA",176.112,35498,1)
+489651^^Y
+"DATA",176.112,35499,0)
+4014623^POUCH,CLOSED,SUR-FIT,1-3/8IN C#4016-77
+"DATA",176.112,35499,1)
+489652^^Y
+"DATA",176.112,35500,0)
+4014625^POUCH,CLOSED,SUR-FIT,2-1/4IN C#4016-79
+"DATA",176.112,35500,1)
+489653^^Y
+"DATA",176.112,35501,0)
+4014626^POUCH,CLOSED,SUR-FIT,2-3/4IN C#4016-80
+"DATA",176.112,35501,1)
+489654^^Y
+"DATA",176.112,35502,0)
+4011203^POUCH,DRAINABLE,ACTIVE LIFE C#0254-33
+"DATA",176.112,35502,1)
+489655^^Y
+"DATA",176.112,35503,0)
+4010953^POUCH,DRAINABLE,ADHESIVE H#7422
+"DATA",176.112,35503,1)
+489656^^Y
+"DATA",176.112,35504,0)
+4010955^POUCH,DRAINABLE,ADHESIVE H#7423
+"DATA",176.112,35504,1)
+489657^^Y
+"DATA",176.112,35505,0)
+4010957^POUCH,DRAINABLE,ADHESIVE H#7424
+"DATA",176.112,35505,1)
+489658^^Y
+"DATA",176.112,35506,0)
+4010958^POUCH,DRAINABLE,ADHESIVE H#7425
+"DATA",176.112,35506,1)
+489659^^Y
+"DATA",176.112,35507,0)
+4010959^POUCH,DRAINABLE,ADHESIVE H#7426
+"DATA",176.112,35507,1)
+489660^^Y
+"DATA",176.112,35508,0)
+4010954^POUCH,DRAINABLE,ADHESIVE H#7428
+"DATA",176.112,35508,1)
+489661^^Y
+"DATA",176.112,35509,0)
+4010956^POUCH,DRAINABLE,ADHESIVE H#7429
+"DATA",176.112,35509,1)
+489662^^Y
+"DATA",176.112,35510,0)
+4010946^POUCH,DRAINABLE,ADHESIVE H#7432
+"DATA",176.112,35510,1)
+489663^^Y
+"DATA",176.112,35511,0)
+4010948^POUCH,DRAINABLE,ADHESIVE H#7433
+"DATA",176.112,35511,1)
+489664^^Y
+"DATA",176.112,35512,0)
+4010950^POUCH,DRAINABLE,ADHESIVE H#7434
+"DATA",176.112,35512,1)
+489665^^Y
+"DATA",176.112,35513,0)
+4010951^POUCH,DRAINABLE,ADHESIVE H#7435
+"DATA",176.112,35513,1)
+489666^^Y
+"DATA",176.112,35514,0)
+4010952^POUCH,DRAINABLE,ADHESIVE H#7436
+"DATA",176.112,35514,1)
+489667^^Y
+"DATA",176.112,35515,0)
+4010947^POUCH,DRAINABLE,ADHESIVE H#7438
+"DATA",176.112,35515,1)
+489668^^Y
+"DATA",176.112,35516,0)
+4010949^POUCH,DRAINABLE,ADHESIVE H#7439
+"DATA",176.112,35516,1)
+489669^^Y
+"DATA",176.112,35517,0)
+4016139^POUCH,DRAINABLE,ASSURA COLOPLAST #12567
+"DATA",176.112,35517,1)
+489670^^Y
+"DATA",176.112,35518,0)
+4016140^POUCH,DRAINABLE,ASSURA COLOPLAST #12568
+"DATA",176.112,35518,1)
+489671^^Y
+"DATA",176.112,35519,0)
+4016141^POUCH,DRAINABLE,ASSURA COLOPLAST #12569
+"DATA",176.112,35519,1)
+489672^^Y
+"DATA",176.112,35520,0)
+4016136^POUCH,DRAINABLE,ASSURA COLOPLAST #12577
+"DATA",176.112,35520,1)
+489673^^Y
+"DATA",176.112,35521,0)
+4016138^POUCH,DRAINABLE,ASSURA COLOPLAST #12578
+"DATA",176.112,35521,1)
+489674^^Y
+"DATA",176.112,35522,0)
+4016137^POUCH,DRAINABLE,ASSURA COLOPLAST #12579
+"DATA",176.112,35522,1)
+489675^^Y
+"DATA",176.112,35523,0)
+4016143^POUCH,DRAINABLE,ASSURA COLOPLAST #12660
+"DATA",176.112,35523,1)
+489676^^Y
+"DATA",176.112,35524,0)
+4016145^POUCH,DRAINABLE,ASSURA COLOPLAST #12664
+"DATA",176.112,35524,1)
+489677^^Y
+"DATA",176.112,35525,0)
+4016147^POUCH,DRAINABLE,ASSURA COLOPLAST #12665
+"DATA",176.112,35525,1)
+489678^^Y
+"DATA",176.112,35526,0)
+4016149^POUCH,DRAINABLE,ASSURA COLOPLAST #12666
+"DATA",176.112,35526,1)
+489679^^Y
+"DATA",176.112,35527,0)
+4016151^POUCH,DRAINABLE,ASSURA COLOPLAST #12667
+"DATA",176.112,35527,1)
+489680^^Y
+"DATA",176.112,35528,0)
+4016142^POUCH,DRAINABLE,ASSURA COLOPLAST #12670
+"DATA",176.112,35528,1)
+489681^^Y
+"DATA",176.112,35529,0)
+4016144^POUCH,DRAINABLE,ASSURA COLOPLAST #12674
+"DATA",176.112,35529,1)
+489682^^Y
+"DATA",176.112,35530,0)
+4016146^POUCH,DRAINABLE,ASSURA COLOPLAST #12675
+"DATA",176.112,35530,1)
+489683^^Y
+"DATA",176.112,35531,0)
+4016148^POUCH,DRAINABLE,ASSURA COLOPLAST #12676
+"DATA",176.112,35531,1)
+489684^^Y
+"DATA",176.112,35532,0)
+4016150^POUCH,DRAINABLE,ASSURA COLOPLAST #12677
+"DATA",176.112,35532,1)
+489685^^Y
+"DATA",176.112,35533,0)
+4011048^POUCH,DRAINABLE,CENTER POINT LOCK H#3812
+"DATA",176.112,35533,1)
+489686^^Y
+"DATA",176.112,35534,0)
+4011050^POUCH,DRAINABLE,CENTER POINT LOCK H#3813
+"DATA",176.112,35534,1)
+489687^^Y
+"DATA",176.112,35535,0)
+4011051^POUCH,DRAINABLE,CENTER POINT LOCK H#3816
+"DATA",176.112,35535,1)
+489688^^Y
+"DATA",176.112,35536,0)
+4011049^POUCH,DRAINABLE,CENTER POINT LOCK H#3817
+"DATA",176.112,35536,1)
+489689^^Y
+"DATA",176.112,35537,0)
+4014319^POUCH,DRAINABLE,CENTER POINT LOCK H#3872
+"DATA",176.112,35537,1)
+489690^^Y
+"DATA",176.112,35538,0)
+4014320^POUCH,DRAINABLE,CENTER POINT LOCK H#3873
+"DATA",176.112,35538,1)
+489691^^Y
+"DATA",176.112,35539,0)
+4014321^POUCH,DRAINABLE,CENTER POINT LOCK H#3874
+"DATA",176.112,35539,1)
+489692^^Y
+"DATA",176.112,35540,0)
+4014318^POUCH,DRAINABLE,CENTER POINT LOCK H#3877
+"DATA",176.112,35540,1)
+489693^^Y
+"DATA",176.112,35541,0)
+4016152^POUCH,DRAINABLE,COLOPLAST #6300
+"DATA",176.112,35541,1)
+489694^^Y
+"DATA",176.112,35542,0)
+4016153^POUCH,DRAINABLE,COLOPLAST #6301
+"DATA",176.112,35542,1)
+489695^^Y
+"DATA",176.112,35543,0)
+4016154^POUCH,DRAINABLE,COLOPLAST #6320
+"DATA",176.112,35543,1)
+489696^^Y
+"DATA",176.112,35544,0)
+4016155^POUCH,DRAINABLE,COLOPLAST #6325
+"DATA",176.112,35544,1)
+489697^^Y
+"DATA",176.112,35545,0)
+4016156^POUCH,DRAINABLE,COLOPLAST #6330
+"DATA",176.112,35545,1)
+489698^^Y
+"DATA",176.112,35546,0)
+4016158^POUCH,DRAINABLE,COLOPLAST #6335
+"DATA",176.112,35546,1)
+489699^^Y
+"DATA",176.112,35547,0)
+4016159^POUCH,DRAINABLE,COLOPLAST #6340
+"DATA",176.112,35547,1)
+489700^^Y
+"DATA",176.112,35548,0)
+4016160^POUCH,DRAINABLE,COLOPLAST #6345
+"DATA",176.112,35548,1)
+489701^^Y
+"DATA",176.112,35549,0)
+4016157^POUCH,DRAINABLE,COLOPLAST #6350
+"DATA",176.112,35549,1)
+489702^^Y
+"DATA",176.112,35550,0)
+4016161^POUCH,DRAINABLE,COLOPLAST #6360
+"DATA",176.112,35550,1)
+489703^^Y
+"DATA",176.112,35551,0)
+4015176^POUCH,DRAINABLE,CONTOUR I 20MM H#1601
+"DATA",176.112,35551,1)
+489704^^Y
+"DATA",176.112,35552,0)
+4015184^POUCH,DRAINABLE,CONTOUR I 20MM H#1611
+"DATA",176.112,35552,1)
+489705^^Y
+"DATA",176.112,35553,0)
+4015193^POUCH,DRAINABLE,CONTOUR I 20MM H#1631
+"DATA",176.112,35553,1)
+489706^^Y
+"DATA",176.112,35554,0)
+4015177^POUCH,DRAINABLE,CONTOUR I 25MM H#1602
+"DATA",176.112,35554,1)
+489707^^Y
+"DATA",176.112,35555,0)
+4015185^POUCH,DRAINABLE,CONTOUR I 25MM H#1612
+"DATA",176.112,35555,1)
+489708^^Y
+"DATA",176.112,35556,0)
+4015194^POUCH,DRAINABLE,CONTOUR I 25MM H#1632
+"DATA",176.112,35556,1)
+489709^^Y
+"DATA",176.112,35557,0)
+4015178^POUCH,DRAINABLE,CONTOUR I 30MM H#1603
+"DATA",176.112,35557,1)
+489710^^Y
+"DATA",176.112,35558,0)
+4015186^POUCH,DRAINABLE,CONTOUR I 30MM H#1613
+"DATA",176.112,35558,1)
+489711^^Y
+"DATA",176.112,35559,0)
+4015195^POUCH,DRAINABLE,CONTOUR I 30MM H#1633
+"DATA",176.112,35559,1)
+489712^^Y
+"DATA",176.112,35560,0)
+4015179^POUCH,DRAINABLE,CONTOUR I 35MM H#1604
+"DATA",176.112,35560,1)
+489713^^Y
+"DATA",176.112,35561,0)
+4015187^POUCH,DRAINABLE,CONTOUR I 35MM H#1614
+"DATA",176.112,35561,1)
+489714^^Y
+"DATA",176.112,35562,0)
+4015196^POUCH,DRAINABLE,CONTOUR I 35MM H#1634
+"DATA",176.112,35562,1)
+489715^^Y
+"DATA",176.112,35563,0)
+4015180^POUCH,DRAINABLE,CONTOUR I 40MM H#1605
+"DATA",176.112,35563,1)
+489716^^Y
+"DATA",176.112,35564,0)
+4015188^POUCH,DRAINABLE,CONTOUR I 40MM H#1615
+"DATA",176.112,35564,1)
+489717^^Y
+"DATA",176.112,35565,0)
+4015181^POUCH,DRAINABLE,CONTOUR I 45MM H#1606
+"DATA",176.112,35565,1)
+489718^^Y
+"DATA",176.112,35566,0)
+4015189^POUCH,DRAINABLE,CONTOUR I 45MM H#1616
+"DATA",176.112,35566,1)
+489719^^Y
+"DATA",176.112,35567,0)
+4015182^POUCH,DRAINABLE,CONTOUR I 50MM H#1607
+"DATA",176.112,35567,1)
+489720^^Y
+"DATA",176.112,35568,0)
+4015190^POUCH,DRAINABLE,CONTOUR I 50MM H#1617
+"DATA",176.112,35568,1)
+489721^^Y
+"DATA",176.112,35569,0)
+4015183^POUCH,DRAINABLE,CONTOUR I 60MM H#1608
+"DATA",176.112,35569,1)
+489722^^Y
+"DATA",176.112,35570,0)
+4015191^POUCH,DRAINABLE,CONTOUR I 60MM H#1618
+"DATA",176.112,35570,1)
+489723^^Y
+"DATA",176.112,35571,0)
+4015175^POUCH,DRAINABLE,CONTOUR I CTF H#1600
+"DATA",176.112,35571,1)
+489724^^Y
+"DATA",176.112,35572,0)
+4015197^POUCH,DRAINABLE,CONTOUR I CTF H#1620
+"DATA",176.112,35572,1)
+489725^^Y
+"DATA",176.112,35573,0)
+4015198^POUCH,DRAINABLE,CONTOUR I CTF H#1640
+"DATA",176.112,35573,1)
+489726^^Y
+"DATA",176.112,35574,0)
+4010840^POUCH,DRAINABLE,FIRSTCHOICE H#3610
+"DATA",176.112,35574,1)
+489727^^Y
+"DATA",176.112,35575,0)
+4010765^POUCH,DRAINABLE,FIRSTCHOICE H#3611
+"DATA",176.112,35575,1)
+489728^^Y
+"DATA",176.112,35576,0)
+4010766^POUCH,DRAINABLE,FIRSTCHOICE H#3612
+"DATA",176.112,35576,1)
+489729^^Y
+"DATA",176.112,35577,0)
+4010767^POUCH,DRAINABLE,FIRSTCHOICE H#3613
+"DATA",176.112,35577,1)
+489730^^Y
+"DATA",176.112,35578,0)
+4010768^POUCH,DRAINABLE,FIRSTCHOICE H#3614
+"DATA",176.112,35578,1)
+489731^^Y
+"DATA",176.112,35579,0)
+4010846^POUCH,DRAINABLE,FIRSTCHOICE H#3615
+"DATA",176.112,35579,1)
+489732^^Y
+"DATA",176.112,35580,0)
+4010769^POUCH,DRAINABLE,FIRSTCHOICE H#3616
+"DATA",176.112,35580,1)
+489733^^Y
+"DATA",176.112,35581,0)
+4010847^POUCH,DRAINABLE,FIRSTCHOICE H#3617
+"DATA",176.112,35581,1)
+489734^^Y
+"DATA",176.112,35582,0)
+4010848^POUCH,DRAINABLE,FIRSTCHOICE H#3618
+"DATA",176.112,35582,1)
+489735^^Y
+"DATA",176.112,35583,0)
+4010849^POUCH,DRAINABLE,FIRSTCHOICE H#3619
+"DATA",176.112,35583,1)
+489736^^Y
+"DATA",176.112,35584,0)
+4010833^POUCH,DRAINABLE,FIRSTCHOICE H#3621
+"DATA",176.112,35584,1)
+489737^^Y
+"DATA",176.112,35585,0)
+4010834^POUCH,DRAINABLE,FIRSTCHOICE H#3622
+"DATA",176.112,35585,1)
+489738^^Y
+"DATA",176.112,35586,0)
+4010835^POUCH,DRAINABLE,FIRSTCHOICE H#3623
+"DATA",176.112,35586,1)
+489739^^Y
+"DATA",176.112,35587,0)
+4010836^POUCH,DRAINABLE,FIRSTCHOICE H#3624
+"DATA",176.112,35587,1)
+489740^^Y
+"DATA",176.112,35588,0)
+4010837^POUCH,DRAINABLE,FIRSTCHOICE H#3625
+"DATA",176.112,35588,1)
+489741^^Y
+"DATA",176.112,35589,0)
+4010838^POUCH,DRAINABLE,FIRSTCHOICE H#3626
+"DATA",176.112,35589,1)
+489742^^Y
+"DATA",176.112,35590,0)
+4010839^POUCH,DRAINABLE,FIRSTCHOICE H#3627
+"DATA",176.112,35590,1)
+489743^^Y
+"DATA",176.112,35591,0)
+4010763^POUCH,DRAINABLE,FIRSTCHOICE H#3630
+"DATA",176.112,35591,1)
+489744^^Y
+"DATA",176.112,35592,0)
+4010764^POUCH,DRAINABLE,FIRSTCHOICE H#3631
+"DATA",176.112,35592,1)
+489745^^Y
+"DATA",176.112,35593,0)
+4010820^POUCH,DRAINABLE,FIRSTCHOICE H#3632
+"DATA",176.112,35593,1)
+489746^^Y
+"DATA",176.112,35594,0)
+4010822^POUCH,DRAINABLE,FIRSTCHOICE H#3633
+"DATA",176.112,35594,1)
+489747^^Y
+"DATA",176.112,35595,0)
+4010824^POUCH,DRAINABLE,FIRSTCHOICE H#3634
+"DATA",176.112,35595,1)
+489748^^Y
+"DATA",176.112,35596,0)
+4010825^POUCH,DRAINABLE,FIRSTCHOICE H#3635
+"DATA",176.112,35596,1)
+489749^^Y
+"DATA",176.112,35597,0)
+4011150^POUCH,DRAINABLE,FIRSTCHOICE H#3636
+"DATA",176.112,35597,1)
+489750^^Y
+"DATA",176.112,35598,0)
+4010819^POUCH,DRAINABLE,FIRSTCHOICE H#3637
+"DATA",176.112,35598,1)
+489751^^Y
+"DATA",176.112,35599,0)
+4010821^POUCH,DRAINABLE,FIRSTCHOICE H#3638
+"DATA",176.112,35599,1)
+489752^^Y
+"DATA",176.112,35600,0)
+4010823^POUCH,DRAINABLE,FIRSTCHOICE H#3639
+"DATA",176.112,35600,1)
+489753^^Y
+"DATA",176.112,35601,0)
+4010818^POUCH,DRAINABLE,FIRSTCHOICE H#3670
+"DATA",176.112,35601,1)
+489754^^Y
+"DATA",176.112,35602,0)
+4010827^POUCH,DRAINABLE,FIRSTCHOICE H#3672
+"DATA",176.112,35602,1)
+489755^^Y
+"DATA",176.112,35603,0)
+4010829^POUCH,DRAINABLE,FIRSTCHOICE H#3673
+"DATA",176.112,35603,1)
+489756^^Y
+"DATA",176.112,35604,0)
+4010831^POUCH,DRAINABLE,FIRSTCHOICE H#3674
+"DATA",176.112,35604,1)
+489757^^Y
+"DATA",176.112,35605,0)
+4010832^POUCH,DRAINABLE,FIRSTCHOICE H#3675
+"DATA",176.112,35605,1)
+489758^^Y
+"DATA",176.112,35606,0)
+4010830^POUCH,DRAINABLE,FIRSTCHOICE H#3679
+"DATA",176.112,35606,1)
+489759^^Y
+"DATA",176.112,35607,0)
+4010841^POUCH,DRAINABLE,FIRSTCHOICE H#3680
+"DATA",176.112,35607,1)
+489760^^Y
+"DATA",176.112,35608,0)
+4010842^POUCH,DRAINABLE,FIRSTCHOICE H#3681
+"DATA",176.112,35608,1)
+489761^^Y
+"DATA",176.112,35609,0)
+4010843^POUCH,DRAINABLE,FIRSTCHOICE H#3682
+"DATA",176.112,35609,1)
+489762^^Y
+"DATA",176.112,35610,0)
+4010844^POUCH,DRAINABLE,FIRSTCHOICE H#3683
+"DATA",176.112,35610,1)
+489763^^Y
+"DATA",176.112,35611,0)
+4010845^POUCH,DRAINABLE,FIRSTCHOICE H#3684
+"DATA",176.112,35611,1)
+489764^^Y
+"DATA",176.112,35612,0)
+4010850^POUCH,DRAINABLE,FIRSTCHOICE H#3685
+"DATA",176.112,35612,1)
+489765^^Y
+"DATA",176.112,35613,0)
+4010851^POUCH,DRAINABLE,FIRSTCHOICE H#3686
+"DATA",176.112,35613,1)
+489766^^Y
+"DATA",176.112,35614,0)
+4010852^POUCH,DRAINABLE,FIRSTCHOICE H#3687
+"DATA",176.112,35614,1)
+489767^^Y
+"DATA",176.112,35615,0)
+4010853^POUCH,DRAINABLE,FIRSTCHOICE H#3688
+"DATA",176.112,35615,1)
+489768^^Y
+"DATA",176.112,35616,0)
+4010854^POUCH,DRAINABLE,FIRSTCHOICE H#3689
+"DATA",176.112,35616,1)
+489769^^Y
+"DATA",176.112,35617,0)
+4010964^POUCH,DRAINABLE,FIRSTCHOICE H#9763
+"DATA",176.112,35617,1)
+489770^^Y
+"DATA",176.112,35618,0)
+4010965^POUCH,DRAINABLE,FIRSTCHOICE H#9764
+"DATA",176.112,35618,1)
+489771^^Y
+"DATA",176.112,35619,0)
+4011026^POUCH,DRAINABLE,GUARDIAN H#4602
+"DATA",176.112,35619,1)
+489772^^Y
+"DATA",176.112,35620,0)
+4010790^POUCH,DRAINABLE,GUARDIAN H#4603
+"DATA",176.112,35620,1)
+489773^^Y
+"DATA",176.112,35621,0)
+4011027^POUCH,DRAINABLE,GUARDIAN H#4604
+"DATA",176.112,35621,1)
+489774^^Y
+"DATA",176.112,35622,0)
+4010791^POUCH,DRAINABLE,GUARDIAN H#4605
+"DATA",176.112,35622,1)
+489775^^Y
+"DATA",176.112,35623,0)
+4010792^POUCH,DRAINABLE,GUARDIAN H#4606
+"DATA",176.112,35623,1)
+489776^^Y
+"DATA",176.112,35624,0)
+4011028^POUCH,DRAINABLE,GUARDIAN H#4612
+"DATA",176.112,35624,1)
+489777^^Y
+"DATA",176.112,35625,0)
+4010793^POUCH,DRAINABLE,GUARDIAN H#4613
+"DATA",176.112,35625,1)
+489778^^Y
+"DATA",176.112,35626,0)
+4011029^POUCH,DRAINABLE,GUARDIAN H#4614
+"DATA",176.112,35626,1)
+489779^^Y
+"DATA",176.112,35627,0)
+4011030^POUCH,DRAINABLE,GUARDIAN H#4615
+"DATA",176.112,35627,1)
+489780^^Y
+"DATA",176.112,35628,0)
+4011034^POUCH,DRAINABLE,GUARDIAN H#4624
+"DATA",176.112,35628,1)
+489781^^Y
+"DATA",176.112,35629,0)
+4011035^POUCH,DRAINABLE,GUARDIAN H#4625
+"DATA",176.112,35629,1)
+489782^^Y
+"DATA",176.112,35630,0)
+4010865^POUCH,DRAINABLE,KARAYA SEAL H#3112
+"DATA",176.112,35630,1)
+489783^^Y
+"DATA",176.112,35631,0)
+4010867^POUCH,DRAINABLE,KARAYA SEAL H#3113
+"DATA",176.112,35631,1)
+489784^^Y
+"DATA",176.112,35632,0)
+4010869^POUCH,DRAINABLE,KARAYA SEAL H#3114
+"DATA",176.112,35632,1)
+489785^^Y
+"DATA",176.112,35633,0)
+4010870^POUCH,DRAINABLE,KARAYA SEAL H#3115
+"DATA",176.112,35633,1)
+489786^^Y
+"DATA",176.112,35634,0)
+4010871^POUCH,DRAINABLE,KARAYA SEAL H#3116
+"DATA",176.112,35634,1)
+489787^^Y
+"DATA",176.112,35635,0)
+4010866^POUCH,DRAINABLE,KARAYA SEAL H#3118
+"DATA",176.112,35635,1)
+489788^^Y
+"DATA",176.112,35636,0)
+4010868^POUCH,DRAINABLE,KARAYA SEAL H#3119
+"DATA",176.112,35636,1)
+489789^^Y
+"DATA",176.112,35637,0)
+4010860^POUCH,DRAINABLE,KARAYA SEAL H#3132
+"DATA",176.112,35637,1)
+489790^^Y
+"DATA",176.112,35638,0)
+4010862^POUCH,DRAINABLE,KARAYA SEAL H#3133
+"DATA",176.112,35638,1)
+489791^^Y
+"DATA",176.112,35639,0)
+4010864^POUCH,DRAINABLE,KARAYA SEAL H#3134
+"DATA",176.112,35639,1)
+489792^^Y
+"DATA",176.112,35640,0)
+4010861^POUCH,DRAINABLE,KARAYA SEAL H#3138
+"DATA",176.112,35640,1)
+489793^^Y
+"DATA",176.112,35641,0)
+4010863^POUCH,DRAINABLE,KARAYA SEAL H#3139
+"DATA",176.112,35641,1)
+489794^^Y
+"DATA",176.112,35642,0)
+4010770^POUCH,DRAINABLE,KARAYA SEAL H#3222
+"DATA",176.112,35642,1)
+489795^^Y
+"DATA",176.112,35643,0)
+4010772^POUCH,DRAINABLE,KARAYA SEAL H#3223
+"DATA",176.112,35643,1)
+489796^^Y
+"DATA",176.112,35644,0)
+4010774^POUCH,DRAINABLE,KARAYA SEAL H#3224
+"DATA",176.112,35644,1)
+489797^^Y
+"DATA",176.112,35645,0)
+4010775^POUCH,DRAINABLE,KARAYA SEAL H#3225
+"DATA",176.112,35645,1)
+489798^^Y
+"DATA",176.112,35646,0)
+4010776^POUCH,DRAINABLE,KARAYA SEAL H#3226
+"DATA",176.112,35646,1)
+489799^^Y
+"DATA",176.112,35647,0)
+4010771^POUCH,DRAINABLE,KARAYA SEAL H#3228
+"DATA",176.112,35647,1)
+489800^^Y
+"DATA",176.112,35648,0)
+4010773^POUCH,DRAINABLE,KARAYA SEAL H#3229
+"DATA",176.112,35648,1)
+489801^^Y
+"DATA",176.112,35649,0)
+4010855^POUCH,DRAINABLE,KARAYA SEAL H#3232
+"DATA",176.112,35649,1)
+489802^^Y
+"DATA",176.112,35650,0)
+4010857^POUCH,DRAINABLE,KARAYA SEAL H#3233
+"DATA",176.112,35650,1)
+489803^^Y
+"DATA",176.112,35651,0)
+4010859^POUCH,DRAINABLE,KARAYA SEAL H#3234
+"DATA",176.112,35651,1)
+489804^^Y
+"DATA",176.112,35652,0)
+4010856^POUCH,DRAINABLE,KARAYA SEAL H#3238
+"DATA",176.112,35652,1)
+489805^^Y
+"DATA",176.112,35653,0)
+4010858^POUCH,DRAINABLE,KARAYA SEAL H#3239
+"DATA",176.112,35653,1)
+489806^^Y
+"DATA",176.112,35654,0)
+4010872^POUCH,DRAINABLE,KARAYA SEAL H#3272
+"DATA",176.112,35654,1)
+489807^^Y
+"DATA",176.112,35655,0)
+4010778^POUCH,DRAINABLE,KARAYA SEAL H#3273
+"DATA",176.112,35655,1)
+489808^^Y
+"DATA",176.112,35656,0)
+4010873^POUCH,DRAINABLE,KARAYA SEAL H#3274
+"DATA",176.112,35656,1)
+489809^^Y
+"DATA",176.112,35657,0)
+4010874^POUCH,DRAINABLE,KARAYA SEAL H#3275
+"DATA",176.112,35657,1)
+489810^^Y
+"DATA",176.112,35658,0)
+4010875^POUCH,DRAINABLE,KARAYA SEAL H#3276
+"DATA",176.112,35658,1)
+489811^^Y
+"DATA",176.112,35659,0)
+4010777^POUCH,DRAINABLE,KARAYA SEAL H#3278
+"DATA",176.112,35659,1)
+489812^^Y
+"DATA",176.112,35660,0)
+4010779^POUCH,DRAINABLE,KARAYA SEAL H#3279
+"DATA",176.112,35660,1)
+489813^^Y
+"DATA",176.112,35661,0)
+4010886^POUCH,DRAINABLE,KARAYA SEAL H#7212
+"DATA",176.112,35661,1)
+489814^^Y
+"DATA",176.112,35662,0)
+4010888^POUCH,DRAINABLE,KARAYA SEAL H#7213
+"DATA",176.112,35662,1)
+489815^^Y
+"DATA",176.112,35663,0)
+4010890^POUCH,DRAINABLE,KARAYA SEAL H#7214
+"DATA",176.112,35663,1)
+489816^^Y
+"DATA",176.112,35664,0)
+4010891^POUCH,DRAINABLE,KARAYA SEAL H#7215
+"DATA",176.112,35664,1)
+489817^^Y
+"DATA",176.112,35665,0)
+4010892^POUCH,DRAINABLE,KARAYA SEAL H#7216
+"DATA",176.112,35665,1)
+489818^^Y
+"DATA",176.112,35666,0)
+4010887^POUCH,DRAINABLE,KARAYA SEAL H#7218
+"DATA",176.112,35666,1)
+489819^^Y
+"DATA",176.112,35667,0)
+4010889^POUCH,DRAINABLE,KARAYA SEAL H#7219
+"DATA",176.112,35667,1)
+489820^^Y
+"DATA",176.112,35668,0)
+4010876^POUCH,DRAINABLE,KARAYA SEAL H#7222
+"DATA",176.112,35668,1)
+489821^^Y
+"DATA",176.112,35669,0)
+4010780^POUCH,DRAINABLE,KARAYA SEAL H#7223
+"DATA",176.112,35669,1)
+489822^^Y
+"DATA",176.112,35670,0)
+4010878^POUCH,DRAINABLE,KARAYA SEAL H#7224
+"DATA",176.112,35670,1)
+489823^^Y
+"DATA",176.112,35671,0)
+4010879^POUCH,DRAINABLE,KARAYA SEAL H#7225
+"DATA",176.112,35671,1)
+489824^^Y
+"DATA",176.112,35672,0)
+4010880^POUCH,DRAINABLE,KARAYA SEAL H#7226
+"DATA",176.112,35672,1)
+489825^^Y
+"DATA",176.112,35673,0)
+4010877^POUCH,DRAINABLE,KARAYA SEAL H#7228
+"DATA",176.112,35673,1)
+489826^^Y
+"DATA",176.112,35674,0)
+4010781^POUCH,DRAINABLE,KARAYA SEAL H#7229
+"DATA",176.112,35674,1)
+489827^^Y
+"DATA",176.112,35675,0)
+4010881^POUCH,DRAINABLE,KARAYA SEAL H#7272
+"DATA",176.112,35675,1)
+489828^^Y
+"DATA",176.112,35676,0)
+4010783^POUCH,DRAINABLE,KARAYA SEAL H#7273
+"DATA",176.112,35676,1)
+489829^^Y
+"DATA",176.112,35677,0)
+4010883^POUCH,DRAINABLE,KARAYA SEAL H#7274
+"DATA",176.112,35677,1)
+489830^^Y
+"DATA",176.112,35678,0)
+4010884^POUCH,DRAINABLE,KARAYA SEAL H#7275
+"DATA",176.112,35678,1)
+489831^^Y
+"DATA",176.112,35679,0)
+4010885^POUCH,DRAINABLE,KARAYA SEAL H#7276
+"DATA",176.112,35679,1)
+489832^^Y
+"DATA",176.112,35680,0)
+4010782^POUCH,DRAINABLE,KARAYA SEAL H#7278
+"DATA",176.112,35680,1)
+489833^^Y
+"DATA",176.112,35681,0)
+4010882^POUCH,DRAINABLE,KARAYA SEAL H#7279
+"DATA",176.112,35681,1)
+489834^^Y
+"DATA",176.112,35682,0)
+4010893^POUCH,DRAINABLE,KARAYA SEAL H#7282
+"DATA",176.112,35682,1)
+489835^^Y
+"DATA",176.112,35683,0)
+4010894^POUCH,DRAINABLE,KARAYA SEAL H#7283
+"DATA",176.112,35683,1)
+489836^^Y
+"DATA",176.112,35684,0)
+4010896^POUCH,DRAINABLE,KARAYA SEAL H#7284
+"DATA",176.112,35684,1)
+489837^^Y
+"DATA",176.112,35685,0)
+4010897^POUCH,DRAINABLE,KARAYA SEAL H#7285
+"DATA",176.112,35685,1)
+489838^^Y
+"DATA",176.112,35686,0)
+4010898^POUCH,DRAINABLE,KARAYA SEAL H#7286
+"DATA",176.112,35686,1)
+489839^^Y
+"DATA",176.112,35687,0)
+4010784^POUCH,DRAINABLE,KARAYA SEAL H#7288
+"DATA",176.112,35687,1)
+489840^^Y
+"DATA",176.112,35688,0)
+4010895^POUCH,DRAINABLE,KARAYA SEAL H#7289
+"DATA",176.112,35688,1)
+489841^^Y
+"DATA",176.112,35689,0)
+4014374^POUCH,DRAINABLE,NEW IMAGE H#18102
+"DATA",176.112,35689,1)
+489842^^Y
+"DATA",176.112,35690,0)
+4015534^POUCH,DRAINABLE,NEW IMAGE H#18103
+"DATA",176.112,35690,1)
+489843^^Y
+"DATA",176.112,35691,0)
+4014375^POUCH,DRAINABLE,NEW IMAGE H#18104
+"DATA",176.112,35691,1)
+489844^^Y
+"DATA",176.112,35692,0)
+4014376^POUCH,DRAINABLE,NEW IMAGE H#18122
+"DATA",176.112,35692,1)
+489845^^Y
+"DATA",176.112,35693,0)
+4015894^POUCH,DRAINABLE,NEW IMAGE H#18123
+"DATA",176.112,35693,1)
+489846^^Y
+"DATA",176.112,35694,0)
+4014377^POUCH,DRAINABLE,NEW IMAGE H#18124
+"DATA",176.112,35694,1)
+489847^^Y
+"DATA",176.112,35695,0)
+4016394^POUCH,DRAINABLE,NEW IMAGE H#18142
+"DATA",176.112,35695,1)
+489848^^Y
+"DATA",176.112,35696,0)
+4016395^POUCH,DRAINABLE,NEW IMAGE H#18143
+"DATA",176.112,35696,1)
+489849^^Y
+"DATA",176.112,35697,0)
+4016396^POUCH,DRAINABLE,NEW IMAGE H#18144
+"DATA",176.112,35697,1)
+489850^^Y
+"DATA",176.112,35698,0)
+4014380^POUCH,DRAINABLE,NEW IMAGE H#18202
+"DATA",176.112,35698,1)
+489851^^Y
+"DATA",176.112,35699,0)
+4015896^POUCH,DRAINABLE,NEW IMAGE H#18203
+"DATA",176.112,35699,1)
+489852^^Y
+"DATA",176.112,35700,0)
+4014381^POUCH,DRAINABLE,NEW IMAGE H#18204
+"DATA",176.112,35700,1)
+489853^^Y
+"DATA",176.112,35701,0)
+4011165^POUCH,DRAINABLE,NU-HOPE #40-7235-DC-SP
+"DATA",176.112,35701,1)
+489854^^Y
+"DATA",176.112,35702,0)
+4010960^POUCH,DRAINABLE,PEDIATRIC H#9765
+"DATA",176.112,35702,1)
+489855^^Y
+"DATA",176.112,35703,0)
+4010961^POUCH,DRAINABLE,PEDIATRIC H#9766
+"DATA",176.112,35703,1)
+489856^^Y
+"DATA",176.112,35704,0)
+4013412^POUCH,DRAINABLE,PEDIATRIC H#9768
+"DATA",176.112,35704,1)
+489857^^Y
+"DATA",176.112,35705,0)
+4015252^POUCH,DRAINABLE,PEDIATRIC H#9769
+"DATA",176.112,35705,1)
+489858^^Y
+"DATA",176.112,35706,0)
+4016178^POUCH,DRAINABLE,POST-OP COLOPLAST #6818
+"DATA",176.112,35706,1)
+489859^^Y
+"DATA",176.112,35707,0)
+4016179^POUCH,DRAINABLE,POST-OP COLOPLAST #6820
+"DATA",176.112,35707,1)
+489860^^Y
+"DATA",176.112,35708,0)
+4010963^POUCH,DRAINABLE,POST-OPERATIVE H#9760
+"DATA",176.112,35708,1)
+489861^^Y
+"DATA",176.112,35709,0)
+4010962^POUCH,DRAINABLE,POST-OPERATIVE H#9762
+"DATA",176.112,35709,1)
+489862^^Y
+"DATA",176.112,35710,0)
+4011082^POUCH,DRAINABLE,PREMIER H#8610
+"DATA",176.112,35710,1)
+489863^^Y
+"DATA",176.112,35711,0)
+4011092^POUCH,DRAINABLE,PREMIER H#8611
+"DATA",176.112,35711,1)
+489864^^Y
+"DATA",176.112,35712,0)
+4011106^POUCH,DRAINABLE,PREMIER H#8612
+"DATA",176.112,35712,1)
+489865^^Y
+"DATA",176.112,35713,0)
+4011083^POUCH,DRAINABLE,PREMIER H#8613
+"DATA",176.112,35713,1)
+489866^^Y
+"DATA",176.112,35714,0)
+4011107^POUCH,DRAINABLE,PREMIER H#8614
+"DATA",176.112,35714,1)
+489867^^Y
+"DATA",176.112,35715,0)
+4011108^POUCH,DRAINABLE,PREMIER H#8615
+"DATA",176.112,35715,1)
+489868^^Y
+"DATA",176.112,35716,0)
+4011109^POUCH,DRAINABLE,PREMIER H#8616
+"DATA",176.112,35716,1)
+489869^^Y
+"DATA",176.112,35717,0)
+4011110^POUCH,DRAINABLE,PREMIER H#8617
+"DATA",176.112,35717,1)
+489870^^Y
+"DATA",176.112,35718,0)
+4011111^POUCH,DRAINABLE,PREMIER H#8618
+"DATA",176.112,35718,1)
+489871^^Y
+"DATA",176.112,35719,0)
+4011112^POUCH,DRAINABLE,PREMIER H#8619
+"DATA",176.112,35719,1)
+489872^^Y
+"DATA",176.112,35720,0)
+4011105^POUCH,DRAINABLE,PREMIER H#86211
+"DATA",176.112,35720,1)
+489873^^Y
+"DATA",176.112,35721,0)
+4011103^POUCH,DRAINABLE,PREMIER H#8624
+"DATA",176.112,35721,1)
+489874^^Y
+"DATA",176.112,35722,0)
+4011104^POUCH,DRAINABLE,PREMIER H#8628
+"DATA",176.112,35722,1)
+489875^^Y
+"DATA",176.112,35723,0)
+4011084^POUCH,DRAINABLE,PREMIER H#8631
+"DATA",176.112,35723,1)
+489876^^Y
+"DATA",176.112,35724,0)
+4011100^POUCH,DRAINABLE,PREMIER H#8632
+"DATA",176.112,35724,1)
+489877^^Y
+"DATA",176.112,35725,0)
+4011085^POUCH,DRAINABLE,PREMIER H#8633
+"DATA",176.112,35725,1)
+489878^^Y
+"DATA",176.112,35726,0)
+4011101^POUCH,DRAINABLE,PREMIER H#8634
+"DATA",176.112,35726,1)
+489879^^Y
+"DATA",176.112,35727,0)
+4011102^POUCH,DRAINABLE,PREMIER H#8635
+"DATA",176.112,35727,1)
+489880^^Y
+"DATA",176.112,35728,0)
+4011099^POUCH,DRAINABLE,PREMIER H#8637
+"DATA",176.112,35728,1)
+489881^^Y
+"DATA",176.112,35729,0)
+4011086^POUCH,DRAINABLE,PREMIER H#8638
+"DATA",176.112,35729,1)
+489882^^Y
+"DATA",176.112,35730,0)
+4011087^POUCH,DRAINABLE,PREMIER H#8639
+"DATA",176.112,35730,1)
+489883^^Y
+"DATA",176.112,35731,0)
+4011089^POUCH,DRAINABLE,PREMIER H#8817
+"DATA",176.112,35731,1)
+489884^^Y
+"DATA",176.112,35732,0)
+4010802^POUCH,DRAINABLE,PREMIUM H#3602
+"DATA",176.112,35732,1)
+489885^^Y
+"DATA",176.112,35733,0)
+4010760^POUCH,DRAINABLE,PREMIUM H#3603
+"DATA",176.112,35733,1)
+489886^^Y
+"DATA",176.112,35734,0)
+4010805^POUCH,DRAINABLE,PREMIUM H#3604
+"DATA",176.112,35734,1)
+489887^^Y
+"DATA",176.112,35735,0)
+4010806^POUCH,DRAINABLE,PREMIUM H#3605
+"DATA",176.112,35735,1)
+489888^^Y
+"DATA",176.112,35736,0)
+4010807^POUCH,DRAINABLE,PREMIUM H#3606
+"DATA",176.112,35736,1)
+489889^^Y
+"DATA",176.112,35737,0)
+4010803^POUCH,DRAINABLE,PREMIUM H#3608
+"DATA",176.112,35737,1)
+489890^^Y
+"DATA",176.112,35738,0)
+4010804^POUCH,DRAINABLE,PREMIUM H#3609
+"DATA",176.112,35738,1)
+489891^^Y
+"DATA",176.112,35739,0)
+4010813^POUCH,DRAINABLE,PREMIUM H#3642
+"DATA",176.112,35739,1)
+489892^^Y
+"DATA",176.112,35740,0)
+4010815^POUCH,DRAINABLE,PREMIUM H#3643
+"DATA",176.112,35740,1)
+489893^^Y
+"DATA",176.112,35741,0)
+4010762^POUCH,DRAINABLE,PREMIUM H#3644
+"DATA",176.112,35741,1)
+489894^^Y
+"DATA",176.112,35742,0)
+4010817^POUCH,DRAINABLE,PREMIUM H#3645
+"DATA",176.112,35742,1)
+489895^^Y
+"DATA",176.112,35743,0)
+4010814^POUCH,DRAINABLE,PREMIUM H#3648
+"DATA",176.112,35743,1)
+489896^^Y
+"DATA",176.112,35744,0)
+4010816^POUCH,DRAINABLE,PREMIUM H#3649
+"DATA",176.112,35744,1)
+489897^^Y
+"DATA",176.112,35745,0)
+4010808^POUCH,DRAINABLE,PREMIUM H#3662
+"DATA",176.112,35745,1)
+489898^^Y
+"DATA",176.112,35746,0)
+4010761^POUCH,DRAINABLE,PREMIUM H#3663
+"DATA",176.112,35746,1)
+489899^^Y
+"DATA",176.112,35747,0)
+4010811^POUCH,DRAINABLE,PREMIUM H#3664
+"DATA",176.112,35747,1)
+489900^^Y
+"DATA",176.112,35748,0)
+4010812^POUCH,DRAINABLE,PREMIUM H#3665
+"DATA",176.112,35748,1)
+489901^^Y
+"DATA",176.112,35749,0)
+4010809^POUCH,DRAINABLE,PREMIUM H#3668
+"DATA",176.112,35749,1)
+489902^^Y
+"DATA",176.112,35750,0)
+4010810^POUCH,DRAINABLE,PREMIUM H#3669
+"DATA",176.112,35750,1)
+489903^^Y
+"DATA",176.112,35751,0)
+4010899^POUCH,DRAINABLE,SECURE H#3002
+"DATA",176.112,35751,1)
+489904^^Y
+"DATA",176.112,35752,0)
+4010901^POUCH,DRAINABLE,SECURE H#3003
+"DATA",176.112,35752,1)
+489905^^Y
+"DATA",176.112,35753,0)
+4010903^POUCH,DRAINABLE,SECURE H#3004
+"DATA",176.112,35753,1)
+489906^^Y
+"DATA",176.112,35754,0)
+4010904^POUCH,DRAINABLE,SECURE H#3005
+"DATA",176.112,35754,1)
+489907^^Y
+"DATA",176.112,35755,0)
+4010900^POUCH,DRAINABLE,SECURE H#3008
+"DATA",176.112,35755,1)
+489908^^Y
+"DATA",176.112,35756,0)
+4010902^POUCH,DRAINABLE,SECURE H#3009
+"DATA",176.112,35756,1)
+489909^^Y
+"DATA",176.112,35757,0)
+4010905^POUCH,DRAINABLE,SECURE H#3042
+"DATA",176.112,35757,1)
+489910^^Y
+"DATA",176.112,35758,0)
+4010907^POUCH,DRAINABLE,SECURE H#3043
+"DATA",176.112,35758,1)
+489911^^Y
+"DATA",176.112,35759,0)
+4010909^POUCH,DRAINABLE,SECURE H#3044
+"DATA",176.112,35759,1)
+489912^^Y
+"DATA",176.112,35760,0)
+4010910^POUCH,DRAINABLE,SECURE H#3045
+"DATA",176.112,35760,1)
+489913^^Y
+"DATA",176.112,35761,0)
+4010906^POUCH,DRAINABLE,SECURE H#3048
+"DATA",176.112,35761,1)
+489914^^Y
+"DATA",176.112,35762,0)
+4010908^POUCH,DRAINABLE,SECURE H#3049
+"DATA",176.112,35762,1)
+489915^^Y
+"DATA",176.112,35763,0)
+4010698^POUCH,DRAINABLE,SUR-FIT C#0223-53
+"DATA",176.112,35763,1)
+489916^^Y
+"DATA",176.112,35764,0)
+4011204^POUCH,DRAINABLE,SUR-FIT C#0254-34
+"DATA",176.112,35764,1)
+489917^^Y
+"DATA",176.112,35765,0)
+4011205^POUCH,DRAINABLE,SUR-FIT C#0254-35
+"DATA",176.112,35765,1)
+489918^^Y
+"DATA",176.112,35766,0)
+4011206^POUCH,DRAINABLE,SUR-FIT C#0254-36
+"DATA",176.112,35766,1)
+489919^^Y
+"DATA",176.112,35767,0)
+4010704^POUCH,DRAINABLE,SUR-FIT C#0254-70
+"DATA",176.112,35767,1)
+489920^^Y
+"DATA",176.112,35768,0)
+4010705^POUCH,DRAINABLE,SUR-FIT C#0254-71
+"DATA",176.112,35768,1)
+489921^^Y
+"DATA",176.112,35769,0)
+4010706^POUCH,DRAINABLE,SUR-FIT C#0254-72
+"DATA",176.112,35769,1)
+489922^^Y
+"DATA",176.112,35770,0)
+4010707^POUCH,DRAINABLE,SUR-FIT C#0254-73
+"DATA",176.112,35770,1)
+489923^^Y
+"DATA",176.112,35771,0)
+4010708^POUCH,DRAINABLE,SUR-FIT C#0254-74
+"DATA",176.112,35771,1)
+489924^^Y
+"DATA",176.112,35772,0)
+4010699^POUCH,DRAINABLE,SUR-FIT C#0254-75
+"DATA",176.112,35772,1)
+489925^^Y
+"DATA",176.112,35773,0)
+4010700^POUCH,DRAINABLE,SUR-FIT C#0254-76
+"DATA",176.112,35773,1)
+489926^^Y
+"DATA",176.112,35774,0)
+4010701^POUCH,DRAINABLE,SUR-FIT C#0254-77
+"DATA",176.112,35774,1)
+489927^^Y
+"DATA",176.112,35775,0)
+4010702^POUCH,DRAINABLE,SUR-FIT C#0254-78
+"DATA",176.112,35775,1)
+489928^^Y
+"DATA",176.112,35776,0)
+4010703^POUCH,DRAINABLE,SUR-FIT C#0254-79
+"DATA",176.112,35776,1)
+489929^^Y
+"DATA",176.112,35777,0)
+4010728^POUCH,DRAINABLE,SUR-FIT C#0256-30
+"DATA",176.112,35777,1)
+489930^^Y
+"DATA",176.112,35778,0)
+4010729^POUCH,DRAINABLE,SUR-FIT C#0256-31
+"DATA",176.112,35778,1)
+489931^^Y
+"DATA",176.112,35779,0)
+4010730^POUCH,DRAINABLE,SUR-FIT C#0256-32
+"DATA",176.112,35779,1)
+489932^^Y
+"DATA",176.112,35780,0)
+4010731^POUCH,DRAINABLE,SUR-FIT C#0256-33
+"DATA",176.112,35780,1)
+489933^^Y
+"DATA",176.112,35781,0)
+4010727^POUCH,DRAINABLE,SUR-FIT C#0256-39
+"DATA",176.112,35781,1)
+489934^^Y
+"DATA",176.112,35782,0)
+4010718^POUCH,DRAINABLE,SUR-FIT C#0256-40
+"DATA",176.112,35782,1)
+489935^^Y
+"DATA",176.112,35783,0)
+4010719^POUCH,DRAINABLE,SUR-FIT C#0256-41
+"DATA",176.112,35783,1)
+489936^^Y
+"DATA",176.112,35784,0)
+4010720^POUCH,DRAINABLE,SUR-FIT C#0256-42
+"DATA",176.112,35784,1)
+489937^^Y
+"DATA",176.112,35785,0)
+4010721^POUCH,DRAINABLE,SUR-FIT C#0256-43
+"DATA",176.112,35785,1)
+489938^^Y
+"DATA",176.112,35786,0)
+4010717^POUCH,DRAINABLE,SUR-FIT C#0256-49
+"DATA",176.112,35786,1)
+489939^^Y
+"DATA",176.112,35787,0)
+4010723^POUCH,DRAINABLE,SUR-FIT C#0256-90
+"DATA",176.112,35787,1)
+489940^^Y
+"DATA",176.112,35788,0)
+4010724^POUCH,DRAINABLE,SUR-FIT C#0256-91
+"DATA",176.112,35788,1)
+489941^^Y
+"DATA",176.112,35789,0)
+4010725^POUCH,DRAINABLE,SUR-FIT C#0256-92
+"DATA",176.112,35789,1)
+489942^^Y
+"DATA",176.112,35790,0)
+4010726^POUCH,DRAINABLE,SUR-FIT C#0256-93
+"DATA",176.112,35790,1)
+489943^^Y
+"DATA",176.112,35791,0)
+4010722^POUCH,DRAINABLE,SUR-FIT C#0256-99
+"DATA",176.112,35791,1)
+489944^^Y
+"DATA",176.112,35792,0)
+4011167^POUCH,DRAINABLE,SUR-FIT C#1253-06
+"DATA",176.112,35792,1)
+489945^^Y
+"DATA",176.112,35793,0)
+4011166^POUCH,DRAINABLE,SUR-FIT C#1253-07
+"DATA",176.112,35793,1)
+489946^^Y
+"DATA",176.112,35794,0)
+4011168^POUCH,DRAINABLE,SUR-FIT C#1253-08
+"DATA",176.112,35794,1)
+489947^^Y
+"DATA",176.112,35795,0)
+4011179^POUCH,DRAINABLE,SUR-FIT C#4015-00
+"DATA",176.112,35795,1)
+489948^^Y
+"DATA",176.112,35796,0)
+4011180^POUCH,DRAINABLE,SUR-FIT C#4015-01
+"DATA",176.112,35796,1)
+489949^^Y
+"DATA",176.112,35797,0)
+4011181^POUCH,DRAINABLE,SUR-FIT C#4015-02
+"DATA",176.112,35797,1)
+489950^^Y
+"DATA",176.112,35798,0)
+4011182^POUCH,DRAINABLE,SUR-FIT C#4015-03
+"DATA",176.112,35798,1)
+489951^^Y
+"DATA",176.112,35799,0)
+4011183^POUCH,DRAINABLE,SUR-FIT C#4015-04
+"DATA",176.112,35799,1)
+489952^^Y
+"DATA",176.112,35800,0)
+4011174^POUCH,DRAINABLE,SUR-FIT C#4015-05
+"DATA",176.112,35800,1)
+489953^^Y
+"DATA",176.112,35801,0)
+4011175^POUCH,DRAINABLE,SUR-FIT C#4015-06
+"DATA",176.112,35801,1)
+489954^^Y
+"DATA",176.112,35802,0)
+4011176^POUCH,DRAINABLE,SUR-FIT C#4015-07
+"DATA",176.112,35802,1)
+489955^^Y
+"DATA",176.112,35803,0)
+4011177^POUCH,DRAINABLE,SUR-FIT C#4015-08
+"DATA",176.112,35803,1)
+489956^^Y
+"DATA",176.112,35804,0)
+4011178^POUCH,DRAINABLE,SUR-FIT C#4015-09
+"DATA",176.112,35804,1)
+489957^^Y
+"DATA",176.112,35805,0)
+4011184^POUCH,DRAINABLE,SUR-FIT C#4015-10
+"DATA",176.112,35805,1)
+489958^^Y
+"DATA",176.112,35806,0)
+4011185^POUCH,DRAINABLE,SUR-FIT C#4015-11
+"DATA",176.112,35806,1)
+489959^^Y
+"DATA",176.112,35807,0)
+4011186^POUCH,DRAINABLE,SUR-FIT C#4015-12
+"DATA",176.112,35807,1)
+489960^^Y
+"DATA",176.112,35808,0)
+4011187^POUCH,DRAINABLE,SUR-FIT C#4015-13
+"DATA",176.112,35808,1)
+489961^^Y
+"DATA",176.112,35809,0)
+4011188^POUCH,DRAINABLE,SUR-FIT C#4015-14
+"DATA",176.112,35809,1)
+489962^^Y
+"DATA",176.112,35810,0)
+4013860^POUCH,DRAINABLE,SUR-FIT C#4015-15
+"DATA",176.112,35810,1)
+489963^^Y
+"DATA",176.112,35811,0)
+4013625^POUCH,DRAINABLE,SUR-FIT C#4015-57
+"DATA",176.112,35811,1)
+489964^^Y
+"DATA",176.112,35812,0)
+4013626^POUCH,DRAINABLE,SUR-FIT C#4015-58
+"DATA",176.112,35812,1)
+489965^^Y
+"DATA",176.112,35813,0)
+4013628^POUCH,DRAINABLE,SUR-FIT C#4015-59
+"DATA",176.112,35813,1)
+489966^^Y
+"DATA",176.112,35814,0)
+4013857^POUCH,DRAINABLE,SUR-FIT C#4019-20
+"DATA",176.112,35814,1)
+489967^^Y
+"DATA",176.112,35815,0)
+4013858^POUCH,DRAINABLE,SUR-FIT C#4019-21
+"DATA",176.112,35815,1)
+489968^^Y
+"DATA",176.112,35816,0)
+4013859^POUCH,DRAINABLE,SUR-FIT C#4019-22
+"DATA",176.112,35816,1)
+489969^^Y
+"DATA",176.112,35817,0)
+4013615^POUCH,DRAINABLE,SUR-FIT C#4019-32
+"DATA",176.112,35817,1)
+489970^^Y
+"DATA",176.112,35818,0)
+4013617^POUCH,DRAINABLE,SUR-FIT C#4019-33
+"DATA",176.112,35818,1)
+489971^^Y
+"DATA",176.112,35819,0)
+4013620^POUCH,DRAINABLE,SUR-FIT C#4019-34
+"DATA",176.112,35819,1)
+489972^^Y
+"DATA",176.112,35820,0)
+4013623^POUCH,DRAINABLE,SUR-FIT C#4019-35
+"DATA",176.112,35820,1)
+489973^^Y
+"DATA",176.112,35821,0)
+4013624^POUCH,DRAINABLE,SUR-FIT C#4019-36
+"DATA",176.112,35821,1)
+489974^^Y
+"DATA",176.112,35822,0)
+4014615^POUCH,DRAINABLE,SUR-FIT,1-3/4IN C#4014-35
+"DATA",176.112,35822,1)
+489975^^Y
+"DATA",176.112,35823,0)
+4014619^POUCH,DRAINABLE,SUR-FIT,1-3/4IN C#4014-40
+"DATA",176.112,35823,1)
+489976^^Y
+"DATA",176.112,35824,0)
+4014614^POUCH,DRAINABLE,SUR-FIT,1-3/8IN C#4014-34
+"DATA",176.112,35824,1)
+489977^^Y
+"DATA",176.112,35825,0)
+4014618^POUCH,DRAINABLE,SUR-FIT,1-3/8IN C#4014-39
+"DATA",176.112,35825,1)
+489978^^Y
+"DATA",176.112,35826,0)
+4014616^POUCH,DRAINABLE,SUR-FIT,2-1/4IN C#4014-36
+"DATA",176.112,35826,1)
+489979^^Y
+"DATA",176.112,35827,0)
+4014620^POUCH,DRAINABLE,SUR-FIT,2-1/4IN C#4014-41
+"DATA",176.112,35827,1)
+489980^^Y
+"DATA",176.112,35828,0)
+4014617^POUCH,DRAINABLE,SUR-FIT,2-3/4IN C#4014-37
+"DATA",176.112,35828,1)
+489981^^Y
+"DATA",176.112,35829,0)
+4014621^POUCH,DRAINABLE,SUR-FIT,2-3/4IN C#4014-42
+"DATA",176.112,35829,1)
+489982^^Y
+"DATA",176.112,35830,0)
+4014622^POUCH,DRAINABLE,SUR-FIT,4IN C#4014-43
+"DATA",176.112,35830,1)
+489983^^Y
+"DATA",176.112,35831,0)
+4015096^POUCH,DRAINABLE,ULTRALITE 1-1/2IN MARLEN #55302
+"DATA",176.112,35831,1)
+489984^^Y
+"DATA",176.112,35832,0)
+4015094^POUCH,DRAINABLE,ULTRALITE 1-1/4IN MARLEN #55300
+"DATA",176.112,35832,1)
+489985^^Y
+"DATA",176.112,35833,0)
+4015098^POUCH,DRAINABLE,ULTRALITE 1-3/4IN MARLEN #55304
+"DATA",176.112,35833,1)
+489986^^Y
+"DATA",176.112,35834,0)
+4015095^POUCH,DRAINABLE,ULTRALITE 1-3/8IN MARLEN #55301
+"DATA",176.112,35834,1)
+489987^^Y
+"DATA",176.112,35835,0)
+4015097^POUCH,DRAINABLE,ULTRALITE 1-5/8IN MARLEN #55303
+"DATA",176.112,35835,1)
+489988^^Y
+"DATA",176.112,35836,0)
+4015192^POUCH,DRAINBLE,CONTOUR I CTF H#1620
+"DATA",176.112,35836,1)
+489989^^Y
+"DATA",176.112,35837,0)
+4016225^POUCH,EAKIN,WOUND,FISTULA DRAINAGE C#8392-11
+"DATA",176.112,35837,1)
+489990^^Y
+"DATA",176.112,35838,0)
+4016496^POUCH,EAKIN,WOUND,FISTULA DRAINAGE C#8392-22
+"DATA",176.112,35838,1)
+489991^^Y
+"DATA",176.112,35839,0)
+4012235^POUCH,FEMALE INCONTINENCE H#9840
+"DATA",176.112,35839,1)
+489992^^Y
+"DATA",176.112,35840,0)
+4011169^POUCH,FLUSHABLE,ACTIVE LIFE C#6505-59
+"DATA",176.112,35840,1)
+489993^^Y
+"DATA",176.112,35841,0)
+4011170^POUCH,FLUSHABLE,ACTIVE LIFE C#6505-60
+"DATA",176.112,35841,1)
+489994^^Y
+"DATA",176.112,35842,0)
+4011171^POUCH,FLUSHABLE,ACTIVE LIFE C#6505-61
+"DATA",176.112,35842,1)
+489995^^Y
+"DATA",176.112,35843,0)
+4011172^POUCH,FLUSHABLE,ACTIVE LIFE C#6505-62
+"DATA",176.112,35843,1)
+489996^^Y
+"DATA",176.112,35844,0)
+4011173^POUCH,FLUSHABLE,ACTIVE LIFE C#6505-63
+"DATA",176.112,35844,1)
+489997^^Y
+"DATA",176.112,35845,0)
+4011384^POUCH,GENTLE TOUCH SYSTEM C#0209-29
+"DATA",176.112,35845,1)
+489998^^Y
+"DATA",176.112,35846,0)
+4011385^POUCH,GENTLE TOUCH SYSTEM C#0209-30
+"DATA",176.112,35846,1)
+489999^^Y
+"DATA",176.112,35847,0)
+4011207^POUCH,GENTLE TOUCH SYSTEM C#0209-31
+"DATA",176.112,35847,1)
+490000^^Y
+"DATA",176.112,35848,0)
+4011208^POUCH,GENTLE TOUCH SYSTEM C#0209-32
+"DATA",176.112,35848,1)
+490001^^Y
+"DATA",176.112,35849,0)
+4011386^POUCH,GENTLE TOUCH SYSTEM C#0209-33
+"DATA",176.112,35849,1)
+490002^^Y
+"DATA",176.112,35850,0)
+4011387^POUCH,GENTLE TOUCH SYSTEM C#0209-34
+"DATA",176.112,35850,1)
+490003^^Y
+"DATA",176.112,35851,0)
+4011388^POUCH,GENTLE TOUCH SYSTEM C#0209-35
+"DATA",176.112,35851,1)
+490004^^Y
+"DATA",176.112,35852,0)
+4011389^POUCH,GENTLE TOUCH SYSTEM C#0209-36
+"DATA",176.112,35852,1)
+490005^^Y
+"DATA",176.112,35853,0)
+4011209^POUCH,GENTLE TOUCH SYSTEM C#0209-37
+"DATA",176.112,35853,1)
+490006^^Y
+"DATA",176.112,35854,0)
+4011210^POUCH,GENTLE TOUCH SYSTEM C#0209-38
+"DATA",176.112,35854,1)
+490007^^Y
+"DATA",176.112,35855,0)
+4011211^POUCH,GENTLE TOUCH SYSTEM C#0209-39
+"DATA",176.112,35855,1)
+490008^^Y
+"DATA",176.112,35856,0)
+4011156^POUCH,LOOP OSTOMY H#7346
+"DATA",176.112,35856,1)
+490009^^Y
+"DATA",176.112,35857,0)
+4011157^POUCH,LOOP OSTOMY H#7347
+"DATA",176.112,35857,1)
+490010^^Y
+"DATA",176.112,35858,0)
+4011080^POUCH,MINI,CLOSED H#3352
+"DATA",176.112,35858,1)
+490011^^Y
+"DATA",176.112,35859,0)
+4011136^POUCH,MINI,CLOSED H#3353
+"DATA",176.112,35859,1)
+490012^^Y
+"DATA",176.112,35860,0)
+4011135^POUCH,MINI,CLOSED H#3357
+"DATA",176.112,35860,1)
+490013^^Y
+"DATA",176.112,35861,0)
+4010972^POUCH,MINI,CLOSED H#7132
+"DATA",176.112,35861,1)
+490014^^Y
+"DATA",176.112,35862,0)
+4010974^POUCH,MINI,CLOSED H#7133
+"DATA",176.112,35862,1)
+490015^^Y
+"DATA",176.112,35863,0)
+4011010^POUCH,MINI,CLOSED H#7134
+"DATA",176.112,35863,1)
+490016^^Y
+"DATA",176.112,35864,0)
+4010785^POUCH,MINI,CLOSED H#7135
+"DATA",176.112,35864,1)
+490017^^Y
+"DATA",176.112,35865,0)
+4010976^POUCH,MINI,CLOSED H#7136
+"DATA",176.112,35865,1)
+490018^^Y
+"DATA",176.112,35866,0)
+4010973^POUCH,MINI,CLOSED H#7138
+"DATA",176.112,35866,1)
+490019^^Y
+"DATA",176.112,35867,0)
+4010975^POUCH,MINI,CLOSED H#7139
+"DATA",176.112,35867,1)
+490020^^Y
+"DATA",176.112,35868,0)
+4010977^POUCH,MINI,CLOSED,FILTER H#3142
+"DATA",176.112,35868,1)
+490021^^Y
+"DATA",176.112,35869,0)
+4010786^POUCH,MINI,CLOSED,FILTER H#3143
+"DATA",176.112,35869,1)
+490022^^Y
+"DATA",176.112,35870,0)
+4010980^POUCH,MINI,CLOSED,FILTER H#3144
+"DATA",176.112,35870,1)
+490023^^Y
+"DATA",176.112,35871,0)
+4010981^POUCH,MINI,CLOSED,FILTER H#3145
+"DATA",176.112,35871,1)
+490024^^Y
+"DATA",176.112,35872,0)
+4010982^POUCH,MINI,CLOSED,FILTER H#3146
+"DATA",176.112,35872,1)
+490025^^Y
+"DATA",176.112,35873,0)
+4010978^POUCH,MINI,CLOSED,FILTER H#3148
+"DATA",176.112,35873,1)
+490026^^Y
+"DATA",176.112,35874,0)
+4010979^POUCH,MINI,CLOSED,FILTER H#3149
+"DATA",176.112,35874,1)
+490027^^Y
+"DATA",176.112,35875,0)
+4011076^POUCH,MINI,CLOSED,FILTER H#3354
+"DATA",176.112,35875,1)
+490028^^Y
+"DATA",176.112,35876,0)
+4011011^POUCH,MINI,CLOSED,GUARDIAN H#4522
+"DATA",176.112,35876,1)
+490029^^Y
+"DATA",176.112,35877,0)
+4011012^POUCH,MINI,CLOSED,GUARDIAN H#4523
+"DATA",176.112,35877,1)
+490030^^Y
+"DATA",176.112,35878,0)
+4011013^POUCH,MINI,CLOSED,GUARDIAN H#4524
+"DATA",176.112,35878,1)
+490031^^Y
+"DATA",176.112,35879,0)
+4011014^POUCH,MINI,CLOSED,GUARDIAN H#4525
+"DATA",176.112,35879,1)
+490032^^Y
+"DATA",176.112,35880,0)
+4010713^POUCH,MINI,CLOSED,SUR-FIT C#0257-75
+"DATA",176.112,35880,1)
+490033^^Y
+"DATA",176.112,35881,0)
+4010714^POUCH,MINI,CLOSED,SUR-FIT C#0257-76
+"DATA",176.112,35881,1)
+490034^^Y
+"DATA",176.112,35882,0)
+4010715^POUCH,MINI,CLOSED,SUR-FIT C#0257-77
+"DATA",176.112,35882,1)
+490035^^Y
+"DATA",176.112,35883,0)
+4010716^POUCH,MINI,CLOSED,SUR-FIT C#0257-78
+"DATA",176.112,35883,1)
+490036^^Y
+"DATA",176.112,35884,0)
+4013629^POUCH,MINI,CLOSED,SUR-FIT C#4015-29
+"DATA",176.112,35884,1)
+490037^^Y
+"DATA",176.112,35885,0)
+4013630^POUCH,MINI,CLOSED,SUR-FIT C#4015-30
+"DATA",176.112,35885,1)
+490038^^Y
+"DATA",176.112,35886,0)
+4013638^POUCH,MINI,CLOSED,SUR-FIT C#4015-31
+"DATA",176.112,35886,1)
+490039^^Y
+"DATA",176.112,35887,0)
+4013639^POUCH,MINI,CLOSED,SUR-FIT C#4015-32
+"DATA",176.112,35887,1)
+490040^^Y
+"DATA",176.112,35888,0)
+4011081^POUCH,MINI,DRAINABLE H#3842
+"DATA",176.112,35888,1)
+490041^^Y
+"DATA",176.112,35889,0)
+4011114^POUCH,MINI,DRAINABLE H#3843
+"DATA",176.112,35889,1)
+490042^^Y
+"DATA",176.112,35890,0)
+4011115^POUCH,MINI,DRAINABLE H#3844
+"DATA",176.112,35890,1)
+490043^^Y
+"DATA",176.112,35891,0)
+4011113^POUCH,MINI,DRAINABLE H#3847
+"DATA",176.112,35891,1)
+490044^^Y
+"DATA",176.112,35892,0)
+4011124^POUCH,MINI,DRAINABLE H#3852
+"DATA",176.112,35892,1)
+490045^^Y
+"DATA",176.112,35893,0)
+4011125^POUCH,MINI,DRAINABLE H#3853
+"DATA",176.112,35893,1)
+490046^^Y
+"DATA",176.112,35894,0)
+4011126^POUCH,MINI,DRAINABLE H#3854
+"DATA",176.112,35894,1)
+490047^^Y
+"DATA",176.112,35895,0)
+4011123^POUCH,MINI,DRAINABLE H#3857
+"DATA",176.112,35895,1)
+490048^^Y
+"DATA",176.112,35896,0)
+4011093^POUCH,MINI,DRAINABLE H#8641
+"DATA",176.112,35896,1)
+490049^^Y
+"DATA",176.112,35897,0)
+4011091^POUCH,MINI,DRAINABLE H#8642
+"DATA",176.112,35897,1)
+490050^^Y
+"DATA",176.112,35898,0)
+4011096^POUCH,MINI,DRAINABLE H#8643
+"DATA",176.112,35898,1)
+490051^^Y
+"DATA",176.112,35899,0)
+4011098^POUCH,MINI,DRAINABLE H#8644
+"DATA",176.112,35899,1)
+490052^^Y
+"DATA",176.112,35900,0)
+4011094^POUCH,MINI,DRAINABLE H#8647
+"DATA",176.112,35900,1)
+490053^^Y
+"DATA",176.112,35901,0)
+4011095^POUCH,MINI,DRAINABLE H#8648
+"DATA",176.112,35901,1)
+490054^^Y
+"DATA",176.112,35902,0)
+4011097^POUCH,MINI,DRAINABLE H#8649
+"DATA",176.112,35902,1)
+490055^^Y
+"DATA",176.112,35903,0)
+4011116^POUCH,MINI,DRAINABLE H#8842
+"DATA",176.112,35903,1)
+490056^^Y
+"DATA",176.112,35904,0)
+4011117^POUCH,MINI,DRAINABLE H#8843
+"DATA",176.112,35904,1)
+490057^^Y
+"DATA",176.112,35905,0)
+4011118^POUCH,MINI,DRAINABLE H#8844
+"DATA",176.112,35905,1)
+490058^^Y
+"DATA",176.112,35906,0)
+4011090^POUCH,MINI,DRAINABLE H#8847
+"DATA",176.112,35906,1)
+490059^^Y
+"DATA",176.112,35907,0)
+4011031^POUCH,MINI,DRAINABLE,GUARDIAN H#4632
+"DATA",176.112,35907,1)
+490060^^Y
+"DATA",176.112,35908,0)
+4010794^POUCH,MINI,DRAINABLE,GUARDIAN H#4633
+"DATA",176.112,35908,1)
+490061^^Y
+"DATA",176.112,35909,0)
+4011032^POUCH,MINI,DRAINABLE,GUARDIAN H#4634
+"DATA",176.112,35909,1)
+490062^^Y
+"DATA",176.112,35910,0)
+4011033^POUCH,MINI,DRAINABLE,GUARDIAN H#4635
+"DATA",176.112,35910,1)
+490063^^Y
+"DATA",176.112,35911,0)
+4011022^POUCH,MINI,DRAINABLE,GUARDIAN H#4642
+"DATA",176.112,35911,1)
+490064^^Y
+"DATA",176.112,35912,0)
+4011023^POUCH,MINI,DRAINABLE,GUARDIAN H#4643
+"DATA",176.112,35912,1)
+490065^^Y
+"DATA",176.112,35913,0)
+4011024^POUCH,MINI,DRAINABLE,GUARDIAN H#4644
+"DATA",176.112,35913,1)
+490066^^Y
+"DATA",176.112,35914,0)
+4011025^POUCH,MINI,DRAINABLE,GUARDIAN H#4645
+"DATA",176.112,35914,1)
+490067^^Y
+"DATA",176.112,35915,0)
+4011053^POUCH,ODORPROOF PLASTIC SZ A TORBOT#233
+"DATA",176.112,35915,1)
+490068^^Y
+"DATA",176.112,35916,0)
+4011162^POUCH,OSTOMY BONGORT U#1150-06
+"DATA",176.112,35916,1)
+490069^^Y
+"DATA",176.112,35917,0)
+4010797^POUCH,OSTOMY H#3802
+"DATA",176.112,35917,1)
+490070^^Y
+"DATA",176.112,35918,0)
+4010798^POUCH,OSTOMY H#3803
+"DATA",176.112,35918,1)
+490071^^Y
+"DATA",176.112,35919,0)
+4010799^POUCH,OSTOMY H#3804
+"DATA",176.112,35919,1)
+490072^^Y
+"DATA",176.112,35920,0)
+4010800^POUCH,OSTOMY H#3806
+"DATA",176.112,35920,1)
+490073^^Y
+"DATA",176.112,35921,0)
+4011052^POUCH,OSTOMY H#3807
+"DATA",176.112,35921,1)
+490074^^Y
+"DATA",176.112,35922,0)
+4010801^POUCH,OSTOMY H#3814
+"DATA",176.112,35922,1)
+490075^^Y
+"DATA",176.112,35923,0)
+4011132^POUCH,OSTOMY H#3832
+"DATA",176.112,35923,1)
+490076^^Y
+"DATA",176.112,35924,0)
+4011133^POUCH,OSTOMY H#3833
+"DATA",176.112,35924,1)
+490077^^Y
+"DATA",176.112,35925,0)
+4011134^POUCH,OSTOMY H#3834
+"DATA",176.112,35925,1)
+490078^^Y
+"DATA",176.112,35926,0)
+4011131^POUCH,OSTOMY H#3837
+"DATA",176.112,35926,1)
+490079^^Y
+"DATA",176.112,35927,0)
+4011128^POUCH,OSTOMY H#3892
+"DATA",176.112,35927,1)
+490080^^Y
+"DATA",176.112,35928,0)
+4011129^POUCH,OSTOMY H#3893
+"DATA",176.112,35928,1)
+490081^^Y
+"DATA",176.112,35929,0)
+4011130^POUCH,OSTOMY H#3894
+"DATA",176.112,35929,1)
+490082^^Y
+"DATA",176.112,35930,0)
+4011127^POUCH,OSTOMY H#3897
+"DATA",176.112,35930,1)
+490083^^Y
+"DATA",176.112,35931,0)
+4011119^POUCH,OSTOMY H#8812
+"DATA",176.112,35931,1)
+490084^^Y
+"DATA",176.112,35932,0)
+4011120^POUCH,OSTOMY H#8813
+"DATA",176.112,35932,1)
+490085^^Y
+"DATA",176.112,35933,0)
+4011121^POUCH,OSTOMY H#8814
+"DATA",176.112,35933,1)
+490086^^Y
+"DATA",176.112,35934,0)
+4011122^POUCH,OSTOMY H#8816
+"DATA",176.112,35934,1)
+490087^^Y
+"DATA",176.112,35935,0)
+4013504^POUCH,OSTOMY H#8817
+"DATA",176.112,35935,1)
+490088^^Y
+"DATA",176.112,35936,0)
+4014333^POUCH,OSTOMY NU-HOPE #8258
+"DATA",176.112,35936,1)
+490089^^Y
+"DATA",176.112,35937,0)
+4011047^POUCH,OSTOMY TWO PIECE SYSTEM F#145-0519
+"DATA",176.112,35937,1)
+490090^^Y
+"DATA",176.112,35938,0)
+4011046^POUCH,OSTOMY TWO PIECE SYSTEM F#176-0725
+"DATA",176.112,35938,1)
+490091^^Y
+"DATA",176.112,35939,0)
+4011163^POUCH,OSTOMY UNITED Z.O. #1803-10
+"DATA",176.112,35939,1)
+490092^^Y
+"DATA",176.112,35940,0)
+4013276^POUCH,OSTOMY,ACTIVE LIFE C#0209-17
+"DATA",176.112,35940,1)
+490093^^Y
+"DATA",176.112,35941,0)
+4011070^POUCH,OSTOMY,ACTIVE LIFE C#0209-22
+"DATA",176.112,35941,1)
+490094^^Y
+"DATA",176.112,35942,0)
+4010758^POUCH,OSTOMY,ACTIVE LIFE C#0227-03
+"DATA",176.112,35942,1)
+490095^^Y
+"DATA",176.112,35943,0)
+4010759^POUCH,OSTOMY,ACTIVE LIFE C#0227-06
+"DATA",176.112,35943,1)
+490096^^Y
+"DATA",176.112,35944,0)
+4013053^POUCH,OSTOMY,ACTIVE LIFE C#0227-50
+"DATA",176.112,35944,1)
+490097^^Y
+"DATA",176.112,35945,0)
+4013054^POUCH,OSTOMY,ACTIVE LIFE C#0227-51
+"DATA",176.112,35945,1)
+490098^^Y
+"DATA",176.112,35946,0)
+4011088^POUCH,OSTOMY,ACTIVE LIFE C#0227-52
+"DATA",176.112,35946,1)
+490099^^Y
+"DATA",176.112,35947,0)
+4013055^POUCH,OSTOMY,ACTIVE LIFE C#0227-53
+"DATA",176.112,35947,1)
+490100^^Y
+"DATA",176.112,35948,0)
+4013056^POUCH,OSTOMY,ACTIVE LIFE C#0227-54
+"DATA",176.112,35948,1)
+490101^^Y
+"DATA",176.112,35949,0)
+4013057^POUCH,OSTOMY,ACTIVE LIFE C#0227-55
+"DATA",176.112,35949,1)
+490102^^Y
+"DATA",176.112,35950,0)
+4013058^POUCH,OSTOMY,ACTIVE LIFE C#0227-56
+"DATA",176.112,35950,1)
+490103^^Y
+"DATA",176.112,35951,0)
+4013059^POUCH,OSTOMY,ACTIVE LIFE C#0227-57
+"DATA",176.112,35951,1)
+490104^^Y
+"DATA",176.112,35952,0)
+4013060^POUCH,OSTOMY,ACTIVE LIFE C#0227-58
+"DATA",176.112,35952,1)
+490105^^Y
+"DATA",176.112,35953,0)
+4013061^POUCH,OSTOMY,ACTIVE LIFE C#0227-59
+"DATA",176.112,35953,1)
+490106^^Y
+"DATA",176.112,35954,0)
+4013062^POUCH,OSTOMY,ACTIVE LIFE C#0227-60
+"DATA",176.112,35954,1)
+490107^^Y
+"DATA",176.112,35955,0)
+4013063^POUCH,OSTOMY,ACTIVE LIFE C#0227-61
+"DATA",176.112,35955,1)
+490108^^Y
+"DATA",176.112,35956,0)
+4013064^POUCH,OSTOMY,ACTIVE LIFE C#0227-62
+"DATA",176.112,35956,1)
+490109^^Y
+"DATA",176.112,35957,0)
+4013065^POUCH,OSTOMY,ACTIVE LIFE C#0227-63
+"DATA",176.112,35957,1)
+490110^^Y
+"DATA",176.112,35958,0)
+4013046^POUCH,OSTOMY,ACTIVE LIFE C#0227-64
+"DATA",176.112,35958,1)
+490111^^Y
+"DATA",176.112,35959,0)
+4013047^POUCH,OSTOMY,ACTIVE LIFE C#0227-65
+"DATA",176.112,35959,1)
+490112^^Y
+"DATA",176.112,35960,0)
+4013048^POUCH,OSTOMY,ACTIVE LIFE C#0227-66
+"DATA",176.112,35960,1)
+490113^^Y
+"DATA",176.112,35961,0)
+4013049^POUCH,OSTOMY,ACTIVE LIFE C#0227-67
+"DATA",176.112,35961,1)
+490114^^Y
+"DATA",176.112,35962,0)
+4013050^POUCH,OSTOMY,ACTIVE LIFE C#0227-68
+"DATA",176.112,35962,1)
+490115^^Y
+"DATA",176.112,35963,0)
+4013051^POUCH,OSTOMY,ACTIVE LIFE C#0227-69
+"DATA",176.112,35963,1)
+490116^^Y
+"DATA",176.112,35964,0)
+4013052^POUCH,OSTOMY,ACTIVE LIFE C#0227-70
+"DATA",176.112,35964,1)
+490117^^Y
+"DATA",176.112,35965,0)
+4010745^POUCH,OSTOMY,ACTIVE LIFE C#0227-71
+"DATA",176.112,35965,1)
+490118^^Y
+"DATA",176.112,35966,0)
+4010746^POUCH,OSTOMY,ACTIVE LIFE C#1757-61
+"DATA",176.112,35966,1)
+490119^^Y
+"DATA",176.112,35967,0)
+4010747^POUCH,OSTOMY,ACTIVE LIFE C#1757-62
+"DATA",176.112,35967,1)
+490120^^Y
+"DATA",176.112,35968,0)
+4010748^POUCH,OSTOMY,ACTIVE LIFE C#1757-63
+"DATA",176.112,35968,1)
+490121^^Y
+"DATA",176.112,35969,0)
+4010749^POUCH,OSTOMY,ACTIVE LIFE C#1757-64
+"DATA",176.112,35969,1)
+490122^^Y
+"DATA",176.112,35970,0)
+4010750^POUCH,OSTOMY,ACTIVE LIFE C#1757-65
+"DATA",176.112,35970,1)
+490123^^Y
+"DATA",176.112,35971,0)
+4010751^POUCH,OSTOMY,ACTIVE LIFE C#1757-66
+"DATA",176.112,35971,1)
+490124^^Y
+"DATA",176.112,35972,0)
+4010752^POUCH,OSTOMY,ACTIVE LIFE C#1757-68
+"DATA",176.112,35972,1)
+490125^^Y
+"DATA",176.112,35973,0)
+4010753^POUCH,OSTOMY,ACTIVE LIFE C#1757-69
+"DATA",176.112,35973,1)
+490126^^Y
+"DATA",176.112,35974,0)
+4010754^POUCH,OSTOMY,ACTIVE LIFE C#1757-70
+"DATA",176.112,35974,1)
+490127^^Y
+"DATA",176.112,35975,0)
+4010755^POUCH,OSTOMY,ACTIVE LIFE C#1757-71
+"DATA",176.112,35975,1)
+490128^^Y
+"DATA",176.112,35976,0)
+4010756^POUCH,OSTOMY,ACTIVE LIFE C#1757-72
+"DATA",176.112,35976,1)
+490129^^Y
+"DATA",176.112,35977,0)
+4010757^POUCH,OSTOMY,ACTIVE LIFE C#1757-73
+"DATA",176.112,35977,1)
+490130^^Y
+"DATA",176.112,35978,0)
+4010736^POUCH,OSTOMY,ACTIVE LIFE C#1757-77
+"DATA",176.112,35978,1)
+490131^^Y
+"DATA",176.112,35979,0)
+4010737^POUCH,OSTOMY,ACTIVE LIFE C#1757-78
+"DATA",176.112,35979,1)
+490132^^Y
+"DATA",176.112,35980,0)
+4010738^POUCH,OSTOMY,ACTIVE LIFE C#1757-79
+"DATA",176.112,35980,1)
+490133^^Y
+"DATA",176.112,35981,0)
+4010739^POUCH,OSTOMY,ACTIVE LIFE C#1757-80
+"DATA",176.112,35981,1)
+490134^^Y
+"DATA",176.112,35982,0)
+4010740^POUCH,OSTOMY,ACTIVE LIFE C#1757-81
+"DATA",176.112,35982,1)
+490135^^Y
+"DATA",176.112,35983,0)
+4010741^POUCH,OSTOMY,ACTIVE LIFE C#1757-82
+"DATA",176.112,35983,1)
+490136^^Y
+"DATA",176.112,35984,0)
+4010742^POUCH,OSTOMY,ACTIVE LIFE C#1757-83
+"DATA",176.112,35984,1)
+490137^^Y
+"DATA",176.112,35985,0)
+4010743^POUCH,OSTOMY,ACTIVE LIFE C#1757-84
+"DATA",176.112,35985,1)
+490138^^Y
+"DATA",176.112,35986,0)
+4010744^POUCH,OSTOMY,ACTIVE LIFE C#1757-85
+"DATA",176.112,35986,1)
+490139^^Y
+"DATA",176.112,35987,0)
+4014881^POUCH,OSTOMY,ACTIVE LIFE C#4005-98
+"DATA",176.112,35987,1)
+490140^^Y
+"DATA",176.112,35988,0)
+4015108^POUCH,OSTOMY,ACTIVE LIFE C#4005-99
+"DATA",176.112,35988,1)
+490141^^Y
+"DATA",176.112,35989,0)
+4016674^POUCH,OSTOMY,ACTIVE LIFE C#4131-41
+"DATA",176.112,35989,1)
+490142^^Y
+"DATA",176.112,35990,0)
+4016675^POUCH,OSTOMY,ACTIVE LIFE C#4131-42
+"DATA",176.112,35990,1)
+490143^^Y
+"DATA",176.112,35991,0)
+4016676^POUCH,OSTOMY,ACTIVE LIFE C#4131-43
+"DATA",176.112,35991,1)
+490144^^Y
+"DATA",176.112,35992,0)
+4016677^POUCH,OSTOMY,ACTIVE LIFE C#4131-44
+"DATA",176.112,35992,1)
+490145^^Y
+"DATA",176.112,35993,0)
+4016678^POUCH,OSTOMY,ACTIVE LIFE C#4131-45
+"DATA",176.112,35993,1)
+490146^^Y
+"DATA",176.112,35994,0)
+4016679^POUCH,OSTOMY,ACTIVE LIFE C#4131-46
+"DATA",176.112,35994,1)
+490147^^Y
+"DATA",176.112,35995,0)
+4016680^POUCH,OSTOMY,ACTIVE LIFE C#4131-47
+"DATA",176.112,35995,1)
+490148^^Y
+"DATA",176.112,35996,0)
+4016681^POUCH,OSTOMY,ACTIVE LIFE C#4131-48
+"DATA",176.112,35996,1)
+490149^^Y
+"DATA",176.112,35997,0)
+4016682^POUCH,OSTOMY,ACTIVE LIFE C#4131-49
+"DATA",176.112,35997,1)
+490150^^Y
+"DATA",176.112,35998,0)
+4016683^POUCH,OSTOMY,ACTIVE LIFE C#4131-50
+"DATA",176.112,35998,1)
+490151^^Y
+"DATA",176.112,35999,0)
+4016684^POUCH,OSTOMY,ACTIVE LIFE C#4131-51
+"DATA",176.112,35999,1)
+490152^^Y
+"DATA",176.112,36000,0)
+4016685^POUCH,OSTOMY,ACTIVE LIFE C#4131-52
+"DATA",176.112,36000,1)
+490153^^Y
+"DATA",176.112,36001,0)
+4011071^POUCH,OSTOMY,ACTIVE LIFE C#6504-08
+"DATA",176.112,36001,1)
+490154^^Y
+"DATA",176.112,36002,0)
+4011072^POUCH,OSTOMY,ACTIVE LIFE C#6504-22
+"DATA",176.112,36002,1)
+490155^^Y
+"DATA",176.112,36003,0)
+4011197^POUCH,OSTOMY,ACTIVE LIFE C#6504-76
+"DATA",176.112,36003,1)
+490156^^Y
+"DATA",176.112,36004,0)
+4011198^POUCH,OSTOMY,ACTIVE LIFE C#6504-77
+"DATA",176.112,36004,1)
+490157^^Y
+"DATA",176.112,36005,0)
+4011199^POUCH,OSTOMY,ACTIVE LIFE C#6504-78
+"DATA",176.112,36005,1)
+490158^^Y
+"DATA",176.112,36006,0)
+4011200^POUCH,OSTOMY,ACTIVE LIFE C#6504-79
+"DATA",176.112,36006,1)
+490159^^Y
+"DATA",176.112,36007,0)
+4011201^POUCH,OSTOMY,ACTIVE LIFE C#6504-80
+"DATA",176.112,36007,1)
+490160^^Y
+"DATA",176.112,36008,0)
+4011202^POUCH,OSTOMY,ACTIVE LIFE C#6504-81
+"DATA",176.112,36008,1)
+490161^^Y
+"DATA",176.112,36009,0)
+4011073^POUCH,OSTOMY,CLOSED,BARD #960002
+"DATA",176.112,36009,1)
+490162^^Y
+"DATA",176.112,36010,0)
+4011074^POUCH,OSTOMY,CLOSED,BARD #960102
+"DATA",176.112,36010,1)
+490163^^Y
+"DATA",176.112,36011,0)
+4011158^POUCH,OSTOMY,COLOPLAST #5900
+"DATA",176.112,36011,1)
+490164^^Y
+"DATA",176.112,36012,0)
+4011159^POUCH,OSTOMY,COLOPLAST #5901
+"DATA",176.112,36012,1)
+490165^^Y
+"DATA",176.112,36013,0)
+4011160^POUCH,OSTOMY,COLOPLAST #5920
+"DATA",176.112,36013,1)
+490166^^Y
+"DATA",176.112,36014,0)
+4011161^POUCH,OSTOMY,COLOPLAST #5925
+"DATA",176.112,36014,1)
+490167^^Y
+"DATA",176.112,36015,0)
+4011043^POUCH,OSTOMY,DRAINABLE F#061-5491
+"DATA",176.112,36015,1)
+490168^^Y
+"DATA",176.112,36016,0)
+4011042^POUCH,OSTOMY,DRAINABLE F#061-5492
+"DATA",176.112,36016,1)
+490169^^Y
+"DATA",176.112,36017,0)
+4011038^POUCH,OSTOMY,DRAINABLE F#061-6403
+"DATA",176.112,36017,1)
+490170^^Y
+"DATA",176.112,36018,0)
+4011044^POUCH,OSTOMY,DRAINABLE F#061-6404
+"DATA",176.112,36018,1)
+490171^^Y
+"DATA",176.112,36019,0)
+4011041^POUCH,OSTOMY,DRAINABLE F#061-6405
+"DATA",176.112,36019,1)
+490172^^Y
+"DATA",176.112,36020,0)
+4011040^POUCH,OSTOMY,DRAINABLE F#061-6407
+"DATA",176.112,36020,1)
+490173^^Y
+"DATA",176.112,36021,0)
+4011045^POUCH,OSTOMY,DRAINABLE F#061-6408
+"DATA",176.112,36021,1)
+490174^^Y
+"DATA",176.112,36022,0)
+4011039^POUCH,OSTOMY,DRAINABLE F#063-3916
+"DATA",176.112,36022,1)
+490175^^Y
+"DATA",176.112,36023,0)
+4011037^POUCH,OSTOMY,DRAINABLE F#303-2603
+"DATA",176.112,36023,1)
+490176^^Y
+"DATA",176.112,36024,0)
+4011061^POUCH,OSTOMY,FEATHER-LITE U#2564
+"DATA",176.112,36024,1)
+490177^^Y
+"DATA",176.112,36025,0)
+4010826^POUCH,OSTOMY,FIRSTCHOICE H#3677
+"DATA",176.112,36025,1)
+490178^^Y
+"DATA",176.112,36026,0)
+4010828^POUCH,OSTOMY,FIRSTCHOICE H#3678
+"DATA",176.112,36026,1)
+490179^^Y
+"DATA",176.112,36027,0)
+4010795^POUCH,OSTOMY,GUARDIAN H#4622
+"DATA",176.112,36027,1)
+490180^^Y
+"DATA",176.112,36028,0)
+4010796^POUCH,OSTOMY,GUARDIAN H#4623
+"DATA",176.112,36028,1)
+490181^^Y
+"DATA",176.112,36029,0)
+4011077^POUCH,OSTOMY,PREMIER H#8724
+"DATA",176.112,36029,1)
+490182^^Y
+"DATA",176.112,36030,0)
+4012226^POUCH,RETRACTED PENIS H#9811
+"DATA",176.112,36030,1)
+490183^^Y
+"DATA",176.112,36031,0)
+4014386^POUCH,RETRACTED PENIS H#9873
+"DATA",176.112,36031,1)
+490184^^Y
+"DATA",176.112,36032,0)
+4011059^POUCH,RUBBER MOD CONVEX ATLANTIC#0105-52
+"DATA",176.112,36032,1)
+490185^^Y
+"DATA",176.112,36033,0)
+4011164^POUCH,URINARY NU-HOPE #8644-C
+"DATA",176.112,36033,1)
+490186^^Y
+"DATA",176.112,36034,0)
+4011068^POUCH,URINARY POST-OP NU-HOPE #8257
+"DATA",176.112,36034,1)
+490187^^Y
+"DATA",176.112,36035,0)
+4011069^POUCH,URINARY POST-OP NU-HOPE #8257-C
+"DATA",176.112,36035,1)
+490188^^Y
+"DATA",176.112,36036,0)
+4012201^POUCH,URINARY POST-OP NU-HOPE #8259
+"DATA",176.112,36036,1)
+490189^^Y
+"DATA",176.112,36037,0)
+4012202^POUCH,URINARY POST-OP NU-HOPE #8260
+"DATA",176.112,36037,1)
+490190^^Y
+"DATA",176.112,36038,0)
+4011064^POUCH,URINARY POST-OP NU-HOPE #8260FV-C
+"DATA",176.112,36038,1)
+490191^^Y
+"DATA",176.112,36039,0)
+4011065^POUCH,URINARY POST-OP NU-HOPE #8261
+"DATA",176.112,36039,1)
+490192^^Y
+"DATA",176.112,36040,0)
+4011066^POUCH,URINARY POST-OP NU-HOPE #8261-DC
+"DATA",176.112,36040,1)
+490193^^Y
+"DATA",176.112,36041,0)
+4011075^POUCH,URINARY POST-OP NU-HOPE #8262
+"DATA",176.112,36041,1)
+490194^^Y
+"DATA",176.112,36042,0)
+4011067^POUCH,URINARY POST-OP NU-HOPE #8268
+"DATA",176.112,36042,1)
+490195^^Y
+"DATA",176.112,36043,0)
+4012211^POUCH,URINARY,E-Z DRAIN MARLEN#36218
+"DATA",176.112,36043,1)
+490196^^Y
+"DATA",176.112,36044,0)
+4011275^POUCH,UROSTOMY H#3902
+"DATA",176.112,36044,1)
+490197^^Y
+"DATA",176.112,36045,0)
+4011276^POUCH,UROSTOMY H#3903
+"DATA",176.112,36045,1)
+490198^^Y
+"DATA",176.112,36046,0)
+4011357^POUCH,UROSTOMY H#3904
+"DATA",176.112,36046,1)
+490199^^Y
+"DATA",176.112,36047,0)
+4011334^POUCH,UROSTOMY H#3907
+"DATA",176.112,36047,1)
+490200^^Y
+"DATA",176.112,36048,0)
+4011300^POUCH,UROSTOMY H#7402
+"DATA",176.112,36048,1)
+490201^^Y
+"DATA",176.112,36049,0)
+4011302^POUCH,UROSTOMY H#7403
+"DATA",176.112,36049,1)
+490202^^Y
+"DATA",176.112,36050,0)
+4011304^POUCH,UROSTOMY H#7404
+"DATA",176.112,36050,1)
+490203^^Y
+"DATA",176.112,36051,0)
+4011299^POUCH,UROSTOMY H#7407
+"DATA",176.112,36051,1)
+490204^^Y
+"DATA",176.112,36052,0)
+4011301^POUCH,UROSTOMY H#7408
+"DATA",176.112,36052,1)
+490205^^Y
+"DATA",176.112,36053,0)
+4011303^POUCH,UROSTOMY H#7409
+"DATA",176.112,36053,1)
+490206^^Y
+"DATA",176.112,36054,0)
+4011310^POUCH,UROSTOMY H#7452
+"DATA",176.112,36054,1)
+490207^^Y
+"DATA",176.112,36055,0)
+4011311^POUCH,UROSTOMY H#7453
+"DATA",176.112,36055,1)
+490208^^Y
+"DATA",176.112,36056,0)
+4011313^POUCH,UROSTOMY H#7454
+"DATA",176.112,36056,1)
+490209^^Y
+"DATA",176.112,36057,0)
+4011272^POUCH,UROSTOMY H#7458
+"DATA",176.112,36057,1)
+490210^^Y
+"DATA",176.112,36058,0)
+4011312^POUCH,UROSTOMY H#7459
+"DATA",176.112,36058,1)
+490211^^Y
+"DATA",176.112,36059,0)
+4011294^POUCH,UROSTOMY H#7462
+"DATA",176.112,36059,1)
+490212^^Y
+"DATA",176.112,36060,0)
+4011296^POUCH,UROSTOMY H#7463
+"DATA",176.112,36060,1)
+490213^^Y
+"DATA",176.112,36061,0)
+4011298^POUCH,UROSTOMY H#7464
+"DATA",176.112,36061,1)
+490214^^Y
+"DATA",176.112,36062,0)
+4011295^POUCH,UROSTOMY H#7468
+"DATA",176.112,36062,1)
+490215^^Y
+"DATA",176.112,36063,0)
+4011297^POUCH,UROSTOMY H#7469
+"DATA",176.112,36063,1)
+490216^^Y
+"DATA",176.112,36064,0)
+4011306^POUCH,UROSTOMY H#7472
+"DATA",176.112,36064,1)
+490217^^Y
+"DATA",176.112,36065,0)
+4011308^POUCH,UROSTOMY H#7473
+"DATA",176.112,36065,1)
+490218^^Y
+"DATA",176.112,36066,0)
+4011309^POUCH,UROSTOMY H#7474
+"DATA",176.112,36066,1)
+490219^^Y
+"DATA",176.112,36067,0)
+4011305^POUCH,UROSTOMY H#7477
+"DATA",176.112,36067,1)
+490220^^Y
+"DATA",176.112,36068,0)
+4011307^POUCH,UROSTOMY H#7478
+"DATA",176.112,36068,1)
+490221^^Y
+"DATA",176.112,36069,0)
+4011273^POUCH,UROSTOMY H#7479
+"DATA",176.112,36069,1)
+490222^^Y
+"DATA",176.112,36070,0)
+4011289^POUCH,UROSTOMY H#7482
+"DATA",176.112,36070,1)
+490223^^Y
+"DATA",176.112,36071,0)
+4011291^POUCH,UROSTOMY H#7483
+"DATA",176.112,36071,1)
+490224^^Y
+"DATA",176.112,36072,0)
+4011293^POUCH,UROSTOMY H#7484
+"DATA",176.112,36072,1)
+490225^^Y
+"DATA",176.112,36073,0)
+4011288^POUCH,UROSTOMY H#7487
+"DATA",176.112,36073,1)
+490226^^Y
+"DATA",176.112,36074,0)
+4011290^POUCH,UROSTOMY H#7488
+"DATA",176.112,36074,1)
+490227^^Y
+"DATA",176.112,36075,0)
+4011292^POUCH,UROSTOMY H#7489
+"DATA",176.112,36075,1)
+490228^^Y
+"DATA",176.112,36076,0)
+4011359^POUCH,UROSTOMY H#8902
+"DATA",176.112,36076,1)
+490229^^Y
+"DATA",176.112,36077,0)
+4011360^POUCH,UROSTOMY H#8903
+"DATA",176.112,36077,1)
+490230^^Y
+"DATA",176.112,36078,0)
+4011341^POUCH,UROSTOMY H#8904
+"DATA",176.112,36078,1)
+490231^^Y
+"DATA",176.112,36079,0)
+4011358^POUCH,UROSTOMY H#8907
+"DATA",176.112,36079,1)
+490232^^Y
+"DATA",176.112,36080,0)
+4011225^POUCH,UROSTOMY W/ACCUSEAL C#0219-25
+"DATA",176.112,36080,1)
+490233^^Y
+"DATA",176.112,36081,0)
+4011236^POUCH,UROSTOMY W/ACCUSEAL C#0219-26
+"DATA",176.112,36081,1)
+490234^^Y
+"DATA",176.112,36082,0)
+4011237^POUCH,UROSTOMY W/ACCUSEAL C#0219-27
+"DATA",176.112,36082,1)
+490235^^Y
+"DATA",176.112,36083,0)
+4011238^POUCH,UROSTOMY W/ACCUSEAL C#0219-28
+"DATA",176.112,36083,1)
+490236^^Y
+"DATA",176.112,36084,0)
+4011239^POUCH,UROSTOMY W/ACCUSEAL C#0219-29
+"DATA",176.112,36084,1)
+490237^^Y
+"DATA",176.112,36085,0)
+4011240^POUCH,UROSTOMY W/ACCUSEAL C#0219-30
+"DATA",176.112,36085,1)
+490238^^Y
+"DATA",176.112,36086,0)
+4011245^POUCH,UROSTOMY W/ACCUSEAL C#0219-35
+"DATA",176.112,36086,1)
+490239^^Y
+"DATA",176.112,36087,0)
+4011246^POUCH,UROSTOMY W/ACCUSEAL C#0219-36
+"DATA",176.112,36087,1)
+490240^^Y
+"DATA",176.112,36088,0)
+4011247^POUCH,UROSTOMY W/ACCUSEAL C#0219-37
+"DATA",176.112,36088,1)
+490241^^Y
+"DATA",176.112,36089,0)
+4011248^POUCH,UROSTOMY W/ACCUSEAL C#0219-38
+"DATA",176.112,36089,1)
+490242^^Y
+"DATA",176.112,36090,0)
+4011249^POUCH,UROSTOMY W/ACCUSEAL C#0219-39
+"DATA",176.112,36090,1)
+490243^^Y
+"DATA",176.112,36091,0)
+4011250^POUCH,UROSTOMY W/ACCUSEAL C#0219-40
+"DATA",176.112,36091,1)
+490244^^Y
+"DATA",176.112,36092,0)
+4011241^POUCH,UROSTOMY W/ACCUSEAL C#0219-55
+"DATA",176.112,36092,1)
+490245^^Y
+"DATA",176.112,36093,0)
+4011242^POUCH,UROSTOMY W/ACCUSEAL C#0219-56
+"DATA",176.112,36093,1)
+490246^^Y
+"DATA",176.112,36094,0)
+4011243^POUCH,UROSTOMY W/ACCUSEAL C#0219-57
+"DATA",176.112,36094,1)
+490247^^Y
+"DATA",176.112,36095,0)
+4011244^POUCH,UROSTOMY W/ACCUSEAL C#0219-58
+"DATA",176.112,36095,1)
+490248^^Y
+"DATA",176.112,36096,0)
+4011365^POUCH,UROSTOMY W/ACCUSEAL C#4015-42
+"DATA",176.112,36096,1)
+490249^^Y
+"DATA",176.112,36097,0)
+4011366^POUCH,UROSTOMY W/ACCUSEAL C#4015-43
+"DATA",176.112,36097,1)
+490250^^Y
+"DATA",176.112,36098,0)
+4011367^POUCH,UROSTOMY W/ACCUSEAL C#4015-44
+"DATA",176.112,36098,1)
+490251^^Y
+"DATA",176.112,36099,0)
+4011368^POUCH,UROSTOMY W/ACCUSEAL C#4015-45
+"DATA",176.112,36099,1)
+490252^^Y
+"DATA",176.112,36100,0)
+4011369^POUCH,UROSTOMY W/ACCUSEAL C#4015-46
+"DATA",176.112,36100,1)
+490253^^Y
+"DATA",176.112,36101,0)
+4011370^POUCH,UROSTOMY W/ACCUSEAL C#4015-47
+"DATA",176.112,36101,1)
+490254^^Y
+"DATA",176.112,36102,0)
+4011371^POUCH,UROSTOMY W/ACCUSEAL C#4015-48
+"DATA",176.112,36102,1)
+490255^^Y
+"DATA",176.112,36103,0)
+4011372^POUCH,UROSTOMY W/ACCUSEAL C#4015-49
+"DATA",176.112,36103,1)
+490256^^Y
+"DATA",176.112,36104,0)
+4011373^POUCH,UROSTOMY W/ACCUSEAL C#4015-50
+"DATA",176.112,36104,1)
+490257^^Y
+"DATA",176.112,36105,0)
+4011374^POUCH,UROSTOMY W/ACCUSEAL C#4015-51
+"DATA",176.112,36105,1)
+490258^^Y
+"DATA",176.112,36106,0)
+4011375^POUCH,UROSTOMY W/ACCUSEAL C#4015-52
+"DATA",176.112,36106,1)
+490259^^Y
+"DATA",176.112,36107,0)
+4011376^POUCH,UROSTOMY W/ACCUSEAL C#4015-53
+"DATA",176.112,36107,1)
+490260^^Y
+"DATA",176.112,36108,0)
+4011377^POUCH,UROSTOMY W/ACCUSEAL C#4015-54
+"DATA",176.112,36108,1)
+490261^^Y
+"DATA",176.112,36109,0)
+4011378^POUCH,UROSTOMY W/ACCUSEAL C#4015-55
+"DATA",176.112,36109,1)
+490262^^Y
+"DATA",176.112,36110,0)
+4013861^POUCH,UROSTOMY W/ACCUSEAL C#4019-07
+"DATA",176.112,36110,1)
+490263^^Y
+"DATA",176.112,36111,0)
+4011380^POUCH,UROSTOMY W/DURAHESIVE C#6508-28
+"DATA",176.112,36111,1)
+490264^^Y
+"DATA",176.112,36112,0)
+4015393^POUCH,UROSTOMY W/DURAHESIVE C#6508-29
+"DATA",176.112,36112,1)
+490265^^Y
+"DATA",176.112,36113,0)
+4011383^POUCH,UROSTOMY W/DURAHESIVE C#6508-30
+"DATA",176.112,36113,1)
+490266^^Y
+"DATA",176.112,36114,0)
+4011382^POUCH,UROSTOMY W/DURAHESIVE C#6508-31
+"DATA",176.112,36114,1)
+490267^^Y
+"DATA",176.112,36115,0)
+4011381^POUCH,UROSTOMY W/DURAHESIVE C#6508-32
+"DATA",176.112,36115,1)
+490268^^Y
+"DATA",176.112,36116,0)
+4011379^POUCH,UROSTOMY W/DURAHESIVE C#6508-33
+"DATA",176.112,36116,1)
+490269^^Y
+"DATA",176.112,36117,0)
+4011226^POUCH,UROSTOMY,ACTIVE LIFE C#1757-90
+"DATA",176.112,36117,1)
+490270^^Y
+"DATA",176.112,36118,0)
+4011251^POUCH,UROSTOMY,ACTIVE LIFE C#1757-91
+"DATA",176.112,36118,1)
+490271^^Y
+"DATA",176.112,36119,0)
+4011252^POUCH,UROSTOMY,ACTIVE LIFE C#1757-92
+"DATA",176.112,36119,1)
+490272^^Y
+"DATA",176.112,36120,0)
+4011253^POUCH,UROSTOMY,ACTIVE LIFE C#1757-93
+"DATA",176.112,36120,1)
+490273^^Y
+"DATA",176.112,36121,0)
+4011254^POUCH,UROSTOMY,ACTIVE LIFE C#1757-94
+"DATA",176.112,36121,1)
+490274^^Y
+"DATA",176.112,36122,0)
+4011255^POUCH,UROSTOMY,ACTIVE LIFE C#1757-95
+"DATA",176.112,36122,1)
+490275^^Y
+"DATA",176.112,36123,0)
+4011256^POUCH,UROSTOMY,ACTIVE LIFE C#1757-96
+"DATA",176.112,36123,1)
+490276^^Y
+"DATA",176.112,36124,0)
+4011257^POUCH,UROSTOMY,ACTIVE LIFE C#1757-97
+"DATA",176.112,36124,1)
+490277^^Y
+"DATA",176.112,36125,0)
+4011258^POUCH,UROSTOMY,ACTIVE LIFE C#1757-98
+"DATA",176.112,36125,1)
+490278^^Y
+"DATA",176.112,36126,0)
+4016195^POUCH,UROSTOMY,ASSURA COLOPLAST #2540
+"DATA",176.112,36126,1)
+490279^^Y
+"DATA",176.112,36127,0)
+4016196^POUCH,UROSTOMY,ASSURA COLOPLAST #2550
+"DATA",176.112,36127,1)
+490280^^Y
+"DATA",176.112,36128,0)
+4016197^POUCH,UROSTOMY,ASSURA COLOPLAST #2570
+"DATA",176.112,36128,1)
+490281^^Y
+"DATA",176.112,36129,0)
+4016183^POUCH,UROSTOMY,ASSURA COLOPLAST #2772
+"DATA",176.112,36129,1)
+490282^^Y
+"DATA",176.112,36130,0)
+4016188^POUCH,UROSTOMY,ASSURA COLOPLAST #2851
+"DATA",176.112,36130,1)
+490283^^Y
+"DATA",176.112,36131,0)
+4016189^POUCH,UROSTOMY,ASSURA COLOPLAST #2852
+"DATA",176.112,36131,1)
+490284^^Y
+"DATA",176.112,36132,0)
+4016185^POUCH,UROSTOMY,ASSURA COLOPLAST #2861
+"DATA",176.112,36132,1)
+490285^^Y
+"DATA",176.112,36133,0)
+4016186^POUCH,UROSTOMY,ASSURA COLOPLAST #2862
+"DATA",176.112,36133,1)
+490286^^Y
+"DATA",176.112,36134,0)
+4016187^POUCH,UROSTOMY,ASSURA COLOPLAST #2863
+"DATA",176.112,36134,1)
+490287^^Y
+"DATA",176.112,36135,0)
+4016182^POUCH,UROSTOMY,ASSURA COLOPLAST #2871
+"DATA",176.112,36135,1)
+490288^^Y
+"DATA",176.112,36136,0)
+4016425^POUCH,UROSTOMY,ASSURA COLOPLAST #2872
+"DATA",176.112,36136,1)
+490289^^Y
+"DATA",176.112,36137,0)
+4016184^POUCH,UROSTOMY,ASSURA COLOPLAST #2873
+"DATA",176.112,36137,1)
+490290^^Y
+"DATA",176.112,36138,0)
+4016162^POUCH,UROSTOMY,ASSURA CONVEX COLOPLAST #12991
+"DATA",176.112,36138,1)
+490291^^Y
+"DATA",176.112,36139,0)
+4016163^POUCH,UROSTOMY,ASSURA CONVEX COLOPLAST #12992
+"DATA",176.112,36139,1)
+490292^^Y
+"DATA",176.112,36140,0)
+4016164^POUCH,UROSTOMY,ASSURA CONVEX COLOPLAST #12993
+"DATA",176.112,36140,1)
+490293^^Y
+"DATA",176.112,36141,0)
+4016165^POUCH,UROSTOMY,ASSURA CONVEX COLOPLAST #12994
+"DATA",176.112,36141,1)
+490294^^Y
+"DATA",176.112,36142,0)
+4016166^POUCH,UROSTOMY,ASSURA CONVEX COLOPLAST #12995
+"DATA",176.112,36142,1)
+490295^^Y
+"DATA",176.112,36143,0)
+4016167^POUCH,UROSTOMY,ASSURA CONVEX COLOPLAST #12996
+"DATA",176.112,36143,1)
+490296^^Y
+"DATA",176.112,36144,0)
+4016168^POUCH,UROSTOMY,ASSURA CONVEX COLOPLAST #12997
+"DATA",176.112,36144,1)
+490297^^Y
+"DATA",176.112,36145,0)
+4011318^POUCH,UROSTOMY,FIRSTCHOICE H#1460
+"DATA",176.112,36145,1)
+490298^^Y
+"DATA",176.112,36146,0)
+4011320^POUCH,UROSTOMY,FIRSTCHOICE H#1462
+"DATA",176.112,36146,1)
+490299^^Y
+"DATA",176.112,36147,0)
+4011322^POUCH,UROSTOMY,FIRSTCHOICE H#1463
+"DATA",176.112,36147,1)
+490300^^Y
+"DATA",176.112,36148,0)
+4011324^POUCH,UROSTOMY,FIRSTCHOICE H#1464
+"DATA",176.112,36148,1)
+490301^^Y
+"DATA",176.112,36149,0)
+4011319^POUCH,UROSTOMY,FIRSTCHOICE H#1467
+"DATA",176.112,36149,1)
+490302^^Y
+"DATA",176.112,36150,0)
+4011321^POUCH,UROSTOMY,FIRSTCHOICE H#1468
+"DATA",176.112,36150,1)
+490303^^Y
+"DATA",176.112,36151,0)
+4011323^POUCH,UROSTOMY,FIRSTCHOICE H#1469
+"DATA",176.112,36151,1)
+490304^^Y
+"DATA",176.112,36152,0)
+4011325^POUCH,UROSTOMY,FIRSTCHOICE H#1471
+"DATA",176.112,36152,1)
+490305^^Y
+"DATA",176.112,36153,0)
+4011326^POUCH,UROSTOMY,FIRSTCHOICE H#1472
+"DATA",176.112,36153,1)
+490306^^Y
+"DATA",176.112,36154,0)
+4011327^POUCH,UROSTOMY,FIRSTCHOICE H#1473
+"DATA",176.112,36154,1)
+490307^^Y
+"DATA",176.112,36155,0)
+4011328^POUCH,UROSTOMY,FIRSTCHOICE H#1474
+"DATA",176.112,36155,1)
+490308^^Y
+"DATA",176.112,36156,0)
+4011329^POUCH,UROSTOMY,FIRSTCHOICE H#1475
+"DATA",176.112,36156,1)
+490309^^Y
+"DATA",176.112,36157,0)
+4011330^POUCH,UROSTOMY,FIRSTCHOICE H#1476
+"DATA",176.112,36157,1)
+490310^^Y
+"DATA",176.112,36158,0)
+4011331^POUCH,UROSTOMY,FIRSTCHOICE H#1480
+"DATA",176.112,36158,1)
+490311^^Y
+"DATA",176.112,36159,0)
+4011262^POUCH,UROSTOMY,FIRSTCHOICE H#1481
+"DATA",176.112,36159,1)
+490312^^Y
+"DATA",176.112,36160,0)
+4011263^POUCH,UROSTOMY,FIRSTCHOICE H#1482
+"DATA",176.112,36160,1)
+490313^^Y
+"DATA",176.112,36161,0)
+4011265^POUCH,UROSTOMY,FIRSTCHOICE H#1483
+"DATA",176.112,36161,1)
+490314^^Y
+"DATA",176.112,36162,0)
+4011264^POUCH,UROSTOMY,FIRSTCHOICE H#1484
+"DATA",176.112,36162,1)
+490315^^Y
+"DATA",176.112,36163,0)
+4011266^POUCH,UROSTOMY,FIRSTCHOICE H#1485
+"DATA",176.112,36163,1)
+490316^^Y
+"DATA",176.112,36164,0)
+4011267^POUCH,UROSTOMY,FIRSTCHOICE H#1486
+"DATA",176.112,36164,1)
+490317^^Y
+"DATA",176.112,36165,0)
+4011268^POUCH,UROSTOMY,FIRSTCHOICE H#1487
+"DATA",176.112,36165,1)
+490318^^Y
+"DATA",176.112,36166,0)
+4011269^POUCH,UROSTOMY,FIRSTCHOICE H#1488
+"DATA",176.112,36166,1)
+490319^^Y
+"DATA",176.112,36167,0)
+4011270^POUCH,UROSTOMY,FIRSTCHOICE H#1489
+"DATA",176.112,36167,1)
+490320^^Y
+"DATA",176.112,36168,0)
+4011342^POUCH,UROSTOMY,FIRSTCHOICE KIT H#1466
+"DATA",176.112,36168,1)
+490321^^Y
+"DATA",176.112,36169,0)
+4011332^POUCH,UROSTOMY,GUARDIAN H#4702
+"DATA",176.112,36169,1)
+490322^^Y
+"DATA",176.112,36170,0)
+4011274^POUCH,UROSTOMY,GUARDIAN H#4703
+"DATA",176.112,36170,1)
+490323^^Y
+"DATA",176.112,36171,0)
+4011333^POUCH,UROSTOMY,GUARDIAN H#4704
+"DATA",176.112,36171,1)
+490324^^Y
+"DATA",176.112,36172,0)
+4011271^POUCH,UROSTOMY,LO-PROFILE H#1412
+"DATA",176.112,36172,1)
+490325^^Y
+"DATA",176.112,36173,0)
+4011285^POUCH,UROSTOMY,LO-PROFILE H#1413
+"DATA",176.112,36173,1)
+490326^^Y
+"DATA",176.112,36174,0)
+4011287^POUCH,UROSTOMY,LO-PROFILE H#1414
+"DATA",176.112,36174,1)
+490327^^Y
+"DATA",176.112,36175,0)
+4011283^POUCH,UROSTOMY,LO-PROFILE H#1417
+"DATA",176.112,36175,1)
+490328^^Y
+"DATA",176.112,36176,0)
+4011284^POUCH,UROSTOMY,LO-PROFILE H#1418
+"DATA",176.112,36176,1)
+490329^^Y
+"DATA",176.112,36177,0)
+4011286^POUCH,UROSTOMY,LO-PROFILE H#1419
+"DATA",176.112,36177,1)
+490330^^Y
+"DATA",176.112,36178,0)
+4011278^POUCH,UROSTOMY,LO-PROFILE H#1422
+"DATA",176.112,36178,1)
+490331^^Y
+"DATA",176.112,36179,0)
+4011280^POUCH,UROSTOMY,LO-PROFILE H#1423
+"DATA",176.112,36179,1)
+490332^^Y
+"DATA",176.112,36180,0)
+4011282^POUCH,UROSTOMY,LO-PROFILE H#1424
+"DATA",176.112,36180,1)
+490333^^Y
+"DATA",176.112,36181,0)
+4011277^POUCH,UROSTOMY,LO-PROFILE H#1427
+"DATA",176.112,36181,1)
+490334^^Y
+"DATA",176.112,36182,0)
+4011279^POUCH,UROSTOMY,LO-PROFILE H#1428
+"DATA",176.112,36182,1)
+490335^^Y
+"DATA",176.112,36183,0)
+4011281^POUCH,UROSTOMY,LO-PROFILE H#1429
+"DATA",176.112,36183,1)
+490336^^Y
+"DATA",176.112,36184,0)
+4011259^POUCH,UROSTOMY,LO-PROFILE H#1432
+"DATA",176.112,36184,1)
+490337^^Y
+"DATA",176.112,36185,0)
+4011316^POUCH,UROSTOMY,LO-PROFILE H#1433
+"DATA",176.112,36185,1)
+490338^^Y
+"DATA",176.112,36186,0)
+4011261^POUCH,UROSTOMY,LO-PROFILE H#1434
+"DATA",176.112,36186,1)
+490339^^Y
+"DATA",176.112,36187,0)
+4011315^POUCH,UROSTOMY,LO-PROFILE H#1437
+"DATA",176.112,36187,1)
+490340^^Y
+"DATA",176.112,36188,0)
+4011260^POUCH,UROSTOMY,LO-PROFILE H#1438
+"DATA",176.112,36188,1)
+490341^^Y
+"DATA",176.112,36189,0)
+4011317^POUCH,UROSTOMY,LO-PROFILE H#1439
+"DATA",176.112,36189,1)
+490342^^Y
+"DATA",176.112,36190,0)
+4014382^POUCH,UROSTOMY,NEW IMAGE H#18402
+"DATA",176.112,36190,1)
+490343^^Y
+"DATA",176.112,36191,0)
+4015532^POUCH,UROSTOMY,NEW IMAGE H#18403
+"DATA",176.112,36191,1)
+490344^^Y
+"DATA",176.112,36192,0)
+4015533^POUCH,UROSTOMY,NEW IMAGE H#18404
+"DATA",176.112,36192,1)
+490345^^Y
+"DATA",176.112,36193,0)
+4011314^POUCH,UROSTOMY,PEDIATRIC H#9767
+"DATA",176.112,36193,1)
+490346^^Y
+"DATA",176.112,36194,0)
+4011364^POUCH,UROSTOMY,POST-OP,BARD #971015
+"DATA",176.112,36194,1)
+490347^^Y
+"DATA",176.112,36195,0)
+4011343^POUCH,UROSTOMY,PREMIER H#8460
+"DATA",176.112,36195,1)
+490348^^Y
+"DATA",176.112,36196,0)
+4011335^POUCH,UROSTOMY,PREMIER H#8462
+"DATA",176.112,36196,1)
+490349^^Y
+"DATA",176.112,36197,0)
+4011336^POUCH,UROSTOMY,PREMIER H#8463
+"DATA",176.112,36197,1)
+490350^^Y
+"DATA",176.112,36198,0)
+4011346^POUCH,UROSTOMY,PREMIER H#8464
+"DATA",176.112,36198,1)
+490351^^Y
+"DATA",176.112,36199,0)
+4011337^POUCH,UROSTOMY,PREMIER H#8467
+"DATA",176.112,36199,1)
+490352^^Y
+"DATA",176.112,36200,0)
+4011344^POUCH,UROSTOMY,PREMIER H#8468
+"DATA",176.112,36200,1)
+490353^^Y
+"DATA",176.112,36201,0)
+4011345^POUCH,UROSTOMY,PREMIER H#8469
+"DATA",176.112,36201,1)
+490354^^Y
+"DATA",176.112,36202,0)
+4011349^POUCH,UROSTOMY,PREMIER H#84711
+"DATA",176.112,36202,1)
+490355^^Y
+"DATA",176.112,36203,0)
+4011347^POUCH,UROSTOMY,PREMIER H#8474
+"DATA",176.112,36203,1)
+490356^^Y
+"DATA",176.112,36204,0)
+4011348^POUCH,UROSTOMY,PREMIER H#8478
+"DATA",176.112,36204,1)
+490357^^Y
+"DATA",176.112,36205,0)
+4011350^POUCH,UROSTOMY,PREMIER H#8480
+"DATA",176.112,36205,1)
+490358^^Y
+"DATA",176.112,36206,0)
+4011351^POUCH,UROSTOMY,PREMIER H#8481
+"DATA",176.112,36206,1)
+490359^^Y
+"DATA",176.112,36207,0)
+4011352^POUCH,UROSTOMY,PREMIER H#8482
+"DATA",176.112,36207,1)
+490360^^Y
+"DATA",176.112,36208,0)
+4011338^POUCH,UROSTOMY,PREMIER H#8483
+"DATA",176.112,36208,1)
+490361^^Y
+"DATA",176.112,36209,0)
+4011339^POUCH,UROSTOMY,PREMIER H#8484
+"DATA",176.112,36209,1)
+490362^^Y
+"DATA",176.112,36210,0)
+4011353^POUCH,UROSTOMY,PREMIER H#8485
+"DATA",176.112,36210,1)
+490363^^Y
+"DATA",176.112,36211,0)
+4011354^POUCH,UROSTOMY,PREMIER H#8486
+"DATA",176.112,36211,1)
+490364^^Y
+"DATA",176.112,36212,0)
+4011355^POUCH,UROSTOMY,PREMIER H#8487
+"DATA",176.112,36212,1)
+490365^^Y
+"DATA",176.112,36213,0)
+4011356^POUCH,UROSTOMY,PREMIER H#8488
+"DATA",176.112,36213,1)
+490366^^Y
+"DATA",176.112,36214,0)
+4011340^POUCH,UROSTOMY,PREMIER H#8489
+"DATA",176.112,36214,1)
+490367^^Y
+"DATA",176.112,36215,0)
+4011227^POUCH,UROSTOMY,SUR-FIT C#0242-30
+"DATA",176.112,36215,1)
+490368^^Y
+"DATA",176.112,36216,0)
+4011228^POUCH,UROSTOMY,SUR-FIT C#0242-31
+"DATA",176.112,36216,1)
+490369^^Y
+"DATA",176.112,36217,0)
+4011229^POUCH,UROSTOMY,SUR-FIT C#0242-32
+"DATA",176.112,36217,1)
+490370^^Y
+"DATA",176.112,36218,0)
+4011230^POUCH,UROSTOMY,SUR-FIT C#0242-33
+"DATA",176.112,36218,1)
+490371^^Y
+"DATA",176.112,36219,0)
+4011232^POUCH,UROSTOMY,SUR-FIT C#0242-34
+"DATA",176.112,36219,1)
+490372^^Y
+"DATA",176.112,36220,0)
+4011233^POUCH,UROSTOMY,SUR-FIT C#0242-35
+"DATA",176.112,36220,1)
+490373^^Y
+"DATA",176.112,36221,0)
+4011234^POUCH,UROSTOMY,SUR-FIT C#0242-36
+"DATA",176.112,36221,1)
+490374^^Y
+"DATA",176.112,36222,0)
+4011235^POUCH,UROSTOMY,SUR-FIT C#0242-37
+"DATA",176.112,36222,1)
+490375^^Y
+"DATA",176.112,36223,0)
+4011231^POUCH,UROSTOMY,SUR-FIT C#0242-39
+"DATA",176.112,36223,1)
+490376^^Y
+"DATA",176.112,36224,0)
+4013643^POUCH,UROSTOMY,SUR-FIT C#4015-33
+"DATA",176.112,36224,1)
+490377^^Y
+"DATA",176.112,36225,0)
+4013644^POUCH,UROSTOMY,SUR-FIT C#4015-34
+"DATA",176.112,36225,1)
+490378^^Y
+"DATA",176.112,36226,0)
+4013645^POUCH,UROSTOMY,SUR-FIT C#4015-35
+"DATA",176.112,36226,1)
+490379^^Y
+"DATA",176.112,36227,0)
+4013646^POUCH,UROSTOMY,SUR-FIT C#4015-36
+"DATA",176.112,36227,1)
+490380^^Y
+"DATA",176.112,36228,0)
+4013647^POUCH,UROSTOMY,SUR-FIT C#4015-37
+"DATA",176.112,36228,1)
+490381^^Y
+"DATA",176.112,36229,0)
+4013648^POUCH,UROSTOMY,SUR-FIT C#4015-38
+"DATA",176.112,36229,1)
+490382^^Y
+"DATA",176.112,36230,0)
+4013649^POUCH,UROSTOMY,SUR-FIT C#4015-39
+"DATA",176.112,36230,1)
+490383^^Y
+"DATA",176.112,36231,0)
+4013650^POUCH,UROSTOMY,SUR-FIT C#4015-40
+"DATA",176.112,36231,1)
+490384^^Y
+"DATA",176.112,36232,0)
+4013651^POUCH,UROSTOMY,SUR-FIT C#4015-41
+"DATA",176.112,36232,1)
+490385^^Y
+"DATA",176.112,36233,0)
+4015290^POUCH,UROSTOMY,SUR-FIT C#4019-29
+"DATA",176.112,36233,1)
+490386^^Y
+"DATA",176.112,36234,0)
+4014628^POUCH,UROSTOMY,SUR-FIT,1-3/4IN C#4014-53
+"DATA",176.112,36234,1)
+490387^^Y
+"DATA",176.112,36235,0)
+4014632^POUCH,UROSTOMY,SUR-FIT,1-3/4IN C#4014-63
+"DATA",176.112,36235,1)
+490388^^Y
+"DATA",176.112,36236,0)
+4014627^POUCH,UROSTOMY,SUR-FIT,1-3/8IN C#4014-52
+"DATA",176.112,36236,1)
+490389^^Y
+"DATA",176.112,36237,0)
+4014631^POUCH,UROSTOMY,SUR-FIT,1-3/8IN C#4014-62
+"DATA",176.112,36237,1)
+490390^^Y
+"DATA",176.112,36238,0)
+4014629^POUCH,UROSTOMY,SUR-FIT,2-1/4IN C#4014-60
+"DATA",176.112,36238,1)
+490391^^Y
+"DATA",176.112,36239,0)
+4014633^POUCH,UROSTOMY,SUR-FIT,2-1/4IN C#4014-64
+"DATA",176.112,36239,1)
+490392^^Y
+"DATA",176.112,36240,0)
+4014630^POUCH,UROSTOMY,SUR-FIT,2-3/4IN C#4014-61
+"DATA",176.112,36240,1)
+490393^^Y
+"DATA",176.112,36241,0)
+4014634^POUCH,UROSTOMY,SUR-FIT,2-3/4IN C#4014-65
+"DATA",176.112,36241,1)
+490394^^Y
+"DATA",176.112,36242,0)
+4013043^POUCH,WOUND DRAINAGE C#0374-05
+"DATA",176.112,36242,1)
+490395^^Y
+"DATA",176.112,36243,0)
+4013044^POUCH,WOUND DRAINAGE C#0374-06
+"DATA",176.112,36243,1)
+490396^^Y
+"DATA",176.112,36244,0)
+4013045^POUCH,WOUND DRAINAGE C#0374-07
+"DATA",176.112,36244,1)
+490397^^Y
+"DATA",176.112,36245,0)
+4016048^SET,INFUSION DISETRONIC #3000288
+"DATA",176.112,36245,1)
+490398^^Y
+"DATA",176.112,36246,0)
+4016049^SET,INFUSION DISETRONIC #3000289
+"DATA",176.112,36246,1)
+490399^^Y
+"DATA",176.112,36247,0)
+4016567^SET,INFUSION DISETRONIC #3000293
+"DATA",176.112,36247,1)
+490400^^Y
+"DATA",176.112,36248,0)
+4016043^SET,INFUSION DISETRONIC #INF 300.0287
+"DATA",176.112,36248,1)
+490401^^Y
+"DATA",176.112,36249,0)
+4016035^SET,INFUSION DISETRONIC #INF 3000251
+"DATA",176.112,36249,1)
+490402^^Y
+"DATA",176.112,36250,0)
+4016036^SET,INFUSION DISETRONIC #INF 3000252
+"DATA",176.112,36250,1)
+490403^^Y
+"DATA",176.112,36251,0)
+4016032^SET,INFUSION DISETRONIC #INF 3000262
+"DATA",176.112,36251,1)
+490404^^Y
+"DATA",176.112,36252,0)
+4016033^SET,INFUSION DISETRONIC #INF 3000263
+"DATA",176.112,36252,1)
+490405^^Y
+"DATA",176.112,36253,0)
+4016034^SET,INFUSION DISETRONIC #INF 3000264
+"DATA",176.112,36253,1)
+490406^^Y
+"DATA",176.112,36254,0)
+4014379^SET,INFUSION INSULIN CHRONIMED #2652-999001
+"DATA",176.112,36254,1)
+490407^^Y
+"DATA",176.112,36255,0)
+4014230^SET,INFUSION MINIMED #MMT-106
+"DATA",176.112,36255,1)
+490408^^Y
+"DATA",176.112,36256,0)
+4015359^SET,INFUSION MINIMED #MMT-107
+"DATA",176.112,36256,1)
+490409^^Y
+"DATA",176.112,36257,0)
+4015372^SET,INFUSION MINIMED #MMT-111
+"DATA",176.112,36257,1)
+490410^^Y
+"DATA",176.112,36258,0)
+4015371^SET,INFUSION MINIMED #MMT-112
+"DATA",176.112,36258,1)
+490411^^Y
+"DATA",176.112,36259,0)
+4015364^SET,INFUSION MINIMED #MMT-128
+"DATA",176.112,36259,1)
+490412^^Y
+"DATA",176.112,36260,0)
+4015358^SET,INFUSION MINIMED #MMT-133
+"DATA",176.112,36260,1)
+490413^^Y
+"DATA",176.112,36261,0)
+4014231^SET,INFUSION MINIMED #MMT-165
+"DATA",176.112,36261,1)
+490414^^Y
+"DATA",176.112,36262,0)
+4015363^SET,INFUSION MINIMED #MMT-166
+"DATA",176.112,36262,1)
+490415^^Y
+"DATA",176.112,36263,0)
+4015362^SET,INFUSION MINIMED #MMT-167
+"DATA",176.112,36263,1)
+490416^^Y
+"DATA",176.112,36264,0)
+4015360^SET,INFUSION MINIMED #MMT-306
+"DATA",176.112,36264,1)
+490417^^Y
+"DATA",176.112,36265,0)
+4015357^SET,INFUSION MINIMED #MMT-307
+"DATA",176.112,36265,1)
+490418^^Y
+"DATA",176.112,36266,0)
+4014234^SET,INFUSION MINIMED #MMT-315
+"DATA",176.112,36266,1)
+490419^^Y
+"DATA",176.112,36267,0)
+4014069^SET,INFUSION MINIMED #MMT-316
+"DATA",176.112,36267,1)
+490420^^Y
+"DATA",176.112,36268,0)
+4015370^SET,INFUSION MINIMED #MMT-320
+"DATA",176.112,36268,1)
+490421^^Y
+"DATA",176.112,36269,0)
+4015369^SET,INFUSION MINIMED #MMT-321
+"DATA",176.112,36269,1)
+490422^^Y
+"DATA",176.112,36270,0)
+4017387^SET,INFUSION MINIMED #MMT-324
+"DATA",176.112,36270,1)
+490423^^Y
+"DATA",176.112,36271,0)
+4017386^SET,INFUSION MINIMED #MMT-325
+"DATA",176.112,36271,1)
+490424^^Y
+"DATA",176.112,36272,0)
+4014232^SET,INFUSION MINIMED #MMT-365
+"DATA",176.112,36272,1)
+490425^^Y
+"DATA",176.112,36273,0)
+4014233^SET,INFUSION MINIMED #MMT-366
+"DATA",176.112,36273,1)
+490426^^Y
+"DATA",176.112,36274,0)
+4015361^SET,INFUSION MINIMED #MMT-367
+"DATA",176.112,36274,1)
+490427^^Y
+"DATA",176.112,36275,0)
+4015368^SET,INFUSION MINIMED #MMT-371
+"DATA",176.112,36275,1)
+490428^^Y
+"DATA",176.112,36276,0)
+4015365^SET,INFUSION MINIMED #MMT-372
+"DATA",176.112,36276,1)
+490429^^Y
+"DATA",176.112,36277,0)
+4015367^SET,INFUSION MINIMED #MMT-373
+"DATA",176.112,36277,1)
+490430^^Y
+"DATA",176.112,36278,0)
+4015366^SET,INFUSION MINIMED #MMT-374
+"DATA",176.112,36278,1)
+490431^^Y
+"DATA",176.112,36279,0)
+4017062^SET,INFUSION MINIMED #MMT-377
+"DATA",176.112,36279,1)
+490432^^Y
+"DATA",176.112,36280,0)
+4016026^SET,INFUSION MINIMED #MMT-378
+"DATA",176.112,36280,1)
+490433^^Y
+"DATA",176.112,36281,0)
+4016025^SET,INFUSION MINIMED #MMT-380
+"DATA",176.112,36281,1)
+490434^^Y
+"DATA",176.112,36282,0)
+4016435^SET,INFUSION MINIMED #MMT-390
+"DATA",176.112,36282,1)
+490435^^Y
+"DATA",176.112,36283,0)
+4016436^SET,INFUSION MINIMED #MMT-391
+"DATA",176.112,36283,1)
+490436^^Y
+"DATA",176.112,36284,0)
+4016437^SET,INFUSION MINIMED #MMT-392
+"DATA",176.112,36284,1)
+490437^^Y
+"DATA",176.112,36285,0)
+4015668^SET,INFUSION MINIMED #MMT-393
+"DATA",176.112,36285,1)
+490438^^Y
+"DATA",176.112,36286,0)
+4016603^SET,INFUSION MINIMED #MMT-396
+"DATA",176.112,36286,1)
+490439^^Y
+"DATA",176.112,36287,0)
+4016604^SET,INFUSION MINIMED #MMT-397
+"DATA",176.112,36287,1)
+490440^^Y
+"DATA",176.112,36288,0)
+4016598^SET,INFUSION MINIMED #MMT-398
+"DATA",176.112,36288,1)
+490441^^Y
+"DATA",176.112,36289,0)
+4016605^SET,INFUSION MINIMED #MMT-399
+"DATA",176.112,36289,1)
+490442^^Y
+"DATA",176.112,36290,0)
+4016495^SET,INFUSION NEEDLE FREE ALARIS #72023E
+"DATA",176.112,36290,1)
+490443^^Y
+"DATA",176.112,36291,0)
+4010380^SET,INFUSION,BOLUS
+"DATA",176.112,36291,1)
+490444^^Y
+"DATA",176.112,36292,0)
+4016460^SET,INFUSION,CONTINU-FLO BAXTER #2C6537
+"DATA",176.112,36292,1)
+490445^^Y
+"DATA",176.112,36293,0)
+4016045^SET,INFUSION,EXTENSION ALARIS #20039E
+"DATA",176.112,36293,1)
+490446^^Y
+"DATA",176.112,36294,0)
+4016044^SET,INFUSION,EXTENSION ALARIS #20049E
+"DATA",176.112,36294,1)
+490447^^Y
+"DATA",176.112,36295,0)
+4010379^SET,INFUSION,VENTED
+"DATA",176.112,36295,1)
+490448^^Y
+"DATA",176.112,36296,0)
+4010388^SET,TRANSFER,STERILE
+"DATA",176.112,36296,1)
+490449^^Y
+"DATA",176.112,36297,0)
+4017274^SKIN ADHESIVE,DERMABOND 0.5ML APPLICATOR
+"DATA",176.112,36297,1)
+490450^^Y
+"DATA",176.112,36298,0)
+4016446^SKIN BARRIER FILM 3M#3346,28ML
+"DATA",176.112,36298,1)
+490451^^Y
+"DATA",176.112,36299,0)
+4012515^SKIN BARRIER FILM AERO 165GM BARD 740014
+"DATA",176.112,36299,1)
+490452^^Y
+"DATA",176.112,36300,0)
+4014885^SKIN BARRIER WIPE
+"DATA",176.112,36300,1)
+490453^^Y
+"DATA",176.112,36301,0)
+4014334^SKIN BARRIER WIPE BARD #740013
+"DATA",176.112,36301,1)
+490454^^Y
+"DATA",176.112,36302,0)
+4015971^SKIN BARRIER WIPE C#2041
+"DATA",176.112,36302,1)
+490455^^Y
+"DATA",176.112,36303,0)
+4012516^SKIN BARRIER WIPE MENTOR #44005
+"DATA",176.112,36303,1)
+490456^^Y
+"DATA",176.112,36304,0)
+4012080^SKIN BOND CEMENT
+"DATA",176.112,36304,1)
+490457^^Y
+"DATA",176.112,36305,0)
+4012081^SKIN BOND NON-FLAMMABLE CEMENT
+"DATA",176.112,36305,1)
+490458^^Y
+"DATA",176.112,36306,0)
+4012868^SKIN CLEANSER H#7210
+"DATA",176.112,36306,1)
+490459^^Y
+"DATA",176.112,36307,0)
+4011507^SKIN CONDITIONING CREME H#7220,120ML
+"DATA",176.112,36307,1)
+490460^^Y
+"DATA",176.112,36308,0)
+4012594^SKIN GEL H#7916
+"DATA",176.112,36308,1)
+490461^^Y
+"DATA",176.112,36309,0)
+4012595^SKIN GEL SPRAY H#7918
+"DATA",176.112,36309,1)
+490462^^Y
+"DATA",176.112,36310,0)
+4011511^SKIN GEL WIPE H#7917
+"DATA",176.112,36310,1)
+490463^^Y
+"DATA",176.112,36311,0)
+4012075^SKIN PREP LIQUID
+"DATA",176.112,36311,1)
+490465^^Y
+"DATA",176.112,36312,0)
+4012078^SKIN PREP SWAB
+"DATA",176.112,36312,1)
+490466^^Y
+"DATA",176.112,36313,0)
+4012077^SKIN PREP WIPE
+"DATA",176.112,36313,1)
+490467^^Y
+"DATA",176.112,36314,0)
+4012654^SKIN PROTECTANT,RESTORE H#9976
+"DATA",176.112,36314,1)
+490468^^Y
+"DATA",176.112,36315,0)
+4015248^SPECIMEN CONTAINER FIRST-TIME H#7541
+"DATA",176.112,36315,1)
+490469^^Y
+"DATA",176.112,36316,0)
+4015250^SPECIMEN CONTAINER FIRST-TIME H#7543
+"DATA",176.112,36316,1)
+490470^^Y
+"DATA",176.112,36317,0)
+4015247^SPECIMEN CONTAINER FIRST-TIME H#7545
+"DATA",176.112,36317,1)
+490471^^Y
+"DATA",176.112,36318,0)
+4015249^SPECIMEN CONTAINER FIRST-TIME H#7547
+"DATA",176.112,36318,1)
+490472^^Y
+"DATA",176.112,36319,0)
+4012354^SPECIMEN CONTAINER STERILE 150ML
+"DATA",176.112,36319,1)
+490473^^Y
+"DATA",176.112,36320,0)
+4015242^SPECIMEN CONTAINER U-BAG H#7501
+"DATA",176.112,36320,1)
+490474^^Y
+"DATA",176.112,36321,0)
+4015246^SPECIMEN CONTAINER U-BAG H#7503
+"DATA",176.112,36321,1)
+490475^^Y
+"DATA",176.112,36322,0)
+4015241^SPECIMEN CONTAINER U-BAG H#7505
+"DATA",176.112,36322,1)
+490476^^Y
+"DATA",176.112,36323,0)
+4015245^SPECIMEN CONTAINER U-BAG H#7507
+"DATA",176.112,36323,1)
+490477^^Y
+"DATA",176.112,36324,0)
+4015240^SPECIMEN CONTAINER U-BAG H#7511
+"DATA",176.112,36324,1)
+490478^^Y
+"DATA",176.112,36325,0)
+4015244^SPECIMEN CONTAINER U-BAG H#7513
+"DATA",176.112,36325,1)
+490479^^Y
+"DATA",176.112,36326,0)
+4015239^SPECIMEN CONTAINER U-BAG H#7515
+"DATA",176.112,36326,1)
+490480^^Y
+"DATA",176.112,36327,0)
+4015243^SPECIMEN CONTAINER U-BAG H#7517
+"DATA",176.112,36327,1)
+490481^^Y
+"DATA",176.112,36328,0)
+4015233^SPECIMEN CONTAINER U-BAG H#7521
+"DATA",176.112,36328,1)
+490482^^Y
+"DATA",176.112,36329,0)
+4015238^SPECIMEN CONTAINER U-BAG H#7523
+"DATA",176.112,36329,1)
+490483^^Y
+"DATA",176.112,36330,0)
+4015234^SPECIMEN CONTAINER U-BAG H#7525
+"DATA",176.112,36330,1)
+490484^^Y
+"DATA",176.112,36331,0)
+4015237^SPECIMEN CONTAINER U-BAG H#7527
+"DATA",176.112,36331,1)
+490485^^Y
+"DATA",176.112,36332,0)
+4015232^SPECIMEN CONTAINER U-BAG H#7531
+"DATA",176.112,36332,1)
+490486^^Y
+"DATA",176.112,36333,0)
+4015236^SPECIMEN CONTAINER U-BAG H#7533
+"DATA",176.112,36333,1)
+490487^^Y
+"DATA",176.112,36334,0)
+4015231^SPECIMEN CONTAINER U-BAG H#7535
+"DATA",176.112,36334,1)
+490488^^Y
+"DATA",176.112,36335,0)
+4015235^SPECIMEN CONTAINER U-BAG H#7537
+"DATA",176.112,36335,1)
+490489^^Y
+"DATA",176.112,36336,0)
+4015230^SPECIMEN CONTAINER U-BAG H#7540
+"DATA",176.112,36336,1)
+490490^^Y
+"DATA",176.112,36337,0)
+4014802^SPONGE,DRAIN 4IN X 4IN EXCILON KEN#7086
+"DATA",176.112,36337,1)
+490491^^Y
+"DATA",176.112,36338,0)
+4011703^SPONGE,DRAIN 4IN X 4IN SOFT-WICK
+"DATA",176.112,36338,1)
+490492^^Y
+"DATA",176.112,36339,0)
+4014803^SPONGE,DRAIN 4IN X 4IN SORB-IT KEN#6242P
+"DATA",176.112,36339,1)
+490493^^Y
+"DATA",176.112,36340,0)
+4017369^SPONGE,OPTIPORE,STERILE
+"DATA",176.112,36340,1)
+490494^^Y
+"DATA",176.112,36341,0)
+4011426^STOMA CAP C#0227-10
+"DATA",176.112,36341,1)
+490495^^Y
+"DATA",176.112,36342,0)
+4017027^STOMA CAP C#1756-11
+"DATA",176.112,36342,1)
+490496^^Y
+"DATA",176.112,36343,0)
+4011435^STOMA CAP COLOPLAST #5540
+"DATA",176.112,36343,1)
+490497^^Y
+"DATA",176.112,36344,0)
+4011436^STOMA CAP COLOPLAST #5560
+"DATA",176.112,36344,1)
+490498^^Y
+"DATA",176.112,36345,0)
+4011437^STOMA CAP COLOPLAST #6644
+"DATA",176.112,36345,1)
+490499^^Y
+"DATA",176.112,36346,0)
+4011438^STOMA CAP COLOPLAST #6654
+"DATA",176.112,36346,1)
+490500^^Y
+"DATA",176.112,36347,0)
+4011439^STOMA CAP COLOPLAST #6664
+"DATA",176.112,36347,1)
+490501^^Y
+"DATA",176.112,36348,0)
+4011427^STOMA CAP H#3184
+"DATA",176.112,36348,1)
+490502^^Y
+"DATA",176.112,36349,0)
+4011429^STOMA CAP H#3186
+"DATA",176.112,36349,1)
+490503^^Y
+"DATA",176.112,36350,0)
+4012646^STOMA CAP H#3402
+"DATA",176.112,36350,1)
+490504^^Y
+"DATA",176.112,36351,0)
+4012638^STOMA CAP H#3403
+"DATA",176.112,36351,1)
+490505^^Y
+"DATA",176.112,36352,0)
+4012647^STOMA CAP H#3404
+"DATA",176.112,36352,1)
+490506^^Y
+"DATA",176.112,36353,0)
+4012645^STOMA CAP H#3407
+"DATA",176.112,36353,1)
+490507^^Y
+"DATA",176.112,36354,0)
+4011431^STOMA CAP H#4302
+"DATA",176.112,36354,1)
+490508^^Y
+"DATA",176.112,36355,0)
+4011432^STOMA CAP H#4303
+"DATA",176.112,36355,1)
+490509^^Y
+"DATA",176.112,36356,0)
+4011433^STOMA CAP H#4304
+"DATA",176.112,36356,1)
+490510^^Y
+"DATA",176.112,36357,0)
+4011434^STOMA CAP H#4305
+"DATA",176.112,36357,1)
+490511^^Y
+"DATA",176.112,36358,0)
+4011428^STOMA CAP H#7183
+"DATA",176.112,36358,1)
+490512^^Y
+"DATA",176.112,36359,0)
+4011430^STOMA CAP H#7188
+"DATA",176.112,36359,1)
+490513^^Y
+"DATA",176.112,36360,0)
+4015214^STOMA CAP,CONTOUR I 50MM H#1796
+"DATA",176.112,36360,1)
+490514^^Y
+"DATA",176.112,36361,0)
+4011419^STOMA CONE H#7723
+"DATA",176.112,36361,1)
+490515^^Y
+"DATA",176.112,36362,0)
+4011420^STOMA CONE,COLOPLAST #1110
+"DATA",176.112,36362,1)
+490516^^Y
+"DATA",176.112,36363,0)
+4011418^STOMA CONE,VISI-FLOW C#0227-36
+"DATA",176.112,36363,1)
+490517^^Y
+"DATA",176.112,36364,0)
+4011452^STOMA LUBRICANT H#7740,120ML
+"DATA",176.112,36364,1)
+490518^^Y
+"DATA",176.112,36365,0)
+4012680^STOMAHESIVE STRIP
+"DATA",176.112,36365,1)
+490519^^Y
+"DATA",176.112,36366,0)
+4008634^STOMAHESIVE WAFER W/SUR-FIT FLANGE
+"DATA",176.112,36366,1)
+490520^^Y
+"DATA",176.112,36367,0)
+4014316^SUCTION CANISTER,NONSTERILE 1500ML AH#20-05-0003
+"DATA",176.112,36367,1)
+490521^^Y
+"DATA",176.112,36368,0)
+4015968^SUCTION CATHETER,12FR KENDALL #37224
+"DATA",176.112,36368,1)
+490522^^Y
+"DATA",176.112,36369,0)
+4025410^CATHETER,SUCTION,12FR KENDALL #37224
+"DATA",176.112,36369,1)
+490522^^Y
+"DATA",176.112,36370,0)
+4025411^CATHETER,SUCTION,14FR ALLEGIANCE #T60C
+"DATA",176.112,36370,1)
+490523^^Y
+"DATA",176.112,36371,0)
+4016299^SUCTION CATHETER,14FR ALLEGIANCE #T60C
+"DATA",176.112,36371,1)
+490523^^Y
+"DATA",176.112,36372,0)
+4017155^SUCTION CATHETER,KIT 14FR M#DYDN41442
+"DATA",176.112,36372,1)
+490525^^Y
+"DATA",176.112,36373,0)
+4012371^SUCTION TUBE ATTACHMENT DEVICE H#9785
+"DATA",176.112,36373,1)
+490526^^Y
+"DATA",176.112,36374,0)
+4017347^SUTURES,VICRYL
+"DATA",176.112,36374,1)
+490529^^Y
+"DATA",176.112,36375,0)
+4012004^SYRINGE 10-12ML LUER LOCK TIP
+"DATA",176.112,36375,1)
+490530^^Y
+"DATA",176.112,36376,0)
+4012005^SYRINGE 10-12ML LUER SLIP TIP
+"DATA",176.112,36376,1)
+490531^^Y
+"DATA",176.112,36377,0)
+4014719^SYRINGE 10-12ML/NDL 20G 1.5IN
+"DATA",176.112,36377,1)
+490532^^Y
+"DATA",176.112,36378,0)
+4014718^SYRINGE 10-12ML/NDL 22G 1.5IN
+"DATA",176.112,36378,1)
+490533^^Y
+"DATA",176.112,36379,0)
+4017277^SYRINGE 1ML LEUR LOCK TIP
+"DATA",176.112,36379,1)
+490534^^Y
+"DATA",176.112,36380,0)
+4012022^SYRINGE 1ML LUER LOCK TIP **GLASS**
+"DATA",176.112,36380,1)
+490535^^Y
+"DATA",176.112,36381,0)
+4014063^SYRINGE 1ML/NDL 27G 0.5IN
+"DATA",176.112,36381,1)
+490536^^Y
+"DATA",176.112,36382,0)
+4012002^SYRINGE 2.5-3ML LUER LOCK TIP
+"DATA",176.112,36382,1)
+490537^^Y
+"DATA",176.112,36383,0)
+4012021^SYRINGE 2.5-3ML LUER SLIP TIP
+"DATA",176.112,36383,1)
+490538^^Y
+"DATA",176.112,36384,0)
+4011993^SYRINGE 2.5-3ML/NDL 20G 1.5IN
+"DATA",176.112,36384,1)
+490539^^Y
+"DATA",176.112,36385,0)
+4011995^SYRINGE 2.5-3ML/NDL 22G 1.5IN
+"DATA",176.112,36385,1)
+490540^^Y
+"DATA",176.112,36386,0)
+4011994^SYRINGE 2.5-3ML/NDL 22G 1IN
+"DATA",176.112,36386,1)
+490541^^Y
+"DATA",176.112,36387,0)
+4015137^SYRINGE 2.5-3ML/NDL 25G 1IN
+"DATA",176.112,36387,1)
+490542^^Y
+"DATA",176.112,36388,0)
+4011996^SYRINGE 2.5-3ML/NDL 25G 5/8IN
+"DATA",176.112,36388,1)
+490543^^Y
+"DATA",176.112,36389,0)
+4014714^SYRINGE 2.5ML-3ML/NDL 20G 1IN
+"DATA",176.112,36389,1)
+490544^^Y
+"DATA",176.112,36390,0)
+4012006^SYRINGE 20ML LUER LOCK TIP
+"DATA",176.112,36390,1)
+490545^^Y
+"DATA",176.112,36391,0)
+4014712^SYRINGE 20ML LUER SLIP TIP
+"DATA",176.112,36391,1)
+490546^^Y
+"DATA",176.112,36392,0)
+4012007^SYRINGE 30-35ML LUER LOCK TIP
+"DATA",176.112,36392,1)
+490547^^Y
+"DATA",176.112,36393,0)
+4012008^SYRINGE 30-35ML LUER SLIP TIP
+"DATA",176.112,36393,1)
+490548^^Y
+"DATA",176.112,36394,0)
+4014229^SYRINGE 3ML MINIMED MMT-103
+"DATA",176.112,36394,1)
+490549^^Y
+"DATA",176.112,36395,0)
+4012016^SYRINGE 3ML/NDL 23G 1IN
+"DATA",176.112,36395,1)
+490550^^Y
+"DATA",176.112,36396,0)
+4012012^SYRINGE 3ML/NDL 28G 5/8IN
+"DATA",176.112,36396,1)
+490551^^Y
+"DATA",176.112,36397,0)
+4012003^SYRINGE 5-6ML LUER LOCK TIP
+"DATA",176.112,36397,1)
+490552^^Y
+"DATA",176.112,36398,0)
+4012020^SYRINGE 5-6ML LUER SLIP TIP
+"DATA",176.112,36398,1)
+490553^^Y
+"DATA",176.112,36399,0)
+4014717^SYRINGE 5-6ML/NDL 20G 1.5IN
+"DATA",176.112,36399,1)
+490554^^Y
+"DATA",176.112,36400,0)
+4014716^SYRINGE 5-6ML/NDL 21G 1.5IN
+"DATA",176.112,36400,1)
+490555^^Y
+"DATA",176.112,36401,0)
+4014715^SYRINGE 5-6ML/NDL 22G 1.5IN
+"DATA",176.112,36401,1)
+490556^^Y
+"DATA",176.112,36402,0)
+4012009^SYRINGE 50-60ML LUER LOCK TIP
+"DATA",176.112,36402,1)
+490557^^Y
+"DATA",176.112,36403,0)
+4014713^SYRINGE 50-60ML LUER SLIP TIP
+"DATA",176.112,36403,1)
+490558^^Y
+"DATA",176.112,36404,0)
+4012015^SYRINGE 5ML/NDL 21G 1IN
+"DATA",176.112,36404,1)
+490559^^Y
+"DATA",176.112,36405,0)
+4014876^SYRINGE TOOMEY 70ML BARD #041170
+"DATA",176.112,36405,1)
+490560^^Y
+"DATA",176.112,36406,0)
+4011549^TAPE STRIP,REGULAR ADHERING NU-HOPE#2330
+"DATA",176.112,36406,1)
+490561^^Y
+"DATA",176.112,36407,0)
+4011534^TAPE,COTTON 1IN F#559-3207
+"DATA",176.112,36407,1)
+490562^^Y
+"DATA",176.112,36408,0)
+4011535^TAPE,COTTON 3IN F#559-3169
+"DATA",176.112,36408,1)
+490563^^Y
+"DATA",176.112,36409,0)
+4011556^TAPE,DURAPORE 1IN 3M #1538-1
+"DATA",176.112,36409,1)
+490564^^Y
+"DATA",176.112,36410,0)
+4011557^TAPE,DURAPORE 2IN 3M #1538-2
+"DATA",176.112,36410,1)
+490565^^Y
+"DATA",176.112,36411,0)
+4017114^TAPE,DURAPORE 3IN 3M #1538-3
+"DATA",176.112,36411,1)
+490566^^Y
+"DATA",176.112,36412,0)
+4011554^TAPE,FOAM 1IN X 5YD MICROPORE
+"DATA",176.112,36412,1)
+490567^^Y
+"DATA",176.112,36413,0)
+4011563^TAPE,HYPAFIX 2IN X 10YD U#4209
+"DATA",176.112,36413,1)
+490568^^Y
+"DATA",176.112,36414,0)
+4011566^TAPE,HYPAFIX 2IN X 2YD U#4215
+"DATA",176.112,36414,1)
+490569^^Y
+"DATA",176.112,36415,0)
+4011564^TAPE,HYPAFIX 4IN X 10YD U#4210
+"DATA",176.112,36415,1)
+490570^^Y
+"DATA",176.112,36416,0)
+4011567^TAPE,HYPAFIX 4IN X 2YD U#4216
+"DATA",176.112,36416,1)
+490571^^Y
+"DATA",176.112,36417,0)
+4011565^TAPE,HYPAFIX 6IN X 10YD U#4211
+"DATA",176.112,36417,1)
+490572^^Y
+"DATA",176.112,36418,0)
+4011568^TAPE,HYPAFIX 6IN X 2YD U#4217
+"DATA",176.112,36418,1)
+490573^^Y
+"DATA",176.112,36419,0)
+4011538^TAPE,HYPOALLERGENIC 1IN F#284-5110
+"DATA",176.112,36419,1)
+490574^^Y
+"DATA",176.112,36420,0)
+4011539^TAPE,HYPOALLERGENIC 2IN F#285-3896
+"DATA",176.112,36420,1)
+490575^^Y
+"DATA",176.112,36421,0)
+4017371^TAPE,MEDIPORE H SOFT CLOTH 1IN X 10YD 3M #2861
+"DATA",176.112,36421,1)
+490576^^Y
+"DATA",176.112,36422,0)
+4017361^TAPE,MEDIPORE H SOFT CLOTH 1IN X 10YD 3M #2866
+"DATA",176.112,36422,1)
+490577^^Y
+"DATA",176.112,36423,0)
+4017359^TAPE,MEDIPORE H SOFT CLOTH 2IN X 10YD 3M #2862
+"DATA",176.112,36423,1)
+490578^^Y
+"DATA",176.112,36424,0)
+4017370^TAPE,MEDIPORE H SOFT CLOTH 2IN X 2YD 3M #2862S
+"DATA",176.112,36424,1)
+490579^^Y
+"DATA",176.112,36425,0)
+4017356^TAPE,MEDIPORE H SOFT CLOTH 3IN X 10YD 3M #2863
+"DATA",176.112,36425,1)
+490580^^Y
+"DATA",176.112,36426,0)
+4017357^TAPE,MEDIPORE H SOFT CLOTH 4IN X 10YD 3M #2864
+"DATA",176.112,36426,1)
+490581^^Y
+"DATA",176.112,36427,0)
+4017362^TAPE,MEDIPORE H SOFT CLOTH 4IN X 2YD 3M #2864S
+"DATA",176.112,36427,1)
+490582^^Y
+"DATA",176.112,36428,0)
+4017358^TAPE,MEDIPORE H SOFT CLOTH 6IN X 10YD 3M #2866
+"DATA",176.112,36428,1)
+490583^^Y
+"DATA",176.112,36429,0)
+4017360^TAPE,MEDIPORE H SOFT CLOTH 6IN X 2YD 3M #2866S
+"DATA",176.112,36429,1)
+490584^^Y
+"DATA",176.112,36430,0)
+4017355^TAPE,MEDIPORE H SOFT CLOTH 8IN X 10YD 3M #2868
+"DATA",176.112,36430,1)
+490585^^Y
+"DATA",176.112,36431,0)
+4013309^TAPE,MICROFOAM 1IN
+"DATA",176.112,36431,1)
+490586^^Y
+"DATA",176.112,36432,0)
+4011562^TAPE,MICROFOAM 2IN
+"DATA",176.112,36432,1)
+490587^^Y
+"DATA",176.112,36433,0)
+4013307^TAPE,MICROFOAM 3IN
+"DATA",176.112,36433,1)
+490588^^Y
+"DATA",176.112,36434,0)
+4013308^TAPE,MICROFOAM 4IN
+"DATA",176.112,36434,1)
+490589^^Y
+"DATA",176.112,36435,0)
+4014155^TAPE,MICROPORE 0.5IN 3M #1530-00
+"DATA",176.112,36435,1)
+490590^^Y
+"DATA",176.112,36436,0)
+4011558^TAPE,MICROPORE 1IN 3M #1530-1
+"DATA",176.112,36436,1)
+490591^^Y
+"DATA",176.112,36437,0)
+4011559^TAPE,MICROPORE 2IN 3M #1530-2
+"DATA",176.112,36437,1)
+490592^^Y
+"DATA",176.112,36438,0)
+4011561^TAPE,PAPER 0.5IN
+"DATA",176.112,36438,1)
+490593^^Y
+"DATA",176.112,36439,0)
+4015932^TAPE,PAPER 1IN
+"DATA",176.112,36439,1)
+490594^^Y
+"DATA",176.112,36440,0)
+4011540^TAPE,PAPER 1IN F#338-5405
+"DATA",176.112,36440,1)
+490595^^Y
+"DATA",176.112,36441,0)
+4011555^TAPE,PAPER 2IN
+"DATA",176.112,36441,1)
+490596^^Y
+"DATA",176.112,36442,0)
+4016303^TAPE,PAPER 3IN
+"DATA",176.112,36442,1)
+490597^^Y
+"DATA",176.112,36443,0)
+4011541^TAPE,PAPER 3IN F#338-5406
+"DATA",176.112,36443,1)
+490598^^Y
+"DATA",176.112,36444,0)
+4011547^TAPE,PINK 1.5IN X 5YD
+"DATA",176.112,36444,1)
+490599^^Y
+"DATA",176.112,36445,0)
+4011546^TAPE,PINK 1IN X 5YD
+"DATA",176.112,36445,1)
+490600^^Y
+"DATA",176.112,36446,0)
+4011548^TAPE,PINK 2IN X 5YD
+"DATA",176.112,36446,1)
+490601^^Y
+"DATA",176.112,36447,0)
+4014569^TAPE,PLASTIC 1/2IN X 10YD TRANSPORE
+"DATA",176.112,36447,1)
+490602^^Y
+"DATA",176.112,36448,0)
+4011542^TAPE,PLASTIC 1IN F#107-0223
+"DATA",176.112,36448,1)
+490603^^Y
+"DATA",176.112,36449,0)
+4011552^TAPE,PLASTIC 1IN X 10YD TRANSPORE
+"DATA",176.112,36449,1)
+490604^^Y
+"DATA",176.112,36450,0)
+4011553^TAPE,PLASTIC 2IN X 10YD TRANSPORE
+"DATA",176.112,36450,1)
+490605^^Y
+"DATA",176.112,36451,0)
+4014568^TAPE,PLASTIC 3IN X 10YD TRANSPORE
+"DATA",176.112,36451,1)
+490606^^Y
+"DATA",176.112,36452,0)
+4016270^TAPE,RAYON 0.5IN
+"DATA",176.112,36452,1)
+490607^^Y
+"DATA",176.112,36453,0)
+4016269^TAPE,RAYON 1IN
+"DATA",176.112,36453,1)
+490608^^Y
+"DATA",176.112,36454,0)
+4011532^TAPE,RAYON 1IN F#926-8882
+"DATA",176.112,36454,1)
+490609^^Y
+"DATA",176.112,36455,0)
+4016268^TAPE,RAYON 2IN
+"DATA",176.112,36455,1)
+490610^^Y
+"DATA",176.112,36456,0)
+4011533^TAPE,RAYON 2IN F#926-8883
+"DATA",176.112,36456,1)
+490611^^Y
+"DATA",176.112,36457,0)
+4016267^TAPE,RAYON 3IN
+"DATA",176.112,36457,1)
+490612^^Y
+"DATA",176.112,36458,0)
+4011560^TAPE,SURGICAL PLASTIC STRETCH 3M #1528-4
+"DATA",176.112,36458,1)
+490613^^Y
+"DATA",176.112,36459,0)
+4011545^TAPE,TWILL 0.5IN ROLL
+"DATA",176.112,36459,1)
+490614^^Y
+"DATA",176.112,36460,0)
+4011536^TAPE,WATER REPELLENT 1IN F#720-9503
+"DATA",176.112,36460,1)
+490615^^Y
+"DATA",176.112,36461,0)
+4011537^TAPE,WATER REPELLENT 2IN F#058-5484
+"DATA",176.112,36461,1)
+490616^^Y
+"DATA",176.112,36462,0)
+4011551^TAPE,WATERPROOF 1IN X 11YD SCANPOR
+"DATA",176.112,36462,1)
+490617^^Y
+"DATA",176.112,36463,0)
+4011550^TAPE,WATERPROOF 2IN X 11YD SCANPOR
+"DATA",176.112,36463,1)
+490618^^Y
+"DATA",176.112,36464,0)
+4012263^TELFA ADHESIVE PAD 2IN X 3IN
+"DATA",176.112,36464,1)
+490619^^Y
+"DATA",176.112,36465,0)
+4012264^TELFA ADHESIVE PAD 3IN X 4IN
+"DATA",176.112,36465,1)
+490620^^Y
+"DATA",176.112,36466,0)
+4014157^TELFA ADHESIVE PAD 4IN X 8IN
+"DATA",176.112,36466,1)
+490621^^Y
+"DATA",176.112,36467,0)
+4012265^TELFA PAD NON-ADHESIVE 2IN X 3IN
+"DATA",176.112,36467,1)
+490622^^Y
+"DATA",176.112,36468,0)
+4012266^TELFA PAD NON-ADHESIVE 3IN X 4IN
+"DATA",176.112,36468,1)
+490623^^Y
+"DATA",176.112,36469,0)
+4014393^TELFA PAD NON-ADHESIVE 3IN X 6IN
+"DATA",176.112,36469,1)
+490624^^Y
+"DATA",176.112,36470,0)
+4014394^TELFA PAD NON-ADHESIVE 3IN X 8IN
+"DATA",176.112,36470,1)
+490625^^Y
+"DATA",176.112,36471,0)
+4012357^TRACH APRON
+"DATA",176.112,36471,1)
+490626^^Y
+"DATA",176.112,36472,0)
+4012358^TRACH BRUSH
+"DATA",176.112,36472,1)
+490627^^Y
+"DATA",176.112,36473,0)
+4016424^TRACH CANNULA,SZ 10 SHLY #10-DIC
+"DATA",176.112,36473,1)
+490628^^Y
+"DATA",176.112,36474,0)
+4016421^TRACH CANNULA,SZ 4 SHLY #4-DIC
+"DATA",176.112,36474,1)
+490629^^Y
+"DATA",176.112,36475,0)
+4016422^TRACH CANNULA,SZ 6 SHLY #6-DIC
+"DATA",176.112,36475,1)
+490630^^Y
+"DATA",176.112,36476,0)
+4016423^TRACH CANNULA,SZ 8 SHLY #8-DIC
+"DATA",176.112,36476,1)
+490631^^Y
+"DATA",176.112,36477,0)
+4015254^TRACH STRAP H#9788
+"DATA",176.112,36477,1)
+490632^^Y
+"DATA",176.112,36478,0)
+4012356^TRACH SUCTION KIT,2 GLOVES,14FR
+"DATA",176.112,36478,1)
+490633^^Y
+"DATA",176.112,36479,0)
+4015093^TRACH TIES FOAM LARGE POSEY #8197
+"DATA",176.112,36479,1)
+490634^^Y
+"DATA",176.112,36480,0)
+4015092^TRACH TIES FOAM MEDIUM POSEY #8197
+"DATA",176.112,36480,1)
+490635^^Y
+"DATA",176.112,36481,0)
+4015091^TRACH TIES FOAM SMALL POSEY #8197
+"DATA",176.112,36481,1)
+490636^^Y
+"DATA",176.112,36482,0)
+4015253^TRACH TUBE ATTACHMENT DEVICE H#9789
+"DATA",176.112,36482,1)
+490637^^Y
+"DATA",176.112,36483,0)
+4012359^TRACH TUBE,SIZE 6 CUFFLESS STK#550060
+"DATA",176.112,36483,1)
+490638^^Y
+"DATA",176.112,36484,0)
+4015751^TRACH TUBE,SZ 10 LO PRESSURE W/CUFF SHLY #10-DCT
+"DATA",176.112,36484,1)
+490639^^Y
+"DATA",176.112,36485,0)
+4015742^TRACH TUBE,SZ 4 CUFFLESS SHLY #4-CFS
+"DATA",176.112,36485,1)
+490640^^Y
+"DATA",176.112,36486,0)
+4015745^TRACH TUBE,SZ 4 CUFFLESS/FENESTRATED SHLY #4-CFN
+"DATA",176.112,36486,1)
+490641^^Y
+"DATA",176.112,36487,0)
+4015748^TRACH TUBE,SZ 4 LO PRESSURE W/CUFF SHLY #4-DCT
+"DATA",176.112,36487,1)
+490642^^Y
+"DATA",176.112,36488,0)
+4015755^TRACH TUBE,SZ 4 W/CUFF FENESTRATED SHLY #4-DFEN
+"DATA",176.112,36488,1)
+490643^^Y
+"DATA",176.112,36489,0)
+4015752^TRACH TUBE,SZ 4 W/CUFF FENESTRATED SHLY #4-FEN
+"DATA",176.112,36489,1)
+490644^^Y
+"DATA",176.112,36490,0)
+4015743^TRACH TUBE,SZ 6 CUFFLESS SHLY #6-CFS
+"DATA",176.112,36490,1)
+490645^^Y
+"DATA",176.112,36491,0)
+4015746^TRACH TUBE,SZ 6 CUFFLESS/FENESTRATED SHLY #6-CFN
+"DATA",176.112,36491,1)
+490646^^Y
+"DATA",176.112,36492,0)
+4015749^TRACH TUBE,SZ 6 LO PRESSURE W/CUFF SHLY #6-DCT
+"DATA",176.112,36492,1)
+490647^^Y
+"DATA",176.112,36493,0)
+4015756^TRACH TUBE,SZ 6 W/CUFF FENESTRATED SHLY #6-DFEN
+"DATA",176.112,36493,1)
+490648^^Y
+"DATA",176.112,36494,0)
+4015753^TRACH TUBE,SZ 6 W/CUFF FENESTRATED SHLY #6-FEN
+"DATA",176.112,36494,1)
+490649^^Y
+"DATA",176.112,36495,0)
+4016545^TRACH TUBE,SZ 8 CUFFED SHLY #8-LPC
+"DATA",176.112,36495,1)
+490650^^Y
+"DATA",176.112,36496,0)
+4015744^TRACH TUBE,SZ 8 CUFFLESS SHLY #8-CFS
+"DATA",176.112,36496,1)
+490651^^Y
+"DATA",176.112,36497,0)
+4015747^TRACH TUBE,SZ 8 CUFFLESS/FENESTRATED SHLY #8-CFN
+"DATA",176.112,36497,1)
+490652^^Y
+"DATA",176.112,36498,0)
+4015750^TRACH TUBE,SZ 8 LO PRESSURE W/CUFF SHLY #8-DCT
+"DATA",176.112,36498,1)
+490653^^Y
+"DATA",176.112,36499,0)
+4015757^TRACH TUBE,SZ 8 W/CUFF FENESTRATED SHLY #8-DFEN
+"DATA",176.112,36499,1)
+490654^^Y
+"DATA",176.112,36500,0)
+4015754^TRACH TUBE,SZ 8 W/CUFF FENESTRATED SHLY #8-FEN
+"DATA",176.112,36500,1)
+490655^^Y
+"DATA",176.112,36501,0)
+4015403^TRACHEAL SUCTION SET 10FR BARD #140040
+"DATA",176.112,36501,1)
+490656^^Y
+"DATA",176.112,36502,0)
+4015404^TRACHEAL SUCTION SET 14FR BARD #140050
+"DATA",176.112,36502,1)
+490657^^Y
+"DATA",176.112,36503,0)
+4011988^TRACHEAL SUCTION SET 14FR F#005-7329
+"DATA",176.112,36503,1)
+490658^^Y
+"DATA",176.112,36504,0)
+4011989^TRACHEAL SUCTION SET 14FR F#206-9626
+"DATA",176.112,36504,1)
+490659^^Y
+"DATA",176.112,36505,0)
+4011987^TRACHEAL SUCTION SET 14FR F#590-0754
+"DATA",176.112,36505,1)
+490660^^Y
+"DATA",176.112,36506,0)
+4015405^TRACHEAL SUCTION SET 18FR BARD #140060
+"DATA",176.112,36506,1)
+490661^^Y
+"DATA",176.112,36507,0)
+4011991^TRACHEAL SUCTION SET 18FR F#207-3773
+"DATA",176.112,36507,1)
+490662^^Y
+"DATA",176.112,36508,0)
+4011990^TRACHEAL SUCTION SET 18FR F#295-4917
+"DATA",176.112,36508,1)
+490663^^Y
+"DATA",176.112,36509,0)
+4015141^TRACHEAL SUCTION SET 18FR MEDLINE #DYND40974
+"DATA",176.112,36509,1)
+490664^^Y
+"DATA",176.112,36510,0)
+4015406^TRACHEAL SUCTION SET 5FR BARD #140070
+"DATA",176.112,36510,1)
+490665^^Y
+"DATA",176.112,36511,0)
+4015407^TRACHEAL SUCTION SET 8FR BARD #140080
+"DATA",176.112,36511,1)
+490666^^Y
+"DATA",176.112,36512,0)
+4011718^TRACHEOSTOMY PAD F#185-6779
+"DATA",176.112,36512,1)
+490668^^Y
+"DATA",176.112,36513,0)
+4012361^TRACHEOSTOMY TUBE 8MM BLUE LINE
+"DATA",176.112,36513,1)
+490669^^Y
+"DATA",176.112,36514,0)
+4012644^TRACHEOSTOMY TUBE HOLDER DALE #240
+"DATA",176.112,36514,1)
+490670^^Y
+"DATA",176.112,36515,0)
+4014200^TRACHEOSTOMY TUBE HOLDER SIMS#520000
+"DATA",176.112,36515,1)
+490671^^Y
+"DATA",176.112,36516,0)
+4012693^TRACHEOTOMY DRESSING KIT #447-1720
+"DATA",176.112,36516,1)
+490672^^Y
+"DATA",176.112,36517,0)
+4015596^TUBE FEEDING GT 14FR ROSS#152
+"DATA",176.112,36517,1)
+490673^^Y
+"DATA",176.112,36518,0)
+4015599^TUBE FEEDING GT 16FR ROSS#153
+"DATA",176.112,36518,1)
+490674^^Y
+"DATA",176.112,36519,0)
+4015600^TUBE FEEDING GT 18FR ROSS#154
+"DATA",176.112,36519,1)
+490675^^Y
+"DATA",176.112,36520,0)
+4015602^TUBE FEEDING GT 20FR ROSS#155
+"DATA",176.112,36520,1)
+490676^^Y
+"DATA",176.112,36521,0)
+4015601^TUBE FEEDING GT 20FR ROSS#156
+"DATA",176.112,36521,1)
+490677^^Y
+"DATA",176.112,36522,0)
+4015603^TUBE FEEDING GT 22FR ROSS#156
+"DATA",176.112,36522,1)
+490678^^Y
+"DATA",176.112,36523,0)
+4015598^TUBE FEEDING GT 24FR ROSS#159
+"DATA",176.112,36523,1)
+490679^^Y
+"DATA",176.112,36524,0)
+4015597^TUBE FEEDING GT 26FR ROSS#158
+"DATA",176.112,36524,1)
+490680^^Y
+"DATA",176.112,36525,0)
+4015566^TUBE FEEDING NG 10FR 36IN CORPAK#20-1361
+"DATA",176.112,36525,1)
+490681^^Y
+"DATA",176.112,36526,0)
+4015565^TUBE FEEDING NG 10FR 3GM 36IN CORPAK#20-5361
+"DATA",176.112,36526,1)
+490682^^Y
+"DATA",176.112,36527,0)
+4015564^TUBE FEEDING NG 10FR 3GM 43IN CORPAK#20-5431
+"DATA",176.112,36527,1)
+490683^^Y
+"DATA",176.112,36528,0)
+4015567^TUBE FEEDING NG 10FR 43IN CORPAK#20-1431
+"DATA",176.112,36528,1)
+490684^^Y
+"DATA",176.112,36529,0)
+4015577^TUBE FEEDING NG 10FR STYLET 3GM 36IN CORPAK#20-7361
+"DATA",176.112,36529,1)
+490685^^Y
+"DATA",176.112,36530,0)
+4015568^TUBE FEEDING NG 10FR STYLET 3GM 36IN CORPAK#20-7368
+"DATA",176.112,36530,1)
+490686^^Y
+"DATA",176.112,36531,0)
+4015570^TUBE FEEDING NG 10FR STYLET 7GM 43IN CORPAK#20-4431
+"DATA",176.112,36531,1)
+490687^^Y
+"DATA",176.112,36532,0)
+4015569^TUBE FEEDING NG 10FR SYTLET 3GM 43IN CORPAK#20-7431
+"DATA",176.112,36532,1)
+490688^^Y
+"DATA",176.112,36533,0)
+4015573^TUBE FEEDING NG 12FR 36IN CORPAK#20-1362
+"DATA",176.112,36533,1)
+490689^^Y
+"DATA",176.112,36534,0)
+4015571^TUBE FEEDING NG 12FR 3GM 36IN CORPAK#20-5362
+"DATA",176.112,36534,1)
+490690^^Y
+"DATA",176.112,36535,0)
+4015572^TUBE FEEDING NG 12FR 3GM 43IN CORPAK#20-5432
+"DATA",176.112,36535,1)
+490691^^Y
+"DATA",176.112,36536,0)
+4015574^TUBE FEEDING NG 12FR 43IN CORPAK#20-1432
+"DATA",176.112,36536,1)
+490692^^Y
+"DATA",176.112,36537,0)
+4015575^TUBE FEEDING NG 12FR STYLET 3GM 43IN CORPAK#20-7432
+"DATA",176.112,36537,1)
+490693^^Y
+"DATA",176.112,36538,0)
+4015576^TUBE FEEDING NG 12FR STYLET 7GM 43IN CORPAK#20-4432
+"DATA",176.112,36538,1)
+490694^^Y
+"DATA",176.112,36539,0)
+4015580^TUBE FEEDING NG 8FR 36IN CORPAK#20-1368
+"DATA",176.112,36539,1)
+490695^^Y
+"DATA",176.112,36540,0)
+4015579^TUBE FEEDING NG 8FR 3GM 36IN 43IN CORPAK#20-5438
+"DATA",176.112,36540,1)
+490696^^Y
+"DATA",176.112,36541,0)
+4015581^TUBE FEEDING NG 8FR 43IN CORPAK#20-1438
+"DATA",176.112,36541,1)
+490697^^Y
+"DATA",176.112,36542,0)
+4015578^TUBE FEEDING NG 8FR STYLET 3GM 36IN CORPAK#20-7368
+"DATA",176.112,36542,1)
+490698^^Y
+"DATA",176.112,36543,0)
+4015582^TUBE FEEDING NG 8FR STYLET 3GM 43IN CORPAK#20-7438
+"DATA",176.112,36543,1)
+490699^^Y
+"DATA",176.112,36544,0)
+4015583^TUBE FEEDING NG 8FR STYLET 7GM 43IN CORPAK#20-4438
+"DATA",176.112,36544,1)
+490700^^Y
+"DATA",176.112,36545,0)
+4015775^TUBE FEEDING SET COMPAT #199307
+"DATA",176.112,36545,1)
+490701^^Y
+"DATA",176.112,36546,0)
+4015776^TUBE FEEDING SET COMPAT #199347
+"DATA",176.112,36546,1)
+490702^^Y
+"DATA",176.112,36547,0)
+4015777^TUBE FEEDING SET COMPAT #199407
+"DATA",176.112,36547,1)
+490703^^Y
+"DATA",176.112,36548,0)
+4015778^TUBE FEEDING SET COMPAT #199447
+"DATA",176.112,36548,1)
+490704^^Y
+"DATA",176.112,36549,0)
+4016779^TUBE FEEDING SET COMPAT #199547
+"DATA",176.112,36549,1)
+490705^^Y
+"DATA",176.112,36550,0)
+4012364^TUBE FEEDING SET GRAVITY ROSS #056
+"DATA",176.112,36550,1)
+490706^^Y
+"DATA",176.112,36551,0)
+4015958^TUBE FEEDING SET KANGAROO K#702500
+"DATA",176.112,36551,1)
+490707^^Y
+"DATA",176.112,36552,0)
+4012363^TUBE FEEDING SET W/BAG FLEXIFLO III #052
+"DATA",176.112,36552,1)
+490708^^Y
+"DATA",176.112,36553,0)
+4016038^TUBE FEEDING SET W/BAG PATROL #52048
+"DATA",176.112,36553,1)
+490709^^Y
+"DATA",176.112,36554,0)
+4014227^TUBING,ADAPTER BARD #000538
+"DATA",176.112,36554,1)
+490710^^Y
+"DATA",176.112,36555,0)
+4012375^TUBING,BARD #150615,18IN
+"DATA",176.112,36555,1)
+490711^^Y
+"DATA",176.112,36556,0)
+4015130^TUBING,EXTENSION 18IN KENDALL#8884731900
+"DATA",176.112,36556,1)
+490712^^Y
+"DATA",176.112,36557,0)
+4015131^TUBING,EXTENSION 18IN KENDALL#8884736000
+"DATA",176.112,36557,1)
+490713^^Y
+"DATA",176.112,36558,0)
+4014226^TUBING,EXTENSION 3/16IN BARD #017514
+"DATA",176.112,36558,1)
+490714^^Y
+"DATA",176.112,36559,0)
+4014225^TUBING,EXTENSION 9/32IN BARD #017513
+"DATA",176.112,36559,1)
+490715^^Y
+"DATA",176.112,36560,0)
+4012370^TUBING,LATEX 1/4IN (ID)
+"DATA",176.112,36560,1)
+490716^^Y
+"DATA",176.112,36561,0)
+4015617^TUBING,LATEX 3/16IN
+"DATA",176.112,36561,1)
+490717^^Y
+"DATA",176.112,36562,0)
+4012365^TUBING,LATEX 5/16IN
+"DATA",176.112,36562,1)
+490718^^Y
+"DATA",176.112,36563,0)
+4012368^TUBING,LATEX 7/16IN
+"DATA",176.112,36563,1)
+490719^^Y
+"DATA",176.112,36564,0)
+4014062^TUBING,LATEX EXTENSION 9/32IN (ID) BARD #4A4194
+"DATA",176.112,36564,1)
+490720^^Y
+"DATA",176.112,36565,0)
+4016198^TUBING,SUCTION GI 3/8IN KENDALL #155655
+"DATA",176.112,36565,1)
+490721^^Y
+"DATA",176.112,36566,0)
+4012376^TUBING,SUR-FIT C#0270-62
+"DATA",176.112,36566,1)
+490722^^Y
+"DATA",176.112,36567,0)
+4008800^UNNA BOOT
+"DATA",176.112,36567,1)
+490723^^Y
+"DATA",176.112,36568,0)
+4008801^UNNA BOOT,STERILE 3 IN X 10 YDS
+"DATA",176.112,36568,1)
+490724^^Y
+"DATA",176.112,36569,0)
+4014389^UNNA BOOT,WITH CALAMINE 3IN X 10YDS
+"DATA",176.112,36569,1)
+490725^^Y
+"DATA",176.112,36570,0)
+4014390^UNNA BOOT,WITH CALAMINE 4IN X 10YDS
+"DATA",176.112,36570,1)
+490726^^Y
+"DATA",176.112,36571,0)
+4014391^UNNA BOOT,WITHOUT CALAMINE 3IN X 10YDS
+"DATA",176.112,36571,1)
+490727^^Y
+"DATA",176.112,36572,0)
+4014392^UNNA BOOT,WITHOUT CALAMINE 4IN X 10YDS
+"DATA",176.112,36572,1)
+490728^^Y
+"DATA",176.112,36573,0)
+4015228^UROSTOMY KIT H#3913
+"DATA",176.112,36573,1)
+490729^^Y
+"DATA",176.112,36574,0)
+4015229^UROSTOMY KIT H#3914
+"DATA",176.112,36574,1)
+490730^^Y
+"DATA",176.112,36575,0)
+4011362^UROSTOMY KIT H#3915
+"DATA",176.112,36575,1)
+490731^^Y
+"DATA",176.112,36576,0)
+4011363^UROSTOMY KIT H#3916
+"DATA",176.112,36576,1)
+490732^^Y
+"DATA",176.112,36577,0)
+4015227^UROSTOMY KIT H#3917
+"DATA",176.112,36577,1)
+490733^^Y
+"DATA",176.112,36578,0)
+4011361^UROSTOMY SET,STERILE H#3912
+"DATA",176.112,36578,1)
+490734^^Y
+"DATA",176.112,36579,0)
+4011054^UROSTOMY SET,STERILE O.R.GUARDIAN H#4773
+"DATA",176.112,36579,1)
+490735^^Y
+"DATA",176.112,36580,0)
+4011055^UROSTOMY SET,STERILE O.R.GUARDIAN H#4774
+"DATA",176.112,36580,1)
+490736^^Y
+"DATA",176.112,36581,0)
+4010652^WAFER,DURAHESIVE C#1259-69
+"DATA",176.112,36581,1)
+490737^^Y
+"DATA",176.112,36582,0)
+4010653^WAFER,DURAHESIVE C#1259-70
+"DATA",176.112,36582,1)
+490738^^Y
+"DATA",176.112,36583,0)
+4010654^WAFER,DURAHESIVE C#1259-71
+"DATA",176.112,36583,1)
+490739^^Y
+"DATA",176.112,36584,0)
+4010655^WAFER,DURAHESIVE C#1259-72
+"DATA",176.112,36584,1)
+490740^^Y
+"DATA",176.112,36585,0)
+4010656^WAFER,DURAHESIVE C#1259-73
+"DATA",176.112,36585,1)
+490741^^Y
+"DATA",176.112,36586,0)
+4010647^WAFER,DURAHESIVE C#1259-89
+"DATA",176.112,36586,1)
+490742^^Y
+"DATA",176.112,36587,0)
+4010648^WAFER,DURAHESIVE C#1259-90
+"DATA",176.112,36587,1)
+490743^^Y
+"DATA",176.112,36588,0)
+4010649^WAFER,DURAHESIVE C#1259-91
+"DATA",176.112,36588,1)
+490744^^Y
+"DATA",176.112,36589,0)
+4010650^WAFER,DURAHESIVE C#1259-92
+"DATA",176.112,36589,1)
+490745^^Y
+"DATA",176.112,36590,0)
+4010651^WAFER,DURAHESIVE C#1259-93
+"DATA",176.112,36590,1)
+490746^^Y
+"DATA",176.112,36591,0)
+4013597^WAFER,DURAHESIVE W/CONVEX-IT C#1252-78
+"DATA",176.112,36591,1)
+490747^^Y
+"DATA",176.112,36592,0)
+4013598^WAFER,DURAHESIVE W/CONVEX-IT C#1252-79
+"DATA",176.112,36592,1)
+490748^^Y
+"DATA",176.112,36593,0)
+4013733^WAFER,DURAHESIVE W/CONVEX-IT C#1252-80
+"DATA",176.112,36593,1)
+490749^^Y
+"DATA",176.112,36594,0)
+4013599^WAFER,DURAHESIVE W/CONVEX-IT C#1252-81
+"DATA",176.112,36594,1)
+490750^^Y
+"DATA",176.112,36595,0)
+4013600^WAFER,DURAHESIVE W/CONVEX-IT C#1252-82
+"DATA",176.112,36595,1)
+490751^^Y
+"DATA",176.112,36596,0)
+4013601^WAFER,DURAHESIVE W/CONVEX-IT C#1252-83
+"DATA",176.112,36596,1)
+490752^^Y
+"DATA",176.112,36597,0)
+4013602^WAFER,DURAHESIVE W/CONVEX-IT C#1252-84
+"DATA",176.112,36597,1)
+490753^^Y
+"DATA",176.112,36598,0)
+4013609^WAFER,DURAHESIVE W/CONVEX-IT C#1252-85
+"DATA",176.112,36598,1)
+490754^^Y
+"DATA",176.112,36599,0)
+4013610^WAFER,DURAHESIVE W/CONVEX-IT C#1252-86
+"DATA",176.112,36599,1)
+490755^^Y
+"DATA",176.112,36600,0)
+4013611^WAFER,DURAHESIVE W/CONVEX-IT C#1252-87
+"DATA",176.112,36600,1)
+490756^^Y
+"DATA",176.112,36601,0)
+4013612^WAFER,DURAHESIVE W/CONVEX-IT C#1252-88
+"DATA",176.112,36601,1)
+490757^^Y
+"DATA",176.112,36602,0)
+4013613^WAFER,DURAHESIVE W/CONVEX-IT C#1252-89
+"DATA",176.112,36602,1)
+490758^^Y
+"DATA",176.112,36603,0)
+4010657^WAFER,DURAHESIVE W/CONVEX-IT C#1784-65
+"DATA",176.112,36603,1)
+490759^^Y
+"DATA",176.112,36604,0)
+4010642^WAFER,DURAHESIVE W/CONVEX-IT C#1784-66
+"DATA",176.112,36604,1)
+490760^^Y
+"DATA",176.112,36605,0)
+4010645^WAFER,DURAHESIVE W/CONVEX-IT C#1784-67
+"DATA",176.112,36605,1)
+490761^^Y
+"DATA",176.112,36606,0)
+4010643^WAFER,DURAHESIVE W/CONVEX-IT C#1784-68
+"DATA",176.112,36606,1)
+490762^^Y
+"DATA",176.112,36607,0)
+4010644^WAFER,DURAHESIVE W/CONVEX-IT C#1784-69
+"DATA",176.112,36607,1)
+490763^^Y
+"DATA",176.112,36608,0)
+4010646^WAFER,DURAHESIVE W/CONVEX-IT C#1784-70
+"DATA",176.112,36608,1)
+490764^^Y
+"DATA",176.112,36609,0)
+4010658^WAFER,DURAHESIVE W/CONVEX-IT C#1784-71
+"DATA",176.112,36609,1)
+490765^^Y
+"DATA",176.112,36610,0)
+4010659^WAFER,DURAHESIVE W/CONVEX-IT C#1784-72
+"DATA",176.112,36610,1)
+490766^^Y
+"DATA",176.112,36611,0)
+4010660^WAFER,DURAHESIVE W/CONVEX-IT C#1784-73
+"DATA",176.112,36611,1)
+490767^^Y
+"DATA",176.112,36612,0)
+4010661^WAFER,DURAHESIVE W/CONVEX-IT C#1784-74
+"DATA",176.112,36612,1)
+490768^^Y
+"DATA",176.112,36613,0)
+4010662^WAFER,DURAHESIVE W/CONVEX-IT C#1784-75
+"DATA",176.112,36613,1)
+490769^^Y
+"DATA",176.112,36614,0)
+4010663^WAFER,DURAHESIVE W/CONVEX-IT C#1784-76
+"DATA",176.112,36614,1)
+490770^^Y
+"DATA",176.112,36615,0)
+4010636^WAFER,DURAHESIVE W/FLANGE C#0225-65
+"DATA",176.112,36615,1)
+490771^^Y
+"DATA",176.112,36616,0)
+4010637^WAFER,DURAHESIVE W/FLANGE C#0225-66
+"DATA",176.112,36616,1)
+490772^^Y
+"DATA",176.112,36617,0)
+4010638^WAFER,DURAHESIVE W/FLANGE C#0225-67
+"DATA",176.112,36617,1)
+490773^^Y
+"DATA",176.112,36618,0)
+4010639^WAFER,DURAHESIVE W/FLANGE C#0225-68
+"DATA",176.112,36618,1)
+490774^^Y
+"DATA",176.112,36619,0)
+4010640^WAFER,DURAHESIVE W/FLANGE C#0225-69
+"DATA",176.112,36619,1)
+490775^^Y
+"DATA",176.112,36620,0)
+4010641^WAFER,DURAHESIVE W/FLANGE C#0225-70
+"DATA",176.112,36620,1)
+490776^^Y
+"DATA",176.112,36621,0)
+4013590^WAFER,DURAHESIVE W/FLANGE C#4019-00
+"DATA",176.112,36621,1)
+490777^^Y
+"DATA",176.112,36622,0)
+4013592^WAFER,DURAHESIVE W/FLANGE C#4019-01
+"DATA",176.112,36622,1)
+490778^^Y
+"DATA",176.112,36623,0)
+4013593^WAFER,DURAHESIVE W/FLANGE C#4019-02
+"DATA",176.112,36623,1)
+490779^^Y
+"DATA",176.112,36624,0)
+4013594^WAFER,DURAHESIVE W/FLANGE C#4019-03
+"DATA",176.112,36624,1)
+490780^^Y
+"DATA",176.112,36625,0)
+4013595^WAFER,DURAHESIVE W/FLANGE C#4019-04
+"DATA",176.112,36625,1)
+490781^^Y
+"DATA",176.112,36626,0)
+4013596^WAFER,DURAHESIVE W/FLANGE C#4019-05
+"DATA",176.112,36626,1)
+490782^^Y
+"DATA",176.112,36627,0)
+4008639^WAFER,STOMAHESIVE 4IN X 4IN C#0217-12
+"DATA",176.112,36627,1)
+490783^^Y
+"DATA",176.112,36628,0)
+4008640^WAFER,STOMAHESIVE 8IN X 8IN C#0217-15
+"DATA",176.112,36628,1)
+490784^^Y
+"DATA",176.112,36629,0)
+4008642^WAFER,STOMAHESIVE W/FLANGE C#0223-41
+"DATA",176.112,36629,1)
+490785^^Y
+"DATA",176.112,36630,0)
+4008635^WAFER,STOMAHESIVE W/FLANGE C#0256-05
+"DATA",176.112,36630,1)
+490786^^Y
+"DATA",176.112,36631,0)
+4008636^WAFER,STOMAHESIVE W/FLANGE C#0256-10
+"DATA",176.112,36631,1)
+490787^^Y
+"DATA",176.112,36632,0)
+4008637^WAFER,STOMAHESIVE W/FLANGE C#0256-11
+"DATA",176.112,36632,1)
+490788^^Y
+"DATA",176.112,36633,0)
+4008638^WAFER,STOMAHESIVE W/FLANGE C#0256-12
+"DATA",176.112,36633,1)
+490789^^Y
+"DATA",176.112,36634,0)
+4013569^WAFER,STOMAHESIVE W/FLANGE C#4015-73
+"DATA",176.112,36634,1)
+490790^^Y
+"DATA",176.112,36635,0)
+4013570^WAFER,STOMAHESIVE W/FLANGE C#4015-74
+"DATA",176.112,36635,1)
+490791^^Y
+"DATA",176.112,36636,0)
+4013571^WAFER,STOMAHESIVE W/FLANGE C#4015-75
+"DATA",176.112,36636,1)
+490792^^Y
+"DATA",176.112,36637,0)
+4013572^WAFER,STOMAHESIVE W/FLANGE C#4015-76
+"DATA",176.112,36637,1)
+490793^^Y
+"DATA",176.112,36638,0)
+4013573^WAFER,STOMAHESIVE W/FLANGE C#4015-77
+"DATA",176.112,36638,1)
+490794^^Y
+"DATA",176.112,36639,0)
+4013574^WAFER,STOMAHESIVE W/FLANGE C#4019-06
+"DATA",176.112,36639,1)
+490795^^Y
+"DATA",176.112,36640,0)
+4012799^WAFER,SUR-FIT C#1685-55
+"DATA",176.112,36640,1)
+490796^^Y
+"DATA",176.112,36641,0)
+4012800^WAFER,SUR-FIT C#1685-56
+"DATA",176.112,36641,1)
+490797^^Y
+"DATA",176.112,36642,0)
+4012801^WAFER,SUR-FIT C#1685-57
+"DATA",176.112,36642,1)
+490798^^Y
+"DATA",176.112,36643,0)
+4012802^WAFER,SUR-FIT C#1685-58
+"DATA",176.112,36643,1)
+490799^^Y
+"DATA",176.112,36644,0)
+4012798^WAFER,SUR-FIT C#1685-59
+"DATA",176.112,36644,1)
+490800^^Y
+"DATA",176.112,36645,0)
+4012803^WAFER,SUR-FIT C#1685-61
+"DATA",176.112,36645,1)
+490801^^Y
+"DATA",176.112,36646,0)
+4012804^WAFER,SUR-FIT C#1685-62
+"DATA",176.112,36646,1)
+490802^^Y
+"DATA",176.112,36647,0)
+4012805^WAFER,SUR-FIT C#1685-63
+"DATA",176.112,36647,1)
+490803^^Y
+"DATA",176.112,36648,0)
+4012806^WAFER,SUR-FIT C#1685-64
+"DATA",176.112,36648,1)
+490804^^Y
+"DATA",176.112,36649,0)
+4012807^WAFER,SUR-FIT C#1685-65
+"DATA",176.112,36649,1)
+490805^^Y
+"DATA",176.112,36650,0)
+4012808^WAFER,SUR-FIT C#1685-66
+"DATA",176.112,36650,1)
+490806^^Y
+"DATA",176.112,36651,0)
+4014609^WAFER,SUR-FIT,DURAHESIVE,1-3/4IN C#4013-06
+"DATA",176.112,36651,1)
+490807^^Y
+"DATA",176.112,36652,0)
+4014608^WAFER,SUR-FIT,DURAHESIVE,1-3/8IN C#4013-05
+"DATA",176.112,36652,1)
+490808^^Y
+"DATA",176.112,36653,0)
+4014610^WAFER,SUR-FIT,DURAHESIVE,2-1/4IN C#4013-07
+"DATA",176.112,36653,1)
+490809^^Y
+"DATA",176.112,36654,0)
+4014611^WAFER,SUR-FIT,DURAHESIVE,2-3/4IN C#4013-08
+"DATA",176.112,36654,1)
+490810^^Y
+"DATA",176.112,36655,0)
+4014613^WAFER,SUR-FIT,DURAHESIVE,4IN C#4013-04
+"DATA",176.112,36655,1)
+490811^^Y
+"DATA",176.112,36656,0)
+4012814^WAFER,SUR-FIT,FLEXIBLE C#1252-57
+"DATA",176.112,36656,1)
+490812^^Y
+"DATA",176.112,36657,0)
+4012815^WAFER,SUR-FIT,FLEXIBLE C#1252-58
+"DATA",176.112,36657,1)
+490813^^Y
+"DATA",176.112,36658,0)
+4012816^WAFER,SUR-FIT,FLEXIBLE C#1252-59
+"DATA",176.112,36658,1)
+490814^^Y
+"DATA",176.112,36659,0)
+4012817^WAFER,SUR-FIT,FLEXIBLE C#1252-60
+"DATA",176.112,36659,1)
+490815^^Y
+"DATA",176.112,36660,0)
+4012818^WAFER,SUR-FIT,FLEXIBLE C#1252-61
+"DATA",176.112,36660,1)
+490816^^Y
+"DATA",176.112,36661,0)
+4012809^WAFER,SUR-FIT,FLEXIBLE C#1252-62
+"DATA",176.112,36661,1)
+490817^^Y
+"DATA",176.112,36662,0)
+4012810^WAFER,SUR-FIT,FLEXIBLE C#1252-63
+"DATA",176.112,36662,1)
+490818^^Y
+"DATA",176.112,36663,0)
+4012811^WAFER,SUR-FIT,FLEXIBLE C#1252-64
+"DATA",176.112,36663,1)
+490819^^Y
+"DATA",176.112,36664,0)
+4012812^WAFER,SUR-FIT,FLEXIBLE C#1252-65
+"DATA",176.112,36664,1)
+490820^^Y
+"DATA",176.112,36665,0)
+4012813^WAFER,SUR-FIT,FLEXIBLE C#1252-66
+"DATA",176.112,36665,1)
+490821^^Y
+"DATA",176.112,36666,0)
+4013575^WAFER,SUR-FIT,FLEXIBLE C#1252-67
+"DATA",176.112,36666,1)
+490822^^Y
+"DATA",176.112,36667,0)
+4013576^WAFER,SUR-FIT,FLEXIBLE C#1252-68
+"DATA",176.112,36667,1)
+490823^^Y
+"DATA",176.112,36668,0)
+4013577^WAFER,SUR-FIT,FLEXIBLE C#1252-69
+"DATA",176.112,36668,1)
+490824^^Y
+"DATA",176.112,36669,0)
+4013578^WAFER,SUR-FIT,FLEXIBLE C#1252-70
+"DATA",176.112,36669,1)
+490825^^Y
+"DATA",176.112,36670,0)
+4013579^WAFER,SUR-FIT,FLEXIBLE C#1252-71
+"DATA",176.112,36670,1)
+490826^^Y
+"DATA",176.112,36671,0)
+4013580^WAFER,SUR-FIT,FLEXIBLE C#1252-72
+"DATA",176.112,36671,1)
+490827^^Y
+"DATA",176.112,36672,0)
+4013581^WAFER,SUR-FIT,FLEXIBLE C#1252-73
+"DATA",176.112,36672,1)
+490828^^Y
+"DATA",176.112,36673,0)
+4013582^WAFER,SUR-FIT,FLEXIBLE C#1252-74
+"DATA",176.112,36673,1)
+490829^^Y
+"DATA",176.112,36674,0)
+4013583^WAFER,SUR-FIT,FLEXIBLE C#1252-75
+"DATA",176.112,36674,1)
+490830^^Y
+"DATA",176.112,36675,0)
+4013584^WAFER,SUR-FIT,FLEXIBLE C#1252-76
+"DATA",176.112,36675,1)
+490831^^Y
+"DATA",176.112,36676,0)
+4013585^WAFER,SUR-FIT,FLEXIBLE C#1252-77
+"DATA",176.112,36676,1)
+490832^^Y
+"DATA",176.112,36677,0)
+4014605^WAFER,SUR-FIT,STOMAHESIVE,1-3/4IN C#4014-30
+"DATA",176.112,36677,1)
+490833^^Y
+"DATA",176.112,36678,0)
+4014604^WAFER,SUR-FIT,STOMAHESIVE,1-3/8IN C#4014-29
+"DATA",176.112,36678,1)
+490834^^Y
+"DATA",176.112,36679,0)
+4014606^WAFER,SUR-FIT,STOMAHESIVE,2-1/4IN C#4014-31
+"DATA",176.112,36679,1)
+490835^^Y
+"DATA",176.112,36680,0)
+4014607^WAFER,SUR-FIT,STOMAHESIVE,2-3/4IN C#4014-32
+"DATA",176.112,36680,1)
+490836^^Y
+"DATA",176.112,36681,0)
+4016657^WAFER,SURFIT-NAT FLEXIBLE C#4131-59
+"DATA",176.112,36681,1)
+490837^^Y
+"DATA",176.112,36682,0)
+4016658^WAFER,SURFIT-NAT FLEXIBLE C#4131-60
+"DATA",176.112,36682,1)
+490838^^Y
+"DATA",176.112,36683,0)
+4016659^WAFER,SURFIT-NAT FLEXIBLE C#4131-61
+"DATA",176.112,36683,1)
+490839^^Y
+"DATA",176.112,36684,0)
+4016660^WAFER,SURFIT-NAT FLEXIBLE C#4131-62
+"DATA",176.112,36684,1)
+490840^^Y
+"DATA",176.112,36685,0)
+4016661^WAFER,SURFIT-NAT FLEXIBLE C#4131-63
+"DATA",176.112,36685,1)
+490841^^Y
+"DATA",176.112,36686,0)
+4016652^WAFER,SURFIT-NAT FLEXIBLE C#4131-64
+"DATA",176.112,36686,1)
+490842^^Y
+"DATA",176.112,36687,0)
+4016653^WAFER,SURFIT-NAT FLEXIBLE C#4131-65
+"DATA",176.112,36687,1)
+490843^^Y
+"DATA",176.112,36688,0)
+4016654^WAFER,SURFIT-NAT FLEXIBLE C#4131-66
+"DATA",176.112,36688,1)
+490844^^Y
+"DATA",176.112,36689,0)
+4016655^WAFER,SURFIT-NAT FLEXIBLE C#4131-67
+"DATA",176.112,36689,1)
+490845^^Y
+"DATA",176.112,36690,0)
+4016656^WAFER,SURFIT-NAT FLEXIBLE C#4131-68
+"DATA",176.112,36690,1)
+490846^^Y
+"DATA",176.112,36691,0)
+4016662^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-77
+"DATA",176.112,36691,1)
+490847^^Y
+"DATA",176.112,36692,0)
+4016663^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-78
+"DATA",176.112,36692,1)
+490848^^Y
+"DATA",176.112,36693,0)
+4016664^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-79
+"DATA",176.112,36693,1)
+490849^^Y
+"DATA",176.112,36694,0)
+4016665^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-80
+"DATA",176.112,36694,1)
+490850^^Y
+"DATA",176.112,36695,0)
+4016666^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-81
+"DATA",176.112,36695,1)
+490851^^Y
+"DATA",176.112,36696,0)
+4016667^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-82
+"DATA",176.112,36696,1)
+490852^^Y
+"DATA",176.112,36697,0)
+4016668^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-83
+"DATA",176.112,36697,1)
+490853^^Y
+"DATA",176.112,36698,0)
+4016669^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-84
+"DATA",176.112,36698,1)
+490854^^Y
+"DATA",176.112,36699,0)
+4016670^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-85
+"DATA",176.112,36699,1)
+490855^^Y
+"DATA",176.112,36700,0)
+4016671^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-86
+"DATA",176.112,36700,1)
+490856^^Y
+"DATA",176.112,36701,0)
+4016672^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-87
+"DATA",176.112,36701,1)
+490857^^Y
+"DATA",176.112,36702,0)
+4016673^WAFER,SURFIT-NAT W/CONVEX-IT C#4131-88
+"DATA",176.112,36702,1)
+490858^^Y
+"DATA",176.112,36703,0)
+4016647^WAFER,SURFIT-NAT W/FLANGE C#4131-53
+"DATA",176.112,36703,1)
+490859^^Y
+"DATA",176.112,36704,0)
+4016648^WAFER,SURFIT-NAT W/FLANGE C#4131-54
+"DATA",176.112,36704,1)
+490860^^Y
+"DATA",176.112,36705,0)
+4016649^WAFER,SURFIT-NAT W/FLANGE C#4131-55
+"DATA",176.112,36705,1)
+490861^^Y
+"DATA",176.112,36706,0)
+4016650^WAFER,SURFIT-NAT W/FLANGE C#4131-56
+"DATA",176.112,36706,1)
+490862^^Y
+"DATA",176.112,36707,0)
+4016651^WAFER,SURFIT-NAT W/FLANGE C#4131-57
+"DATA",176.112,36707,1)
+490863^^Y
+"DATA",176.112,36708,0)
+4014351^WOUND COLLECTOR H#9701
+"DATA",176.112,36708,1)
+490865^^Y
+"DATA",176.112,36709,0)
+4014352^WOUND COLLECTOR H#9702
+"DATA",176.112,36709,1)
+490866^^Y
+"DATA",176.112,36710,0)
+4014353^WOUND COLLECTOR H#9703
+"DATA",176.112,36710,1)
+490867^^Y
+"DATA",176.112,36711,0)
+4014355^WOUND COLLECTOR H#9772
+"DATA",176.112,36711,1)
+490868^^Y
+"DATA",176.112,36712,0)
+4013471^WOUND COLLECTOR H#9773
+"DATA",176.112,36712,1)
+490869^^Y
+"DATA",176.112,36713,0)
+4014356^WOUND COLLECTOR H#9775
+"DATA",176.112,36713,1)
+490870^^Y
+"DATA",176.112,36714,0)
+4014354^WOUND COLLECTOR H#9776
+"DATA",176.112,36714,1)
+490871^^Y
+"DATA",176.112,36715,0)
+4014357^WOUND COLLECTOR H#9777
+"DATA",176.112,36715,1)
+490872^^Y
+"DATA",176.112,36716,0)
+4014350^WOUND COLLECTOR H#9778
+"DATA",176.112,36716,1)
+490873^^Y
+"DATA",176.112,36717,0)
+4012869^CLEANSER,RESTORE H#9976
+"DATA",176.112,36717,1)
+490874^^Y
+"DATA",176.112,36718,0)
+4013618^CLEANSER,SAF-CLENS SPRAY,TOP
+"DATA",176.112,36718,1)
+490875^^Y
+"DATA",176.112,36719,0)
+4015342^CLEANSER,SENSI-CARE PERINEAL SOLN,TOP
+"DATA",176.112,36719,1)
+490876^^Y
+"DATA",176.112,36720,0)
+4013680^CLEANSER,SHUR-CLENS SOLN,TOP
+"DATA",176.112,36720,1)
+490877^^Y
+"DATA",176.112,36721,0)
+4015148^CLEANSER,SKIN AND WOUND
+"DATA",176.112,36721,1)
+490879^^Y
+"DATA",176.112,36722,0)
+4013678^CLEANSER,SPROAM SPRAY,TOP
+"DATA",176.112,36722,1)
+490880^^Y
+"DATA",176.112,36723,0)
+4015797^CLEANSER,SKIN
+"DATA",176.112,36723,1)
+490881^^Y
+"DATA",176.112,36724,0)
+4015740^CLEANSER,SSKIN
+"DATA",176.112,36724,1)
+490881^^Y
+"DATA",176.112,36725,0)
+4013677^CLEANSER,UNI WASH
+"DATA",176.112,36725,1)
+490882^^Y
+"DATA",176.112,36726,0)
+4008651^SUSTACAL EGG NOG
+"DATA",176.112,36726,1)
+490883^^Y
+"DATA",176.112,36727,0)
+4012493^SUSTACAL HC LIQUID CHOCOLATE
+"DATA",176.112,36727,1)
+490884^^Y
+"DATA",176.112,36728,0)
+4012492^SUSTACAL HC LIQUID EGGNOG
+"DATA",176.112,36728,1)
+490885^^Y
+"DATA",176.112,36729,0)
+4012491^SUSTACAL HC LIQUID VANILLA
+"DATA",176.112,36729,1)
+490886^^Y
+"DATA",176.112,36730,0)
+4008660^SUSTACAL PUDDING VANILLA
+"DATA",176.112,36730,1)
+490889^^Y
+"DATA",176.112,36731,0)
+4008654^SUSTACAL PWDR CHOCOLATE
+"DATA",176.112,36731,1)
+490890^^Y
+"DATA",176.112,36732,0)
+4008655^SUSTACAL PWDR VANILLA
+"DATA",176.112,36732,1)
+490891^^Y
+"DATA",176.112,36733,0)
+4012489^SUSTACAL W/FIBER LIQUID CHOCOLATE
+"DATA",176.112,36733,1)
+490893^^Y
+"DATA",176.112,36734,0)
+4012490^SUSTACAL W/FIBER LIQUID STRAWBERRY
+"DATA",176.112,36734,1)
+490894^^Y
+"DATA",176.112,36735,0)
+4012488^SUSTACAL W/FIBER LIQUID VANILLA
+"DATA",176.112,36735,1)
+490895^^Y
+"DATA",176.112,36736,0)
+4012378^NIGHT DRAIN KIT MARLEN
+"DATA",176.112,36736,1)
+490939^^Y
+"DATA",176.112,36737,0)
+4024878^AMIODARONE HCL (PACERONE) 100MG TAB
+"DATA",176.112,36737,1)
+540543^^Y
+"DATA",176.112,36738,0)
+4016364^TERIPARATIDE RECOMBINANT 250MCG/ML (750MCG) INJ,PEN,3ML
+"DATA",176.112,36738,1)
+540883^^Y
+"DATA",176.112,36739,0)
+4026461^SOMATROPIN (TEV-TROPIN) 5MG/VIL INJ
+"DATA",176.112,36739,1)
+541144^^Y
+"DATA",176.112,36740,0)
+4027086^METFORMIN HCL (FORTAMET) 1000MG TAB,SA
+"DATA",176.112,36740,1)
+541769^^Y
+"DATA",176.112,36741,0)
+4027087^METFORMIN HCL (FORTAMET) 500MG TAB,SA
+"DATA",176.112,36741,1)
+541811^^Y
+"DATA",176.112,36742,0)
+4013568^NICOTINE 10MG/CARTRIDGE INHL,ORAL,42/KIT
+"DATA",176.112,36742,1)
+542345^^Y
+"DATA",176.112,36743,0)
+4017048^NICOTINE 10MG/CARTRIDGE INHL,ORAL,168/KIT
+"DATA",176.112,36743,1)
+542345^^Y
+"DATA",176.112,36744,0)
+4024552^CLOZAPINE (FAZACLO) 100MG TAB,UD,RAPID DISINTEGRATING
+"DATA",176.112,36744,1)
+542977^^Y
+"DATA",176.112,36745,0)
+4024551^CLOZAPINE (FAZACLO) 25MG TAB,UD,RAPID DISINTEGRATING
+"DATA",176.112,36745,1)
+543013^^Y
+"DATA",176.112,36746,0)
+4027181^SOMATROPIN (NORDITROPIN) 10MG/1.5ML INJ,SOLN,NORDIFLEX,1.5ML
+"DATA",176.112,36746,1)
+543752^^Y
+"DATA",176.112,36747,0)
+4003486^COLESTIPOL GRANULES
+"DATA",176.112,36747,1)
+544539^^Y
+"DATA",176.112,36748,0)
+4027587^ESTRADIOL 0.014MG/DAY (MENOSTAR) PATCH
+"DATA",176.112,36748,1)
+545276^^Y
+"DATA",176.112,36749,0)
+4009123^MINERAL OIL,LIGHT
+"DATA",176.112,36749,1)
+577312^^Y
+"DATA",176.112,36750,0)
+4026453^SOMATROPIN (HUMATROPE) 12MG/VIL INJ,CARTRIDGE
+"DATA",176.112,36750,1)
+582971^^Y
+"DATA",176.112,36751,0)
+4026468^SOMATROPIN (ZORBTIVE) 8.8MG/VIL INJ
+"DATA",176.112,36751,1)
+582984^^Y
+"DATA",176.112,36752,0)
+4016720^TRIPTORELIN PAMOATE 11.25MG/KIT INJ,SUSP,SA
+"DATA",176.112,36752,1)
+583255^^Y
+"DATA",176.112,36753,0)
+4011914^TONGUE DEPRESSOR
+"DATA",176.112,36753,1)
+586416^^Y
+"DATA",176.112,36754,0)
+4010220^GLYCOLIC ACID
+"DATA",176.112,36754,1)
+587318^^Y
+"DATA",176.112,36755,0)
+4016610^PEPTINEX DT LIQUID UNFLAVORED,250ML
+"DATA",176.112,36755,1)
+588176^^Y
+"DATA",176.112,36756,0)
+4016612^PEPTINEX DT LIQUID UNFLAVORED,1500ML
+"DATA",176.112,36756,1)
+588964^^Y
+"DATA",176.112,36757,0)
+4016536^PEPTINEX LIQUID VANILLA,237ML
+"DATA",176.112,36757,1)
+589175^^Y
+"DATA",176.112,36758,0)
+4016791^WATER FOR INJECTION,STERILE,20ML
+"DATA",176.112,36758,1)
+589360^^Y
+"DATA",176.112,36759,0)
+4012678^ELECTRODE GEL,SPECTRA 360
+"DATA",176.112,36759,1)
+590182^^Y
+"DATA",176.112,36760,0)
+4012025^TRACHEOSTOMY CARE KIT
+"DATA",176.112,36760,1)
+595681^^Y
+"DATA",176.112,36761,0)
+4001733^PROCAINAMIDE HCL (PROCANBID) 500MG TAB,SA
+"DATA",176.112,36761,1)
+597925^^Y
+"DATA",176.112,36762,0)
+4001732^PROCAINAMIDE HCL (PROCANBID) 1000MG TAB,SA
+"DATA",176.112,36762,1)
+597926^^Y
+"DATA",176.112,36763,0)
+4026086^LANCET,ULTILET
+"DATA",176.112,36763,1)
+599823^^Y
+"DATA",176.112,36764,0)
+4026381^GLUCERNA SHAKE LIQUID STRAWBERRY
+"DATA",176.112,36764,1)
+602353^^Y
+"DATA",176.112,36765,0)
+4024825^JEVITY 1.5 CAL LIQUID
+"DATA",176.112,36765,1)
+602929^^Y
+"DATA",176.112,36766,0)
+4009386^LANOLIN OINT,TOP
+"DATA",176.112,36766,1)
+605674^^Y
+"DATA",176.112,36767,0)
+4017224^GRAPEFRUIT JUICE
+"DATA",176.112,36767,1)
+613829^^Y
+"DATA",176.112,36768,0)
+4009580^EMPTY GELATIN CAP,CLEAR SZ 0
+"DATA",176.112,36768,1)
+615070^^Y
+"DATA",176.112,36769,0)
+4009583^EMPTY GELATIN CAP,CLEAR SZ 3
+"DATA",176.112,36769,1)
+615077^^Y
+"DATA",176.112,36770,0)
+4010549^FUNGI NAIL SOLN,TOP
+"DATA",176.112,36770,1)
+616779^^Y
+"DATA",176.112,36771,0)
+4025749^LANCET,ACCU-CHEK MULTICLIX DEVICE
+"DATA",176.112,36771,1)
+617782^^Y
+"DATA",176.112,36772,0)
+4013024^FACTOR IX,RECOMBINANT 1000 UNT/VIL INJ
+"DATA",176.112,36772,1)
+619349^^Y
+"DATA",176.112,36773,0)
+4009578^EMPTY GELATIN CAP,CLEAR SZ 000
+"DATA",176.112,36773,1)
+619875^^Y
+"DATA",176.112,36774,0)
+4009581^EMPTY GELATIN CAP,CLEAR SZ 1
+"DATA",176.112,36774,1)
+619993^^Y
+"DATA",176.112,36775,0)
+4009579^EMPTY GELATIN CAP,CLEAR SZ 00
+"DATA",176.112,36775,1)
+620206^^Y
+"DATA",176.112,36776,0)
+4009584^EMPTY GELATIN CAP,CLEAR SZ 4
+"DATA",176.112,36776,1)
+620269^^Y
+"DATA",176.112,36777,0)
+4013026^FACTOR IX,RECOMBINANT 250 UNT/VIL INJ
+"DATA",176.112,36777,1)
+621859^^Y
+"DATA",176.112,36778,0)
+4009582^EMPTY GELATIN CAP,CLEAR SZ 2
+"DATA",176.112,36778,1)
+622005^^Y
+"DATA",176.112,36779,0)
+4003880^AMPICILLIN 3.5GM/PROBENECID 1GM/BTL SUSP
+"DATA",176.112,36779,1)
+623739^^Y
+"DATA",176.112,36780,0)
+4003879^AMPICILLIN TRIHYDRATE 3.5GM/PROBENECID 1GM/BTL SUSP
+"DATA",176.112,36780,1)
+623739^^Y
+"DATA",176.112,36781,0)
+4001914^TETRACYCLINE HCL 500MG/VIL INJ IV
+"DATA",176.112,36781,1)
+623779^^Y
+"DATA",176.112,36782,0)
+4001921^TETRACYCLINE 500MG/VIL INJ IV
+"DATA",176.112,36782,1)
+623779^^Y
+"DATA",176.112,36783,0)
+4007778^GLYCINE 750MG/NIACIN 25MG/PYRIDOXINE 6MG PWDR,ORAL
+"DATA",176.112,36783,1)
+628128^^Y
+"DATA",176.112,36784,0)
+4004187^METRIZAMIDE 2.5GM/VIL INJ
+"DATA",176.112,36784,1)
+628134^^Y
+"DATA",176.112,36785,0)
+4006929^VIT B12 25MCG/GLYCINE 750MG/B3 25MG/B6 6MG LIQUID
+"DATA",176.112,36785,1)
+628136^^Y
+"DATA",176.112,36786,0)
+4008108^GLYCINE 500MG/NIACIN 50MG LIQUID
+"DATA",176.112,36786,1)
+628206^^Y
+"DATA",176.112,36787,0)
+4008121^THIOBUTABARBITAL NA 1GM/AMP INJ
+"DATA",176.112,36787,1)
+628217^^Y
+"DATA",176.112,36788,0)
+4005138^RHO (D) IMMUNE GLOBULIN,HUMAN INJ
+"DATA",176.112,36788,1)
+628221^^Y
+"DATA",176.112,36789,0)
+4005899^NOVAMINE 11.4% INJ
+"DATA",176.112,36789,1)
+628265^^Y
+"DATA",176.112,36790,0)
+4008122^THIOBUTABARBITAL NA 0.5GM/AMP INJ
+"DATA",176.112,36790,1)
+628438^^Y
+"DATA",176.112,36791,0)
+4025511^METHYLPHENIDATE HCL (METADATE CD) 50MG CAP,SA
+"DATA",176.112,36791,1)
+630811^^Y
+"DATA",176.112,36792,0)
+4026054^RHO (D) IMMUNE GLOBULIN,HUMAN (WINRHO SDF) 15000UNT/VIL INJ
+"DATA",176.112,36792,1)
+630941^^Y
+"DATA",176.112,36793,0)
+4026055^RHO (D) IMMUNE GLOBULIN,HUMAN (WINRHO SDF) 2500UNT/VIL INJ
+"DATA",176.112,36793,1)
+630973^^Y
+"DATA",176.112,36794,0)
+4025541^EXUBERA CHAMBER
+"DATA",176.112,36794,1)
+631273^^Y
+"DATA",176.112,36795,0)
+4026051^METHYLPHENIDATE HCL (METADATE CD) 40MG CAP,SA
+"DATA",176.112,36795,1)
+631392^^Y
+"DATA",176.112,36796,0)
+4025823^METHYLPHENIDATE HCL (METADATE CD) 60MG CAP,SA
+"DATA",176.112,36796,1)
+631396^^Y
+"DATA",176.112,36797,0)
+4009960^AROMATIC ELIXIR
+"DATA",176.112,36797,1)
+631832^^Y
+"DATA",176.112,36798,0)
+4025025^MENTHOL 1.4% PATCH
+"DATA",176.112,36798,1)
+635139^^Y
+"DATA",176.112,36799,0)
+4013012^ROPIVACAINE HCL 0.75% INJ,STERILE-PAK,20ML
+"DATA",176.112,36799,1)
+638235^^Y
+"DATA",176.112,36800,0)
+4003188^NAFCILLIN NA 180MG/VIL INJ
+"DATA",176.112,36800,1)
+638245^^Y
+"DATA",176.112,36801,0)
+4013017^ROPIVACAINE HCL 1% INJ,STERILE-PAK,20ML
+"DATA",176.112,36801,1)
+638401^^Y
+"DATA",176.112,36802,0)
+4004698^TICARCILLIN 3GM/CLAVULANATE K 0.2GM/VIL INJ
+"DATA",176.112,36802,1)
+638415^^Y
+"DATA",176.112,36803,0)
+4013009^ROPIVACAINE HCL 0.5% INJ,STERILE-PAK,30ML
+"DATA",176.112,36803,1)
+639381^^Y
+"DATA",176.112,36804,0)
+4007714^DM 7.4MG/IPECAC 0.17MIN/K GUAIACOLSULF 44MG/PROMETH 5MG SYR
+"DATA",176.112,36804,1)
+639488^^Y
+"DATA",176.112,36805,0)
+4003900^ALBUMIN,MICROSPHERE HUMAN SERUM 5MG/UNT INJ
+"DATA",176.112,36805,1)
+639494^^Y
+"DATA",176.112,36806,0)
+4003971^SODIUM PHOSPHATE (P-32) 0.16MIL/ML INJ
+"DATA",176.112,36806,1)
+639864^^Y
+"DATA",176.112,36807,0)
+4026465^SOMATROPIN (OMNITROPE) 5.8MG/VIL INJ
+"DATA",176.112,36807,1)
+645884^^Y
+"DATA",176.112,36808,0)
+4024877^AMIODARONE HCL (PACERONE) 300MG TAB
+"DATA",176.112,36808,1)
+646452^^Y
+"DATA",176.112,36809,0)
+4012705^OMEGA-3 (N-3) POLYUNSATURATED FATTY ACIDS 1GM CAP
+"DATA",176.112,36809,1)
+646470^^Y
+"DATA",176.112,36810,0)
+4027088^METFORMIN HCL (GLUMETZA) 500MG TAB,SA
+"DATA",176.112,36810,1)
+647242^^Y
+"DATA",176.112,36811,0)
+4010488^CONTACT LENS (FOR HARD LENS) SOLN
+"DATA",176.112,36811,1)
+647635^^Y
+"DATA",176.112,36812,0)
+4010487^CONTACT LENS SOAKING SOLN
+"DATA",176.112,36812,1)
+647641^^Y
+"DATA",176.112,36813,0)
+4010559^CONTACT LENS SOLN (UNISOL)
+"DATA",176.112,36813,1)
+647643^^Y
+"DATA",176.112,36814,0)
+4010489^CONTACT LENS WET & SOAK SOLN
+"DATA",176.112,36814,1)
+647644^^Y
+"DATA",176.112,36815,0)
+4003255^EPINEPHRINE HCL 0.5MG RETRACTION CORD #0
+"DATA",176.112,36815,1)
+647671^^Y
+"DATA",176.112,36816,0)
+4016844^FENTANYL CITRATE PWDR
+"DATA",176.112,36816,1)
+647679^^Y
+"DATA",176.112,36817,0)
+4009994^CETYL ALCOHOL LIQUID
+"DATA",176.112,36817,1)
+647704^^Y
+"DATA",176.112,36818,0)
+4009719^ACTIFED SINUS DAYTIME/NIGHTIME TAB,PKG #24
+"DATA",176.112,36818,1)
+647936^^Y
+"DATA",176.112,36819,0)
+4002143^APATATE LIQUID
+"DATA",176.112,36819,1)
+647946^^Y
+"DATA",176.112,36820,0)
+4012602^CONTACT LENS CLEANING (BOSTON) SOLN
+"DATA",176.112,36820,1)
+647967^^Y
+"DATA",176.112,36821,0)
+4012604^CONTACT LENS DISINFECTING (OXYSEPT 1) SOLN
+"DATA",176.112,36821,1)
+647968^^Y
+"DATA",176.112,36822,0)
+4010560^CONTACT LENS SOLN (UNISOL 4)
+"DATA",176.112,36822,1)
+647971^^Y
+"DATA",176.112,36823,0)
+4015428^LUBRICATING JELLY,TOP,BACTERIOSTATIC
+"DATA",176.112,36823,1)
+648073^^Y
+"DATA",176.112,36824,0)
+4000916^PROGESTERONE PWDR
+"DATA",176.112,36824,1)
+648154^^Y
+"DATA",176.112,36825,0)
+4007363^RENACIDIN PWDR
+"DATA",176.112,36825,1)
+648172^^Y
+"DATA",176.112,36826,0)
+4008219^SHILEY AL LUMEN SUBCLAVIAN CANNULA INSERTION PKG
+"DATA",176.112,36826,1)
+648183^^Y
+"DATA",176.112,36827,0)
+4006071^SODIUM BICARBONATE PWDR
+"DATA",176.112,36827,1)
+648192^^Y
+"DATA",176.112,36828,0)
+4002092^SYRVITE LIQUID
+"DATA",176.112,36828,1)
+648207^^Y
+"DATA",176.112,36829,0)
+4009825^TARTARIC ACID PWDR
+"DATA",176.112,36829,1)
+648215^^Y
+"DATA",176.112,36830,0)
+4009826^TRAGACANTH PWDR
+"DATA",176.112,36830,1)
+648239^^Y
+"DATA",176.112,36831,0)
+4005221^TRETINOIN PWDR
+"DATA",176.112,36831,1)
+648242^^Y
+"DATA",176.112,36832,0)
+4013327^ACCU-CHEK INSTANT (GLUCOSE) CONTROL SOLN
+"DATA",176.112,36832,1)
+654228^^Y
+"DATA",176.112,36833,0)
+4012337^ALKALOL SOLUTION
+"DATA",176.112,36833,1)
+654231^^Y
+"DATA",176.112,36834,0)
+4016769^CANDIDA 1:1000 SKIN TEST
+"DATA",176.112,36834,1)
+654301^^Y
+"DATA",176.112,36835,0)
+4010278^ACRIFLAVINE HCL PWDR
+"DATA",176.112,36835,1)
+655025^^Y
+"DATA",176.112,36836,0)
+4012609^BABY SHAMPOO
+"DATA",176.112,36836,1)
+655064^^Y
+"DATA",176.112,36837,0)
+4008687^CLIOQUINOL PWDR
+"DATA",176.112,36837,1)
+655475^^Y
+"DATA",176.112,36838,0)
+4014483^CETAPHIL OILY SKIN CLEANSER
+"DATA",176.112,36838,1)
+655519^^Y
+"DATA",176.112,36839,0)
+4009011^CHARCOAL,ACTIVATED PWDR
+"DATA",176.112,36839,1)
+655520^^Y
+"DATA",176.112,36840,0)
+4010474^CONTACT LENS PRESERVED SALINE SOLN
+"DATA",176.112,36840,1)
+655533^^Y
+"DATA",176.112,36841,0)
+4012601^CONTACT LENS REWETTING (BOSTON ADVANCE) SOLN
+"DATA",176.112,36841,1)
+655534^^Y
+"DATA",176.112,36842,0)
+4012605^CONTACT LENS RINSE/NEUTRALIZER (OXYSEPT 2) SOLN,15ML
+"DATA",176.112,36842,1)
+655536^^Y
+"DATA",176.112,36843,0)
+4010561^CONTACT LENS SOLN (UNISOL PLUS)
+"DATA",176.112,36843,1)
+655538^^Y
+"DATA",176.112,36844,0)
+4012753^AMMENS POWDER
+"DATA",176.112,36844,1)
+655553^^Y
+"DATA",176.112,36845,0)
+4010320^ANTI-FUNGAL NAIL TREATMENT
+"DATA",176.112,36845,1)
+655554^^Y
+"DATA",176.112,36846,0)
+4013831^MEDI-SENSE NORMAL GLUCOSE CONTROL SOLN
+"DATA",176.112,36846,1)
+655608^^Y
+"DATA",176.112,36847,0)
+4009132^MINERAL OIL,LIGHT,TOP,BTL,30ML
+"DATA",176.112,36847,1)
+655610^^Y
+"DATA",176.112,36848,0)
+4009844^RESORCINOL PWDR
+"DATA",176.112,36848,1)
+655619^^Y
+"DATA",176.112,36849,0)
+4014883^ALCOHOL,ABSOLUTE 100% LIQUID
+"DATA",176.112,36849,1)
+655789^^Y
+"DATA",176.112,36850,0)
+4014578^EYELID CLEANSER,EYE SCRUB LIQUID,OPH
+"DATA",176.112,36850,1)
+655792^^Y
+"DATA",176.112,36851,0)
+4007574^CASTELLANI PAINT,COLORLESS,TOP
+"DATA",176.112,36851,1)
+655802^^Y
+"DATA",176.112,36852,0)
+4010541^CONTACT LENS SOLN (FLEX-CARE)
+"DATA",176.112,36852,1)
+655804^^Y
+"DATA",176.112,36853,0)
+4007718^DESA HIST LIQUID
+"DATA",176.112,36853,1)
+655805^^Y
+"DATA",176.112,36854,0)
+4014580^LUBRICANT MOISTURIZER VAGINAL GEL
+"DATA",176.112,36854,1)
+655821^^Y
+"DATA",176.112,36855,0)
+4010374^MICRO-KLENZ,ANTIMICROBIAL WOUND CLEANSER
+"DATA",176.112,36855,1)
+655892^^Y
+"DATA",176.112,36856,0)
+4010072^NUSOAP SOAP
+"DATA",176.112,36856,1)
+655897^^Y
+"DATA",176.112,36857,0)
+4009806^OLEIC ACID LIQUID
+"DATA",176.112,36857,1)
+655899^^Y
+"DATA",176.112,36858,0)
+4013619^MEDISENSE 2 (GLUCOSE) CONTROL SOLN
+"DATA",176.112,36858,1)
+655902^^Y
+"DATA",176.112,36859,0)
+4010242^PH SKIN CLEANSER
+"DATA",176.112,36859,1)
+655908^^Y
+"DATA",176.112,36860,0)
+4009824^TANNIC ACID PWDR
+"DATA",176.112,36860,1)
+656009^^Y
+"DATA",176.112,36861,0)
+4000709^THYROID PWDR
+"DATA",176.112,36861,1)
+656033^^Y
+"DATA",176.112,36862,0)
+4001629^TRIAMCINOLONE ACETONIDE PWDR
+"DATA",176.112,36862,1)
+656054^^Y
+"DATA",176.112,36863,0)
+4009828^XYLENE,ANHYDROUS LIQUID
+"DATA",176.112,36863,1)
+656063^^Y
+"DATA",176.112,36864,0)
+4006990^ZINC SULFATE PWDR
+"DATA",176.112,36864,1)
+656065^^Y
+"DATA",176.112,36865,0)
+4009925^SLOANS LINIMENT
+"DATA",176.112,36865,1)
+656077^^Y
+"DATA",176.112,36866,0)
+4010475^CONTACT LENS DAILY CLEANER
+"DATA",176.112,36866,1)
+656191^^Y
+"DATA",176.112,36867,0)
+4010484^CONTACT LENS WETTING SOLN
+"DATA",176.112,36867,1)
+656193^^Y
+"DATA",176.112,36868,0)
+4005366^IBERET SOLN
+"DATA",176.112,36868,1)
+656295^^Y
+"DATA",176.112,36869,0)
+4004181^FLUOCINOLONE ACETONIDE PWDR,TOP
+"DATA",176.112,36869,1)
+657031^^Y
+"DATA",176.112,36870,0)
+4001138^TESTOSTERONE ENANTHATE 200MG/TESTOSTERONE PROPIONATE 25MG INJ
+"DATA",176.112,36870,1)
+657641^^Y
+"DATA",176.112,36871,0)
+4011783^TEXAS CATHETER
+"DATA",176.112,36871,1)
+657719^^Y
+"DATA",176.112,36872,0)
+4007421^IPECAC 0.17MIN/P-EPHRINE 5MG/K GUAIACOLSULF 44MG/PROMETH 5MG LIQ
+"DATA",176.112,36872,1)
+658314^^Y
+"DATA",176.112,36873,0)
+4003300^PENTOBARBITAL NA PWDR
+"DATA",176.112,36873,1)
+658724^^Y
+"DATA",176.112,36874,0)
+4003945^TECHNETIUM-99m 2.5MIL AGGREGATED ALBUMIN (HUMAN) INJ
+"DATA",176.112,36874,1)
+659111^^Y
+"DATA",176.112,36875,0)
+4013246^BUPROPION HCL (WELLBUTRIN SR) 150MG TAB,SA
+"DATA",176.112,36875,1)
+664755^^Y
+"DATA",176.112,36876,0)
+4016623^BUPROPION HCL (WELLBUTRIN SR) 200MG TAB,SA
+"DATA",176.112,36876,1)
+664756^^Y
+"DATA",176.112,36877,0)
+4024587^AMYLASE 15000UNIT/LIPASE 1200UNIT/PROTEASE 15000UNIT
+"DATA",176.112,36877,1)
+665823^^Y
+"DATA",176.112,36878,0)
+4025307^ANTIHEMOPHILIC FACTOR 1000UNT/VON WILLEBRAND FACTOR 2400UNT INJ
+"DATA",176.112,36878,1)
+665832^^Y
+"DATA",176.112,36879,0)
+4025305^ANTIHEMOPHILIC FACTOR 250UNT/VON WILLEBRAND FACTOR 600UNT INJ
+"DATA",176.112,36879,1)
+665833^^Y
+"DATA",176.112,36880,0)
+4025306^ANTIHEMOPHILIC FACTOR 500UNT/VON WILLEBRAND FACTOR 1200UNT INJ
+"DATA",176.112,36880,1)
+665834^^Y
+"DATA",176.112,36881,0)
+4024765^ACETIC ACID 3% LIQUID,ORAL
+"DATA",176.112,36881,1)
+665842^^Y
+"DATA",176.112,36882,0)
+4025373^AGRIMONIA LIQUID,ORAL
+"DATA",176.112,36882,1)
+665848^^Y
+"DATA",176.112,36883,0)
+4025038^AL OH/DIPHENHYDRAMINE/LIDOCAINE/MAG/SIMETHICONE MOUTHWASH
+"DATA",176.112,36883,1)
+665852^^Y
+"DATA",176.112,36884,0)
+4025204^ALOE VESTA 3-N-1 PROTECTIVE OINT,TOP
+"DATA",176.112,36884,1)
+665864^^Y
+"DATA",176.112,36885,0)
+4024757^APPLE CIDER VINEGAR CAP/TAB
+"DATA",176.112,36885,1)
+665875^^Y
+"DATA",176.112,36886,0)
+4025367^ARCTIUM LIQUID,ORAL
+"DATA",176.112,36886,1)
+665877^^Y
+"DATA",176.112,36887,0)
+4025019^ATOPICLAIR CREAM,TOP
+"DATA",176.112,36887,1)
+665888^^Y
+"DATA",176.112,36888,0)
+4024669^BENZOYL PEROXIDE 6% WASH,TOP
+"DATA",176.112,36888,1)
+665897^^Y
+"DATA",176.112,36889,0)
+4025143^BAG BALM OINT,TOP
+"DATA",176.112,36889,1)
+665917^^Y
+"DATA",176.112,36890,0)
+4025515^BARIUM SO4 0.1% SUSP,ORAL
+"DATA",176.112,36890,1)
+665918^^Y
+"DATA",176.112,36891,0)
+4025516^BARIUM SO4 40% SUSP,ORAL
+"DATA",176.112,36891,1)
+665919^^Y
+"DATA",176.112,36892,0)
+4025368^CALENDULA LIQUID,TOP
+"DATA",176.112,36892,1)
+665925^^Y
+"DATA",176.112,36893,0)
+4025142^CAMPHOR/MENTHOL OINT,TOP
+"DATA",176.112,36893,1)
+665927^^Y
+"DATA",176.112,36894,0)
+4024668^BENZOYL PEROXIDE 8% WASH,TOP
+"DATA",176.112,36894,1)
+665947^^Y
+"DATA",176.112,36895,0)
+4025372^BERBERIS CAP/TAB
+"DATA",176.112,36895,1)
+665948^^Y
+"DATA",176.112,36896,0)
+4025332^BITTER ORANGE PEEL CAP/TAB
+"DATA",176.112,36896,1)
+665952^^Y
+"DATA",176.112,36897,0)
+4024852^BLACK CURRANT OIL CAP/TAB
+"DATA",176.112,36897,1)
+665953^^Y
+"DATA",176.112,36898,0)
+4024759^BLUE GREEN ALGAE CAP/TAB
+"DATA",176.112,36898,1)
+665954^^Y
+"DATA",176.112,36899,0)
+4025370^CAULOPHYLLUM CAP/TAB
+"DATA",176.112,36899,1)
+665955^^Y
+"DATA",176.112,36900,0)
+4025005^CLOBETASONE PROPIONATE 0.05% EMOLLIENT CREAM,TOP
+"DATA",176.112,36900,1)
+665979^^Y
+"DATA",176.112,36901,0)
+4025150^CHOLEST OFF TAB
+"DATA",176.112,36901,1)
+665986^^Y
+"DATA",176.112,36902,0)
+4024758^CIDER VINEGAR DIET FORMULA CAP/TAB
+"DATA",176.112,36902,1)
+665988^^Y
+"DATA",176.112,36903,0)
+4025145^CINNAMON CAP/TAB
+"DATA",176.112,36903,1)
+665989^^Y
+"DATA",176.112,36904,0)
+4025353^COLA EXTRACT LIQUID,ORAL
+"DATA",176.112,36904,1)
+665997^^Y
+"DATA",176.112,36905,0)
+4025381^COMMON RUE CAP/TAB
+"DATA",176.112,36905,1)
+665998^^Y
+"DATA",176.112,36906,0)
+4025366^CENTAURY LIQUID,ORAL
+"DATA",176.112,36906,1)
+666007^^Y
+"DATA",176.112,36907,0)
+4025201^CEREFOLIN NAC TAB
+"DATA",176.112,36907,1)
+666008^^Y
+"DATA",176.112,36908,0)
+4025564^CHLOROPHYLL 0.5%/PAPAIN/UREA 10% OINT,TOP
+"DATA",176.112,36908,1)
+666014^^Y
+"DATA",176.112,36909,0)
+4025362^CORNSILK CAP/TAB
+"DATA",176.112,36909,1)
+666016^^Y
+"DATA",176.112,36910,0)
+4024763^CREATINE CAP/TAB
+"DATA",176.112,36910,1)
+666017^^Y
+"DATA",176.112,36911,0)
+4025321^CYANOCOBALAMIN 500MCG/0.1ML ACTUAT SPRAY,NASAL,2.3ML
+"DATA",176.112,36911,1)
+666020^^Y
+"DATA",176.112,36912,0)
+4024651^GOLDENSEAL CAP/TAB
+"DATA",176.112,36912,1)
+666027^^Y
+"DATA",176.112,36913,0)
+4025349^GENTIANA LIQUID,ORAL
+"DATA",176.112,36913,1)
+666053^^Y
+"DATA",176.112,36914,0)
+4024819^GUAR GUM CAP/TAB
+"DATA",176.112,36914,1)
+666064^^Y
+"DATA",176.112,36915,0)
+4025130^ELDERBERRY EXTRACT CAP/TAB
+"DATA",176.112,36915,1)
+666090^^Y
+"DATA",176.112,36916,0)
+4025421^ELECTROLYTE PWDR,ORAL
+"DATA",176.112,36916,1)
+666092^^Y
+"DATA",176.112,36917,0)
+4024738^ELECTROLYTE SOLN,ORAL ADULT
+"DATA",176.112,36917,1)
+666096^^Y
+"DATA",176.112,36918,0)
+4024737^ELECTROLYTE SOLN,ORAL PEDIATRIC
+"DATA",176.112,36918,1)
+666097^^Y
+"DATA",176.112,36919,0)
+4025371^EUPATORIUM CAP/TAB
+"DATA",176.112,36919,1)
+666109^^Y
+"DATA",176.112,36920,0)
+4024649^GYMENMA SYLVESTRIS CAP/TAB
+"DATA",176.112,36920,1)
+666122^^Y
+"DATA",176.112,36921,0)
+4025426^HAEMOPHILUS B 7.5/HEPATITIS B 5MCG/0.5ML VACCINE (RECOMB) INJ
+"DATA",176.112,36921,1)
+666123^^Y
+"DATA",176.112,36922,0)
+4024702^HEPATITIS B IMMUNE GLOBULIN (BAYHEP) INJ
+"DATA",176.112,36922,1)
+666126^^Y
+"DATA",176.112,36923,0)
+4024862^HERBAL GI CAP/TAB
+"DATA",176.112,36923,1)
+666149^^Y
+"DATA",176.112,36924,0)
+4025123^HERBAL LAXATIVE,ALOE/CASCARA/FENNEL/SENNA CAP/TAB
+"DATA",176.112,36924,1)
+666150^^Y
+"DATA",176.112,36925,0)
+4025548^HYDRA-AID GEL,ORAL
+"DATA",176.112,36925,1)
+666158^^Y
+"DATA",176.112,36926,0)
+4025342^DIPHTH,PERTUSS(ACELL),TET VACCINE 2-2.5-5/0.5ML INJ,SUSP
+"DATA",176.112,36926,1)
+666183^^Y
+"DATA",176.112,36927,0)
+4024777^DIPHTHERIA TOXOID/MENINGOCOCCAL POLYSACCHARIDE INJ VACCINE
+"DATA",176.112,36927,1)
+666184^^Y
+"DATA",176.112,36928,0)
+4024606^FOCUS FACTOR CAP/TAB
+"DATA",176.112,36928,1)
+666199^^Y
+"DATA",176.112,36929,0)
+4025157^HYDROCODONE 5MG/GUAIFENESIN 300MG (M-PHASE) CAP,SA
+"DATA",176.112,36929,1)
+666208^^Y
+"DATA",176.112,36930,0)
+4024815^HYDROXYCITRIC ACID (GARCINIA CAMBOGA) CAP/TAB
+"DATA",176.112,36930,1)
+666252^^Y
+"DATA",176.112,36931,0)
+4025428^DERMA CERIN CREAM,TOP
+"DATA",176.112,36931,1)
+666271^^Y
+"DATA",176.112,36932,0)
+4025420^GLUCOVITA TAB
+"DATA",176.112,36932,1)
+666281^^Y
+"DATA",176.112,36933,0)
+4025348^EYEBRIGHT CAP/TAB
+"DATA",176.112,36933,1)
+666288^^Y
+"DATA",176.112,36934,0)
+4025137^FOLLITROPIN BETA 900UNIT/1.08ML INJ
+"DATA",176.112,36934,1)
+666290^^Y
+"DATA",176.112,36935,0)
+4025028^FREESTYLE (GLUCOSE) HIGH/LOW CONTROL SOLN
+"DATA",176.112,36935,1)
+666295^^Y
+"DATA",176.112,36936,0)
+4025309^FENTANYL 12MCG/HR PATCH
+"DATA",176.112,36936,1)
+666305^^Y
+"DATA",176.112,36937,0)
+4025027^FIBER 4GM TAB,CHEWABLE
+"DATA",176.112,36937,1)
+666308^^Y
+"DATA",176.112,36938,0)
+4024644^ESTROVEN CAP/TAB
+"DATA",176.112,36938,1)
+666329^^Y
+"DATA",176.112,36939,0)
+4024643^ESTROVEN EXTRA STRENGTH CAP/TAB
+"DATA",176.112,36939,1)
+666330^^Y
+"DATA",176.112,36940,0)
+4024591^PROSTATE 2.1 CAP/TAB
+"DATA",176.112,36940,1)
+666338^^Y
+"DATA",176.112,36941,0)
+4024601^PUMPKIN SEED CAP/TAB
+"DATA",176.112,36941,1)
+666340^^Y
+"DATA",176.112,36942,0)
+4025618^NICOMIDE TAB,SA
+"DATA",176.112,36942,1)
+666356^^Y
+"DATA",176.112,36943,0)
+4024653^ONE TOUCH ULTRA (GLUCOSE) CONTROL SOLN
+"DATA",176.112,36943,1)
+666370^^Y
+"DATA",176.112,36944,0)
+4024661^OSTEO BI-FLEX DOUBLE STRENGTH CAP/TAB
+"DATA",176.112,36944,1)
+666373^^Y
+"DATA",176.112,36945,0)
+4024662^OSTEO BI-FLEX MSM CAP/TAB
+"DATA",176.112,36945,1)
+666374^^Y
+"DATA",176.112,36946,0)
+4024660^OSTEO BI-FLEX REGULAR STRENGTH CAP/TAB
+"DATA",176.112,36946,1)
+666375^^Y
+"DATA",176.112,36947,0)
+4025301^MIMYX CREAM,TOP
+"DATA",176.112,36947,1)
+666398^^Y
+"DATA",176.112,36948,0)
+4025193^MORINDA (NONI) LIQUID,ORAL
+"DATA",176.112,36948,1)
+666406^^Y
+"DATA",176.112,36949,0)
+4025343^VERVAIN LIQUID,ORAL
+"DATA",176.112,36949,1)
+666412^^Y
+"DATA",176.112,36950,0)
+4025052^VITAMIN B COMPLEX W/C,ZINC,FOLIC (DIATX ZN) TAB
+"DATA",176.112,36950,1)
+666415^^Y
+"DATA",176.112,36951,0)
+4025617^RADIAPLEXRX GEL,TOP
+"DATA",176.112,36951,1)
+666418^^Y
+"DATA",176.112,36952,0)
+4025029^REISHI MUSHROOM EXTRACT CAP/TAB
+"DATA",176.112,36952,1)
+666426^^Y
+"DATA",176.112,36953,0)
+4024871^LINOLEIC ACID CAP/TAB
+"DATA",176.112,36953,1)
+666437^^Y
+"DATA",176.112,36954,0)
+4025619^LISSAMINE GREEN 1.5MG STRIP,OPH
+"DATA",176.112,36954,1)
+666438^^Y
+"DATA",176.112,36955,0)
+4025355^LOBELIA CAP/TAB
+"DATA",176.112,36955,1)
+666439^^Y
+"DATA",176.112,36956,0)
+4025024^RENAL CAPS CAP,ORAL
+"DATA",176.112,36956,1)
+666447^^Y
+"DATA",176.112,36957,0)
+4024891^RENAL MULTIVITAMIN WITH < OR = 1MG FOLIC ACID CAP/TAB
+"DATA",176.112,36957,1)
+666448^^Y
+"DATA",176.112,36958,0)
+4024535^RENAPHRO CAP,ORAL
+"DATA",176.112,36958,1)
+666449^^Y
+"DATA",176.112,36959,0)
+4025361^SCUTELLARIA BAICALENSIS LIQUID,ORAL
+"DATA",176.112,36959,1)
+666456^^Y
+"DATA",176.112,36960,0)
+4024776^SITZMARKS DIAGNOSTIC CAP
+"DATA",176.112,36960,1)
+666465^^Y
+"DATA",176.112,36961,0)
+4025360^SMILAX (SARSAPARILLA) CAP/TAB
+"DATA",176.112,36961,1)
+666466^^Y
+"DATA",176.112,36962,0)
+4025430^THERAPEUTIC BATH LOTION,TOP
+"DATA",176.112,36962,1)
+666477^^Y
+"DATA",176.112,36963,0)
+4024857^LENOLEIC ACID CAP/TAB
+"DATA",176.112,36963,1)
+666492^^Y
+"DATA",176.112,36964,0)
+4024990^ROTAVIRUS PENTAVALENT VACCINE LIVE SUSP,ORAL,2ML
+"DATA",176.112,36964,1)
+666524^^Y
+"DATA",176.112,36965,0)
+4024685^MULTIVITAMIN/MINERALS HERBAL CAP/TAB
+"DATA",176.112,36965,1)
+666550^^Y
+"DATA",176.112,36966,0)
+4024686^MULTIVITAMIN/MINERALS WOMENS HERBAL CAP/TAB
+"DATA",176.112,36966,1)
+666551^^Y
+"DATA",176.112,36967,0)
+4025206^MULTIVITAMIN/ST. JOHN'S MOOD PLUS TAB
+"DATA",176.112,36967,1)
+666552^^Y
+"DATA",176.112,36968,0)
+4024974^MULTIVITAMINS,HERBAL,DIABETIC FORMULA CAP/TAB
+"DATA",176.112,36968,1)
+666553^^Y
+"DATA",176.112,36969,0)
+4024602^ROYAL JELLY CAP/TAB
+"DATA",176.112,36969,1)
+666575^^Y
+"DATA",176.112,36970,0)
+4025377^RUMEX CAP/TAB
+"DATA",176.112,36970,1)
+666577^^Y
+"DATA",176.112,36971,0)
+4024869^RUTIN CAP/TAB
+"DATA",176.112,36971,1)
+666578^^Y
+"DATA",176.112,36972,0)
+4025378^SALIX CAP/TAB
+"DATA",176.112,36972,1)
+666581^^Y
+"DATA",176.112,36973,0)
+4025620^SUNSCREEN-30 PABA-FREE COMBINATION CREAM,TOP
+"DATA",176.112,36973,1)
+666584^^Y
+"DATA",176.112,36974,0)
+4025006^TALC,STERILE 5GM/CANISTER
+"DATA",176.112,36974,1)
+666590^^Y
+"DATA",176.112,36975,0)
+4024798^LYSINE CREAM,TOP
+"DATA",176.112,36975,1)
+666599^^Y
+"DATA",176.112,36976,0)
+4025570^MANGOSTEEN LIQUID,ORAL
+"DATA",176.112,36976,1)
+666600^^Y
+"DATA",176.112,36977,0)
+4024537^PAU D'ARCO (TAHEEBO) CAP/TAB
+"DATA",176.112,36977,1)
+666625^^Y
+"DATA",176.112,36978,0)
+4024550^PENTAFLUOROPROPANE/TETRAFLUOROETHANE AEROSOL,TOP,MED,STREAM
+"DATA",176.112,36978,1)
+666629^^Y
+"DATA",176.112,36979,0)
+4024549^PENTAFLUOROPROPANE/TETRAFLUOROETHANE AEROSOL,TOP,MIST
+"DATA",176.112,36979,1)
+666630^^Y
+"DATA",176.112,36980,0)
+4025429^NATURAL PROGESTERONE CREAM,TOP
+"DATA",176.112,36980,1)
+666654^^Y
+"DATA",176.112,36981,0)
+4024631^NEPHPLEX RX TAB
+"DATA",176.112,36981,1)
+666661^^Y
+"DATA",176.112,36982,0)
+4024863^OCUVITE PRESERVISION PLUS LUTEIN CAP
+"DATA",176.112,36982,1)
+666663^^Y
+"DATA",176.112,36983,0)
+4025346^WILD YAM CAP/TAB
+"DATA",176.112,36983,1)
+666680^^Y
+"DATA",176.112,36984,0)
+4025363^TURNERA (DAMIANA) CAP/TAB
+"DATA",176.112,36984,1)
+666697^^Y
+"DATA",176.112,36985,0)
+4025144^UDAMIN TAB
+"DATA",176.112,36985,1)
+666698^^Y
+"DATA",176.112,36986,0)
+4025040^ULTRASOUND (AQUASONIC) GEL,TOP
+"DATA",176.112,36986,1)
+666699^^Y
+"DATA",176.112,36987,0)
+4024998^YOHIMBINE CAP/TAB
+"DATA",176.112,36987,1)
+666708^^Y
+"DATA",176.112,36988,0)
+4025023^YUCCA EXTRACT CAP/TAB
+"DATA",176.112,36988,1)
+666709^^Y
+"DATA",176.112,36989,0)
+4024580^IRRIGATING SYRINGE CATHETER 60ML KENDALL #8881560141
+"DATA",176.112,36989,1)
+668841^^Y
+"DATA",176.112,36990,0)
+4025205^PLEURX DRAINAGE KIT D#50-7500
+"DATA",176.112,36990,1)
+668851^^Y
+"DATA",176.112,36991,0)
+4025678^POUCH,DRAINABLE,PREMIER KIT H#89003
+"DATA",176.112,36991,1)
+668852^^Y
+"DATA",176.112,36992,0)
+4025677^POUCH,DRAINABLE,PREMIER KIT H#89004
+"DATA",176.112,36992,1)
+668853^^Y
+"DATA",176.112,36993,0)
+4025679^POUCH,UROSTOMY,FIRSTCHOICE KIT H#89005
+"DATA",176.112,36993,1)
+668854^^Y
+"DATA",176.112,36994,0)
+4024971^SYRINGE,ORAL 10ML
+"DATA",176.112,36994,1)
+668861^^Y
+"DATA",176.112,36995,0)
+4024969^SYRINGE,ORAL 3ML
+"DATA",176.112,36995,1)
+668862^^Y
+"DATA",176.112,36996,0)
+4024970^SYRINGE,ORAL 5ML
+"DATA",176.112,36996,1)
+668863^^Y
+"DATA",176.112,36997,0)
+4024972^SYRINGE,ORAL 6ML
+"DATA",176.112,36997,1)
+668864^^Y
+"DATA",176.112,36998,0)
+4024725^TISSEEL VH TWO COMPONENT FIBRIN SEALANT KIT 1ML
+"DATA",176.112,36998,1)
+668865^^Y
+"DATA",176.112,36999,0)
+4024726^TISSEEL VH TWO COMPONENT FIBRIN SEALANT KIT 2ML
+"DATA",176.112,36999,1)
+668866^^Y
+"DATA",176.112,37000,0)
+4024727^TISSEEL VH TWO COMPONENT FIBRIN SEALANT KIT 5ML
+"DATA",176.112,37000,1)
+668867^^Y
+"DATA",176.112,37001,0)
+4025039^ALLERX DOSE PACK TAB,20
+"DATA",176.112,37001,1)
+669482^^Y
+"DATA",176.112,37002,0)
+4025070^BARRIER,ASSURA COLOPLAST #14301
+"DATA",176.112,37002,1)
+669788^^Y
+"DATA",176.112,37003,0)
+4025071^BARRIER,ASSURA COLOPLAST #14302
+"DATA",176.112,37003,1)
+669789^^Y
+"DATA",176.112,37004,0)
+4025072^BARRIER,ASSURA COLOPLAST #14303
+"DATA",176.112,37004,1)
+669790^^Y
+"DATA",176.112,37005,0)
+4025073^BARRIER,ASSURA COLOPLAST #14309
+"DATA",176.112,37005,1)
+669791^^Y
+"DATA",176.112,37006,0)
+4025068^BARRIER,CONVEX,ASSURA COLOPLAST #14401
+"DATA",176.112,37006,1)
+669792^^Y
+"DATA",176.112,37007,0)
+4025069^BARRIER,CONVEX,ASSURA, COLOPLAST #14403
+"DATA",176.112,37007,1)
+669793^^Y
+"DATA",176.112,37008,0)
+4024840^BARRIER,ESTEEM SYNERGY C#405457
+"DATA",176.112,37008,1)
+669794^^Y
+"DATA",176.112,37009,0)
+4024844^BARRIER,ESTEEM SYNERGY C#405468
+"DATA",176.112,37009,1)
+669795^^Y
+"DATA",176.112,37010,0)
+4024842^BARRIER,ESTEEM SYNERGY C#410807
+"DATA",176.112,37010,1)
+669796^^Y
+"DATA",176.112,37011,0)
+4025406^BARRIER,OSTOMY,NEW IMAGE H#14602
+"DATA",176.112,37011,1)
+669797^^Y
+"DATA",176.112,37012,0)
+4025407^BARRIER,OSTOMY,NEW IMAGE H#14603
+"DATA",176.112,37012,1)
+669798^^Y
+"DATA",176.112,37013,0)
+4025408^BARRIER,OSTOMY,NEW IMAGE H#14604
+"DATA",176.112,37013,1)
+669799^^Y
+"DATA",176.112,37014,0)
+4025409^BARRIER,OSTOMY,NEW IMAGE H#14606
+"DATA",176.112,37014,1)
+669800^^Y
+"DATA",176.112,37015,0)
+4024850^BARRIER,OSTOMY,NEW IMAGE H#14904
+"DATA",176.112,37015,1)
+669801^^Y
+"DATA",176.112,37016,0)
+4025571^BARRIER,OSTOMY,NEW IMAGE H#16104
+"DATA",176.112,37016,1)
+669802^^Y
+"DATA",176.112,37017,0)
+4025328^CATHERIZATION SET,INTERMITTENT 10FR BARD #4A5110
+"DATA",176.112,37017,1)
+669803^^Y
+"DATA",176.112,37018,0)
+4025161^CATHERIZATION SET,INTERMITTENT 10FR H#96104
+"DATA",176.112,37018,1)
+669804^^Y
+"DATA",176.112,37019,0)
+4025329^CATHERIZATION SET,INTERMITTENT 12FR BARD #4A5142
+"DATA",176.112,37019,1)
+669805^^Y
+"DATA",176.112,37020,0)
+4025162^CATHERIZATION SET,INTERMITTENT 12FR H#96124
+"DATA",176.112,37020,1)
+669806^^Y
+"DATA",176.112,37021,0)
+4025330^CATHERIZATION SET,INTERMITTENT 14FR BARD #4A5144
+"DATA",176.112,37021,1)
+669807^^Y
+"DATA",176.112,37022,0)
+4025163^CATHERIZATION SET,INTERMITTENT 14FR H#96144
+"DATA",176.112,37022,1)
+669808^^Y
+"DATA",176.112,37023,0)
+4025651^CATHERIZATION SET,INTERMITTENT 14FR MMG/ONEIL #RLA-142-30
+"DATA",176.112,37023,1)
+669809^^Y
+"DATA",176.112,37024,0)
+4025164^CATHERIZATION SET,INTERMITTENT 16FR H#96164
+"DATA",176.112,37024,1)
+669810^^Y
+"DATA",176.112,37025,0)
+4025165^CATHERIZATION SET,INTERMITTENT 18FR H#96184
+"DATA",176.112,37025,1)
+669811^^Y
+"DATA",176.112,37026,0)
+4025159^CATHERIZATION SET,INTERMITTENT 6FR H#96064
+"DATA",176.112,37026,1)
+669812^^Y
+"DATA",176.112,37027,0)
+4025327^CATHERIZATION SET,INTERMITTENT 8FR BARD #4A5108
+"DATA",176.112,37027,1)
+669813^^Y
+"DATA",176.112,37028,0)
+4025160^CATHERIZATION SET,INTERMITTENT 8FR H#96084
+"DATA",176.112,37028,1)
+669814^^Y
+"DATA",176.112,37029,0)
+4024816^CATHETER,EXTERNAL NON-LATEX H#97536
+"DATA",176.112,37029,1)
+669815^^Y
+"DATA",176.112,37030,0)
+4025639^CATHETER,INTERMITTENT 12FR RUSCH #221800-12
+"DATA",176.112,37030,1)
+669816^^Y
+"DATA",176.112,37031,0)
+4025640^CATHETER,INTERMITTENT 14FR RUSCH #221800-14
+"DATA",176.112,37031,1)
+669817^^Y
+"DATA",176.112,37032,0)
+4025641^CATHETER,INTERMITTENT 16FR RUSCH #221800-16
+"DATA",176.112,37032,1)
+669818^^Y
+"DATA",176.112,37033,0)
+4025642^CATHETER,INTERMITTENT 18FR RUSCH #221800-18
+"DATA",176.112,37033,1)
+669819^^Y
+"DATA",176.112,37034,0)
+4025412^CATHETER,SUCTION 14FR M#DYDN41442
+"DATA",176.112,37034,1)
+669820^^Y
+"DATA",176.112,37035,0)
+4024740^CLEANSING CLOTH,ALOETOUCH PKT M#MSC263701
+"DATA",176.112,37035,1)
+669823^^Y
+"DATA",176.112,37036,0)
+4024589^CLEANSING CLOTH,ALOETOUCH PKT M#MSC263750A
+"DATA",176.112,37036,1)
+669824^^Y
+"DATA",176.112,37037,0)
+4025195^CONVEX INSERT,ADAPT C#79520
+"DATA",176.112,37037,1)
+669825^^Y
+"DATA",176.112,37038,0)
+4025196^CONVEX INSERT,ADAPT C#79530
+"DATA",176.112,37038,1)
+669826^^Y
+"DATA",176.112,37039,0)
+4025197^CONVEX INSERT,ADAPT C#79540
+"DATA",176.112,37039,1)
+669827^^Y
+"DATA",176.112,37040,0)
+4025591^CONVEX INSERT,ADAPT H#79520
+"DATA",176.112,37040,1)
+669828^^Y
+"DATA",176.112,37041,0)
+4025592^CONVEX INSERT,ADAPT H#79530
+"DATA",176.112,37041,1)
+669829^^Y
+"DATA",176.112,37042,0)
+4025593^CONVEX INSERT,ADAPT H#79540
+"DATA",176.112,37042,1)
+669830^^Y
+"DATA",176.112,37043,0)
+4025634^DRESSING,COVADERM 4IN X 10IN DEROYAL #46-004
+"DATA",176.112,37043,1)
+669831^^Y
+"DATA",176.112,37044,0)
+4025635^DRESSING,COVADERM 4IN X 14IN DEROYAL #46-005
+"DATA",176.112,37044,1)
+669832^^Y
+"DATA",176.112,37045,0)
+4025632^DRESSING,COVADERM 4IN X 4IN DEROYAL #46-001
+"DATA",176.112,37045,1)
+669833^^Y
+"DATA",176.112,37046,0)
+4025631^DRESSING,COVADERM 4IN X 6IN DEROYAL #46-002
+"DATA",176.112,37046,1)
+669834^^Y
+"DATA",176.112,37047,0)
+4025633^DRESSING,COVADERM 4IN X 8IN DEROYAL #46-003
+"DATA",176.112,37047,1)
+669835^^Y
+"DATA",176.112,37048,0)
+4025638^DRESSING,OIL EMULSION 5IN X 9IN KEN#6116
+"DATA",176.112,37048,1)
+669836^^Y
+"DATA",176.112,37049,0)
+4025583^DRESSING,OPSITE IV3000 FRAME 2 3/8IN X 2 3/4IN SN#59410000
+"DATA",176.112,37049,1)
+669837^^Y
+"DATA",176.112,37050,0)
+4025575^DRESSING,SILVERCEL 1IN X 12IN JJ#800112
+"DATA",176.112,37050,1)
+669838^^Y
+"DATA",176.112,37051,0)
+4025573^DRESSING,SILVERCEL 2IN X 2IN JJ#800202
+"DATA",176.112,37051,1)
+669839^^Y
+"DATA",176.112,37052,0)
+4025572^DRESSING,SILVERCEL 4.25IN X 4.25IN JJ#800404
+"DATA",176.112,37052,1)
+669840^^Y
+"DATA",176.112,37053,0)
+4025574^DRESSING,SILVERCEL 4IN X 8IN JJ#800408
+"DATA",176.112,37053,1)
+669841^^Y
+"DATA",176.112,37054,0)
+4024609^DRESSING,SOFSORB 3IN X 3IN DEROYAL#46-109
+"DATA",176.112,37054,1)
+669842^^Y
+"DATA",176.112,37055,0)
+4024610^DRESSING,SOFSORB 4IN X 6IN DEROYAL#46-101
+"DATA",176.112,37055,1)
+669843^^Y
+"DATA",176.112,37056,0)
+4024611^DRESSING,SOFSORB 4IN X 9IN DEROYAL#46-106
+"DATA",176.112,37056,1)
+669844^^Y
+"DATA",176.112,37057,0)
+4024588^ELECTRODE 1.75IN X 1.75IN PMI #PC11
+"DATA",176.112,37057,1)
+669845^^Y
+"DATA",176.112,37058,0)
+4024693^GLOVE NITRILE LARGE PWDR-FREE NONSTERILE TEXTURED #72-10503
+"DATA",176.112,37058,1)
+669846^^Y
+"DATA",176.112,37059,0)
+4024692^GLOVE NITRILE MEDIUM PWDR-FREE NONSTERILE TEXTURED #72-10502
+"DATA",176.112,37059,1)
+669847^^Y
+"DATA",176.112,37060,0)
+4024691^GLOVE NITRILE SMALL PWDR-FREE NONSTERILE TEXTURED #72-10501
+"DATA",176.112,37060,1)
+669848^^Y
+"DATA",176.112,37061,0)
+4024694^GLOVE NITRILE X-LARGE PWDR-FREE NONSTERILE TEXTURED #72-10504
+"DATA",176.112,37061,1)
+669849^^Y
+"DATA",176.112,37062,0)
+4024845^LOOP OSTOMY ROD C#0223-55
+"DATA",176.112,37062,1)
+669850^^Y
+"DATA",176.112,37063,0)
+4024846^LOOP OSTOMY ROD C#0223-56
+"DATA",176.112,37063,1)
+669851^^Y
+"DATA",176.112,37064,0)
+4025625^MEDICATION ORGANIZER 28DAY APOT#67378
+"DATA",176.112,37064,1)
+669852^^Y
+"DATA",176.112,37065,0)
+4024604^NON-ADHESIVE UROSTOMY SYSTEM SMALL #501000
+"DATA",176.112,37065,1)
+669854^^Y
+"DATA",176.112,37066,0)
+4024745^POUCH,BRAINABLE,NEW IMAGE H#18163
+"DATA",176.112,37066,1)
+669855^^Y
+"DATA",176.112,37067,0)
+4025065^POUCH,CLOSED,NEW IMAGE H#18372
+"DATA",176.112,37067,1)
+669856^^Y
+"DATA",176.112,37068,0)
+4025066^POUCH,CLOSED,NEW IMAGE H#18373
+"DATA",176.112,37068,1)
+669857^^Y
+"DATA",176.112,37069,0)
+4025067^POUCH,CLOSED,NEW IMAGE H#18374
+"DATA",176.112,37069,1)
+669858^^Y
+"DATA",176.112,37070,0)
+4025431^POUCH,DRAINABLE,ASSURA COLOPLAST #13964
+"DATA",176.112,37070,1)
+669859^^Y
+"DATA",176.112,37071,0)
+4025432^POUCH,DRAINABLE,ASSURA COLOPLAST #13965
+"DATA",176.112,37071,1)
+669860^^Y
+"DATA",176.112,37072,0)
+4025433^POUCH,DRAINABLE,ASSURA COLOPLAST #13966
+"DATA",176.112,37072,1)
+669861^^Y
+"DATA",176.112,37073,0)
+4025413^POUCH,DRAINABLE,ASSURA COLOPLAST #14364
+"DATA",176.112,37073,1)
+669862^^Y
+"DATA",176.112,37074,0)
+4024843^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-07
+"DATA",176.112,37074,1)
+669863^^Y
+"DATA",176.112,37075,0)
+4024829^POUCH,DRAINABLE,MICROSKIN CYMED #86325
+"DATA",176.112,37075,1)
+669864^^Y
+"DATA",176.112,37076,0)
+4024744^POUCH,DRAINABLE,NEW IMAGE H#18162
+"DATA",176.112,37076,1)
+669865^^Y
+"DATA",176.112,37077,0)
+4024746^POUCH,DRAINABLE,NEW IMAGE H#18163
+"DATA",176.112,37077,1)
+669866^^Y
+"DATA",176.112,37078,0)
+4024747^POUCH,DRAINABLE,NEW IMAGE H#18164
+"DATA",176.112,37078,1)
+669867^^Y
+"DATA",176.112,37079,0)
+4025659^POUCH,DRAINABLE,PREMIER H#8510
+"DATA",176.112,37079,1)
+669868^^Y
+"DATA",176.112,37080,0)
+4025660^POUCH,DRAINABLE,PREMIER H#8511
+"DATA",176.112,37080,1)
+669869^^Y
+"DATA",176.112,37081,0)
+4025661^POUCH,DRAINABLE,PREMIER H#8512
+"DATA",176.112,37081,1)
+669870^^Y
+"DATA",176.112,37082,0)
+4025662^POUCH,DRAINABLE,PREMIER H#8513
+"DATA",176.112,37082,1)
+669871^^Y
+"DATA",176.112,37083,0)
+4025663^POUCH,DRAINABLE,PREMIER H#8514
+"DATA",176.112,37083,1)
+669872^^Y
+"DATA",176.112,37084,0)
+4025664^POUCH,DRAINABLE,PREMIER H#8515
+"DATA",176.112,37084,1)
+669873^^Y
+"DATA",176.112,37085,0)
+4025672^POUCH,DRAINABLE,PREMIER H#85211
+"DATA",176.112,37085,1)
+669874^^Y
+"DATA",176.112,37086,0)
+4025665^POUCH,DRAINABLE,PREMIER H#8528
+"DATA",176.112,37086,1)
+669875^^Y
+"DATA",176.112,37087,0)
+4025657^POUCH,DRAINABLE,PREMIER H#8531
+"DATA",176.112,37087,1)
+669876^^Y
+"DATA",176.112,37088,0)
+4025654^POUCH,DRAINABLE,PREMIER H#8532
+"DATA",176.112,37088,1)
+669877^^Y
+"DATA",176.112,37089,0)
+4025656^POUCH,DRAINABLE,PREMIER H#8533
+"DATA",176.112,37089,1)
+669878^^Y
+"DATA",176.112,37090,0)
+4025655^POUCH,DRAINABLE,PREMIER H#8538
+"DATA",176.112,37090,1)
+669879^^Y
+"DATA",176.112,37091,0)
+4025658^POUCH,DRAINABLE,PREMIER H#8539
+"DATA",176.112,37091,1)
+669880^^Y
+"DATA",176.112,37092,0)
+4025666^POUCH,DRAINABLE,PREMIER H#8590
+"DATA",176.112,37092,1)
+669881^^Y
+"DATA",176.112,37093,0)
+4025667^POUCH,DRAINABLE,PREMIER H#8591
+"DATA",176.112,37093,1)
+669882^^Y
+"DATA",176.112,37094,0)
+4025668^POUCH,DRAINABLE,PREMIER H#8592
+"DATA",176.112,37094,1)
+669883^^Y
+"DATA",176.112,37095,0)
+4025669^POUCH,DRAINABLE,PREMIER H#8593
+"DATA",176.112,37095,1)
+669884^^Y
+"DATA",176.112,37096,0)
+4025670^POUCH,DRAINABLE,PREMIER H#8594
+"DATA",176.112,37096,1)
+669885^^Y
+"DATA",176.112,37097,0)
+4025671^POUCH,DRAINABLE,PREMIER H#8595
+"DATA",176.112,37097,1)
+669886^^Y
+"DATA",176.112,37098,0)
+4025652^POUCH,DRAINABLE,PREMIER H#88401
+"DATA",176.112,37098,1)
+669887^^Y
+"DATA",176.112,37099,0)
+4025653^POUCH,DRAINABLE,PREMIER H#88501
+"DATA",176.112,37099,1)
+669888^^Y
+"DATA",176.112,37100,0)
+4025194^POUCH,DRAINABLE,SUR-FIT C#4040-29
+"DATA",176.112,37100,1)
+669889^^Y
+"DATA",176.112,37101,0)
+4025414^POUCH,DRAINABLE,SUR-FIT C#4112-63
+"DATA",176.112,37101,1)
+669890^^Y
+"DATA",176.112,37102,0)
+4025415^POUCH,DRAINABLE,SUR-FIT C#4112-64
+"DATA",176.112,37102,1)
+669891^^Y
+"DATA",176.112,37103,0)
+4025416^POUCH,DRAINABLE,SUR-FIT C#4112-65
+"DATA",176.112,37103,1)
+669892^^Y
+"DATA",176.112,37104,0)
+4025417^POUCH,DRAINABLE,SUR-FIT C#4112-66
+"DATA",176.112,37104,1)
+669893^^Y
+"DATA",176.112,37105,0)
+4025418^POUCH,DRAINABLE,SUR-FIT C#4112-67
+"DATA",176.112,37105,1)
+669894^^Y
+"DATA",176.112,37106,0)
+4024841^POUCH,DRAINABLE,SUR-FIT C#4114-92
+"DATA",176.112,37106,1)
+669895^^Y
+"DATA",176.112,37107,0)
+4025057^POUCH,EAKIN,WOUND,FISTULA DRAINAGE C#8392-20
+"DATA",176.112,37107,1)
+669896^^Y
+"DATA",176.112,37108,0)
+4025058^POUCH,EAKIN,WOUND,FISTULA DRAINAGE C#8392-21
+"DATA",176.112,37108,1)
+669897^^Y
+"DATA",176.112,37109,0)
+4025059^POUCH,EAKIN,WOUND,FISTULA DRAINAGE C#8392-25
+"DATA",176.112,37109,1)
+669898^^Y
+"DATA",176.112,37110,0)
+4025674^POUCH,MINI,CLOSED,PREMIER H#82100
+"DATA",176.112,37110,1)
+669899^^Y
+"DATA",176.112,37111,0)
+4025676^POUCH,MINI,CLOSED,PREMIER H#82300
+"DATA",176.112,37111,1)
+669900^^Y
+"DATA",176.112,37112,0)
+4025675^POUCH,MINI,CLOSED,PREMIER H#82325
+"DATA",176.112,37112,1)
+669901^^Y
+"DATA",176.112,37113,0)
+4025673^POUCH,MINI,CLOSED,PREMIER H#82500
+"DATA",176.112,37113,1)
+669902^^Y
+"DATA",176.112,37114,0)
+4024847^POUCH,OSTOMY FEATHER-LITE #251100
+"DATA",176.112,37114,1)
+669903^^Y
+"DATA",176.112,37115,0)
+4024849^POUCH,UROSTOMY,NEW IMAGE H#18412
+"DATA",176.112,37115,1)
+669904^^Y
+"DATA",176.112,37116,0)
+4025326^RESERVOIR,MINIMED #MMT-326A
+"DATA",176.112,37116,1)
+669905^^Y
+"DATA",176.112,37117,0)
+4025325^SET,INFUSION MINIMED #MMT-317
+"DATA",176.112,37117,1)
+669906^^Y
+"DATA",176.112,37118,0)
+4024577^TAPE,MEDIPORE SOFT CLOTH 1IN X 10YD 3M #2961
+"DATA",176.112,37118,1)
+669908^^Y
+"DATA",176.112,37119,0)
+4024575^TAPE,MEDIPORE SOFT CLOTH 2IN X 10YD 3M #2962
+"DATA",176.112,37119,1)
+669909^^Y
+"DATA",176.112,37120,0)
+4024579^TAPE,MEDIPORE SOFT CLOTH 2IN X 2YD 3M #2962
+"DATA",176.112,37120,1)
+669910^^Y
+"DATA",176.112,37121,0)
+4024572^TAPE,MEDIPORE SOFT CLOTH 3IN X 10YD 3M #2963
+"DATA",176.112,37121,1)
+669911^^Y
+"DATA",176.112,37122,0)
+4024573^TAPE,MEDIPORE SOFT CLOTH 4IN X 10YD 3M #2964
+"DATA",176.112,37122,1)
+669912^^Y
+"DATA",176.112,37123,0)
+4024578^TAPE,MEDIPORE SOFT CLOTH 4IN X 2YD 3M #2964
+"DATA",176.112,37123,1)
+669913^^Y
+"DATA",176.112,37124,0)
+4024574^TAPE,MEDIPORE SOFT CLOTH 6IN X 10YD 3M #2966
+"DATA",176.112,37124,1)
+669914^^Y
+"DATA",176.112,37125,0)
+4024576^TAPE,MEDIPORE SOFT CLOTH 6IN X 2YD 3M #2966
+"DATA",176.112,37125,1)
+669915^^Y
+"DATA",176.112,37126,0)
+4024571^TAPE,MEDIPORE SOFT CLOTH 8IN X 10YD 3M #2968
+"DATA",176.112,37126,1)
+669916^^Y
+"DATA",176.112,37127,0)
+4025578^TAPE,PINK 1.5IN X 5YD NU-HOPE #1615
+"DATA",176.112,37127,1)
+669917^^Y
+"DATA",176.112,37128,0)
+4025577^TAPE,PINK 1IN X 5YD NU-HOPE #1610
+"DATA",176.112,37128,1)
+669918^^Y
+"DATA",176.112,37129,0)
+4025579^TAPE,PINK 2IN X 5YD NU-HOPE #1620
+"DATA",176.112,37129,1)
+669919^^Y
+"DATA",176.112,37130,0)
+4024513^UNDERPAD,BED,WASHABLE 30IN X 34IN PRIVA #P11604
+"DATA",176.112,37130,1)
+669920^^Y
+"DATA",176.112,37131,0)
+4024514^UNDERPAD,BED,WASHABLE 30IN X 34IN PRIVA #P7204
+"DATA",176.112,37131,1)
+669921^^Y
+"DATA",176.112,37132,0)
+4025054^UNDERPAD,BED,WASHABLE 34IN X 36IN KENAD #61-8020/10
+"DATA",176.112,37132,1)
+669922^^Y
+"DATA",176.112,37133,0)
+4024512^UNDERPAD,BED,WASHABLE 34IN X 36IN PRIVA #P12205
+"DATA",176.112,37133,1)
+669923^^Y
+"DATA",176.112,37134,0)
+4024510^UNDERPAD,BED,WASHABLE 34IN X 36IN PRIVA #P12605
+"DATA",176.112,37134,1)
+669924^^Y
+"DATA",176.112,37135,0)
+4024511^UNDERPAD,BED,WASHABLE 34IN X 36IN PRIVA #P12605H
+"DATA",176.112,37135,1)
+669925^^Y
+"DATA",176.112,37136,0)
+4024508^UNDERPAD,BED,WASHABLE 34IN X 36IN PRIVA #P13205
+"DATA",176.112,37136,1)
+669926^^Y
+"DATA",176.112,37137,0)
+4024507^UNDERPAD,BED,WASHABLE 34IN X 36IN PRIVA #P13605
+"DATA",176.112,37137,1)
+669927^^Y
+"DATA",176.112,37138,0)
+4024509^UNDERPAD,BED,WASHABLE 34IN X 52IN PRIVA #P12606
+"DATA",176.112,37138,1)
+669928^^Y
+"DATA",176.112,37139,0)
+4025198^WAFER,DURAHESIVE C#4131-64
+"DATA",176.112,37139,1)
+669929^^Y
+"DATA",176.112,37140,0)
+4025199^WAFER,DURAHESIVE C#4131-65
+"DATA",176.112,37140,1)
+669930^^Y
+"DATA",176.112,37141,0)
+4025200^WAFER,DURAHESIVE C#4131-66
+"DATA",176.112,37141,1)
+669931^^Y
+"DATA",176.112,37142,0)
+4025192^ACCU-CHEK AVIVA (GLUCOSE) TEST STRIP
+"DATA",176.112,37142,1)
+669934^^Y
+"DATA",176.112,37143,0)
+4024654^ASCENSIA MICROFILL (GLUCOSE) TEST STRIP
+"DATA",176.112,37143,1)
+669963^^Y
+"DATA",176.112,37144,0)
+4024490^BABY WIPES (AF,FF) HUGGIES REFILL
+"DATA",176.112,37144,1)
+669967^^Y
+"DATA",176.112,37145,0)
+4024489^BABY WIPES (AF,FF) HUGGIES TUB
+"DATA",176.112,37145,1)
+669968^^Y
+"DATA",176.112,37146,0)
+4024486^BABY WIPES (AF,FF) REFILL
+"DATA",176.112,37146,1)
+669969^^Y
+"DATA",176.112,37147,0)
+4024485^BABY WIPES (AF,FF) TUB
+"DATA",176.112,37147,1)
+669970^^Y
+"DATA",176.112,37148,0)
+4025013^REPLIVA 21/7 TAB,28
+"DATA",176.112,37148,1)
+670059^^Y
+"DATA",176.112,37149,0)
+4025609^SPONYX TAB,28
+"DATA",176.112,37149,1)
+670061^^Y
+"DATA",176.112,37150,0)
+4024676^DILTIAZEM (CARTIA XT) 180MG CAP,SA
+"DATA",176.112,37150,1)
+670072^^Y
+"DATA",176.112,37151,0)
+4024677^DILTIAZEM (CARTIA XT) 240MG CAP,SA
+"DATA",176.112,37151,1)
+670073^^Y
+"DATA",176.112,37152,0)
+4024678^DILTIAZEM (CARTIA XT) 300MG CAP,SA
+"DATA",176.112,37152,1)
+670074^^Y
+"DATA",176.112,37153,0)
+4025323^INCONT LINER CAPRI EXTRA PLUS
+"DATA",176.112,37153,1)
+670075^^Y
+"DATA",176.112,37154,0)
+4025322^INCONT LINER CAPRI REGULAR
+"DATA",176.112,37154,1)
+670076^^Y
+"DATA",176.112,37155,0)
+4025324^INCONT LINER CAPRI ULTRA PLUS
+"DATA",176.112,37155,1)
+670077^^Y
+"DATA",176.112,37156,0)
+4025014^METHYLPHENIDATE HCL (RITALIN LA) 10MG CAP,SA
+"DATA",176.112,37156,1)
+670081^^Y
+"DATA",176.112,37157,0)
+4024832^GAUZE BLOODSTOP 2IN X 2IN
+"DATA",176.112,37157,1)
+670089^^Y
+"DATA",176.112,37158,0)
+4024833^GAUZE BLOODSTOP 2IN X 4IN
+"DATA",176.112,37158,1)
+670090^^Y
+"DATA",176.112,37159,0)
+4024834^GAUZE BLOODSTOP 4IN X 4IN
+"DATA",176.112,37159,1)
+670091^^Y
+"DATA",176.112,37160,0)
+4024835^GAUZE BLOODSTOP 4IN X 8IN
+"DATA",176.112,37160,1)
+670092^^Y
+"DATA",176.112,37161,0)
+4024836^GAUZE BLOODSTOP EX 2IN X 2IN
+"DATA",176.112,37161,1)
+670093^^Y
+"DATA",176.112,37162,0)
+4024837^GAUZE BLOODSTOP EX 2IN X 4IN
+"DATA",176.112,37162,1)
+670094^^Y
+"DATA",176.112,37163,0)
+4024838^GAUZE BLOODSTOP EX 4IN X 4IN
+"DATA",176.112,37163,1)
+670095^^Y
+"DATA",176.112,37164,0)
+4024839^GAUZE BLOODSTOP EX 4IN X 8IN
+"DATA",176.112,37164,1)
+670096^^Y
+"DATA",176.112,37165,0)
+4025351^HYDROXYTRYPTOPHAN PWDR
+"DATA",176.112,37165,1)
+670100^^Y
+"DATA",176.112,37166,0)
+4024820^PAPAIN 650000 UNIT/UREA 10% (ACCUZYME) OINT,TOP
+"DATA",176.112,37166,1)
+670112^^Y
+"DATA",176.112,37167,0)
+4025209^BD LOGIC (GLUCOSE) DEVICE
+"DATA",176.112,37167,1)
+670116^^Y
+"DATA",176.112,37168,0)
+4025210^BD MAGNI-GUIDE INSULIN MAGNIFIER
+"DATA",176.112,37168,1)
+670117^^Y
+"DATA",176.112,37169,0)
+4025379^BETONY EXTRACT
+"DATA",176.112,37169,1)
+670124^^Y
+"DATA",176.112,37170,0)
+4024721^BOOST DIABETIC LIQUID CHOCOLATE
+"DATA",176.112,37170,1)
+670128^^Y
+"DATA",176.112,37171,0)
+4024722^BOOST DIABETIC LIQUID STRAWBERRY
+"DATA",176.112,37171,1)
+670129^^Y
+"DATA",176.112,37172,0)
+4024720^BOOST DIABETIC LIQUID VANILLA
+"DATA",176.112,37172,1)
+670130^^Y
+"DATA",176.112,37173,0)
+4025365^CARUM (CARAWAY) OIL
+"DATA",176.112,37173,1)
+670140^^Y
+"DATA",176.112,37174,0)
+4025129^CISPLATIN PWDR
+"DATA",176.112,37174,1)
+670151^^Y
+"DATA",176.112,37175,0)
+4025007^CITRULLINE PWDR
+"DATA",176.112,37175,1)
+670154^^Y
+"DATA",176.112,37176,0)
+4024503^CLEANSING CLOTH,ATTENDS TUB
+"DATA",176.112,37176,1)
+670155^^Y
+"DATA",176.112,37177,0)
+4024764^CREATINE PWDR
+"DATA",176.112,37177,1)
+670172^^Y
+"DATA",176.112,37178,0)
+4025374^DANSHEN EXTRACT
+"DATA",176.112,37178,1)
+670179^^Y
+"DATA",176.112,37179,0)
+4024493^DIAPER GOODNITES LARGE
+"DATA",176.112,37179,1)
+670188^^Y
+"DATA",176.112,37180,0)
+4024496^DIAPER GOODNITES LARGE BOYS
+"DATA",176.112,37180,1)
+670189^^Y
+"DATA",176.112,37181,0)
+4024501^DIAPER GOODNITES LARGE GIRLS
+"DATA",176.112,37181,1)
+670190^^Y
+"DATA",176.112,37182,0)
+4024492^DIAPER GOODNITES MEDIUM
+"DATA",176.112,37182,1)
+670191^^Y
+"DATA",176.112,37183,0)
+4024495^DIAPER GOODNITES MEDIUM BOYS
+"DATA",176.112,37183,1)
+670192^^Y
+"DATA",176.112,37184,0)
+4024499^DIAPER GOODNITES MEDIUM GIRLS
+"DATA",176.112,37184,1)
+670193^^Y
+"DATA",176.112,37185,0)
+4024491^DIAPER GOODNITES SMALL
+"DATA",176.112,37185,1)
+670194^^Y
+"DATA",176.112,37186,0)
+4024494^DIAPER GOODNITES SMALL BOYS
+"DATA",176.112,37186,1)
+670195^^Y
+"DATA",176.112,37187,0)
+4024500^DIAPER GOODNITES SMALL GIRLS
+"DATA",176.112,37187,1)
+670196^^Y
+"DATA",176.112,37188,0)
+4024497^DIAPER GOODNITES X-LARGE BOYS
+"DATA",176.112,37188,1)
+670197^^Y
+"DATA",176.112,37189,0)
+4024614^DIAPER GOODNITES X-LARGE GIRLS
+"DATA",176.112,37189,1)
+670198^^Y
+"DATA",176.112,37190,0)
+4024502^DIAPER GOODNITES X-LARGR GIRLS
+"DATA",176.112,37190,1)
+670199^^Y
+"DATA",176.112,37191,0)
+4024498^DIAPER GOONITES SMALL GIRLS
+"DATA",176.112,37191,1)
+670200^^Y
+"DATA",176.112,37192,0)
+4024525^DIAPER INFANT HUGGIES SZ1
+"DATA",176.112,37192,1)
+670201^^Y
+"DATA",176.112,37193,0)
+4025364^DILLWEED OIL
+"DATA",176.112,37193,1)
+670203^^Y
+"DATA",176.112,37194,0)
+4025539^EXUBERA CHAMBER AND INHALER
+"DATA",176.112,37194,1)
+670232^^Y
+"DATA",176.112,37195,0)
+4025624^FAMPRIDINE (4-AMINOPYRIDINE) PWDR
+"DATA",176.112,37195,1)
+670236^^Y
+"DATA",176.112,37196,0)
+4024504^GLOVE LATEX SMALL PWDR-FREE NONSTERILE TEXTURED
+"DATA",176.112,37196,1)
+670249^^Y
+"DATA",176.112,37197,0)
+4025350^GUAIAC GUM PWDR
+"DATA",176.112,37197,1)
+670254^^Y
+"DATA",176.112,37198,0)
+4025344^HEMLOCK OIL
+"DATA",176.112,37198,1)
+670256^^Y
+"DATA",176.112,37199,0)
+4024703^INCONT BRIEF SIR DIGNITY LG
+"DATA",176.112,37199,1)
+670294^^Y
+"DATA",176.112,37200,0)
+4024704^INCONT BRIEF SIR DIGNITY MED
+"DATA",176.112,37200,1)
+670298^^Y
+"DATA",176.112,37201,0)
+4024705^INCONT BRIEF SIR DIGNITY SM
+"DATA",176.112,37201,1)
+670300^^Y
+"DATA",176.112,37202,0)
+4024706^INCONT BRIEF SIR DIGNITY XLG
+"DATA",176.112,37202,1)
+670301^^Y
+"DATA",176.112,37203,0)
+4025546^HYDRA-AID GEL,ORAL,PKT,12GM
+"DATA",176.112,37203,1)
+670310^^Y
+"DATA",176.112,37204,0)
+4025547^HYDRA-AID GEL,ORAL,PKT,26GM
+"DATA",176.112,37204,1)
+670311^^Y
+"DATA",176.112,37205,0)
+4024707^INCONT BRIEF SIR DIGNITY XXL
+"DATA",176.112,37205,1)
+670319^^Y
+"DATA",176.112,37206,0)
+4025537^INSULIN,HUMAN 1MG X 90/3MG X 90 INHL,ORAL,BLISTER,PKT
+"DATA",176.112,37206,1)
+670320^^Y
+"DATA",176.112,37207,0)
+4025556^INCONT LINER HANDI-CARE 10IN X 14IN
+"DATA",176.112,37207,1)
+670321^^Y
+"DATA",176.112,37208,0)
+4025557^INCONT LINER HANDI-CARE 10IN X 24IN
+"DATA",176.112,37208,1)
+670323^^Y
+"DATA",176.112,37209,0)
+4025553^INCONT LINER HANDI-CARE 4.5IN X 14IN
+"DATA",176.112,37209,1)
+670324^^Y
+"DATA",176.112,37210,0)
+4025554^INCONT LINER HANDI-CARE 6.5IN X 17IN
+"DATA",176.112,37210,1)
+670325^^Y
+"DATA",176.112,37211,0)
+4025555^INCONT LINER HANDI-CARE 7IN X 17IN
+"DATA",176.112,37211,1)
+670326^^Y
+"DATA",176.112,37212,0)
+4025550^INCONT LINER MOLIMED 5.5IN X 10IN
+"DATA",176.112,37212,1)
+670327^^Y
+"DATA",176.112,37213,0)
+4025551^INCONT LINER MOLIMED 6.5IN X 13IN
+"DATA",176.112,37213,1)
+670328^^Y
+"DATA",176.112,37214,0)
+4025552^INCONT LINER MOLIMED 8IN X 17IN
+"DATA",176.112,37214,1)
+670329^^Y
+"DATA",176.112,37215,0)
+4024517^INCONT LINER SERENITY DRIACTIVE
+"DATA",176.112,37215,1)
+670330^^Y
+"DATA",176.112,37216,0)
+4024519^INCONT LINER SERENITY DRIACTIVE PLUS
+"DATA",176.112,37216,1)
+670331^^Y
+"DATA",176.112,37217,0)
+4024522^INCONT LINER SERENITY GUARDS
+"DATA",176.112,37217,1)
+670332^^Y
+"DATA",176.112,37218,0)
+4024521^INCONT LINER SERENITY NIGHT & DAY
+"DATA",176.112,37218,1)
+670333^^Y
+"DATA",176.112,37219,0)
+4024617^INCONT LINER SERENITY SLENDER
+"DATA",176.112,37219,1)
+670334^^Y
+"DATA",176.112,37220,0)
+4024520^INCONT LINER SERENITY THIN
+"DATA",176.112,37220,1)
+670335^^Y
+"DATA",176.112,37221,0)
+4024518^INCONT LINER SERENTIY SLENDER
+"DATA",176.112,37221,1)
+670336^^Y
+"DATA",176.112,37222,0)
+4024821^JEVITY 1.2 CAL LIQUID
+"DATA",176.112,37222,1)
+670337^^Y
+"DATA",176.112,37223,0)
+4024822^JEVITY 1.2 CAL LIQUID 1000ML
+"DATA",176.112,37223,1)
+670338^^Y
+"DATA",176.112,37224,0)
+4024823^JEVITY 1.2 CAL LIQUID 1500ML
+"DATA",176.112,37224,1)
+670339^^Y
+"DATA",176.112,37225,0)
+4024826^JEVITY 1.5 CAL LIQUID 1000ML
+"DATA",176.112,37225,1)
+670341^^Y
+"DATA",176.112,37226,0)
+4024827^JEVITY 1.5 CAL LIQUID 1500ML
+"DATA",176.112,37226,1)
+670342^^Y
+"DATA",176.112,37227,0)
+4024824^JEVITY 1.5CAL LIQUID
+"DATA",176.112,37227,1)
+670343^^Y
+"DATA",176.112,37228,0)
+4024785^LANCET,30G
+"DATA",176.112,37228,1)
+670344^^Y
+"DATA",176.112,37229,0)
+4025213^LANCET,BD DEVICE
+"DATA",176.112,37229,1)
+670345^^Y
+"DATA",176.112,37230,0)
+4024584^LANCET,ON-STEP 2.2MM
+"DATA",176.112,37230,1)
+670346^^Y
+"DATA",176.112,37231,0)
+4024583^LANCET,ONE-STEP 1.8MM
+"DATA",176.112,37231,1)
+670347^^Y
+"DATA",176.112,37232,0)
+4024616^LANCET,ONE-STEP 2.2MM
+"DATA",176.112,37232,1)
+670348^^Y
+"DATA",176.112,37233,0)
+4024585^LANCET,ONE-STEP 2.8MM
+"DATA",176.112,37233,1)
+670349^^Y
+"DATA",176.112,37234,0)
+4024484^LANCET,TECHLITE 28G
+"DATA",176.112,37234,1)
+670350^^Y
+"DATA",176.112,37235,0)
+4025214^LANCET,ULTRA-FINE 33G
+"DATA",176.112,37235,1)
+670351^^Y
+"DATA",176.112,37236,0)
+4024684^NOVO FINE 31 DISPOSABLE NEEDLE
+"DATA",176.112,37236,1)
+670362^^Y
+"DATA",176.112,37237,0)
+4025337^RESOURCE BENEPROTEIN PWDR
+"DATA",176.112,37237,1)
+670370^^Y
+"DATA",176.112,37238,0)
+4025338^RESOURCE BENEPROTEIN PWDR,PKT,7GM
+"DATA",176.112,37238,1)
+670371^^Y
+"DATA",176.112,37239,0)
+4024742^TRACKEASE SMART (GLUCOSE) TEST STRIP
+"DATA",176.112,37239,1)
+670378^^Y
+"DATA",176.112,37240,0)
+4024505^UNDERPAD,BED 23IN X 36IN REASSURE PREMIUM
+"DATA",176.112,37240,1)
+670382^^Y
+"DATA",176.112,37241,0)
+4024506^UNDERPAD,BED 30IN X 36IN REASSURE PREMIUM
+"DATA",176.112,37241,1)
+670383^^Y
+"DATA",176.112,37242,0)
+4024741^TRUETRACK SMART (GLUCOSE) TEST STRIP
+"DATA",176.112,37242,1)
+670384^^Y
+"DATA",176.112,37243,0)
+4025682^SUPLENA CARB STEADY LIQUID VANILLA
+"DATA",176.112,37243,1)
+670386^^Y
+"DATA",176.112,37244,0)
+4024595^MICROCHAMBER
+"DATA",176.112,37244,1)
+670392^^Y
+"DATA",176.112,37245,0)
+4025386^MULLEIN EXTRACT
+"DATA",176.112,37245,1)
+670401^^Y
+"DATA",176.112,37246,0)
+4025212^NEEDLE,PEN 31G,5MM
+"DATA",176.112,37246,1)
+670414^^Y
+"DATA",176.112,37247,0)
+4025211^NEEDLE,PEN 31G,8MM
+"DATA",176.112,37247,1)
+670415^^Y
+"DATA",176.112,37248,0)
+4024858^OPTICHAMBER ADVANTAGE
+"DATA",176.112,37248,1)
+670428^^Y
+"DATA",176.112,37249,0)
+4024581^PAD,PERI MAXITHIN
+"DATA",176.112,37249,1)
+670430^^Y
+"DATA",176.112,37250,0)
+4025384^PASQUE FLOWER EXTRACT
+"DATA",176.112,37250,1)
+670439^^Y
+"DATA",176.112,37251,0)
+4025383^PERIWINKLE EXTRACT
+"DATA",176.112,37251,1)
+670448^^Y
+"DATA",176.112,37252,0)
+4025345^WILD CHERRY BARK PWDR
+"DATA",176.112,37252,1)
+670476^^Y
+"DATA",176.112,37253,0)
+4025382^POKEWEED EXTRACT
+"DATA",176.112,37253,1)
+670485^^Y
+"DATA",176.112,37254,0)
+4024607^VINPOCETINE PWDR
+"DATA",176.112,37254,1)
+670496^^Y
+"DATA",176.112,37255,0)
+4025358^PYGEUM BARK PWDR
+"DATA",176.112,37255,1)
+670510^^Y
+"DATA",176.112,37256,0)
+4024666^QUANTIFERON-TB GOLD
+"DATA",176.112,37256,1)
+670512^^Y
+"DATA",176.112,37257,0)
+4024531^URINE TEST,PH PAPER
+"DATA",176.112,37257,1)
+670520^^Y
+"DATA",176.112,37258,0)
+4025359^RHUBARB PWDR
+"DATA",176.112,37258,1)
+670528^^Y
+"DATA",176.112,37259,0)
+4024603^ROYAL JELLY PWDR
+"DATA",176.112,37259,1)
+670536^^Y
+"DATA",176.112,37260,0)
+4025369^SANGUINARIA CANADENSIS PWDR
+"DATA",176.112,37260,1)
+670545^^Y
+"DATA",176.112,37261,0)
+4024516^SHEEPSKIN PAD QUEEN
+"DATA",176.112,37261,1)
+670554^^Y
+"DATA",176.112,37262,0)
+4024515^SHEEPSKIN PAD TWIN
+"DATA",176.112,37262,1)
+670556^^Y
+"DATA",176.112,37263,0)
+4025517^SODIUM ALGINATE PWDR
+"DATA",176.112,37263,1)
+670560^^Y
+"DATA",176.112,37264,0)
+4025544^THICK & EASY PWDR PKT,8GM
+"DATA",176.112,37264,1)
+670564^^Y
+"DATA",176.112,37265,0)
+4025545^THICK & EASY PWDR
+"DATA",176.112,37265,1)
+670565^^Y
+"DATA",176.112,37266,0)
+4025148^AMIODARONE HCL (TEVA) 200MG TAB
+"DATA",176.112,37266,1)
+670599^^Y
+"DATA",176.112,37267,0)
+4004588^NIFEDIPINE (ADALAT CC) 30MG SA TAB
+"DATA",176.112,37267,1)
+672916^^Y
+"DATA",176.112,37268,0)
+4014045^NIFEDIPINE (ADALAT CC) 30MG SA TAB,UD
+"DATA",176.112,37268,1)
+672916^^Y
+"DATA",176.112,37269,0)
+4014046^NIFEDIPINE (ADALAT CC) 60MG SA TAB,UD
+"DATA",176.112,37269,1)
+672917^^Y
+"DATA",176.112,37270,0)
+4004589^NIFEDIPINE (ADALAT CC) 60MG SA TAB
+"DATA",176.112,37270,1)
+672917^^Y
+"DATA",176.112,37271,0)
+4014047^NIFEDIPINE (ADALAT CC) 90MG SA TAB,UD
+"DATA",176.112,37271,1)
+672918^^Y
+"DATA",176.112,37272,0)
+4004590^NIFEDIPINE (ADALAT CC) 90MG SA TAB
+"DATA",176.112,37272,1)
+672918^^Y
+"DATA",176.112,37273,0)
+4010204^APAP 500MG/DM 20MG/PSEUDEFED 60MG/PKT PWDR,ORAL
+"DATA",176.112,37273,1)
+672947^^Y
+"DATA",176.112,37274,0)
+4009653^AMIN-AID INSTANT DRINK PWDR
+"DATA",176.112,37274,1)
+673240^^Y
+"DATA",176.112,37275,0)
+4015387^TRANEXAMIC ACID PWDR
+"DATA",176.112,37275,1)
+673278^^Y
+"DATA",176.112,37276,0)
+4012417^CLEARCLENZ EYELID CLEANSER,STERILE
+"DATA",176.112,37276,1)
+673520^^Y
+"DATA",176.112,37277,0)
+4009662^ROSE WATER LIQUID
+"DATA",176.112,37277,1)
+673877^^Y
+"DATA",176.112,37278,0)
+4009661^ROSE SOLUBLE,FLUID
+"DATA",176.112,37278,1)
+673877^^Y
+"DATA",176.112,37279,0)
+4010551^CONTACT LENS SOLN (CLERZ)
+"DATA",176.112,37279,1)
+673914^^Y
+"DATA",176.112,37280,0)
+4001845^KENWOOD THERAPEUTIC LIQUID
+"DATA",176.112,37280,1)
+674008^^Y
+"DATA",176.112,37281,0)
+4012610^NO-RINSE SHAMPOO/BODY WASH
+"DATA",176.112,37281,1)
+674322^^Y
+"DATA",176.112,37282,0)
+4012117^PEDI-BOOT SPRAY FOR BOOTS/SHOES
+"DATA",176.112,37282,1)
+674582^^Y
+"DATA",176.112,37283,0)
+4008495^ACCU-CHEK II CONTROL
+"DATA",176.112,37283,1)
+675118^^Y
+"DATA",176.112,37284,0)
+4009490^CONTACT LENS DAILY CLEANER (LC-65) SOLN
+"DATA",176.112,37284,1)
+675412^^Y
+"DATA",176.112,37285,0)
+4016587^NETTLE LIQUID
+"DATA",176.112,37285,1)
+675789^^Y
+"DATA",176.112,37286,0)
+4014576^ALUMINUM POTASSIUM SULFATE PWDR
+"DATA",176.112,37286,1)
+675899^^Y
+"DATA",176.112,37287,0)
+4009720^ACTIFED SINUS DAYTIME/NIGHTIME CAP,PKG #24
+"DATA",176.112,37287,1)
+675932^^Y
+"DATA",176.112,37288,0)
+4008846^BISACODYL 10MG SUPP/CITRATE & SO4 MAGNESIA 30GM/SENNA EXT 74ML
+"DATA",176.112,37288,1)
+675972^^Y
+"DATA",176.112,37289,0)
+4010244^NUSOAP CLEANSING LIQUID
+"DATA",176.112,37289,1)
+676119^^Y
+"DATA",176.112,37290,0)
+4010483^CONTACT LENS REWETTING (LENS PLUS) SOLN
+"DATA",176.112,37290,1)
+677904^^Y
+"DATA",176.112,37291,0)
+4004582^AZLOCILLIN NA 4GM/VIL INJ
+"DATA",176.112,37291,1)
+684894^^Y
+"DATA",176.112,37292,0)
+4001990^CEPHRADINE 250MG/VIL INJ
+"DATA",176.112,37292,1)
+684900^^Y
+"DATA",176.112,37293,0)
+4001988^CEPHRADINE 2GM/BTL INJ
+"DATA",176.112,37293,1)
+684901^^Y
+"DATA",176.112,37294,0)
+4001992^CEPHRADINE 2GM/VIL INJ
+"DATA",176.112,37294,1)
+684901^^Y
+"DATA",176.112,37295,0)
+4001310^MOXALACTAM DISODIUM 1GM/VIL INJ
+"DATA",176.112,37295,1)
+684908^^Y
+"DATA",176.112,37296,0)
+4010270^OATMEAL,COLLOIDAL 100% BATH PWDR
+"DATA",176.112,37296,1)
+684915^^Y
+"DATA",176.112,37297,0)
+4012334^OATMEAL,COLLOIDAL 43% OILATED BATH PWDR
+"DATA",176.112,37297,1)
+684924^^Y
+"DATA",176.112,37298,0)
+4012603^CONTACT LENS CONDITIONING (BOSTON) SOLN
+"DATA",176.112,37298,1)
+685156^^Y
+"DATA",176.112,37299,0)
+4010084^BISACODYL 10MG SUPP/MG CIT 300ML/PHENOLPHTHALEIN 130MG TAB #2
+"DATA",176.112,37299,1)
+685203^^Y
+"DATA",176.112,37300,0)
+4013676^PERI-WASH CLEANSER
+"DATA",176.112,37300,1)
+685444^^Y
+"DATA",176.112,37301,0)
+4007242^SODIUM CITRATE PWDR
+"DATA",176.112,37301,1)
+685534^^Y
+"DATA",176.112,37302,0)
+4007996^ALBUMIN HUMAN 7MG/STANNOUS TARTRATE 0.08MG INJ
+"DATA",176.112,37302,1)
+685613^^Y
+"DATA",176.112,37303,0)
+4004689^CARBENICILLIN DISODIUM 20GM/VIL INJ
+"DATA",176.112,37303,1)
+685652^^Y
+"DATA",176.112,37304,0)
+4003329^GLOBULIN,IMMUNE (IV) 12GM/VIL INJ
+"DATA",176.112,37304,1)
+685662^^Y
+"DATA",176.112,37305,0)
+4007963^GLUCEPTATE NA 200MG/STANNOUS CL 0.06MG/TIN 0.07MG INJ
+"DATA",176.112,37305,1)
+685665^^Y
+"DATA",176.112,37306,0)
+4007839^GLUCEPTATE SODIUM 200MG/STANNOUS CHLORIDE 0.1MG INJ
+"DATA",176.112,37306,1)
+685667^^Y
+"DATA",176.112,37307,0)
+4004944^SODIUM FLUORIDE 0.685GM LIQUID,DENT
+"DATA",176.112,37307,1)
+685697^^Y
+"DATA",176.112,37308,0)
+4008000^STANNOUS CL,ANHYDROUS 0.42MG/SUCCIMER 1.2MG INJ
+"DATA",176.112,37308,1)
+685699^^Y
+"DATA",176.112,37309,0)
+4001301^CEPHALOTHIN NA 500MG/VIL INJ
+"DATA",176.112,37309,1)
+685771^^Y
+"DATA",176.112,37310,0)
+4010443^PHOSPHORUS 250MG/POTASSIUM 14.25MEQ/PKT PWDR
+"DATA",176.112,37310,1)
+685780^^Y
+"DATA",176.112,37311,0)
+4007997^ALBUMIN HUMAN 21MG/STANNOUS TARTRATE 0.23MG INJ
+"DATA",176.112,37311,1)
+685800^^Y
+"DATA",176.112,37312,0)
+4005816^THIAMYLAL NA 10GM/VIL INJ
+"DATA",176.112,37312,1)
+685815^^Y
+"DATA",176.112,37313,0)
+4005202^WARFARIN NA 50MG/VIL INJ
+"DATA",176.112,37313,1)
+685825^^Y
+"DATA",176.112,37314,0)
+4010201^APAP 650MG/DM 30MG/PSEUDEFED 60MG POWDER,ORAL
+"DATA",176.112,37314,1)
+685931^^Y
+"DATA",176.112,37315,0)
+4004581^AZLOCILLIN NA 3GM/VIL INJ
+"DATA",176.112,37315,1)
+685950^^Y
+"DATA",176.112,37316,0)
+4004392^LIDOCAINE HCL 1GM/BAG INJ
+"DATA",176.112,37316,1)
+685963^^Y
+"DATA",176.112,37317,0)
+4008018^SODIUM THIOSULFATE 1.1NS/TECHNETIUM (Tc 99m) 3MIL INJ
+"DATA",176.112,37317,1)
+685979^^Y
+"DATA",176.112,37318,0)
+4025753^ACCU-CHEK AVIVA (GLUCOSE) 1-2 CONTROL SOLN
+"DATA",176.112,37318,1)
+686037^^Y
+"DATA",176.112,37319,0)
+4025755^BAG,LEG BARD #150619
+"DATA",176.112,37319,1)
+686040^^Y
+"DATA",176.112,37320,0)
+4025754^BAG,LEG BARD #150632
+"DATA",176.112,37320,1)
+686041^^Y
+"DATA",176.112,37321,0)
+4025751^BRIEF,PROTECTION PLUS SMALL #MSCMW95250
+"DATA",176.112,37321,1)
+686042^^Y
+"DATA",176.112,37322,0)
+4025771^DRESSING,OPSITE IV3000 FRAME 2 3/8IN X 2 3/4IN SN#59410082
+"DATA",176.112,37322,1)
+686049^^Y
+"DATA",176.112,37323,0)
+4004574^MEZLOCILLIN NA 2GM/VIL INJ
+"DATA",176.112,37323,1)
+686059^^Y
+"DATA",176.112,37324,0)
+4008533^PSYLLIUM HYDROCOLLOID 3GM PWDR,ORAL
+"DATA",176.112,37324,1)
+686072^^Y
+"DATA",176.112,37325,0)
+4003975^TECHNETIUM Tc 99m DISOFENIN 20MG INJ
+"DATA",176.112,37325,1)
+686077^^Y
+"DATA",176.112,37326,0)
+4004688^CARBENICILLIN DISODIUM 10GM/VIL INJ
+"DATA",176.112,37326,1)
+686089^^Y
+"DATA",176.112,37327,0)
+4004690^CARBENICILLIN DISODIUM 30GM/VIL INJ
+"DATA",176.112,37327,1)
+686103^^Y
+"DATA",176.112,37328,0)
+4025763^IRRIGATING SYRINGE,PISTON CATHETER TIP 60ML
+"DATA",176.112,37328,1)
+686111^^Y
+"DATA",176.112,37329,0)
+4025758^IRRIGATION KIT W/BULB SYRINGE K#67800
+"DATA",176.112,37329,1)
+686115^^Y
+"DATA",176.112,37330,0)
+4025759^IRRIGATION KIT W/BULB SYRINGE K#67803
+"DATA",176.112,37330,1)
+686118^^Y
+"DATA",176.112,37331,0)
+4025760^IRRIGATION KIT W/PISTON SYRINGE K#68800
+"DATA",176.112,37331,1)
+686121^^Y
+"DATA",176.112,37332,0)
+4025761^IRRIGATION KIT W/PISTON SYRINGE K#68803
+"DATA",176.112,37332,1)
+686122^^Y
+"DATA",176.112,37333,0)
+4025762^IRRIGATION KIT W/PISTON SYRINGE K#68820
+"DATA",176.112,37333,1)
+686123^^Y
+"DATA",176.112,37334,0)
+4001311^MOXALACTAM DISODIUM 2GM/VIL INJ
+"DATA",176.112,37334,1)
+686125^^Y
+"DATA",176.112,37335,0)
+4005814^THIAMYLAL NA 1GM/VIL INJ
+"DATA",176.112,37335,1)
+686137^^Y
+"DATA",176.112,37336,0)
+4025764^LANCET,ABBOTT THIN
+"DATA",176.112,37336,1)
+686144^^Y
+"DATA",176.112,37337,0)
+4025750^LANCET,ACCU-CHEK MULTICLIX DRUM
+"DATA",176.112,37337,1)
+686146^^Y
+"DATA",176.112,37338,0)
+4025772^LINER,SECURELY YOURS,ADHESIVE
+"DATA",176.112,37338,1)
+686147^^Y
+"DATA",176.112,37339,0)
+4025769^NOVASOURCE RENAL LIQUID (VANILLA)
+"DATA",176.112,37339,1)
+686150^^Y
+"DATA",176.112,37340,0)
+4025770^NOVASOURCE RENAL LIQUID 1000ML
+"DATA",176.112,37340,1)
+686151^^Y
+"DATA",176.112,37341,0)
+4025765^POUCH,DRAINABLE,NEW IMAGE H#18134
+"DATA",176.112,37341,1)
+686154^^Y
+"DATA",176.112,37342,0)
+4025774^POUCH,DRAINABLE,PREMIER H#8400
+"DATA",176.112,37342,1)
+686155^^Y
+"DATA",176.112,37343,0)
+4025773^POUCH,DRAINABLE,PREMIER H#8551
+"DATA",176.112,37343,1)
+686156^^Y
+"DATA",176.112,37344,0)
+4025767^POUCH,DRAINABLE,SUR-FIT C#4114-91
+"DATA",176.112,37344,1)
+686157^^Y
+"DATA",176.112,37345,0)
+4025729^UNI-DERM CREAM,TOP
+"DATA",176.112,37345,1)
+686164^^Y
+"DATA",176.112,37346,0)
+4004935^SODIUM FLUORIDE 2.2MG SOLN
+"DATA",176.112,37346,1)
+686175^^Y
+"DATA",176.112,37347,0)
+4004920^SODIUM FLUORIDE 2.2MG LIQUID
+"DATA",176.112,37347,1)
+686175^^Y
+"DATA",176.112,37348,0)
+4025752^THEOPHYLLINE 300MG TAB,SA (PLIVA)
+"DATA",176.112,37348,1)
+686179^^Y
+"DATA",176.112,37349,0)
+4001991^CEPHRADINE 4GM/BTL INJ
+"DATA",176.112,37349,1)
+686902^^Y
+"DATA",176.112,37350,0)
+4007592^IODOQUINOL 25GM/BTL PWDR
+"DATA",176.112,37350,1)
+686908^^Y
+"DATA",176.112,37351,0)
+4002326^LEVOTHYROXINE NA 100MCG/VIL INJ
+"DATA",176.112,37351,1)
+686910^^Y
+"DATA",176.112,37352,0)
+4007641^POTASSIUM GUAIACOLSULFONATE 44MG/PROMETHAZINE 5MG LIQUID
+"DATA",176.112,37352,1)
+686913^^Y
+"DATA",176.112,37353,0)
+4026057^WHEAT DEXTRIN (BENEFIBER) PWDR,ORAL
+"DATA",176.112,37353,1)
+686929^^Y
+"DATA",176.112,37354,0)
+4008002^PENTETATE CA TRISODIUM 20.6MG/STANNOUS CL 0.21MG INJ
+"DATA",176.112,37354,1)
+687028^^Y
+"DATA",176.112,37355,0)
+4007990^SODIUM IODIDE,I-123,100MIC CAP
+"DATA",176.112,37355,1)
+687055^^Y
+"DATA",176.112,37356,0)
+4007948^BENZOCAINE 16.9GM/CHLOROBUTANOL 4.34GM LIQUID,TOP
+"DATA",176.112,37356,1)
+687492^^Y
+"DATA",176.112,37357,0)
+4007467^ESTRADIOL VALERATE 5MG/HYDROXYPROGESTERONE CAPROATE 250MG INJ
+"DATA",176.112,37357,1)
+687676^^Y
+"DATA",176.112,37358,0)
+4007966^MEDRONATE DISODIUM 10MG/STANNOUS CHLORIDE 0.85MG INJ
+"DATA",176.112,37358,1)
+687680^^Y
+"DATA",176.112,37359,0)
+4007883^PHOSPHORIC ACID 1.5GM/NA FLUORIDE 2.7GM SOLN
+"DATA",176.112,37359,1)
+687683^^Y
+"DATA",176.112,37360,0)
+4006108^THIOPENTAL NA 6.25GM/VIL INJ
+"DATA",176.112,37360,1)
+687749^^Y
+"DATA",176.112,37361,0)
+4003882^CEPHAPIRIN NA 20GM/VIL INJ
+"DATA",176.112,37361,1)
+688059^^Y
+"DATA",176.112,37362,0)
+4004992^POLYESTRADIOL PO4 40MG/VIL INJ,SOLN
+"DATA",176.112,37362,1)
+688075^^Y
+"DATA",176.112,37363,0)
+4005815^THIAMYLAL NA 5GM/VIL INJ
+"DATA",176.112,37363,1)
+688088^^Y
+"DATA",176.112,37364,0)
+4004577^MEZLOCILLIN NA 20GM/BTL INJ
+"DATA",176.112,37364,1)
+688186^^Y
+"DATA",176.112,37365,0)
+4010240^APAP 600MG/DM 15MG/DOXYLAMINE 7.5MG/EPHEDRINE 8MG LIQUID
+"DATA",176.112,37365,1)
+688196^^Y
+"DATA",176.112,37366,0)
+4000720^PHENOBARBITAL NA 120MG/VIL INJ
+"DATA",176.112,37366,1)
+688222^^Y
+"DATA",176.112,37367,0)
+4004934^SODIUM FLUORIDE 0.25MG/MIN LIQUID
+"DATA",176.112,37367,1)
+688598^^Y
+"DATA",176.112,37368,0)
+4025841^GLUTAMINE CAP/TAB
+"DATA",176.112,37368,1)
+689172^^Y
+"DATA",176.112,37369,0)
+4025842^HERBAL BREAST ENHANCEMENT CAP/TAB
+"DATA",176.112,37369,1)
+689181^^Y
+"DATA",176.112,37370,0)
+4025790^IRON (POLY/COMPLEX) 150MG/FA 1MG/B12 25MCG/VIT C 60MG CAP
+"DATA",176.112,37370,1)
+689196^^Y
+"DATA",176.112,37371,0)
+4025802^MACUVITE TAB
+"DATA",176.112,37371,1)
+689218^^Y
+"DATA",176.112,37372,0)
+4025833^MULTIVITAMIN/OPHTH ANTIOXIDANT/LUTEIN CAP/TAB
+"DATA",176.112,37372,1)
+689228^^Y
+"DATA",176.112,37373,0)
+4025839^CATHERIZATION SET,FOLEY W/O CATH BARD #782100
+"DATA",176.112,37373,1)
+692105^^Y
+"DATA",176.112,37374,0)
+4025818^DRESSING,AQUACEL AG 4IN X 4.7IN C#403765
+"DATA",176.112,37374,1)
+692113^^Y
+"DATA",176.112,37375,0)
+4025806^DRESSING,COPA 2IN X 2IN KEN#55522
+"DATA",176.112,37375,1)
+692120^^Y
+"DATA",176.112,37376,0)
+4025808^DRESSING,COPA 3.5IN X 3IN FENESTRATED KEN#55535
+"DATA",176.112,37376,1)
+692121^^Y
+"DATA",176.112,37377,0)
+4025807^DRESSING,COPA 3IN X 3IN KEN#55533
+"DATA",176.112,37377,1)
+692122^^Y
+"DATA",176.112,37378,0)
+4025809^DRESSING,COPA 4IN X 4IN KEN#55544
+"DATA",176.112,37378,1)
+692123^^Y
+"DATA",176.112,37379,0)
+4025812^DRESSING,COPA 4IN X 8IN KEN#55548
+"DATA",176.112,37379,1)
+692124^^Y
+"DATA",176.112,37380,0)
+4025810^DRESSING,COPA 5IN X 5IN KEN#55555
+"DATA",176.112,37380,1)
+692125^^Y
+"DATA",176.112,37381,0)
+4025811^DRESSING,COPA 6IN X 6IN KEN#55566
+"DATA",176.112,37381,1)
+692126^^Y
+"DATA",176.112,37382,0)
+4025813^DRESSING,COPA 8IN X 8IN KEN#55588
+"DATA",176.112,37382,1)
+692127^^Y
+"DATA",176.112,37383,0)
+4025800^DRESSING,OPSITE 5 1/2IN X 4IN SN#4963
+"DATA",176.112,37383,1)
+692138^^Y
+"DATA",176.112,37384,0)
+4025834^POUCH,CLOSED POUCHKINS H#3778
+"DATA",176.112,37384,1)
+692173^^Y
+"DATA",176.112,37385,0)
+4025830^POUCH,DRAINABLE,NEW IMAGE H#18182
+"DATA",176.112,37385,1)
+692175^^Y
+"DATA",176.112,37386,0)
+4025831^POUCH,DRAINABLE,NEW IMAGE H#18183
+"DATA",176.112,37386,1)
+692176^^Y
+"DATA",176.112,37387,0)
+4025832^POUCH,DRAINABLE,NEW IMAGE H#18184
+"DATA",176.112,37387,1)
+692177^^Y
+"DATA",176.112,37388,0)
+4025872^TUBE FEEDING SET FLEXIFLO QUANTUM K#50600
+"DATA",176.112,37388,1)
+692218^^Y
+"DATA",176.112,37389,0)
+4025873^TUBE FEEDING SET FLEXIFLO QUANTUM K#50604
+"DATA",176.112,37389,1)
+692219^^Y
+"DATA",176.112,37390,0)
+4025871^TUBE FEEDING SET PATROL K#52040
+"DATA",176.112,37390,1)
+692220^^Y
+"DATA",176.112,37391,0)
+4025826^BARRIER,OSTOMY,NEW IMAGE H#14204
+"DATA",176.112,37391,1)
+692597^^Y
+"DATA",176.112,37392,0)
+4025825^BARRIER,OSTOMY,NEW IMAGE H#14503
+"DATA",176.112,37392,1)
+692598^^Y
+"DATA",176.112,37393,0)
+4025824^BARRIER,OSTOMY,NEW IMAGE H#16108
+"DATA",176.112,37393,1)
+692599^^Y
+"DATA",176.112,37394,0)
+4025827^CATHETER,EXTERNAL INVIEW LG H#97536
+"DATA",176.112,37394,1)
+692600^^Y
+"DATA",176.112,37395,0)
+4025861^FREE AMINO ACID DIET (F.A.A.) 1000ML
+"DATA",176.112,37395,1)
+692601^^Y
+"DATA",176.112,37396,0)
+4025860^FREE AMINO ACID DIET (F.A.A.) LIQUID
+"DATA",176.112,37396,1)
+692602^^Y
+"DATA",176.112,37397,0)
+4025865^JEVITY 1 CAL LIQUID
+"DATA",176.112,37397,1)
+692607^^Y
+"DATA",176.112,37398,0)
+4025866^JEVITY 1 CAL LIQUID 1000ML
+"DATA",176.112,37398,1)
+692608^^Y
+"DATA",176.112,37399,0)
+4025867^JEVITY 1 CAL LIQUID 1500ML
+"DATA",176.112,37399,1)
+692609^^Y
+"DATA",176.112,37400,0)
+4026250^PAPAIN 650000 UNIT/UREA 10% (KOVIA) OINT,TOP
+"DATA",176.112,37400,1)
+692845^^Y
+"DATA",176.112,37401,0)
+4025822^NEPRO CARB STEADY LIQUID 1000ML
+"DATA",176.112,37401,1)
+693081^^Y
+"DATA",176.112,37402,0)
+4025821^NEPRO CARB STEADY LIQUID BUTTER PECAN
+"DATA",176.112,37402,1)
+693082^^Y
+"DATA",176.112,37403,0)
+4025820^NEPRO CARB STEADY LIQUID MIXED BERRY
+"DATA",176.112,37403,1)
+693083^^Y
+"DATA",176.112,37404,0)
+4025819^NEPRO CARB STEADY LIQUID VANILLA
+"DATA",176.112,37404,1)
+693084^^Y
+"DATA",176.112,37405,0)
+4024605^NON-ADHESIVE UROSTOMY SYSTEM LARGE #501002
+"DATA",176.112,37405,1)
+693085^^Y
+"DATA",176.112,37406,0)
+4025843^NUTREN 1.0 LIQUID
+"DATA",176.112,37406,1)
+693086^^Y
+"DATA",176.112,37407,0)
+4025845^NUTREN 1.0 LIQUID 1000ML
+"DATA",176.112,37407,1)
+693087^^Y
+"DATA",176.112,37408,0)
+4025846^NUTREN 1.0 LIQUID 1500ML
+"DATA",176.112,37408,1)
+693088^^Y
+"DATA",176.112,37409,0)
+4025844^NUTREN 1.0 LIQUID VANILLA
+"DATA",176.112,37409,1)
+693089^^Y
+"DATA",176.112,37410,0)
+4025853^NUTREN 1.5 LIQUID
+"DATA",176.112,37410,1)
+693090^^Y
+"DATA",176.112,37411,0)
+4025855^NUTREN 1.5 LIQUID 1000ML
+"DATA",176.112,37411,1)
+693091^^Y
+"DATA",176.112,37412,0)
+4025856^NUTREN 1.5 LIQUID 1500ML
+"DATA",176.112,37412,1)
+693092^^Y
+"DATA",176.112,37413,0)
+4025854^NUTREN 1.5 LIQUID VANILLA
+"DATA",176.112,37413,1)
+693093^^Y
+"DATA",176.112,37414,0)
+4025858^NUTREN REPLETE FIBER LIQUID 1000ML
+"DATA",176.112,37414,1)
+693094^^Y
+"DATA",176.112,37415,0)
+4025859^NUTREN REPLETE FIBER LIQUID 1500ML
+"DATA",176.112,37415,1)
+693095^^Y
+"DATA",176.112,37416,0)
+4025857^NUTREN REPLETE FIBER LIQUID VANILLA
+"DATA",176.112,37416,1)
+693096^^Y
+"DATA",176.112,37417,0)
+4025836^OPTIMENTAL LIQUID VANILLA
+"DATA",176.112,37417,1)
+693097^^Y
+"DATA",176.112,37418,0)
+4025868^OSMOLITE 1.2 CAL LIQUID
+"DATA",176.112,37418,1)
+693098^^Y
+"DATA",176.112,37419,0)
+4025869^OSMOLITE 1.2 CAL LIQUID 1000ML
+"DATA",176.112,37419,1)
+693099^^Y
+"DATA",176.112,37420,0)
+4025870^OSMOLITE 1.2 CAL LIQUID 1500ML
+"DATA",176.112,37420,1)
+693101^^Y
+"DATA",176.112,37421,0)
+4025799^PRECISION XTRA (GLUCOSE) METER
+"DATA",176.112,37421,1)
+693127^^Y
+"DATA",176.112,37422,0)
+4025828^REGENECARE WOUND GEL,TOP
+"DATA",176.112,37422,1)
+693128^^Y
+"DATA",176.112,37423,0)
+4025835^RESOURCE BENECALORIE PKT,45ML
+"DATA",176.112,37423,1)
+693129^^Y
+"DATA",176.112,37424,0)
+4025795^PAPAIN 650000 UNIT/UREA 10% EMULSION SPRAY,TOP
+"DATA",176.112,37424,1)
+694007^^Y
+"DATA",176.112,37425,0)
+4025928^BIAFINE CREAM,TOP
+"DATA",176.112,37425,1)
+695770^^Y
+"DATA",176.112,37426,0)
+4025920^DEXTRAN 0.1%/HYPROMELLOSE 0.8% (OCUCOAT) SOLN,OPH
+"DATA",176.112,37426,1)
+695785^^Y
+"DATA",176.112,37427,0)
+4025921^DEXTRAN 0.1%/HYPROMELLOSE 0.8% (OCUCOAT) SOLN,OPH,1ML
+"DATA",176.112,37427,1)
+695786^^Y
+"DATA",176.112,37428,0)
+4025907^HYDROXYTRYPTOPHAN CAP/TAB
+"DATA",176.112,37428,1)
+695794^^Y
+"DATA",176.112,37429,0)
+4025897^MORINDA (NONI) CAP/TAB
+"DATA",176.112,37429,1)
+695796^^Y
+"DATA",176.112,37430,0)
+4025890^MULTIVITAMIN/MINERALS MENS HERBAL CAP/TAB
+"DATA",176.112,37430,1)
+695799^^Y
+"DATA",176.112,37431,0)
+4025923^OCUVITE LUTEIN CAP
+"DATA",176.112,37431,1)
+695800^^Y
+"DATA",176.112,37432,0)
+4025713^NATTOKINASE CAP/TAB
+"DATA",176.112,37432,1)
+695960^^Y
+"DATA",176.112,37433,0)
+4025930^BARRIER,ADAPT RING H#7805
+"DATA",176.112,37433,1)
+700419^^Y
+"DATA",176.112,37434,0)
+4025931^BARRIER,ADAPT RING H#7806
+"DATA",176.112,37434,1)
+700420^^Y
+"DATA",176.112,37435,0)
+4025947^CARTRIDGE,ANIMAS IR 2ML #1200
+"DATA",176.112,37435,1)
+700424^^Y
+"DATA",176.112,37436,0)
+4025934^CATHERIZATION SET,ADD-A-FOLEY KENDALL #6176
+"DATA",176.112,37436,1)
+700425^^Y
+"DATA",176.112,37437,0)
+4025932^CATHERIZATION SET,FOLEY 16FR BARD #899716
+"DATA",176.112,37437,1)
+700426^^Y
+"DATA",176.112,37438,0)
+4025935^CATHERIZATION SET,FOLEY 16FR KENDALL #6146
+"DATA",176.112,37438,1)
+700427^^Y
+"DATA",176.112,37439,0)
+4025937^CATHERIZATION SET,FOLEY 16FR KENDALL #6155
+"DATA",176.112,37439,1)
+700428^^Y
+"DATA",176.112,37440,0)
+4025933^CATHERIZATION SET,FOLEY 18FR BARD #899718
+"DATA",176.112,37440,1)
+700429^^Y
+"DATA",176.112,37441,0)
+4025936^CATHERIZATION SET,FOLEY 18FR KENDALL #6148
+"DATA",176.112,37441,1)
+700430^^Y
+"DATA",176.112,37442,0)
+4025938^CATHERIZATION SET,INTERMITTENT 12FR C#28027S
+"DATA",176.112,37442,1)
+700431^^Y
+"DATA",176.112,37443,0)
+4025939^CATHERIZATION SET,INTERMITTENT 14FR C#28028S
+"DATA",176.112,37443,1)
+700432^^Y
+"DATA",176.112,37444,0)
+4025940^CATHETER COUDE 16FR BARD#010116
+"DATA",176.112,37444,1)
+700433^^Y
+"DATA",176.112,37445,0)
+4025946^DRESSING,PROMOGRAN PRISMA MATRIX 19.1IN X 19.1IN JJ#9191
+"DATA",176.112,37445,1)
+700434^^Y
+"DATA",176.112,37446,0)
+4025945^DRESSING,PROMOGRAN PRISMA MATRIX 4.75IN X 4.75IN JJ#4434
+"DATA",176.112,37446,1)
+700435^^Y
+"DATA",176.112,37447,0)
+4025929^INCONT LINER DIGNITY MINI-PADS
+"DATA",176.112,37447,1)
+700438^^Y
+"DATA",176.112,37448,0)
+4025924^POUCH,DRAINABLE,NEW IMAGE H#18012
+"DATA",176.112,37448,1)
+700439^^Y
+"DATA",176.112,37449,0)
+4025925^POUCH,DRAINABLE,NEW IMAGE H#18013
+"DATA",176.112,37449,1)
+700440^^Y
+"DATA",176.112,37450,0)
+4025926^POUCH,DRAINABLE,NEW IMAGE H#18014
+"DATA",176.112,37450,1)
+700441^^Y
+"DATA",176.112,37451,0)
+4025927^POUCH,DRAINABLE,NEW IMAGE H#18016
+"DATA",176.112,37451,1)
+700442^^Y
+"DATA",176.112,37452,0)
+4025944^POUCH,DRAINABLE,SUR-FIT C#4114-93
+"DATA",176.112,37452,1)
+700443^^Y
+"DATA",176.112,37453,0)
+4025918^RESOURCE 2.0 LIQUID (ORANGE CREME)
+"DATA",176.112,37453,1)
+700444^^Y
+"DATA",176.112,37454,0)
+4025917^RESOURCE 2.0 LIQUID (VANILLA)
+"DATA",176.112,37454,1)
+700445^^Y
+"DATA",176.112,37455,0)
+4025948^SET,INFUSION ANIMAS #181-00
+"DATA",176.112,37455,1)
+700446^^Y
+"DATA",176.112,37456,0)
+4025949^SET,INFUSION ANIMAS #182-00
+"DATA",176.112,37456,1)
+700447^^Y
+"DATA",176.112,37457,0)
+4025914^SET,INFUSION MINIMED #MMT-840
+"DATA",176.112,37457,1)
+700448^^Y
+"DATA",176.112,37458,0)
+4025905^TUBERCULIN SYRINGE 1ML SLIP TIP
+"DATA",176.112,37458,1)
+700449^^Y
+"DATA",176.112,37459,0)
+4025908^SIMPLYTHICK GEL,ORAL
+"DATA",176.112,37459,1)
+700450^^Y
+"DATA",176.112,37460,0)
+4025910^SIMPLYTHICK GEL,ORAL HONEY
+"DATA",176.112,37460,1)
+700451^^Y
+"DATA",176.112,37461,0)
+4025912^SIMPLYTHICK GEL,ORAL HONEY,30GM
+"DATA",176.112,37461,1)
+700452^^Y
+"DATA",176.112,37462,0)
+4025909^SIMPLYTHICK GEL,ORAL NECTAR
+"DATA",176.112,37462,1)
+700453^^Y
+"DATA",176.112,37463,0)
+4025911^SIMPLYTHICK GEL,ORAL NECTAR,15GM
+"DATA",176.112,37463,1)
+700454^^Y
+"DATA",176.112,37464,0)
+4025898^SOUR CHERRY JUICE
+"DATA",176.112,37464,1)
+700455^^Y
+"DATA",176.112,37465,0)
+4025902^PRO-STAT 101 LIQUID,ORAL
+"DATA",176.112,37465,1)
+700456^^Y
+"DATA",176.112,37466,0)
+4025900^PRO-STAT 64 LIQUID,ORAL
+"DATA",176.112,37466,1)
+700457^^Y
+"DATA",176.112,37467,0)
+4025901^PRO-STAT 64 LIQUID,ORAL,30ML
+"DATA",176.112,37467,1)
+700458^^Y
+"DATA",176.112,37468,0)
+4025903^PRO-STAT RC LIQUID,ORAL
+"DATA",176.112,37468,1)
+700459^^Y
+"DATA",176.112,37469,0)
+4025980^HYDROXOCOBALAMIN (CYANOKIT) 2.5GM/VIL INJ KIT,2
+"DATA",176.112,37469,1)
+700499^^Y
+"DATA",176.112,37470,0)
+4025862^SIMPLYTHICK LIQUID,ORAL
+"DATA",176.112,37470,1)
+705093^^Y
+"DATA",176.112,37471,0)
+4025864^SIMPLYTHICK LIQUID,ORAL HONEY
+"DATA",176.112,37471,1)
+705094^^Y
+"DATA",176.112,37472,0)
+4025863^SIMPLYTHICK LIQUID,ORAL NECTAR
+"DATA",176.112,37472,1)
+705095^^Y
+"DATA",176.112,37473,0)
+4025586^INSULIN SYRINGE 0.3ML 29G 0.5IN
+"DATA",176.112,37473,1)
+705107^^Y
+"DATA",176.112,37474,0)
+4024697^INSULIN SYRINGE 0.3ML 30G 0.5IN
+"DATA",176.112,37474,1)
+705108^^Y
+"DATA",176.112,37475,0)
+4025037^INSULIN SYRINGE 0.3ML 30G 5/16IN
+"DATA",176.112,37475,1)
+705109^^Y
+"DATA",176.112,37476,0)
+4026023^AEROCHAMBER MAX W/MASK MED
+"DATA",176.112,37476,1)
+705216^^Y
+"DATA",176.112,37477,0)
+4026024^AEROCHAMBER MAX W/MASK LARGE
+"DATA",176.112,37477,1)
+705217^^Y
+"DATA",176.112,37478,0)
+4026025^AEROCHAMBER MAX W/MASK SMALL
+"DATA",176.112,37478,1)
+705218^^Y
+"DATA",176.112,37479,0)
+4026022^AEROCHAMBER Z-STAT PLUS W/MASK LARGE
+"DATA",176.112,37479,1)
+705219^^Y
+"DATA",176.112,37480,0)
+4026020^AEROCHAMBER Z-STAT PLUS W/MASK MED
+"DATA",176.112,37480,1)
+705220^^Y
+"DATA",176.112,37481,0)
+4026021^AEROCHAMBER Z-STAT PLUS W/MASK SMALL
+"DATA",176.112,37481,1)
+705221^^Y
+"DATA",176.112,37482,0)
+4025972^ASCENSIA CONTOUR (GLUCOSE) TEST STRIP
+"DATA",176.112,37482,1)
+705222^^Y
+"DATA",176.112,37483,0)
+4026013^BARRIER,OSTOMY,NEW IMAGE H#14903
+"DATA",176.112,37483,1)
+705223^^Y
+"DATA",176.112,37484,0)
+4026001^BELT,SUPPORT 9IN XX-LG NU-HOPE #6469
+"DATA",176.112,37484,1)
+705224^^Y
+"DATA",176.112,37485,0)
+4025970^PHOSPHATIDYLSERINE CAP/TAB
+"DATA",176.112,37485,1)
+705247^^Y
+"DATA",176.112,37486,0)
+4026006^RESVERATROL CAP/TAB
+"DATA",176.112,37486,1)
+705254^^Y
+"DATA",176.112,37487,0)
+4026012^CALCIUM CARBONATE 600MG/MINERALS/VITAMIN D TAB,CHEW
+"DATA",176.112,37487,1)
+705265^^Y
+"DATA",176.112,37488,0)
+4026014^CATHETER,INTERMITTENT PERSONAL 10FR ROCHESTER #63610
+"DATA",176.112,37488,1)
+705266^^Y
+"DATA",176.112,37489,0)
+4026015^CATHETER,INTERMITTENT PERSONAL 12FR ROCHESTER #63612
+"DATA",176.112,37489,1)
+705267^^Y
+"DATA",176.112,37490,0)
+4026016^CATHETER,INTERMITTENT PERSONAL 14FR ROCHESTER #63614
+"DATA",176.112,37490,1)
+705268^^Y
+"DATA",176.112,37491,0)
+4026017^CATHETER,INTERMITTENT PERSONAL 16FR ROCHESTER #63616
+"DATA",176.112,37491,1)
+705269^^Y
+"DATA",176.112,37492,0)
+4026018^CATHETER,INTERMITTENT PERSONAL 18FR ROCHESTER #63618
+"DATA",176.112,37492,1)
+705270^^Y
+"DATA",176.112,37493,0)
+4025962^DILTIAZEM (INWOOD) 420MG CAP,SA
+"DATA",176.112,37493,1)
+705272^^Y
+"DATA",176.112,37494,0)
+4025981^INCONT LINER DIGNITY THINSERT
+"DATA",176.112,37494,1)
+705275^^Y
+"DATA",176.112,37495,0)
+4025978^LANCET,FINGER STICK SAFETY 21G 1.8MM
+"DATA",176.112,37495,1)
+705276^^Y
+"DATA",176.112,37496,0)
+4025976^LANCET,FINGER STICK SAFETY 21G 2.2MM
+"DATA",176.112,37496,1)
+705277^^Y
+"DATA",176.112,37497,0)
+4025977^LANCET,FINGER STICK SAFETY 26G 1.8MM
+"DATA",176.112,37497,1)
+705278^^Y
+"DATA",176.112,37498,0)
+4026003^OREGANO OIL
+"DATA",176.112,37498,1)
+705279^^Y
+"DATA",176.112,37499,0)
+4026009^PERATIVE LIQUID 1000ML
+"DATA",176.112,37499,1)
+705280^^Y
+"DATA",176.112,37500,0)
+4026010^PERATIVE LIQUID 1500ML
+"DATA",176.112,37500,1)
+705281^^Y
+"DATA",176.112,37501,0)
+4026008^POUCH,CLOSED,PREMIUM H#82300
+"DATA",176.112,37501,1)
+705282^^Y
+"DATA",176.112,37502,0)
+4026007^POUCH,CLOSED,PREMIUM H#82400
+"DATA",176.112,37502,1)
+705283^^Y
+"DATA",176.112,37503,0)
+4026002^POUCH,DRAINABLE,ASSURA COLOPLAST #15860
+"DATA",176.112,37503,1)
+705284^^Y
+"DATA",176.112,37504,0)
+4025979^POUCH,DRAINABLE,PREMIER H#88300
+"DATA",176.112,37504,1)
+705285^^Y
+"DATA",176.112,37505,0)
+4025986^PRODIGY (GLUCOSE) TEST STRIP
+"DATA",176.112,37505,1)
+705286^^Y
+"DATA",176.112,37506,0)
+4026011^SILVER,COLLOIDAL LIQUID,ORAL
+"DATA",176.112,37506,1)
+705287^^Y
+"DATA",176.112,37507,0)
+4025975^URINARY DRAINAGE BAG BARD #154104
+"DATA",176.112,37507,1)
+705288^^Y
+"DATA",176.112,37508,0)
+4026697^NOVA MAX (GLUCOSE) TEST STRIP
+"DATA",176.112,37508,1)
+705788^^Y
+"DATA",176.112,37509,0)
+4026253^HEPATITIS B IMMUNE GLOBULIN (HEPAGAM B) INJ
+"DATA",176.112,37509,1)
+705907^^Y
+"DATA",176.112,37510,0)
+4000891^POTASSIUM CHLORIDE 10MEQ TAB,SA (K-DUR)
+"DATA",176.112,37510,1)
+706459^^Y
+"DATA",176.112,37511,0)
+4003712^THEOPHYLLINE 100MG CAP,SA (SLO-BID GYROCAPS)
+"DATA",176.112,37511,1)
+708224^^Y
+"DATA",176.112,37512,0)
+4003711^THEOPHYLLINE 50MG CAP,SA (SLO-BID GYROCAPS)
+"DATA",176.112,37512,1)
+708226^^Y
+"DATA",176.112,37513,0)
+4002574^METHENAMINE MANDELATE 1GM/PKG GRNL,ORAL
+"DATA",176.112,37513,1)
+708475^^Y
+"DATA",176.112,37514,0)
+4004631^BELLADONNA ALKALOIDS 0.1296MG/PHENOBARBITAL 16.2MG LIQUID
+"DATA",176.112,37514,1)
+709192^^Y
+"DATA",176.112,37515,0)
+4003604^XYLOSE 100GM/BTL PWDR,ORAL
+"DATA",176.112,37515,1)
+709211^^Y
+"DATA",176.112,37516,0)
+4004914^HYDROFLUORIC ACID 42.6MG/NA FLUORIDE 120MG SOLN
+"DATA",176.112,37516,1)
+709366^^Y
+"DATA",176.112,37517,0)
+4001137^TESTOSTERONE ENANTHATE 100MG/TESTOSTERONE PROPIONATE 25MG/ML INJ
+"DATA",176.112,37517,1)
+709458^^Y
+"DATA",176.112,37518,0)
+4001528^SODIUM IODIDE,I-131,1MIL CAP
+"DATA",176.112,37518,1)
+709620^^Y
+"DATA",176.112,37519,0)
+4005140^RHO (D) IMMUNE GLOBULIN,HUMAN 0.2GM/VIL INJ
+"DATA",176.112,37519,1)
+709894^^Y
+"DATA",176.112,37520,0)
+4008259^BELLADONNA ALKALOIDS 0.1296MG/SIMETHICONE 40MG LIQUID,ORAL
+"DATA",176.112,37520,1)
+710435^^Y
+"DATA",176.112,37521,0)
+4004947^SODIUM FLUORIDE 0.25MG DROPS,ORAL
+"DATA",176.112,37521,1)
+712287^^Y
+"DATA",176.112,37522,0)
+4008331^APAP 500MG/CTM 4MG/PSEUDEFED 60MG/PKT
+"DATA",176.112,37522,1)
+712933^^Y
+"DATA",176.112,37523,0)
+4008137^ATROPINE SO4 0.2MG/CHLORPHENIRAMINE 5MG INJ
+"DATA",176.112,37523,1)
+713159^^Y
+"DATA",176.112,37524,0)
+4008997^APAP 500MG/CTM 4MG/DM 20MG/PSEUDEFED 60MG/PKT
+"DATA",176.112,37524,1)
+713184^^Y
+"DATA",176.112,37525,0)
+4008001^PENTETATE CA TRISODIUM 3MG/STANNOUS CHLORIDE 0.15MG INJ
+"DATA",176.112,37525,1)
+713393^^Y
+"DATA",176.112,37526,0)
+4006049^KCL 0.37MG/NACL 1.75GM/TROMETHAMINE 36GM/BTL INJ
+"DATA",176.112,37526,1)
+718563^^Y
+"DATA",176.112,37527,0)
+4026128^ROTIGOTINE 6MG/24HRS PATCH
+"DATA",176.112,37527,1)
+724156^^Y
+"DATA",176.112,37528,0)
+4026058^WHEAT DEXTRIN (BENEFIBER) TAB
+"DATA",176.112,37528,1)
+724268^^Y
+"DATA",176.112,37529,0)
+4026099^SOLBAR SPF-40 PABA-FREE CREAM,TOP
+"DATA",176.112,37529,1)
+724278^^Y
+"DATA",176.112,37530,0)
+4026100^SOLBAR SPF-50 PABA-FREE CREAM,TOP
+"DATA",176.112,37530,1)
+724279^^Y
+"DATA",176.112,37531,0)
+4026098^SUNSCREEN-45 PABA-FREE COMBINATION LOTION
+"DATA",176.112,37531,1)
+724281^^Y
+"DATA",176.112,37532,0)
+4026097^SUNSCREEN-50 PABA-FREE COMBINATION LOTION
+"DATA",176.112,37532,1)
+724282^^Y
+"DATA",176.112,37533,0)
+4026088^BUPLEURUM CAP/TAB
+"DATA",176.112,37533,1)
+724285^^Y
+"DATA",176.112,37534,0)
+4026089^CODONOPSIS CAP/TAB
+"DATA",176.112,37534,1)
+724288^^Y
+"DATA",176.112,37535,0)
+4026061^ELLIOTTS B INJ,SOLN,10ML
+"DATA",176.112,37535,1)
+724291^^Y
+"DATA",176.112,37536,0)
+4026060^EMU OIL,TOP
+"DATA",176.112,37536,1)
+724292^^Y
+"DATA",176.112,37537,0)
+4026059^GUAR GUM (BENEFIBER) TAB,CHEWABLE
+"DATA",176.112,37537,1)
+724294^^Y
+"DATA",176.112,37538,0)
+4026082^HOODIA GORDONII CAP/TAB
+"DATA",176.112,37538,1)
+724295^^Y
+"DATA",176.112,37539,0)
+4026056^MULTIVITAMIN/MINERALS COUGH-COLD CAP/TAB
+"DATA",176.112,37539,1)
+724301^^Y
+"DATA",176.112,37540,0)
+4026093^BRIEF,PROTECTION PLUS #MSC346000
+"DATA",176.112,37540,1)
+724493^^Y
+"DATA",176.112,37541,0)
+4026072^CATHETER,SUCTION,14FR M#MDYND40972
+"DATA",176.112,37541,1)
+724494^^Y
+"DATA",176.112,37542,0)
+4026084^CATNIP PWDR
+"DATA",176.112,37542,1)
+724495^^Y
+"DATA",176.112,37543,0)
+4026081^INCONT LINER PREVAIL GUARDS #PV-811
+"DATA",176.112,37543,1)
+724502^^Y
+"DATA",176.112,37544,0)
+4026085^LANCET,PRESTIGE SMART
+"DATA",176.112,37544,1)
+724503^^Y
+"DATA",176.112,37545,0)
+4026062^NUTREN RENAL LIQUID 1000ML
+"DATA",176.112,37545,1)
+724508^^Y
+"DATA",176.112,37546,0)
+4026063^NUTREN RENAL LIQUID VANILLA
+"DATA",176.112,37546,1)
+724509^^Y
+"DATA",176.112,37547,0)
+4026075^OSMOLITE 1 CAL LIQUID
+"DATA",176.112,37547,1)
+724510^^Y
+"DATA",176.112,37548,0)
+4026076^OSMOLITE 1 CAL LIQUID 1000ML
+"DATA",176.112,37548,1)
+724511^^Y
+"DATA",176.112,37549,0)
+4026077^OSMOLITE 1 CAL LIQUID 1500ML
+"DATA",176.112,37549,1)
+724512^^Y
+"DATA",176.112,37550,0)
+4026087^PAEONIA EXTRACT
+"DATA",176.112,37550,1)
+724513^^Y
+"DATA",176.112,37551,0)
+4026066^SET,INFUSION ANIMAS #181-01
+"DATA",176.112,37551,1)
+724515^^Y
+"DATA",176.112,37552,0)
+4026070^SET,INFUSION ANIMAS #181-02
+"DATA",176.112,37552,1)
+724516^^Y
+"DATA",176.112,37553,0)
+4026068^SET,INFUSION ANIMAS #181-03
+"DATA",176.112,37553,1)
+724517^^Y
+"DATA",176.112,37554,0)
+4026064^SET,INFUSION ANIMAS #182-01
+"DATA",176.112,37554,1)
+724518^^Y
+"DATA",176.112,37555,0)
+4026071^SET,INFUSION ANIMAS #182-02
+"DATA",176.112,37555,1)
+724519^^Y
+"DATA",176.112,37556,0)
+4026065^SET,INFUSION ANIMAS #182-03
+"DATA",176.112,37556,1)
+724520^^Y
+"DATA",176.112,37557,0)
+4026069^SET,INFUSION ANIMAS #183-00
+"DATA",176.112,37557,1)
+724521^^Y
+"DATA",176.112,37558,0)
+4026067^SET,INFUSION ANIMAS #184-00
+"DATA",176.112,37558,1)
+724522^^Y
+"DATA",176.112,37559,0)
+4026042^DRESSING,MAXORB EXTRA 12IN ROPE #MSC7012
+"DATA",176.112,37559,1)
+724524^^Y
+"DATA",176.112,37560,0)
+4009938^POTASSIUM 99MG TAB
+"DATA",176.112,37560,1)
+724580^^Y
+"DATA",176.112,37561,0)
+4026129^CHERRY EXTRACT CAP/TAB
+"DATA",176.112,37561,1)
+724976^^Y
+"DATA",176.112,37562,0)
+4026136^MULTIVITAMIN,W/VIT-K INJ
+"DATA",176.112,37562,1)
+724981^^Y
+"DATA",176.112,37563,0)
+4026160^MULTIVITAMIN/MINERALS HERBAL,IMMUNITY CAP/TAB
+"DATA",176.112,37563,1)
+724982^^Y
+"DATA",176.112,37564,0)
+4026161^MULTIVITAMINS,HERBAL,FATTY ACID FORMULA CAP/TAB
+"DATA",176.112,37564,1)
+724983^^Y
+"DATA",176.112,37565,0)
+4026216^FLUOXETINE HCL 25MG/OLANZAPINE 3MG CAP
+"DATA",176.112,37565,1)
+725080^^Y
+"DATA",176.112,37566,0)
+4026125^AEROCHAMBER Z-STAT PLUS
+"DATA",176.112,37566,1)
+725111^^Y
+"DATA",176.112,37567,0)
+4026138^BARRIER,OSTOMY,NEW IMAGE H#14701
+"DATA",176.112,37567,1)
+725112^^Y
+"DATA",176.112,37568,0)
+4026139^BARRIER,OSTOMY,NEW IMAGE H#14702
+"DATA",176.112,37568,1)
+725113^^Y
+"DATA",176.112,37569,0)
+4026140^BARRIER,OSTOMY,NEW IMAGE H#14703
+"DATA",176.112,37569,1)
+725114^^Y
+"DATA",176.112,37570,0)
+4026141^BARRIER,OSTOMY,NEW IMAGE H#14704
+"DATA",176.112,37570,1)
+725115^^Y
+"DATA",176.112,37571,0)
+4026145^BARRIER,OSTOMY,NEW IMAGE H#14705
+"DATA",176.112,37571,1)
+725116^^Y
+"DATA",176.112,37572,0)
+4026146^BARRIER,OSTOMY,NEW IMAGE H#14706
+"DATA",176.112,37572,1)
+725117^^Y
+"DATA",176.112,37573,0)
+4026142^BARRIER,OSTOMY,NEW IMAGE H#14707
+"DATA",176.112,37573,1)
+725118^^Y
+"DATA",176.112,37574,0)
+4026143^BARRIER,OSTOMY,NEW IMAGE H#14708
+"DATA",176.112,37574,1)
+725119^^Y
+"DATA",176.112,37575,0)
+4026144^BARRIER,OSTOMY,NEW IMAGE H#14709
+"DATA",176.112,37575,1)
+725120^^Y
+"DATA",176.112,37576,0)
+4026134^CLEANSER,SKINTEGRITY SPRAY,TOP
+"DATA",176.112,37576,1)
+725126^^Y
+"DATA",176.112,37577,0)
+4026149^CLEANSING CLOTH,ADULT
+"DATA",176.112,37577,1)
+725127^^Y
+"DATA",176.112,37578,0)
+4026148^NEBULIZER,ISO-NEB FILTER MAIN FLOW LATEX FREE HUDSON #1605
+"DATA",176.112,37578,1)
+725130^^Y
+"DATA",176.112,37579,0)
+4026147^NEBULIZER,ISO-NEB FILTER SYSTEM HUDSON #1755
+"DATA",176.112,37579,1)
+725131^^Y
+"DATA",176.112,37580,0)
+4026152^POUCH,DRAINABLE,NEW IMAGE H#18192
+"DATA",176.112,37580,1)
+725132^^Y
+"DATA",176.112,37581,0)
+4026153^POUCH,DRAINABLE,NEW IMAGE H#18193
+"DATA",176.112,37581,1)
+725133^^Y
+"DATA",176.112,37582,0)
+4026154^POUCH,DRAINABLE,NEW IMAGE H#18194
+"DATA",176.112,37582,1)
+725134^^Y
+"DATA",176.112,37583,0)
+4026150^POUCH,DRAINABLE,SUR-FIT C#4114-90
+"DATA",176.112,37583,1)
+725135^^Y
+"DATA",176.112,37584,0)
+4026119^PRO-STAT PROFILE LIQUID,ORAL
+"DATA",176.112,37584,1)
+725138^^Y
+"DATA",176.112,37585,0)
+4026120^PRO-STAT PROFILE LIQUID,ORAL,30ML
+"DATA",176.112,37585,1)
+725139^^Y
+"DATA",176.112,37586,0)
+4026122^SET,INFUSION MINIMED #MMT-318
+"DATA",176.112,37586,1)
+725141^^Y
+"DATA",176.112,37587,0)
+4026151^SKIN BARRIER WIPE TENS CLEAN-COTE
+"DATA",176.112,37587,1)
+725142^^Y
+"DATA",176.112,37588,0)
+4026123^HYALURONATE NA (HYALGAN) 10MG/ML INJ,SYRINGE,2ML
+"DATA",176.112,37588,1)
+727308^^Y
+"DATA",176.112,37589,0)
+4003268^EPINEPHRINE (EPI-PEN) 0.3MG/0.3ML INJECTOR
+"DATA",176.112,37589,1)
+727347^^Y
+"DATA",176.112,37590,0)
+4026124^HYALURONATE NA (HYALGAN) 10MG/ML INJ,VIAL,2ML
+"DATA",176.112,37590,1)
+727362^^Y
+"DATA",176.112,37591,0)
+4003269^EPINEPHRINE (EPI-PEN JR) 0.15MG/0.3ML INJECTOR
+"DATA",176.112,37591,1)
+727386^^Y
+"DATA",176.112,37592,0)
+4025915^EPINEPHRINE (TWINJECT-0.15) 0.15MG/0.15ML INJECTOR
+"DATA",176.112,37592,1)
+727412^^Y
+"DATA",176.112,37593,0)
+4025916^EPINEPHRINE (TWINJECT-0.3) 0.3MG/0.3ML INJECTOR
+"DATA",176.112,37593,1)
+727413^^Y
+"DATA",176.112,37594,0)
+4014846^NOVOLIN PEN INSULIN DELIVERY SYSTEM 1.5ML
+"DATA",176.112,37594,1)
+727751^^Y
+"DATA",176.112,37595,0)
+4014847^NOVOLIN PEN INSULIN DELIVERY SYSTEM 3ML
+"DATA",176.112,37595,1)
+727752^^Y
+"DATA",176.112,37596,0)
+4024596^NOVOPEN JR INSULIN DELIVERY SYSTEM 3ML
+"DATA",176.112,37596,1)
+727753^^Y
+"DATA",176.112,37597,0)
+4024621^OPTICLIK INSULIN DELIVERY SYSTEM
+"DATA",176.112,37597,1)
+727754^^Y
+"DATA",176.112,37598,0)
+4025969^HYALURONATE NA (EUFLEXXA) 10MG/ML INJ,SYRINGE,2ML
+"DATA",176.112,37598,1)
+727786^^Y
+"DATA",176.112,37599,0)
+4016686^INTERFERON BETA-1A,RECOMBINANT 30MCG/0.5ML INJ,SYRINGE (AVONEX)
+"DATA",176.112,37599,1)
+727816^^Y
+"DATA",176.112,37600,0)
+4008010^TRYPSIN-CHYMOTRYPSIN 100000UNT TAB,EC
+"DATA",176.112,37600,1)
+728130^^Y
+"DATA",176.112,37601,0)
+4026207^AMERIGEL WOUND DRESSING GEL
+"DATA",176.112,37601,1)
+728244^^Y
+"DATA",176.112,37602,0)
+4026204^BARIUM SO4 1.3% SUSP
+"DATA",176.112,37602,1)
+728248^^Y
+"DATA",176.112,37603,0)
+4026225^CASTOR OIL 788MG/PERUVIAN BALSAM 87MG/TRYPSIN 90U AEROSOL,TOP
+"DATA",176.112,37603,1)
+728253^^Y
+"DATA",176.112,37604,0)
+4026177^CERAVE CREAM,TOP
+"DATA",176.112,37604,1)
+728254^^Y
+"DATA",176.112,37605,0)
+4026178^CERAVE LIQUID,TOP
+"DATA",176.112,37605,1)
+728255^^Y
+"DATA",176.112,37606,0)
+4026217^CHLORELLA CAP/TAB
+"DATA",176.112,37606,1)
+728256^^Y
+"DATA",176.112,37607,0)
+4026174^LANTISEPTIC THERAPEUTIC CREAM,TOP
+"DATA",176.112,37607,1)
+728275^^Y
+"DATA",176.112,37608,0)
+4026221^THROAT LOZENGE W/BENZOCAINE
+"DATA",176.112,37608,1)
+728289^^Y
+"DATA",176.112,37609,0)
+4026222^THROAT LOZENGE W/CETYLPYRIDINIUM,MENTHOL
+"DATA",176.112,37609,1)
+728290^^Y
+"DATA",176.112,37610,0)
+4026223^THROAT LOZENGE W/MENTHOL
+"DATA",176.112,37610,1)
+728291^^Y
+"DATA",176.112,37611,0)
+4026209^AMERIGEL BARRIER LOTION
+"DATA",176.112,37611,1)
+728294^^Y
+"DATA",176.112,37612,0)
+4026208^AMERIGEL CARE LOTION
+"DATA",176.112,37612,1)
+728295^^Y
+"DATA",176.112,37613,0)
+4026196^BARRIER,ADAPT STRIPS H#79400
+"DATA",176.112,37613,1)
+728296^^Y
+"DATA",176.112,37614,0)
+4026206^BELT,SUPPORT 7IN RIGHT XX-LARGE NU-HOPE #6449 SP
+"DATA",176.112,37614,1)
+728297^^Y
+"DATA",176.112,37615,0)
+4026211^DRESSING,AMERIGEL HYDROGEL 2IN X 2IN #5002
+"DATA",176.112,37615,1)
+728298^^Y
+"DATA",176.112,37616,0)
+4026235^DRESSING,ODOR ABSORBENT 4IN X 4IN H#519904
+"DATA",176.112,37616,1)
+728299^^Y
+"DATA",176.112,37617,0)
+4026236^DRESSING,ODOR ABSORBENT 6IN X 10IN H#519906
+"DATA",176.112,37617,1)
+728300^^Y
+"DATA",176.112,37618,0)
+4026220^DRESSING,RESTORE 4IN X 4IN H#519921
+"DATA",176.112,37618,1)
+728301^^Y
+"DATA",176.112,37619,0)
+4026226^DRESSING,RESTORE 4IN X 4IN H#519930
+"DATA",176.112,37619,1)
+728302^^Y
+"DATA",176.112,37620,0)
+4026219^DRESSING,RESTORE 6IN X 8IN H#519923
+"DATA",176.112,37620,1)
+728303^^Y
+"DATA",176.112,37621,0)
+4026227^DRESSING,RESTORE 6IN X 8IN H#519932
+"DATA",176.112,37621,1)
+728304^^Y
+"DATA",176.112,37622,0)
+4026218^DRESSING,RESTORE 8IN X 8IN H#519925
+"DATA",176.112,37622,1)
+728305^^Y
+"DATA",176.112,37623,0)
+4026228^DRESSING,RESTORE 8IN X 8IN H#519935
+"DATA",176.112,37623,1)
+728306^^Y
+"DATA",176.112,37624,0)
+4026229^DRESSING,RESTORE PLUS TAPERED 4IN X 4IN H#519956
+"DATA",176.112,37624,1)
+728307^^Y
+"DATA",176.112,37625,0)
+4026233^DRESSING,RESTORE PLUS TAPERED 6IN X 6IN H#519963
+"DATA",176.112,37625,1)
+728308^^Y
+"DATA",176.112,37626,0)
+4026230^DRESSING,RESTORE PLUS TAPERED 6IN X 8IN H#519957
+"DATA",176.112,37626,1)
+728309^^Y
+"DATA",176.112,37627,0)
+4026231^DRESSING,RESTORE PLUS TAPERED 8IN X 8IN H#519958
+"DATA",176.112,37627,1)
+728310^^Y
+"DATA",176.112,37628,0)
+4026232^DRESSING,RESTORE PLUS TAPERED H#519959
+"DATA",176.112,37628,1)
+728311^^Y
+"DATA",176.112,37629,0)
+4026234^DRESSING,RESTORE PLUS TAPERED H#519965
+"DATA",176.112,37629,1)
+728312^^Y
+"DATA",176.112,37630,0)
+4026183^MASK,ALL PURPOSE CUP SHAPE
+"DATA",176.112,37630,1)
+728314^^Y
+"DATA",176.112,37631,0)
+4026197^NUTREN PULMONARY LIQUID 1000ML
+"DATA",176.112,37631,1)
+728315^^Y
+"DATA",176.112,37632,0)
+4026181^NUTREN PULMONARY LIQUID VANILLA
+"DATA",176.112,37632,1)
+728316^^Y
+"DATA",176.112,37633,0)
+4026205^POUCH,DRAINABLE,SUR-FIT C#4114-96
+"DATA",176.112,37633,1)
+728317^^Y
+"DATA",176.112,37634,0)
+4026190^POUCH,DRAINABLE,SUR-FIT NATURA C#4112-88
+"DATA",176.112,37634,1)
+728318^^Y
+"DATA",176.112,37635,0)
+4026191^POUCH,DRAINABLE,SUR-FIT NATURA C#4112-89
+"DATA",176.112,37635,1)
+728319^^Y
+"DATA",176.112,37636,0)
+4026192^POUCH,DRAINABLE,SUR-FIT NATURA C#4112-90
+"DATA",176.112,37636,1)
+728320^^Y
+"DATA",176.112,37637,0)
+4026193^POUCH,DRAINABLE,SUR-FIT NATURA C#4112-91
+"DATA",176.112,37637,1)
+728321^^Y
+"DATA",176.112,37638,0)
+4026194^POUCH,DRAINABLE,SUR-FIT NATURA C#4112-92
+"DATA",176.112,37638,1)
+728322^^Y
+"DATA",176.112,37639,0)
+4026213^SECURA TWO-STEP KIT
+"DATA",176.112,37639,1)
+728324^^Y
+"DATA",176.112,37640,0)
+4026212^LANCET,ACCU-CHEK SAFE-T PRO
+"DATA",176.112,37640,1)
+728325^^Y
+"DATA",176.112,37641,0)
+4026173^LANTISEPTIC SKIN PROTECTANT OINT,TOP
+"DATA",176.112,37641,1)
+728326^^Y
+"DATA",176.112,37642,0)
+4026210^AMERIGEL SALINE WOUND WASH
+"DATA",176.112,37642,1)
+728468^^Y
+"DATA",176.112,37643,0)
+4026462^SOMATROPIN (HUMATROPE) 6MG/VIL INJ
+"DATA",176.112,37643,1)
+729234^^Y
+"DATA",176.112,37644,0)
+4027243^SOMATROPIN (NORDITROPIN) 15MG/1.5ML INJ,SOLN,NORDIFLEX,1.5ML
+"DATA",176.112,37644,1)
+729921^^Y
+"DATA",176.112,37645,0)
+4027182^SOMATROPIN (NORDITROPIN) 5MG/1.5ML INJ,SOLN,NORDIFLEX,1.5ML
+"DATA",176.112,37645,1)
+729922^^Y
+"DATA",176.112,37646,0)
+4026467^SOMATROPIN (SAIZEN) 8.8MG/VIL INJ,CLICKEASY
+"DATA",176.112,37646,1)
+730610^^Y
+"DATA",176.112,37647,0)
+4004006^BARIUM SO4 96% PWDR
+"DATA",176.112,37647,1)
+731314^^Y
+"DATA",176.112,37648,0)
+4004009^BARIUM SO4 98.14% PWDR,ORAL
+"DATA",176.112,37648,1)
+731316^^Y
+"DATA",176.112,37649,0)
+4008288^METHYLCELLULOSE PWDR,ORAL
+"DATA",176.112,37649,1)
+744443^^Y
+"DATA",176.112,37650,0)
+4026894^SOMATROPIN (SEROSTIM) 8.8MG/VIL INJ
+"DATA",176.112,37650,1)
+746601^^Y
+"DATA",176.112,37651,0)
+4008272^SOMATOTROPIN 10UNT INJ
+"DATA",176.112,37651,1)
+746634^^Y
+"DATA",176.112,37652,0)
+4004916^HYDROFLUORIC ACID 729MG/NA FLUORIDE 2GM GEL
+"DATA",176.112,37652,1)
+746749^^Y
+"DATA",176.112,37653,0)
+4013296^ALBUTEROL (PROVENTIL) 90MCG/SPRAY INHL,ORAL,17GM
+"DATA",176.112,37653,1)
+746763^^Y
+"DATA",176.112,37654,0)
+4026182^FLUTICASONE PROPIONATE 50MCG INHL,ORAL,DISKUS,60
+"DATA",176.112,37654,1)
+746806^^Y
+"DATA",176.112,37655,0)
+4025174^JUNEL 1.5/30 TAB,21
+"DATA",176.112,37655,1)
+748020^^Y
+"DATA",176.112,37656,0)
+4005782^ETHINYL ESTRADIOL 0.03MG/FE FUMARATE 75MG/NORETHINDRONE 1.5MG TB
+"DATA",176.112,37656,1)
+748382^^Y
+"DATA",176.112,37657,0)
+4005781^ETHINYL ESTRADIOL 0.02MG/FE FUMARATE 75MG/NORETHINDRONE 1MG TAB
+"DATA",176.112,37657,1)
+748384^^Y
+"DATA",176.112,37658,0)
+4025175^JUNEL FE 1.5/30 TAB,28
+"DATA",176.112,37658,1)
+748386^^Y
+"DATA",176.112,37659,0)
+4003609^ETHINYL ESTRADIOL 0.035MG/ETHYNODIOL DIACETATE 1MG TAB
+"DATA",176.112,37659,1)
+748804^^Y
+"DATA",176.112,37660,0)
+4025138^YAZ TAB,28
+"DATA",176.112,37660,1)
+748856^^Y
+"DATA",176.112,37661,0)
+4015524^YASMIN TAB,28
+"DATA",176.112,37661,1)
+748857^^Y
+"DATA",176.112,37662,0)
+4025793^ZOVIA 1/35E TAB,28
+"DATA",176.112,37662,1)
+748859^^Y
+"DATA",176.112,37663,0)
+4025179^ZOVIA 1/50E TAB,28
+"DATA",176.112,37663,1)
+748864^^Y
+"DATA",176.112,37664,0)
+4025182^TRIVORA TAB,28
+"DATA",176.112,37664,1)
+748865^^Y
+"DATA",176.112,37665,0)
+4003203^TRIPHASIL TAB,21
+"DATA",176.112,37665,1)
+748867^^Y
+"DATA",176.112,37666,0)
+4003211^ALESSE-28 TAB
+"DATA",176.112,37666,1)
+748869^^Y
+"DATA",176.112,37667,0)
+4003210^LEVORA TAB,28
+"DATA",176.112,37667,1)
+748879^^Y
+"DATA",176.112,37668,0)
+4003202^NORDETTE TAB,28
+"DATA",176.112,37668,1)
+748886^^Y
+"DATA",176.112,37669,0)
+4015419^NORETHINDRONE 0.35MG TAB,28
+"DATA",176.112,37669,1)
+748961^^Y
+"DATA",176.112,37670,0)
+4005265^OVCON-35 TAB,21
+"DATA",176.112,37670,1)
+748998^^Y
+"DATA",176.112,37671,0)
+4025184^LEENA TAB,28
+"DATA",176.112,37671,1)
+749148^^Y
+"DATA",176.112,37672,0)
+4005272^TRI-NORINYL TAB,28
+"DATA",176.112,37672,1)
+749151^^Y
+"DATA",176.112,37673,0)
+4016519^ORTHO TRI-CYCLEN LO TAB,28
+"DATA",176.112,37673,1)
+749158^^Y
+"DATA",176.112,37674,0)
+4003175^LO/OVRAL TAB,21
+"DATA",176.112,37674,1)
+749160^^Y
+"DATA",176.112,37675,0)
+4025532^VARENICLINE TARTRATE TAB STARTER PACK,53
+"DATA",176.112,37675,1)
+749289^^Y
+"DATA",176.112,37676,0)
+4026565^VARENICLINE TAB STARTER PACK,53
+"DATA",176.112,37676,1)
+749289^^Y
+"DATA",176.112,37677,0)
+4008684^VIT C 200MG/HESPERIDIN-HESPERIDIN ME CHALCONE 200MG TAB
+"DATA",176.112,37677,1)
+749325^^Y
+"DATA",176.112,37678,0)
+4004030^IOXAGLATE MEGLUMINE 393/IOXAGLATE NA 196MG/ML INJ
+"DATA",176.112,37678,1)
+749337^^Y
+"DATA",176.112,37679,0)
+4003043^NIACINAMIDE 25MG/PREDNISOLONE (ACET 80MG & NA PO4 20MG) INJ,SUSP
+"DATA",176.112,37679,1)
+749371^^Y
+"DATA",176.112,37680,0)
+4007880^PEG-400 50%/PEG-4000 33% CREAM,OTIC
+"DATA",176.112,37680,1)
+749372^^Y
+"DATA",176.112,37681,0)
+4003204^TRIPHASIL TAB,28
+"DATA",176.112,37681,1)
+749565^^Y
+"DATA",176.112,37682,0)
+4003212^ALESSE-21 TAB
+"DATA",176.112,37682,1)
+749569^^Y
+"DATA",176.112,37683,0)
+4003209^LEVORA TAB,21
+"DATA",176.112,37683,1)
+749572^^Y
+"DATA",176.112,37684,0)
+4003201^NORDETTE TAB,21
+"DATA",176.112,37684,1)
+749573^^Y
+"DATA",176.112,37685,0)
+4005263^OVCON-35 TAB,28
+"DATA",176.112,37685,1)
+749737^^Y
+"DATA",176.112,37686,0)
+4005278^TRI-NORINYL TAB,21
+"DATA",176.112,37686,1)
+749760^^Y
+"DATA",176.112,37687,0)
+4026135^SEASONIQUE 30MCG/0.15MG TAB,EC,91
+"DATA",176.112,37687,1)
+749762^^Y
+"DATA",176.112,37688,0)
+4016385^AZITHROMYCIN 500MG TAB,PKT,3
+"DATA",176.112,37688,1)
+749780^^Y
+"DATA",176.112,37689,0)
+4017016^AZITHROMYCIN 250MG CAP,PKT,6
+"DATA",176.112,37689,1)
+749782^^Y
+"DATA",176.112,37690,0)
+4010163^AZITHROMYCIN 250MG TAB,PKT,6
+"DATA",176.112,37690,1)
+749783^^Y
+"DATA",176.112,37691,0)
+4010622^ORTHO TRI-CYCLEN TAB,28
+"DATA",176.112,37691,1)
+749785^^Y
+"DATA",176.112,37692,0)
+4010621^ORTHO TRI-CYCLEN TAB,21
+"DATA",176.112,37692,1)
+749785^^Y
+"DATA",176.112,37693,0)
+4003173^LO/OVRAL TAB,28
+"DATA",176.112,37693,1)
+749787^^Y
+"DATA",176.112,37694,0)
+4026564^VARENICLINE 1MG TAB,56
+"DATA",176.112,37694,1)
+749788^^Y
+"DATA",176.112,37695,0)
+4025533^VARENICLINE TARTRATE 1MG TAB,56
+"DATA",176.112,37695,1)
+749788^^Y
+"DATA",176.112,37696,0)
+4024818^DESOGESTREL 0.15/ETHINYL ESTRADIOL 0.03MG TAB,28
+"DATA",176.112,37696,1)
+749848^^Y
+"DATA",176.112,37697,0)
+4010556^ORTHO-CEPT TAB,28
+"DATA",176.112,37697,1)
+749849^^Y
+"DATA",176.112,37698,0)
+4014679^ORTHO-PREFEST 1MG/0.09MG TAB,30 PACK
+"DATA",176.112,37698,1)
+749851^^Y
+"DATA",176.112,37699,0)
+4005260^ORTHO-NOVUM 7/7/7 TAB,28
+"DATA",176.112,37699,1)
+749853^^Y
+"DATA",176.112,37700,0)
+4005259^ORTHO-NOVUM 7/7/7 TAB,21
+"DATA",176.112,37700,1)
+749855^^Y
+"DATA",176.112,37701,0)
+4005258^ORTHO-NOVUM 10/11 TAB,28
+"DATA",176.112,37701,1)
+749857^^Y
+"DATA",176.112,37702,0)
+4005256^ORTHO-NOVUM 1/35 TAB,28
+"DATA",176.112,37702,1)
+749859^^Y
+"DATA",176.112,37703,0)
+4010620^ORTHO-CYCLEN TAB,28
+"DATA",176.112,37703,1)
+749861^^Y
+"DATA",176.112,37704,0)
+4005231^ORTHO-NOVUM 1/50 TAB,28
+"DATA",176.112,37704,1)
+749863^^Y
+"DATA",176.112,37705,0)
+4010557^ORTHO-CEPT TAB,21
+"DATA",176.112,37705,1)
+749865^^Y
+"DATA",176.112,37706,0)
+4010619^ORTHO-CYCLEN TAB,21
+"DATA",176.112,37706,1)
+749867^^Y
+"DATA",176.112,37707,0)
+4005255^ORTHO-NOVUM 1/35 TAB,21
+"DATA",176.112,37707,1)
+749870^^Y
+"DATA",176.112,37708,0)
+4005230^ORTHO-NOVUM 1/50 TAB,21
+"DATA",176.112,37708,1)
+749872^^Y
+"DATA",176.112,37709,0)
+4005257^ORTHO-NOVUM 10/11 TAB,21
+"DATA",176.112,37709,1)
+749875^^Y
+"DATA",176.112,37710,0)
+4005270^BREVICON TAB,28
+"DATA",176.112,37710,1)
+749880^^Y
+"DATA",176.112,37711,0)
+4005271^NORINYL 1+35 TAB,28
+"DATA",176.112,37711,1)
+749881^^Y
+"DATA",176.112,37712,0)
+4005234^NORINYL 1+50 TAB,28
+"DATA",176.112,37712,1)
+749882^^Y
+"DATA",176.112,37713,0)
+4025173^OGESTREL-28 TAB,28
+"DATA",176.112,37713,1)
+750243^^Y
+"DATA",176.112,37714,0)
+4025170^LOW-OGESTREL TAB,28
+"DATA",176.112,37714,1)
+750244^^Y
+"DATA",176.112,37715,0)
+4003612^DEMULEN 1/35 TAB,21
+"DATA",176.112,37715,1)
+750249^^Y
+"DATA",176.112,37716,0)
+4003613^DEMULEN 1/35 TAB,28
+"DATA",176.112,37716,1)
+750251^^Y
+"DATA",176.112,37717,0)
+4003610^DEMULEN 1/50 TAB,21
+"DATA",176.112,37717,1)
+750254^^Y
+"DATA",176.112,37718,0)
+4003611^DEMULEN 1/50 TAB,28
+"DATA",176.112,37718,1)
+750255^^Y
+"DATA",176.112,37719,0)
+4025168^SOLIA TAB,28
+"DATA",176.112,37719,1)
+750261^^Y
+"DATA",176.112,37720,0)
+4016814^NECON 7/7/7 TAB,28
+"DATA",176.112,37720,1)
+750264^^Y
+"DATA",176.112,37721,0)
+4024586^CRYSELLE TAB,28
+"DATA",176.112,37721,1)
+750265^^Y
+"DATA",176.112,37722,0)
+4025183^ARANELLE TAB,28
+"DATA",176.112,37722,1)
+750267^^Y
+"DATA",176.112,37723,0)
+4025166^AVIANE TAB,28
+"DATA",176.112,37723,1)
+750268^^Y
+"DATA",176.112,37724,0)
+4026491^MULTIVITAMIN/OPTH AREDS DOUBLE STRENGTH CAP
+"DATA",176.112,37724,1)
+750312^^Y
+"DATA",176.112,37725,0)
+4026308^MULTIVITAMIN/OPTH AREDS SINGLE STRENGTH TAB
+"DATA",176.112,37725,1)
+750313^^Y
+"DATA",176.112,37726,0)
+4026488^MULTIVITAMINS W/MINERALS,PRENATAL DUET-DHA CAP/TAB PKT,12
+"DATA",176.112,37726,1)
+750314^^Y
+"DATA",176.112,37727,0)
+4026571^PROPOLIS CAP/TAB
+"DATA",176.112,37727,1)
+750435^^Y
+"DATA",176.112,37728,0)
+4026707^SLIPPERY ELM BARK CAP/TAB
+"DATA",176.112,37728,1)
+750453^^Y
+"DATA",176.112,37729,0)
+4026709^SLIPPERY ELM BARK LIQUID,ORAL
+"DATA",176.112,37729,1)
+750454^^Y
+"DATA",176.112,37730,0)
+4026708^SLIPPERY ELM BARK LOZENGE
+"DATA",176.112,37730,1)
+750455^^Y
+"DATA",176.112,37731,0)
+4026623^THROAT LOZENGE W/BENZOCAINE,CETYLPYRIDINIUM
+"DATA",176.112,37731,1)
+750489^^Y
+"DATA",176.112,37732,0)
+4026398^AMPU-BALM OINT,TOP
+"DATA",176.112,37732,1)
+750523^^Y
+"DATA",176.112,37733,0)
+4026411^ANNATTO (ACHIOTE) CAP/TAB
+"DATA",176.112,37733,1)
+750524^^Y
+"DATA",176.112,37734,0)
+4026333^AVEENO POSITIVELY RADIANT BAR SOAP
+"DATA",176.112,37734,1)
+750526^^Y
+"DATA",176.112,37735,0)
+4026687^BENZETHONIUM CL/TRICLOSAN LOTION,TOP
+"DATA",176.112,37735,1)
+750624^^Y
+"DATA",176.112,37736,0)
+4026693^BENZETHONIUM CL/TRICLOSAN LOTION,TOP,3ML
+"DATA",176.112,37736,1)
+750625^^Y
+"DATA",176.112,37737,0)
+4026410^BIAFINE EMULSION,TOP
+"DATA",176.112,37737,1)
+750627^^Y
+"DATA",176.112,37738,0)
+4026401^ACCU-CHEK AVIVA (GLUCOSE) METER
+"DATA",176.112,37738,1)
+750847^^Y
+"DATA",176.112,37739,0)
+4026590^ASCENSIA BREEZE-2 (GLUCOSE) TEST STRIP
+"DATA",176.112,37739,1)
+750854^^Y
+"DATA",176.112,37740,0)
+4026397^BANDAGE TUBULAR ELASTIC PADDED LARGE C#154581
+"DATA",176.112,37740,1)
+750857^^Y
+"DATA",176.112,37741,0)
+4026395^BANDAGE TUBULAR ELASTIC PADDED MEDIUM C#154580
+"DATA",176.112,37741,1)
+750858^^Y
+"DATA",176.112,37742,0)
+4026396^BANDAGE TUBULAR ELASTIC PADDED SMALL C#154579
+"DATA",176.112,37742,1)
+750859^^Y
+"DATA",176.112,37743,0)
+4026577^BANDAGE,ELASTIC,CONFORMING (MOLLELAST) 1.6IN X 4.4YD
+"DATA",176.112,37743,1)
+750860^^Y
+"DATA",176.112,37744,0)
+4026672^BARRIER,ASSURA COLOPLAST #12845
+"DATA",176.112,37744,1)
+750861^^Y
+"DATA",176.112,37745,0)
+4026349^BARRIER,ASSURA COLOPLAST #14304
+"DATA",176.112,37745,1)
+750862^^Y
+"DATA",176.112,37746,0)
+4026350^BARRIER,ASSURA COLOPLAST #14305
+"DATA",176.112,37746,1)
+750863^^Y
+"DATA",176.112,37747,0)
+4026351^BARRIER,ASSURA COLOPLAST #14306
+"DATA",176.112,37747,1)
+750864^^Y
+"DATA",176.112,37748,0)
+4026353^BARRIER,ASSURA COLOPLAST #14307
+"DATA",176.112,37748,1)
+750865^^Y
+"DATA",176.112,37749,0)
+4026348^BARRIER,ASSURA COLOPLAST #14308
+"DATA",176.112,37749,1)
+750866^^Y
+"DATA",176.112,37750,0)
+4026536^BARRIER,ASSURA COLOPLAST #2831
+"DATA",176.112,37750,1)
+750867^^Y
+"DATA",176.112,37751,0)
+4026535^BARRIER,ASSURA COLOPLAST #2832
+"DATA",176.112,37751,1)
+750868^^Y
+"DATA",176.112,37752,0)
+4026537^BARRIER,ASSURA COLOPLAST #2833
+"DATA",176.112,37752,1)
+750869^^Y
+"DATA",176.112,37753,0)
+4026654^BARRIER,ASSURA PEDIATRIC COLOPLAST #2182
+"DATA",176.112,37753,1)
+750870^^Y
+"DATA",176.112,37754,0)
+4026345^BARRIER,CONVEX,ASSURA COLOPLAST #14402
+"DATA",176.112,37754,1)
+750871^^Y
+"DATA",176.112,37755,0)
+4026346^BARRIER,CONVEX,ASSURA COLOPLAST #14404
+"DATA",176.112,37755,1)
+750872^^Y
+"DATA",176.112,37756,0)
+4026294^BARRIER,ESTEEM SYNERGY C#403948
+"DATA",176.112,37756,1)
+750873^^Y
+"DATA",176.112,37757,0)
+4026291^BARRIER,ESTEEM SYNERGY C#405456
+"DATA",176.112,37757,1)
+750874^^Y
+"DATA",176.112,37758,0)
+4026292^BARRIER,ESTEEM SYNERGY C#405458
+"DATA",176.112,37758,1)
+750875^^Y
+"DATA",176.112,37759,0)
+4026293^BARRIER,ESTEEM SYNERGY C#405467
+"DATA",176.112,37759,1)
+750876^^Y
+"DATA",176.112,37760,0)
+4026296^BARRIER,ESTEEM SYNERGY C#405476
+"DATA",176.112,37760,1)
+750877^^Y
+"DATA",176.112,37761,0)
+4026297^BARRIER,ESTEEM SYNERGY C#405477
+"DATA",176.112,37761,1)
+750878^^Y
+"DATA",176.112,37762,0)
+4026298^BARRIER,ESTEEM SYNERGY C#405479
+"DATA",176.112,37762,1)
+750879^^Y
+"DATA",176.112,37763,0)
+4026295^BARRIER,ESTEEM SYNERGY C#405483
+"DATA",176.112,37763,1)
+750880^^Y
+"DATA",176.112,37764,0)
+4026434^BARRIER,OSTOMY,NEW IMAGE H#14202
+"DATA",176.112,37764,1)
+750881^^Y
+"DATA",176.112,37765,0)
+4026435^BARRIER,OSTOMY,NEW IMAGE H#14203
+"DATA",176.112,37765,1)
+750882^^Y
+"DATA",176.112,37766,0)
+4026436^BARRIER,OSTOMY,NEW IMAGE H#14206
+"DATA",176.112,37766,1)
+750883^^Y
+"DATA",176.112,37767,0)
+4026431^BARRIER,OSTOMY,NEW IMAGE H#14504
+"DATA",176.112,37767,1)
+750884^^Y
+"DATA",176.112,37768,0)
+4026432^BARRIER,OSTOMY,NEW IMAGE H#14505
+"DATA",176.112,37768,1)
+750885^^Y
+"DATA",176.112,37769,0)
+4026433^BARRIER,OSTOMY,NEW IMAGE H#14506
+"DATA",176.112,37769,1)
+750886^^Y
+"DATA",176.112,37770,0)
+4026438^BARRIER,OSTOMY,NEW IMAGE H#14802
+"DATA",176.112,37770,1)
+750887^^Y
+"DATA",176.112,37771,0)
+4026439^BARRIER,OSTOMY,NEW IMAGE H#14803
+"DATA",176.112,37771,1)
+750888^^Y
+"DATA",176.112,37772,0)
+4026440^BARRIER,OSTOMY,NEW IMAGE H#14804
+"DATA",176.112,37772,1)
+750889^^Y
+"DATA",176.112,37773,0)
+4026441^BARRIER,OSTOMY,NEW IMAGE H#14901
+"DATA",176.112,37773,1)
+750890^^Y
+"DATA",176.112,37774,0)
+4026442^BARRIER,OSTOMY,NEW IMAGE H#14902
+"DATA",176.112,37774,1)
+750891^^Y
+"DATA",176.112,37775,0)
+4026443^BARRIER,OSTOMY,NEW IMAGE H#14905
+"DATA",176.112,37775,1)
+750892^^Y
+"DATA",176.112,37776,0)
+4026444^BARRIER,OSTOMY,NEW IMAGE H#14906
+"DATA",176.112,37776,1)
+750893^^Y
+"DATA",176.112,37777,0)
+4026445^BARRIER,OSTOMY,NEW IMAGE H#14907
+"DATA",176.112,37777,1)
+750894^^Y
+"DATA",176.112,37778,0)
+4026446^BARRIER,OSTOMY,NEW IMAGE H#14908
+"DATA",176.112,37778,1)
+750895^^Y
+"DATA",176.112,37779,0)
+4026447^BARRIER,OSTOMY,NEW IMAGE H#14909
+"DATA",176.112,37779,1)
+750896^^Y
+"DATA",176.112,37780,0)
+4026448^BARRIER,OSTOMY,NEW IMAGE H#14910
+"DATA",176.112,37780,1)
+750897^^Y
+"DATA",176.112,37781,0)
+4026449^BARRIER,OSTOMY,NEW IMAGE H#14911
+"DATA",176.112,37781,1)
+750898^^Y
+"DATA",176.112,37782,0)
+4026485^BARRIER,OSTOMY,NEW IMAGE H#15402
+"DATA",176.112,37782,1)
+750899^^Y
+"DATA",176.112,37783,0)
+4026486^BARRIER,OSTOMY,NEW IMAGE H#15403
+"DATA",176.112,37783,1)
+750900^^Y
+"DATA",176.112,37784,0)
+4026487^BARRIER,OSTOMY,NEW IMAGE H#15404
+"DATA",176.112,37784,1)
+750901^^Y
+"DATA",176.112,37785,0)
+4026481^BARRIER,OSTOMY,NEW IMAGE H#15503
+"DATA",176.112,37785,1)
+750902^^Y
+"DATA",176.112,37786,0)
+4026482^BARRIER,OSTOMY,NEW IMAGE H#15504
+"DATA",176.112,37786,1)
+750903^^Y
+"DATA",176.112,37787,0)
+4026483^BARRIER,OSTOMY,NEW IMAGE H#15505
+"DATA",176.112,37787,1)
+750904^^Y
+"DATA",176.112,37788,0)
+4026484^BARRIER,OSTOMY,NEW IMAGE H#15506
+"DATA",176.112,37788,1)
+750905^^Y
+"DATA",176.112,37789,0)
+4026477^BARRIER,OSTOMY,NEW IMAGE H#15903
+"DATA",176.112,37789,1)
+750906^^Y
+"DATA",176.112,37790,0)
+4026478^BARRIER,OSTOMY,NEW IMAGE H#15904
+"DATA",176.112,37790,1)
+750907^^Y
+"DATA",176.112,37791,0)
+4026479^BARRIER,OSTOMY,NEW IMAGE H#15905
+"DATA",176.112,37791,1)
+750908^^Y
+"DATA",176.112,37792,0)
+4026480^BARRIER,OSTOMY,NEW IMAGE H#15906
+"DATA",176.112,37792,1)
+750909^^Y
+"DATA",176.112,37793,0)
+4026606^BARRIER,OSTOMY,NEW IMAGE H#16101
+"DATA",176.112,37793,1)
+750910^^Y
+"DATA",176.112,37794,0)
+4026607^BARRIER,OSTOMY,NEW IMAGE H#16102
+"DATA",176.112,37794,1)
+750911^^Y
+"DATA",176.112,37795,0)
+4026608^BARRIER,OSTOMY,NEW IMAGE H#16103
+"DATA",176.112,37795,1)
+750912^^Y
+"DATA",176.112,37796,0)
+4026609^BARRIER,OSTOMY,NEW IMAGE H#16105
+"DATA",176.112,37796,1)
+750913^^Y
+"DATA",176.112,37797,0)
+4026610^BARRIER,OSTOMY,NEW IMAGE H#16106
+"DATA",176.112,37797,1)
+750914^^Y
+"DATA",176.112,37798,0)
+4026611^BARRIER,OSTOMY,NEW IMAGE H#16107
+"DATA",176.112,37798,1)
+750915^^Y
+"DATA",176.112,37799,0)
+4026552^BELT,ELASTIC 1.5IN WITH PLASTIC BUCKLES NU-HOPE #2610
+"DATA",176.112,37799,1)
+750916^^Y
+"DATA",176.112,37800,0)
+4026579^BELT,ELASTIC 1IN WITH PLASTIC BUCKLE NU-HOPE #2600
+"DATA",176.112,37800,1)
+750917^^Y
+"DATA",176.112,37801,0)
+4026514^BELT,SUPPORT 3IN LARGE NU-HOPE #6596
+"DATA",176.112,37801,1)
+750918^^Y
+"DATA",176.112,37802,0)
+4026357^BELT,SUPPORT 4IN LARGE NU-HOPE #2667
+"DATA",176.112,37802,1)
+750919^^Y
+"DATA",176.112,37803,0)
+4026710^BELT,SUPPORT 4IN LARGE NU-HOPE #2667-SP
+"DATA",176.112,37803,1)
+750920^^Y
+"DATA",176.112,37804,0)
+4026706^BELT,SUPPORT 4IN SMALL NU-HOPE #2665
+"DATA",176.112,37804,1)
+750921^^Y
+"DATA",176.112,37805,0)
+4026360^BELT,SUPPORT 4IN X-LARGE NU-HOPE #2663DC
+"DATA",176.112,37805,1)
+750922^^Y
+"DATA",176.112,37806,0)
+4026363^BELT,SUPPORT 4IN X-LARGE NU-HOPE #2668
+"DATA",176.112,37806,1)
+750923^^Y
+"DATA",176.112,37807,0)
+4026364^BELT,SUPPORT 4IN X-LARGE NU-HOPE #2668-H
+"DATA",176.112,37807,1)
+750924^^Y
+"DATA",176.112,37808,0)
+4026702^BELT,SUPPORT 4IN XX-LARGE NU-HOPE #2669
+"DATA",176.112,37808,1)
+750925^^Y
+"DATA",176.112,37809,0)
+4026517^BELT,SUPPORT 6IN LARGE NU-HOPE #6432
+"DATA",176.112,37809,1)
+750926^^Y
+"DATA",176.112,37810,0)
+4026365^BELT,SUPPORT 6IN LARGE NU-HOPE #6602-C
+"DATA",176.112,37810,1)
+750927^^Y
+"DATA",176.112,37811,0)
+4026366^BELT,SUPPORT 6IN LARGE NU-HOPE #6602-P
+"DATA",176.112,37811,1)
+750928^^Y
+"DATA",176.112,37812,0)
+4026367^BELT,SUPPORT 6IN LARGE NU-HOPE #6602-SP
+"DATA",176.112,37812,1)
+750929^^Y
+"DATA",176.112,37813,0)
+4026698^BELT,SUPPORT 6IN LARGE NU-HOPE #6612
+"DATA",176.112,37813,1)
+750930^^Y
+"DATA",176.112,37814,0)
+4026516^BELT,SUPPORT 6IN MEDIUM NU-HOPE #6431
+"DATA",176.112,37814,1)
+750931^^Y
+"DATA",176.112,37815,0)
+4026382^BELT,SUPPORT 6IN MEDIUM NU-HOPE #6601-P
+"DATA",176.112,37815,1)
+750932^^Y
+"DATA",176.112,37816,0)
+4026699^BELT,SUPPORT 6IN MEDIUM NU-HOPE #6611
+"DATA",176.112,37816,1)
+750933^^Y
+"DATA",176.112,37817,0)
+4026515^BELT,SUPPORT 6IN SMALL NU-HOPE #6430
+"DATA",176.112,37817,1)
+750934^^Y
+"DATA",176.112,37818,0)
+4026700^BELT,SUPPORT 6IN SMALL NU-HOPE #6610
+"DATA",176.112,37818,1)
+750935^^Y
+"DATA",176.112,37819,0)
+4026519^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6433
+"DATA",176.112,37819,1)
+750936^^Y
+"DATA",176.112,37820,0)
+4026368^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6613
+"DATA",176.112,37820,1)
+750937^^Y
+"DATA",176.112,37821,0)
+4026518^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6434
+"DATA",176.112,37821,1)
+750938^^Y
+"DATA",176.112,37822,0)
+4026392^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6604-P
+"DATA",176.112,37822,1)
+750939^^Y
+"DATA",176.112,37823,0)
+4026384^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6604-PC
+"DATA",176.112,37823,1)
+750940^^Y
+"DATA",176.112,37824,0)
+4026369^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6614-B
+"DATA",176.112,37824,1)
+750941^^Y
+"DATA",176.112,37825,0)
+4026386^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6614-PC
+"DATA",176.112,37825,1)
+750942^^Y
+"DATA",176.112,37826,0)
+4026388^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6614-SP
+"DATA",176.112,37826,1)
+750943^^Y
+"DATA",176.112,37827,0)
+4026727^BELT,SUPPORT 7IN LARGE NU-HOPE #6342
+"DATA",176.112,37827,1)
+750944^^Y
+"DATA",176.112,37828,0)
+4026722^BELT,SUPPORT 7IN LARGE NU-HOPE #6347
+"DATA",176.112,37828,1)
+750945^^Y
+"DATA",176.112,37829,0)
+4026726^BELT,SUPPORT 7IN MEDIUM NU-HOPE #6341
+"DATA",176.112,37829,1)
+750946^^Y
+"DATA",176.112,37830,0)
+4026721^BELT,SUPPORT 7IN MEDIUM NU-HOPE #6346
+"DATA",176.112,37830,1)
+750947^^Y
+"DATA",176.112,37831,0)
+4026725^BELT,SUPPORT 7IN SMALL NU-HOPE #6340
+"DATA",176.112,37831,1)
+750948^^Y
+"DATA",176.112,37832,0)
+4026720^BELT,SUPPORT 7IN SMALL NU-HOPE #6345
+"DATA",176.112,37832,1)
+750949^^Y
+"DATA",176.112,37833,0)
+4026728^BELT,SUPPORT 7IN X-LARGE NU-HOPE #6343
+"DATA",176.112,37833,1)
+750950^^Y
+"DATA",176.112,37834,0)
+4026723^BELT,SUPPORT 7IN X-LARGE NU-HOPE #6348
+"DATA",176.112,37834,1)
+750951^^Y
+"DATA",176.112,37835,0)
+4026729^BELT,SUPPORT 7IN XX-LARGE NU-HOPE #6344
+"DATA",176.112,37835,1)
+750952^^Y
+"DATA",176.112,37836,0)
+4026450^DRESSING,ACTICOAT ROPE 0.75IN X 12IN SN#20181
+"DATA",176.112,37836,1)
+750956^^Y
+"DATA",176.112,37837,0)
+4026648^DRESSING,BIOPATCH 1.5MM JJ#3151
+"DATA",176.112,37837,1)
+750957^^Y
+"DATA",176.112,37838,0)
+4026647^DRESSING,BIOPATCH 4MM JJ#3150
+"DATA",176.112,37838,1)
+750958^^Y
+"DATA",176.112,37839,0)
+4026649^DRESSING,BIOPATCH 7MM JJ#3152
+"DATA",176.112,37839,1)
+750959^^Y
+"DATA",176.112,37840,0)
+4026724^BELT,SUPPORT 7IN XX-LARGE NU-HOPE #6349
+"DATA",176.112,37840,1)
+750960^^Y
+"DATA",176.112,37841,0)
+4026394^BELT,SUPPORT 9IN X-LARGE NU-HOPE #6643-SP
+"DATA",176.112,37841,1)
+750961^^Y
+"DATA",176.112,37842,0)
+4026355^BRIEF,EXTRA ABSORBENT PROTECTIVE UNDERWEAR LARGE ATTENDS
+"DATA",176.112,37842,1)
+750963^^Y
+"DATA",176.112,37843,0)
+4026344^BRIEF,EXTRA ABSORBENT PROTECTIVE UNDERWEAR MEDIUM ATTENDS
+"DATA",176.112,37843,1)
+750964^^Y
+"DATA",176.112,37844,0)
+4026356^BRIEF,EXTRA ABSORBENT PROTECTIVE UNDERWEAR X-LARGE ATTENDS
+"DATA",176.112,37844,1)
+750965^^Y
+"DATA",176.112,37845,0)
+4026352^BRIEF,SUPER PLUS ABSORB WITH BARRIERS UNDERWEAR LARGE ATTENDS
+"DATA",176.112,37845,1)
+750966^^Y
+"DATA",176.112,37846,0)
+4026347^BRIEF,SUPER PLUS ABSORB WITH BARRIERS UNDERWEAR MEDIUM ATTENDS
+"DATA",176.112,37846,1)
+750967^^Y
+"DATA",176.112,37847,0)
+4026354^BRIEF,SUPER PLUS ABSORB WITH BARRIERS UNDERWEAR X-LARGE ATTENDS
+"DATA",176.112,37847,1)
+750968^^Y
+"DATA",176.112,37848,0)
+4026430^CARTRIDGE,ANIMAS IR 3ML #1000
+"DATA",176.112,37848,1)
+750970^^Y
+"DATA",176.112,37849,0)
+4026316^CATHETER FOLEY 2-WAY SPECIALTY 5CC BARD#0196SI16
+"DATA",176.112,37849,1)
+750971^^Y
+"DATA",176.112,37850,0)
+4026260^CATHETER,EXTERNAL INTERMEDIATE FREEDOM CLEAR #5300/5330
+"DATA",176.112,37850,1)
+750973^^Y
+"DATA",176.112,37851,0)
+4026547^CATHETER,EXTERNAL INTERMEDIATE FREEDOM CLEAR SS #5310
+"DATA",176.112,37851,1)
+750974^^Y
+"DATA",176.112,37852,0)
+4026261^CATHETER,EXTERNAL LARGE FREEDOM CLEAR #5400/5430
+"DATA",176.112,37852,1)
+750975^^Y
+"DATA",176.112,37853,0)
+4026550^CATHETER,EXTERNAL LARGE FREEDOM CLEAR SS #5410
+"DATA",176.112,37853,1)
+750976^^Y
+"DATA",176.112,37854,0)
+4026259^CATHETER,EXTERNAL MEDIUM FREEDOM CLEAR #5200/5230
+"DATA",176.112,37854,1)
+750977^^Y
+"DATA",176.112,37855,0)
+4026549^CATHETER,EXTERNAL MEDIUM FREEDOM CLEAR SS #5210
+"DATA",176.112,37855,1)
+750978^^Y
+"DATA",176.112,37856,0)
+4026258^CATHETER,EXTERNAL SMALL FREEDOM CLEAR #5100/5130
+"DATA",176.112,37856,1)
+750979^^Y
+"DATA",176.112,37857,0)
+4026548^CATHETER,EXTERNAL SMALL FREEDOM CLEAR SS #5110
+"DATA",176.112,37857,1)
+750980^^Y
+"DATA",176.112,37858,0)
+4026262^CATHETER,EXTERNAL X-LARGE FREEDOM CLEAR #5500/5530
+"DATA",176.112,37858,1)
+750981^^Y
+"DATA",176.112,37859,0)
+4026551^CATHETER,EXTERNAL X-LARGE FREEDOM CLEAR SS #5510
+"DATA",176.112,37859,1)
+750982^^Y
+"DATA",176.112,37860,0)
+4026299^CATHETER,FOLEY 12FR 5CC BARD#123512A
+"DATA",176.112,37860,1)
+750983^^Y
+"DATA",176.112,37861,0)
+4026300^CATHETER,FOLEY 14FR 5CC BARD#123514A
+"DATA",176.112,37861,1)
+750984^^Y
+"DATA",176.112,37862,0)
+4026301^CATHETER,FOLEY 16FR 5CC BARD#123516A
+"DATA",176.112,37862,1)
+750985^^Y
+"DATA",176.112,37863,0)
+4026302^CATHETER,FOLEY 18FR 5CC BARD#123518A
+"DATA",176.112,37863,1)
+750986^^Y
+"DATA",176.112,37864,0)
+4026303^CATHETER,FOLEY 20FR 5CC BARD#123520A
+"DATA",176.112,37864,1)
+750987^^Y
+"DATA",176.112,37865,0)
+4026304^CATHETER,FOLEY 22FR 5CC BARD#123522A
+"DATA",176.112,37865,1)
+750988^^Y
+"DATA",176.112,37866,0)
+4026339^CATHETER,FOLEY 24FR 5CC BARD#123524A
+"DATA",176.112,37866,1)
+750989^^Y
+"DATA",176.112,37867,0)
+4026341^CATHETER,FOLEY 26FR 5CC BARD#123526A
+"DATA",176.112,37867,1)
+750990^^Y
+"DATA",176.112,37868,0)
+4026342^CATHETER,FOLEY 30FR 5CC BARD#123530A
+"DATA",176.112,37868,1)
+750991^^Y
+"DATA",176.112,37869,0)
+4026530^CATHETER,INTERMITTENT LOFRIC CATH KIT 10FR ASTRATECH #911040
+"DATA",176.112,37869,1)
+750992^^Y
+"DATA",176.112,37870,0)
+4026531^CATHETER,INTERMITTENT LOFRIC CATH KIT 12FR ASTRATECH #911240
+"DATA",176.112,37870,1)
+750993^^Y
+"DATA",176.112,37871,0)
+4026532^CATHETER,INTERMITTENT LOFRIC CATH KIT 14FR ASTRATECH #911440
+"DATA",176.112,37871,1)
+750995^^Y
+"DATA",176.112,37872,0)
+4026528^CATHETER,INTERMITTENT LOFRIC CATH KIT 16FR ASTRATECH #911640
+"DATA",176.112,37872,1)
+750996^^Y
+"DATA",176.112,37873,0)
+4026533^CATHETER,INTERMITTENT LOFRIC CATH KIT 18FR ASTRATECH #911840
+"DATA",176.112,37873,1)
+750997^^Y
+"DATA",176.112,37874,0)
+4026529^CATHETER,INTERMITTENT LOFRIC CATH KIT 8FR ASTARTECH#910840
+"DATA",176.112,37874,1)
+750998^^Y
+"DATA",176.112,37875,0)
+4026311^CATHETER,SELF-CATH 10FR COLOPLAST #1010
+"DATA",176.112,37875,1)
+750999^^Y
+"DATA",176.112,37876,0)
+4026310^CATHETER,SELF-CATH 12FR COLOPLAST #1012
+"DATA",176.112,37876,1)
+751000^^Y
+"DATA",176.112,37877,0)
+4026313^CATHETER,SELF-CATH 14FR COLOPLAST #1014
+"DATA",176.112,37877,1)
+751001^^Y
+"DATA",176.112,37878,0)
+4026309^CATHETER,SELF-CATH 16FR COLOPLAST #1016
+"DATA",176.112,37878,1)
+751002^^Y
+"DATA",176.112,37879,0)
+4016994^PREMPRO 0.3MG/1.5MG TAB,28 PACK
+"DATA",176.112,37879,1)
+751004^^Y
+"DATA",176.112,37880,0)
+4026312^CATHETER,SELF-CATH 8FR COLOPLAST #1008
+"DATA",176.112,37880,1)
+751005^^Y
+"DATA",176.112,37881,0)
+4016927^PREMPRO 0.45MG/1.5MG TAB,28 PACK
+"DATA",176.112,37881,1)
+751007^^Y
+"DATA",176.112,37882,0)
+4012711^PREMPHASE TAB,28 PACK
+"DATA",176.112,37882,1)
+751009^^Y
+"DATA",176.112,37883,0)
+4012710^ESTROGENS,CONJUGAT 0.625MG,28TAB/MEDROXYPROGESTERONE 2.5MG,28TAB
+"DATA",176.112,37883,1)
+751058^^Y
+"DATA",176.112,37884,0)
+4013248^PREMPRO 0.625MG/2.5MG TAB,28 PACK
+"DATA",176.112,37884,1)
+751059^^Y
+"DATA",176.112,37885,0)
+4012713^PREMPRO 0.625MG/5MG TAB,28 PACK
+"DATA",176.112,37885,1)
+751061^^Y
+"DATA",176.112,37886,0)
+4026523^DRESSING,CONFORMANT-2 12IN X 12IN
+"DATA",176.112,37886,1)
+751064^^Y
+"DATA",176.112,37887,0)
+4026524^DRESSING,CONFORMANT-2 12IN X 24IN
+"DATA",176.112,37887,1)
+751065^^Y
+"DATA",176.112,37888,0)
+4026521^DRESSING,CONFORMANT-2 4IN X 12IN
+"DATA",176.112,37888,1)
+751066^^Y
+"DATA",176.112,37889,0)
+4026522^DRESSING,CONFORMANT-2 4IN X 4IN
+"DATA",176.112,37889,1)
+751067^^Y
+"DATA",176.112,37890,0)
+4026678^DRESSING,MEPILEX 4IN X 4IN #294190
+"DATA",176.112,37890,1)
+751069^^Y
+"DATA",176.112,37891,0)
+4026679^DRESSING,MEPILEX 4IN X 8IN #294290
+"DATA",176.112,37891,1)
+751070^^Y
+"DATA",176.112,37892,0)
+4026680^DRESSING,MEPILEX 6IN X 6IN #294390
+"DATA",176.112,37892,1)
+751071^^Y
+"DATA",176.112,37893,0)
+4026681^DRESSING,MEPILEX 8IN X 8IN #294490
+"DATA",176.112,37893,1)
+751072^^Y
+"DATA",176.112,37894,0)
+4026420^DRESSING,MEPILEX AG 4IN X 4IN #287100
+"DATA",176.112,37894,1)
+751073^^Y
+"DATA",176.112,37895,0)
+4026425^DRESSING,MEPILEX AG 4IN X 8IN #287200
+"DATA",176.112,37895,1)
+751074^^Y
+"DATA",176.112,37896,0)
+4026419^DRESSING,MEPILEX AG 6IN X 6IN #287300
+"DATA",176.112,37896,1)
+751075^^Y
+"DATA",176.112,37897,0)
+4026418^DRESSING,MEPILEX AG 8IN X 8IN #287400
+"DATA",176.112,37897,1)
+751076^^Y
+"DATA",176.112,37898,0)
+4026677^DRESSING,MEPILEX BORDER 3IN X 3IN #295200
+"DATA",176.112,37898,1)
+751077^^Y
+"DATA",176.112,37899,0)
+4026675^DRESSING,MEPILEX BORDER 4IN X 4IN #295300
+"DATA",176.112,37899,1)
+751078^^Y
+"DATA",176.112,37900,0)
+4026674^DRESSING,MEPILEX BORDER 6IN X 6IN #295400
+"DATA",176.112,37900,1)
+751079^^Y
+"DATA",176.112,37901,0)
+4026673^DRESSING,MEPILEX BORDER 6IN X 8IN #295600
+"DATA",176.112,37901,1)
+751080^^Y
+"DATA",176.112,37902,0)
+4026657^DRESSING,OASIS BURN MATRIX 7CM X 20CM MESHED
+"DATA",176.112,37902,1)
+751082^^Y
+"DATA",176.112,37903,0)
+4026658^DRESSING,OASIS WOUND MATRIX 3CM X 3.5CM FENESTRATED
+"DATA",176.112,37903,1)
+751083^^Y
+"DATA",176.112,37904,0)
+4026659^DRESSING,OASIS WOUND MATRIX 3CM X 7CM FENESTRATED
+"DATA",176.112,37904,1)
+751084^^Y
+"DATA",176.112,37905,0)
+4026655^DRESSING,OASIS WOUND MATRIX 7CM X 10CM FENESTRATED
+"DATA",176.112,37905,1)
+751085^^Y
+"DATA",176.112,37906,0)
+4026660^DRESSING,OASIS WOUND MATRIX 7CM X 10CM MESHED
+"DATA",176.112,37906,1)
+751086^^Y
+"DATA",176.112,37907,0)
+4026656^DRESSING,OASIS WOUND MATRIX 7CM X 20CM FENESTRATED
+"DATA",176.112,37907,1)
+751087^^Y
+"DATA",176.112,37908,0)
+4026661^DRESSING,OASIS WOUND MATRIX 7CM X 20CM MESHED
+"DATA",176.112,37908,1)
+751088^^Y
+"DATA",176.112,37909,0)
+4026613^DRESSING,RESTORE 4IN X 4IN H#519953
+"DATA",176.112,37909,1)
+751090^^Y
+"DATA",176.112,37910,0)
+4026614^DRESSING,RESTORE 6IN X 8IN H#519954
+"DATA",176.112,37910,1)
+751091^^Y
+"DATA",176.112,37911,0)
+4026615^DRESSING,RESTORE 8IN X 8IN H#519955
+"DATA",176.112,37911,1)
+751092^^Y
+"DATA",176.112,37912,0)
+4026513^DRESSING,RESTORE CALCIUM ALGINATE 12IN H#529940
+"DATA",176.112,37912,1)
+751094^^Y
+"DATA",176.112,37913,0)
+4026511^DRESSING,RESTORE CALCIUM ALGINATE 2IN X 2IN H#529938
+"DATA",176.112,37913,1)
+751095^^Y
+"DATA",176.112,37914,0)
+4026510^DRESSING,RESTORE CALCIUM ALGINATE 4IN X 4IN H#529937
+"DATA",176.112,37914,1)
+751096^^Y
+"DATA",176.112,37915,0)
+4026512^DRESSING,RESTORE CALCIUM ALGINATE 4IN X 8IN H#529939
+"DATA",176.112,37915,1)
+751097^^Y
+"DATA",176.112,37916,0)
+4026715^DRESSING,RESTORE TAPERED 4IN X 4IN H#519956
+"DATA",176.112,37916,1)
+751099^^Y
+"DATA",176.112,37917,0)
+4026714^DRESSING,RESTORE TAPERED 6IN X 6IN H#519963
+"DATA",176.112,37917,1)
+751100^^Y
+"DATA",176.112,37918,0)
+4026716^DRESSING,RESTORE TAPERED 6IN X 8IN H#519957
+"DATA",176.112,37918,1)
+751101^^Y
+"DATA",176.112,37919,0)
+4026717^DRESSING,RESTORE TAPERED 8IN X 8IN H#519958
+"DATA",176.112,37919,1)
+751102^^Y
+"DATA",176.112,37920,0)
+4026718^DRESSING,RESTORE TAPERED TRIANGLE 17IN H#519959
+"DATA",176.112,37920,1)
+751103^^Y
+"DATA",176.112,37921,0)
+4026719^DRESSING,RESTORE TAPERED TRIANGLE 26.5IN H#519965
+"DATA",176.112,37921,1)
+751104^^Y
+"DATA",176.112,37922,0)
+4026618^DRESSING,RESTORE,HYDROGEL 2IN X 3.5YD H#529973
+"DATA",176.112,37922,1)
+751105^^Y
+"DATA",176.112,37923,0)
+4026617^DRESSING,RESTORE,HYDROGEL 4IN X 4IN H#529972
+"DATA",176.112,37923,1)
+751106^^Y
+"DATA",176.112,37924,0)
+4026616^DRESSING,RESTORE,HYDROGEL GEL,TOP
+"DATA",176.112,37924,1)
+751107^^Y
+"DATA",176.112,37925,0)
+4026542^DRESSING,SILVERDERM-7 2IN X 2IN
+"DATA",176.112,37925,1)
+751109^^Y
+"DATA",176.112,37926,0)
+4026543^DRESSING,SILVERDERM-7 4IN X 4IN
+"DATA",176.112,37926,1)
+751110^^Y
+"DATA",176.112,37927,0)
+4026320^FECAL COLLECTOR C#4111-00
+"DATA",176.112,37927,1)
+751112^^Y
+"DATA",176.112,37928,0)
+4026319^FECAL COLLECTOR C#4111-01
+"DATA",176.112,37928,1)
+751113^^Y
+"DATA",176.112,37929,0)
+4026334^FLUID DISPENSING SYSTEM MAC-10001
+"DATA",176.112,37929,1)
+751114^^Y
+"DATA",176.112,37930,0)
+4026690^FREESTYLE (GLUCOSE) METER
+"DATA",176.112,37930,1)
+751115^^Y
+"DATA",176.112,37931,0)
+4026668^FREESTYLE LITE (GLUCOSE) TEST STRIP
+"DATA",176.112,37931,1)
+751116^^Y
+"DATA",176.112,37932,0)
+4026307^GASKET,SEAL-TITE 3.75IN,#TSN4302
+"DATA",176.112,37932,1)
+751117^^Y
+"DATA",176.112,37933,0)
+4026643^GLOVE VINYL LARGE PWDR-FREE STERILE(PAIR)
+"DATA",176.112,37933,1)
+751118^^Y
+"DATA",176.112,37934,0)
+4026644^GLOVE VINYL MEDIUM PWDR-FREE STERILE(PAIR)
+"DATA",176.112,37934,1)
+751119^^Y
+"DATA",176.112,37935,0)
+4026645^GLOVE VINYL SMALL PWDR-FREE STERILE(PAIR)
+"DATA",176.112,37935,1)
+751120^^Y
+"DATA",176.112,37936,0)
+4026561^GLUCERNA SELECT LIQUID 1000ML
+"DATA",176.112,37936,1)
+751121^^Y
+"DATA",176.112,37937,0)
+4026558^GLUCERNA SELECT LIQUID VANILLA
+"DATA",176.112,37937,1)
+751123^^Y
+"DATA",176.112,37938,0)
+4026318^GLUCOSE SENSOR GUARDIAN MMT-7002
+"DATA",176.112,37938,1)
+751129^^Y
+"DATA",176.112,37939,0)
+4026573^INSULIN SYRINGE 1ML 29G 0.5IN SAFETYGLIDE
+"DATA",176.112,37939,1)
+751131^^Y
+"DATA",176.112,37940,0)
+4026337^INSULIN SYRINGE 1ML SLIP TIP
+"DATA",176.112,37940,1)
+751132^^Y
+"DATA",176.112,37941,0)
+4026692^INVISIBLE ARMOR 2-STEP KWIK-KIT WIPE
+"DATA",176.112,37941,1)
+751133^^Y
+"DATA",176.112,37942,0)
+4026427^IRRIGATION KIT BARD #750301
+"DATA",176.112,37942,1)
+751134^^Y
+"DATA",176.112,37943,0)
+4026306^JUVEN PWDR PKT,23GM GRAPE
+"DATA",176.112,37943,1)
+751136^^Y
+"DATA",176.112,37944,0)
+4026305^JUVEN PWDR PKT,23GM ORANGE
+"DATA",176.112,37944,1)
+751136^^Y
+"DATA",176.112,37945,0)
+4026525^LAMOTRIGINE 25MG TAB,35,KIT
+"DATA",176.112,37945,1)
+751139^^Y
+"DATA",176.112,37946,0)
+4026526^LAMOTRIGINE 25MG TAB,42/LAMOTRIGINE 100MG TAB,5,KIT
+"DATA",176.112,37946,1)
+751140^^Y
+"DATA",176.112,37947,0)
+4026688^LANCET,INVACARE 30G
+"DATA",176.112,37947,1)
+751169^^Y
+"DATA",176.112,37948,0)
+4026572^LANCET,SMS LANCING DEVICE
+"DATA",176.112,37948,1)
+751170^^Y
+"DATA",176.112,37949,0)
+4026409^LEG BAG FREEDOM T-TAP KIT COLOPLAST #7077
+"DATA",176.112,37949,1)
+751171^^Y
+"DATA",176.112,37950,0)
+4026408^LEG BAG FREEDOM T-TAP KIT COLOPLAST #7078
+"DATA",176.112,37950,1)
+751172^^Y
+"DATA",176.112,37951,0)
+4026406^LEG BAG FREEDOM T-TAP KIT COLOPLAST #7079
+"DATA",176.112,37951,1)
+751173^^Y
+"DATA",176.112,37952,0)
+4026389^LEG BAG FREEDOM T-TAP KIT COLOPLAST #7088
+"DATA",176.112,37952,1)
+751174^^Y
+"DATA",176.112,37953,0)
+4026405^LEG BAG FREEDOM T-TAP KIT COLOPLAST #7089
+"DATA",176.112,37953,1)
+751175^^Y
+"DATA",176.112,37954,0)
+4026407^LEG BAG FREEDOM T-TAP KIT COLOPLAST #9010
+"DATA",176.112,37954,1)
+751176^^Y
+"DATA",176.112,37955,0)
+4026650^NUTREN 2.0 LIQUID VANILLA
+"DATA",176.112,37955,1)
+751178^^Y
+"DATA",176.112,37956,0)
+4026416^ORAL,SWAB TOOTHETTE
+"DATA",176.112,37956,1)
+751180^^Y
+"DATA",176.112,37957,0)
+4026414^ORAL,SWAB TOOTHETTE PLUS
+"DATA",176.112,37957,1)
+751181^^Y
+"DATA",176.112,37958,0)
+4026412^ORAL,SWAB TOOTHETTE PLUS W/MOUTHWASH
+"DATA",176.112,37958,1)
+751182^^Y
+"DATA",176.112,37959,0)
+4025721^FEMHRT LO 0.5/2.5 TAB,28
+"DATA",176.112,37959,1)
+751184^^Y
+"DATA",176.112,37960,0)
+4026413^ORAL,SWAB TOOTHETTE PLUS W/SODIUM BICARBONATE
+"DATA",176.112,37960,1)
+751185^^Y
+"DATA",176.112,37961,0)
+4026415^ORAL,SWAB TOOTHETTE W/DENTIFRICE
+"DATA",176.112,37961,1)
+751186^^Y
+"DATA",176.112,37962,0)
+4026314^PEAK FLOW METER OMRON #9040
+"DATA",176.112,37962,1)
+751187^^Y
+"DATA",176.112,37963,0)
+4026713^PEPTAMEN AF LIQUID UNFLAVORED,1000ML
+"DATA",176.112,37963,1)
+751188^^Y
+"DATA",176.112,37964,0)
+4026712^PEPTAMEN AF LIQUID UNFLAVORED,250ML
+"DATA",176.112,37964,1)
+751189^^Y
+"DATA",176.112,37965,0)
+4026730^POUCH,CLOSED,NEW IMAGE H#18332
+"DATA",176.112,37965,1)
+751190^^Y
+"DATA",176.112,37966,0)
+4026731^POUCH,CLOSED,NEW IMAGE H#18333
+"DATA",176.112,37966,1)
+751191^^Y
+"DATA",176.112,37967,0)
+4026732^POUCH,CLOSED,NEW IMAGE H#18334
+"DATA",176.112,37967,1)
+751192^^Y
+"DATA",176.112,37968,0)
+4026601^POUCH,CLOSED,PREMIER H#82300
+"DATA",176.112,37968,1)
+751193^^Y
+"DATA",176.112,37969,0)
+4026602^POUCH,CLOSED,PREMIER H#82325
+"DATA",176.112,37969,1)
+751194^^Y
+"DATA",176.112,37970,0)
+4026599^POUCH,CLOSED,PREMIER H#82330
+"DATA",176.112,37970,1)
+751195^^Y
+"DATA",176.112,37971,0)
+4026600^POUCH,CLOSED,PREMIER H#82335
+"DATA",176.112,37971,1)
+751196^^Y
+"DATA",176.112,37972,0)
+4026598^POUCH,CLOSED,PREMIER H#82400
+"DATA",176.112,37972,1)
+751197^^Y
+"DATA",176.112,37973,0)
+4026584^POUCH,DRAINABLE 1-1/8IN SHALLOW CONVEX W/AQUATACK MARLEN #55123
+"DATA",176.112,37973,1)
+751198^^Y
+"DATA",176.112,37974,0)
+4026538^POUCH,DRAINABLE,ASSURA COLOPLAST #12595
+"DATA",176.112,37974,1)
+751199^^Y
+"DATA",176.112,37975,0)
+4026588^POUCH,DRAINABLE,ASSURA COLOPLAST #12596
+"DATA",176.112,37975,1)
+751200^^Y
+"DATA",176.112,37976,0)
+4026651^POUCH,DRAINABLE,ASSURA COLOPLAST #15954
+"DATA",176.112,37976,1)
+751201^^Y
+"DATA",176.112,37977,0)
+4026652^POUCH,DRAINABLE,ASSURA COLOPLAST #15955
+"DATA",176.112,37977,1)
+751202^^Y
+"DATA",176.112,37978,0)
+4026653^POUCH,DRAINABLE,ASSURA COLOPLAST #15956
+"DATA",176.112,37978,1)
+751203^^Y
+"DATA",176.112,37979,0)
+4026671^POUCH,DRAINABLE,ASSURA COLOPLAST #15975
+"DATA",176.112,37979,1)
+751204^^Y
+"DATA",176.112,37980,0)
+4026424^POUCH,DRAINABLE,ASSURA COLOPLAST #15976
+"DATA",176.112,37980,1)
+751205^^Y
+"DATA",176.112,37981,0)
+4026539^POUCH,DRAINABLE,NEW IMAGE H#18132
+"DATA",176.112,37981,1)
+751206^^Y
+"DATA",176.112,37982,0)
+4026540^POUCH,DRAINABLE,NEW IMAGE H#18133
+"DATA",176.112,37982,1)
+751207^^Y
+"DATA",176.112,37983,0)
+4026545^POUCH,DRAINABLE,NEW IMAGE MINI H#18282
+"DATA",176.112,37983,1)
+751208^^Y
+"DATA",176.112,37984,0)
+4025720^FEMHRT LO 0.5/2.5 TAB
+"DATA",176.112,37984,1)
+751212^^Y
+"DATA",176.112,37985,0)
+4026541^POUCH,DRAINABLE,NEW IMAGE MINI H#18283
+"DATA",176.112,37985,1)
+751213^^Y
+"DATA",176.112,37986,0)
+4026544^POUCH,DRAINABLE,NEW IMAGE MINI H#18284
+"DATA",176.112,37986,1)
+751214^^Y
+"DATA",176.112,37987,0)
+4026429^POUCH,DRAINABLE,NU-HOPE #7234-C
+"DATA",176.112,37987,1)
+751215^^Y
+"DATA",176.112,37988,0)
+4026428^POUCH,DRAINABLE,PREMIER H#8558
+"DATA",176.112,37988,1)
+751216^^Y
+"DATA",176.112,37989,0)
+4026404^POUCH,DRAINABLE,PREMIER H#88400
+"DATA",176.112,37989,1)
+751217^^Y
+"DATA",176.112,37990,0)
+4026403^POUCH,DRAINABLE,PREMIER HIGH OUTPUT H#80070
+"DATA",176.112,37990,1)
+751218^^Y
+"DATA",176.112,37991,0)
+4026554^POUCH,DRAINABLE,PREMIER WITH FLAT BARRIERS H#8552
+"DATA",176.112,37991,1)
+751219^^Y
+"DATA",176.112,37992,0)
+4026553^POUCH,DRAINABLE,PREMIER WITH FLAT BARRIERS H#8553
+"DATA",176.112,37992,1)
+751220^^Y
+"DATA",176.112,37993,0)
+4026555^POUCH,DRAINABLE,PREMIER WITH FLAT BARRIERS H#8559
+"DATA",176.112,37993,1)
+751221^^Y
+"DATA",176.112,37994,0)
+4026327^POUCH,DRAINABLE,SUR-FIT C#4040-14
+"DATA",176.112,37994,1)
+751222^^Y
+"DATA",176.112,37995,0)
+4026328^POUCH,DRAINABLE,SUR-FIT C#4040-15
+"DATA",176.112,37995,1)
+751223^^Y
+"DATA",176.112,37996,0)
+4026329^POUCH,DRAINABLE,SUR-FIT C#4040-16
+"DATA",176.112,37996,1)
+751224^^Y
+"DATA",176.112,37997,0)
+4026330^POUCH,DRAINABLE,SUR-FIT C#4040-17
+"DATA",176.112,37997,1)
+751225^^Y
+"DATA",176.112,37998,0)
+4026331^POUCH,DRAINABLE,SUR-FIT C#4040-18
+"DATA",176.112,37998,1)
+751226^^Y
+"DATA",176.112,37999,0)
+4026285^POUCH,DRAINABLE,SUR-FIT C#4040-34
+"DATA",176.112,37999,1)
+751227^^Y
+"DATA",176.112,38000,0)
+4026278^POUCH,DRAINABLE,SUR-FIT C#4112-90
+"DATA",176.112,38000,1)
+751228^^Y
+"DATA",176.112,38001,0)
+4026273^POUCH,DRAINABLE,SUR-FIT C#4112-91
+"DATA",176.112,38001,1)
+751229^^Y
+"DATA",176.112,38002,0)
+4014945^FEMHRT 1/5 TAB,28
+"DATA",176.112,38002,1)
+751231^^Y
+"DATA",176.112,38003,0)
+4015794^FEMHRT 1/5 TAB
+"DATA",176.112,38003,1)
+751235^^Y
+"DATA",176.112,38004,0)
+4026275^POUCH,DRAINABLE,SUR-FIT C#4112-92
+"DATA",176.112,38004,1)
+751239^^Y
+"DATA",176.112,38005,0)
+4026282^POUCH,DRAINABLE,SUR-FIT C#4113-10
+"DATA",176.112,38005,1)
+751240^^Y
+"DATA",176.112,38006,0)
+4026279^POUCH,DRAINABLE,SUR-FIT C#4113-60
+"DATA",176.112,38006,1)
+751241^^Y
+"DATA",176.112,38007,0)
+4026325^POUCH,DRAINABLE,SUR-FIT C#4133-12
+"DATA",176.112,38007,1)
+751242^^Y
+"DATA",176.112,38008,0)
+4026326^POUCH,DRAINABLE,SUR-FIT C#4133-13
+"DATA",176.112,38008,1)
+751243^^Y
+"DATA",176.112,38009,0)
+4026324^POUCH,DRAINABLE,SUR-FIT C#4133-14
+"DATA",176.112,38009,1)
+751244^^Y
+"DATA",176.112,38010,0)
+4026323^POUCH,DRAINABLE,SUR-FIT C#4133-34
+"DATA",176.112,38010,1)
+751245^^Y
+"DATA",176.112,38011,0)
+4026322^POUCH,DRAINABLE,SUR-FIT C#4133-35
+"DATA",176.112,38011,1)
+751246^^Y
+"DATA",176.112,38012,0)
+4026321^POUCH,DRAINABLE,SUR-FIT C#4133-36
+"DATA",176.112,38012,1)
+751247^^Y
+"DATA",176.112,38013,0)
+4026641^POUCH,EAKIN,WOUND,FISTULA DRAINAGE C#8392-13
+"DATA",176.112,38013,1)
+751248^^Y
+"DATA",176.112,38014,0)
+4026642^POUCH,EAKIN,WOUND,FISTULA DRAINAGE C#8392-14
+"DATA",176.112,38014,1)
+751249^^Y
+"DATA",176.112,38015,0)
+4026639^POUCH,EAKIN,WOUND,FISTULA DRAINAGE C#8392-23
+"DATA",176.112,38015,1)
+751250^^Y
+"DATA",176.112,38016,0)
+4026640^POUCH,EAKIN,WOUND,FISTULA DRAINAGE C#8392-24
+"DATA",176.112,38016,1)
+751251^^Y
+"DATA",176.112,38017,0)
+4026592^POUCH,MINI,CLOSED,PREMIER H#82125
+"DATA",176.112,38017,1)
+751252^^Y
+"DATA",176.112,38018,0)
+4026593^POUCH,MINI,CLOSED,PREMIER H#82130
+"DATA",176.112,38018,1)
+751253^^Y
+"DATA",176.112,38019,0)
+4026596^POUCH,MINI,CLOSED,PREMIER H#82135
+"DATA",176.112,38019,1)
+751254^^Y
+"DATA",176.112,38020,0)
+4026670^POUCH,OSTOMY,ACTIVE LIFE C#1253-34
+"DATA",176.112,38020,1)
+751255^^Y
+"DATA",176.112,38021,0)
+4026451^POUCH,OSTOMY,ASSURA MIDI COLOPLAST #12149
+"DATA",176.112,38021,1)
+751256^^Y
+"DATA",176.112,38022,0)
+4026288^POUCH,OSTOMY,SUR-FIT NATURA C#4131-74
+"DATA",176.112,38022,1)
+751257^^Y
+"DATA",176.112,38023,0)
+4026289^POUCH,OSTOMY,SUR-FIT NATURA C#4131-75
+"DATA",176.112,38023,1)
+751258^^Y
+"DATA",176.112,38024,0)
+4026290^POUCH,OSTOMY,SUR-FIT NATURA C#4131-76
+"DATA",176.112,38024,1)
+751259^^Y
+"DATA",176.112,38025,0)
+4026263^POUCH,URINARY POST-OP NU-HOPE #8360
+"DATA",176.112,38025,1)
+751260^^Y
+"DATA",176.112,38026,0)
+4026264^POUCH,URINARY POST-OP NU-HOPE #8361
+"DATA",176.112,38026,1)
+751261^^Y
+"DATA",176.112,38027,0)
+4026265^POUCH,URINARY POST-OP NU-HOPE #8362
+"DATA",176.112,38027,1)
+751262^^Y
+"DATA",176.112,38028,0)
+4026266^POUCH,URINARY POST-OP NU-HOPE #8363
+"DATA",176.112,38028,1)
+751263^^Y
+"DATA",176.112,38029,0)
+4026267^POUCH,URINARY POST-OP NU-HOPE #8364
+"DATA",176.112,38029,1)
+751264^^Y
+"DATA",176.112,38030,0)
+4026269^POUCH,URINARY POST-OP NU-HOPE #8366
+"DATA",176.112,38030,1)
+751265^^Y
+"DATA",176.112,38031,0)
+4026583^POUCH,UROSTOMY 1-1/8IN SHALLOW CONVEX W/AQUATACK MARLEN #77123
+"DATA",176.112,38031,1)
+751266^^Y
+"DATA",176.112,38032,0)
+4026556^POUCH,UROSTOMY,ACTIVE LIFE ONE PIECE CUT-TO-FIT C#0649-27
+"DATA",176.112,38032,1)
+751267^^Y
+"DATA",176.112,38033,0)
+4026622^PRODIGY AUTOCODE (GLUCOSE) TEST STRIP
+"DATA",176.112,38033,1)
+751268^^Y
+"DATA",176.112,38034,0)
+4026257^SCRIPTALK READER
+"DATA",176.112,38034,1)
+751270^^Y
+"DATA",176.112,38035,0)
+4026733^SET,INFUSION MINIMED #MMT-379
+"DATA",176.112,38035,1)
+751272^^Y
+"DATA",176.112,38036,0)
+4026734^SET,INFUSION MINIMED #MMT-381
+"DATA",176.112,38036,1)
+751273^^Y
+"DATA",176.112,38037,0)
+4026735^SET,INFUSION MINIMED #MMT-382
+"DATA",176.112,38037,1)
+751274^^Y
+"DATA",176.112,38038,0)
+4026377^THICK & EASY THICKEND APPLE JUICE (HONEY) LIQUID,ORAL
+"DATA",176.112,38038,1)
+751275^^Y
+"DATA",176.112,38039,0)
+4026374^THICK & EASY THICKEND APPLE JUICE (NECTAR) LIQUID,ORAL
+"DATA",176.112,38039,1)
+751276^^Y
+"DATA",176.112,38040,0)
+4026362^THICK & EASY THICKEND COFFEE (HONEY) PWDR PKT,12GM
+"DATA",176.112,38040,1)
+751277^^Y
+"DATA",176.112,38041,0)
+4026361^THICK & EASY THICKEND COFFEE (NECTAR) PWDR PKT,12GM
+"DATA",176.112,38041,1)
+751278^^Y
+"DATA",176.112,38042,0)
+4026376^THICK & EASY THICKEND CRANBERRY JUICE (HONEY) LIQUID,ORAL
+"DATA",176.112,38042,1)
+751279^^Y
+"DATA",176.112,38043,0)
+4026373^THICK & EASY THICKEND CRANBERRY JUICE (NECTAR) LIQUID,ORAL
+"DATA",176.112,38043,1)
+751280^^Y
+"DATA",176.112,38044,0)
+4026371^THICK & EASY THICKEND DAIRY (HONEY) LIQUID,ORAL
+"DATA",176.112,38044,1)
+751281^^Y
+"DATA",176.112,38045,0)
+4026370^THICK & EASY THICKEND DAIRY (NECTAR) LIQUID,ORAL
+"DATA",176.112,38045,1)
+751282^^Y
+"DATA",176.112,38046,0)
+4026379^THICK & EASY THICKEND HYDROLYTE (HONEY) LIQUID,ORAL
+"DATA",176.112,38046,1)
+751283^^Y
+"DATA",176.112,38047,0)
+4026378^THICK & EASY THICKEND HYDROLYTE (NECTAR) LIQUID,ORAL
+"DATA",176.112,38047,1)
+751284^^Y
+"DATA",176.112,38048,0)
+4026375^THICK & EASY THICKEND ORANGE JUICE (HONEY) LIQUID,ORAL
+"DATA",176.112,38048,1)
+751285^^Y
+"DATA",176.112,38049,0)
+4026372^THICK & EASY THICKEND ORANGE JUICE (NECTAR) LIQUID,ORAL
+"DATA",176.112,38049,1)
+751286^^Y
+"DATA",176.112,38050,0)
+4026359^THICK & EASY THICKEND TEA (HONEY) PWDR,PKT,12GM
+"DATA",176.112,38050,1)
+751287^^Y
+"DATA",176.112,38051,0)
+4026358^THICK & EASY THICKEND TEA (NECTAR) PWDR PKT,12GM
+"DATA",176.112,38051,1)
+751288^^Y
+"DATA",176.112,38052,0)
+4026585^TRACH CANNULA,SZ 8 SHLY #8-SIC
+"DATA",176.112,38052,1)
+751289^^Y
+"DATA",176.112,38053,0)
+4026317^TRANSMITTER PATCH MMT-7006
+"DATA",176.112,38053,1)
+751290^^Y
+"DATA",176.112,38054,0)
+4026387^TWOCAL HN LIQUID BUTTER PECAN
+"DATA",176.112,38054,1)
+751292^^Y
+"DATA",176.112,38055,0)
+4026582^UNDERPAD,BED 23IN X 36IN ALLEGIANCE #50460-236/X
+"DATA",176.112,38055,1)
+751293^^Y
+"DATA",176.112,38056,0)
+4026589^UNDERPAD,BED 23IN X 36IN KENDALL #1093
+"DATA",176.112,38056,1)
+751294^^Y
+"DATA",176.112,38057,0)
+4026336^UNDERPAD,BED EXTRA LARGE
+"DATA",176.112,38057,1)
+751295^^Y
+"DATA",176.112,38058,0)
+4026669^WIPE,TENS CLEAN-COTE SKIN DRESSING
+"DATA",176.112,38058,1)
+751297^^Y
+"DATA",176.112,38059,0)
+4026612^SYRINGE 10-12ML/NDL 20G 1IN
+"DATA",176.112,38059,1)
+751298^^Y
+"DATA",176.112,38060,0)
+4026646^SYRINGE 3ML/NDL 22G 1.25IN
+"DATA",176.112,38060,1)
+751299^^Y
+"DATA",176.112,38061,0)
+4026581^SYRINGE 3ML/NDL 25G 1.5IN
+"DATA",176.112,38061,1)
+751300^^Y
+"DATA",176.112,38062,0)
+4026619^COMPOUND BENZOIN TINCTURE SWAB,TOP
+"DATA",176.112,38062,1)
+751544^^Y
+"DATA",176.112,38063,0)
+4026390^INSULIN,GLARGINE,HUMAN 100 UNIT/ML INJ,SOLOSTAR,3ML
+"DATA",176.112,38063,1)
+751549^^Y
+"DATA",176.112,38064,0)
+4026685^KETOCONAZOLE 2% GEL/ZINC PYRITHIONE 1% SHAMPOO KIT
+"DATA",176.112,38064,1)
+751550^^Y
+"DATA",176.112,38065,0)
+4026557^LYBREL TAB,28
+"DATA",176.112,38065,1)
+751554^^Y
+"DATA",176.112,38066,0)
+4026666^MEDISENSE (GLUCOSE) MID CONTROL SOLN
+"DATA",176.112,38066,1)
+751555^^Y
+"DATA",176.112,38067,0)
+4026335^PURPOSE SOAP,BAR
+"DATA",176.112,38067,1)
+751560^^Y
+"DATA",176.112,38068,0)
+4026426^LAMOTRIGINE 25MG TAB,42/LAMOTRIGINE 100MG TAB,7,KIT
+"DATA",176.112,38068,1)
+751563^^Y
+"DATA",176.112,38069,0)
+4026455^SOMATROPIN (SAIZEN) 4MG/VIL INJ,CLICKEASY
+"DATA",176.112,38069,1)
+751564^^Y
+"DATA",176.112,38070,0)
+4026454^SOMATROPIN (SEROSTIM) 4MG/VIL INJ
+"DATA",176.112,38070,1)
+751566^^Y
+"DATA",176.112,38071,0)
+4026460^SOMATROPIN (SEROSTIM) 5MG/VIL INJ
+"DATA",176.112,38071,1)
+751568^^Y
+"DATA",176.112,38072,0)
+4026463^SOMATROPIN (SEROSTIM) 6MG/VIL INJ
+"DATA",176.112,38072,1)
+751570^^Y
+"DATA",176.112,38073,0)
+4026711^THEOPHYLLINE 200MG TAB,SA (PLIVA)
+"DATA",176.112,38073,1)
+751573^^Y
+"DATA",176.112,38074,0)
+4026562^THROMBIN 5000UNT/VIL SOLN,NASAL,KIT W/SYRINGE
+"DATA",176.112,38074,1)
+751575^^Y
+"DATA",176.112,38075,0)
+4026400^BIOTENE SENSITIVE TOOTHPASTE
+"DATA",176.112,38075,1)
+751579^^Y
+"DATA",176.112,38076,0)
+4025172^NORTREL TAB,28
+"DATA",176.112,38076,1)
+751870^^Y
+"DATA",176.112,38077,0)
+4025171^NECON 0.5/35 TAB,28
+"DATA",176.112,38077,1)
+751875^^Y
+"DATA",176.112,38078,0)
+4015280^NECON 1/35 TAB,28
+"DATA",176.112,38078,1)
+751879^^Y
+"DATA",176.112,38079,0)
+4015281^NECON 1/35 TAB,21
+"DATA",176.112,38079,1)
+751880^^Y
+"DATA",176.112,38080,0)
+4024748^LUTERA TAB,28
+"DATA",176.112,38080,1)
+751884^^Y
+"DATA",176.112,38081,0)
+4024884^LESSINA TAB,28
+"DATA",176.112,38081,1)
+751885^^Y
+"DATA",176.112,38082,0)
+4025580^LOESTRIN FE 24 TAB,28
+"DATA",176.112,38082,1)
+751887^^Y
+"DATA",176.112,38083,0)
+4005783^LOESTRIN FE 1/20 TAB,28
+"DATA",176.112,38083,1)
+751888^^Y
+"DATA",176.112,38084,0)
+4005261^LOESTRIN 21,1/20 TAB,21
+"DATA",176.112,38084,1)
+751889^^Y
+"DATA",176.112,38085,0)
+4025169^PORTIA TAB,28
+"DATA",176.112,38085,1)
+751890^^Y
+"DATA",176.112,38086,0)
+4017286^SEASONALE 30MCG/0.15MG TAB,EC,91
+"DATA",176.112,38086,1)
+751902^^Y
+"DATA",176.112,38087,0)
+4005784^LOESTRIN FE 1.5/30 TAB,28
+"DATA",176.112,38087,1)
+751903^^Y
+"DATA",176.112,38088,0)
+4005262^LOESTRIN 21,1.5/30 TAB,21
+"DATA",176.112,38088,1)
+751904^^Y
+"DATA",176.112,38089,0)
+4017033^TRINESSA TAB,28
+"DATA",176.112,38089,1)
+751905^^Y
+"DATA",176.112,38090,0)
+4012963^AZELASTINE HCL 137MCG/SPRAY INHL,NASAL,2 X 17ML KIT
+"DATA",176.112,38090,1)
+752314^^Y
+"DATA",176.112,38091,0)
+4015277^INSULIN,LISPRO,HUMAN 75/25 INJ,HUMALOG
+"DATA",176.112,38091,1)
+752388^^Y
+"DATA",176.112,38092,0)
+4010441^CALCIUM 334MG/MAGNESIUM 167MG TAB
+"DATA",176.112,38092,1)
+752428^^Y
+"DATA",176.112,38093,0)
+4017350^CALCIUM 500MG/MAGNESIUM 250MG/VITAMIN D 400 UNIT CAP
+"DATA",176.112,38093,1)
+752535^^Y
+"DATA",176.112,38094,0)
+4005977^ISOLYTE M/DEXTROSE 5% INJ
+"DATA",176.112,38094,1)
+752571^^Y
+"DATA",176.112,38095,0)
+4005982^ISOLYTE H/DEXTROSE 5% INJ
+"DATA",176.112,38095,1)
+752597^^Y
+"DATA",176.112,38096,0)
+4008978^MAGNESIUM 84MG TAB,SA
+"DATA",176.112,38096,1)
+752660^^Y
+"DATA",176.112,38097,0)
+4026587^URINARY ANTISEPTIC W/METHENAMINE 81MG TAB
+"DATA",176.112,38097,1)
+752817^^Y
+"DATA",176.112,38098,0)
+4005274^BREVICON TAB,21
+"DATA",176.112,38098,1)
+753264^^Y
+"DATA",176.112,38099,0)
+4005273^NORINYL 1+35 TAB,21
+"DATA",176.112,38099,1)
+753273^^Y
+"DATA",176.112,38100,0)
+4010555^DESOGEN TAB,28
+"DATA",176.112,38100,1)
+753367^^Y
+"DATA",176.112,38101,0)
+4005254^MODICON TAB,28
+"DATA",176.112,38101,1)
+753396^^Y
+"DATA",176.112,38102,0)
+4005253^MODICON TAB,21
+"DATA",176.112,38102,1)
+753398^^Y
+"DATA",176.112,38103,0)
+4024548^LAMOTRIGINE 25MG TAB,84/LAMOTRIGINE 100MG TAB,14,KIT
+"DATA",176.112,38103,1)
+753451^^Y
+"DATA",176.112,38104,0)
+4005264^OVCON-50 TAB,28
+"DATA",176.112,38104,1)
+753477^^Y
+"DATA",176.112,38105,0)
+4024534^TRI-PREVIFEM TAB,28
+"DATA",176.112,38105,1)
+753479^^Y
+"DATA",176.112,38106,0)
+4026176^FEMCON FE TAB,CHEWABLE,28
+"DATA",176.112,38106,1)
+753480^^Y
+"DATA",176.112,38107,0)
+4025001^SPRINTEC TAB,28
+"DATA",176.112,38107,1)
+753481^^Y
+"DATA",176.112,38108,0)
+4016799^APRI TAB,28
+"DATA",176.112,38108,1)
+753482^^Y
+"DATA",176.112,38109,0)
+4025178^KELNOR 1/35 TAB,28
+"DATA",176.112,38109,1)
+753483^^Y
+"DATA",176.112,38110,0)
+4013627^LEVLITE TAB,28
+"DATA",176.112,38110,1)
+753485^^Y
+"DATA",176.112,38111,0)
+4013748^LEVLITE TAB,21
+"DATA",176.112,38111,1)
+753486^^Y
+"DATA",176.112,38112,0)
+4003206^LEVLEN TAB,28
+"DATA",176.112,38112,1)
+753532^^Y
+"DATA",176.112,38113,0)
+4003205^LEVLEN TAB,21
+"DATA",176.112,38113,1)
+753533^^Y
+"DATA",176.112,38114,0)
+4025177^MICROGESTIN FE 1/20 TAB,28
+"DATA",176.112,38114,1)
+753539^^Y
+"DATA",176.112,38115,0)
+4025176^MICROGESTIN 1/20 TAB,21
+"DATA",176.112,38115,1)
+753540^^Y
+"DATA",176.112,38116,0)
+4025167^RECLIPSEN TAB,28
+"DATA",176.112,38116,1)
+753543^^Y
+"DATA",176.112,38117,0)
+4025715^SRONYX TAB,28
+"DATA",176.112,38117,1)
+753544^^Y
+"DATA",176.112,38118,0)
+4005276^NORETHIN 1/35 E TAB,21
+"DATA",176.112,38118,1)
+753549^^Y
+"DATA",176.112,38119,0)
+4005277^NORETHIN 1/35 E TAB,28
+"DATA",176.112,38119,1)
+753550^^Y
+"DATA",176.112,38120,0)
+4007290^FLUORIDE 1.23% GEL,DENT
+"DATA",176.112,38120,1)
+753578^^Y
+"DATA",176.112,38121,0)
+4007291^FLUORIDE 1.23% SOLN,DENT
+"DATA",176.112,38121,1)
+753580^^Y
+"DATA",176.112,38122,0)
+4007260^ALLERGENIC EXTRACT, ALTERNARIA MOLD 10000 PNU/ML INJ
+"DATA",176.112,38122,1)
+753623^^Y
+"DATA",176.112,38123,0)
+4004483^ALLERGENIC EXTRACT, CATTLE EPITHELIA 20000PNU/ML INJ
+"DATA",176.112,38123,1)
+753860^^Y
+"DATA",176.112,38124,0)
+4004468^ALLERGENIC EXTRACT, TREE, OLIVE 20000PNU/ML INJ
+"DATA",176.112,38124,1)
+753930^^Y
+"DATA",176.112,38125,0)
+4008030^ALLERGENIC EXTRACT, SHORT RAGWEED 1 UNT / TALL RAGWEED 1 UNT INJ
+"DATA",176.112,38125,1)
+753935^^Y
+"DATA",176.112,38126,0)
+4004463^ALLERGENIC EXTRACT, TREE, MAPLE 10000PNU/ML INJ
+"DATA",176.112,38126,1)
+753939^^Y
+"DATA",176.112,38127,0)
+4005123^CORTICOTROPIN 25UNT/VIL INJ
+"DATA",176.112,38127,1)
+754283^^Y
+"DATA",176.112,38128,0)
+4009403^ANTIHEMOPHILIC FACTOR,RECOMBINANT 1000UNT/VIL INJ
+"DATA",176.112,38128,1)
+754384^^Y
+"DATA",176.112,38129,0)
+4009405^ANTITHROMBIN III,HUMAN 500UNT/VIL INJ
+"DATA",176.112,38129,1)
+754410^^Y
+"DATA",176.112,38130,0)
+4005052^CHYMOPAPAIN 4000UNT/VIL INJ
+"DATA",176.112,38130,1)
+754434^^Y
+"DATA",176.112,38131,0)
+4001993^DIPHTHERIA ANTITOXIN,EQUINE 20000UNT/VIL INJ
+"DATA",176.112,38131,1)
+754437^^Y
+"DATA",176.112,38132,0)
+4007986^DIPHTHERIA TOXOID 1UNT INJ
+"DATA",176.112,38132,1)
+754440^^Y
+"DATA",176.112,38133,0)
+4002288^INTERFERON ALFA-2A,RECOMBINANT 18 MILLION UNT/VIL INJ
+"DATA",176.112,38133,1)
+754459^^Y
+"DATA",176.112,38134,0)
+4016622^APREPITANT 125MG X1/80MG X2 CAP,PKT,3
+"DATA",176.112,38134,1)
+754508^^Y
+"DATA",176.112,38135,0)
+4016875^MEMANTINE HCL 5MG/10MG TAB TITRATION PAK,49
+"DATA",176.112,38135,1)
+754513^^Y
+"DATA",176.112,38136,0)
+4010437^SCOT-TUSSIN ORIGINAL (SF) SYRUP
+"DATA",176.112,38136,1)
+754869^^Y
+"DATA",176.112,38137,0)
+4010436^SCOT-TUSSIN ORIGINAL SYRUP
+"DATA",176.112,38137,1)
+754869^^Y
+"DATA",176.112,38138,0)
+4005440^P-V TUSSIN SYRUP
+"DATA",176.112,38138,1)
+755210^^Y
+"DATA",176.112,38139,0)
+4005441^P-V TUSSIN (REID PROVIDENT) SYRUP
+"DATA",176.112,38139,1)
+755210^^Y
+"DATA",176.112,38140,0)
+4010069^ENULOSE SYRUP
+"DATA",176.112,38140,1)
+756967^^Y
+"DATA",176.112,38141,0)
+4026890^VITAMIN B COMPLEX W/C & FOLIC (DEXFOL) TAB
+"DATA",176.112,38141,1)
+757767^^Y
+"DATA",176.112,38142,0)
+4026924^CALCIUM/MAGNESIUM/VITAMIN D/ZINC TAB
+"DATA",176.112,38142,1)
+757779^^Y
+"DATA",176.112,38143,0)
+4026949^CHLORIDE 287MG/POTASSIUM 15MG/SODIUIM 180MG TAB
+"DATA",176.112,38143,1)
+757783^^Y
+"DATA",176.112,38144,0)
+4026918^HYALURONIC ACID (JUVEDERM ULTRA PLUS) SYR
+"DATA",176.112,38144,1)
+757804^^Y
+"DATA",176.112,38145,0)
+4026919^HYALURONIC ACID (JUVEDERM ULTRA) SYR
+"DATA",176.112,38145,1)
+757805^^Y
+"DATA",176.112,38146,0)
+4026749^PETROLATUM (SECURA) OINT,TOP
+"DATA",176.112,38146,1)
+757827^^Y
+"DATA",176.112,38147,0)
+4026895^BISACODYL 5MG TAB #2/PEG-3350/ELECTROLYTES KIT
+"DATA",176.112,38147,1)
+757967^^Y
+"DATA",176.112,38148,0)
+4013227^PREVPAC PATIENT THERAPY PAK
+"DATA",176.112,38148,1)
+757969^^Y
+"DATA",176.112,38149,0)
+4026816^POUCH,CLOSED,NEW IMAGE H#18362
+"DATA",176.112,38149,1)
+757970^^Y
+"DATA",176.112,38150,0)
+4026817^POUCH,CLOSED,NEW IMAGE H#18363
+"DATA",176.112,38150,1)
+757971^^Y
+"DATA",176.112,38151,0)
+4026818^POUCH,CLOSED,NEW IMAGE H#18364
+"DATA",176.112,38151,1)
+757972^^Y
+"DATA",176.112,38152,0)
+4026833^POUCH,DRAINABLE,ASSURA COLOPLAST #13924
+"DATA",176.112,38152,1)
+757973^^Y
+"DATA",176.112,38153,0)
+4026832^POUCH,DRAINABLE,ASSURA COLOPLAST #13925
+"DATA",176.112,38153,1)
+757974^^Y
+"DATA",176.112,38154,0)
+4026831^POUCH,DRAINABLE,ASSURA COLOPLAST #13926
+"DATA",176.112,38154,1)
+757975^^Y
+"DATA",176.112,38155,0)
+4026828^POUCH,DRAINABLE,ASSURA COLOPLAST #13974
+"DATA",176.112,38155,1)
+757976^^Y
+"DATA",176.112,38156,0)
+4026829^POUCH,DRAINABLE,ASSURA COLOPLAST #13975
+"DATA",176.112,38156,1)
+757977^^Y
+"DATA",176.112,38157,0)
+4026830^POUCH,DRAINABLE,ASSURA COLOPLAST #13976
+"DATA",176.112,38157,1)
+757978^^Y
+"DATA",176.112,38158,0)
+4026825^POUCH,DRAINABLE,ASSURA COLOPLAST #13984
+"DATA",176.112,38158,1)
+757979^^Y
+"DATA",176.112,38159,0)
+4026826^POUCH,DRAINABLE,ASSURA COLOPLAST #13985
+"DATA",176.112,38159,1)
+757980^^Y
+"DATA",176.112,38160,0)
+4026827^POUCH,DRAINABLE,ASSURA COLOPLAST #13986
+"DATA",176.112,38160,1)
+757981^^Y
+"DATA",176.112,38161,0)
+4026844^POUCH,DRAINABLE,ASSURA COLOPLAST #14103
+"DATA",176.112,38161,1)
+757982^^Y
+"DATA",176.112,38162,0)
+4026845^POUCH,DRAINABLE,ASSURA COLOPLAST #14163
+"DATA",176.112,38162,1)
+757983^^Y
+"DATA",176.112,38163,0)
+4026846^POUCH,DRAINABLE,ASSURA COLOPLAST #14164
+"DATA",176.112,38163,1)
+757984^^Y
+"DATA",176.112,38164,0)
+4026847^POUCH,DRAINABLE,ASSURA COLOPLAST #14165
+"DATA",176.112,38164,1)
+757985^^Y
+"DATA",176.112,38165,0)
+4026848^POUCH,DRAINABLE,ASSURA COLOPLAST #14166
+"DATA",176.112,38165,1)
+757986^^Y
+"DATA",176.112,38166,0)
+4026838^POUCH,DRAINABLE,ASSURA COLOPLAST #14414
+"DATA",176.112,38166,1)
+757987^^Y
+"DATA",176.112,38167,0)
+4026839^POUCH,DRAINABLE,ASSURA COLOPLAST #14415
+"DATA",176.112,38167,1)
+757988^^Y
+"DATA",176.112,38168,0)
+4026840^POUCH,DRAINABLE,ASSURA COLOPLAST #14421
+"DATA",176.112,38168,1)
+757989^^Y
+"DATA",176.112,38169,0)
+4026841^POUCH,DRAINABLE,ASSURA COLOPLAST #14422
+"DATA",176.112,38169,1)
+757990^^Y
+"DATA",176.112,38170,0)
+4026842^POUCH,DRAINABLE,ASSURA COLOPLAST #14423
+"DATA",176.112,38170,1)
+757991^^Y
+"DATA",176.112,38171,0)
+4026843^POUCH,DRAINABLE,ASSURA COLOPLAST #14424
+"DATA",176.112,38171,1)
+757992^^Y
+"DATA",176.112,38172,0)
+4026837^POUCH,DRAINABLE,ASSURA COLOPLAST #15861
+"DATA",176.112,38172,1)
+757993^^Y
+"DATA",176.112,38173,0)
+4026834^POUCH,DRAINABLE,ASSURA COLOPLAST #15984
+"DATA",176.112,38173,1)
+757994^^Y
+"DATA",176.112,38174,0)
+4026835^POUCH,DRAINABLE,ASSURA COLOPLAST #15985
+"DATA",176.112,38174,1)
+757995^^Y
+"DATA",176.112,38175,0)
+4026836^POUCH,DRAINABLE,ASSURA COLOPLAST #15986
+"DATA",176.112,38175,1)
+757996^^Y
+"DATA",176.112,38176,0)
+4026805^POUCH,DRAINABLE,ESTEEM SYNERGY C#4039-95
+"DATA",176.112,38176,1)
+757997^^Y
+"DATA",176.112,38177,0)
+4026806^POUCH,DRAINABLE,ESTEEM SYNERGY C#4039-97
+"DATA",176.112,38177,1)
+757998^^Y
+"DATA",176.112,38178,0)
+4026797^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-10
+"DATA",176.112,38178,1)
+757999^^Y
+"DATA",176.112,38179,0)
+4026798^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-11
+"DATA",176.112,38179,1)
+758000^^Y
+"DATA",176.112,38180,0)
+4026799^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-12
+"DATA",176.112,38180,1)
+758001^^Y
+"DATA",176.112,38181,0)
+4026800^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-13
+"DATA",176.112,38181,1)
+758002^^Y
+"DATA",176.112,38182,0)
+4026801^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-14
+"DATA",176.112,38182,1)
+758003^^Y
+"DATA",176.112,38183,0)
+4026802^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-15
+"DATA",176.112,38183,1)
+758004^^Y
+"DATA",176.112,38184,0)
+4026803^POUCH,DRAINABLE,ESTEEM SYNERGY C#4133-53
+"DATA",176.112,38184,1)
+758005^^Y
+"DATA",176.112,38185,0)
+4026804^POUCH,DRAINABLE,ESTEEM SYNERGY C#4133-54
+"DATA",176.112,38185,1)
+758006^^Y
+"DATA",176.112,38186,0)
+4026752^POUCH,DRAINABLE,MICROSKIN CYMED #81300
+"DATA",176.112,38186,1)
+758007^^Y
+"DATA",176.112,38187,0)
+4026753^POUCH,DRAINABLE,MICROSKIN CYMED #81322
+"DATA",176.112,38187,1)
+758008^^Y
+"DATA",176.112,38188,0)
+4026754^POUCH,DRAINABLE,MICROSKIN CYMED #81325
+"DATA",176.112,38188,1)
+758009^^Y
+"DATA",176.112,38189,0)
+4026755^POUCH,DRAINABLE,MICROSKIN CYMED #81329
+"DATA",176.112,38189,1)
+758010^^Y
+"DATA",176.112,38190,0)
+4026756^POUCH,DRAINABLE,MICROSKIN CYMED #81332
+"DATA",176.112,38190,1)
+758011^^Y
+"DATA",176.112,38191,0)
+4026757^POUCH,DRAINABLE,MICROSKIN CYMED #81335
+"DATA",176.112,38191,1)
+758012^^Y
+"DATA",176.112,38192,0)
+4026758^POUCH,DRAINABLE,MICROSKIN CYMED #81338
+"DATA",176.112,38192,1)
+758013^^Y
+"DATA",176.112,38193,0)
+4026759^POUCH,DRAINABLE,MICROSKIN CYMED #81400
+"DATA",176.112,38193,1)
+758014^^Y
+"DATA",176.112,38194,0)
+4026760^POUCH,DRAINABLE,MICROSKIN CYMED #81422
+"DATA",176.112,38194,1)
+758015^^Y
+"DATA",176.112,38195,0)
+4026761^POUCH,DRAINABLE,MICROSKIN CYMED #81425
+"DATA",176.112,38195,1)
+758016^^Y
+"DATA",176.112,38196,0)
+4026762^POUCH,DRAINABLE,MICROSKIN CYMED #81429
+"DATA",176.112,38196,1)
+758017^^Y
+"DATA",176.112,38197,0)
+4026763^POUCH,DRAINABLE,MICROSKIN CYMED #81432
+"DATA",176.112,38197,1)
+758018^^Y
+"DATA",176.112,38198,0)
+4012976^HELIDAC THERAPY PACK
+"DATA",176.112,38198,1)
+758020^^Y
+"DATA",176.112,38199,0)
+4026764^POUCH,DRAINABLE,MICROSKIN CYMED #81435
+"DATA",176.112,38199,1)
+758021^^Y
+"DATA",176.112,38200,0)
+4026765^POUCH,DRAINABLE,MICROSKIN CYMED #81438
+"DATA",176.112,38200,1)
+758022^^Y
+"DATA",176.112,38201,0)
+4026766^POUCH,DRAINABLE,MICROSKIN CYMED #86300
+"DATA",176.112,38201,1)
+758023^^Y
+"DATA",176.112,38202,0)
+4026768^POUCH,DRAINABLE,MICROSKIN CYMED #86300E
+"DATA",176.112,38202,1)
+758024^^Y
+"DATA",176.112,38203,0)
+4015885^INTERFERON BETA-1A 44MCG/0.5ML SYR INJ (REBIF)
+"DATA",176.112,38203,1)
+758027^^Y
+"DATA",176.112,38204,0)
+4015884^INTERFERON BETA-1A 22MCG/0.5ML SYR INJ (REBIF)
+"DATA",176.112,38204,1)
+758032^^Y
+"DATA",176.112,38205,0)
+4026767^POUCH,DRAINABLE,MICROSKIN CYMED #86300W
+"DATA",176.112,38205,1)
+758047^^Y
+"DATA",176.112,38206,0)
+4026809^POUCH,DRAINABLE,NEW IMAGE H#18002
+"DATA",176.112,38206,1)
+758048^^Y
+"DATA",176.112,38207,0)
+4026810^POUCH,DRAINABLE,NEW IMAGE H#18003
+"DATA",176.112,38207,1)
+758049^^Y
+"DATA",176.112,38208,0)
+4026811^POUCH,DRAINABLE,NEW IMAGE H#18004
+"DATA",176.112,38208,1)
+758050^^Y
+"DATA",176.112,38209,0)
+4026812^POUCH,DRAINABLE,NEW IMAGE H#18006
+"DATA",176.112,38209,1)
+758051^^Y
+"DATA",176.112,38210,0)
+4026813^POUCH,DRAINABLE,NEW IMAGE H#18112
+"DATA",176.112,38210,1)
+758052^^Y
+"DATA",176.112,38211,0)
+4026814^POUCH,DRAINABLE,NEW IMAGE H#18113
+"DATA",176.112,38211,1)
+758053^^Y
+"DATA",176.112,38212,0)
+4026815^POUCH,DRAINABLE,NEW IMAGE H#18114
+"DATA",176.112,38212,1)
+758054^^Y
+"DATA",176.112,38213,0)
+4026794^POUCH,DRAINABLE,NU-HOPE #7104
+"DATA",176.112,38213,1)
+758055^^Y
+"DATA",176.112,38214,0)
+4026793^POUCH,DRAINABLE,NU-HOPE #7105
+"DATA",176.112,38214,1)
+758056^^Y
+"DATA",176.112,38215,0)
+4026792^POUCH,DRAINABLE,NU-HOPE #7106
+"DATA",176.112,38215,1)
+758057^^Y
+"DATA",176.112,38216,0)
+4026791^POUCH,DRAINABLE,NU-HOPE #7107
+"DATA",176.112,38216,1)
+758058^^Y
+"DATA",176.112,38217,0)
+4026790^POUCH,DRAINABLE,NU-HOPE #7108
+"DATA",176.112,38217,1)
+758059^^Y
+"DATA",176.112,38218,0)
+4026795^POUCH,DRAINABLE,NU-HOPE #7109
+"DATA",176.112,38218,1)
+758060^^Y
+"DATA",176.112,38219,0)
+4026796^POUCH,DRAINABLE,NU-HOPE #7110
+"DATA",176.112,38219,1)
+758061^^Y
+"DATA",176.112,38220,0)
+4026786^POUCH,DRAINABLE,NU-HOPE #7244
+"DATA",176.112,38220,1)
+758062^^Y
+"DATA",176.112,38221,0)
+4026787^POUCH,DRAINABLE,NU-HOPE #7254
+"DATA",176.112,38221,1)
+758063^^Y
+"DATA",176.112,38222,0)
+4026788^POUCH,DRAINABLE,NU-HOPE #7264
+"DATA",176.112,38222,1)
+758064^^Y
+"DATA",176.112,38223,0)
+4026789^POUCH,DRAINABLE,NU-HOPE #7264-DC
+"DATA",176.112,38223,1)
+758065^^Y
+"DATA",176.112,38224,0)
+4026784^POUCH,DRAINABLE,SENSURA COLOPLAST #15480
+"DATA",176.112,38224,1)
+758066^^Y
+"DATA",176.112,38225,0)
+4026785^POUCH,DRAINABLE,SENSURA COLOPLAST #15484
+"DATA",176.112,38225,1)
+758067^^Y
+"DATA",176.112,38226,0)
+4026769^POUCH,DRAINABLE,SENSURA COLOPLAST #15521
+"DATA",176.112,38226,1)
+758068^^Y
+"DATA",176.112,38227,0)
+4026770^POUCH,DRAINABLE,SENSURA COLOPLAST #15522
+"DATA",176.112,38227,1)
+758069^^Y
+"DATA",176.112,38228,0)
+4026771^POUCH,DRAINABLE,SENSURA COLOPLAST #15523
+"DATA",176.112,38228,1)
+758070^^Y
+"DATA",176.112,38229,0)
+4026772^POUCH,DRAINABLE,SENSURA COLOPLAST #15524
+"DATA",176.112,38229,1)
+758071^^Y
+"DATA",176.112,38230,0)
+4026773^POUCH,DRAINABLE,SENSURA COLOPLAST #15531
+"DATA",176.112,38230,1)
+758072^^Y
+"DATA",176.112,38231,0)
+4026774^POUCH,DRAINABLE,SENSURA COLOPLAST #15532
+"DATA",176.112,38231,1)
+758073^^Y
+"DATA",176.112,38232,0)
+4026775^POUCH,DRAINABLE,SENSURA COLOPLAST #15533
+"DATA",176.112,38232,1)
+758074^^Y
+"DATA",176.112,38233,0)
+4026776^POUCH,DRAINABLE,SENSURA COLOPLAST #15534
+"DATA",176.112,38233,1)
+758075^^Y
+"DATA",176.112,38234,0)
+4026777^POUCH,DRAINABLE,SENSURA COLOPLAST #15606
+"DATA",176.112,38234,1)
+758076^^Y
+"DATA",176.112,38235,0)
+4026781^POUCH,DRAINABLE,SENSURA COLOPLAST #15608
+"DATA",176.112,38235,1)
+758077^^Y
+"DATA",176.112,38236,0)
+4026778^POUCH,DRAINABLE,SENSURA COLOPLAST #15622
+"DATA",176.112,38236,1)
+758078^^Y
+"DATA",176.112,38237,0)
+4026779^POUCH,DRAINABLE,SENSURA COLOPLAST #15623
+"DATA",176.112,38237,1)
+758079^^Y
+"DATA",176.112,38238,0)
+4026780^POUCH,DRAINABLE,SENSURA COLOPLAST #15624
+"DATA",176.112,38238,1)
+758080^^Y
+"DATA",176.112,38239,0)
+4026782^POUCH,DRAINABLE,SENSURA COLOPLAST #15633
+"DATA",176.112,38239,1)
+758081^^Y
+"DATA",176.112,38240,0)
+4026783^POUCH,DRAINABLE,SENSURA COLOPLAST #15634
+"DATA",176.112,38240,1)
+758082^^Y
+"DATA",176.112,38241,0)
+4026866^POUCH,DRAINABLE,SUR-FIT C#4040-25
+"DATA",176.112,38241,1)
+758083^^Y
+"DATA",176.112,38242,0)
+4026867^POUCH,DRAINABLE,SUR-FIT C#4040-26
+"DATA",176.112,38242,1)
+758084^^Y
+"DATA",176.112,38243,0)
+4026865^POUCH,DRAINABLE,SUR-FIT C#4040-27
+"DATA",176.112,38243,1)
+758085^^Y
+"DATA",176.112,38244,0)
+4026868^POUCH,DRAINABLE,SUR-FIT C#4040-28
+"DATA",176.112,38244,1)
+758086^^Y
+"DATA",176.112,38245,0)
+4026936^POUCH,OSTOMY,ACTIVE LIFE C#1253-38
+"DATA",176.112,38245,1)
+758087^^Y
+"DATA",176.112,38246,0)
+4026937^POUCH,OSTOMY,ACTIVE LIFE C#1253-39
+"DATA",176.112,38246,1)
+758088^^Y
+"DATA",176.112,38247,0)
+4026938^POUCH,OSTOMY,ACTIVE LIFE C#1253-40
+"DATA",176.112,38247,1)
+758089^^Y
+"DATA",176.112,38248,0)
+4026939^POUCH,OSTOMY,ACTIVE LIFE C#1253-41
+"DATA",176.112,38248,1)
+758090^^Y
+"DATA",176.112,38249,0)
+4026940^POUCH,OSTOMY,ACTIVE LIFE C#1253-42
+"DATA",176.112,38249,1)
+758091^^Y
+"DATA",176.112,38250,0)
+4026941^POUCH,OSTOMY,ACTIVE LIFE C#1253-43
+"DATA",176.112,38250,1)
+758092^^Y
+"DATA",176.112,38251,0)
+4026942^POUCH,OSTOMY,ACTIVE LIFE C#1253-44
+"DATA",176.112,38251,1)
+758093^^Y
+"DATA",176.112,38252,0)
+4026959^POUCH,UROSTOMY,ACTIVE LIFE C#1253-61
+"DATA",176.112,38252,1)
+758094^^Y
+"DATA",176.112,38253,0)
+4026958^POUCH,UROSTOMY,ACTIVE LIFE C#1253-62
+"DATA",176.112,38253,1)
+758095^^Y
+"DATA",176.112,38254,0)
+4026957^POUCH,UROSTOMY,ACTIVE LIFE C#1253-63
+"DATA",176.112,38254,1)
+758096^^Y
+"DATA",176.112,38255,0)
+4026951^POUCH,UROSTOMY,ACTIVE LIFE C#1253-64
+"DATA",176.112,38255,1)
+758097^^Y
+"DATA",176.112,38256,0)
+4026956^POUCH,UROSTOMY,ACTIVE LIFE C#1253-65
+"DATA",176.112,38256,1)
+758098^^Y
+"DATA",176.112,38257,0)
+4026955^POUCH,UROSTOMY,ACTIVE LIFE C#1253-66
+"DATA",176.112,38257,1)
+758099^^Y
+"DATA",176.112,38258,0)
+4026952^POUCH,UROSTOMY,ACTIVE LIFE C#1253-67
+"DATA",176.112,38258,1)
+758100^^Y
+"DATA",176.112,38259,0)
+4026954^POUCH,UROSTOMY,ACTIVE LIFE C#1253-68
+"DATA",176.112,38259,1)
+758101^^Y
+"DATA",176.112,38260,0)
+4026953^POUCH,UROSTOMY,ACTIVE LIFE C#1253-69
+"DATA",176.112,38260,1)
+758102^^Y
+"DATA",176.112,38261,0)
+4026903^BANDAGE,ADHESIVE FLEXIBLE KNUCKLE & FINGERTIP
+"DATA",176.112,38261,1)
+758103^^Y
+"DATA",176.112,38262,0)
+4026858^BARRIER,ASSURA COLOPLAST #14232
+"DATA",176.112,38262,1)
+758104^^Y
+"DATA",176.112,38263,0)
+4026901^BARRIER,ASSURA COLOPLAST #14233
+"DATA",176.112,38263,1)
+758105^^Y
+"DATA",176.112,38264,0)
+4026859^BARRIER,ASSURA COLOPLAST #14234
+"DATA",176.112,38264,1)
+758106^^Y
+"DATA",176.112,38265,0)
+4026860^BARRIER,ASSURA COLOPLAST #14235
+"DATA",176.112,38265,1)
+758107^^Y
+"DATA",176.112,38266,0)
+4026861^BARRIER,ASSURA COLOPLAST #14236
+"DATA",176.112,38266,1)
+758108^^Y
+"DATA",176.112,38267,0)
+4026862^BARRIER,ASSURA COLOPLAST #14237
+"DATA",176.112,38267,1)
+758109^^Y
+"DATA",176.112,38268,0)
+4026882^UNDERGARMENT,TENA SMALL MESH PANTS
+"DATA",176.112,38268,1)
+758110^^Y
+"DATA",176.112,38269,0)
+4026876^UNDERGARMENT,TENA X-LARGE MESH PANTS
+"DATA",176.112,38269,1)
+758111^^Y
+"DATA",176.112,38270,0)
+4026863^BARRIER,ASSURA COLOPLAST #14238
+"DATA",176.112,38270,1)
+758112^^Y
+"DATA",176.112,38271,0)
+4026864^BARRIER,ASSURA COLOPLAST #14239
+"DATA",176.112,38271,1)
+758113^^Y
+"DATA",176.112,38272,0)
+4026855^BARRIER,ASSURA COLOPLAST #14251
+"DATA",176.112,38272,1)
+758114^^Y
+"DATA",176.112,38273,0)
+4026902^BARRIER,ASSURA COLOPLAST #14254
+"DATA",176.112,38273,1)
+758115^^Y
+"DATA",176.112,38274,0)
+4026854^BARRIER,ASSURA COLOPLAST #14255
+"DATA",176.112,38274,1)
+758116^^Y
+"DATA",176.112,38275,0)
+4026856^BARRIER,ASSURA COLOPLAST #14257
+"DATA",176.112,38275,1)
+758117^^Y
+"DATA",176.112,38276,0)
+4026857^BARRIER,ASSURA COLOPLAST #14258
+"DATA",176.112,38276,1)
+758118^^Y
+"DATA",176.112,38277,0)
+4026914^DRESSING,DUODERM SIGNAL 4IN X 4IN C#4033-26
+"DATA",176.112,38277,1)
+758119^^Y
+"DATA",176.112,38278,0)
+4026915^DRESSING,DUODERM SIGNAL 5.5IN X 5.5IN C#4033-27
+"DATA",176.112,38278,1)
+758120^^Y
+"DATA",176.112,38279,0)
+4026916^DRESSING,DUODERM SIGNAL 8IN X 8IN C#4033-28
+"DATA",176.112,38279,1)
+758121^^Y
+"DATA",176.112,38280,0)
+4026911^DRESSING,DUODERM SIGNAL HEEL 7.5IN X 8IN C#4105-00
+"DATA",176.112,38280,1)
+758122^^Y
+"DATA",176.112,38281,0)
+4026909^DRESSING,DUODERM SIGNAL OVAL 4.5IN X 7.5IN C#4105-10
+"DATA",176.112,38281,1)
+758123^^Y
+"DATA",176.112,38282,0)
+4026910^DRESSING,DUODERM SIGNAL SACRAL 8IN X 9IN C#4105-01
+"DATA",176.112,38282,1)
+758124^^Y
+"DATA",176.112,38283,0)
+4026912^DRESSING,DUODERM SIGNAL TRIANGLE 6IN X 7IN C#4033-32
+"DATA",176.112,38283,1)
+758125^^Y
+"DATA",176.112,38284,0)
+4026913^DRESSING,DUODERM SIGNAL TRIANGLE 8IN X 9IN C#4033-33
+"DATA",176.112,38284,1)
+758126^^Y
+"DATA",176.112,38285,0)
+4026886^DRESSING,MEPILEX LITE 2.4IN X 3.4IN #284000
+"DATA",176.112,38285,1)
+758127^^Y
+"DATA",176.112,38286,0)
+4026885^DRESSING,MEPILEX LITE 4IN X 4IN #284100
+"DATA",176.112,38286,1)
+758128^^Y
+"DATA",176.112,38287,0)
+4026887^DRESSING,MEPILEX LITE 6IN X 6IN #284300
+"DATA",176.112,38287,1)
+758129^^Y
+"DATA",176.112,38288,0)
+4026888^DRESSING,MEPILEX LITE 8IN X 20IN #284500
+"DATA",176.112,38288,1)
+758130^^Y
+"DATA",176.112,38289,0)
+4026897^TRACH CANNULA,SZ 10 SHLY #10-DICFEN
+"DATA",176.112,38289,1)
+758131^^Y
+"DATA",176.112,38290,0)
+4026824^TRACH CANNULA,SZ 10 SMITH DIC#526100
+"DATA",176.112,38290,1)
+758132^^Y
+"DATA",176.112,38291,0)
+4026820^TRACH CANNULA,SZ 5 SMITH DIC#526050
+"DATA",176.112,38291,1)
+758133^^Y
+"DATA",176.112,38292,0)
+4026819^TRACH CANNULA,SZ 6 SMITH DIC#526060
+"DATA",176.112,38292,1)
+758134^^Y
+"DATA",176.112,38293,0)
+4026821^TRACH CANNULA,SZ 7 SMITH DIC#526070
+"DATA",176.112,38293,1)
+758135^^Y
+"DATA",176.112,38294,0)
+4026822^TRACH CANNULA,SZ 8 SMITH DIC#526080
+"DATA",176.112,38294,1)
+758136^^Y
+"DATA",176.112,38295,0)
+4026823^TRACH CANNULA,SZ 9 SMITH DIC#526090
+"DATA",176.112,38295,1)
+758137^^Y
+"DATA",176.112,38296,0)
+4026878^UNDERGARMENT,TENA LARGE MESH PANTS
+"DATA",176.112,38296,1)
+758139^^Y
+"DATA",176.112,38297,0)
+4026881^UNDERGARMENT,TENA MEDIUM MESH PANTS
+"DATA",176.112,38297,1)
+758140^^Y
+"DATA",176.112,38298,0)
+4026853^BAG,LEG BARD #150732
+"DATA",176.112,38298,1)
+758150^^Y
+"DATA",176.112,38299,0)
+4026899^CATHETER HOLDER,FOLEY DALE #316
+"DATA",176.112,38299,1)
+758151^^Y
+"DATA",176.112,38300,0)
+4026900^CATHETER HOLDER,FOLEY DALE #330
+"DATA",176.112,38300,1)
+758152^^Y
+"DATA",176.112,38301,0)
+4026943^FILTER NEEDLE,18G,5 MICRON,1 1/2IN
+"DATA",176.112,38301,1)
+758155^^Y
+"DATA",176.112,38302,0)
+4026898^HOSE ANTI-EMBOLISM KNEE LEN LRG-SHORT
+"DATA",176.112,38302,1)
+758156^^Y
+"DATA",176.112,38303,0)
+4026889^PASTE,STRIP COLOPLAST #2655
+"DATA",176.112,38303,1)
+758183^^Y
+"DATA",176.112,38304,0)
+4026883^PRODIGY VOICE (GLUCOSE) TEST STRIP
+"DATA",176.112,38304,1)
+758184^^Y
+"DATA",176.112,38305,0)
+4026849^SET,INFUSION CLEO 90 6MM X 24IN
+"DATA",176.112,38305,1)
+758185^^Y
+"DATA",176.112,38306,0)
+4026850^SET,INFUSION CLEO 90 6MM X 31IN
+"DATA",176.112,38306,1)
+758186^^Y
+"DATA",176.112,38307,0)
+4026851^SET,INFUSION CLEO 90 9MM X 24IN
+"DATA",176.112,38307,1)
+758187^^Y
+"DATA",176.112,38308,0)
+4026852^SET,INFUSION CLEO 90 9MM X 31IN
+"DATA",176.112,38308,1)
+758188^^Y
+"DATA",176.112,38309,0)
+4026748^TRACH TUBE,SZ 4 CUFFLESS SHLY #4-DCFS
+"DATA",176.112,38309,1)
+758189^^Y
+"DATA",176.112,38310,0)
+4026892^TRACH TUBE,SZ 6 CUFFLESS SHLY #6-DCFS
+"DATA",176.112,38310,1)
+758190^^Y
+"DATA",176.112,38311,0)
+4026891^TRACH TUBE,SZ 8 CUFFLESS SHLY #8-DCFS
+"DATA",176.112,38311,1)
+758191^^Y
+"DATA",176.112,38312,0)
+4026884^TUBE FEEDING SET COMPAT #199313
+"DATA",176.112,38312,1)
+758192^^Y
+"DATA",176.112,38313,0)
+4017053^LANSOPRAZOLE 15MG CAP,SA/NAPROXEN 375MG TAB PKT,21
+"DATA",176.112,38313,1)
+758486^^Y
+"DATA",176.112,38314,0)
+4025397^LANSOPRAZOLE 15MG CAP,EC/NAPROXEN 375MG TAB PKT,21
+"DATA",176.112,38314,1)
+758486^^Y
+"DATA",176.112,38315,0)
+4017056^LANSOPRAZOLE 15MG CAP,SA/NAPROXEN 500MG TAB PKT,84
+"DATA",176.112,38315,1)
+758497^^Y
+"DATA",176.112,38316,0)
+4025398^LANSOPRAZOLE 15MG CAP,EC/NAPROXEN 500MG TAB PKT,21
+"DATA",176.112,38316,1)
+758497^^Y
+"DATA",176.112,38317,0)
+4017055^LANSOPRAZOLE 15MG CAP,SA/NAPROXEN 500MG TAB PKT,21
+"DATA",176.112,38317,1)
+758497^^Y
+"DATA",176.112,38318,0)
+4025399^LANSOPRAZOLE 15MG CAP,EC/NAPROXEN 500MG TAB PKT,84
+"DATA",176.112,38318,1)
+758497^^Y
+"DATA",176.112,38319,0)
+4024755^RISEDRONATE 35MG/CALCIUM CARBONATE 1.25GM TAB,28 PACK
+"DATA",176.112,38319,1)
+759465^^Y
+"DATA",176.112,38320,0)
+4005785^ESTROSTEP FE TAB,28
+"DATA",176.112,38320,1)
+759477^^Y
+"DATA",176.112,38321,0)
+4026527^ZOSTAVAX VACCINE INJ
+"DATA",176.112,38321,1)
+759609^^Y
+"DATA",176.112,38322,0)
+4025302^ZOSTER VACCINE LIVE (OKA/MERCK) INJ
+"DATA",176.112,38322,1)
+759609^^Y
+"DATA",176.112,38323,0)
+4003803^LOMUSTINE DOSEPAK (300MG TOTAL) CAP
+"DATA",176.112,38323,1)
+759674^^Y
+"DATA",176.112,38324,0)
+4002839^DEXAMETHASONE 0.75MG TAB DOSEPAK,12
+"DATA",176.112,38324,1)
+759696^^Y
+"DATA",176.112,38325,0)
+4000658^CODEINE PO4 30MG TAB,SOLUBLE
+"DATA",176.112,38325,1)
+759809^^Y
+"DATA",176.112,38326,0)
+4000655^CODEINE SO4 30MG TAB,SOLUBLE
+"DATA",176.112,38326,1)
+759811^^Y
+"DATA",176.112,38327,0)
+4000970^MAGNESIUM SULFATE 40MEQ/5GM PWDR
+"DATA",176.112,38327,1)
+759891^^Y
+"DATA",176.112,38328,0)
+4013328^ACCU-CHEK INSTANT (GLUCOSE) TEST STRIP
+"DATA",176.112,38328,1)
+759925^^Y
+"DATA",176.112,38329,0)
+4009118^ALPHA-1-PROTEINASE INHIBITOR,HUMAN 1000MG/VIL INJ
+"DATA",176.112,38329,1)
+760040^^Y
+"DATA",176.112,38330,0)
+4009117^ALPHA-1-PROTEINASE INHIBITOR,HUMAN 500MG/VIL INJ
+"DATA",176.112,38330,1)
+760042^^Y
+"DATA",176.112,38331,0)
+4008222^ACCU-BLOC SPINOCAN CUSTOM SPINAL TRAY SSK
+"DATA",176.112,38331,1)
+760045^^Y
+"DATA",176.112,38332,0)
+4004403^ACCU-BLOC SPINOCAN CUSTOM SPINAL TRAY SSK S15
+"DATA",176.112,38332,1)
+760046^^Y
+"DATA",176.112,38333,0)
+4008221^ACCU-BLOC SPINOCAN SPINAL TRAY S22B-K
+"DATA",176.112,38333,1)
+760047^^Y
+"DATA",176.112,38334,0)
+4008220^ACCU-BLOC SPINOCAN SPINAL TRAY S25L-K
+"DATA",176.112,38334,1)
+760048^^Y
+"DATA",176.112,38335,0)
+4008212^ACCUGUIDE CENTRAL VENOUS CATHETER KIT C1409AK
+"DATA",176.112,38335,1)
+760049^^Y
+"DATA",176.112,38336,0)
+4004400^ACCUGUIDE CENTRAL VENOUS CATHETER KIT C1606AX
+"DATA",176.112,38336,1)
+760050^^Y
+"DATA",176.112,38337,0)
+4008213^ACCUGUIDE CENTRAL VENOUS CATHETER KIT C1608MC
+"DATA",176.112,38337,1)
+760051^^Y
+"DATA",176.112,38338,0)
+4008214^ACCUGUIDE CENTRAL VENOUS CATHETER KIT C2005AK
+"DATA",176.112,38338,1)
+760052^^Y
+"DATA",176.112,38339,0)
+4004402^ACCUGUIDE PERCUTANEOUS CATHETER INTRODUCER KIT
+"DATA",176.112,38339,1)
+760053^^Y
+"DATA",176.112,38340,0)
+4024488^BABY WIPES (AF,FF) ALOE,VIT E REFILL
+"DATA",176.112,38340,1)
+760054^^Y
+"DATA",176.112,38341,0)
+4024487^BABY WIPES (AF,FF) ALOE,VIT E TUB
+"DATA",176.112,38341,1)
+760055^^Y
+"DATA",176.112,38342,0)
+4011700^GAUZE,PACKING IODOFORM 0.5IN X 5YD
+"DATA",176.112,38342,1)
+760057^^Y
+"DATA",176.112,38343,0)
+4011699^GAUZE,PACKING IODOFORM 1/4IN X 5YD
+"DATA",176.112,38343,1)
+760058^^Y
+"DATA",176.112,38344,0)
+4011704^GAUZE,PACKING IODOFORM 1IN F#559-3211
+"DATA",176.112,38344,1)
+760059^^Y
+"DATA",176.112,38345,0)
+4011694^GAUZE,PACKING IODOFORM 1IN X 5YD
+"DATA",176.112,38345,1)
+760060^^Y
+"DATA",176.112,38346,0)
+4014771^GAUZE,PACKING IODOFORM 2IN X 5YD
+"DATA",176.112,38346,1)
+760061^^Y
+"DATA",176.112,38347,0)
+4014774^GAUZE,PETROLATUM 0.5IN X 72IN KEN#4116-00
+"DATA",176.112,38347,1)
+760062^^Y
+"DATA",176.112,38348,0)
+4014781^GAUZE,PETROLATUM 0.5IN X 72IN KEN#4216-00
+"DATA",176.112,38348,1)
+760063^^Y
+"DATA",176.112,38349,0)
+4014775^GAUZE,PETROLATUM 1IN X 36IN KEN#4126-00
+"DATA",176.112,38349,1)
+760064^^Y
+"DATA",176.112,38350,0)
+4014782^GAUZE,PETROLATUM 1IN X 36IN KEN#4226-00
+"DATA",176.112,38350,1)
+760065^^Y
+"DATA",176.112,38351,0)
+4014780^GAUZE,PETROLATUM 1IN X 8IN KEN#4176-01
+"DATA",176.112,38351,1)
+760066^^Y
+"DATA",176.112,38352,0)
+4014787^GAUZE,PETROLATUM 1IN X 8IN KEN#4276-01
+"DATA",176.112,38352,1)
+760067^^Y
+"DATA",176.112,38353,0)
+4011707^GAUZE,PETROLATUM 3IN X 18IN F#052-1152
+"DATA",176.112,38353,1)
+760068^^Y
+"DATA",176.112,38354,0)
+4014777^GAUZE,PETROLATUM 3IN X 18IN KEN#4146-00
+"DATA",176.112,38354,1)
+760069^^Y
+"DATA",176.112,38355,0)
+4014784^GAUZE,PETROLATUM 3IN X 18IN KEN#4246-00
+"DATA",176.112,38355,1)
+760070^^Y
+"DATA",176.112,38356,0)
+4014778^GAUZE,PETROLATUM 3IN X 36IN KEN#4156-00
+"DATA",176.112,38356,1)
+760071^^Y
+"DATA",176.112,38357,0)
+4014785^GAUZE,PETROLATUM 3IN X 36IN KEN#4256-00
+"DATA",176.112,38357,1)
+760072^^Y
+"DATA",176.112,38358,0)
+4014776^GAUZE,PETROLATUM 3IN X 9IN KEN#4136-05
+"DATA",176.112,38358,1)
+760073^^Y
+"DATA",176.112,38359,0)
+4014783^GAUZE,PETROLATUM 3IN X 9IN KEN#4236-00
+"DATA",176.112,38359,1)
+760074^^Y
+"DATA",176.112,38360,0)
+4014779^GAUZE,PETROLATUM 6IN X 36IN KEN#4166-00
+"DATA",176.112,38360,1)
+760075^^Y
+"DATA",176.112,38361,0)
+4014786^GAUZE,PETROLATUM 6IN X 36IN KEN#4266-00
+"DATA",176.112,38361,1)
+760076^^Y
+"DATA",176.112,38362,0)
+4007891^AIR 100% GAS
+"DATA",176.112,38362,1)
+760138^^Y
+"DATA",176.112,38363,0)
+4009401^ANTIHEMOPHILIC FACTOR,RECOMBINANT 250UNT/VIL INJ
+"DATA",176.112,38363,1)
+760236^^Y
+"DATA",176.112,38364,0)
+4006345^CHLORPHENIRAMINE 1MG/PHENYLEPHRINE 5MG LIQUID
+"DATA",176.112,38364,1)
+760437^^Y
+"DATA",176.112,38365,0)
+4006344^CHLORPHENIRAMINE 2MG/PHENYLEPHRINE 3MG ELIXIR
+"DATA",176.112,38365,1)
+760440^^Y
+"DATA",176.112,38366,0)
+4008203^CODEINE 10MG/CTM 5MG/P-EPHRINE 20MG/P-PROPANOL 20MG SYR
+"DATA",176.112,38366,1)
+760506^^Y
+"DATA",176.112,38367,0)
+4008012^CTM 2MG/DM 10MG/GLYCEROL,IODINATED 15MG ELIXIR
+"DATA",176.112,38367,1)
+760520^^Y
+"DATA",176.112,38368,0)
+4007560^DM 15MG/DOXYLAMINE 3.75MG/GG 100MG SYRUP
+"DATA",176.112,38368,1)
+760677^^Y
+"DATA",176.112,38369,0)
+4006915^EPHEDRINE SO4 7.5MG/POTASSIUM IODIDE 125MG SYRUP
+"DATA",176.112,38369,1)
+760698^^Y
+"DATA",176.112,38370,0)
+4000956^SILVER NITRATE APPLICATOR,TOP
+"DATA",176.112,38370,1)
+760916^^Y
+"DATA",176.112,38371,0)
+4026520^FERRIC SUBSULFATE AQUEOUS 8GM/VIL GEL,TOP
+"DATA",176.112,38371,1)
+760953^^Y
+"DATA",176.112,38372,0)
+4003057^GOLD NA THIOMALATE 10MG/ML INJ
+"DATA",176.112,38372,1)
+761007^^Y
+"DATA",176.112,38373,0)
+4001711^GONADOTROPIN,CHORIONIC 20000UNT/AMP INJ
+"DATA",176.112,38373,1)
+761029^^Y
+"DATA",176.112,38374,0)
+4005481^GONADOTROPIN,CHORIONIC 20000UNT/MANNITOL 200MG/VIL INJ
+"DATA",176.112,38374,1)
+761031^^Y
+"DATA",176.112,38375,0)
+4001715^GONADOTROPIN,CHORIONIC 20000UNT/VIL INJ
+"DATA",176.112,38375,1)
+761033^^Y
+"DATA",176.112,38376,0)
+4013924^LACTULOSE 20GM/PKT PWDR
+"DATA",176.112,38376,1)
+761342^^Y
+"DATA",176.112,38377,0)
+4000765^METHADONE HCL 10MG TAB,EFFERVSC
+"DATA",176.112,38377,1)
+761407^^Y
+"DATA",176.112,38378,0)
+4007458^MORPHINE 14MG/K CITRATE 480MG/K GUAIACOLSULF 240MG SYRUP
+"DATA",176.112,38378,1)
+761426^^Y
+"DATA",176.112,38379,0)
+4007720^PHENIRAMINE 12.5MG/P-EPHRINE 5MG/MENTHOL 1MG SYRUP
+"DATA",176.112,38379,1)
+761464^^Y
+"DATA",176.112,38380,0)
+4007588^POTASSIUM PARA-AMINOBENZOATE PWDR,ORAL
+"DATA",176.112,38380,1)
+761509^^Y
+"DATA",176.112,38381,0)
+4009539^PSYLLIUM MUCILLOID 3.4GM/SUCROSE 7.1GM PWDR,ORAL
+"DATA",176.112,38381,1)
+761521^^Y
+"DATA",176.112,38382,0)
+4005141^RHO (D) IMMUNE GLOBULIN,HUMAN 300UNT/VIL INJ
+"DATA",176.112,38382,1)
+761528^^Y
+"DATA",176.112,38383,0)
+4003600^SECRETIN 100UNT/VIL INJ
+"DATA",176.112,38383,1)
+761563^^Y
+"DATA",176.112,38384,0)
+4003601^SECRETIN 75UNT/VIL INJ
+"DATA",176.112,38384,1)
+761574^^Y
+"DATA",176.112,38385,0)
+4009116^TERIPARATIDE 200UNT/VIL INJ
+"DATA",176.112,38385,1)
+761749^^Y
+"DATA",176.112,38386,0)
+4007988^TETANUS ANTITOXIN 1UNT INJ
+"DATA",176.112,38386,1)
+761761^^Y
+"DATA",176.112,38387,0)
+4003314^TETANUS IMMUNE GLOBULIN,HUMAN 250UNT/VIL INJ
+"DATA",176.112,38387,1)
+761776^^Y
+"DATA",176.112,38388,0)
+4000692^THYROID 10UNT/VIL INJ
+"DATA",176.112,38388,1)
+761796^^Y
+"DATA",176.112,38389,0)
+4025185^CESIA TAB,28
+"DATA",176.112,38389,1)
+761973^^Y
+"DATA",176.112,38390,0)
+4015695^CYCLESSA TAB,28
+"DATA",176.112,38390,1)
+761974^^Y
+"DATA",176.112,38391,0)
+4025002^ENPRESSE TAB,28
+"DATA",176.112,38391,1)
+761977^^Y
+"DATA",176.112,38392,0)
+4012709^ESTROGENS,CONJUGATED 0.625MG,28TAB/MEDROXYPROGESTERONE 5MG,14TAB
+"DATA",176.112,38392,1)
+761978^^Y
+"DATA",176.112,38393,0)
+4005275^GENORA 0.5/35 TAB,28
+"DATA",176.112,38393,1)
+761983^^Y
+"DATA",176.112,38394,0)
+4005269^GENORA 1/35 TAB,28
+"DATA",176.112,38394,1)
+761985^^Y
+"DATA",176.112,38395,0)
+4005233^GENORA 1/50 TAB,28
+"DATA",176.112,38395,1)
+761986^^Y
+"DATA",176.112,38396,0)
+4005246^JENEST-28 TAB PACKET
+"DATA",176.112,38396,1)
+761999^^Y
+"DATA",176.112,38397,0)
+4016922^KARIVA TAB,28
+"DATA",176.112,38397,1)
+762001^^Y
+"DATA",176.112,38398,0)
+4013749^MIRCETTE TAB,28
+"DATA",176.112,38398,1)
+762002^^Y
+"DATA",176.112,38399,0)
+4024888^MONONESSA TAB,28
+"DATA",176.112,38399,1)
+762003^^Y
+"DATA",176.112,38400,0)
+4015563^NECON 1/50 TAB,28
+"DATA",176.112,38400,1)
+762004^^Y
+"DATA",176.112,38401,0)
+4025186^NECON 10/11 TAB,28
+"DATA",176.112,38401,1)
+762005^^Y
+"DATA",176.112,38402,0)
+4025181^NORTREL 7/7/7 TAB,28
+"DATA",176.112,38402,1)
+762007^^Y
+"DATA",176.112,38403,0)
+4003172^OVRAL TAB,28
+"DATA",176.112,38403,1)
+762008^^Y
+"DATA",176.112,38404,0)
+4003208^TRI-LEVLEN TAB,28
+"DATA",176.112,38404,1)
+762332^^Y
+"DATA",176.112,38405,0)
+4025180^TRI-SPRINTEC TAB,28
+"DATA",176.112,38405,1)
+762333^^Y
+"DATA",176.112,38406,0)
+4017263^VELIVET TAB,28
+"DATA",176.112,38406,1)
+762334^^Y
+"DATA",176.112,38407,0)
+4016608^NORGESTREL 75MCG TAB,28
+"DATA",176.112,38407,1)
+762335^^Y
+"DATA",176.112,38408,0)
+4025748^PREFEST TAB,30
+"DATA",176.112,38408,1)
+762394^^Y
+"DATA",176.112,38409,0)
+4025747^PREFEST TAB
+"DATA",176.112,38409,1)
+762394^^Y
+"DATA",176.112,38410,0)
+4025626^JOLESSA 30MCG/0.15MCG TAB,EC,91
+"DATA",176.112,38410,1)
+762663^^Y
+"DATA",176.112,38411,0)
+4027827^JOLESSA 30MCG/0.15MG TAB,EC,91
+"DATA",176.112,38411,1)
+762663^^Y^JOLESSA 30MCG/0.15MG EC TAB 91^Y
+"DATA",176.112,38412,0)
+4016764^ASA 325MG/PRAVASTATIN NA 40MG TAB
+"DATA",176.112,38412,1)
+762664^^Y
+"DATA",176.112,38413,0)
+4003440^METHYLPREDNISOLONE 4MG TAB DOSEPAK,21
+"DATA",176.112,38413,1)
+762675^^Y
+"DATA",176.112,38414,0)
+4014947^NECON 1/50 TAB,21
+"DATA",176.112,38414,1)
+762677^^Y
+"DATA",176.112,38415,0)
+4027153^SOMATROPIN (GENOTROPIN) 0.2MG/VIL INJ,MINIQUICK
+"DATA",176.112,38415,1)
+762833^^Y
+"DATA",176.112,38416,0)
+4027154^SOMATROPIN (GENOTROPIN) 0.4MG/VIL INJ,MINIQUICK
+"DATA",176.112,38416,1)
+762836^^Y
+"DATA",176.112,38417,0)
+4027560^SOMATROPIN (GENOTROPIN) 0.6MG/VIL INJ,MINIQUICK
+"DATA",176.112,38417,1)
+762839^^Y^SOMATROPIN (GENOTROPIN) 0.6MG MINIQUICK^Y
+"DATA",176.112,38418,0)
+4027155^SOMATROPIN (GENOTROPIN) 0.8MG/VIL INJ,MINIQUICK
+"DATA",176.112,38418,1)
+762843^^Y
+"DATA",176.112,38419,0)
+4027157^SOMATROPIN (GENOTROPIN) 1.2MG/VIL INJ,MINIQUICK
+"DATA",176.112,38419,1)
+762849^^Y
+"DATA",176.112,38420,0)
+4027158^SOMATROPIN (GENOTROPIN) 1.4MG/VIL INJ,MINIQUICK
+"DATA",176.112,38420,1)
+762852^^Y
+"DATA",176.112,38421,0)
+4027159^SOMATROPIN (GENOTROPIN) 1.6MG/VIL INJ,MINIQUICK
+"DATA",176.112,38421,1)
+762859^^Y
+"DATA",176.112,38422,0)
+4027160^SOMATROPIN (GENOTROPIN) 1.8MG/VIL INJ,MINIQUICK
+"DATA",176.112,38422,1)
+762868^^Y
+"DATA",176.112,38423,0)
+4027156^SOMATROPIN (GENOTROPIN) 1MG/VIL INJ,MINIQUICK
+"DATA",176.112,38423,1)
+762875^^Y
+"DATA",176.112,38424,0)
+4013203^CEFDINIR 300MG CAP
+"DATA",176.112,38424,1)
+762893^^Y
+"DATA",176.112,38425,0)
+4027161^SOMATROPIN (GENOTROPIN) 2MG/VIL INJ,MINIQUICK
+"DATA",176.112,38425,1)
+762897^^Y
+"DATA",176.112,38426,0)
+4016766^ASA 325MG/PRAVASTATIN NA 80MG TAB
+"DATA",176.112,38426,1)
+762899^^Y
+"DATA",176.112,38427,0)
+4016805^ASA 81MG/PRAVASTATIN NA 20MG TAB
+"DATA",176.112,38427,1)
+762901^^Y
+"DATA",176.112,38428,0)
+4016767^ASA 81/PRAVASTATIN NA 20MG TAB
+"DATA",176.112,38428,1)
+762901^^Y
+"DATA",176.112,38429,0)
+4016763^ASA 81MG/PRAVASTATIN NA 40MG TAB
+"DATA",176.112,38429,1)
+762903^^Y
+"DATA",176.112,38430,0)
+4025536^INSULIN,HUMAN 1MG X 180/3MG X 90 INHL,ORAL,BLISTER,KIT
+"DATA",176.112,38430,1)
+763020^^Y
+"DATA",176.112,38431,0)
+4025538^INSULIN,HUMAN 1MG X 180/3MG X 90 INHL,ORAL,BLISTER,PKT
+"DATA",176.112,38431,1)
+763020^^Y
+"DATA",176.112,38432,0)
+4025540^EXUBERA RELEASE UNIT
+"DATA",176.112,38432,1)
+763023^^Y
+"DATA",176.112,38433,0)
+4001118^SODIUM CHLORIDE 0.9%/METHYLPARABEN/PROPYLPARABEN INJ,TUBEX,2.5ML
+"DATA",176.112,38433,1)
+763039^^Y
+"DATA",176.112,38434,0)
+4006387^NIASPAN STARTER PACK
+"DATA",176.112,38434,1)
+763171^^Y
+"DATA",176.112,38435,0)
+4013956^NIACIN (NIASPAN-KOS) STARTER PACK
+"DATA",176.112,38435,1)
+763171^^Y
+"DATA",176.112,38436,0)
+4024594^PREDNISONE 5MG TAB DOSEPACK,48
+"DATA",176.112,38436,1)
+763179^^Y
+"DATA",176.112,38437,0)
+4002626^PREDNISONE 5MG TAB DOSEPAK,21
+"DATA",176.112,38437,1)
+763181^^Y
+"DATA",176.112,38438,0)
+4024593^PREDNISONE 10MG TAB DOSEPACK,48
+"DATA",176.112,38438,1)
+763183^^Y
+"DATA",176.112,38439,0)
+4024592^PREDNISONE 10MG TAB DOSEPACK,21
+"DATA",176.112,38439,1)
+763185^^Y
+"DATA",176.112,38440,0)
+4006575^INTERFERON ALFA-2B,RECOMBINANT 10 MILLION UNT/SYR INJ
+"DATA",176.112,38440,1)
+763209^^Y
+"DATA",176.112,38441,0)
+4006576^INTERFERON ALFA-2B,RECOMBINANT 5 MILLION UNT/SYR INJ
+"DATA",176.112,38441,1)
+763210^^Y
+"DATA",176.112,38442,0)
+4004031^IOXAGLATE MEGLUMINE 393MG/IOXAGLATE NA 196 MG/ML INJ,SYR,125ML
+"DATA",176.112,38442,1)
+763211^^Y
+"DATA",176.112,38443,0)
+4025419^DEXTRANOMER MICROSPHERES (DEFLUX) 50MG/ML SYR,1ML
+"DATA",176.112,38443,1)
+763214^^Y
+"DATA",176.112,38444,0)
+4009698^OXYBENZONE 7.3%/PADIMATE O 2.3%/SD ALCOHOL 40 60% LOTION
+"DATA",176.112,38444,1)
+763237^^Y
+"DATA",176.112,38445,0)
+4008969^IFOSFAMIDE 1GM/VIL/MESNA 1GM/AMP PKG INJ
+"DATA",176.112,38445,1)
+763274^^Y
+"DATA",176.112,38446,0)
+4008970^IFOSFAMIDE 3GM/VIL/MESNA 1GM/AMP PKG INJ
+"DATA",176.112,38446,1)
+763276^^Y
+"DATA",176.112,38447,0)
+4024699^HEPATITIS B IMMUNE GLOBULIN (BAYHEP) INJ,SYR,0.5ML
+"DATA",176.112,38447,1)
+763309^^Y
+"DATA",176.112,38448,0)
+4024701^HEPATITIS B IMMUNE GLOBULIN (BAYHEP) INJ,SYR,1ML
+"DATA",176.112,38448,1)
+763310^^Y
+"DATA",176.112,38449,0)
+4009699^OXYBENZONE 3%/PABA 5%/PADIMATE 0 5%/SD ALCOHOL 40 58% LOTION
+"DATA",176.112,38449,1)
+763328^^Y
+"DATA",176.112,38450,0)
+4006974^NITROFURAZONE 0.2% DRESSING,TOP
+"DATA",176.112,38450,1)
+763380^^Y
+"DATA",176.112,38451,0)
+4005236^NORETHIN 1/50 M TAB,21
+"DATA",176.112,38451,1)
+763390^^Y
+"DATA",176.112,38452,0)
+4010566^TRIDRATE KIT
+"DATA",176.112,38452,1)
+763411^^Y
+"DATA",176.112,38453,0)
+4004278^ACCU-BLOC PERIFIX
+"DATA",176.112,38453,1)
+763412^^Y
+"DATA",176.112,38454,0)
+4008211^ACCU-BLOCK KIT
+"DATA",176.112,38454,1)
+763413^^Y
+"DATA",176.112,38455,0)
+4003207^TRI-LEVLEN TAB,21
+"DATA",176.112,38455,1)
+763418^^Y
+"DATA",176.112,38456,0)
+4006789^ALUMINUM CHLORIDE 100MG STRIP
+"DATA",176.112,38456,1)
+763421^^Y
+"DATA",176.112,38457,0)
+4006788^ALUMINUM CHLORIDE 105MG STRIP
+"DATA",176.112,38457,1)
+763422^^Y
+"DATA",176.112,38458,0)
+4006786^ALUMINUM CHLORIDE 67.6MG STRIP
+"DATA",176.112,38458,1)
+763423^^Y
+"DATA",176.112,38459,0)
+4006787^ALUMINUM CHLORIDE 76.86MG STRIP
+"DATA",176.112,38459,1)
+763424^^Y
+"DATA",176.112,38460,0)
+4007843^AN-MDP TECHNETIUM TC 99M MEDRONATE KIT
+"DATA",176.112,38460,1)
+763425^^Y
+"DATA",176.112,38461,0)
+4017108^APOKYN INJECTOR PEN
+"DATA",176.112,38461,1)
+763427^^Y
+"DATA",176.112,38462,0)
+4017251^ATROPINE 2MG/PRALIDOXIME CL 300MG AUTO INJECTOR (MARK I)
+"DATA",176.112,38462,1)
+763428^^Y
+"DATA",176.112,38463,0)
+4008444^BISACODYL 5MG TAB #4/BISACODYL 10MG SUPP
+"DATA",176.112,38463,1)
+763431^^Y
+"DATA",176.112,38464,0)
+4024861^CARTRIDGE,ANIMAS INSULIN
+"DATA",176.112,38464,1)
+763432^^Y
+"DATA",176.112,38465,0)
+4017211^FANOLESOMAB 250MCG/VIL INJ,KIT
+"DATA",176.112,38465,1)
+763433^^Y
+"DATA",176.112,38466,0)
+4007392^TRAVASOL 5.5% KIT INJ
+"DATA",176.112,38466,1)
+763439^^Y
+"DATA",176.112,38467,0)
+4007394^TRAVASOL 8.5% KIT INJ
+"DATA",176.112,38467,1)
+763441^^Y
+"DATA",176.112,38468,0)
+4006311^TRAVASOL 8.5% WITHOUT ELECTROLYTES KIT INJ
+"DATA",176.112,38468,1)
+763442^^Y
+"DATA",176.112,38469,0)
+4007393^TRAVASOL 8.5%/ELECTROLYTES KIT INJ
+"DATA",176.112,38469,1)
+763443^^Y
+"DATA",176.112,38470,0)
+4009929^THIOPENTAL NA 500MG/VIL/NACL 0.9% KIT,INJ
+"DATA",176.112,38470,1)
+763445^^Y
+"DATA",176.112,38471,0)
+4009928^THIOPENTAL NA 400MG/VIL/NACL 0.9% KIT,INJ
+"DATA",176.112,38471,1)
+763446^^Y
+"DATA",176.112,38472,0)
+4001124^SODIUM CHLORIDE MESALT DRESSING 4INX4IN
+"DATA",176.112,38472,1)
+763447^^Y
+"DATA",176.112,38473,0)
+4001112^SODIUM CHLORIDE MESALT DRESSING 3INX3IN
+"DATA",176.112,38473,1)
+763448^^Y
+"DATA",176.112,38474,0)
+4001159^SCARLET RED 5% DRESSING
+"DATA",176.112,38474,1)
+763449^^Y
+"DATA",176.112,38475,0)
+4003976^TECHNETIUM 99M DTPA PENTETATE KIT
+"DATA",176.112,38475,1)
+763500^^Y
+"DATA",176.112,38476,0)
+4003977^TECHNETIUM Tc99m TEBOROXIME KIT
+"DATA",176.112,38476,1)
+763503^^Y
+"DATA",176.112,38477,0)
+4003974^TECHNESCAN MDP KIT
+"DATA",176.112,38477,1)
+763512^^Y
+"DATA",176.112,38478,0)
+4005280^MICONAZOLE 200MG SUPP/MICONAZOLE 2% CREAM PAK
+"DATA",176.112,38478,1)
+763549^^Y
+"DATA",176.112,38479,0)
+4012502^NOVOLIN PEN INSULIN DELIVERY SYSTEM
+"DATA",176.112,38479,1)
+763566^^Y
+"DATA",176.112,38480,0)
+4024889^NOVOPEN 3 PENMATE INJECTION DEVICE
+"DATA",176.112,38480,1)
+763571^^Y
+"DATA",176.112,38481,0)
+4013469^DRESSING,HYDROCOLLOID 8IN X 8IN
+"DATA",176.112,38481,1)
+763608^^Y
+"DATA",176.112,38482,0)
+4013470^DRESSING,HYDROCOLLOID 6IN X6.5IN,BUTTERFLY-SHAPE
+"DATA",176.112,38482,1)
+763609^^Y
+"DATA",176.112,38483,0)
+4013468^DRESSING,HYDROCOLLOID 6IN X 6IN
+"DATA",176.112,38483,1)
+763610^^Y
+"DATA",176.112,38484,0)
+4013467^DRESSING,HYDROCOLLOID 4IN X 4IN
+"DATA",176.112,38484,1)
+763611^^Y
+"DATA",176.112,38485,0)
+4012063^DEPEND W/STRAP REGULAR #19690-50
+"DATA",176.112,38485,1)
+763612^^Y
+"DATA",176.112,38486,0)
+4011666^CIRCULON SYSTEM STEP 1 KIT C#6509-45
+"DATA",176.112,38486,1)
+763613^^Y
+"DATA",176.112,38487,0)
+4011667^CIRCULON SYSTEM STEP 2 KIT C#1779-17
+"DATA",176.112,38487,1)
+763614^^Y
+"DATA",176.112,38488,0)
+4014823^DOUVISC,KIT 0.35ML/0.4ML INJ,OPH
+"DATA",176.112,38488,1)
+763622^^Y
+"DATA",176.112,38489,0)
+4015584^DUOVISC,KIT 0.35ML/0.4ML INJ,OPH
+"DATA",176.112,38489,1)
+763622^^Y
+"DATA",176.112,38490,0)
+4015585^DUOVISC,KIT 0.5ML/0.55ML INJ,OPH
+"DATA",176.112,38490,1)
+763626^^Y
+"DATA",176.112,38491,0)
+4014822^DOUVISC,KIT 0.5ML/0.55ML INJ,OPH
+"DATA",176.112,38491,1)
+763626^^Y
+"DATA",176.112,38492,0)
+4025422^ELECTROLYTE PWDR,ORAL PKT
+"DATA",176.112,38492,1)
+763629^^Y
+"DATA",176.112,38493,0)
+4010061^BISACODYL SUPP 10MG/BISACODYL 5MG TAB #4/PHOSPHO-SODA 45ML
+"DATA",176.112,38493,1)
+763632^^Y
+"DATA",176.112,38494,0)
+4008109^GLYCINE 333MG/NIACIN 50MG ELIXIR
+"DATA",176.112,38494,1)
+763672^^Y
+"DATA",176.112,38495,0)
+4009743^TALC,STERILE 4GM/CANISTER
+"DATA",176.112,38495,1)
+764933^^Y
+"DATA",176.112,38496,0)
+4009786^LACTIC ACID LIQUID
+"DATA",176.112,38496,1)
+765286^^Y
+"DATA",176.112,38497,0)
+4004915^HYDROFLUORIC ACID 7.1MG/NA FLUORIDE 20MG GEL
+"DATA",176.112,38497,1)
+767773^^Y
+"DATA",176.112,38498,0)
+4008271^SOMATOTROPIN 2UNT INJ
+"DATA",176.112,38498,1)
+767858^^Y
+"DATA",176.112,38499,0)
+4004441^ALLERGENIC EXTRACT, PLANTAIN, ENGLISH 10000PNU/ML INJ
+"DATA",176.112,38499,1)
+768265^^Y
+"DATA",176.112,38500,0)
+4009402^ANTIHEMOPHILIC FACTOR,RECOMBINANT 500UNT/VIL INJ
+"DATA",176.112,38500,1)
+768434^^Y
+"DATA",176.112,38501,0)
+4010340^ANTIHEMOPHILIC FACTOR,PORCINE 400UNT/VIL INJ
+"DATA",176.112,38501,1)
+768827^^Y
+"DATA",176.112,38502,0)
+4009406^ANTITHROMBIN III,HUMAN 1000UNT/VIL INJ
+"DATA",176.112,38502,1)
+770830^^Y
+"DATA",176.112,38503,0)
+4013025^FACTOR IX,RECOMBINANT 500 UNT/VIL INJ
+"DATA",176.112,38503,1)
+772499^^Y
+"DATA",176.112,38504,0)
+4016332^PEGINTERFERON ALPHA-2A 180MCG/VI X4/RIBAVIRIN 200MG 168 KIT
+"DATA",176.112,38504,1)
+773049^^Y
+"DATA",176.112,38505,0)
+4001710^GONADOTROPIN,CHORIONIC 1000UNT/AMP INJ
+"DATA",176.112,38505,1)
+773639^^Y
+"DATA",176.112,38506,0)
+4005482^GONADOTROPIN,CHORIONIC 1000UNT/MANNITOL 10MG/ML INJ
+"DATA",176.112,38506,1)
+773639^^Y
+"DATA",176.112,38507,0)
+4001714^GONADOTROPIN,CHORIONIC 1000UNT/VIL INJ
+"DATA",176.112,38507,1)
+773639^^Y
+"DATA",176.112,38508,0)
+4004502^ALLERGENIC EXTRACT,HOUSE DUST,STOCK 1000UNT INJ
+"DATA",176.112,38508,1)
+775671^^Y
+"DATA",176.112,38509,0)
+4026399^BIOTENE MOUTHWASH
+"DATA",176.112,38509,1)
+776434^^Y
+"DATA",176.112,38510,0)
+4003908^AMPHETAMINE-DEXTROAMPHETAMINE RESIN COMPLEX 12.5MG CAP,SA
+"DATA",176.112,38510,1)
+777108^^Y
+"DATA",176.112,38511,0)
+4010440^CALCIUM 150MG/MAGNESIUM 90MG TAB
+"DATA",176.112,38511,1)
+778124^^Y
+"DATA",176.112,38512,0)
+4003965^ALBUMIN,IODINATED SERUM (I-125) 10MIC/1.5 INJ
+"DATA",176.112,38512,1)
+789452^^Y
+"DATA",176.112,38513,0)
+4003966^ALBUMIN,IODINATED SERUM (I-125) 10MIC/IODINE (I-125) 0.01 MIC IJ
+"DATA",176.112,38513,1)
+789454^^Y
+"DATA",176.112,38514,0)
+4007216^ACETATED RINGER'S INJ
+"DATA",176.112,38514,1)
+789459^^Y
+"DATA",176.112,38515,0)
+4007217^ACETATED RINGER'S/DEXTROSE 5% INJ
+"DATA",176.112,38515,1)
+789461^^Y
+"DATA",176.112,38516,0)
+4003964^ALBUMIN,IODINATED SERUM (I-125) 10MIL/ML INJ
+"DATA",176.112,38516,1)
+789466^^Y
+"DATA",176.112,38517,0)
+4001171^AMOBARBITAL NA 250MG/AMP INJ
+"DATA",176.112,38517,1)
+789476^^Y
+"DATA",176.112,38518,0)
+4004018^BARIUM SO4 650MG TAB
+"DATA",176.112,38518,1)
+789512^^Y
+"DATA",176.112,38519,0)
+4015887^CALCIUM 500MG/VITAMIN D 100UNT/VITAMIN K 0.04MG TAB,CHEW
+"DATA",176.112,38519,1)
+789536^^Y
+"DATA",176.112,38520,0)
+4003876^CEFORANIDE 10GM/VIL INJ
+"DATA",176.112,38520,1)
+789564^^Y
+"DATA",176.112,38521,0)
+4003874^CEFORANIDE 1GM/VIL INJ
+"DATA",176.112,38521,1)
+789566^^Y
+"DATA",176.112,38522,0)
+4003878^CEFORANIDE 500MG/VIL INJ
+"DATA",176.112,38522,1)
+789573^^Y
+"DATA",176.112,38523,0)
+4003972^CHROMIC PO4 (P-32) 7MIL/ML INJ,SUSP
+"DATA",176.112,38523,1)
+789584^^Y
+"DATA",176.112,38524,0)
+4003969^CYANOCOBALAMIN (CO-57) 0.5MIC CAP
+"DATA",176.112,38524,1)
+789595^^Y
+"DATA",176.112,38525,0)
+4007469^CYANOCOBALAMIN 5MCG/FOLIC ACID 400MCG INJ
+"DATA",176.112,38525,1)
+789597^^Y
+"DATA",176.112,38526,0)
+4009949^DIDANOSINE 375MG/PKG SOLN,ORAL
+"DATA",176.112,38526,1)
+789619^^Y
+"DATA",176.112,38527,0)
+4010006^EPHEDRINE HCL 0.6%/NACL 0.85% JELLY,NASAL
+"DATA",176.112,38527,1)
+789622^^Y
+"DATA",176.112,38528,0)
+4013820^FACTOR VIIa,RECOMBINANT 1200MCG/VIAL INJ
+"DATA",176.112,38528,1)
+789628^^Y
+"DATA",176.112,38529,0)
+4003968^FERROUS CITRATE (FE-59) 25MIL/ML INJ
+"DATA",176.112,38529,1)
+789630^^Y
+"DATA",176.112,38530,0)
+4007983^FIBRINOGEN 1MG/IODINE (I-125) 154 MIC INJ
+"DATA",176.112,38530,1)
+789632^^Y
+"DATA",176.112,38531,0)
+4007993^GALLIUM CHLORIDE (GA-67) 2MIL/NA CITRATE 2.5% INJ
+"DATA",176.112,38531,1)
+789641^^Y
+"DATA",176.112,38532,0)
+4007961^GALLIUM CITRATE (GA-67) 2MIL/NA CITRATE 2MG INJ
+"DATA",176.112,38532,1)
+789643^^Y
+"DATA",176.112,38533,0)
+4003333^GLOBULIN,IMMUNE (IV) 20GM/VIL INJ
+"DATA",176.112,38533,1)
+789645^^Y
+"DATA",176.112,38534,0)
+4009208^GLUCOSE 30GM LIQUID,ORAL
+"DATA",176.112,38534,1)
+789647^^Y
+"DATA",176.112,38535,0)
+4026686^ZINC LOZENGE
+"DATA",176.112,38535,1)
+789680^^Y
+"DATA",176.112,38536,0)
+4008308^YTTERBIUM (YB-169) DTPA 2.5MIC/VIL INJ
+"DATA",176.112,38536,1)
+789684^^Y
+"DATA",176.112,38537,0)
+4007994^IODOHIPPURATE NA,I-123, 1MIL/ML INJ
+"DATA",176.112,38537,1)
+789687^^Y
+"DATA",176.112,38538,0)
+4001520^IODOHIPPURATE NA,I-131,0.25MIL INJ
+"DATA",176.112,38538,1)
+789689^^Y
+"DATA",176.112,38539,0)
+4001521^IODOHIPPURATE NA,I-131,0.2MIL/ML INJ
+"DATA",176.112,38539,1)
+789692^^Y
+"DATA",176.112,38540,0)
+4001522^IODOHIPPURATE NA,I-131,0.8MIL INJ
+"DATA",176.112,38540,1)
+789695^^Y
+"DATA",176.112,38541,0)
+4003946^XENON (XE-133) 5MIL/ML GAS
+"DATA",176.112,38541,1)
+789699^^Y
+"DATA",176.112,38542,0)
+4001519^IODOHIPPURATE NA,I-131,2MIL/VIL INJ
+"DATA",176.112,38542,1)
+789700^^Y
+"DATA",176.112,38543,0)
+4003948^XENON (XE-133) 380MIL GAS
+"DATA",176.112,38543,1)
+789703^^Y
+"DATA",176.112,38544,0)
+4009775^KARAYA GUM PWDR
+"DATA",176.112,38544,1)
+789712^^Y
+"DATA",176.112,38545,0)
+4003947^XENON (XE-133) 10MIL/ML GAS
+"DATA",176.112,38545,1)
+789718^^Y
+"DATA",176.112,38546,0)
+4004393^LIDOCAINE HCL 2GM/BAG INJ
+"DATA",176.112,38546,1)
+789728^^Y
+"DATA",176.112,38547,0)
+4008977^MAGNESIUM 500MG TAB
+"DATA",176.112,38547,1)
+789733^^Y
+"DATA",176.112,38548,0)
+4007842^METHYLENE DIPHOSPHONIC ACID 8MG/STANNOUS CL 0.85MG INJ
+"DATA",176.112,38548,1)
+789750^^Y
+"DATA",176.112,38549,0)
+4002030^TUBERCULIN,PURIFIED PROTEIN DERIVATIVE 5UNT/TEST INJ
+"DATA",176.112,38549,1)
+789760^^Y
+"DATA",176.112,38550,0)
+4002033^TUBERCULIN,PURIFIED PROTEIN DERIVATIVE 1UNT/TEST INJ
+"DATA",176.112,38550,1)
+789768^^Y
+"DATA",176.112,38551,0)
+4003962^THALLOUS CHLORIDE (TL-201) 2MIL/ML INJ
+"DATA",176.112,38551,1)
+789803^^Y
+"DATA",176.112,38552,0)
+4004188^METRIZAMIDE 13.5GM/VIL INJ
+"DATA",176.112,38552,1)
+789804^^Y
+"DATA",176.112,38553,0)
+4003960^THALLOUS CHLORIDE (TL-201) 1MIL/ML INJ
+"DATA",176.112,38553,1)
+789807^^Y
+"DATA",176.112,38554,0)
+4003961^THALLOUS CHLORIDE (TL-201) 1MIL INJ
+"DATA",176.112,38554,1)
+789811^^Y
+"DATA",176.112,38555,0)
+4004185^METRIZAMIDE 3.75GM/VIL INJ
+"DATA",176.112,38555,1)
+789813^^Y
+"DATA",176.112,38556,0)
+4007957^TECHNETIUM Tc 99m 0 INJ
+"DATA",176.112,38556,1)
+789821^^Y
+"DATA",176.112,38557,0)
+4004186^METRIZAMIDE 6.75GM/VIL INJ
+"DATA",176.112,38557,1)
+789824^^Y
+"DATA",176.112,38558,0)
+4007959^TECHNETIUM (Tc 99m) 30MIL INJ
+"DATA",176.112,38558,1)
+789826^^Y
+"DATA",176.112,38559,0)
+4007958^TECHNETIUM (Tc 99m) 10MIL INJ
+"DATA",176.112,38559,1)
+789831^^Y
+"DATA",176.112,38560,0)
+4003952^MOLYBDENUM (MO-99) 100MIL INJ
+"DATA",176.112,38560,1)
+789839^^Y
+"DATA",176.112,38561,0)
+4012154^STRONTIUM-89 CL 148MBq,4mCi/10ML INJ
+"DATA",176.112,38561,1)
+789840^^Y
+"DATA",176.112,38562,0)
+4003957^MOLYBDENUM (MO-99) 150MIL INJ
+"DATA",176.112,38562,1)
+789843^^Y
+"DATA",176.112,38563,0)
+4003953^MOLYBDENUM (MO-99) 200MIL INJ
+"DATA",176.112,38563,1)
+789846^^Y
+"DATA",176.112,38564,0)
+4002041^SODIUM PERTECHNETATE (Tc 99m) 60MIL INJ
+"DATA",176.112,38564,1)
+789849^^Y
+"DATA",176.112,38565,0)
+4003958^MOLYBDENUM (MO-99) 3000MIL INJ
+"DATA",176.112,38565,1)
+789850^^Y
+"DATA",176.112,38566,0)
+4003954^MOLYBDENUM (MO-99) 300MIL INJ
+"DATA",176.112,38566,1)
+789854^^Y
+"DATA",176.112,38567,0)
+4003951^SODIUM MOLYBDATE (V1) 50MIL INJ
+"DATA",176.112,38567,1)
+789856^^Y
+"DATA",176.112,38568,0)
+4003955^MOLYBDENUM (MO-99) 400MIL INJ
+"DATA",176.112,38568,1)
+789857^^Y
+"DATA",176.112,38569,0)
+4001525^SODIUM IODIDE,I-131,7.05MIL SOLN
+"DATA",176.112,38569,1)
+789860^^Y
+"DATA",176.112,38570,0)
+4003959^MOLYBDENUM (MO-99) 50 MIL/ML INJ
+"DATA",176.112,38570,1)
+789861^^Y
+"DATA",176.112,38571,0)
+4001523^SODIUM IODIDE,I-131,50MIL CAP
+"DATA",176.112,38571,1)
+789865^^Y
+"DATA",176.112,38572,0)
+4003956^MOLYBDENUM (MO-99) 500MIL INJ
+"DATA",176.112,38572,1)
+789866^^Y
+"DATA",176.112,38573,0)
+4001530^SODIUM IODIDE,I-131,2MIL/ML SOLN,ORAL
+"DATA",176.112,38573,1)
+789869^^Y
+"DATA",176.112,38574,0)
+4001312^MOXALACTAM DISODIUM 10GM/VIL INJ
+"DATA",176.112,38574,1)
+789871^^Y
+"DATA",176.112,38575,0)
+4001526^SODIUM IODIDE,I-131,15MIL CAP
+"DATA",176.112,38575,1)
+789874^^Y
+"DATA",176.112,38576,0)
+4001529^SODIUM IODIDE,I-131,100MIC CAP
+"DATA",176.112,38576,1)
+789878^^Y
+"DATA",176.112,38577,0)
+4001527^SODIUM IODIDE,I-131,0.067MIL/ML SOLN
+"DATA",176.112,38577,1)
+789882^^Y
+"DATA",176.112,38578,0)
+4015295^NITRIC OXIDE 100PPM GAS
+"DATA",176.112,38578,1)
+789884^^Y
+"DATA",176.112,38579,0)
+4007992^SODIUM IODIDE,I-123,200MIC CAP
+"DATA",176.112,38579,1)
+789885^^Y
+"DATA",176.112,38580,0)
+4015294^NITRIC OXIDE 800PPM GAS
+"DATA",176.112,38580,1)
+789890^^Y
+"DATA",176.112,38581,0)
+4007991^SODIUM IODIDE,I-123,1MIL SOLN
+"DATA",176.112,38581,1)
+789891^^Y
+"DATA",176.112,38582,0)
+4000825^PENICILLIN G PROCAINE 1500000UNT/VIL INJ
+"DATA",176.112,38582,1)
+789914^^Y
+"DATA",176.112,38583,0)
+4008004^PENTETATE PENTASODIUM 5MG/STANNOUS CL 0.25MG INJ
+"DATA",176.112,38583,1)
+789918^^Y
+"DATA",176.112,38584,0)
+4001513^SODIUM CHROMATE,CR-51,250MIC/VIL INJ
+"DATA",176.112,38584,1)
+789926^^Y
+"DATA",176.112,38585,0)
+4008102^ROSE BENGAL SODIUM,I-131,0.5MIL/ML INJ
+"DATA",176.112,38585,1)
+789945^^Y
+"DATA",176.112,38586,0)
+4009263^SERMORELIN ACETATE 50MCG/AMP INJ
+"DATA",176.112,38586,1)
+789948^^Y
+"DATA",176.112,38587,0)
+4008101^ROSE BENGAL SODIUM,I-131,O.5MIL INJ
+"DATA",176.112,38587,1)
+789949^^Y
+"DATA",176.112,38588,0)
+4013214^SAMARIUM Sm153 LEXIDRONAM 1850MBq/ML INJ,VIL,2ML
+"DATA",176.112,38588,1)
+789961^^Y
+"DATA",176.112,38589,0)
+4001515^SELENOMETHIONINE,SE-75,550MIC/VIL INJ
+"DATA",176.112,38589,1)
+789964^^Y
+"DATA",176.112,38590,0)
+4001517^SELENOMETHIONINE,SE-75 300MIC/ML,INJ
+"DATA",176.112,38590,1)
+789965^^Y
+"DATA",176.112,38591,0)
+4001518^SELENOMETHIONINE,SE-75,0.3MIL INJ
+"DATA",176.112,38591,1)
+789968^^Y
+"DATA",176.112,38592,0)
+4001516^SELENOMETHIONINE,SE-75,0.1MIL/ML INJ
+"DATA",176.112,38592,1)
+789969^^Y
+"DATA",176.112,38593,0)
+4010501^ASCORBIC AC 75MG/CYANOCOBALAMIN 15MCG/FA 0.5MG/IRON 110MG TAB
+"DATA",176.112,38593,1)
+790281^^Y
+"DATA",176.112,38594,0)
+4008320^INSECT STING TREATMENT KIT INJ
+"DATA",176.112,38594,1)
+790424^^Y
+"DATA",176.112,38595,0)
+4027007^ANTIHEMOPHILIC FACTOR 1,000UNT/VON WILLEBRAND FACTOR 400UNT INJ
+"DATA",176.112,38595,1)
+790495^^Y
+"DATA",176.112,38596,0)
+4027008^ANTIHEMOPHILIC FACTOR 1,500UNT/VON WILLEBRAND FACTOR 600UNT INJ
+"DATA",176.112,38596,1)
+790496^^Y
+"DATA",176.112,38597,0)
+4027005^ANTIHEMOPHILIC FACTOR 250UNT/VON WILLEBRAND FACTOR 100UNT INJ
+"DATA",176.112,38597,1)
+790497^^Y
+"DATA",176.112,38598,0)
+4027006^ANTIHEMOPHILIC FACTOR 500UNT/VON WILLEBRAND FACTOR 200UNT INJ
+"DATA",176.112,38598,1)
+790498^^Y
+"DATA",176.112,38599,0)
+4027099^CLINIMIX E 4.25/10 INJ
+"DATA",176.112,38599,1)
+790571^^Y
+"DATA",176.112,38600,0)
+4027148^CURCUMA CAP/TAB
+"DATA",176.112,38600,1)
+790578^^Y
+"DATA",176.112,38601,0)
+4027055^VIT B/VIT C 150MG/FE SUMALATE 70MG/STOMACH EXT CAP
+"DATA",176.112,38601,1)
+790677^^Y
+"DATA",176.112,38602,0)
+4025963^BISACODYL 5MG TAB #4/PEG-3350/ELECTROLYTES KIT
+"DATA",176.112,38602,1)
+790696^^Y
+"DATA",176.112,38603,0)
+4026627^LIDOCAINE HCL 4% LARYNG-O-JET SOLN,TOP
+"DATA",176.112,38603,1)
+790825^^Y
+"DATA",176.112,38604,0)
+4027090^ADHESIVE,NU-HOPE #2400
+"DATA",176.112,38604,1)
+790896^^Y
+"DATA",176.112,38605,0)
+4027085^ASCENSIA CONTOUR (GLUCOSE) METER
+"DATA",176.112,38605,1)
+790897^^Y
+"DATA",176.112,38606,0)
+4027108^ATTENDS BRIEF PULL-ON X-LARGE
+"DATA",176.112,38606,1)
+790898^^Y
+"DATA",176.112,38607,0)
+4026984^BAG,LEG BARD #150932,32 OZ
+"DATA",176.112,38607,1)
+790899^^Y
+"DATA",176.112,38608,0)
+4027140^BAG,URINARY DRAINAGE MEDLINE #DYND15207
+"DATA",176.112,38608,1)
+790900^^Y
+"DATA",176.112,38609,0)
+4027029^BANDAGE TUBULAR ELASTIC SZ C C#151450
+"DATA",176.112,38609,1)
+790901^^Y
+"DATA",176.112,38610,0)
+4027138^BANDAGE,STRETCH 2IN X 2.5YD
+"DATA",176.112,38610,1)
+790902^^Y
+"DATA",176.112,38611,0)
+4027139^BANDAGE,STRETCH 3IN X 2.5YD
+"DATA",176.112,38611,1)
+790903^^Y
+"DATA",176.112,38612,0)
+4027110^BARRIER,ASSURA COLOPLAST #12844
+"DATA",176.112,38612,1)
+790904^^Y
+"DATA",176.112,38613,0)
+4027082^BARRIER,ASSURA COLOPLAST #14243
+"DATA",176.112,38613,1)
+790905^^Y
+"DATA",176.112,38614,0)
+4027083^BARRIER,ASSURA COLOPLAST #14246
+"DATA",176.112,38614,1)
+790906^^Y
+"DATA",176.112,38615,0)
+4027084^BARRIER,ASSURA COLOPLAST #14249
+"DATA",176.112,38615,1)
+790907^^Y
+"DATA",176.112,38616,0)
+4027092^BARRIER,ASSURA COLOPLAST #14271
+"DATA",176.112,38616,1)
+790908^^Y
+"DATA",176.112,38617,0)
+4027093^BARRIER,ASSURA COLOPLAST #14272
+"DATA",176.112,38617,1)
+790909^^Y
+"DATA",176.112,38618,0)
+4027094^BARRIER,ASSURA COLOPLAST #14273
+"DATA",176.112,38618,1)
+790910^^Y
+"DATA",176.112,38619,0)
+4027095^BARRIER,ASSURA COLOPLAST #14274
+"DATA",176.112,38619,1)
+790911^^Y
+"DATA",176.112,38620,0)
+4027089^BARRIER,ASSURA COLOPLAST #14275
+"DATA",176.112,38620,1)
+790912^^Y
+"DATA",176.112,38621,0)
+4027096^BARRIER,ASSURA COLOPLAST #14276
+"DATA",176.112,38621,1)
+790913^^Y
+"DATA",176.112,38622,0)
+4027097^BARRIER,ASSURA COLOPLAST #14277
+"DATA",176.112,38622,1)
+790914^^Y
+"DATA",176.112,38623,0)
+4027115^BARRIER,ASSURA COLOPLAST #14278
+"DATA",176.112,38623,1)
+790915^^Y
+"DATA",176.112,38624,0)
+4026976^BARRIER,CENTERPOINTLOCK 1-1/4IN H#3722
+"DATA",176.112,38624,1)
+790916^^Y
+"DATA",176.112,38625,0)
+4026974^BARRIER,CENTERPOINTLOCK 1-3/4IN H#3723
+"DATA",176.112,38625,1)
+790917^^Y
+"DATA",176.112,38626,0)
+4026975^BARRIER,CENTERPOINTLOCK 1IN H#3727
+"DATA",176.112,38626,1)
+790918^^Y
+"DATA",176.112,38627,0)
+4026977^BARRIER,CENTERPOINTLOCK 2-1/4IN H#3724
+"DATA",176.112,38627,1)
+790919^^Y
+"DATA",176.112,38628,0)
+4026978^BARRIER,CENTERPOINTLOCK 3-1/2IN H#3726
+"DATA",176.112,38628,1)
+790920^^Y
+"DATA",176.112,38629,0)
+4027057^BARRIER,OSTOMY,NEW IMAGE H#14301
+"DATA",176.112,38629,1)
+790921^^Y
+"DATA",176.112,38630,0)
+4027058^BARRIER,OSTOMY,NEW IMAGE H#14302
+"DATA",176.112,38630,1)
+790922^^Y
+"DATA",176.112,38631,0)
+4027059^BARRIER,OSTOMY,NEW IMAGE H#14303
+"DATA",176.112,38631,1)
+790923^^Y
+"DATA",176.112,38632,0)
+4027060^BARRIER,OSTOMY,NEW IMAGE H#14304
+"DATA",176.112,38632,1)
+790924^^Y
+"DATA",176.112,38633,0)
+4027061^BARRIER,OSTOMY,NEW IMAGE H#14305
+"DATA",176.112,38633,1)
+790925^^Y
+"DATA",176.112,38634,0)
+4027062^BARRIER,OSTOMY,NEW IMAGE H#14306
+"DATA",176.112,38634,1)
+790926^^Y
+"DATA",176.112,38635,0)
+4027063^BARRIER,OSTOMY,NEW IMAGE H#14307
+"DATA",176.112,38635,1)
+790927^^Y
+"DATA",176.112,38636,0)
+4027032^BARRIER,OSTOMY,NEW IMAGE H#14308
+"DATA",176.112,38636,1)
+790928^^Y
+"DATA",176.112,38637,0)
+4027056^BARRIER,OSTOMY,NEW IMAGE H#14309
+"DATA",176.112,38637,1)
+790929^^Y
+"DATA",176.112,38638,0)
+4026990^BARRIER,OSTOMY,NEW IMAGE H#15502
+"DATA",176.112,38638,1)
+790930^^Y
+"DATA",176.112,38639,0)
+4026981^BELT,SUPPORT 4IN LARGE NU-HOPE #2667-A
+"DATA",176.112,38639,1)
+790931^^Y
+"DATA",176.112,38640,0)
+4027045^BELT,SUPPORT 4IN LARGE NU-HOPE #2667-B
+"DATA",176.112,38640,1)
+790932^^Y
+"DATA",176.112,38641,0)
+4027114^BELT,SUPPORT 4IN LARGE NU-HOPE #2667-C
+"DATA",176.112,38641,1)
+790933^^Y
+"DATA",176.112,38642,0)
+4027044^BELT,SUPPORT 4IN X-LARGE NU-HOPE #2668-A
+"DATA",176.112,38642,1)
+790934^^Y
+"DATA",176.112,38643,0)
+4027043^BELT,SUPPORT 4IN X-LARGE NU-HOPE #2668-BP
+"DATA",176.112,38643,1)
+790935^^Y
+"DATA",176.112,38644,0)
+4027113^BELT,SUPPORT 4IN X-LARGE NU-HOPE #2668-C
+"DATA",176.112,38644,1)
+790936^^Y
+"DATA",176.112,38645,0)
+4027046^BELT,SUPPORT 5IN XX-LARGE NU-HOPE #6424-A
+"DATA",176.112,38645,1)
+790937^^Y
+"DATA",176.112,38646,0)
+4027042^BELT,SUPPORT 6IN LARGE NU-HOPE #6432-M
+"DATA",176.112,38646,1)
+790938^^Y
+"DATA",176.112,38647,0)
+4027041^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6433-A
+"DATA",176.112,38647,1)
+790939^^Y
+"DATA",176.112,38648,0)
+4026982^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6433-B
+"DATA",176.112,38648,1)
+790940^^Y
+"DATA",176.112,38649,0)
+4027040^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6433-C
+"DATA",176.112,38649,1)
+790941^^Y
+"DATA",176.112,38650,0)
+4026980^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6433-SP
+"DATA",176.112,38650,1)
+790942^^Y
+"DATA",176.112,38651,0)
+4027127^BELT,SUPPORT 8IN LARGE NU-HOPE #6457
+"DATA",176.112,38651,1)
+790943^^Y
+"DATA",176.112,38652,0)
+4027126^BELT,SUPPORT 8IN MEDIUM NU-HOPE #6456
+"DATA",176.112,38652,1)
+790944^^Y
+"DATA",176.112,38653,0)
+4027125^BELT,SUPPORT 8IN SMALL NU-HOPE #6455
+"DATA",176.112,38653,1)
+790945^^Y
+"DATA",176.112,38654,0)
+4027047^BELT,SUPPORT 8IN X-LARGE NU-HOPE #6458
+"DATA",176.112,38654,1)
+790946^^Y
+"DATA",176.112,38655,0)
+4027128^BELT,SUPPORT 8IN XX-LARGE NU-HOPE #6459
+"DATA",176.112,38655,1)
+790947^^Y
+"DATA",176.112,38656,0)
+4027122^BELT,SUPPORT 9IN LARGE NU-HOPE #6732
+"DATA",176.112,38656,1)
+790948^^Y
+"DATA",176.112,38657,0)
+4027121^BELT,SUPPORT 9IN MEDIUM NU-HOPE #6731
+"DATA",176.112,38657,1)
+790949^^Y
+"DATA",176.112,38658,0)
+4027120^BELT,SUPPORT 9IN SMALL NU-HOPE #6730
+"DATA",176.112,38658,1)
+790950^^Y
+"DATA",176.112,38659,0)
+4027119^BELT,SUPPORT 9IN X-LARGE NU-HOPE #6733
+"DATA",176.112,38659,1)
+790951^^Y
+"DATA",176.112,38660,0)
+4027123^BELT,SUPPORT 9IN XX-LARGE NU-HOPE #6734
+"DATA",176.112,38660,1)
+790952^^Y
+"DATA",176.112,38661,0)
+4027103^BRACELET,MEDICAL ALERT ALZHEIMERS
+"DATA",176.112,38661,1)
+790953^^Y
+"DATA",176.112,38662,0)
+4027104^BRACELET,MEDICAL ALERT ASTHMA
+"DATA",176.112,38662,1)
+790954^^Y
+"DATA",176.112,38663,0)
+4027105^BRACELET,MEDICAL ALERT DIABETES
+"DATA",176.112,38663,1)
+790955^^Y
+"DATA",176.112,38664,0)
+4027102^BRACELET,MEDICAL ALERT EPILEPSY
+"DATA",176.112,38664,1)
+790956^^Y
+"DATA",176.112,38665,0)
+4027106^BRACELET,MEDICAL ALERT HEART DISEASE
+"DATA",176.112,38665,1)
+790957^^Y
+"DATA",176.112,38666,0)
+4027107^BRACELET,MEDICAL ALERT HEMOPHILIA
+"DATA",176.112,38666,1)
+790958^^Y
+"DATA",176.112,38667,0)
+4027054^CATHETER,EXTERNAL CONVEEN #5125H SMALL
+"DATA",176.112,38667,1)
+790959^^Y
+"DATA",176.112,38668,0)
+4027053^CATHETER,EXTERNAL CONVEEN #5130H MEDIUM
+"DATA",176.112,38668,1)
+790960^^Y
+"DATA",176.112,38669,0)
+4027052^CATHETER,EXTERNAL CONVEEN #5135H LARGE
+"DATA",176.112,38669,1)
+790961^^Y
+"DATA",176.112,38670,0)
+4027033^CATHETER,EXTERNAL CONVEEN #5140H X-LARGE
+"DATA",176.112,38670,1)
+790962^^Y
+"DATA",176.112,38671,0)
+4027038^CATHETER,EXTERNAL GOLDEN DRAIN #E7000
+"DATA",176.112,38671,1)
+790963^^Y
+"DATA",176.112,38672,0)
+4027037^CATHETER,EXTERNAL GOLDEN DRAIN LG #A1000
+"DATA",176.112,38672,1)
+790964^^Y
+"DATA",176.112,38673,0)
+4027132^COLLAGEN,AVITENE MICROFIBRILLAR 70X35MM SHEET
+"DATA",176.112,38673,1)
+790967^^Y
+"DATA",176.112,38674,0)
+4027030^COMFORT BATH SAGE #7904
+"DATA",176.112,38674,1)
+790968^^Y
+"DATA",176.112,38675,0)
+4027023^COVERLET,EYE PATCH 2IN X 3IN
+"DATA",176.112,38675,1)
+790969^^Y
+"DATA",176.112,38676,0)
+4027028^CUNNINGHAM CLAMP,JUVENILE,BARD #004052
+"DATA",176.112,38676,1)
+790970^^Y
+"DATA",176.112,38677,0)
+4026985^DEPEND OVERNITE BRIEF LARGE
+"DATA",176.112,38677,1)
+790971^^Y
+"DATA",176.112,38678,0)
+4027079^DRESSING,COVADERM PLUS 2.5IN X 2.5IN DEROYAL #46-411
+"DATA",176.112,38678,1)
+790972^^Y
+"DATA",176.112,38679,0)
+4027080^DRESSING,COVADERM PLUS 2IN X 2IN DEROYAL #46-400
+"DATA",176.112,38679,1)
+790973^^Y
+"DATA",176.112,38680,0)
+4027078^DRESSING,COVADERM PLUS 6IN X 8IN DEROYAL #46-403
+"DATA",176.112,38680,1)
+790975^^Y
+"DATA",176.112,38681,0)
+4027035^ENEMA SET,BAG TYPE KENDALL #145540
+"DATA",176.112,38681,1)
+790976^^Y
+"DATA",176.112,38682,0)
+4027034^FLUTTER MUCUS CLEARANCE DEVICE
+"DATA",176.112,38682,1)
+790977^^Y
+"DATA",176.112,38683,0)
+4026991^HOSE ANTI-EMBOLISM KNEE LEN XX-LRG-SHORT
+"DATA",176.112,38683,1)
+790978^^Y
+"DATA",176.112,38684,0)
+4027142^HUMAPEN LUXURA HD DEVICE
+"DATA",176.112,38684,1)
+790979^^Y
+"DATA",176.112,38685,0)
+4027141^HUMAPEN MEMOIR DEVICE
+"DATA",176.112,38685,1)
+790980^^Y
+"DATA",176.112,38686,0)
+4026998^INCONT LINER ATTENDS GUARDS
+"DATA",176.112,38686,1)
+790981^^Y
+"DATA",176.112,38687,0)
+4027031^INCONT LINER DIGNITY PLUS SUPER ABSORB
+"DATA",176.112,38687,1)
+790982^^Y
+"DATA",176.112,38688,0)
+4027143^INHALER,FORADIL DEVICE
+"DATA",176.112,38688,1)
+790983^^Y
+"DATA",176.112,38689,0)
+4027144^INHALER,SPIRIVA DEVICE
+"DATA",176.112,38689,1)
+790984^^Y
+"DATA",176.112,38690,0)
+4026979^INSULIN SYRINGE 0.5ML 30G 0.5IN
+"DATA",176.112,38690,1)
+790985^^Y
+"DATA",176.112,38691,0)
+4027036^IRRIGATION SET,COLOPLAST #1501
+"DATA",176.112,38691,1)
+790986^^Y
+"DATA",176.112,38692,0)
+4027116^IV SET PRIMARY,NON-VENTED HOSPIRA #11545-58
+"DATA",176.112,38692,1)
+790987^^Y
+"DATA",176.112,38693,0)
+4027020^LANCET,E-Z JECT 21G
+"DATA",176.112,38693,1)
+790988^^Y
+"DATA",176.112,38694,0)
+4026992^LEG BAG FREEDOM COLOPLAST #7086
+"DATA",176.112,38694,1)
+790989^^Y
+"DATA",176.112,38695,0)
+4027124^MEDICATION ORGANIZER 7DAY/2 SLOT
+"DATA",176.112,38695,1)
+790990^^Y
+"DATA",176.112,38696,0)
+4027073^POISE PAD,MAXIMUM ABSORBENCY EXTRA COVERAGE
+"DATA",176.112,38696,1)
+790991^^Y
+"DATA",176.112,38697,0)
+4027072^POISE PAD,MODERATE ABSORB EXTRA COVERAGE
+"DATA",176.112,38697,1)
+790992^^Y
+"DATA",176.112,38698,0)
+4027071^POISE PAD,MODERATE ABSORBENCY
+"DATA",176.112,38698,1)
+790993^^Y
+"DATA",176.112,38699,0)
+4027049^POUCH,CLOSED,ASSURA COLOPLAST #14331
+"DATA",176.112,38699,1)
+790994^^Y
+"DATA",176.112,38700,0)
+4027039^POUCH,CLOSED,ASSURA COLOPLAST #14332
+"DATA",176.112,38700,1)
+790995^^Y
+"DATA",176.112,38701,0)
+4027050^POUCH,CLOSED,ASSURA COLOPLAST #14333
+"DATA",176.112,38701,1)
+790996^^Y
+"DATA",176.112,38702,0)
+4027051^POUCH,CLOSED,ASSURA COLOPLAST #14334
+"DATA",176.112,38702,1)
+790997^^Y
+"DATA",176.112,38703,0)
+4026993^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-06
+"DATA",176.112,38703,1)
+790998^^Y
+"DATA",176.112,38704,0)
+4027066^POUCH,DRAINABLE,PREMIER H#88325
+"DATA",176.112,38704,1)
+790999^^Y
+"DATA",176.112,38705,0)
+4027064^POUCH,DRAINABLE,PREMIER H#88330
+"DATA",176.112,38705,1)
+791000^^Y
+"DATA",176.112,38706,0)
+4026994^POUCH,DRAINABLE,PREMIER H#88335
+"DATA",176.112,38706,1)
+791001^^Y
+"DATA",176.112,38707,0)
+4027065^POUCH,DRAINABLE,PREMIER H#88340
+"DATA",176.112,38707,1)
+791002^^Y
+"DATA",176.112,38708,0)
+4027067^POUCH,DRAINABLE,PREMIER H#88425
+"DATA",176.112,38708,1)
+791003^^Y
+"DATA",176.112,38709,0)
+4027068^POUCH,DRAINABLE,PREMIER H#88430
+"DATA",176.112,38709,1)
+791004^^Y
+"DATA",176.112,38710,0)
+4027069^POUCH,DRAINABLE,PREMIER H#88435
+"DATA",176.112,38710,1)
+791005^^Y
+"DATA",176.112,38711,0)
+4027070^POUCH,DRAINABLE,PREMIER H#88440
+"DATA",176.112,38711,1)
+791006^^Y
+"DATA",176.112,38712,0)
+4027111^POUCH,DRAINABLE,SUR-FIT C#4113-11
+"DATA",176.112,38712,1)
+791007^^Y
+"DATA",176.112,38713,0)
+4027003^POUCH,DRAINABLE,SUR-FIT C#4113-61
+"DATA",176.112,38713,1)
+791008^^Y
+"DATA",176.112,38714,0)
+4027004^POUCH,DRAINABLE,SUR-FIT C#4113-62
+"DATA",176.112,38714,1)
+791009^^Y
+"DATA",176.112,38715,0)
+4027022^POUCH,OSTOMY MARLEN MDW 10-201
+"DATA",176.112,38715,1)
+791010^^Y
+"DATA",176.112,38716,0)
+4027117^POUCH,OSTOMY RUBBER MARLEN #MP-2-L
+"DATA",176.112,38716,1)
+791011^^Y
+"DATA",176.112,38717,0)
+4027112^POUCH,OSTOMY,SUR-FIT NATURA C#4131-72
+"DATA",176.112,38717,1)
+791012^^Y
+"DATA",176.112,38718,0)
+4027027^POUCH,UROSTOMY,NEW IMAGE H#18413
+"DATA",176.112,38718,1)
+791013^^Y
+"DATA",176.112,38719,0)
+4027026^POUCH,UROSTOMY,NEW IMAGE H#18414
+"DATA",176.112,38719,1)
+791014^^Y
+"DATA",176.112,38720,0)
+4027129^PROTEIN SUPPLEMENT,PROPASS PWDR PKT,8GM
+"DATA",176.112,38720,1)
+791017^^Y
+"DATA",176.112,38721,0)
+4027151^RING,OVAL CONVEX MARLEN GN60
+"DATA",176.112,38721,1)
+791018^^Y
+"DATA",176.112,38722,0)
+4027152^RING,RIGID MARLEN RN25
+"DATA",176.112,38722,1)
+791019^^Y
+"DATA",176.112,38723,0)
+4027091^SALIVA,ARTIFICIAL (CAPHOSOL) LIQUID,60,KIT
+"DATA",176.112,38723,1)
+791020^^Y
+"DATA",176.112,38724,0)
+4027001^SET,INFUSION ANIMAS #187-00
+"DATA",176.112,38724,1)
+791021^^Y
+"DATA",176.112,38725,0)
+4027002^SET,INFUSION ANIMAS #187-01
+"DATA",176.112,38725,1)
+791022^^Y
+"DATA",176.112,38726,0)
+4027000^SET,INFUSION ANIMAS #187-02
+"DATA",176.112,38726,1)
+791023^^Y
+"DATA",176.112,38727,0)
+4026999^SET,INFUSION ANIMAS #187-03
+"DATA",176.112,38727,1)
+791024^^Y
+"DATA",176.112,38728,0)
+4027014^ENSURE LIQUID BUTTER PECAN
+"DATA",176.112,38728,1)
+791027^^Y
+"DATA",176.112,38729,0)
+4027048^SPONGE,DRAIN 4IN X 4IN EXCILON KEN#7084
+"DATA",176.112,38729,1)
+791028^^Y
+"DATA",176.112,38730,0)
+4027109^TUBE FEEDING SET COMPAT #199312
+"DATA",176.112,38730,1)
+791029^^Y
+"DATA",176.112,38731,0)
+4026995^TUBE FEEDING SET PATROL K#52048
+"DATA",176.112,38731,1)
+791030^^Y
+"DATA",176.112,38732,0)
+4027145^TUBING,EXTENSION 18IN W/CONNECTOR MENTOR #7082
+"DATA",176.112,38732,1)
+791031^^Y
+"DATA",176.112,38733,0)
+4027130^UNDERPAD,BED HARMONIE 23IN X 36IN
+"DATA",176.112,38733,1)
+791032^^Y
+"DATA",176.112,38734,0)
+4026997^URINARY DRAINAGE BAG BARD #154114
+"DATA",176.112,38734,1)
+791034^^Y
+"DATA",176.112,38735,0)
+4026996^URINARY DRAINAGE BAG BARD #154114A
+"DATA",176.112,38735,1)
+791035^^Y
+"DATA",176.112,38736,0)
+4027147^CURCUMA PWDR
+"DATA",176.112,38736,1)
+791054^^Y
+"DATA",176.112,38737,0)
+4027025^LIP BALM,PETROLATUM
+"DATA",176.112,38737,1)
+791067^^Y
+"DATA",176.112,38738,0)
+4027024^WATER,DISTILLED
+"DATA",176.112,38738,1)
+791121^^Y
+"DATA",176.112,38739,0)
+4027131^CLEANSER,RESTORE H#529978
+"DATA",176.112,38739,1)
+791122^^Y
+"DATA",176.112,38740,0)
+4016798^TUBERCULIN SYRINGE 1ML NEEDLELESS
+"DATA",176.112,38740,1)
+792255^^Y
+"DATA",176.112,38741,0)
+4012019^TUBERCULIN SYRINGE 1ML 28G 1/2IN
+"DATA",176.112,38741,1)
+792256^^Y
+"DATA",176.112,38742,0)
+4012017^TUBERCULIN SYRINGE 1ML 27G 1/2IN
+"DATA",176.112,38742,1)
+792257^^Y
+"DATA",176.112,38743,0)
+4012001^TUBERCULIN SYRINGE 1ML 26G 3/8IN
+"DATA",176.112,38743,1)
+792258^^Y
+"DATA",176.112,38744,0)
+4012000^TUBERCULIN SYRINGE 1ML 25G 5/8IN
+"DATA",176.112,38744,1)
+792259^^Y
+"DATA",176.112,38745,0)
+4008129^CA 100MG/ERGOCALCIFEROL 50UNT/SALICYLAMIDE 400MG TAB
+"DATA",176.112,38745,1)
+792315^^Y
+"DATA",176.112,38746,0)
+4025207^CALCIUM 1000MG/MAGNESIUM OXIDE 400MG/ZINC GLUCONATE 15MG TAB
+"DATA",176.112,38746,1)
+792329^^Y
+"DATA",176.112,38747,0)
+4008758^CALCIUM 114MG/VIT D 133UNT/PHOSPHORUS 88MG TAB
+"DATA",176.112,38747,1)
+792332^^Y
+"DATA",176.112,38748,0)
+4008756^CALCIUM 116.7MG/VIT D 133UNT/PHOSPHORUS 90MG TAB
+"DATA",176.112,38748,1)
+792334^^Y
+"DATA",176.112,38749,0)
+4008757^CALCIUM 232MG/VIT D 200UNT/PHOSPHORUS 180MG WAFER
+"DATA",176.112,38749,1)
+792413^^Y
+"DATA",176.112,38750,0)
+4009239^CALCIUM 250MG/VITAMIN D 125UNT TAB
+"DATA",176.112,38750,1)
+792421^^Y
+"DATA",176.112,38751,0)
+4008993^CALCIUM 300MG TAB
+"DATA",176.112,38751,1)
+792435^^Y
+"DATA",176.112,38752,0)
+4009241^CALCIUM 300MG/VITAMIN D 62.5UNT TAB
+"DATA",176.112,38752,1)
+792439^^Y
+"DATA",176.112,38753,0)
+4008991^CALCIUM 500MG TAB
+"DATA",176.112,38753,1)
+792448^^Y
+"DATA",176.112,38754,0)
+4009242^CALCIUM 500MG/VITAMIN D 200UNT TAB
+"DATA",176.112,38754,1)
+792452^^Y
+"DATA",176.112,38755,0)
+4008992^CALCIUM 600MG TAB
+"DATA",176.112,38755,1)
+792461^^Y
+"DATA",176.112,38756,0)
+4009240^CALCIUM 600MG/VITAMIN D 125UNT TAB
+"DATA",176.112,38756,1)
+792463^^Y
+"DATA",176.112,38757,0)
+4008994^CALCIUM 900MG CAP
+"DATA",176.112,38757,1)
+792469^^Y
+"DATA",176.112,38758,0)
+4008939^AVOBENZONE 3%/PADIMATE-O 7% LOTION
+"DATA",176.112,38758,1)
+792886^^Y
+"DATA",176.112,38759,0)
+4010208^PADIMATE O/PETROLATUM OINT,TOP
+"DATA",176.112,38759,1)
+792991^^Y
+"DATA",176.112,38760,0)
+4009229^OXYBENZONE/PADIMATE O LOTION
+"DATA",176.112,38760,1)
+793178^^Y
+"DATA",176.112,38761,0)
+4009226^OXYBENZONE 3%/PADIMATE O 8% OINT,TOP
+"DATA",176.112,38761,1)
+793196^^Y
+"DATA",176.112,38762,0)
+4009228^OXYBENZONE 3%/PADIMATE O 8% LOTION
+"DATA",176.112,38762,1)
+793197^^Y
+"DATA",176.112,38763,0)
+4009230^OXYBENZONE 3%/PADIMATE O 7% STICK
+"DATA",176.112,38763,1)
+793200^^Y
+"DATA",176.112,38764,0)
+4009227^OXYBENZONE 2%/PADIMATE O 5% LOTION
+"DATA",176.112,38764,1)
+793202^^Y
+"DATA",176.112,38765,0)
+4008260^HYDROQUINONE 4%/PADIMATE-O 3% CREAM,TOP
+"DATA",176.112,38765,1)
+793232^^Y
+"DATA",176.112,38766,0)
+4007057^CELLULOSE NA PHOSPHATE 2.5GM/UNT PWDR,ORAL
+"DATA",176.112,38766,1)
+793835^^Y
+"DATA",176.112,38767,0)
+4007090^ESTROGENS,CONJUGATED 2MG/ESTRONE 1.5MG INJ,SUSP
+"DATA",176.112,38767,1)
+793901^^Y
+"DATA",176.112,38768,0)
+4007192^ESTRONE 2.5MG/PROGESTERONE 2.5MG INJ,SUSP
+"DATA",176.112,38768,1)
+793911^^Y
+"DATA",176.112,38769,0)
+4007193^ESTRONE 2MG/TESTOSTERONE 25MG INJ,SUSP
+"DATA",176.112,38769,1)
+793913^^Y
+"DATA",176.112,38770,0)
+4007348^LEUPROLIDE ACETATE 7.5MG/VIL INJ,SUSP,SA
+"DATA",176.112,38770,1)
+793936^^Y
+"DATA",176.112,38771,0)
+4003514^SPECTINOMYCIN HCL 4GM/VIL INJ,SUSP
+"DATA",176.112,38771,1)
+793995^^Y
+"DATA",176.112,38772,0)
+4004055^VITAMIN A PALMITATE 300000UNT EMULSION
+"DATA",176.112,38772,1)
+794009^^Y
+"DATA",176.112,38773,0)
+4007967^DISOFENIN 20MG/STANNOUS CHLORIDE 0.24MG INJ,SUSP
+"DATA",176.112,38773,1)
+794020^^Y
+"DATA",176.112,38774,0)
+4013232^REBETRON 1000/MDV PKT (1236-02)
+"DATA",176.112,38774,1)
+794065^^Y
+"DATA",176.112,38775,0)
+4013231^REBETRON 1000/PAK 3 PKT (1241-02)
+"DATA",176.112,38775,1)
+794066^^Y
+"DATA",176.112,38776,0)
+4013233^REBETRON 1000/PEN PKT (1258-02)
+"DATA",176.112,38776,1)
+794070^^Y
+"DATA",176.112,38777,0)
+4013235^REBETRON 1200/MDV PKT (1236-01)
+"DATA",176.112,38777,1)
+794072^^Y
+"DATA",176.112,38778,0)
+4013234^REBETRON 1200/PAK 3 PKT (1241-01)
+"DATA",176.112,38778,1)
+794074^^Y
+"DATA",176.112,38779,0)
+4013236^REBETRON 1200/PEN PKT (1258-01)
+"DATA",176.112,38779,1)
+794076^^Y
+"DATA",176.112,38780,0)
+4013238^REBETRON 600/MDV PKT (1236-03)
+"DATA",176.112,38780,1)
+794079^^Y
+"DATA",176.112,38781,0)
+4013237^REBETRON 600/PAK 3 PKT (1241-03)
+"DATA",176.112,38781,1)
+794081^^Y
+"DATA",176.112,38782,0)
+4013239^REBETRON 600/PEN PKT (1258-03)
+"DATA",176.112,38782,1)
+794083^^Y
+"DATA",176.112,38783,0)
+4027242^FLAXSEED OIL CAP
+"DATA",176.112,38783,1)
+794688^^Y
+"DATA",176.112,38784,0)
+4027178^RENAL MULTIVITAMIN (RENAL TAB I) TAB,ORAL
+"DATA",176.112,38784,1)
+794704^^Y
+"DATA",176.112,38785,0)
+4027204^CAP,LUER LOCK TIP BAXA #65001
+"DATA",176.112,38785,1)
+794787^^Y
+"DATA",176.112,38786,0)
+4027238^CARTRIDGE,ANIMAS IR 2ML 1200 #100-052-01
+"DATA",176.112,38786,1)
+794788^^Y
+"DATA",176.112,38787,0)
+4027237^CARTRIDGE,ANIMAS IR 3ML 1000 #100-124-01
+"DATA",176.112,38787,1)
+794789^^Y
+"DATA",176.112,38788,0)
+4027220^CATHETER FOLEY 2-WAY 10FR 3CC M#DYND11710
+"DATA",176.112,38788,1)
+794790^^Y
+"DATA",176.112,38789,0)
+4027218^CATHETER FOLEY 2-WAY 16FR 5CC M#DYND11756
+"DATA",176.112,38789,1)
+794791^^Y
+"DATA",176.112,38790,0)
+4027219^CATHETER FOLEY 2-WAY 8FR 3CC M#DYND11708
+"DATA",176.112,38790,1)
+794792^^Y
+"DATA",176.112,38791,0)
+4027180^CATHETER HOLDER,COMFORT MATE #81360
+"DATA",176.112,38791,1)
+794793^^Y
+"DATA",176.112,38792,0)
+4027217^CATHETER,RED RUBBER 18FR M#DYND13518
+"DATA",176.112,38792,1)
+794794^^Y
+"DATA",176.112,38793,0)
+4027185^CATHETER,URETHRAL COUDE 12FR BARD #010112
+"DATA",176.112,38793,1)
+794795^^Y
+"DATA",176.112,38794,0)
+4027183^CATHETER,URETHRAL COUDE 14FR BARD #010114
+"DATA",176.112,38794,1)
+794796^^Y
+"DATA",176.112,38795,0)
+4027184^CATHETER,URETHRAL COUDE 16FR BARD #010116
+"DATA",176.112,38795,1)
+794797^^Y
+"DATA",176.112,38796,0)
+4027222^DIALYSATE,PRISMASATE BK2/0 SOLN
+"DATA",176.112,38796,1)
+794801^^Y
+"DATA",176.112,38797,0)
+4027225^DIGESTIVE AID W/ENZYMES CAP/TAB
+"DATA",176.112,38797,1)
+794802^^Y
+"DATA",176.112,38798,0)
+4027192^HEAT & MOISTURE EXCHANGER,THERMOVENT #570015
+"DATA",176.112,38798,1)
+794804^^Y
+"DATA",176.112,38799,0)
+4027210^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-00
+"DATA",176.112,38799,1)
+794849^^Y
+"DATA",176.112,38800,0)
+4027206^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-01
+"DATA",176.112,38800,1)
+794850^^Y
+"DATA",176.112,38801,0)
+4027207^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-02
+"DATA",176.112,38801,1)
+794851^^Y
+"DATA",176.112,38802,0)
+4027208^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-03
+"DATA",176.112,38802,1)
+794852^^Y
+"DATA",176.112,38803,0)
+4027205^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-04
+"DATA",176.112,38803,1)
+794853^^Y
+"DATA",176.112,38804,0)
+4027209^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-05
+"DATA",176.112,38804,1)
+794854^^Y
+"DATA",176.112,38805,0)
+4027211^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-08
+"DATA",176.112,38805,1)
+794855^^Y
+"DATA",176.112,38806,0)
+4027212^POUCH,DRAINABLE,ESTEEM SYNERGY C#4108-09
+"DATA",176.112,38806,1)
+794856^^Y
+"DATA",176.112,38807,0)
+4027236^RESOURCE BENEPROTEIN PWDR,227GM
+"DATA",176.112,38807,1)
+794912^^Y
+"DATA",176.112,38808,0)
+4027228^SET,INFUSION ANIMAS #006-00
+"DATA",176.112,38808,1)
+794913^^Y
+"DATA",176.112,38809,0)
+4027227^SET,INFUSION ANIMAS #006-01
+"DATA",176.112,38809,1)
+794914^^Y
+"DATA",176.112,38810,0)
+4027229^SET,INFUSION ANIMAS #240-01
+"DATA",176.112,38810,1)
+794915^^Y
+"DATA",176.112,38811,0)
+4027230^SET,INFUSION ANIMAS #240-03
+"DATA",176.112,38811,1)
+794916^^Y
+"DATA",176.112,38812,0)
+4027232^SET,INFUSION,CONTINU-FLO BAXTER #2C5671
+"DATA",176.112,38812,1)
+794917^^Y
+"DATA",176.112,38813,0)
+4027190^STATLOCK PICC PLUS,PIC0220 ANCHORING DEVICE
+"DATA",176.112,38813,1)
+794930^^Y
+"DATA",176.112,38814,0)
+4027191^STATLOCK PICC PLUS,PIC0222 ANCHORING DEVICE
+"DATA",176.112,38814,1)
+794931^^Y
+"DATA",176.112,38815,0)
+4027188^STATLOCK PICC PLUS,VPPCSP ANCHORING DEVICE
+"DATA",176.112,38815,1)
+794932^^Y
+"DATA",176.112,38816,0)
+4027189^STATLOCK PICC PLUS,VPPDFP ANCHORING DEVICE
+"DATA",176.112,38816,1)
+794933^^Y
+"DATA",176.112,38817,0)
+4027198^TRACH TUBE,SZ 10 CUFFED FLEX DIC #505100
+"DATA",176.112,38817,1)
+794934^^Y
+"DATA",176.112,38818,0)
+4027197^TRACH TUBE,SZ 10 CUFFLESS FLEX DIC #504100
+"DATA",176.112,38818,1)
+794935^^Y
+"DATA",176.112,38819,0)
+4027202^TRACH TUBE,SZ 6 CUFFED FLEX DIC #505060
+"DATA",176.112,38819,1)
+794936^^Y
+"DATA",176.112,38820,0)
+4027186^TRACH TUBE,SZ 6 CUFFLESS FLEX DIC #504060
+"DATA",176.112,38820,1)
+794937^^Y
+"DATA",176.112,38821,0)
+4027201^TRACH TUBE,SZ 7 CUFFED FLEX DIC #505070
+"DATA",176.112,38821,1)
+794938^^Y
+"DATA",176.112,38822,0)
+4027194^TRACH TUBE,SZ 7 CUFFLESS FLEX DIC #504070
+"DATA",176.112,38822,1)
+794939^^Y
+"DATA",176.112,38823,0)
+4027200^TRACH TUBE,SZ 8 CUFFED FLEX DIC #505080
+"DATA",176.112,38823,1)
+794940^^Y
+"DATA",176.112,38824,0)
+4027195^TRACH TUBE,SZ 8 CUFFLESS FLEX DIC #504080
+"DATA",176.112,38824,1)
+794941^^Y
+"DATA",176.112,38825,0)
+4027199^TRACH TUBE,SZ 9 CUFFED FLEX DIC #505090
+"DATA",176.112,38825,1)
+794942^^Y
+"DATA",176.112,38826,0)
+4027196^TRACH TUBE,SZ 9 CUFFLESS FLEX DIC #504090
+"DATA",176.112,38826,1)
+794943^^Y
+"DATA",176.112,38827,0)
+4027231^PHENOL W/APPLICATOR KIT
+"DATA",176.112,38827,1)
+794946^^Y
+"DATA",176.112,38828,0)
+4027241^SINUS RINSE NEILMED PKT
+"DATA",176.112,38828,1)
+794960^^Y
+"DATA",176.112,38829,0)
+4027240^SINUS RINSE NEILMED REGULAR KIT
+"DATA",176.112,38829,1)
+794961^^Y
+"DATA",176.112,38830,0)
+4016768^ASA 325MG/PRAVASTATIN NA 20MG TAB
+"DATA",176.112,38830,1)
+795363^^Y
+"DATA",176.112,38831,0)
+4016765^ASA 81MG/PRAVASTATIN NA 80MG TAB
+"DATA",176.112,38831,1)
+795377^^Y
+"DATA",176.112,38832,0)
+4009568^ACIDOPHILUS CAP
+"DATA",176.112,38832,1)
+795649^^Y
+"DATA",176.112,38833,0)
+4026164^ACTIVELLA 0.5MG/0.1MG TAB,28
+"DATA",176.112,38833,1)
+795710^^Y
+"DATA",176.112,38834,0)
+4026163^ACTIVELLA 1MG/0.5MG TAB,28
+"DATA",176.112,38834,1)
+795711^^Y
+"DATA",176.112,38835,0)
+4014767^ACTIVELLA TAB,28 PACK
+"DATA",176.112,38835,1)
+795711^^Y
+"DATA",176.112,38836,0)
+4025561^INTERFERON BETA-1A 8.8MCG X 6/22MCG X 6 SYR INJ (REBIF)
+"DATA",176.112,38836,1)
+795749^^Y
+"DATA",176.112,38837,0)
+4026466^SOMATROPIN (SAIZEN) 8.8MG/VIL INJ
+"DATA",176.112,38837,1)
+796918^^Y
+"DATA",176.112,38838,0)
+4016301^TERAZOSIN HCL STARTER PACK
+"DATA",176.112,38838,1)
+797029^^Y
+"DATA",176.112,38839,0)
+4002060^MULTIVITAMIN TAB
+"DATA",176.112,38839,1)
+797160^^Y
+"DATA",176.112,38840,0)
+4027304^JUNIPER BERRY CAP/TAB
+"DATA",176.112,38840,1)
+797286^^Y
+"DATA",176.112,38841,0)
+4027300^BENDAMUSTINE HCL 100MG/VIL INJ
+"DATA",176.112,38841,1)
+797290^^Y
+"DATA",176.112,38842,0)
+4027332^LACTOBACILLUS/NA CARBOXYMETHYLCELLULOSE TAB
+"DATA",176.112,38842,1)
+797295^^Y^LACTOBACILLUS TAB^Y
+"DATA",176.112,38843,0)
+4027312^LOBELIA INFLATA CAP/TAB
+"DATA",176.112,38843,1)
+797334^^Y
+"DATA",176.112,38844,0)
+4027320^PROSTATA CAP/TAB
+"DATA",176.112,38844,1)
+797384^^Y
+"DATA",176.112,38845,0)
+4027382^PROTEIN SUPPLEMENT,PRONUTRA PWDR PKT,37GM
+"DATA",176.112,38845,1)
+797386^^Y^PROTEIN SUPL PRONUTRA PWDR PKT,37GM^Y
+"DATA",176.112,38846,0)
+4027328^TALC,STERILE 5GM/VIL
+"DATA",176.112,38846,1)
+797403^^Y
+"DATA",176.112,38847,0)
+4027386^ADAPTER,FEEDING,DUAL PORT 16F BARD #317
+"DATA",176.112,38847,1)
+797464^^Y
+"DATA",176.112,38848,0)
+4027385^ADAPTER,FEEDING,DUAL PORT 20F BARD #333
+"DATA",176.112,38848,1)
+797465^^Y
+"DATA",176.112,38849,0)
+4027387^ADAPTER,FEEDING,DUAL PORT 28F BARD #318
+"DATA",176.112,38849,1)
+797466^^Y
+"DATA",176.112,38850,0)
+4027292^APPLIANCE CLEANER SOLN M-9 H#7736
+"DATA",176.112,38850,1)
+797467^^Y
+"DATA",176.112,38851,0)
+4027389^BANDAGE,GAUZE,STRETCH 2IN X 65IN NONSTERILE
+"DATA",176.112,38851,1)
+797468^^Y
+"DATA",176.112,38852,0)
+4027390^BANDAGE,GAUZE,STRETCH 3IN X 75IN NONSTERILE
+"DATA",176.112,38852,1)
+797469^^Y
+"DATA",176.112,38853,0)
+4027393^BANDAGE,GAUZE,STRETCH 3IN X 75IN STERILE
+"DATA",176.112,38853,1)
+797470^^Y
+"DATA",176.112,38854,0)
+4027391^BANDAGE,GAUZE,STRETCH 4IN X 75IN NONSTERILE
+"DATA",176.112,38854,1)
+797471^^Y
+"DATA",176.112,38855,0)
+4027394^BANDAGE,GAUZE,STRETCH 4IN X 75IN STERILE
+"DATA",176.112,38855,1)
+797472^^Y
+"DATA",176.112,38856,0)
+4027392^BANDAGE,GAUZE,STRETCH 6IN X 85IN NONSTERILE
+"DATA",176.112,38856,1)
+797473^^Y
+"DATA",176.112,38857,0)
+4027395^BANDAGE,GAUZE,STRETCH 6IN X 85IN STERILE
+"DATA",176.112,38857,1)
+797474^^Y
+"DATA",176.112,38858,0)
+4027380^BANDAGE,KERLIX 2.25IN X 3YD STERILE KEN#6720
+"DATA",176.112,38858,1)
+797475^^Y^BANDAGE,KERLIX 2.25IN X 3YD STER K#6720^Y
+"DATA",176.112,38859,0)
+4027301^BATTERY,DISPOSABLE 1.5V #MMT-104
+"DATA",176.112,38859,1)
+797477^^Y
+"DATA",176.112,38860,0)
+4027405^BELT,SUPPORT 4IN MEDIUM NU-HOPE #2666-P
+"DATA",176.112,38860,1)
+797479^^Y
+"DATA",176.112,38861,0)
+4027362^BELT,SUPPORT 7IN MEDIUM NU-HOPE #6441-SP
+"DATA",176.112,38861,1)
+797480^^Y
+"DATA",176.112,38862,0)
+4027303^CANNULA,BLUNT PLASTIC BD#303345
+"DATA",176.112,38862,1)
+797501^^Y
+"DATA",176.112,38863,0)
+4027324^CARTRIDGE,ANIMAS IR 2ML 1200 #100-124-01
+"DATA",176.112,38863,1)
+797502^^Y
+"DATA",176.112,38864,0)
+4027325^CARTRIDGE,ANIMAS IR 3ML 1000 #100-052-01
+"DATA",176.112,38864,1)
+797503^^Y
+"DATA",176.112,38865,0)
+4027273^CARTRIDGE,DISETRONIC 3.15ML #04949935001
+"DATA",176.112,38865,1)
+797504^^Y
+"DATA",176.112,38866,0)
+4027317^CATHERIZATION SET,INTERMITTENT,14FR APOGEE H#B14F
+"DATA",176.112,38866,1)
+797505^^Y^CATH SET,INTERMITTENT,14FR APOGEE H#B14F^Y
+"DATA",176.112,38867,0)
+4027316^CATHETER,EXTERNAL INVIEW H#97525
+"DATA",176.112,38867,1)
+797506^^Y
+"DATA",176.112,38868,0)
+4027315^CATHETER,EXTERNAL INVIEW H#97529
+"DATA",176.112,38868,1)
+797507^^Y
+"DATA",176.112,38869,0)
+4027313^CATHETER,EXTERNAL INVIEW H#97532
+"DATA",176.112,38869,1)
+797508^^Y
+"DATA",176.112,38870,0)
+4027314^CATHETER,EXTERNAL INVIEW H#97541
+"DATA",176.112,38870,1)
+797509^^Y
+"DATA",176.112,38871,0)
+4027272^CATHETER,RED RUBBER 10FR KENDALL #8410
+"DATA",176.112,38871,1)
+797510^^Y
+"DATA",176.112,38872,0)
+4027266^CATHETER,RED RUBBER 12FR KENDALL #8412
+"DATA",176.112,38872,1)
+797511^^Y
+"DATA",176.112,38873,0)
+4027267^CATHETER,RED RUBBER 14FR KENDALL #8414
+"DATA",176.112,38873,1)
+797512^^Y
+"DATA",176.112,38874,0)
+4027265^CATHETER,RED RUBBER 16FR KENDALL #8416
+"DATA",176.112,38874,1)
+797513^^Y
+"DATA",176.112,38875,0)
+4027268^CATHETER,RED RUBBER 18FR KENDALL #8418
+"DATA",176.112,38875,1)
+797514^^Y
+"DATA",176.112,38876,0)
+4027269^CATHETER,RED RUBBER 20FR KENDALL #8420
+"DATA",176.112,38876,1)
+797515^^Y
+"DATA",176.112,38877,0)
+4027270^CATHETER,RED RUBBER 22FR KENDALL #8422
+"DATA",176.112,38877,1)
+797516^^Y
+"DATA",176.112,38878,0)
+4027271^CATHETER,RED RUBBER 24FR KENDALL #8424
+"DATA",176.112,38878,1)
+797517^^Y
+"DATA",176.112,38879,0)
+4027277^CATHETER,SELF-CATH 10FR PED MENTOR#310
+"DATA",176.112,38879,1)
+797518^^Y
+"DATA",176.112,38880,0)
+4027288^CATHETER,SELF-CATH 8FR PED MENTOR#308
+"DATA",176.112,38880,1)
+797519^^Y
+"DATA",176.112,38881,0)
+4027289^DRESSING,ACTICOAT-7 4IN X 5IN
+"DATA",176.112,38881,1)
+797535^^Y
+"DATA",176.112,38882,0)
+4027290^DRESSING,ACTICOAT-7 6IN X 6IN
+"DATA",176.112,38882,1)
+797536^^Y
+"DATA",176.112,38883,0)
+4027318^DRESSING,INTERDRY AG 10IN X 12FT ROLL
+"DATA",176.112,38883,1)
+797538^^Y
+"DATA",176.112,38884,0)
+4027293^DRESSING,INTRASITE,HYDROGEL GEL,TOP
+"DATA",176.112,38884,1)
+797540^^Y^DRESSING,INTRASITE HYDROGEL TOP GEL^Y
+"DATA",176.112,38885,0)
+4027294^EYE DROP,AUTODROP DEVICE
+"DATA",176.112,38885,1)
+797546^^Y
+"DATA",176.112,38886,0)
+4027295^EYE PATCH,FLENTS
+"DATA",176.112,38886,1)
+797547^^Y
+"DATA",176.112,38887,0)
+4027366^FOLEY CATH TRAY 18FR BARD #898318
+"DATA",176.112,38887,1)
+797548^^Y
+"DATA",176.112,38888,0)
+4027363^HOSE ANTI-EMBOLISM KNEE LEN X-LRG-SHORT
+"DATA",176.112,38888,1)
+797549^^Y
+"DATA",176.112,38889,0)
+4027259^INSULIN SYRINGE 1ML 30G 0.5IN
+"DATA",176.112,38889,1)
+797558^^Y
+"DATA",176.112,38890,0)
+4027388^LANCET,AUTOLET IMPRESSION DEVICE
+"DATA",176.112,38890,1)
+797563^^Y
+"DATA",176.112,38891,0)
+4027286^LUBRICANT,ADAPT DEODORANT LIQ,PKT,8ML
+"DATA",176.112,38891,1)
+797564^^Y^LUBRICANT,ADAPT DEODORANT LIQ 8ML PKT^Y
+"DATA",176.112,38892,0)
+4027287^LUBRICANT,ADAPT DEODORANT LIQUID
+"DATA",176.112,38892,1)
+797565^^Y
+"DATA",176.112,38893,0)
+4027397^LUBRICANT,SIL-OPHTHO HEAVY VISCOSITY
+"DATA",176.112,38893,1)
+797566^^Y
+"DATA",176.112,38894,0)
+4027396^LUBRICANT,SIL-OPHTHO MEDIUM VISCOSITY
+"DATA",176.112,38894,1)
+797567^^Y
+"DATA",176.112,38895,0)
+4027302^MAGNIFIER,SYRINGE DEVICE
+"DATA",176.112,38895,1)
+797568^^Y
+"DATA",176.112,38896,0)
+4027377^NUTREN 1.5 FIBER LIQUID
+"DATA",176.112,38896,1)
+797572^^Y^NUTR SUPL NUTREN 1.5 FIBER LIQUID^Y
+"DATA",176.112,38897,0)
+4027378^NUTREN 1.5 FIBER LIQUID 1000ML
+"DATA",176.112,38897,1)
+797573^^Y^NUTR SUPL NUTREN 1.5 FIBER LIQUID 1000ML^Y
+"DATA",176.112,38898,0)
+4027379^NUTREN 1.5 FIBER LIQUID 1500ML
+"DATA",176.112,38898,1)
+797574^^Y^NUTR SUPL NUTREN 1.5 FIBER LIQUID 1500ML^Y
+"DATA",176.112,38899,0)
+4027319^PLEURX DRAINAGE KIT D#50-7510
+"DATA",176.112,38899,1)
+797588^^Y
+"DATA",176.112,38900,0)
+4027311^POUCH,MINI,CLOSED,NEW IMAGE H#18382
+"DATA",176.112,38900,1)
+797589^^Y
+"DATA",176.112,38901,0)
+4027310^POUCH,MINI,CLOSED,NEW IMAGE H#18383
+"DATA",176.112,38901,1)
+797590^^Y
+"DATA",176.112,38902,0)
+4027309^POUCH,MINI,CLOSED,NEW IMAGE H#18384
+"DATA",176.112,38902,1)
+797591^^Y
+"DATA",176.112,38903,0)
+4027308^POUCH,MINI,CLOSED,NEW IMAGE H#18392
+"DATA",176.112,38903,1)
+797592^^Y
+"DATA",176.112,38904,0)
+4027307^POUCH,MINI,CLOSED,NEW IMAGE H#18393
+"DATA",176.112,38904,1)
+797593^^Y
+"DATA",176.112,38905,0)
+4027306^POUCH,MINI,CLOSED,NEW IMAGE H#18394
+"DATA",176.112,38905,1)
+797594^^Y
+"DATA",176.112,38906,0)
+4027329^PRODIGY (GLUCOSE) HIGH CONTROL SOLN
+"DATA",176.112,38906,1)
+797595^^Y
+"DATA",176.112,38907,0)
+4027330^PRODIGY (GLUCOSE) LOW CONTROL SOLN
+"DATA",176.112,38907,1)
+797596^^Y
+"DATA",176.112,38908,0)
+4027333^SKIN BARRIER FILM 3M#3343,25ML
+"DATA",176.112,38908,1)
+797607^^Y^SKIN BARRIER FILM 25ML 3M#3343^Y
+"DATA",176.112,38909,0)
+4027373^ACCU-CHEK COMPACT (GLUCOSE) HI/LO CONTROL SOLN
+"DATA",176.112,38909,1)
+797608^^Y
+"DATA",176.112,38910,0)
+4027369^WAFER,SURFIT-NAT W/FLANGE C#4118-00
+"DATA",176.112,38910,1)
+797609^^Y
+"DATA",176.112,38911,0)
+4027371^WAFER,SURFIT-NAT W/FLANGE C#4118-02
+"DATA",176.112,38911,1)
+797610^^Y
+"DATA",176.112,38912,0)
+4027372^WAFER,SURFIT-NAT W/FLANGE C#4118-04
+"DATA",176.112,38912,1)
+797611^^Y
+"DATA",176.112,38913,0)
+4027370^WAFER,SURFIT-NAT W/FLANGE C#4118-06
+"DATA",176.112,38913,1)
+797612^^Y
+"DATA",176.112,38914,0)
+4027291^STOMA CAP,AMPATCH F3
+"DATA",176.112,38914,1)
+797617^^Y
+"DATA",176.112,38915,0)
+4009461^ALCOHOL 44%/CITRIC ACID/SALICYLIC ACID 2% PAD,TOP
+"DATA",176.112,38915,1)
+797665^^Y
+"DATA",176.112,38916,0)
+4010416^ALOE VERA CLEANSING PAD
+"DATA",176.112,38916,1)
+797666^^Y
+"DATA",176.112,38917,0)
+4027410^DILTIAZEM (ETHEX-ER) 120MG CAP,SA
+"DATA",176.112,38917,1)
+797824^^Y
+"DATA",176.112,38918,0)
+4027411^DILTIAZEM (ETHEX-ER) 180MG CAP,SA
+"DATA",176.112,38918,1)
+797826^^Y
+"DATA",176.112,38919,0)
+4027412^DILTIAZEM (ETHEX-ER) 240MG CAP,SA
+"DATA",176.112,38919,1)
+797828^^Y
+"DATA",176.112,38920,0)
+4027415^DILTIAZEM (ETHEX-ER) 300MG CAP,SA
+"DATA",176.112,38920,1)
+797830^^Y
+"DATA",176.112,38921,0)
+4027414^DILTIAZEM (ETHEX-ER) 360MG CAP,SA
+"DATA",176.112,38921,1)
+797832^^Y
+"DATA",176.112,38922,0)
+4027413^DILTIAZEM (ETHEX-ER) 420MG CAP,SA
+"DATA",176.112,38922,1)
+797834^^Y
+"DATA",176.112,38923,0)
+4009485^THIMEROSAL SWAB,TOP
+"DATA",176.112,38923,1)
+798198^^Y
+"DATA",176.112,38924,0)
+4013378^ROTAVIRUS TETRAVALENT VACCINE LIVE SOLN,ORAL,KIT,2.5ML
+"DATA",176.112,38924,1)
+798301^^Y
+"DATA",176.112,38925,0)
+4013019^TRIHIBIT INJ
+"DATA",176.112,38925,1)
+798353^^Y
+"DATA",176.112,38926,0)
+4015841^NUVARING 0.12MG/0.015MG/24HR RING,VAG
+"DATA",176.112,38926,1)
+798360^^Y
+"DATA",176.112,38927,0)
+4009334^PEDVAX-HIB INJ
+"DATA",176.112,38927,1)
+798451^^Y
+"DATA",176.112,38928,0)
+4009218^METHYL SALICYLATE OIL
+"DATA",176.112,38928,1)
+799074^^Y
+"DATA",176.112,38929,0)
+4025136^DIPHTH,PERTUSS(ACELL),TET PED 2.5-8-5/0.5 INJ,SUSP,0.5ML,SYR
+"DATA",176.112,38929,1)
+799236^^Y
+"DATA",176.112,38930,0)
+4024739^ELECTROLYTE PWDR,ORAL ADULT PKT
+"DATA",176.112,38930,1)
+799244^^Y
+"DATA",176.112,38931,0)
+4007905^EPINEPHRINE HCL 0.23MG/ZINC PHENOSULFONATE 0.4MG MISC
+"DATA",176.112,38931,1)
+799245^^Y
+"DATA",176.112,38932,0)
+4024524^LUBRICATING JELLY,TOP (K-Y)
+"DATA",176.112,38932,1)
+799786^^Y
+"DATA",176.112,38933,0)
+4024523^LUBRICATING JELLY,TOP (K-Y) PKT
+"DATA",176.112,38933,1)
+799789^^Y
+"DATA",176.112,38934,0)
+4016319^LUBRICANT MOISTURIZER VAG,GEL,APPLICATOR,3.5GM
+"DATA",176.112,38934,1)
+799792^^Y
+"DATA",176.112,38935,0)
+4016847^LUBRICANT MOISTURIZER VAG,GEL,APPLICATOR,5.9GM
+"DATA",176.112,38935,1)
+799795^^Y
+"DATA",176.112,38936,0)
+4004414^LIDOCAINE HCL 2% JELLY,UROJECT,20ML
+"DATA",176.112,38936,1)
+799799^^Y
+"DATA",176.112,38937,0)
+4004413^LIDOCAINE HCL 2% JELLY,UROJECT,10ML
+"DATA",176.112,38937,1)
+799801^^Y
+"DATA",176.112,38938,0)
+4004412^LIDOCAINE HCL 2% JELLY,UROJECT,5ML
+"DATA",176.112,38938,1)
+799803^^Y
+"DATA",176.112,38939,0)
+4005892^AMINESS 5.2% INJ
+"DATA",176.112,38939,1)
+799873^^Y
+"DATA",176.112,38940,0)
+4005874^AMINOSYN 7% INJ
+"DATA",176.112,38940,1)
+799925^^Y
+"DATA",176.112,38941,0)
+4006181^AMINOSYN 10% (PF) INJ
+"DATA",176.112,38941,1)
+799950^^Y
+"DATA",176.112,38942,0)
+4005873^AMINOSYN 10% INJ
+"DATA",176.112,38942,1)
+799950^^Y
+"DATA",176.112,38943,0)
+4005871^AMINOSYN 3.5% INJ
+"DATA",176.112,38943,1)
+799972^^Y
+"DATA",176.112,38944,0)
+4005872^AMINOSYN 5% INJ
+"DATA",176.112,38944,1)
+799992^^Y
+"DATA",176.112,38945,0)
+4006306^AMINOSYN 3.5%/DEXTROSE 5% INJ
+"DATA",176.112,38945,1)
+800037^^Y
+"DATA",176.112,38946,0)
+4006158^DIANEAL PD-2/DEXTROSE 1.5% SOLN
+"DATA",176.112,38946,1)
+800061^^Y
+"DATA",176.112,38947,0)
+4006155^DIANEAL PD-1/DEXTROSE 2.5% SOLN
+"DATA",176.112,38947,1)
+800061^^Y
+"DATA",176.112,38948,0)
+4026908^DIANEAL/CALCIUM 2.5MEQ/DEXTROSE 4.25% SOLN
+"DATA",176.112,38948,1)
+800074^^Y
+"DATA",176.112,38949,0)
+4005876^AMINOSYN 8.5% INJ
+"DATA",176.112,38949,1)
+800220^^Y
+"DATA",176.112,38950,0)
+4005869^AMINOSYN-HBC 7% INJ
+"DATA",176.112,38950,1)
+800273^^Y
+"DATA",176.112,38951,0)
+4006180^AMINOSYN HBC 7% INJ
+"DATA",176.112,38951,1)
+800273^^Y
+"DATA",176.112,38952,0)
+4025950^CLINISOL 15% INJ
+"DATA",176.112,38952,1)
+800588^^Y
+"DATA",176.112,38953,0)
+4005963^IONOSOL MB/DEXTROSE 5% INJ
+"DATA",176.112,38953,1)
+800648^^Y
+"DATA",176.112,38954,0)
+4005882^FREAMINE 6.9% HBC INJ
+"DATA",176.112,38954,1)
+800862^^Y
+"DATA",176.112,38955,0)
+4006172^FREAMINE III 3%/ELECTROLYTES INJ
+"DATA",176.112,38955,1)
+800884^^Y
+"DATA",176.112,38956,0)
+4006178^FREAMINE III 8.5%/ELECTROLYTES INJ
+"DATA",176.112,38956,1)
+800899^^Y
+"DATA",176.112,38957,0)
+4006171^FREAMINE III 8.5% INJ
+"DATA",176.112,38957,1)
+800899^^Y
+"DATA",176.112,38958,0)
+4025814^PEG-3350/ELECTROLYTES (MOVIPREP) PWDR
+"DATA",176.112,38958,1)
+800918^^Y
+"DATA",176.112,38959,0)
+4006026^ISOLYTE S PH 7.4 INJ
+"DATA",176.112,38959,1)
+800928^^Y
+"DATA",176.112,38960,0)
+4009643^ISOLYTE S (pH5.8) INJ
+"DATA",176.112,38960,1)
+800928^^Y
+"DATA",176.112,38961,0)
+4009644^ISOLYTE S (pH7.4) INJ
+"DATA",176.112,38961,1)
+800928^^Y
+"DATA",176.112,38962,0)
+4005884^HEPATAMINE 8% INJ
+"DATA",176.112,38962,1)
+800933^^Y
+"DATA",176.112,38963,0)
+4005881^NEPHRAMINE 5.4% INJ
+"DATA",176.112,38963,1)
+800979^^Y
+"DATA",176.112,38964,0)
+4006168^AMINOSYN 3.5% M INJ
+"DATA",176.112,38964,1)
+800993^^Y
+"DATA",176.112,38965,0)
+4027875^CLINIMIX E 4.25/5 INJ
+"DATA",176.112,38965,1)
+801000^^Y
+"DATA",176.112,38966,0)
+4005965^NORMOSOL-M/DEXTROSE 5% INJ
+"DATA",176.112,38966,1)
+801009^^Y
+"DATA",176.112,38967,0)
+4027100^CLINIMIX E 4.25/25 INJ
+"DATA",176.112,38967,1)
+801018^^Y
+"DATA",176.112,38968,0)
+4025951^CLINIMIX E 5/15 INJ
+"DATA",176.112,38968,1)
+801021^^Y
+"DATA",176.112,38969,0)
+4006032^PLASMA-LYTE A INJ
+"DATA",176.112,38969,1)
+801112^^Y
+"DATA",176.112,38970,0)
+4006169^AMINOSYN 7%/ELECTROLYTES INJ
+"DATA",176.112,38970,1)
+801115^^Y
+"DATA",176.112,38971,0)
+4006170^AMINOSYN 8.5%/ELECTROLYTES INJ
+"DATA",176.112,38971,1)
+801139^^Y
+"DATA",176.112,38972,0)
+4006182^AMINOSYN 8.5% W/ELECTROLYTES INJ
+"DATA",176.112,38972,1)
+801139^^Y
+"DATA",176.112,38973,0)
+4006029^PLASMA-LYTE 56 INJ
+"DATA",176.112,38973,1)
+801145^^Y
+"DATA",176.112,38974,0)
+4027516^BREATHE RIGHT NASAL STRIPS MED/LG
+"DATA",176.112,38974,1)
+801219^^Y
+"DATA",176.112,38975,0)
+4027518^BREATHE RIGHT NASAL STRIPS SM/MED
+"DATA",176.112,38975,1)
+801228^^Y
+"DATA",176.112,38976,0)
+4027564^CAPSELLA CAP/TAB
+"DATA",176.112,38976,1)
+801229^^Y
+"DATA",176.112,38977,0)
+4027514^CARDIOTEX RX TAB
+"DATA",176.112,38977,1)
+801230^^Y
+"DATA",176.112,38978,0)
+4027568^QUININE LIQUID,ORAL
+"DATA",176.112,38978,1)
+801248^^Y
+"DATA",176.112,38979,0)
+4027532^VANICREAM SPF 60 CREAM,TOP
+"DATA",176.112,38979,1)
+801269^^Y
+"DATA",176.112,38980,0)
+4006030^PLASMA-LYTE 148 INJ
+"DATA",176.112,38980,1)
+801357^^Y
+"DATA",176.112,38981,0)
+4005988^PLASMA-LYTE 148/DEXTROSE 5% INJ
+"DATA",176.112,38981,1)
+801363^^Y
+"DATA",176.112,38982,0)
+4005987^PLASMA-LYTE 56/DEXTROSE 5% INJ
+"DATA",176.112,38982,1)
+801368^^Y
+"DATA",176.112,38983,0)
+4006031^PLASMA-LYTE INJ
+"DATA",176.112,38983,1)
+801391^^Y
+"DATA",176.112,38984,0)
+4006174^PROCALAMINE INJ
+"DATA",176.112,38984,1)
+801417^^Y
+"DATA",176.112,38985,0)
+4005885^RENAMIN 6.5% WITHOUT ELECTROLYTES INJ
+"DATA",176.112,38985,1)
+801436^^Y
+"DATA",176.112,38986,0)
+4005990^TIS-U-SOL SOLN,IRRG
+"DATA",176.112,38986,1)
+801445^^Y
+"DATA",176.112,38987,0)
+4016134^ACCESS PIN,NEEDLE-FREE ALARIS #2200E
+"DATA",176.112,38987,1)
+801455^^Y^ACCESS PIN, NEEDLE-FREE ALARIS #2200E^Y
+"DATA",176.112,38988,0)
+4027557^ACCESS PIN,NEEDLE-FREE ALARIS #2205E
+"DATA",176.112,38988,1)
+801456^^Y^ACCESS PIN, NEEDLE-FREE ALARIS #2205E^Y
+"DATA",176.112,38989,0)
+4027554^ATTENDS BRIEF PULL-ON YOUTH/SMALL
+"DATA",176.112,38989,1)
+801457^^Y
+"DATA",176.112,38990,0)
+4027553^BAG,LEG BARD #150106
+"DATA",176.112,38990,1)
+801458^^Y
+"DATA",176.112,38991,0)
+4027484^BAG,LEG BARD #150719
+"DATA",176.112,38991,1)
+801459^^Y
+"DATA",176.112,38992,0)
+4027446^BAG,LEG LARGE MEDLINE #DYND12588
+"DATA",176.112,38992,1)
+801460^^Y
+"DATA",176.112,38993,0)
+4027447^BAG,URINARY DRAINAGE MEDLINE #DYND15205
+"DATA",176.112,38993,1)
+801461^^Y
+"DATA",176.112,38994,0)
+4027549^BARRIER,ADAPT RING H#7806N
+"DATA",176.112,38994,1)
+801462^^Y
+"DATA",176.112,38995,0)
+4027526^BARRIER,ASSURA COLOPLAST #14281
+"DATA",176.112,38995,1)
+801463^^Y
+"DATA",176.112,38996,0)
+4027525^BARRIER,ASSURA COLOPLAST #14282
+"DATA",176.112,38996,1)
+801464^^Y
+"DATA",176.112,38997,0)
+4027524^BARRIER,ASSURA COLOPLAST #14283
+"DATA",176.112,38997,1)
+801465^^Y
+"DATA",176.112,38998,0)
+4027505^BARRIER,ESTEEM SYNERGY C#405472
+"DATA",176.112,38998,1)
+801466^^Y
+"DATA",176.112,38999,0)
+4027504^BARRIER,ESTEEM SYNERGY C#405473
+"DATA",176.112,38999,1)
+801467^^Y
+"DATA",176.112,39000,0)
+4027503^BARRIER,ESTEEM SYNERGY C#405474
+"DATA",176.112,39000,1)
+801468^^Y
+"DATA",176.112,39001,0)
+4027502^BARRIER,ESTEEM SYNERGY C#405475
+"DATA",176.112,39001,1)
+801469^^Y
+"DATA",176.112,39002,0)
+4027501^BARRIER,ESTEEM SYNERGY C#405478
+"DATA",176.112,39002,1)
+801483^^Y
+"DATA",176.112,39003,0)
+4027500^BARRIER,ESTEEM SYNERGY C#405480
+"DATA",176.112,39003,1)
+801487^^Y
+"DATA",176.112,39004,0)
+4027499^BARRIER,ESTEEM SYNERGY C#405481
+"DATA",176.112,39004,1)
+801488^^Y
+"DATA",176.112,39005,0)
+4027498^BARRIER,ESTEEM SYNERGY C#405482
+"DATA",176.112,39005,1)
+801489^^Y
+"DATA",176.112,39006,0)
+4027462^BELT,SUPPORT 4IN LARGE NU-HOPE #6412
+"DATA",176.112,39006,1)
+801490^^Y
+"DATA",176.112,39007,0)
+4027483^BELT,SUPPORT 4IN MED NU-HOPE #2661-ASP
+"DATA",176.112,39007,1)
+801491^^Y
+"DATA",176.112,39008,0)
+4027464^BELT,SUPPORT 4IN MED NU-HOPE #2661-P
+"DATA",176.112,39008,1)
+801492^^Y
+"DATA",176.112,39009,0)
+4027477^BELT,SUPPORT 4IN X-LARGE NU-HOPE #2663-P
+"DATA",176.112,39009,1)
+801493^^Y
+"DATA",176.112,39010,0)
+4027472^BELT,SUPPORT 4IN X-LARGE NU-HOPE #6313-C
+"DATA",176.112,39010,1)
+801494^^Y
+"DATA",176.112,39011,0)
+4027461^BELT,SUPPORT 4IN X-LARGE NU-HOPE #6413-A
+"DATA",176.112,39011,1)
+801495^^Y
+"DATA",176.112,39012,0)
+4027460^BELT,SUPPORT 5IN LARGE NU-HOPE #6422
+"DATA",176.112,39012,1)
+801496^^Y
+"DATA",176.112,39013,0)
+4027450^BELT,SUPPORT 5IN X-LARGE NU-HOPE #6323
+"DATA",176.112,39013,1)
+801497^^Y
+"DATA",176.112,39014,0)
+4027459^BELT,SUPPORT 5IN X-LARGE NU-HOPE #6423
+"DATA",176.112,39014,1)
+801498^^Y
+"DATA",176.112,39015,0)
+4027476^BELT,SUPPORT 6IN LARGE NU-HOPE #6332
+"DATA",176.112,39015,1)
+801499^^Y
+"DATA",176.112,39016,0)
+4027474^BELT,SUPPORT 6IN LARGE NU-HOPE #6332-AP
+"DATA",176.112,39016,1)
+801500^^Y
+"DATA",176.112,39017,0)
+4027443^BELT,SUPPORT 6IN LARGE NU-HOPE #6432-A
+"DATA",176.112,39017,1)
+801501^^Y
+"DATA",176.112,39018,0)
+4027482^BELT,SUPPORT 6IN LARGE NU-HOPE #6432-C
+"DATA",176.112,39018,1)
+801502^^Y
+"DATA",176.112,39019,0)
+4027444^BELT,SUPPORT 6IN LARGE NU-HOPE #6432-F
+"DATA",176.112,39019,1)
+801503^^Y
+"DATA",176.112,39020,0)
+4027473^BELT,SUPPORT 6IN LG NU-HOPE #6702-PSP
+"DATA",176.112,39020,1)
+801504^^Y
+"DATA",176.112,39021,0)
+4027445^BELT,SUPPORT 6IN LG NU-HOPE #6702-SP
+"DATA",176.112,39021,1)
+801505^^Y
+"DATA",176.112,39022,0)
+4027479^BELT,SUPPORT 6IN MEDIUM NU-HOPE #6431-M
+"DATA",176.112,39022,1)
+801506^^Y
+"DATA",176.112,39023,0)
+4027475^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6333
+"DATA",176.112,39023,1)
+801507^^Y
+"DATA",176.112,39024,0)
+4027453^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6333-P
+"DATA",176.112,39024,1)
+801508^^Y
+"DATA",176.112,39025,0)
+4027458^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6433-AP
+"DATA",176.112,39025,1)
+801509^^Y
+"DATA",176.112,39026,0)
+4027457^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6433-CP
+"DATA",176.112,39026,1)
+801510^^Y
+"DATA",176.112,39027,0)
+4027452^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6433-M
+"DATA",176.112,39027,1)
+801511^^Y
+"DATA",176.112,39028,0)
+4027451^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6433-P
+"DATA",176.112,39028,1)
+801512^^Y
+"DATA",176.112,39029,0)
+4027467^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6603-B
+"DATA",176.112,39029,1)
+801513^^Y
+"DATA",176.112,39030,0)
+4027466^BELT,SUPPORT 6IN X-LARGE NU-HOPE #6603-SP
+"DATA",176.112,39030,1)
+801514^^Y
+"DATA",176.112,39031,0)
+4027465^BELT,SUPPORT 6IN X-LG NU-HOPE #6703-P
+"DATA",176.112,39031,1)
+801515^^Y
+"DATA",176.112,39032,0)
+4027463^BELT,SUPPORT 6IN X-LG NU-HOPE #6703-SP
+"DATA",176.112,39032,1)
+801516^^Y
+"DATA",176.112,39033,0)
+4027456^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6434-AP
+"DATA",176.112,39033,1)
+801517^^Y
+"DATA",176.112,39034,0)
+4027454^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6434-B
+"DATA",176.112,39034,1)
+801518^^Y
+"DATA",176.112,39035,0)
+4027455^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6434-P
+"DATA",176.112,39035,1)
+801520^^Y
+"DATA",176.112,39036,0)
+4027481^BELT,SUPPORT 6IN XX-LARGE NU-HOPE #6604-SP
+"DATA",176.112,39036,1)
+801521^^Y
+"DATA",176.112,39037,0)
+4027480^BELT,SUPPORT 7IN RIGHT XX-LARGE NU-HOPE #6449-CP
+"DATA",176.112,39037,1)
+801522^^Y
+"DATA",176.112,39038,0)
+4027478^BELT,SUPPORT 7IN X-LARGE NU-HOPE #6348-HSP
+"DATA",176.112,39038,1)
+801523^^Y
+"DATA",176.112,39039,0)
+4027449^BELT,SUPPORT 9IN LARGE NU-HOPE #6367-SP
+"DATA",176.112,39039,1)
+801524^^Y
+"DATA",176.112,39040,0)
+4027448^BELT,SUPPORT 9IN LARGE NU-HOPE #6467-SP
+"DATA",176.112,39040,1)
+801525^^Y
+"DATA",176.112,39041,0)
+4027470^BELT,SUPPORT 9IN LARGE NU-HOPE #6632
+"DATA",176.112,39041,1)
+801526^^Y
+"DATA",176.112,39042,0)
+4027471^BELT,SUPPORT 9IN X-LARGE NU-HOPE #6633
+"DATA",176.112,39042,1)
+801527^^Y
+"DATA",176.112,39043,0)
+4027469^BELT,SUPPORT 9IN XX-LARGE NU-HOPE #6634
+"DATA",176.112,39043,1)
+801535^^Y
+"DATA",176.112,39044,0)
+4027523^CATHETER COUDE 18FR BARD#010118
+"DATA",176.112,39044,1)
+801536^^Y
+"DATA",176.112,39045,0)
+4027559^CATHETER FOLEY 6FR 3CC MEDLINE #DYND11706
+"DATA",176.112,39045,1)
+801537^^Y^CATHETER FOLEY 6FR 3CC M#DYND11706^Y
+"DATA",176.112,39046,0)
+4027547^CATHETER,EXTERNAL GOLDEN DRAIN LG #A1100M
+"DATA",176.112,39046,1)
+801556^^Y^CATHETER,EXTERN GOLDEN DRAIN LG #A1100M^Y
+"DATA",176.112,39047,0)
+4006177^TRAVASOL M 3.5%/ELECTROLYTE 45 INJ
+"DATA",176.112,39047,1)
+801559^^Y
+"DATA",176.112,39048,0)
+4027561^CATHETER,INTERMITTENT 18FR RUSCH #221800-20
+"DATA",176.112,39048,1)
+801560^^Y^CATHETER,INTERM 18FR RUSCH #221800-20^Y
+"DATA",176.112,39049,0)
+4005889^TRAVASOL 8.5% INJ
+"DATA",176.112,39049,1)
+801636^^Y
+"DATA",176.112,39050,0)
+4005891^TRAVASOL 10% INJ
+"DATA",176.112,39050,1)
+801648^^Y
+"DATA",176.112,39051,0)
+4005887^TRAVASOL 5.5% INJ
+"DATA",176.112,39051,1)
+801657^^Y
+"DATA",176.112,39052,0)
+4006310^TRAVASOL 5.5% WITHOUT ELECTROLYTES KIT INJ
+"DATA",176.112,39052,1)
+801657^^Y
+"DATA",176.112,39053,0)
+4027545^CATHETER,SELF-CATH 18FR COLOPLAST#4418
+"DATA",176.112,39053,1)
+801658^^Y^CATHETER,SELF-CATH 18FR COLOPLAST #4418^Y
+"DATA",176.112,39054,0)
+4027567^BANDAGE,NO STING SPRAY,TOP
+"DATA",176.112,39054,1)
+801659^^Y
+"DATA",176.112,39055,0)
+4027468^BELT,SUPPORT 9IN XX-LARGE NU-HOPE #6644
+"DATA",176.112,39055,1)
+801660^^Y
+"DATA",176.112,39056,0)
+4027562^BIODERM WAFER #20002
+"DATA",176.112,39056,1)
+801661^^Y
+"DATA",176.112,39057,0)
+4027558^CUVETTES,PROTIME DISPOSABLE 3-CHANNEL
+"DATA",176.112,39057,1)
+801664^^Y
+"DATA",176.112,39058,0)
+4027530^DIAPER ADULT XX-LARGE
+"DATA",176.112,39058,1)
+801666^^Y
+"DATA",176.112,39059,0)
+4027534^DRESSING,SOLOSITE GEL CONFORMABLE 2IN X 2IN
+"DATA",176.112,39059,1)
+801668^^Y^DRESSING, SOLOSITE GEL 2IN X 2IN^Y
+"DATA",176.112,39060,0)
+4027533^DRESSING,SOLOSITE GEL CONFORMABLE 4IN X 4IN
+"DATA",176.112,39060,1)
+801669^^Y^DRESSING, SOLOSITE GEL 4IN X 4IN^Y
+"DATA",176.112,39061,0)
+4027519^DRESSING,VIGILON 3IN X 8IN
+"DATA",176.112,39061,1)
+801671^^Y
+"DATA",176.112,39062,0)
+4027517^GAUZE PAD 2IN X 2IN 12-PLY STERILE
+"DATA",176.112,39062,1)
+801672^^Y
+"DATA",176.112,39063,0)
+4027442^HEAT & MOISTURE EXCHANGER,HUMID-VENT #14412
+"DATA",176.112,39063,1)
+801673^^Y
+"DATA",176.112,39064,0)
+4027441^HEAT & MOISTURE EXCHANGER,HUMID-VENT #17732
+"DATA",176.112,39064,1)
+801674^^Y
+"DATA",176.112,39065,0)
+4027440^LEG BAG STRAP LARGE BARD #162310
+"DATA",176.112,39065,1)
+801675^^Y
+"DATA",176.112,39066,0)
+4027439^LEG BAG STRAP MEDIUM BARD #162210
+"DATA",176.112,39066,1)
+801676^^Y
+"DATA",176.112,39067,0)
+4027438^LEG BAG STRAP SMALL BARD #162110
+"DATA",176.112,39067,1)
+801677^^Y
+"DATA",176.112,39068,0)
+4027522^PLEURX DRAINAGE KIT D#50-7210
+"DATA",176.112,39068,1)
+801679^^Y
+"DATA",176.112,39069,0)
+4027488^POUCH,DRAINABLE,NEW IMAGE H#18172
+"DATA",176.112,39069,1)
+801680^^Y
+"DATA",176.112,39070,0)
+4027487^POUCH,DRAINABLE,NEW IMAGE H#18173
+"DATA",176.112,39070,1)
+801681^^Y
+"DATA",176.112,39071,0)
+4027486^POUCH,DRAINABLE,NEW IMAGE H#18174
+"DATA",176.112,39071,1)
+801682^^Y
+"DATA",176.112,39072,0)
+4027485^POUCH,DRAINABLE,NEW IMAGE H#18176
+"DATA",176.112,39072,1)
+801683^^Y
+"DATA",176.112,39073,0)
+4027507^POUCH,DRAINABLE,SUR-FIT C#4113-12
+"DATA",176.112,39073,1)
+801684^^Y
+"DATA",176.112,39074,0)
+4027538^POUCH,OSTOMY,CLOSED,BARD #960101
+"DATA",176.112,39074,1)
+801685^^Y
+"DATA",176.112,39075,0)
+4027541^POUCH,OSTOMY,CLOSED,BARD #960103
+"DATA",176.112,39075,1)
+801686^^Y
+"DATA",176.112,39076,0)
+4027497^POUCH,UROSTOMY,ACTIVE LIFE C#1253-52
+"DATA",176.112,39076,1)
+801687^^Y
+"DATA",176.112,39077,0)
+4027496^POUCH,UROSTOMY,ACTIVE LIFE C#1253-53
+"DATA",176.112,39077,1)
+801688^^Y
+"DATA",176.112,39078,0)
+4027495^POUCH,UROSTOMY,ACTIVE LIFE C#1253-54
+"DATA",176.112,39078,1)
+801689^^Y
+"DATA",176.112,39079,0)
+4027494^POUCH,UROSTOMY,ACTIVE LIFE C#1253-55
+"DATA",176.112,39079,1)
+801690^^Y
+"DATA",176.112,39080,0)
+4027493^POUCH,UROSTOMY,ACTIVE LIFE C#1253-56
+"DATA",176.112,39080,1)
+801691^^Y
+"DATA",176.112,39081,0)
+4027492^POUCH,UROSTOMY,ACTIVE LIFE C#1253-57
+"DATA",176.112,39081,1)
+801692^^Y
+"DATA",176.112,39082,0)
+4027490^POUCH,UROSTOMY,ACTIVE LIFE C#1253-58
+"DATA",176.112,39082,1)
+801693^^Y
+"DATA",176.112,39083,0)
+4027491^POUCH,UROSTOMY,ACTIVE LIFE C#1253-59
+"DATA",176.112,39083,1)
+801694^^Y
+"DATA",176.112,39084,0)
+4027489^POUCH,UROSTOMY,ACTIVE LIFE C#1253-60
+"DATA",176.112,39084,1)
+801695^^Y
+"DATA",176.112,39085,0)
+4027508^RESOURCE ARGINAID (CHERRY) 4.5GM/PKT,9.2GM
+"DATA",176.112,39085,1)
+801701^^Y^RESOURCE ARGINAID (CHERRY) 4.5GM/PKT^Y
+"DATA",176.112,39086,0)
+4027510^RESOURCE ARGINAID (LEMON) 4.5GM/PKT,9.2GM
+"DATA",176.112,39086,1)
+801701^^Y^RESOURCE ARGINAID (LEMON) 4.5GM/PKT^Y
+"DATA",176.112,39087,0)
+4027509^RESOURCE ARGINAID (ORANGE) 4.5GM/PKT,9.2GM
+"DATA",176.112,39087,1)
+801701^^Y^RESOURCE ARGINAID (ORANGE) 4.5GM/PKT^Y
+"DATA",176.112,39088,0)
+4027542^SUCTION TUBE ATTACHMENT DEVICE MEDLINE #DYND50142
+"DATA",176.112,39088,1)
+801702^^Y^SUCTION TUBE ATTACHMENT DEVICE DYND50142^Y
+"DATA",176.112,39089,0)
+4027540^SUCTION TUBE ATTACHMENT DEVICE MEDLINE #DYND52132
+"DATA",176.112,39089,1)
+801703^^Y^SUCTION TUBE ATTACHMENT DEVICE DYND52132^Y
+"DATA",176.112,39090,0)
+4027566^TRACHEAL SUCTION SET 12FR SMITHS #6101-12
+"DATA",176.112,39090,1)
+801704^^Y^TRACHEAL SUCTION SET 12FR S#6101-12^Y
+"DATA",176.112,39091,0)
+4027565^TRACHEAL SUCTION SET 14FR SMITHS #6101-14
+"DATA",176.112,39091,1)
+801705^^Y^TRACHEAL SUCTION SET 14FR S#6101-14^Y
+"DATA",176.112,39092,0)
+4027539^WINGS CONTOURED INCONTINENT BRIEF X-LARGE
+"DATA",176.112,39092,1)
+801706^^Y
+"DATA",176.112,39093,0)
+4008648^HAMAMELIS WATER 50% PAD,TOP
+"DATA",176.112,39093,1)
+801819^^Y
+"DATA",176.112,39094,0)
+4024700^HEPATITIS B IMMUNE GLOVULIN (BAYHEP) INJ
+"DATA",176.112,39094,1)
+801821^^Y
+"DATA",176.112,39095,0)
+4006161^DIANEAL PD-2/DEXTROSE 3.5% SOLN
+"DATA",176.112,39095,1)
+801878^^Y
+"DATA",176.112,39096,0)
+4008290^PEG-3350/ELECTROLYTES PWDR
+"DATA",176.112,39096,1)
+801900^^Y
+"DATA",176.112,39097,0)
+4006039^INFALYTE LIQUID,ORAL
+"DATA",176.112,39097,1)
+801949^^Y
+"DATA",176.112,39098,0)
+4006586^ALBUTEROL 90MCG/SPRAY INHL,ORAL
+"DATA",176.112,39098,1)
+307782^^Y^ALBUTEROL 90MCG/SPRAY INHL,ORAL_#2^Y
+"DATA",176.112,39099,0)
+4010037^SULFUR 5%/VLEMINCKX'S SOLN 53%/ZINC SO4 27% LIQUID,TOP
+"DATA",176.112,39099,1)
+802276^^Y
+"DATA",176.112,39100,0)
+4001507^NYSTATIN PWDR
+"DATA",176.112,39100,1)
+802496^^Y
+"DATA",176.112,39101,0)
+4007376^M.T.E.-4 INJ
+"DATA",176.112,39101,1)
+803040^^Y
+"DATA",176.112,39102,0)
+4007380^M.T.E.-4 INJ,CONC
+"DATA",176.112,39102,1)
+803042^^Y
+"DATA",176.112,39103,0)
+4007381^MULTIPLE TRACE ELEMENT INJ
+"DATA",176.112,39103,1)
+803048^^Y
+"DATA",176.112,39104,0)
+4007382^MULTIPLE TRACE ELEMENT INJ,CONC
+"DATA",176.112,39104,1)
+803050^^Y
+"DATA",176.112,39105,0)
+4005893^TROPHAMINE 10% INJ
+"DATA",176.112,39105,1)
+803277^^Y
+"DATA",176.112,39106,0)
+4005883^TROPHAMINE 6% INJ
+"DATA",176.112,39106,1)
+803299^^Y
+"DATA",176.112,39107,0)
+4003441^METHYLPREDNISOLONE 16MG TAB ADT-PAK,14
+"DATA",176.112,39107,1)
+804173^^Y
+"DATA",176.112,39108,0)
+4027656^BANDAGE,ADHESIVE SHEER 2IN X 4IN
+"DATA",176.112,39108,1)
+804377^^Y
+"DATA",176.112,39109,0)
+4027675^BANDAGE,FOAM ARTIFLEX 10CM X 3M
+"DATA",176.112,39109,1)
+804379^^Y
+"DATA",176.112,39110,0)
+4027676^BANDAGE,FOAM ARTIFLEX 15CM X 3M
+"DATA",176.112,39110,1)
+804380^^Y
+"DATA",176.112,39111,0)
+4027592^BAG,URINARY DRAINAGE MEDLINE #DYNC1674
+"DATA",176.112,39111,1)
+804382^^Y
+"DATA",176.112,39112,0)
+4027648^CATHETER HOLDER,BARD #000025
+"DATA",176.112,39112,1)
+804383^^Y
+"DATA",176.112,39113,0)
+4027641^CATHERIZATION SET,FOLEY 18FR BARD #898318
+"DATA",176.112,39113,1)
+804384^^Y^CATH SET,FOLEY 18FR BARD #898318^Y
+"DATA",176.112,39114,0)
+4027650^CATHETER,INTERMITTENT 14FR RUSCH #220800-14
+"DATA",176.112,39114,1)
+804385^^Y^CATHETER,INTERM 14FR RUSCH #220800-14^Y
+"DATA",176.112,39115,0)
+4027649^CATHETER,SELF-CATH 30FR COLOPLAST #7025
+"DATA",176.112,39115,1)
+804386^^Y
+"DATA",176.112,39116,0)
+4027609^BAG,URINE,ABDOMINAL RUSCH #B1000
+"DATA",176.112,39116,1)
+804387^^Y
+"DATA",176.112,39117,0)
+4027578^BAG,BROWN PAPER WAX
+"DATA",176.112,39117,1)
+804388^^Y
+"DATA",176.112,39118,0)
+4027667^BANDAGE,OSTOMY LARGE NU-HOPE #5105
+"DATA",176.112,39118,1)
+804389^^Y
+"DATA",176.112,39119,0)
+4027668^BANDAGE,OSTOMY MEDIUM NU-HOPE #5103
+"DATA",176.112,39119,1)
+804390^^Y
+"DATA",176.112,39120,0)
+4027669^BANDAGE,OSTOMY X-LARGE NU-HOPE #5107
+"DATA",176.112,39120,1)
+804391^^Y
+"DATA",176.112,39121,0)
+4027677^BELT,OSTOMY LARGE PERMA TYPE #C116AL00
+"DATA",176.112,39121,1)
+804392^^Y
+"DATA",176.112,39122,0)
+4027678^BELT,OSTOMY REGULAR PERMA TYPE #C116R000
+"DATA",176.112,39122,1)
+804393^^Y
+"DATA",176.112,39123,0)
+4027651^BRIEF,FITTED XX-LARGE TRANQUILITY
+"DATA",176.112,39123,1)
+804394^^Y
+"DATA",176.112,39124,0)
+4027640^CATHERIZATION SET,FOLEY 14FR BARD #898314
+"DATA",176.112,39124,1)
+804395^^Y^CATH SET,FOLEY 14FR BARD #898314^Y
+"DATA",176.112,39125,0)
+4027629^CATHERIZATION SET,FOLEY 16FR BARD #898316
+"DATA",176.112,39125,1)
+804396^^Y^CATH SET,FOLEY 16FR BARD #898316^Y
+"DATA",176.112,39126,0)
+4027586^CATHETER HOLDER,LEG STRAP 2IN X 24IN
+"DATA",176.112,39126,1)
+804397^^Y
+"DATA",176.112,39127,0)
+4027683^CATHETER,FASTENER (CATH-STRIP) #CS50
+"DATA",176.112,39127,1)
+804399^^Y
+"DATA",176.112,39128,0)
+4027647^CONNECTOR,CATHETER ADAPTER A#2219
+"DATA",176.112,39128,1)
+804400^^Y
+"DATA",176.112,39129,0)
+4027580^CONTACT LENS SOLN (BOSTON SIMPLUS)
+"DATA",176.112,39129,1)
+804401^^Y
+"DATA",176.112,39130,0)
+4027581^DEPEND SUPER PLUS UNDERWEAR X-LARGE
+"DATA",176.112,39130,1)
+804402^^Y
+"DATA",176.112,39131,0)
+4027630^DRESSING,ACTICOAT BURN 4IN X 4IN
+"DATA",176.112,39131,1)
+804403^^Y
+"DATA",176.112,39132,0)
+4027631^DRESSING,ACTICOAT BURN 8IN X 16IN
+"DATA",176.112,39132,1)
+804404^^Y
+"DATA",176.112,39133,0)
+4027635^DRESSING,ALLEVYN THIN 2IN X 2 3/8IN,U#7576
+"DATA",176.112,39133,1)
+804405^^Y^DRESSING,ALLEVYN THIN 2IN X 2 3/8IN#7576^Y
+"DATA",176.112,39134,0)
+4027636^DRESSING,ALLEVYN THIN 4IN X 4IN,U#7578
+"DATA",176.112,39134,1)
+804406^^Y^DRESSING,ALLEVYN THIN 4IN X 4IN U#7578^Y
+"DATA",176.112,39135,0)
+4027637^DRESSING,ALLEVYN THIN 6IN X 8IN,U#7579
+"DATA",176.112,39135,1)
+804407^^Y^DRESSING,ALLEVYN THIN 6IN X 8IN U#7579^Y
+"DATA",176.112,39136,0)
+4027638^DRESSING,EXU-DRY 6IN X 9IN
+"DATA",176.112,39136,1)
+804409^^Y
+"DATA",176.112,39137,0)
+4027645^DRESSING,OPSITE 11IN X 11 3/4IN SN#4987
+"DATA",176.112,39137,1)
+804410^^Y
+"DATA",176.112,39138,0)
+4027646^DRESSING,OPSITE 11IN X 17 3/4IN SN#4988
+"DATA",176.112,39138,1)
+804411^^Y
+"DATA",176.112,39139,0)
+4027642^DRESSING,OPSITE 4IN X 11IN SN#4942
+"DATA",176.112,39139,1)
+804412^^Y
+"DATA",176.112,39140,0)
+4027644^DRESSING,OPSITE 4IN X 5 1/2IN SN#4975
+"DATA",176.112,39140,1)
+804413^^Y
+"DATA",176.112,39141,0)
+4027643^DRESSING,OPSITE 5 1/2IN X 10IN SN#4967
+"DATA",176.112,39141,1)
+804414^^Y
+"DATA",176.112,39142,0)
+4027628^DRESSING,OPSITE 6IN X 11IN SN#4986
+"DATA",176.112,39142,1)
+804415^^Y
+"DATA",176.112,39143,0)
+4027664^DRESSING,TELFA ISLAND 4IN X 10IN #7542
+"DATA",176.112,39143,1)
+804416^^Y
+"DATA",176.112,39144,0)
+4027665^DRESSING,TELFA ISLAND 4IN X 14IN #7544
+"DATA",176.112,39144,1)
+804417^^Y
+"DATA",176.112,39145,0)
+4027663^DRESSING,TELFA ISLAND 4IN X 5IN #7540
+"DATA",176.112,39145,1)
+804418^^Y
+"DATA",176.112,39146,0)
+4027658^DRESSING,TELFA ISLAND 4IN X 8IN #7541
+"DATA",176.112,39146,1)
+804419^^Y
+"DATA",176.112,39147,0)
+4027582^DRESSING,VIGILON 6IN X 8IN
+"DATA",176.112,39147,1)
+804420^^Y
+"DATA",176.112,39148,0)
+4027661^TRACH TUBE,SZ 10 CUFFLESS SHLY #10-DCFS
+"DATA",176.112,39148,1)
+804421^^Y
+"DATA",176.112,39149,0)
+4027655^TRACH TUBE,SZ 6 CUFFLESS SHLY 60XLTUP
+"DATA",176.112,39149,1)
+804422^^Y
+"DATA",176.112,39150,0)
+4027654^TRACH TUBE,SZ 8 CUFFLESS SHLY 80XLTUP
+"DATA",176.112,39150,1)
+804423^^Y
+"DATA",176.112,39151,0)
+4027671^TRACH VALVE HOUSING BLOM-SINGER BE6038
+"DATA",176.112,39151,1)
+804424^^Y
+"DATA",176.112,39152,0)
+4027672^TRACH VALVE HOUSING BLOM-SINGER BE6039
+"DATA",176.112,39152,1)
+804425^^Y
+"DATA",176.112,39153,0)
+4027674^TRACH VALVE HOUSING,ADHESIVE BLOM-SINGER BE6054
+"DATA",176.112,39153,1)
+804426^^Y^TRACH VALVE HOUSING,ADHESIVE BE6054^Y
+"DATA",176.112,39154,0)
+4027601^TRACH VENT,BIVONA SZ 10 SMITHS #1018
+"DATA",176.112,39154,1)
+804427^^Y
+"DATA",176.112,39155,0)
+4027602^TRACH VENT,BIVONA SZ 10 SMITHS #1027
+"DATA",176.112,39155,1)
+804428^^Y
+"DATA",176.112,39156,0)
+4027603^TRACH VENT,BIVONA SZ 10 SMITHS #1036
+"DATA",176.112,39156,1)
+804429^^Y
+"DATA",176.112,39157,0)
+4027604^TRACH VENT,BIVONA SZ 10 SMITHS #1055
+"DATA",176.112,39157,1)
+804430^^Y
+"DATA",176.112,39158,0)
+4027605^TRACH VENT,BIVONA SZ 12 SMITHS #1218
+"DATA",176.112,39158,1)
+804431^^Y
+"DATA",176.112,39159,0)
+4027606^TRACH VENT,BIVONA SZ 12 SMITHS #1227
+"DATA",176.112,39159,1)
+804432^^Y
+"DATA",176.112,39160,0)
+4027607^TRACH VENT,BIVONA SZ 12 SMITHS #1236
+"DATA",176.112,39160,1)
+804433^^Y
+"DATA",176.112,39161,0)
+4027608^TRACH VENT,BIVONA SZ 12 SMITHS #1255
+"DATA",176.112,39161,1)
+804434^^Y
+"DATA",176.112,39162,0)
+4027593^TRACH VENT,BIVONA SZ 8 SMITHS #0818
+"DATA",176.112,39162,1)
+804435^^Y
+"DATA",176.112,39163,0)
+4027594^TRACH VENT,BIVONA SZ 8 SMITHS #0827
+"DATA",176.112,39163,1)
+804436^^Y
+"DATA",176.112,39164,0)
+4027595^TRACH VENT,BIVONA SZ 8 SMITHS #0836
+"DATA",176.112,39164,1)
+804437^^Y
+"DATA",176.112,39165,0)
+4027596^TRACH VENT,BIVONA SZ 8 SMITHS #0855
+"DATA",176.112,39165,1)
+804438^^Y
+"DATA",176.112,39166,0)
+4027597^TRACH VENT,BIVONA SZ 9 SMITHS #0918
+"DATA",176.112,39166,1)
+804439^^Y
+"DATA",176.112,39167,0)
+4027598^TRACH VENT,BIVONA SZ 9 SMITHS #0927
+"DATA",176.112,39167,1)
+804440^^Y
+"DATA",176.112,39168,0)
+4027599^TRACH VENT,BIVONA SZ 9 SMITHS #0936
+"DATA",176.112,39168,1)
+804441^^Y
+"DATA",176.112,39169,0)
+4027600^TRACH VENT,BIVONA SZ 9 SMITHS #0955
+"DATA",176.112,39169,1)
+804442^^Y
+"DATA",176.112,39170,0)
+4027634^TRACHEOSTOMY TUBE HOLDER,SHILEY,LATEX FREE
+"DATA",176.112,39170,1)
+804443^^Y^TRACH TUBE HOLDER,SHILEY,LATEX FREE^Y
+"DATA",176.112,39171,0)
+4027624^URINARY DRAINAGE BAG BARD #802001
+"DATA",176.112,39171,1)
+804445^^Y
+"DATA",176.112,39172,0)
+4027591^URINARY DRAINAGE SET,COLOPLAST #500
+"DATA",176.112,39172,1)
+804446^^Y
+"DATA",176.112,39173,0)
+4027627^VALVE,CAPPED NEEDLE FREE BRAUN #145068
+"DATA",176.112,39173,1)
+804448^^Y
+"DATA",176.112,39174,0)
+4027589^VALVE,LOPEZ ENTERAL,ICU MEDICAL #9000
+"DATA",176.112,39174,1)
+804449^^Y
+"DATA",176.112,39175,0)
+4027588^WOUND COLLECTOR URESIL #TC600
+"DATA",176.112,39175,1)
+804450^^Y
+"DATA",176.112,39176,0)
+4027652^EXTENSION TUBING H#9345
+"DATA",176.112,39176,1)
+804451^^Y
+"DATA",176.112,39177,0)
+4027666^EXTENSION TUBING UROCARE #6019
+"DATA",176.112,39177,1)
+804452^^Y
+"DATA",176.112,39178,0)
+4027670^FEEDING BAG W/GRAVITY SET KENDALL #702505
+"DATA",176.112,39178,1)
+804453^^Y
+"DATA",176.112,39179,0)
+4027617^HEAT & MOISTURE EXCHANGER,BLOM-SINGER HME BE1055
+"DATA",176.112,39179,1)
+804454^^Y
+"DATA",176.112,39180,0)
+4027626^HEAT & MOISTURE EXCHANGER,PROVOX #7712
+"DATA",176.112,39180,1)
+804455^^Y
+"DATA",176.112,39181,0)
+4027615^INCONT BRIEF SIR DIGNITY PLUS LARGE
+"DATA",176.112,39181,1)
+804456^^Y
+"DATA",176.112,39182,0)
+4027614^INCONT BRIEF SIR DIGNITY PLUS MEDIUM
+"DATA",176.112,39182,1)
+804457^^Y
+"DATA",176.112,39183,0)
+4027613^INCONT BRIEF SIR DIGNITY PLUS SMALL
+"DATA",176.112,39183,1)
+804458^^Y
+"DATA",176.112,39184,0)
+4027612^INCONT BRIEF SIR DIGNITY PLUS X-LARGE
+"DATA",176.112,39184,1)
+804459^^Y
+"DATA",176.112,39185,0)
+4027616^INCONT BRIEF SIR DIGNITY PLUS XX-LARGE
+"DATA",176.112,39185,1)
+804460^^Y
+"DATA",176.112,39186,0)
+4027611^INCONT LINER DEPEND BOOST
+"DATA",176.112,39186,1)
+804461^^Y
+"DATA",176.112,39187,0)
+4027680^INCONT LINER DIGNITY BRIEFMATES SUPER ABSORB
+"DATA",176.112,39187,1)
+804462^^Y^INCONT LINER DIGNITY BRIEFMATE SUPR ABS^Y
+"DATA",176.112,39188,0)
+4027618^KARAYA GUM WASHER,TORBOT #AT0312
+"DATA",176.112,39188,1)
+804463^^Y
+"DATA",176.112,39189,0)
+4027660^LACTOBACILLUS CAP,ORAL,14/LACTOBACILLUS CAP,VAG,14
+"DATA",176.112,39189,1)
+804465^^Y^LACTOBACILLUS 14/14 ORAL & VAG CAP^Y
+"DATA",176.112,39190,0)
+4027653^LEG BAG COMBINATION PACK H#9348 LATEX FREE
+"DATA",176.112,39190,1)
+804466^^Y
+"DATA",176.112,39191,0)
+4027619^MASK,TRACHEOSTOMY HUDSON #1075
+"DATA",176.112,39191,1)
+804467^^Y
+"DATA",176.112,39192,0)
+4027632^POUCH,CLOSED,ESTEEM SYNERGY C#4054-36
+"DATA",176.112,39192,1)
+804468^^Y
+"DATA",176.112,39193,0)
+4027633^POUCH,CLOSED,ESTEEM SYNERGY C#4054-37
+"DATA",176.112,39193,1)
+804469^^Y
+"DATA",176.112,39194,0)
+4027681^POUCH,DRAINABLE,COLOPLAST #6543
+"DATA",176.112,39194,1)
+804470^^Y
+"DATA",176.112,39195,0)
+4027682^POUCH,DRAINABLE,COLOPLAST #6553
+"DATA",176.112,39195,1)
+804471^^Y
+"DATA",176.112,39196,0)
+4027625^POUCH,DRAINABLE,PERMA TYPE #601SHL
+"DATA",176.112,39196,1)
+804472^^Y
+"DATA",176.112,39197,0)
+4027621^POUCH,UROSTOMY,ASSURA COLOPLAST #14227
+"DATA",176.112,39197,1)
+804473^^Y
+"DATA",176.112,39198,0)
+4027620^POUCH,UROSTOMY,ASSURA COLOPLAST #14228
+"DATA",176.112,39198,1)
+804474^^Y
+"DATA",176.112,39199,0)
+4027622^POUCH,UROSTOMY,ASSURA COLOPLAST #14229
+"DATA",176.112,39199,1)
+804475^^Y
+"DATA",176.112,39200,0)
+4027685^SKIN BARRIER WIPE COLOPLAST #44005
+"DATA",176.112,39200,1)
+804476^^Y
+"DATA",176.112,39201,0)
+4027584^SODIUM CHLORIDE MESALT DRESSING 3/4IN X 39IN
+"DATA",176.112,39201,1)
+804477^^Y
+"DATA",176.112,39202,0)
+4027679^SUCTION TUBE ATTACHMENT DEVICE SHERWOOD #501031
+"DATA",176.112,39202,1)
+804478^^Y^SUCTION TUBE ATTACHMENT DEVICE #501031^Y
+"DATA",176.112,39203,0)
+4027623^TAPE,MICROPORE 3IN 3M #1530-3
+"DATA",176.112,39203,1)
+804479^^Y
+"DATA",176.112,39204,0)
+4027673^ADHESIVE,SILICONE BLOM-SINGER LIQUID,TOP
+"DATA",176.112,39204,1)
+804480^^Y
+"DATA",176.112,39205,0)
+4027583^MULTIDEX HYDROPHILIC WOUND DRESSING PWDR,DEROYAL#46-702,PKT,25GM
+"DATA",176.112,39205,1)
+804481^^Y
+"DATA",176.112,39206,0)
+4027639^NEBULIZER KIT,PREFILL,1000ML #3D0808
+"DATA",176.112,39206,1)
+804482^^Y
+"DATA",176.112,39207,0)
+4027585^NEBULIZER,KIT SALTER #8900
+"DATA",176.112,39207,1)
+804483^^Y
+"DATA",176.112,39208,0)
+4027610^APPLIANCE DEODORANT DCP PWDR
+"DATA",176.112,39208,1)
+804627^^Y
+"DATA",176.112,39209,0)
+4027657^PROBIOTIC COMBINATION CAP,ORAL
+"DATA",176.112,39209,1)
+804629^^Y
+"DATA",176.112,39210,0)
+4000819^PENICILLIN G BENZATHINE 600000UNT/ML INJ,SUSP
+"DATA",176.112,39210,1)
+731564^^Y^PENICILLIN G BENZATHINE 600000UNT/ML INJ,SUSP_#1^Y
+"DATA",176.112,39211,0)
+4010447^PHOSPHORUS 250MG/POTASSIUM 1.27MEQ/SODIUM 10.9MEQ TAB
+"DATA",176.112,39211,1)
+805037^^Y
+"DATA",176.112,39212,0)
+4010445^PHOSPHORUS 250MG/POTASSIUM 7.125MEQ/SODIUM 7.125MEQ CAP
+"DATA",176.112,39212,1)
+805039^^Y
+"DATA",176.112,39213,0)
+4006292^PHOSPHORUS 3MMOL/SODIUM 4MEQ/ML INJ
+"DATA",176.112,39213,1)
+805041^^Y
+"DATA",176.112,39214,0)
+4027759^EMBLICA (INDIAN GOOSEBERRY) CAP/TAB
+"DATA",176.112,39214,1)
+806029^^Y
+"DATA",176.112,39215,0)
+4027751^CASTILE SOAP CONCENTRATE PKTS
+"DATA",176.112,39215,1)
+806031^^Y
+"DATA",176.112,39216,0)
+4027727^MULTIVITAMNS (THERATEARS NUTRITION) CAP,ORAL
+"DATA",176.112,39216,1)
+806088^^Y^MULTIVIT (THERATEARS NUTRITION) ORAL CAP^Y
+"DATA",176.112,39217,0)
+4027802^SALIVA,ARTIFICIAL (ORAL BALANCE) LIQUID
+"DATA",176.112,39217,1)
+806103^^Y^ARTIFICIAL SALIVA (ORAL BALANCE) LIQUID^Y
+"DATA",176.112,39218,0)
+4027730^SODIUM CHLORIDE GRANULES
+"DATA",176.112,39218,1)
+806104^^Y
+"DATA",176.112,39219,0)
+4005992^DEXTROSE 10%/ELECTROLYTE NO.48 INJ
+"DATA",176.112,39219,1)
+806401^^Y
+"DATA",176.112,39220,0)
+4005967^DEXTROSE 10%/ELECTROLYTES INJ
+"DATA",176.112,39220,1)
+806403^^Y
+"DATA",176.112,39221,0)
+4005943^DEXTROSE 10%/NACL 0.1% INJ
+"DATA",176.112,39221,1)
+806406^^Y
+"DATA",176.112,39222,0)
+4005946^DEXTROSE 2.5%/NACL 0.11% INJ
+"DATA",176.112,39222,1)
+806407^^Y
+"DATA",176.112,39223,0)
+4005944^DEXTROSE 2.5%/NACL 0.33% INJ
+"DATA",176.112,39223,1)
+806409^^Y
+"DATA",176.112,39224,0)
+4006137^PERITONEAL DIALYSIS SOLUTION/DEXTROSE 4.25% SOLN
+"DATA",176.112,39224,1)
+806680^^Y
+"DATA",176.112,39225,0)
+4008307^SODIUM PO4 0.143%/NA CL 0.5%/K PHOSPHATE 0.036%/PHENOL 0.4% SOLN
+"DATA",176.112,39225,1)
+806744^^Y
+"DATA",176.112,39226,0)
+4005968^DEXTROSE 50%/ELECTROLYTES INJ
+"DATA",176.112,39226,1)
+806747^^Y
+"DATA",176.112,39227,0)
+4005971^DEXTROSE 50%/ELECTROLYTES (PATTERN IV) INJ
+"DATA",176.112,39227,1)
+806748^^Y
+"DATA",176.112,39228,0)
+4027742^ACCU-CHEK COMPACT (GLUCOSE) TEST DRUM,102
+"DATA",176.112,39228,1)
+806779^^Y
+"DATA",176.112,39229,0)
+4027741^ACCU-CHEK COMPACT (GLUCOSE) TEST DRUM,51
+"DATA",176.112,39229,1)
+806780^^Y
+"DATA",176.112,39230,0)
+4027713^ADAPTER,FEEDING,UNIVERSAL 20F KC#0135-20
+"DATA",176.112,39230,1)
+806784^^Y
+"DATA",176.112,39231,0)
+4027714^BANDAGE,ELASTIC,ADHESIVE 1IN X 5YD
+"DATA",176.112,39231,1)
+806785^^Y
+"DATA",176.112,39232,0)
+4027779^DEPEND SUPER PLUS UNDERWEAR MEDIUM
+"DATA",176.112,39232,1)
+806787^^Y
+"DATA",176.112,39233,0)
+4027775^FEEDING SET,GRAVITY MEDLINE #ENT70503
+"DATA",176.112,39233,1)
+806796^^Y
+"DATA",176.112,39234,0)
+4027776^HOSE ANTI-EMBOLISM THIGH LEN XX-LRG-REG
+"DATA",176.112,39234,1)
+806797^^Y
+"DATA",176.112,39235,0)
+4027793^LARYNGEAL PROSTHESIS,BLOM-SINGER BE2022
+"DATA",176.112,39235,1)
+806798^^Y
+"DATA",176.112,39236,0)
+4027794^LARYNGEAL PROSTHESIS,BLOM-SINGER BE2026
+"DATA",176.112,39236,1)
+806799^^Y
+"DATA",176.112,39237,0)
+4027795^LARYNGEAL PROSTHESIS,BLOM-SINGER BE2030
+"DATA",176.112,39237,1)
+806800^^Y
+"DATA",176.112,39238,0)
+4027796^LARYNGEAL PROSTHESIS,BLOM-SINGER BE2033
+"DATA",176.112,39238,1)
+806801^^Y
+"DATA",176.112,39239,0)
+4027754^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6000
+"DATA",176.112,39239,1)
+806802^^Y
+"DATA",176.112,39240,0)
+4027755^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6001
+"DATA",176.112,39240,1)
+806803^^Y
+"DATA",176.112,39241,0)
+4027756^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6002
+"DATA",176.112,39241,1)
+806804^^Y
+"DATA",176.112,39242,0)
+4027757^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6003
+"DATA",176.112,39242,1)
+806805^^Y
+"DATA",176.112,39243,0)
+4027753^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6004
+"DATA",176.112,39243,1)
+806806^^Y
+"DATA",176.112,39244,0)
+4027758^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6005
+"DATA",176.112,39244,1)
+806807^^Y
+"DATA",176.112,39245,0)
+4027762^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6009
+"DATA",176.112,39245,1)
+806808^^Y
+"DATA",176.112,39246,0)
+4027763^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6010
+"DATA",176.112,39246,1)
+806809^^Y
+"DATA",176.112,39247,0)
+4027764^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6011
+"DATA",176.112,39247,1)
+806810^^Y
+"DATA",176.112,39248,0)
+4027765^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6012
+"DATA",176.112,39248,1)
+806811^^Y
+"DATA",176.112,39249,0)
+4027766^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6013
+"DATA",176.112,39249,1)
+806812^^Y
+"DATA",176.112,39250,0)
+4027767^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6014
+"DATA",176.112,39250,1)
+806813^^Y
+"DATA",176.112,39251,0)
+4027768^LARYNGEAL PROSTHESIS,BLOM-SINGER BE6015
+"DATA",176.112,39251,1)
+806814^^Y
+"DATA",176.112,39252,0)
+4027789^LARYNGEAL PROSTHESIS,BLOM-SINGER IN2010
+"DATA",176.112,39252,1)
+806815^^Y
+"DATA",176.112,39253,0)
+4027790^LARYNGEAL PROSTHESIS,BLOM-SINGER IN2012
+"DATA",176.112,39253,1)
+806816^^Y
+"DATA",176.112,39254,0)
+4027791^LARYNGEAL PROSTHESIS,BLOM-SINGER IN2016
+"DATA",176.112,39254,1)
+806817^^Y
+"DATA",176.112,39255,0)
+4027715^LEG BAG FREEDOM T-TAP KIT COLOPLAST #7075
+"DATA",176.112,39255,1)
+806818^^Y
+"DATA",176.112,39256,0)
+4027761^NEEDLE 20G 0.75IN SMITHS #2767
+"DATA",176.112,39256,1)
+806819^^Y
+"DATA",176.112,39257,0)
+4027760^NEEDLE 22G 0.75IN SMITHS #2861
+"DATA",176.112,39257,1)
+806820^^Y
+"DATA",176.112,39258,0)
+4027734^PAD,MOLE SKIN DR SCHOLL 4 1/8IN X 3 3/8IN STRIP
+"DATA",176.112,39258,1)
+806821^^Y^PAD,MOLE SKIN 4 1/8 X 3 3/8IN STRIP^Y
+"DATA",176.112,39259,0)
+4027738^POUCH,DRAINABLE,ASSURA COLOPLAST #13870
+"DATA",176.112,39259,1)
+806822^^Y
+"DATA",176.112,39260,0)
+4027737^POUCH,DRAINABLE,ASSURA COLOPLAST #13874
+"DATA",176.112,39260,1)
+806823^^Y
+"DATA",176.112,39261,0)
+4027739^POUCH,DRAINABLE,ASSURA COLOPLAST #13875
+"DATA",176.112,39261,1)
+806824^^Y
+"DATA",176.112,39262,0)
+4027740^POUCH,DRAINABLE,ASSURA COLOPLAST #13876
+"DATA",176.112,39262,1)
+806825^^Y
+"DATA",176.112,39263,0)
+4027744^PRECISION XTRA BLOOD B-KETONE (ACETONE) TEST,STRIP
+"DATA",176.112,39263,1)
+806826^^Y
+"DATA",176.112,39264,0)
+4027798^RING,BELT RETAINER COLOPLAST #4270
+"DATA",176.112,39264,1)
+806827^^Y
+"DATA",176.112,39265,0)
+4027797^RING,BELT RETAINER COLOPLAST #4271
+"DATA",176.112,39265,1)
+806828^^Y
+"DATA",176.112,39266,0)
+4027799^RING,BELT RETAINER COLOPLAST #4274
+"DATA",176.112,39266,1)
+806829^^Y
+"DATA",176.112,39267,0)
+4027709^SUCTION TUBE ATTACHMENT DEVICE CARDINAL HEALTH #K80
+"DATA",176.112,39267,1)
+806830^^Y^SUCTION TUBE ATTACHMENT DEVICE #K80^Y
+"DATA",176.112,39268,0)
+4027708^SUCTION TUBE ATTACHMENT DEVICE CARDINAL HEALTH #K86
+"DATA",176.112,39268,1)
+806831^^Y^SUCTION TUBE ATTACHMENT DEVICE #K86^Y
+"DATA",176.112,39269,0)
+4027707^SUCTION TUBE ATTACHMENT DEVICE CARDINAL HEALTH #K86V
+"DATA",176.112,39269,1)
+806832^^Y^SUCTION TUBE ATTACHMENT DEVICE #K86V^Y
+"DATA",176.112,39270,0)
+4027780^SUCTION TUBE ATTACHMENT DEVICE CARDINAL HEALTH #K87
+"DATA",176.112,39270,1)
+806833^^Y^SUCTION TUBE ATTACHMENT DEVICE #K87^Y
+"DATA",176.112,39271,0)
+4027710^SUCTION TUBE ATTACHMENT DEVICE CARDINAL HEALTH #K87V
+"DATA",176.112,39271,1)
+806834^^Y^SUCTION TUBE ATTACHMENT DEVICE #K87V^Y
+"DATA",176.112,39272,0)
+4027787^SUCTION TUBE ATTACHMENT DEVICE KENDALL #501007
+"DATA",176.112,39272,1)
+806835^^Y^SUCTION TUBE ATTACHMENT DEVICE K #501007^Y
+"DATA",176.112,39273,0)
+4027773^TRACH DISC,ADHESIVE TAPE BLOM-SINGER BE6034
+"DATA",176.112,39273,1)
+806836^^Y^TRACH DISC,ADHESIVE TAPE BE6034^Y
+"DATA",176.112,39274,0)
+4027774^TRACH DISC,ADHESIVE TAPE BLOM-SINGER BE6035
+"DATA",176.112,39274,1)
+806837^^Y^TRACH DISC,ADHESIVE TAPE BE6035^Y
+"DATA",176.112,39275,0)
+4027769^TRACH DISC,ADHESIVE TAPE BLOM-SINGER BE6041
+"DATA",176.112,39275,1)
+806838^^Y^TRACH DISC,ADHESIVE TAPE BE6041^Y
+"DATA",176.112,39276,0)
+4027770^TRACH DISC,ADHESIVE TAPE BLOM-SINGER BE6042
+"DATA",176.112,39276,1)
+806839^^Y^TRACH DISC,ADHESIVE TAPE BE6042^Y
+"DATA",176.112,39277,0)
+4027771^TRACH DISC,ADHESIVE TAPE BLOM-SINGER BE6043
+"DATA",176.112,39277,1)
+806840^^Y^TRACH DISC,ADHESIVE TAPE BE6043^Y
+"DATA",176.112,39278,0)
+4027772^TRACH DISC,ADHESIVE TAPE BLOM-SINGER BE6044
+"DATA",176.112,39278,1)
+806841^^Y^TRACH DISC,ADHESIVE TAPE BE6044^Y
+"DATA",176.112,39279,0)
+4027778^TRACH PUNCTURE DILATOR 18FR BLOM-SINGER BE6050
+"DATA",176.112,39279,1)
+806842^^Y^TRACH PUNCTURE DILATOR 18FR BE6050^Y
+"DATA",176.112,39280,0)
+4027777^TRACH PUNCTURE DILATOR 22FR BLOM-SINGER BE2050
+"DATA",176.112,39280,1)
+806843^^Y^TRACH PUNCTURE DILATOR 22FR BE2050^Y
+"DATA",176.112,39281,0)
+4027712^TRACH TUBE,SZ 5 JACKSON #23-1150SS
+"DATA",176.112,39281,1)
+806844^^Y
+"DATA",176.112,39282,0)
+4027732^TRACH TUBE,SZ 6 JACKSON #23-1247SS
+"DATA",176.112,39282,1)
+806845^^Y
+"DATA",176.112,39283,0)
+4027720^TRACH TUBE,SZ 7 CUFFLESS SHLY 70XLTUP
+"DATA",176.112,39283,1)
+806846^^Y
+"DATA",176.112,39284,0)
+4027719^TRACH TUBE,SZ 8 CUFFLESS SHLY 80XLTUD
+"DATA",176.112,39284,1)
+806847^^Y
+"DATA",176.112,39285,0)
+4027722^TRACH VALVE FILTERS W/CAP,ASTV II BLOM-SINGER BE1010
+"DATA",176.112,39285,1)
+806848^^Y^TRACH VALVE FILTERS W/CAP,ASTV II BE1010^Y
+"DATA",176.112,39286,0)
+4027721^TRACH VALVE FILTERS,ASTV II BLOM-SINGER BE1030
+"DATA",176.112,39286,1)
+806849^^Y^TRACH VALVE FILTERS,ASTV II BE1030^Y
+"DATA",176.112,39287,0)
+4027724^TRACH VALVE,BLOM-SINGER ASTV BE8025H
+"DATA",176.112,39287,1)
+806850^^Y
+"DATA",176.112,39288,0)
+4027723^TRACH VALVE,BLOM-SINGER ASTV BE8026H
+"DATA",176.112,39288,1)
+806851^^Y
+"DATA",176.112,39289,0)
+4027782^TUBE FEEDING GT 12FR KC#0110-12
+"DATA",176.112,39289,1)
+806852^^Y
+"DATA",176.112,39290,0)
+4027783^TUBE FEEDING GT 14FR KC#0110-14
+"DATA",176.112,39290,1)
+806853^^Y
+"DATA",176.112,39291,0)
+4027784^TUBE FEEDING GT 16FR KC#0110-16
+"DATA",176.112,39291,1)
+806854^^Y
+"DATA",176.112,39292,0)
+4027785^TUBE FEEDING GT 18FR KC#0110-18
+"DATA",176.112,39292,1)
+806855^^Y
+"DATA",176.112,39293,0)
+4027781^TUBE FEEDING GT 20FR KC#0110-20
+"DATA",176.112,39293,1)
+806856^^Y
+"DATA",176.112,39294,0)
+4027786^TUBE FEEDING GT 22FR KC#0110-22
+"DATA",176.112,39294,1)
+806857^^Y
+"DATA",176.112,39295,0)
+4027788^LARYNGEAL PROSTHESIS,BLOM-SINGER IN2014
+"DATA",176.112,39295,1)
+806868^^Y
+"DATA",176.112,39296,0)
+4027717^SUCTION CATHETER,16FR KENDALL #35602
+"DATA",176.112,39296,1)
+806869^^Y
+"DATA",176.112,39297,0)
+4027728^OSMOLITE 1.5 CAL LIQUID
+"DATA",176.112,39297,1)
+806871^^Y^NUTR SUPL OSMOLITE 1.5 CAL LIQUID^Y
+"DATA",176.112,39298,0)
+4027729^OSMOLITE 1.5 CAL LIQUID 1000ML
+"DATA",176.112,39298,1)
+806872^^Y^NUTR SUPL OSMOLITE 1.5 CAL LIQUID 1000ML^Y
+"DATA",176.112,39299,0)
+4027726^POTASSIUM HYDROXIDE 10% SOLN
+"DATA",176.112,39299,1)
+806873^^Y
+"DATA",176.112,39300,0)
+4027807^SOMATROPIN (NUTROPIN AQ) 5MG/2ML INJ,SOLN,NUSPIN,2ML
+"DATA",176.112,39300,1)
+806973^^Y
+"DATA",176.112,39301,0)
+4027752^SUNSCREEN-45 PABA-FREE COMBINATION SPRAY
+"DATA",176.112,39301,1)
+807078^^Y
+"DATA",176.112,39302,0)
+4006127^CHROMIUM 1MG TAB
+"DATA",176.112,39302,1)
+807091^^Y
+"DATA",176.112,39303,0)
+4005134^THROMBIN 20000UNT/VIL PWDR,TOP
+"DATA",176.112,39303,1)
+807207^^Y
+"DATA",176.112,39304,0)
+4015642^LEVONORGESTREL 52MG INSERT SA, INTRAUTERINE
+"DATA",176.112,39304,1)
+807283^^Y
+"DATA",176.112,39305,0)
+4017054^LANSOPRAZOLE 15MG CAP,SA/NAPROXEN 375MG TAB PKT,84
+"DATA",176.112,39305,1)
+807287^^Y
+"DATA",176.112,39306,0)
+4005900^NOVAMINE 15% INJ
+"DATA",176.112,39306,1)
+807371^^Y
+"DATA",176.112,39307,0)
+4005984^DEXTROSE 5%/ELECTROLYTE NO.75 INJ
+"DATA",176.112,39307,1)
+807383^^Y
+"DATA",176.112,39308,0)
+4005985^DEXTROSE 5%/ELECTROLYTE NO.48 INJ
+"DATA",176.112,39308,1)
+807398^^Y
+"DATA",176.112,39309,0)
+4008338^COLD CREAM,TOP
+"DATA",176.112,39309,1)
+807783^^Y
+"DATA",176.112,39310,0)
+4009696^MOISTUREL CREAM,TOP
+"DATA",176.112,39310,1)
+807786^^Y
+"DATA",176.112,39311,0)
+4005237^NORETHIN 1/50 M TAB,28
+"DATA",176.112,39311,1)
+807790^^Y
+"DATA",176.112,39312,0)
+4027872^L-GLUTAMINE PWDR PKT,5GM
+"DATA",176.112,39312,1)
+808038^^Y
+"DATA",176.112,39313,0)
+4027894^AUTOINJECTOR, AUTOJECT-2 #AJ1300
+"DATA",176.112,39313,1)
+808928^^Y
+"DATA",176.112,39314,0)
+4027822^BRIEF,PROTECTION PLUS XX-LARGE #MSC97700
+"DATA",176.112,39314,1)
+808932^^Y
+"DATA",176.112,39315,0)
+4027834^CATHERIZATION SET,INTERMITTENT 10FR APOGEE H#B10FB
+"DATA",176.112,39315,1)
+808933^^Y^CATH SET,INTERMIT 10FR APOGEE H#B10FB^Y
+"DATA",176.112,39316,0)
+4027839^CATHERIZATION SET,INTERMITTENT 12FR APOGEE H#B12CB
+"DATA",176.112,39316,1)
+808934^^Y^CATH SET,INTERMIT 12FR APOGEE H#B12CB^Y
+"DATA",176.112,39317,0)
+4027835^CATHERIZATION SET,INTERMITTENT 12FR APOGEE H#B12FB
+"DATA",176.112,39317,1)
+808938^^Y^CATH SET,INTERMIT 12FR APOGEE H#B12FB^Y
+"DATA",176.112,39318,0)
+4027844^CATHERIZATION SET,INTERMITTENT 12FR APOGEE H#B12RB
+"DATA",176.112,39318,1)
+808939^^Y^CATH SET,INTERMIT 12FR APOGEE H#B12RB^Y
+"DATA",176.112,39319,0)
+4027842^CATHERIZATION SET,INTERMITTENT 12FR APOGEE H#B12SB
+"DATA",176.112,39319,1)
+808940^^Y^CATH SET,INTERMIT 12FR APOGEE H#B12SB^Y
+"DATA",176.112,39320,0)
+4027847^CATHERIZATION SET,INTERMITTENT 12FR H#B12CB
+"DATA",176.112,39320,1)
+808941^^Y^CATH SET,INTERMIT 12FR APOGEE H#B12CB^Y
+"DATA",176.112,39321,0)
+4027840^CATHERIZATION SET,INTERMITTENT 14FR APOGEE H#B14CB
+"DATA",176.112,39321,1)
+808942^^Y^CATH SET,INTERMIT 14FR APOGEE H#B14CB^Y
+"DATA",176.112,39322,0)
+4027836^CATHERIZATION SET,INTERMITTENT 14FR APOGEE H#B14FB
+"DATA",176.112,39322,1)
+808943^^Y^CATH SET,INTERMIT 14FR APOGEE H#B14FB^Y
+"DATA",176.112,39323,0)
+4027848^CATHERIZATION SET,INTERMITTENT 14FR APOGEE H#B14FB-FEMALE
+"DATA",176.112,39323,1)
+808944^^Y^CATH SET,INTERMIT 14FR APOGEE H#B14FB-F^Y
+"DATA",176.112,39324,0)
+4027846^CATHERIZATION SET,INTERMITTENT 14FR APOGEE H#B14RB
+"DATA",176.112,39324,1)
+808945^^Y^CATH SET,INTERMIT 14FR APOGEE H#B14RB^Y
+"DATA",176.112,39325,0)
+4027843^CATHERIZATION SET,INTERMITTENT 14FR APOGEE H#B14SB
+"DATA",176.112,39325,1)
+808946^^Y^CATH SET,INTERMIT 14FR APOGEE H#B14SB^Y
+"DATA",176.112,39326,0)
+4027841^CATHERIZATION SET,INTERMITTENT 16FR APOGEE H#B16CB
+"DATA",176.112,39326,1)
+808947^^Y^CATH SET,INTERMIT 16FR APOGEE H#B16CB^Y
+"DATA",176.112,39327,0)
+4027837^CATHERIZATION SET,INTERMITTENT 16FR APOGEE H#B16FB
+"DATA",176.112,39327,1)
+808948^^Y^CATH SET,INTERMIT 16FR H#B16FB^Y
+"DATA",176.112,39328,0)
+4027845^CATHERIZATION SET,INTERMITTENT 16FR APOGEE H#B16RB
+"DATA",176.112,39328,1)
+808949^^Y^CATH SET,INTERMIT 16FR APOGEE H#B16RB^Y
+"DATA",176.112,39329,0)
+4027838^CATHERIZATION SET,INTERMITTENT 18FR APOGEE H#B18FB
+"DATA",176.112,39329,1)
+808950^^Y^CATH SET,INTERMIT 18FR APOGEE H#B18FB^Y
+"DATA",176.112,39330,0)
+4027832^CATHERIZATION SET,INTERMITTENT 6FR APOGEE H#B6FB
+"DATA",176.112,39330,1)
+808951^^Y^CATH SET,INTERMIT 6FR H#B6FB^Y
+"DATA",176.112,39331,0)
+4027833^CATHERIZATION SET,INTERMITTENT 8FR APOGEE H#B8FB
+"DATA",176.112,39331,1)
+808952^^Y^CATH SET,INTERMIT 8FR APOGEE H#B8FB^Y
+"DATA",176.112,39332,0)
+4027821^CATHETER,EXTERNAL ALPHADRY #10023
+"DATA",176.112,39332,1)
+808953^^Y
+"DATA",176.112,39333,0)
+4027817^CATHETER,EXTERNAL ALPHADRY #10025
+"DATA",176.112,39333,1)
+808956^^Y
+"DATA",176.112,39334,0)
+4027820^CATHETER,EXTERNAL ALPHADRY #10034
+"DATA",176.112,39334,1)
+808959^^Y
+"DATA",176.112,39335,0)
+4027897^CATHETER,EXTERNAL W/STRAP RUSCH #A3000
+"DATA",176.112,39335,1)
+808960^^Y
+"DATA",176.112,39336,0)
+4027829^CATHETER,INTERMITTENT PERSONAL 16FR ROCHESTER #63916
+"DATA",176.112,39336,1)
+808961^^Y^CATH,INTERM PERSONAL 16FR ROCH #63916^Y
+"DATA",176.112,39337,0)
+4027851^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 10FR H#B10F
+"DATA",176.112,39337,1)
+808962^^Y^CATH,INTERMIT APOGEE 10FR H#B10F^Y
+"DATA",176.112,39338,0)
+4027857^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 12FR H#B12C
+"DATA",176.112,39338,1)
+808963^^Y^CATH,INTERMIT APOGEE 12FR H#B12C^Y
+"DATA",176.112,39339,0)
+4027852^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 12FR H#B12F
+"DATA",176.112,39339,1)
+808964^^Y^CATH,INTERMIT, APOGEE 12FR H#B12F^Y
+"DATA",176.112,39340,0)
+4027862^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 12FR H#B12R
+"DATA",176.112,39340,1)
+808965^^Y^CATH,INTERMIT APOGEE 12FR H#B12R^Y
+"DATA",176.112,39341,0)
+4027860^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 12FR H#B12S
+"DATA",176.112,39341,1)
+808966^^Y^CATH,INTERMIT APOGEE 12FR H#B12S^Y
+"DATA",176.112,39342,0)
+4027858^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 14FR H#B14C
+"DATA",176.112,39342,1)
+808967^^Y^CATH,INTERMIT APOGEE 14FR H#B14C^Y
+"DATA",176.112,39343,0)
+4027853^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 14FR H#B14F
+"DATA",176.112,39343,1)
+808968^^Y^CATH,INTERMIT APOGEE 14FR H#B14F^Y
+"DATA",176.112,39344,0)
+4027856^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 14FR H#B14F-FEMALE
+"DATA",176.112,39344,1)
+808969^^Y^CATH,INTERMIT APOGEE 14FR H#B14F-F^Y
+"DATA",176.112,39345,0)
+4027863^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 14FR H#B14R
+"DATA",176.112,39345,1)
+808970^^Y^CATH,INTERMIT APOGEE 14FR H#B14R^Y
+"DATA",176.112,39346,0)
+4027861^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 14FR H#B14S
+"DATA",176.112,39346,1)
+808971^^Y^CATH,INTERMIT APOGEE 14FR H#B14S^Y
+"DATA",176.112,39347,0)
+4027859^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 16FR H#B16C
+"DATA",176.112,39347,1)
+808972^^Y^CATH,INTERMIT APOGEE 16FR H#B16C^Y
+"DATA",176.112,39348,0)
+4027854^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 16FR H#B16F
+"DATA",176.112,39348,1)
+808973^^Y^CATH,INTERMIT APOGEE 16FR H#B16F^Y
+"DATA",176.112,39349,0)
+4027864^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 16FR H#B16R
+"DATA",176.112,39349,1)
+808974^^Y^CATH,INTERMIT APOGEE 16FR H#B16R^Y
+"DATA",176.112,39350,0)
+4027855^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 18FR H#B18F
+"DATA",176.112,39350,1)
+808975^^Y^CATH,INTERMIT APOGEE 18FR H#B18F^Y
+"DATA",176.112,39351,0)
+4027849^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 6FR H#B6F
+"DATA",176.112,39351,1)
+808976^^Y^CATH,INTERMIT APOGEE 6FR H#B6F^Y
+"DATA",176.112,39352,0)
+4027850^CATHETER,INTERMITTENT,CLOSED SYSTEM APOGEE 8FR H#B8F
+"DATA",176.112,39352,1)
+808977^^Y^CATH,INTERMIT APOGEE 8FR H#B8F^Y
+"DATA",176.112,39353,0)
+4027868^DEPEND ADJUSTABLE UNDERWEAR LARGE/X-LARGE
+"DATA",176.112,39353,1)
+808980^^Y
+"DATA",176.112,39354,0)
+4027867^DEPEND REFASTENABLE UNDERWEAR SMALL/MED
+"DATA",176.112,39354,1)
+808981^^Y
+"DATA",176.112,39355,0)
+4027878^DEPEND UNDERGARMENT X-LARGE X-ABSORB
+"DATA",176.112,39355,1)
+808982^^Y
+"DATA",176.112,39356,0)
+4027882^DRESSING,MEPILEX BORDER LITE 1.6IN X 2IN #281000
+"DATA",176.112,39356,1)
+808983^^Y
+"DATA",176.112,39357,0)
+4027885^DRESSING,MEPILEX BORDER LITE 12IN X 15IN #281500
+"DATA",176.112,39357,1)
+808984^^Y
+"DATA",176.112,39358,0)
+4027881^DRESSING,MEPILEX BORDER LITE 2IN X 5IN #281100
+"DATA",176.112,39358,1)
+808985^^Y
+"DATA",176.112,39359,0)
+4027883^DRESSING,MEPILEX BORDER LITE 3IN X 3IN #281200
+"DATA",176.112,39359,1)
+808986^^Y
+"DATA",176.112,39360,0)
+4027884^DRESSING,MEPILEX BORDER LITE 4IN X 4IN #281300
+"DATA",176.112,39360,1)
+808987^^Y
+"DATA",176.112,39361,0)
+4008878^BENZOCAINE 10MG/CETYLPYRIDINIUM CL LOZENGE
+"DATA",176.112,39361,1)
+809105^^Y
+"DATA",176.112,39362,0)
+4006967^GG 300MG/P-EPHRINE 10MG/P-PROPANOL 75MG CAP,SA
+"DATA",176.112,39362,1)
+809108^^Y
+"DATA",176.112,39363,0)
+4007305^CTM 8MG/P-EPHRINE 25MG/P-PROPANOL 50MG TAB,SA
+"DATA",176.112,39363,1)
+809109^^Y
+"DATA",176.112,39364,0)
+4007306^CTM 5MG/P-EPHRINE 20MG/P-PROPANOL 20MG/5ML SYRUP
+"DATA",176.112,39364,1)
+809110^^Y
+"DATA",176.112,39365,0)
+4007834^ALCOHOL 74.9%/BENZOCAINE 6% GEL,TOP
+"DATA",176.112,39365,1)
+809111^^Y
+"DATA",176.112,39366,0)
+4027866^OXEPA 1.5 CAL LIQUID
+"DATA",176.112,39366,1)
+809114^^Y^NUTRITION SUPL OXEPA 1.5 CAL LIQUID^Y
+"DATA",176.112,39367,0)
+4027865^OXEPA 1.5 CAL LIQUID 1000ML
+"DATA",176.112,39367,1)
+809115^^Y^NUTRITION SUPL OXEPA 1.5 CAL LIQ 1000ML^Y
+"DATA",176.112,39368,0)
+4027886^POUCH,DRAINABLE POUCHKINS H#3796
+"DATA",176.112,39368,1)
+809116^^Y
+"DATA",176.112,39369,0)
+4027816^POUCH,DRAINABLE,EHOB #6410000
+"DATA",176.112,39369,1)
+809117^^Y
+"DATA",176.112,39370,0)
+4027825^POUCH,DRAINABLE,MICROSKIN CYMED #51345
+"DATA",176.112,39370,1)
+809118^^Y
+"DATA",176.112,39371,0)
+4027824^POUCH,DRAINABLE,MICROSKIN CYMED #51445
+"DATA",176.112,39371,1)
+809119^^Y
+"DATA",176.112,39372,0)
+4027874^POUCH,UROSTOMY,PEDIATRIC H#3797
+"DATA",176.112,39372,1)
+809120^^Y
+"DATA",176.112,39373,0)
+4027880^PROTEIN SUPPLEMENT,PROPASS PWDR
+"DATA",176.112,39373,1)
+809121^^Y^NUTRITION SUPL,PROPASS PWDR^Y
+"DATA",176.112,39374,0)
+4027871^SET,INFUSION,EXTENSION BAXTER #2C6227
+"DATA",176.112,39374,1)
+809122^^Y
+"DATA",176.112,39375,0)
+4027898^SKIN PREP,NO STING WIPE
+"DATA",176.112,39375,1)
+809123^^Y
+"DATA",176.112,39376,0)
+4027877^SUNSCREEN-70 PABA-FREE COMBINATION LOTION
+"DATA",176.112,39376,1)
+809124^^Y^SUNSCREEN-70 PABA-FREE COMBINATION LOT^Y
+"DATA",176.112,39377,0)
+4027899^GELATIN,ABSORBENT PKT
+"DATA",176.112,39377,1)
+809126^^Y
+"DATA",176.112,39378,0)
+4004801^CTM 4MG/P-EPHRINE 10MG/P-PROPANOL 50MG/PYRILAMINE 25MG TAB
+"DATA",176.112,39378,1)
+809134^^Y
+"DATA",176.112,39379,0)
+4005095^PENTOBARB 60MG/B-DONNA 0.25MG/CAFN/ERGOTAMINE 2MG SUPP,RTL
+"DATA",176.112,39379,1)
+809161^^Y
+"DATA",176.112,39380,0)
+4009413^CINOXATE 4%/METHYL ANTHRANILATE 5% CREAM,TOP
+"DATA",176.112,39380,1)
+809203^^Y
+"DATA",176.112,39381,0)
+4013663^PAPAIN 1.1 MILLION UNT/UREA 10% OINT,TOP
+"DATA",176.112,39381,1)
+809348^^Y
+"DATA",176.112,39382,0)
+4027823^BANDAGE,GAUZE,STRETCH 2IN X 65IN STERILE
+"DATA",176.112,39382,1)
+809354^^Y
+"DATA",176.112,39383,0)
+4027826^BARRIER,MICROSKIN CYMED #58100
+"DATA",176.112,39383,1)
+809355^^Y
+"DATA",176.112,39384,0)
+4027818^CATHETER,EXTERNAL ALPHADRY #10027
+"DATA",176.112,39384,1)
+809356^^Y
+"DATA",176.112,39385,0)
+4027819^CATHETER,EXTERNAL ALPHADRY #10030
+"DATA",176.112,39385,1)
+809360^^Y
+"DATA",176.112,39386,0)
+4002125^VITAMIN LIQUID
+"DATA",176.112,39386,1)
+809374^^Y
+"DATA",176.112,39387,0)
+4017379^OMEGA-3-ACID ETHYL ESTERS 1000MG CAP,ORAL
+"DATA",176.112,39387,1)
+809429^^Y
+"DATA",176.112,39388,0)
+4004062^VITAMIN A 3333.3UNT/GM CREAM,TOP
+"DATA",176.112,39388,1)
+809503^^Y
+"DATA",176.112,39389,0)
+4009607^OS-CAL 500 W/VITAMIN D TAB
+"DATA",176.112,39389,1)
+809539^^Y
+"DATA",176.112,39390,0)
+4001195^ISONIAZID 50MG/ML SYRUP
+"DATA",176.112,39390,1)
+809583^^Y
+"DATA",176.112,39391,0)
+4003932^IOTHALAMATE MEGLUMINE 17.2% SOLN
+"DATA",176.112,39391,1)
+809628^^Y
+"DATA",176.112,39392,0)
+4003942^IOTHALAMATE MEGLUMINE 30% INJ
+"DATA",176.112,39392,1)
+809646^^Y
+"DATA",176.112,39393,0)
+4003937^IOTHALAMATE MEGLUMINE 43% INJ
+"DATA",176.112,39393,1)
+809670^^Y
+"DATA",176.112,39394,0)
+4003934^IOTHALAMATE MEGLUMINE 60% INJ
+"DATA",176.112,39394,1)
+809693^^Y
+"DATA",176.112,39395,0)
+4003931^IOTHALAMATE NA 54.3% INJ
+"DATA",176.112,39395,1)
+809745^^Y
+"DATA",176.112,39396,0)
+4003935^IOTHALAMATE NA 66.8% INJ
+"DATA",176.112,39396,1)
+809747^^Y
+"DATA",176.112,39397,0)
+4003933^IOTHALAMATE NA 80% INJ
+"DATA",176.112,39397,1)
+809749^^Y
+"DATA",176.112,39398,0)
+4008842^ALOE 100MG/VIT A 6666.7UNT/VIT E 100UNT/GM CREAM,TOP
+"DATA",176.112,39398,1)
+809805^^Y
+"DATA",176.112,39399,0)
+4002040^SODIUM PERTECHNETATE (Tc 99m) 9MG/ML INJ
+"DATA",176.112,39399,1)
+809848^^Y
+"DATA",177.201,1,0)
+EPCRN^DIR^/home/vademo2/CCR/
+"DATA",178.101,1,0)
+Purpose section template ^2.16.840.1.113883.10.20.1.13
+"DATA",178.101,1,5)
+component^Purpose
+"DATA",178.101,2,0)
+Purpose activity template ^2.16.840.1.113883.10.20.1.30
+"DATA",178.101,2,5)
+entry
+"DATA",178.101,2,7,0)
+^178.111P^1^1
+"DATA",178.101,2,7,1,0)
+1^entry^Activity
+"DATA",178.101,3,0)
+Payers section template ^2.16.840.1.113883.10.20.1.9
+"DATA",178.101,3,5)
+component^Payers
+"DATA",178.101,4,0)
+Coverage activity template ^2.16.840.1.113883.10.20.1.20
+"DATA",178.101,4,5)
+entry
+"DATA",178.101,4,7,0)
+^178.111P^1^1
+"DATA",178.101,4,7,1,0)
+3^entry^Coverage
+"DATA",178.101,5,0)
+Policy activity template ^2.16.840.1.113883.10.20.1.26
+"DATA",178.101,5,5)
+entryRelationship
+"DATA",178.101,5,7,0)
+^178.111P^1^1
+"DATA",178.101,5,7,1,0)
+3^entryRelationship^Policy
+"DATA",178.101,6,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,6,5)
+entryRelationship
+"DATA",178.101,6,7,0)
+^178.111P^1^1
+"DATA",178.101,6,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,7,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,7,5)
+component^AdvanceDirectives
+"DATA",178.101,8,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,8,5)
+entry
+"DATA",178.101,8,7,0)
+^178.111P^1^1
+"DATA",178.101,8,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,9,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,9,5)
+observation
+"DATA",178.101,9,7,0)
+^178.111P^1^1
+"DATA",178.101,9,7,1,0)
+7^observation^Verification
+"DATA",178.101,10,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,10,5)
+entryRelationship
+"DATA",178.101,10,7,0)
+^178.111P^1^1
+"DATA",178.101,10,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,11,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,11,5)
+reference
+"DATA",178.101,11,7,0)
+^178.111P^1^1
+"DATA",178.101,11,7,1,0)
+7^reference^ref
+"DATA",178.101,12,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,12,5)
+component^FunctionalStatus
+"DATA",178.101,13,0)
+Problem act template ^2.16.840.1.113883.10.20.1.27
+"DATA",178.101,13,5)
+entry
+"DATA",178.101,13,7,0)
+^178.111P^3^3
+"DATA",178.101,13,7,1,0)
+12^entry^Problem
+"DATA",178.101,13,7,2,0)
+16^entry^Problem
+"DATA",178.101,13,7,3,0)
+26^entry^Alert
+"DATA",178.101,14,0)
+Problem observation template ^2.16.840.1.113883.10.20.1.28
+"DATA",178.101,14,5)
+entryRelationship
+"DATA",178.101,14,7,0)
+^178.111P^3^3
+"DATA",178.101,14,7,1,0)
+12^entryRelationship^Problem
+"DATA",178.101,14,7,2,0)
+16^entryRelationship^Problem
+"DATA",178.101,14,7,3,0)
+30^entryRelationship^Problem
+"DATA",178.101,15,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,15,5)
+entryRelationship
+"DATA",178.101,15,7,0)
+^178.111P^1^1
+"DATA",178.101,15,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,16,0)
+Problem section template ^2.16.840.1.113883.10.20.1.11
+"DATA",178.101,16,5)
+component^Problems
+"DATA",178.101,17,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,17,5)
+entryRelationship
+"DATA",178.101,17,7,0)
+^178.111P^1^1
+"DATA",178.101,17,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,18,0)
+Episode observation template ^2.16.840.1.113883.10.20.1.41
+"DATA",178.101,18,5)
+entryRelationship
+"DATA",178.101,18,7,0)
+^178.111P^2^2
+"DATA",178.101,18,7,1,0)
+16^entryRelationship
+"DATA",178.101,18,7,2,0)
+24^entryRelationship^SocHisObs
+"DATA",178.101,19,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,19,5)
+component^FamilyHistory
+"DATA",178.101,20,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,20,5)
+entry
+"DATA",178.101,20,7,0)
+^178.111P^1^1
+"DATA",178.101,20,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,21,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,21,5)
+component
+"DATA",178.101,21,7,0)
+^178.111P^1^1
+"DATA",178.101,21,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,22,0)
+Age observation template ^2.16.840.1.113883.10.20.1.38
+"DATA",178.101,22,5)
+entryRelationship
+"DATA",178.101,22,7,0)
+^178.111P^1^1
+"DATA",178.101,22,7,1,0)
+19^entryRelationship^Age
+"DATA",178.101,23,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,23,5)
+component
+"DATA",178.101,23,7,0)
+^178.111P^1^1
+"DATA",178.101,23,7,1,0)
+19^component^FamHis
+"DATA",178.101,24,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,24,5)
+component^SocialHistory
+"DATA",178.101,25,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,25,5)
+entry
+"DATA",178.101,25,7,0)
+^178.111P^1^1
+"DATA",178.101,25,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,26,0)
+Alerts section template ^2.16.840.1.113883.10.20.1.2
+"DATA",178.101,26,5)
+component^Alerts
+"DATA",178.101,27,0)
+Alert observation template ^2.16.840.1.113883.10.20.1.18
+"DATA",178.101,27,5)
+entryRelationship
+"DATA",178.101,27,7,0)
+^178.111P^1^1
+"DATA",178.101,27,7,1,0)
+26^entryRelationship^AlertObservation
+"DATA",178.101,28,0)
+Reaction observation template ^2.16.840.1.113883.10.20.1.54
+"DATA",178.101,28,5)
+entryRelationship
+"DATA",178.101,28,7,0)
+^178.111P^1^1
+"DATA",178.101,28,7,1,0)
+26^entryRelationship^Reaction
+"DATA",178.101,29,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,29,5)
+entryRelationship
+"DATA",178.101,29,7,0)
+^178.111P^1^1
+"DATA",178.101,29,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,30,0)
+Medications section template ^2.16.840.1.113883.10.20.1.8
+"DATA",178.101,30,5)
+component^Medications
+"DATA",178.101,31,0)
+Medication activity template ^2.16.840.1.113883.10.20.1.24
+"DATA",178.101,31,5)
+entry
+"DATA",178.101,31,7,0)
+^178.111P^2^2
+"DATA",178.101,31,7,1,0)
+30^entry^Medication
+"DATA",178.101,31,7,2,0)
+36^entry^Immunization
+"DATA",178.101,32,0)
+Product template ^2.16.840.1.113883.10.20.1.53
+"DATA",178.101,32,5)
+consumable
+"DATA",178.101,32,7,0)
+^178.111P^2^2
+"DATA",178.101,32,7,1,0)
+30^consumable
+"DATA",178.101,32,7,2,0)
+36^consumable^Medication
+"DATA",178.101,33,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,33,5)
+component^MedicalEquipment
+"DATA",178.101,34,0)
+Supply activity template ^2.16.840.1.113883.10.20.1.34
+"DATA",178.101,34,5)
+entry
+"DATA",178.101,34,7,0)
+^178.111P^1^1
+"DATA",178.101,34,7,1,0)
+33^entry^Activity
+"DATA",178.101,35,0)
+Product instance template ^2.16.840.1.113883.10.20.1.52
+"DATA",178.101,35,5)
+participant
+"DATA",178.101,35,7,0)
+^178.111P^2^2
+"DATA",178.101,35,7,1,0)
+33^participant
+"DATA",178.101,35,7,2,0)
+42^participant
+"DATA",178.101,36,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,36,5)
+component^Immunizations
+"DATA",178.101,37,0)
+Vital signs section template ^2.16.840.1.113883.10.20.1.16
+"DATA",178.101,37,5)
+component^VitalSigns
+"DATA",178.101,38,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,38,5)
+entry^Vital
+"DATA",178.101,38,7,0)
+^178.111P^1^1
+"DATA",178.101,38,7,1,0)
+37^entry^Result
+"DATA",178.101,39,0)
+Result observation template ^2.16.840.1.113883.10.20.1.31
+"DATA",178.101,39,5)
+component
+"DATA",178.101,39,7,0)
+^178.111P^2^2
+"DATA",178.101,39,7,1,0)
+37^component^TestResult
+"DATA",178.101,39,7,2,0)
+40^component^Test
+"DATA",178.101,40,0)
+Results section template ^2.16.840.1.113883.10.20.1.14
+"DATA",178.101,40,5)
+component^Results
+"DATA",178.101,41,0)
+Result organizer template ^2.16.840.1.113883.10.20.1.32
+"DATA",178.101,41,5)
+entry
+"DATA",178.101,41,7,0)
+^178.111P^1^1
+"DATA",178.101,41,7,1,0)
+40^entry^Result
+"DATA",178.101,42,0)
+Procedures section template ^2.16.840.1.113883.10.20.1.12
+"DATA",178.101,42,5)
+component^Procedures
+"DATA",178.101,43,0)
+Procedure activity template ^2.16.840.1.113883.10.20.1.29
+"DATA",178.101,43,5)
+entry
+"DATA",178.101,43,7,0)
+^178.111P^1^1
+"DATA",178.101,43,7,1,0)
+42^entry^Procedure
+"DATA",178.101,44,0)
+Encounters section template ^2.16.840.1.113883.10.20.1.3
+"DATA",178.101,44,5)
+component^Encounters
+"DATA",178.101,45,0)
+Encounter activity template ^2.16.840.1.113883.10.20.1.21
+"DATA",178.101,45,5)
+entry
+"DATA",178.101,45,7,0)
+^178.111P^1^1
+"DATA",178.101,45,7,1,0)
+44^entry^Encounter
+"DATA",178.101,46,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,46,5)
+encounter
+"DATA",178.101,46,7,0)
+^178.111P^1^1
+"DATA",178.101,46,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,47,0)
+Plan of Care section template ^2.16.840.1.113883.10.20.1.10
+"DATA",178.101,47,5)
+component^PlanOfCare
+"DATA",178.101,48,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,48,5)
+entry
+"DATA",178.101,48,7,0)
+^178.111P^1^1
+"DATA",178.101,48,7,1,0)
+47^entry^Plan
+"DATA",178.101,49,0)
+CCR
+"DATA",178.101,49,2,0)
+^^727^727^3091215
+"DATA",178.101,49,2,1,0)
+<?xml version="1.0" encoding="utf-8" ?>
+"DATA",178.101,49,2,2,0)
+<ContinuityOfCareRecord>
+"DATA",178.101,49,2,3,0)
+<CCRDocumentObjectID>@@//ContinuityOfCareRecord/CCRDocumentObjectID@@</CCRDocumentObjectID>
+"DATA",178.101,49,2,4,0)
+<Language>
+"DATA",178.101,49,2,5,0)
+<Text>@@//ContinuityOfCareRecord/Language/Text@@</Text>
+"DATA",178.101,49,2,6,0)
+</Language>
+"DATA",178.101,49,2,7,0)
+<Version>@@//ContinuityOfCareRecord/Version@@</Version>
+"DATA",178.101,49,2,8,0)
+<DateTime>
+"DATA",178.101,49,2,9,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/DateTime/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,10,0)
+</DateTime>
+"DATA",178.101,49,2,11,0)
+<Patient>
+"DATA",178.101,49,2,12,0)
+<ActorID>@@//ContinuityOfCareRecord/Patient/ActorID@@</ActorID>
+"DATA",178.101,49,2,13,0)
+</Patient>
+"DATA",178.101,49,2,14,0)
+<From>
+"DATA",178.101,49,2,15,0)
+<ActorLink>
+"DATA",178.101,49,2,16,0)
+<ActorID>@@//ContinuityOfCareRecord/From/ActorLink[1]/ActorID@@</ActorID>
+"DATA",178.101,49,2,17,0)
+</ActorLink>
+"DATA",178.101,49,2,18,0)
+<ActorLink>
+"DATA",178.101,49,2,19,0)
+<ActorID>@@//ContinuityOfCareRecord/From/ActorLink[2]/ActorID@@</ActorID>
+"DATA",178.101,49,2,20,0)
+</ActorLink>
+"DATA",178.101,49,2,21,0)
+</From>
+"DATA",178.101,49,2,22,0)
+<To>
+"DATA",178.101,49,2,23,0)
+<ActorLink>
+"DATA",178.101,49,2,24,0)
+<ActorID>@@//ContinuityOfCareRecord/To/ActorLink/ActorID@@</ActorID>
+"DATA",178.101,49,2,25,0)
+<ActorRole>
+"DATA",178.101,49,2,26,0)
+<Text>@@//ContinuityOfCareRecord/To/ActorLink/ActorRole/Text@@</Text>
+"DATA",178.101,49,2,27,0)
+</ActorRole>
+"DATA",178.101,49,2,28,0)
+</ActorLink>
+"DATA",178.101,49,2,29,0)
+</To>
+"DATA",178.101,49,2,30,0)
+<Purpose>
+"DATA",178.101,49,2,31,0)
+<Description>
+"DATA",178.101,49,2,32,0)
+<Text>@@//ContinuityOfCareRecord/Purpose/Description/Text@@</Text>
+"DATA",178.101,49,2,33,0)
+</Description>
+"DATA",178.101,49,2,34,0)
+</Purpose>
+"DATA",178.101,49,2,35,0)
+<Body>
+"DATA",178.101,49,2,36,0)
+<Problems>
+"DATA",178.101,49,2,37,0)
+<Problem>
+"DATA",178.101,49,2,38,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/Problems/Problem/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,39,0)
+<DateTime>
+"DATA",178.101,49,2,40,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/Body/Problems/Problem/DateTime/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,41,0)
+</DateTime>
+"DATA",178.101,49,2,42,0)
+<Type>
+"DATA",178.101,49,2,43,0)
+<Text>@@//ContinuityOfCareRecord/Body/Problems/Problem/Type/Text@@</Text>
+"DATA",178.101,49,2,44,0)
+</Type>
+"DATA",178.101,49,2,45,0)
+<Description>
+"DATA",178.101,49,2,46,0)
+<Text>@@//ContinuityOfCareRecord/Body/Problems/Problem/Description/Text@@</Text>
+"DATA",178.101,49,2,47,0)
+<Code>
+"DATA",178.101,49,2,48,0)
+<Value>@@//ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/Value@@</Value>
+"DATA",178.101,49,2,49,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,50,0)
+<Version>@@//ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/Version@@</Version>
+"DATA",178.101,49,2,51,0)
+</Code>
+"DATA",178.101,49,2,52,0)
+</Description>
+"DATA",178.101,49,2,53,0)
+<Status>
+"DATA",178.101,49,2,54,0)
+<Text>@@//ContinuityOfCareRecord/Body/Problems/Problem/Status/Text@@</Text>
+"DATA",178.101,49,2,55,0)
+</Status>
+"DATA",178.101,49,2,56,0)
+<Source>
+"DATA",178.101,49,2,57,0)
+<Actor>
+"DATA",178.101,49,2,58,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/Problems/Problem/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,59,0)
+</Actor>
+"DATA",178.101,49,2,60,0)
+</Source>
+"DATA",178.101,49,2,61,0)
+</Problem>
+"DATA",178.101,49,2,62,0)
+</Problems>
+"DATA",178.101,49,2,63,0)
+<Immunizations>
+"DATA",178.101,49,2,64,0)
+<Immunization>
+"DATA",178.101,49,2,65,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/Immunizations/Immunization/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,66,0)
+<DateTime>
+"DATA",178.101,49,2,67,0)
+<Type>
+"DATA",178.101,49,2,68,0)
+<Text>@@//ContinuityOfCareRecord/Body/Immunizations/Immunization/DateTime/Type/Text@@</Text>
+"DATA",178.101,49,2,69,0)
+</Type>
+"DATA",178.101,49,2,70,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/Body/Immunizations/Immunization/DateTime/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,71,0)
+</DateTime>
+"DATA",178.101,49,2,72,0)
+<Source>
+"DATA",178.101,49,2,73,0)
+<Actor>
+"DATA",178.101,49,2,74,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/Immunizations/Immunization/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,75,0)
+</Actor>
+"DATA",178.101,49,2,76,0)
+</Source>
+"DATA",178.101,49,2,77,0)
+<Product>
+"DATA",178.101,49,2,78,0)
+<ProductName>
+"DATA",178.101,49,2,79,0)
+<Text>@@//ContinuityOfCareRecord/Body/Immunizations/Immunization/Product/ProductName/Text@@</Text>
+"DATA",178.101,49,2,80,0)
+<Code>
+"DATA",178.101,49,2,81,0)
+<Value>@@//ContinuityOfCareRecord/Body/Immunizations/Immunization/Product/ProductName/Code/Value@@</Value>
+"DATA",178.101,49,2,82,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/Immunizations/Immunization/Product/ProductName/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,83,0)
+</Code>
+"DATA",178.101,49,2,84,0)
+</ProductName>
+"DATA",178.101,49,2,85,0)
+</Product>
+"DATA",178.101,49,2,86,0)
+</Immunization>
+"DATA",178.101,49,2,87,0)
+</Immunizations>
+"DATA",178.101,49,2,88,0)
+<FamilyHistory>
+"DATA",178.101,49,2,89,0)
+<FamilyProblemHistory>
+"DATA",178.101,49,2,90,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,91,0)
+<Source>
+"DATA",178.101,49,2,92,0)
+<Actor>
+"DATA",178.101,49,2,93,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,94,0)
+</Actor>
+"DATA",178.101,49,2,95,0)
+</Source>
+"DATA",178.101,49,2,96,0)
+<FamilyMember>
+"DATA",178.101,49,2,97,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/ActorID@@</ActorID>
+"DATA",178.101,49,2,98,0)
+<ActorRole>
+"DATA",178.101,49,2,99,0)
+<Text>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/ActorRole/Text@@</Text>
+"DATA",178.101,49,2,100,0)
+</ActorRole>
+"DATA",178.101,49,2,101,0)
+<Source>
+"DATA",178.101,49,2,102,0)
+<Actor>
+"DATA",178.101,49,2,103,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,104,0)
+</Actor>
+"DATA",178.101,49,2,105,0)
+</Source>
+"DATA",178.101,49,2,106,0)
+</FamilyMember>
+"DATA",178.101,49,2,107,0)
+<Problem>
+"DATA",178.101,49,2,108,0)
+<Type>
+"DATA",178.101,49,2,109,0)
+<Text>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Type/Text@@</Text>
+"DATA",178.101,49,2,110,0)
+</Type>
+"DATA",178.101,49,2,111,0)
+<Description>
+"DATA",178.101,49,2,112,0)
+<Text>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Text@@</Text>
+"DATA",178.101,49,2,113,0)
+<Code>
+"DATA",178.101,49,2,114,0)
+<Value>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/Value@@</Value>
+"DATA",178.101,49,2,115,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,116,0)
+<Version>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/Version@@</Version>
+"DATA",178.101,49,2,117,0)
+</Code>
+"DATA",178.101,49,2,118,0)
+</Description>
+"DATA",178.101,49,2,119,0)
+<Source>
+"DATA",178.101,49,2,120,0)
+<Actor>
+"DATA",178.101,49,2,121,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,122,0)
+</Actor>
+"DATA",178.101,49,2,123,0)
+</Source>
+"DATA",178.101,49,2,124,0)
+</Problem>
+"DATA",178.101,49,2,125,0)
+</FamilyProblemHistory>
+"DATA",178.101,49,2,126,0)
+</FamilyHistory>
+"DATA",178.101,49,2,127,0)
+<SocialHistory>
+"DATA",178.101,49,2,128,0)
+<SocialHistoryElement>
+"DATA",178.101,49,2,129,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[1]/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,130,0)
+<Type>
+"DATA",178.101,49,2,131,0)
+<Text>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[1]/Type/Text@@</Text>
+"DATA",178.101,49,2,132,0)
+</Type>
+"DATA",178.101,49,2,133,0)
+<Description>
+"DATA",178.101,49,2,134,0)
+<Text>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[1]/Description/Text@@</Text>
+"DATA",178.101,49,2,135,0)
+</Description>
+"DATA",178.101,49,2,136,0)
+<Source>
+"DATA",178.101,49,2,137,0)
+<Actor>
+"DATA",178.101,49,2,138,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[1]/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,139,0)
+</Actor>
+"DATA",178.101,49,2,140,0)
+</Source>
+"DATA",178.101,49,2,141,0)
+</SocialHistoryElement>
+"DATA",178.101,49,2,142,0)
+<SocialHistoryElement>
+"DATA",178.101,49,2,143,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[2]/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,144,0)
+<Type>
+"DATA",178.101,49,2,145,0)
+<Text>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[2]/Type/Text@@</Text>
+"DATA",178.101,49,2,146,0)
+</Type>
+"DATA",178.101,49,2,147,0)
+<Description>
+"DATA",178.101,49,2,148,0)
+<Text>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[2]/Description/Text@@</Text>
+"DATA",178.101,49,2,149,0)
+</Description>
+"DATA",178.101,49,2,150,0)
+<Source>
+"DATA",178.101,49,2,151,0)
+<Actor>
+"DATA",178.101,49,2,152,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[2]/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,153,0)
+</Actor>
+"DATA",178.101,49,2,154,0)
+</Source>
+"DATA",178.101,49,2,155,0)
+</SocialHistoryElement>
+"DATA",178.101,49,2,156,0)
+<SocialHistoryElement>
+"DATA",178.101,49,2,157,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[3]/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,158,0)
+<Type>
+"DATA",178.101,49,2,159,0)
+<Text>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[3]/Type/Text@@</Text>
+"DATA",178.101,49,2,160,0)
+</Type>
+"DATA",178.101,49,2,161,0)
+<Description>
+"DATA",178.101,49,2,162,0)
+<Text>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[3]/Description/Text@@</Text>
+"DATA",178.101,49,2,163,0)
+</Description>
+"DATA",178.101,49,2,164,0)
+<Source>
+"DATA",178.101,49,2,165,0)
+<Actor>
+"DATA",178.101,49,2,166,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[3]/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,167,0)
+</Actor>
+"DATA",178.101,49,2,168,0)
+</Source>
+"DATA",178.101,49,2,169,0)
+</SocialHistoryElement>
+"DATA",178.101,49,2,170,0)
+<SocialHistoryElement>
+"DATA",178.101,49,2,171,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[4]/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,172,0)
+<Type>
+"DATA",178.101,49,2,173,0)
+<Text>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[4]/Type/Text@@</Text>
+"DATA",178.101,49,2,174,0)
+</Type>
+"DATA",178.101,49,2,175,0)
+<Description>
+"DATA",178.101,49,2,176,0)
+<Text>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[4]/Description/Text@@</Text>
+"DATA",178.101,49,2,177,0)
+</Description>
+"DATA",178.101,49,2,178,0)
+<Source>
+"DATA",178.101,49,2,179,0)
+<Actor>
+"DATA",178.101,49,2,180,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[4]/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,181,0)
+</Actor>
+"DATA",178.101,49,2,182,0)
+</Source>
+"DATA",178.101,49,2,183,0)
+</SocialHistoryElement>
+"DATA",178.101,49,2,184,0)
+</SocialHistory>
+"DATA",178.101,49,2,185,0)
+<Alerts>
+"DATA",178.101,49,2,186,0)
+<Alert>
+"DATA",178.101,49,2,187,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/Alerts/Alert/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,188,0)
+<DateTime>
+"DATA",178.101,49,2,189,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/Body/Alerts/Alert/DateTime/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,190,0)
+</DateTime>
+"DATA",178.101,49,2,191,0)
+<Type>
+"DATA",178.101,49,2,192,0)
+<Text>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Type/Text@@</Text>
+"DATA",178.101,49,2,193,0)
+</Type>
+"DATA",178.101,49,2,194,0)
+<Status>
+"DATA",178.101,49,2,195,0)
+<Text>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Status/Text@@</Text>
+"DATA",178.101,49,2,196,0)
+</Status>
+"DATA",178.101,49,2,197,0)
+<Description>
+"DATA",178.101,49,2,198,0)
+<Text>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Description/Text@@</Text>
+"DATA",178.101,49,2,199,0)
+<Code>
+"DATA",178.101,49,2,200,0)
+<Value>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Description/Code/Value@@</Value>
+"DATA",178.101,49,2,201,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Description/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,202,0)
+</Code>
+"DATA",178.101,49,2,203,0)
+</Description>
+"DATA",178.101,49,2,204,0)
+<Source>
+"DATA",178.101,49,2,205,0)
+<Actor>
+"DATA",178.101,49,2,206,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,207,0)
+</Actor>
+"DATA",178.101,49,2,208,0)
+</Source>
+"DATA",178.101,49,2,209,0)
+<Agent>
+"DATA",178.101,49,2,210,0)
+<Products>
+"DATA",178.101,49,2,211,0)
+<Product>
+"DATA",178.101,49,2,212,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,213,0)
+<Source>
+"DATA",178.101,49,2,214,0)
+<Actor>
+"DATA",178.101,49,2,215,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,216,0)
+</Actor>
+"DATA",178.101,49,2,217,0)
+</Source>
+"DATA",178.101,49,2,218,0)
+<Product>
+"DATA",178.101,49,2,219,0)
+<ProductName>
+"DATA",178.101,49,2,220,0)
+<Text>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/Product/ProductName/Text@@</Text>
+"DATA",178.101,49,2,221,0)
+<Code>
+"DATA",178.101,49,2,222,0)
+<Value>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/Product/ProductName/Code/Value@@</Value>
+"DATA",178.101,49,2,223,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/Product/ProductName/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,224,0)
+</Code>
+"DATA",178.101,49,2,225,0)
+</ProductName>
+"DATA",178.101,49,2,226,0)
+</Product>
+"DATA",178.101,49,2,227,0)
+</Product>
+"DATA",178.101,49,2,228,0)
+</Products>
+"DATA",178.101,49,2,229,0)
+</Agent>
+"DATA",178.101,49,2,230,0)
+<Reaction>
+"DATA",178.101,49,2,231,0)
+<Description>
+"DATA",178.101,49,2,232,0)
+<Text>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Text@@</Text>
+"DATA",178.101,49,2,233,0)
+<Code>
+"DATA",178.101,49,2,234,0)
+<Value>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Code/Value@@</Value>
+"DATA",178.101,49,2,235,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,236,0)
+</Code>
+"DATA",178.101,49,2,237,0)
+</Description>
+"DATA",178.101,49,2,238,0)
+</Reaction>
+"DATA",178.101,49,2,239,0)
+</Alert>
+"DATA",178.101,49,2,240,0)
+</Alerts>
+"DATA",178.101,49,2,241,0)
+<Medications>
+"DATA",178.101,49,2,242,0)
+<Medication>
+"DATA",178.101,49,2,243,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/Medications/Medication/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,244,0)
+<DateTime>
+"DATA",178.101,49,2,245,0)
+<Type>
+"DATA",178.101,49,2,246,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/DateTime[1]/Type/Text@@</Text>
+"DATA",178.101,49,2,247,0)
+</Type>
+"DATA",178.101,49,2,248,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/Body/Medications/Medication/DateTime[1]/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,249,0)
+</DateTime>
+"DATA",178.101,49,2,250,0)
+<DateTime>
+"DATA",178.101,49,2,251,0)
+<Type>
+"DATA",178.101,49,2,252,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/DateTime[2]/Type/Text@@</Text>
+"DATA",178.101,49,2,253,0)
+</Type>
+"DATA",178.101,49,2,254,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/Body/Medications/Medication/DateTime[2]/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,255,0)
+</DateTime>
+"DATA",178.101,49,2,256,0)
+<IDs>
+"DATA",178.101,49,2,257,0)
+<Type>
+"DATA",178.101,49,2,258,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/IDs/Type/Text@@</Text>
+"DATA",178.101,49,2,259,0)
+</Type>
+"DATA",178.101,49,2,260,0)
+<ID>@@//ContinuityOfCareRecord/Body/Medications/Medication/IDs/ID@@</ID>
+"DATA",178.101,49,2,261,0)
+</IDs>
+"DATA",178.101,49,2,262,0)
+<Type>
+"DATA",178.101,49,2,263,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Type/Text@@</Text>
+"DATA",178.101,49,2,264,0)
+</Type>
+"DATA",178.101,49,2,265,0)
+<Description>
+"DATA",178.101,49,2,266,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Description/Text@@</Text>
+"DATA",178.101,49,2,267,0)
+</Description>
+"DATA",178.101,49,2,268,0)
+<Status>
+"DATA",178.101,49,2,269,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Status/Text@@</Text>
+"DATA",178.101,49,2,270,0)
+</Status>
+"DATA",178.101,49,2,271,0)
+<Source>
+"DATA",178.101,49,2,272,0)
+<Actor>
+"DATA",178.101,49,2,273,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/Medications/Medication/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,274,0)
+</Actor>
+"DATA",178.101,49,2,275,0)
+</Source>
+"DATA",178.101,49,2,276,0)
+<Product>
+"DATA",178.101,49,2,277,0)
+<ProductName>
+"DATA",178.101,49,2,278,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Text@@</Text>
+"DATA",178.101,49,2,279,0)
+<Code>
+"DATA",178.101,49,2,280,0)
+<Value>@@//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/Value@@</Value>
+"DATA",178.101,49,2,281,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,282,0)
+<Version>@@//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/Version@@</Version>
+"DATA",178.101,49,2,283,0)
+</Code>
+"DATA",178.101,49,2,284,0)
+</ProductName>
+"DATA",178.101,49,2,285,0)
+<BrandName>
+"DATA",178.101,49,2,286,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Product/BrandName/Text@@</Text>
+"DATA",178.101,49,2,287,0)
+</BrandName>
+"DATA",178.101,49,2,288,0)
+<Strength>
+"DATA",178.101,49,2,289,0)
+<Value>@@//ContinuityOfCareRecord/Body/Medications/Medication/Product/Strength/Value@@</Value>
+"DATA",178.101,49,2,290,0)
+<Units>
+"DATA",178.101,49,2,291,0)
+<Unit>@@//ContinuityOfCareRecord/Body/Medications/Medication/Product/Strength/Units/Unit@@</Unit>
+"DATA",178.101,49,2,292,0)
+</Units>
+"DATA",178.101,49,2,293,0)
+</Strength>
+"DATA",178.101,49,2,294,0)
+<Form>
+"DATA",178.101,49,2,295,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Product/Form/Text@@</Text>
+"DATA",178.101,49,2,296,0)
+</Form>
+"DATA",178.101,49,2,297,0)
+<Concentration>
+"DATA",178.101,49,2,298,0)
+<Value>@@//ContinuityOfCareRecord/Body/Medications/Medication/Product/Concentration/Value@@</Value>
+"DATA",178.101,49,2,299,0)
+<Units>
+"DATA",178.101,49,2,300,0)
+<Unit>@@//ContinuityOfCareRecord/Body/Medications/Medication/Product/Concentration/Units/Unit@@</Unit>
+"DATA",178.101,49,2,301,0)
+</Units>
+"DATA",178.101,49,2,302,0)
+</Concentration>
+"DATA",178.101,49,2,303,0)
+</Product>
+"DATA",178.101,49,2,304,0)
+<Quantity>
+"DATA",178.101,49,2,305,0)
+<Value>@@//ContinuityOfCareRecord/Body/Medications/Medication/Quantity/Value@@</Value>
+"DATA",178.101,49,2,306,0)
+<Units>
+"DATA",178.101,49,2,307,0)
+<Unit>@@//ContinuityOfCareRecord/Body/Medications/Medication/Quantity/Units/Unit@@</Unit>
+"DATA",178.101,49,2,308,0)
+</Units>
+"DATA",178.101,49,2,309,0)
+</Quantity>
+"DATA",178.101,49,2,310,0)
+<Directions>
+"DATA",178.101,49,2,311,0)
+<Direction>
+"DATA",178.101,49,2,312,0)
+<Description>
+"DATA",178.101,49,2,313,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Description/Text@@</Text>
+"DATA",178.101,49,2,314,0)
+</Description>
+"DATA",178.101,49,2,315,0)
+<DoseIndicator>
+"DATA",178.101,49,2,316,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DoseIndicator/Text@@</Text>
+"DATA",178.101,49,2,317,0)
+</DoseIndicator>
+"DATA",178.101,49,2,318,0)
+<DeliveryMethod>
+"DATA",178.101,49,2,319,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DeliveryMethod/Text@@</Text>
+"DATA",178.101,49,2,320,0)
+</DeliveryMethod>
+"DATA",178.101,49,2,321,0)
+<Dose>
+"DATA",178.101,49,2,322,0)
+<Value>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Value@@</Value>
+"DATA",178.101,49,2,323,0)
+<Units>
+"DATA",178.101,49,2,324,0)
+<Unit>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Units/Unit@@</Unit>
+"DATA",178.101,49,2,325,0)
+</Units>
+"DATA",178.101,49,2,326,0)
+<Rate>
+"DATA",178.101,49,2,327,0)
+<Value>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Rate/Value@@</Value>
+"DATA",178.101,49,2,328,0)
+<Units>
+"DATA",178.101,49,2,329,0)
+<Unit>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Rate/Units/Unit@@</Unit>
+"DATA",178.101,49,2,330,0)
+</Units>
+"DATA",178.101,49,2,331,0)
+</Rate>
+"DATA",178.101,49,2,332,0)
+</Dose>
+"DATA",178.101,49,2,333,0)
+<Vehicle>
+"DATA",178.101,49,2,334,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Vehicle/Text@@</Text>
+"DATA",178.101,49,2,335,0)
+</Vehicle>
+"DATA",178.101,49,2,336,0)
+<Route>
+"DATA",178.101,49,2,337,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Route/Text@@</Text>
+"DATA",178.101,49,2,338,0)
+</Route>
+"DATA",178.101,49,2,339,0)
+<Frequency>
+"DATA",178.101,49,2,340,0)
+<Value>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Frequency/Value@@</Value>
+"DATA",178.101,49,2,341,0)
+</Frequency>
+"DATA",178.101,49,2,342,0)
+<Interval>
+"DATA",178.101,49,2,343,0)
+<Value>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Interval/Value@@</Value>
+"DATA",178.101,49,2,344,0)
+<Units>
+"DATA",178.101,49,2,345,0)
+<Unit>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Interval/Units/Unit@@</Unit>
+"DATA",178.101,49,2,346,0)
+</Units>
+"DATA",178.101,49,2,347,0)
+</Interval>
+"DATA",178.101,49,2,348,0)
+<Duration>
+"DATA",178.101,49,2,349,0)
+<Value>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Duration/Value@@</Value>
+"DATA",178.101,49,2,350,0)
+<Units>
+"DATA",178.101,49,2,351,0)
+<Unit>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Duration/Units/Unit@@</Unit>
+"DATA",178.101,49,2,352,0)
+</Units>
+"DATA",178.101,49,2,353,0)
+</Duration>
+"DATA",178.101,49,2,354,0)
+<Indication>
+"DATA",178.101,49,2,355,0)
+<PRNFlag>
+"DATA",178.101,49,2,356,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/PRNFlag/Text@@</Text>
+"DATA",178.101,49,2,357,0)
+</PRNFlag>
+"DATA",178.101,49,2,358,0)
+<Problem>
+"DATA",178.101,49,2,359,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,360,0)
+<Type>
+"DATA",178.101,49,2,361,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Type/Text@@</Text>
+"DATA",178.101,49,2,362,0)
+</Type>
+"DATA",178.101,49,2,363,0)
+<Description>
+"DATA",178.101,49,2,364,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Text@@</Text>
+"DATA",178.101,49,2,365,0)
+<Code>
+"DATA",178.101,49,2,366,0)
+<Value>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/Value@@</Value>
+"DATA",178.101,49,2,367,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,368,0)
+<Version>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/Version@@</Version>
+"DATA",178.101,49,2,369,0)
+</Code>
+"DATA",178.101,49,2,370,0)
+</Description>
+"DATA",178.101,49,2,371,0)
+<Source>
+"DATA",178.101,49,2,372,0)
+<Actor>
+"DATA",178.101,49,2,373,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,374,0)
+</Actor>
+"DATA",178.101,49,2,375,0)
+</Source>
+"DATA",178.101,49,2,376,0)
+</Problem>
+"DATA",178.101,49,2,377,0)
+</Indication>
+"DATA",178.101,49,2,378,0)
+<StopIndicator>
+"DATA",178.101,49,2,379,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/StopIndicator/Text@@</Text>
+"DATA",178.101,49,2,380,0)
+</StopIndicator>
+"DATA",178.101,49,2,381,0)
+<DirectionSequenceModifier>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DirectionSequenceModifier@@</DirectionSequenceModifier>
+"DATA",178.101,49,2,382,0)
+<MultipleDirectionModifier>
+"DATA",178.101,49,2,383,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/MultipleDirectionModifier/Text@@</Text>
+"DATA",178.101,49,2,384,0)
+</MultipleDirectionModifier>
+"DATA",178.101,49,2,385,0)
+</Direction>
+"DATA",178.101,49,2,386,0)
+</Directions>
+"DATA",178.101,49,2,387,0)
+<PatientInstructions>
+"DATA",178.101,49,2,388,0)
+<Instruction>@@//ContinuityOfCareRecord/Body/Medications/Medication/PatientInstructions/Instruction@@</Instruction>
+"DATA",178.101,49,2,389,0)
+</PatientInstructions>
+"DATA",178.101,49,2,390,0)
+<FullfillmentInstructions>
+"DATA",178.101,49,2,391,0)
+<Text>@@//ContinuityOfCareRecord/Body/Medications/Medication/FullfillmentInstructions/Text@@</Text>
+"DATA",178.101,49,2,392,0)
+</FullfillmentInstructions>
+"DATA",178.101,49,2,393,0)
+<Refills>
+"DATA",178.101,49,2,394,0)
+<Refill>
+"DATA",178.101,49,2,395,0)
+<Number>@@//ContinuityOfCareRecord/Body/Medications/Medication/Refills/Refill/Number@@</Number>
+"DATA",178.101,49,2,396,0)
+</Refill>
+"DATA",178.101,49,2,397,0)
+</Refills>
+"DATA",178.101,49,2,398,0)
+</Medication>
+"DATA",178.101,49,2,399,0)
+</Medications>
+"DATA",178.101,49,2,400,0)
+<VitalSigns>
+"DATA",178.101,49,2,401,0)
+<Result>
+"DATA",178.101,49,2,402,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,403,0)
+<DateTime>
+"DATA",178.101,49,2,404,0)
+<Type>
+"DATA",178.101,49,2,405,0)
+<Text>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/DateTime/Type/Text@@</Text>
+"DATA",178.101,49,2,406,0)
+</Type>
+"DATA",178.101,49,2,407,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/DateTime/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,408,0)
+</DateTime>
+"DATA",178.101,49,2,409,0)
+<Description>
+"DATA",178.101,49,2,410,0)
+<Text>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Description/Text@@</Text>
+"DATA",178.101,49,2,411,0)
+</Description>
+"DATA",178.101,49,2,412,0)
+<Source>
+"DATA",178.101,49,2,413,0)
+<Actor>
+"DATA",178.101,49,2,414,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,415,0)
+</Actor>
+"DATA",178.101,49,2,416,0)
+</Source>
+"DATA",178.101,49,2,417,0)
+<Test>
+"DATA",178.101,49,2,418,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,419,0)
+<Type>
+"DATA",178.101,49,2,420,0)
+<Text>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Type/Text@@</Text>
+"DATA",178.101,49,2,421,0)
+</Type>
+"DATA",178.101,49,2,422,0)
+<Description>
+"DATA",178.101,49,2,423,0)
+<Text>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Text@@</Text>
+"DATA",178.101,49,2,424,0)
+<Code>
+"DATA",178.101,49,2,425,0)
+<Value>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/Value@@</Value>
+"DATA",178.101,49,2,426,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,427,0)
+<Version>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/Version@@</Version>
+"DATA",178.101,49,2,428,0)
+</Code>
+"DATA",178.101,49,2,429,0)
+</Description>
+"DATA",178.101,49,2,430,0)
+<Source>
+"DATA",178.101,49,2,431,0)
+<Actor>
+"DATA",178.101,49,2,432,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,433,0)
+</Actor>
+"DATA",178.101,49,2,434,0)
+</Source>
+"DATA",178.101,49,2,435,0)
+<TestResult>
+"DATA",178.101,49,2,436,0)
+<Value>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/TestResult/Value@@</Value>
+"DATA",178.101,49,2,437,0)
+<Units>
+"DATA",178.101,49,2,438,0)
+<Unit>@@//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/TestResult/Units/Unit@@</Unit>
+"DATA",178.101,49,2,439,0)
+</Units>
+"DATA",178.101,49,2,440,0)
+</TestResult>
+"DATA",178.101,49,2,441,0)
+</Test>
+"DATA",178.101,49,2,442,0)
+</Result>
+"DATA",178.101,49,2,443,0)
+</VitalSigns>
+"DATA",178.101,49,2,444,0)
+<Results>
+"DATA",178.101,49,2,445,0)
+<Result>
+"DATA",178.101,49,2,446,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/Results/Result/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,447,0)
+<DateTime>
+"DATA",178.101,49,2,448,0)
+<Type>
+"DATA",178.101,49,2,449,0)
+<Text>@@//ContinuityOfCareRecord/Body/Results/Result/DateTime/Type/Text@@</Text>
+"DATA",178.101,49,2,450,0)
+</Type>
+"DATA",178.101,49,2,451,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/Body/Results/Result/DateTime/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,452,0)
+</DateTime>
+"DATA",178.101,49,2,453,0)
+<Description>
+"DATA",178.101,49,2,454,0)
+<Text>@@//ContinuityOfCareRecord/Body/Results/Result/Description/Text@@</Text>
+"DATA",178.101,49,2,455,0)
+<Code>
+"DATA",178.101,49,2,456,0)
+<Value>@@//ContinuityOfCareRecord/Body/Results/Result/Description/Code/Value@@</Value>
+"DATA",178.101,49,2,457,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/Results/Result/Description/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,458,0)
+</Code>
+"DATA",178.101,49,2,459,0)
+</Description>
+"DATA",178.101,49,2,460,0)
+<Status>
+"DATA",178.101,49,2,461,0)
+<Text>@@//ContinuityOfCareRecord/Body/Results/Result/Status/Text@@</Text>
+"DATA",178.101,49,2,462,0)
+</Status>
+"DATA",178.101,49,2,463,0)
+<Source>
+"DATA",178.101,49,2,464,0)
+<Actor>
+"DATA",178.101,49,2,465,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/Results/Result/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,466,0)
+</Actor>
+"DATA",178.101,49,2,467,0)
+</Source>
+"DATA",178.101,49,2,468,0)
+<Test>
+"DATA",178.101,49,2,469,0)
+<CCRDataObjectID>@@//ContinuityOfCareRecord/Body/Results/Result/Test/CCRDataObjectID@@</CCRDataObjectID>
+"DATA",178.101,49,2,470,0)
+<DateTime>
+"DATA",178.101,49,2,471,0)
+<Type>
+"DATA",178.101,49,2,472,0)
+<Text>@@//ContinuityOfCareRecord/Body/Results/Result/Test/DateTime/Type/Text@@</Text>
+"DATA",178.101,49,2,473,0)
+</Type>
+"DATA",178.101,49,2,474,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/Body/Results/Result/Test/DateTime/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,475,0)
+</DateTime>
+"DATA",178.101,49,2,476,0)
+<Description>
+"DATA",178.101,49,2,477,0)
+<Text>@@//ContinuityOfCareRecord/Body/Results/Result/Test/Description/Text@@</Text>
+"DATA",178.101,49,2,478,0)
+<Code>
+"DATA",178.101,49,2,479,0)
+<Value>@@//ContinuityOfCareRecord/Body/Results/Result/Test/Description/Code/Value@@</Value>
+"DATA",178.101,49,2,480,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Body/Results/Result/Test/Description/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,481,0)
+</Code>
+"DATA",178.101,49,2,482,0)
+</Description>
+"DATA",178.101,49,2,483,0)
+<Status>
+"DATA",178.101,49,2,484,0)
+<Text>@@//ContinuityOfCareRecord/Body/Results/Result/Test/Status/Text@@</Text>
+"DATA",178.101,49,2,485,0)
+</Status>
+"DATA",178.101,49,2,486,0)
+<Source>
+"DATA",178.101,49,2,487,0)
+<Actor>
+"DATA",178.101,49,2,488,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/Results/Result/Test/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,489,0)
+</Actor>
+"DATA",178.101,49,2,490,0)
+</Source>
+"DATA",178.101,49,2,491,0)
+<TestResult>
+"DATA",178.101,49,2,492,0)
+<Value>@@//ContinuityOfCareRecord/Body/Results/Result/Test/TestResult/Value@@</Value>
+"DATA",178.101,49,2,493,0)
+<Units>
+"DATA",178.101,49,2,494,0)
+<Unit>@@//ContinuityOfCareRecord/Body/Results/Result/Test/TestResult/Units/Unit@@</Unit>
+"DATA",178.101,49,2,495,0)
+</Units>
+"DATA",178.101,49,2,496,0)
+</TestResult>
+"DATA",178.101,49,2,497,0)
+<NormalResult>
+"DATA",178.101,49,2,498,0)
+<Normal>
+"DATA",178.101,49,2,499,0)
+<Description>
+"DATA",178.101,49,2,500,0)
+<Text>@@//ContinuityOfCareRecord/Body/Results/Result/Test/NormalResult/Normal/Description/Text@@</Text>
+"DATA",178.101,49,2,501,0)
+</Description>
+"DATA",178.101,49,2,502,0)
+<Source>
+"DATA",178.101,49,2,503,0)
+<Actor>
+"DATA",178.101,49,2,504,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/Results/Result/Test/NormalResult/Normal/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,505,0)
+</Actor>
+"DATA",178.101,49,2,506,0)
+</Source>
+"DATA",178.101,49,2,507,0)
+</Normal>
+"DATA",178.101,49,2,508,0)
+</NormalResult>
+"DATA",178.101,49,2,509,0)
+<Flag>
+"DATA",178.101,49,2,510,0)
+<Text>@@//ContinuityOfCareRecord/Body/Results/Result/Test/Flag/Text@@</Text>
+"DATA",178.101,49,2,511,0)
+</Flag>
+"DATA",178.101,49,2,512,0)
+</Test>
+"DATA",178.101,49,2,513,0)
+</Result>
+"DATA",178.101,49,2,514,0)
+</Results>
+"DATA",178.101,49,2,515,0)
+<HealthCareProviders>
+"DATA",178.101,49,2,516,0)
+<Provider>
+"DATA",178.101,49,2,517,0)
+<ActorID>@@//ContinuityOfCareRecord/Body/HealthCareProviders/Provider/ActorID@@</ActorID>
+"DATA",178.101,49,2,518,0)
+<ActorRole>
+"DATA",178.101,49,2,519,0)
+<Text>@@//ContinuityOfCareRecord/Body/HealthCareProviders/Provider/ActorRole/Text@@</Text>
+"DATA",178.101,49,2,520,0)
+</ActorRole>
+"DATA",178.101,49,2,521,0)
+</Provider>
+"DATA",178.101,49,2,522,0)
+</HealthCareProviders>
+"DATA",178.101,49,2,523,0)
+</Body>
+"DATA",178.101,49,2,524,0)
+<Actors>
+"DATA",178.101,49,2,525,0)
+<ACTOR-PATIENT>
+"DATA",178.101,49,2,526,0)
+<Actor>
+"DATA",178.101,49,2,527,0)
+<ActorObjectID>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/ActorObjectID@@</ActorObjectID>
+"DATA",178.101,49,2,528,0)
+<Person>
+"DATA",178.101,49,2,529,0)
+<Name>
+"DATA",178.101,49,2,530,0)
+<CurrentName>
+"DATA",178.101,49,2,531,0)
+<Given>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Name/CurrentName/Given@@</Given>
+"DATA",178.101,49,2,532,0)
+<Middle>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Name/CurrentName/Middle@@</Middle>
+"DATA",178.101,49,2,533,0)
+<Family>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Name/CurrentName/Family@@</Family>
+"DATA",178.101,49,2,534,0)
+</CurrentName>
+"DATA",178.101,49,2,535,0)
+</Name>
+"DATA",178.101,49,2,536,0)
+<DateOfBirth>
+"DATA",178.101,49,2,537,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/DateOfBirth/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,538,0)
+</DateOfBirth>
+"DATA",178.101,49,2,539,0)
+<Gender>
+"DATA",178.101,49,2,540,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Gender/Text@@</Text>
+"DATA",178.101,49,2,541,0)
+<Code>
+"DATA",178.101,49,2,542,0)
+<Value>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Gender/Code/Value@@</Value>
+"DATA",178.101,49,2,543,0)
+<CodingSystem>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Gender/Code/CodingSystem@@</CodingSystem>
+"DATA",178.101,49,2,544,0)
+</Code>
+"DATA",178.101,49,2,545,0)
+</Gender>
+"DATA",178.101,49,2,546,0)
+</Person>
+"DATA",178.101,49,2,547,0)
+<IDs>
+"DATA",178.101,49,2,548,0)
+<Type>
+"DATA",178.101,49,2,549,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/IDs/Type/Text@@</Text>
+"DATA",178.101,49,2,550,0)
+</Type>
+"DATA",178.101,49,2,551,0)
+<ID>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/IDs/ID@@</ID>
+"DATA",178.101,49,2,552,0)
+<Source>
+"DATA",178.101,49,2,553,0)
+<Actor>
+"DATA",178.101,49,2,554,0)
+<ActorID>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/IDs/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,555,0)
+</Actor>
+"DATA",178.101,49,2,556,0)
+</Source>
+"DATA",178.101,49,2,557,0)
+</IDs>
+"DATA",178.101,49,2,558,0)
+<Address>
+"DATA",178.101,49,2,559,0)
+<Type>
+"DATA",178.101,49,2,560,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/Type/Text@@</Text>
+"DATA",178.101,49,2,561,0)
+</Type>
+"DATA",178.101,49,2,562,0)
+<Line1>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/Line1@@</Line1>
+"DATA",178.101,49,2,563,0)
+<Line2>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/Line2@@</Line2>
+"DATA",178.101,49,2,564,0)
+<City>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/City@@</City>
+"DATA",178.101,49,2,565,0)
+<State>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/State@@</State>
+"DATA",178.101,49,2,566,0)
+<PostalCode>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/PostalCode@@</PostalCode>
+"DATA",178.101,49,2,567,0)
+</Address>
+"DATA",178.101,49,2,568,0)
+<Telephone>
+"DATA",178.101,49,2,569,0)
+<Value>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[1]/Value@@</Value>
+"DATA",178.101,49,2,570,0)
+<Type>
+"DATA",178.101,49,2,571,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[1]/Type/Text@@</Text>
+"DATA",178.101,49,2,572,0)
+</Type>
+"DATA",178.101,49,2,573,0)
+</Telephone>
+"DATA",178.101,49,2,574,0)
+<Telephone>
+"DATA",178.101,49,2,575,0)
+<Value>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[2]/Value@@</Value>
+"DATA",178.101,49,2,576,0)
+<Type>
+"DATA",178.101,49,2,577,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[2]/Type/Text@@</Text>
+"DATA",178.101,49,2,578,0)
+</Type>
+"DATA",178.101,49,2,579,0)
+</Telephone>
+"DATA",178.101,49,2,580,0)
+<Telephone>
+"DATA",178.101,49,2,581,0)
+<Value>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[3]/Value@@</Value>
+"DATA",178.101,49,2,582,0)
+<Type>
+"DATA",178.101,49,2,583,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[3]/Type/Text@@</Text>
+"DATA",178.101,49,2,584,0)
+</Type>
+"DATA",178.101,49,2,585,0)
+</Telephone>
+"DATA",178.101,49,2,586,0)
+<EMail>
+"DATA",178.101,49,2,587,0)
+<Value>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/EMail/Value@@</Value>
+"DATA",178.101,49,2,588,0)
+</EMail>
+"DATA",178.101,49,2,589,0)
+<Source>
+"DATA",178.101,49,2,590,0)
+<Actor>
+"DATA",178.101,49,2,591,0)
+<ActorID>@@//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,592,0)
+</Actor>
+"DATA",178.101,49,2,593,0)
+</Source>
+"DATA",178.101,49,2,594,0)
+</Actor>
+"DATA",178.101,49,2,595,0)
+</ACTOR-PATIENT>
+"DATA",178.101,49,2,596,0)
+<ACTOR-SYSTEM>
+"DATA",178.101,49,2,597,0)
+<Actor>
+"DATA",178.101,49,2,598,0)
+<ActorObjectID>@@//ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/ActorObjectID@@</ActorObjectID>
+"DATA",178.101,49,2,599,0)
+<InformationSystem>
+"DATA",178.101,49,2,600,0)
+<Name>@@//ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/InformationSystem/Name@@</Name>
+"DATA",178.101,49,2,601,0)
+<Version>@@//ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/InformationSystem/Version@@</Version>
+"DATA",178.101,49,2,602,0)
+</InformationSystem>
+"DATA",178.101,49,2,603,0)
+<Source>
+"DATA",178.101,49,2,604,0)
+<Actor>
+"DATA",178.101,49,2,605,0)
+<ActorID>@@//ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,606,0)
+</Actor>
+"DATA",178.101,49,2,607,0)
+</Source>
+"DATA",178.101,49,2,608,0)
+</Actor>
+"DATA",178.101,49,2,609,0)
+</ACTOR-SYSTEM>
+"DATA",178.101,49,2,610,0)
+<ACTOR-NOK>
+"DATA",178.101,49,2,611,0)
+<Actor>
+"DATA",178.101,49,2,612,0)
+<ActorObjectID>@@//ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/ActorObjectID@@</ActorObjectID>
+"DATA",178.101,49,2,613,0)
+<Person>
+"DATA",178.101,49,2,614,0)
+<Name>
+"DATA",178.101,49,2,615,0)
+<DisplayName>@@//ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/Person/Name/DisplayName@@</DisplayName>
+"DATA",178.101,49,2,616,0)
+</Name>
+"DATA",178.101,49,2,617,0)
+</Person>
+"DATA",178.101,49,2,618,0)
+<Relation>
+"DATA",178.101,49,2,619,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/Relation/Text@@</Text>
+"DATA",178.101,49,2,620,0)
+</Relation>
+"DATA",178.101,49,2,621,0)
+<Source>
+"DATA",178.101,49,2,622,0)
+<Actor>
+"DATA",178.101,49,2,623,0)
+<ActorID>@@//ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,624,0)
+</Actor>
+"DATA",178.101,49,2,625,0)
+</Source>
+"DATA",178.101,49,2,626,0)
+</Actor>
+"DATA",178.101,49,2,627,0)
+</ACTOR-NOK>
+"DATA",178.101,49,2,628,0)
+<ACTOR-PROVIDER>
+"DATA",178.101,49,2,629,0)
+<Actor>
+"DATA",178.101,49,2,630,0)
+<ActorObjectID>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/ActorObjectID@@</ActorObjectID>
+"DATA",178.101,49,2,631,0)
+<Person>
+"DATA",178.101,49,2,632,0)
+<Name>
+"DATA",178.101,49,2,633,0)
+<CurrentName>
+"DATA",178.101,49,2,634,0)
+<Given>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Given@@</Given>
+"DATA",178.101,49,2,635,0)
+<Middle>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Middle@@</Middle>
+"DATA",178.101,49,2,636,0)
+<Family>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Family@@</Family>
+"DATA",178.101,49,2,637,0)
+<Title>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Title@@</Title>
+"DATA",178.101,49,2,638,0)
+</CurrentName>
+"DATA",178.101,49,2,639,0)
+</Name>
+"DATA",178.101,49,2,640,0)
+</Person>
+"DATA",178.101,49,2,641,0)
+<IDs>
+"DATA",178.101,49,2,642,0)
+<Type>
+"DATA",178.101,49,2,643,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/IDs/Type/Text@@</Text>
+"DATA",178.101,49,2,644,0)
+</Type>
+"DATA",178.101,49,2,645,0)
+<ID>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/IDs/ID@@</ID>
+"DATA",178.101,49,2,646,0)
+<IssuedBy>
+"DATA",178.101,49,2,647,0)
+<Description>
+"DATA",178.101,49,2,648,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/IDs/IssuedBy/Description/Text@@</Text>
+"DATA",178.101,49,2,649,0)
+</Description>
+"DATA",178.101,49,2,650,0)
+</IssuedBy>
+"DATA",178.101,49,2,651,0)
+</IDs>
+"DATA",178.101,49,2,652,0)
+<Specialty>
+"DATA",178.101,49,2,653,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Specialty/Text@@</Text>
+"DATA",178.101,49,2,654,0)
+</Specialty>
+"DATA",178.101,49,2,655,0)
+<Address>
+"DATA",178.101,49,2,656,0)
+<Type>
+"DATA",178.101,49,2,657,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/Type/Text@@</Text>
+"DATA",178.101,49,2,658,0)
+</Type>
+"DATA",178.101,49,2,659,0)
+<Line1>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/Line1@@</Line1>
+"DATA",178.101,49,2,660,0)
+<City>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/City@@</City>
+"DATA",178.101,49,2,661,0)
+<State>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/State@@</State>
+"DATA",178.101,49,2,662,0)
+<PostalCode>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/PostalCode@@</PostalCode>
+"DATA",178.101,49,2,663,0)
+</Address>
+"DATA",178.101,49,2,664,0)
+<Telephone>
+"DATA",178.101,49,2,665,0)
+<Value>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Telephone/Value@@</Value>
+"DATA",178.101,49,2,666,0)
+<Type>
+"DATA",178.101,49,2,667,0)
+<Text>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Telephone/Type/Text@@</Text>
+"DATA",178.101,49,2,668,0)
+</Type>
+"DATA",178.101,49,2,669,0)
+</Telephone>
+"DATA",178.101,49,2,670,0)
+<Email>
+"DATA",178.101,49,2,671,0)
+<Value>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Email/Value@@</Value>
+"DATA",178.101,49,2,672,0)
+</Email>
+"DATA",178.101,49,2,673,0)
+<Source>
+"DATA",178.101,49,2,674,0)
+<Actor>
+"DATA",178.101,49,2,675,0)
+<ActorID>@@//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,676,0)
+</Actor>
+"DATA",178.101,49,2,677,0)
+</Source>
+"DATA",178.101,49,2,678,0)
+</Actor>
+"DATA",178.101,49,2,679,0)
+</ACTOR-PROVIDER>
+"DATA",178.101,49,2,680,0)
+<ACTOR-ORG>
+"DATA",178.101,49,2,681,0)
+<Actor>
+"DATA",178.101,49,2,682,0)
+<ActorObjectID>@@//ContinuityOfCareRecord/Actors/ACTOR-ORG/Actor/ActorObjectID@@</ActorObjectID>
+"DATA",178.101,49,2,683,0)
+<Organization>
+"DATA",178.101,49,2,684,0)
+<Name>@@//ContinuityOfCareRecord/Actors/ACTOR-ORG/Actor/Organization/Name@@</Name>
+"DATA",178.101,49,2,685,0)
+</Organization>
+"DATA",178.101,49,2,686,0)
+<Source>
+"DATA",178.101,49,2,687,0)
+<Actor>
+"DATA",178.101,49,2,688,0)
+<ActorID>@@//ContinuityOfCareRecord/Actors/ACTOR-ORG/Actor/Source/Actor/ActorID@@</ActorID>
+"DATA",178.101,49,2,689,0)
+</Actor>
+"DATA",178.101,49,2,690,0)
+</Source>
+"DATA",178.101,49,2,691,0)
+</Actor>
+"DATA",178.101,49,2,692,0)
+</ACTOR-ORG>
+"DATA",178.101,49,2,693,0)
+</Actors>
+"DATA",178.101,49,2,694,0)
+<Signatures>
+"DATA",178.101,49,2,695,0)
+<CCRSignature>
+"DATA",178.101,49,2,696,0)
+<SignatureObjectID>@@//ContinuityOfCareRecord/Signatures/CCRSignature/SignatureObjectID@@</SignatureObjectID>
+"DATA",178.101,49,2,697,0)
+<ExactDateTime>@@//ContinuityOfCareRecord/Signatures/CCRSignature/ExactDateTime@@</ExactDateTime>
+"DATA",178.101,49,2,698,0)
+<Source>
+"DATA",178.101,49,2,699,0)
+<ActorID>@@//ContinuityOfCareRecord/Signatures/CCRSignature/Source/ActorID@@</ActorID>
+"DATA",178.101,49,2,700,0)
+</Source>
+"DATA",178.101,49,2,701,0)
+<Signature>
+"DATA",178.101,49,2,702,0)
+<Signature xmlns="http://www.w3.org/2000/09/xmldsig#">
+"DATA",178.101,49,2,703,0)
+<SignedInfo>
+"DATA",178.101,49,2,704,0)
+<CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"></CanonicalizationMethod>
+"DATA",178.101,49,2,705,0)
+<SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"></SignatureMethod>
+"DATA",178.101,49,2,706,0)
+<Reference URI="">
+"DATA",178.101,49,2,707,0)
+<Transforms>
+"DATA",178.101,49,2,708,0)
+<Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"></Transform>
+"DATA",178.101,49,2,709,0)
+</Transforms>
+"DATA",178.101,49,2,710,0)
+<DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"></DigestMethod>
+"DATA",178.101,49,2,711,0)
+<DigestValue>@@//ContinuityOfCareRecord/Signatures/CCRSignature/Signature/Signature/SignedInfo/Reference/DigestValue@@</DigestValue>
+"DATA",178.101,49,2,712,0)
+</Reference>
+"DATA",178.101,49,2,713,0)
+</SignedInfo>
+"DATA",178.101,49,2,714,0)
+<SignatureValue>@@//ContinuityOfCareRecord/Signatures/CCRSignature/Signature/Signature/SignatureValue@@</SignatureValue>
+"DATA",178.101,49,2,715,0)
+<KeyInfo>
+"DATA",178.101,49,2,716,0)
+<KeyValue>
+"DATA",178.101,49,2,717,0)
+<RSAKeyValue>
+"DATA",178.101,49,2,718,0)
+<Modulus>@@//ContinuityOfCareRecord/Signatures/CCRSignature/Signature/Signature/KeyInfo/KeyValue/RSAKeyValue/Modulus@@</Modulus>
+"DATA",178.101,49,2,719,0)
+<Exponent>@@//ContinuityOfCareRecord/Signatures/CCRSignature/Signature/Signature/KeyInfo/KeyValue/RSAKeyValue/Exponent@@</Exponent>
+"DATA",178.101,49,2,720,0)
+</RSAKeyValue>
+"DATA",178.101,49,2,721,0)
+</KeyValue>
+"DATA",178.101,49,2,722,0)
+</KeyInfo>
+"DATA",178.101,49,2,723,0)
+</Signature>
+"DATA",178.101,49,2,724,0)
+</Signature>
+"DATA",178.101,49,2,725,0)
+</CCRSignature>
+"DATA",178.101,49,2,726,0)
+</Signatures>
+"DATA",178.101,49,2,727,0)
+</ContinuityOfCareRecord>
+"DATA",178.101,49,5)
+ContinuityOfCareRecord
+"DATA",178.101,49,8,0)
+^178.1014^218^218
+"DATA",178.101,49,8,1,0)
+//ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/ActorObjectID
+"DATA",178.101,49,8,2,0)
+//ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/Person/Name/DisplayName
+"DATA",178.101,49,8,3,0)
+//ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/Relation/Text
+"DATA",178.101,49,8,4,0)
+//ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/Source/Actor/ActorID
+"DATA",178.101,49,8,5,0)
+//ContinuityOfCareRecord/Actors/ACTOR-ORG/Actor/ActorObjectID
+"DATA",178.101,49,8,6,0)
+//ContinuityOfCareRecord/Actors/ACTOR-ORG/Actor/Organization/Name
+"DATA",178.101,49,8,7,0)
+//ContinuityOfCareRecord/Actors/ACTOR-ORG/Actor/Source/Actor/ActorID
+"DATA",178.101,49,8,8,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/ActorObjectID
+"DATA",178.101,49,8,9,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/City
+"DATA",178.101,49,8,10,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/Line1
+"DATA",178.101,49,8,11,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/Line2
+"DATA",178.101,49,8,12,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/PostalCode
+"DATA",178.101,49,8,13,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/State
+"DATA",178.101,49,8,14,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/Type/Text
+"DATA",178.101,49,8,15,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/EMail/Value
+"DATA",178.101,49,8,16,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/IDs/ID
+"DATA",178.101,49,8,17,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/IDs/Source/Actor/ActorID
+"DATA",178.101,49,8,18,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/IDs/Type/Text
+"DATA",178.101,49,8,19,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/DateOfBirth/ExactDateTime
+"DATA",178.101,49,8,20,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Gender/Code/CodingSystem
+"DATA",178.101,49,8,21,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Gender/Code/Value
+"DATA",178.101,49,8,22,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Gender/Text
+"DATA",178.101,49,8,23,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Name/CurrentName/Family
+"DATA",178.101,49,8,24,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Name/CurrentName/Given
+"DATA",178.101,49,8,25,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Name/CurrentName/Middle
+"DATA",178.101,49,8,26,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Source/Actor/ActorID
+"DATA",178.101,49,8,27,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[1]/Type/Text
+"DATA",178.101,49,8,28,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[1]/Value
+"DATA",178.101,49,8,29,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[2]/Type/Text
+"DATA",178.101,49,8,30,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[2]/Value
+"DATA",178.101,49,8,31,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[3]/Type/Text
+"DATA",178.101,49,8,32,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Telephone[3]/Value
+"DATA",178.101,49,8,33,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/ActorObjectID
+"DATA",178.101,49,8,34,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/City
+"DATA",178.101,49,8,35,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/Line1
+"DATA",178.101,49,8,36,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/PostalCode
+"DATA",178.101,49,8,37,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/State
+"DATA",178.101,49,8,38,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/Type/Text
+"DATA",178.101,49,8,39,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Email/Value
+"DATA",178.101,49,8,40,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/IDs/ID
+"DATA",178.101,49,8,41,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/IDs/IssuedBy/Description/Text
+"DATA",178.101,49,8,42,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/IDs/Type/Text
+"DATA",178.101,49,8,43,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Family
+"DATA",178.101,49,8,44,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Given
+"DATA",178.101,49,8,45,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Middle
+"DATA",178.101,49,8,46,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Title
+"DATA",178.101,49,8,47,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Source/Actor/ActorID
+"DATA",178.101,49,8,48,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Specialty/Text
+"DATA",178.101,49,8,49,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Telephone/Type/Text
+"DATA",178.101,49,8,50,0)
+//ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Telephone/Value
+"DATA",178.101,49,8,51,0)
+//ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/ActorObjectID
+"DATA",178.101,49,8,52,0)
+//ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/InformationSystem/Name
+"DATA",178.101,49,8,53,0)
+//ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/InformationSystem/Version
+"DATA",178.101,49,8,54,0)
+//ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/Source/Actor/ActorID
+"DATA",178.101,49,8,55,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/CCRDataObjectID
+"DATA",178.101,49,8,56,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/Product/ProductName/Code/CodingSystem
+"DATA",178.101,49,8,57,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/Product/ProductName/Code/Value
+"DATA",178.101,49,8,58,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/Product/ProductName/Text
+"DATA",178.101,49,8,59,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/Source/Actor/ActorID
+"DATA",178.101,49,8,60,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/CCRDataObjectID
+"DATA",178.101,49,8,61,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/DateTime/ExactDateTime
+"DATA",178.101,49,8,62,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Description/Code/CodingSystem
+"DATA",178.101,49,8,63,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Description/Code/Value
+"DATA",178.101,49,8,64,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Description/Text
+"DATA",178.101,49,8,65,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Code/CodingSystem
+"DATA",178.101,49,8,66,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Code/Value
+"DATA",178.101,49,8,67,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Text
+"DATA",178.101,49,8,68,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Source/Actor/ActorID
+"DATA",178.101,49,8,69,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Status/Text
+"DATA",178.101,49,8,70,0)
+//ContinuityOfCareRecord/Body/Alerts/Alert/Type/Text
+"DATA",178.101,49,8,71,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/CCRDataObjectID
+"DATA",178.101,49,8,72,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/ActorID
+"DATA",178.101,49,8,73,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/ActorRole/Text
+"DATA",178.101,49,8,74,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/Source/Actor/ActorID
+"DATA",178.101,49,8,75,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/CodingSystem
+"DATA",178.101,49,8,76,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/Value
+"DATA",178.101,49,8,77,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/Version
+"DATA",178.101,49,8,78,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Text
+"DATA",178.101,49,8,79,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Source/Actor/ActorID
+"DATA",178.101,49,8,80,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Type/Text
+"DATA",178.101,49,8,81,0)
+//ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Source/Actor/ActorID
+"DATA",178.101,49,8,82,0)
+//ContinuityOfCareRecord/Body/HealthCareProviders/Provider/ActorID
+"DATA",178.101,49,8,83,0)
+//ContinuityOfCareRecord/Body/HealthCareProviders/Provider/ActorRole/Text
+"DATA",178.101,49,8,84,0)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/CCRDataObjectID
+"DATA",178.101,49,8,85,0)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/DateTime/ExactDateTime
+"DATA",178.101,49,8,86,0)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/DateTime/Type/Text
+"DATA",178.101,49,8,87,0)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/Product/ProductName/Code/CodingSystem
+"DATA",178.101,49,8,88,0)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/Product/ProductName/Code/Value
+"DATA",178.101,49,8,89,0)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/Product/ProductName/Text
+"DATA",178.101,49,8,90,0)
+//ContinuityOfCareRecord/Body/Immunizations/Immunization/Source/Actor/ActorID
+"DATA",178.101,49,8,91,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/CCRDataObjectID
+"DATA",178.101,49,8,92,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/DateTime[1]/ExactDateTime
+"DATA",178.101,49,8,93,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/DateTime[1]/Type/Text
+"DATA",178.101,49,8,94,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/DateTime[2]/ExactDateTime
+"DATA",178.101,49,8,95,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/DateTime[2]/Type/Text
+"DATA",178.101,49,8,96,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Description/Text
+"DATA",178.101,49,8,97,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DeliveryMethod/Text
+"DATA",178.101,49,8,98,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Description/Text
+"DATA",178.101,49,8,99,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DirectionSequenceModifier
+"DATA",178.101,49,8,100,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Rate/Units/Unit
+"DATA",178.101,49,8,101,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Rate/Value
+"DATA",178.101,49,8,102,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Units/Unit
+"DATA",178.101,49,8,103,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Value
+"DATA",178.101,49,8,104,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DoseIndicator/Text
+"DATA",178.101,49,8,105,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Duration/Units/Unit
+"DATA",178.101,49,8,106,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Duration/Value
+"DATA",178.101,49,8,107,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Frequency/Value
+"DATA",178.101,49,8,108,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/PRNFlag/Text
+"DATA",178.101,49,8,109,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/CCRDataObjectID
+"DATA",178.101,49,8,110,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/CodingSystem
+"DATA",178.101,49,8,111,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/Value
+"DATA",178.101,49,8,112,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/Version
+"DATA",178.101,49,8,113,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Text
+"DATA",178.101,49,8,114,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Source/Actor/ActorID
+"DATA",178.101,49,8,115,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Type/Text
+"DATA",178.101,49,8,116,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Interval/Units/Unit
+"DATA",178.101,49,8,117,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Interval/Value
+"DATA",178.101,49,8,118,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/MultipleDirectionModifier/Text
+"DATA",178.101,49,8,119,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Route/Text
+"DATA",178.101,49,8,120,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/StopIndicator/Text
+"DATA",178.101,49,8,121,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Vehicle/Text
+"DATA",178.101,49,8,122,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/FullfillmentInstructions/Text
+"DATA",178.101,49,8,123,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/IDs/ID
+"DATA",178.101,49,8,124,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/IDs/Type/Text
+"DATA",178.101,49,8,125,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/PatientInstructions/Instruction
+"DATA",178.101,49,8,126,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/BrandName/Text
+"DATA",178.101,49,8,127,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Concentration/Units/Unit
+"DATA",178.101,49,8,128,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Concentration/Value
+"DATA",178.101,49,8,129,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Form/Text
+"DATA",178.101,49,8,130,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/CodingSystem
+"DATA",178.101,49,8,131,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/Value
+"DATA",178.101,49,8,132,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/Version
+"DATA",178.101,49,8,133,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Text
+"DATA",178.101,49,8,134,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Strength/Units/Unit
+"DATA",178.101,49,8,135,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Product/Strength/Value
+"DATA",178.101,49,8,136,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Quantity/Units/Unit
+"DATA",178.101,49,8,137,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Quantity/Value
+"DATA",178.101,49,8,138,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Refills/Refill/Number
+"DATA",178.101,49,8,139,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Source/Actor/ActorID
+"DATA",178.101,49,8,140,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Status/Text
+"DATA",178.101,49,8,141,0)
+//ContinuityOfCareRecord/Body/Medications/Medication/Type/Text
+"DATA",178.101,49,8,142,0)
+//ContinuityOfCareRecord/Body/Problems/Problem/CCRDataObjectID
+"DATA",178.101,49,8,143,0)
+//ContinuityOfCareRecord/Body/Problems/Problem/DateTime/ExactDateTime
+"DATA",178.101,49,8,144,0)
+//ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/CodingSystem
+"DATA",178.101,49,8,145,0)
+//ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/Value
+"DATA",178.101,49,8,146,0)
+//ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/Version
+"DATA",178.101,49,8,147,0)
+//ContinuityOfCareRecord/Body/Problems/Problem/Description/Text
+"DATA",178.101,49,8,148,0)
+//ContinuityOfCareRecord/Body/Problems/Problem/Source/Actor/ActorID
+"DATA",178.101,49,8,149,0)
+//ContinuityOfCareRecord/Body/Problems/Problem/Status/Text
+"DATA",178.101,49,8,150,0)
+//ContinuityOfCareRecord/Body/Problems/Problem/Type/Text
+"DATA",178.101,49,8,151,0)
+//ContinuityOfCareRecord/Body/Results/Result/CCRDataObjectID
+"DATA",178.101,49,8,152,0)
+//ContinuityOfCareRecord/Body/Results/Result/DateTime/ExactDateTime
+"DATA",178.101,49,8,153,0)
+//ContinuityOfCareRecord/Body/Results/Result/DateTime/Type/Text
+"DATA",178.101,49,8,154,0)
+//ContinuityOfCareRecord/Body/Results/Result/Description/Code/CodingSystem
+"DATA",178.101,49,8,155,0)
+//ContinuityOfCareRecord/Body/Results/Result/Description/Code/Value
+"DATA",178.101,49,8,156,0)
+//ContinuityOfCareRecord/Body/Results/Result/Description/Text
+"DATA",178.101,49,8,157,0)
+//ContinuityOfCareRecord/Body/Results/Result/Source/Actor/ActorID
+"DATA",178.101,49,8,158,0)
+//ContinuityOfCareRecord/Body/Results/Result/Status/Text
+"DATA",178.101,49,8,159,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/CCRDataObjectID
+"DATA",178.101,49,8,160,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/DateTime/ExactDateTime
+"DATA",178.101,49,8,161,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/DateTime/Type/Text
+"DATA",178.101,49,8,162,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Description/Code/CodingSystem
+"DATA",178.101,49,8,163,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Description/Code/Value
+"DATA",178.101,49,8,164,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Description/Text
+"DATA",178.101,49,8,165,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Flag/Text
+"DATA",178.101,49,8,166,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/NormalResult/Normal/Description/Text
+"DATA",178.101,49,8,167,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/NormalResult/Normal/Source/Actor/ActorID
+"DATA",178.101,49,8,168,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Source/Actor/ActorID
+"DATA",178.101,49,8,169,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/Status/Text
+"DATA",178.101,49,8,170,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/TestResult/Units/Unit
+"DATA",178.101,49,8,171,0)
+//ContinuityOfCareRecord/Body/Results/Result/Test/TestResult/Value
+"DATA",178.101,49,8,172,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[1]/CCRDataObjectID
+"DATA",178.101,49,8,173,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[1]/Description/Text
+"DATA",178.101,49,8,174,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[1]/Source/Actor/ActorID
+"DATA",178.101,49,8,175,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[1]/Type/Text
+"DATA",178.101,49,8,176,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[2]/CCRDataObjectID
+"DATA",178.101,49,8,177,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[2]/Description/Text
+"DATA",178.101,49,8,178,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[2]/Source/Actor/ActorID
+"DATA",178.101,49,8,179,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[2]/Type/Text
+"DATA",178.101,49,8,180,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[3]/CCRDataObjectID
+"DATA",178.101,49,8,181,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[3]/Description/Text
+"DATA",178.101,49,8,182,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[3]/Source/Actor/ActorID
+"DATA",178.101,49,8,183,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[3]/Type/Text
+"DATA",178.101,49,8,184,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[4]/CCRDataObjectID
+"DATA",178.101,49,8,185,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[4]/Description/Text
+"DATA",178.101,49,8,186,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[4]/Source/Actor/ActorID
+"DATA",178.101,49,8,187,0)
+//ContinuityOfCareRecord/Body/SocialHistory/SocialHistoryElement[4]/Type/Text
+"DATA",178.101,49,8,188,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/CCRDataObjectID
+"DATA",178.101,49,8,189,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/DateTime/ExactDateTime
+"DATA",178.101,49,8,190,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/DateTime/Type/Text
+"DATA",178.101,49,8,191,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Description/Text
+"DATA",178.101,49,8,192,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Source/Actor/ActorID
+"DATA",178.101,49,8,193,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/CCRDataObjectID
+"DATA",178.101,49,8,194,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/CodingSystem
+"DATA",178.101,49,8,195,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/Value
+"DATA",178.101,49,8,196,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/Version
+"DATA",178.101,49,8,197,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Text
+"DATA",178.101,49,8,198,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Source/Actor/ActorID
+"DATA",178.101,49,8,199,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/TestResult/Units/Unit
+"DATA",178.101,49,8,200,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/TestResult/Value
+"DATA",178.101,49,8,201,0)
+//ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Type/Text
+"DATA",178.101,49,8,202,0)
+//ContinuityOfCareRecord/CCRDocumentObjectID
+"DATA",178.101,49,8,203,0)
+//ContinuityOfCareRecord/DateTime/ExactDateTime
+"DATA",178.101,49,8,204,0)
+//ContinuityOfCareRecord/From/ActorLink[1]/ActorID
+"DATA",178.101,49,8,205,0)
+//ContinuityOfCareRecord/From/ActorLink[2]/ActorID
+"DATA",178.101,49,8,206,0)
+//ContinuityOfCareRecord/Language/Text
+"DATA",178.101,49,8,207,0)
+//ContinuityOfCareRecord/Patient/ActorID
+"DATA",178.101,49,8,208,0)
+//ContinuityOfCareRecord/Purpose/Description/Text
+"DATA",178.101,49,8,209,0)
+//ContinuityOfCareRecord/Signatures/CCRSignature/ExactDateTime
+"DATA",178.101,49,8,210,0)
+//ContinuityOfCareRecord/Signatures/CCRSignature/Signature/Signature/KeyInfo/KeyValue/RSAKeyValue/Exponent
+"DATA",178.101,49,8,211,0)
+//ContinuityOfCareRecord/Signatures/CCRSignature/Signature/Signature/KeyInfo/KeyValue/RSAKeyValue/Modulus
+"DATA",178.101,49,8,212,0)
+//ContinuityOfCareRecord/Signatures/CCRSignature/Signature/Signature/SignatureValue
+"DATA",178.101,49,8,213,0)
+//ContinuityOfCareRecord/Signatures/CCRSignature/Signature/Signature/SignedInfo/Reference/DigestValue
+"DATA",178.101,49,8,214,0)
+//ContinuityOfCareRecord/Signatures/CCRSignature/SignatureObjectID
+"DATA",178.101,49,8,215,0)
+//ContinuityOfCareRecord/Signatures/CCRSignature/Source/ActorID
+"DATA",178.101,49,8,216,0)
+//ContinuityOfCareRecord/To/ActorLink/ActorID
+"DATA",178.101,49,8,217,0)
+//ContinuityOfCareRecord/To/ActorLink/ActorRole/Text
+"DATA",178.101,49,8,218,0)
+//ContinuityOfCareRecord/Version
+"DATA",178.101,49,9,0)
+^^728^728^3091206
+"DATA",178.101,49,9,1,0)
+<?xml version="1.0" encoding="UTF-8"?>
+"DATA",178.101,49,9,2,0)
+<?xml-stylesheet type="text/xsl" href="ccr.xsl"?>
+"DATA",178.101,49,9,3,0)
+<ContinuityOfCareRecord xmlns="urn:astm-org:CCR">
+"DATA",178.101,49,9,4,0)
+<CCRDocumentObjectID>871bd605-e8f8-4b80-9918-4b03f781129e</CCRDocumentObjectID>
+"DATA",178.101,49,9,5,0)
+<Language>
+"DATA",178.101,49,9,6,0)
+<Text>English</Text>
+"DATA",178.101,49,9,7,0)
+</Language>
+"DATA",178.101,49,9,8,0)
+<Version>V1.0</Version>
+"DATA",178.101,49,9,9,0)
+<DateTime>
+"DATA",178.101,49,9,10,0)
+<ExactDateTime>@@DATETIME@@</ExactDateTime>
+"DATA",178.101,49,9,11,0)
+</DateTime>
+"DATA",178.101,49,9,12,0)
+<Patient>
+"DATA",178.101,49,9,13,0)
+<ActorID>@@ACTORPATIENT@@</ActorID>
+"DATA",178.101,49,9,14,0)
+</Patient>
+"DATA",178.101,49,9,15,0)
+<From>
+"DATA",178.101,49,9,16,0)
+<ActorLink>
+"DATA",178.101,49,9,17,0)
+<ActorID>@@ACTORFROM@@</ActorID>
+"DATA",178.101,49,9,18,0)
+</ActorLink>
+"DATA",178.101,49,9,19,0)
+<ActorLink>
+"DATA",178.101,49,9,20,0)
+<ActorID>@@ACTORFROM2@@</ActorID>
+"DATA",178.101,49,9,21,0)
+</ActorLink>
+"DATA",178.101,49,9,22,0)
+</From>
+"DATA",178.101,49,9,23,0)
+<To>
+"DATA",178.101,49,9,24,0)
+<ActorLink>
+"DATA",178.101,49,9,25,0)
+<ActorID>@@ACTORTO@@</ActorID>
+"DATA",178.101,49,9,26,0)
+<ActorRole>
+"DATA",178.101,49,9,27,0)
+<Text>@@ACTORTOTEXT@@</Text>
+"DATA",178.101,49,9,28,0)
+</ActorRole>
+"DATA",178.101,49,9,29,0)
+</ActorLink>
+"DATA",178.101,49,9,30,0)
+</To>
+"DATA",178.101,49,9,31,0)
+<Purpose>
+"DATA",178.101,49,9,32,0)
+<Description>
+"DATA",178.101,49,9,33,0)
+<Text>@@PURPOSEDESCRIPTION@@</Text>
+"DATA",178.101,49,9,34,0)
+</Description>
+"DATA",178.101,49,9,35,0)
+</Purpose>
+"DATA",178.101,49,9,36,0)
+<Body>
+"DATA",178.101,49,9,37,0)
+<Problems>
+"DATA",178.101,49,9,38,0)
+<Problem>
+"DATA",178.101,49,9,39,0)
+<CCRDataObjectID>@@PROBLEMOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,40,0)
+<DateTime>
+"DATA",178.101,49,9,41,0)
+<ExactDateTime>@@PROBLEMDATEMOD@@</ExactDateTime>
+"DATA",178.101,49,9,42,0)
+</DateTime>
+"DATA",178.101,49,9,43,0)
+<Type>
+"DATA",178.101,49,9,44,0)
+<Text>Problem</Text>
+"DATA",178.101,49,9,45,0)
+</Type>
+"DATA",178.101,49,9,46,0)
+<Description>
+"DATA",178.101,49,9,47,0)
+<Text>@@PROBLEMDESCRIPTION@@</Text>
+"DATA",178.101,49,9,48,0)
+<Code>
+"DATA",178.101,49,9,49,0)
+<Value>@@PROBLEMCODEVALUE@@</Value>
+"DATA",178.101,49,9,50,0)
+<CodingSystem>ICD9CM</CodingSystem>
+"DATA",178.101,49,9,51,0)
+<Version>@@PROBLEMCODINGVERSION@@</Version>
+"DATA",178.101,49,9,52,0)
+</Code>
+"DATA",178.101,49,9,53,0)
+</Description>
+"DATA",178.101,49,9,54,0)
+<Status>
+"DATA",178.101,49,9,55,0)
+<Text>@@PROBLEMSTATUS@@</Text>
+"DATA",178.101,49,9,56,0)
+</Status>
+"DATA",178.101,49,9,57,0)
+<Source>
+"DATA",178.101,49,9,58,0)
+<Actor>
+"DATA",178.101,49,9,59,0)
+<ActorID>@@PROBLEMSOURCEACTORID@@</ActorID>
+"DATA",178.101,49,9,60,0)
+</Actor>
+"DATA",178.101,49,9,61,0)
+</Source>
+"DATA",178.101,49,9,62,0)
+</Problem>
+"DATA",178.101,49,9,63,0)
+</Problems>
+"DATA",178.101,49,9,64,0)
+<Immunizations>
+"DATA",178.101,49,9,65,0)
+<Immunization>
+"DATA",178.101,49,9,66,0)
+<CCRDataObjectID>@@IMMUNEOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,67,0)
+<DateTime>
+"DATA",178.101,49,9,68,0)
+<Type>
+"DATA",178.101,49,9,69,0)
+<Text>@@IMMUNEDATETIMETYPETEXT@@</Text>
+"DATA",178.101,49,9,70,0)
+</Type>
+"DATA",178.101,49,9,71,0)
+<ExactDateTime>@@IMMUNEDATETIME@@</ExactDateTime>
+"DATA",178.101,49,9,72,0)
+</DateTime>
+"DATA",178.101,49,9,73,0)
+<Source>
+"DATA",178.101,49,9,74,0)
+<Actor>
+"DATA",178.101,49,9,75,0)
+<ActorID>@@IMMUNESOURCEACTORID@@</ActorID>
+"DATA",178.101,49,9,76,0)
+</Actor>
+"DATA",178.101,49,9,77,0)
+</Source>
+"DATA",178.101,49,9,78,0)
+<Product>
+"DATA",178.101,49,9,79,0)
+<ProductName>
+"DATA",178.101,49,9,80,0)
+<Text>@@IMMUNEPRODUCTNAMETEXT@@</Text>
+"DATA",178.101,49,9,81,0)
+<Code>
+"DATA",178.101,49,9,82,0)
+<Value>@@IMMUNEPRODUCTCODE@@</Value>
+"DATA",178.101,49,9,83,0)
+<CodingSystem>@@IMMUNEPRODUCTCODESYSTEM@@</CodingSystem>
+"DATA",178.101,49,9,84,0)
+</Code>
+"DATA",178.101,49,9,85,0)
+</ProductName>
+"DATA",178.101,49,9,86,0)
+</Product>
+"DATA",178.101,49,9,87,0)
+</Immunization>
+"DATA",178.101,49,9,88,0)
+</Immunizations>
+"DATA",178.101,49,9,89,0)
+<FamilyHistory>
+"DATA",178.101,49,9,90,0)
+<FamilyProblemHistory>
+"DATA",178.101,49,9,91,0)
+<CCRDataObjectID>@@FAMILYHISTORYOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,92,0)
+<Source>
+"DATA",178.101,49,9,93,0)
+<Actor>
+"DATA",178.101,49,9,94,0)
+<ActorID>@@FAMILYHISTORYACTORID@@</ActorID>
+"DATA",178.101,49,9,95,0)
+</Actor>
+"DATA",178.101,49,9,96,0)
+</Source>
+"DATA",178.101,49,9,97,0)
+<FamilyMember>
+"DATA",178.101,49,9,98,0)
+<ActorID>@@FAMILYMEMBERACTORID@@</ActorID>
+"DATA",178.101,49,9,99,0)
+<ActorRole>
+"DATA",178.101,49,9,100,0)
+<Text>@@FAMILYMEMBERACTORROLETEXT@@</Text>
+"DATA",178.101,49,9,101,0)
+</ActorRole>
+"DATA",178.101,49,9,102,0)
+<Source>
+"DATA",178.101,49,9,103,0)
+<Actor>
+"DATA",178.101,49,9,104,0)
+<ActorID>@@FAMILYMEMBERSOURCACTORID@@</ActorID>
+"DATA",178.101,49,9,105,0)
+</Actor>
+"DATA",178.101,49,9,106,0)
+</Source>
+"DATA",178.101,49,9,107,0)
+</FamilyMember>
+"DATA",178.101,49,9,108,0)
+<Problem>
+"DATA",178.101,49,9,109,0)
+<Type>
+"DATA",178.101,49,9,110,0)
+<Text>Problem</Text>
+"DATA",178.101,49,9,111,0)
+</Type>
+"DATA",178.101,49,9,112,0)
+<Description>
+"DATA",178.101,49,9,113,0)
+<Text>@@FAMILYMEMBERPROBLEMDESCRIPTION@@</Text>
+"DATA",178.101,49,9,114,0)
+<Code>
+"DATA",178.101,49,9,115,0)
+<Value>@@FAMILYMEMBERPROBLEMCODE@@</Value>
+"DATA",178.101,49,9,116,0)
+<CodingSystem>@@FAMILYMEMBERCODESYSTEM@@</CodingSystem>
+"DATA",178.101,49,9,117,0)
+<Version>@@FAMILYMEMBERCODEVERSION@@</Version>
+"DATA",178.101,49,9,118,0)
+</Code>
+"DATA",178.101,49,9,119,0)
+</Description>
+"DATA",178.101,49,9,120,0)
+<Source>
+"DATA",178.101,49,9,121,0)
+<Actor>
+"DATA",178.101,49,9,122,0)
+<ActorID>@@FAMILYMEMBERPROBLEMSOURCEID@@</ActorID>
+"DATA",178.101,49,9,123,0)
+</Actor>
+"DATA",178.101,49,9,124,0)
+</Source>
+"DATA",178.101,49,9,125,0)
+</Problem>
+"DATA",178.101,49,9,126,0)
+</FamilyProblemHistory>
+"DATA",178.101,49,9,127,0)
+</FamilyHistory>
+"DATA",178.101,49,9,128,0)
+<SocialHistory>
+"DATA",178.101,49,9,129,0)
+<SocialHistoryElement>
+"DATA",178.101,49,9,130,0)
+<CCRDataObjectID>@@SOCIALHISTORYOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,131,0)
+<Type>
+"DATA",178.101,49,9,132,0)
+<Text>@@SOCIALHISTORYTYPETEXT@@</Text>
+"DATA",178.101,49,9,133,0)
+</Type>
+"DATA",178.101,49,9,134,0)
+<Description>
+"DATA",178.101,49,9,135,0)
+<Text>@@SOCIALHISTORYDESCRIPTIONTEXT@@</Text>
+"DATA",178.101,49,9,136,0)
+</Description>
+"DATA",178.101,49,9,137,0)
+<Source>
+"DATA",178.101,49,9,138,0)
+<Actor>
+"DATA",178.101,49,9,139,0)
+<ActorID>@@SOCIALHISTORYSOURCACTORID@@</ActorID>
+"DATA",178.101,49,9,140,0)
+</Actor>
+"DATA",178.101,49,9,141,0)
+</Source>
+"DATA",178.101,49,9,142,0)
+</SocialHistoryElement>
+"DATA",178.101,49,9,143,0)
+<SocialHistoryElement>
+"DATA",178.101,49,9,144,0)
+<CCRDataObjectID>BB0005</CCRDataObjectID>
+"DATA",178.101,49,9,145,0)
+<Type>
+"DATA",178.101,49,9,146,0)
+<Text>Ethnic Origin</Text>
+"DATA",178.101,49,9,147,0)
+</Type>
+"DATA",178.101,49,9,148,0)
+<Description>
+"DATA",178.101,49,9,149,0)
+<Text>Not Hispanic or Latino</Text>
+"DATA",178.101,49,9,150,0)
+</Description>
+"DATA",178.101,49,9,151,0)
+<Source>
+"DATA",178.101,49,9,152,0)
+<Actor>
+"DATA",178.101,49,9,153,0)
+<ActorID>AA0001</ActorID>
+"DATA",178.101,49,9,154,0)
+</Actor>
+"DATA",178.101,49,9,155,0)
+</Source>
+"DATA",178.101,49,9,156,0)
+</SocialHistoryElement>
+"DATA",178.101,49,9,157,0)
+<SocialHistoryElement>
+"DATA",178.101,49,9,158,0)
+<CCRDataObjectID>BB0006</CCRDataObjectID>
+"DATA",178.101,49,9,159,0)
+<Type>
+"DATA",178.101,49,9,160,0)
+<Text>Race</Text>
+"DATA",178.101,49,9,161,0)
+</Type>
+"DATA",178.101,49,9,162,0)
+<Description>
+"DATA",178.101,49,9,163,0)
+<Text>White</Text>
+"DATA",178.101,49,9,164,0)
+</Description>
+"DATA",178.101,49,9,165,0)
+<Source>
+"DATA",178.101,49,9,166,0)
+<Actor>
+"DATA",178.101,49,9,167,0)
+<ActorID>AA0001</ActorID>
+"DATA",178.101,49,9,168,0)
+</Actor>
+"DATA",178.101,49,9,169,0)
+</Source>
+"DATA",178.101,49,9,170,0)
+</SocialHistoryElement>
+"DATA",178.101,49,9,171,0)
+<SocialHistoryElement>
+"DATA",178.101,49,9,172,0)
+<CCRDataObjectID>BB0007</CCRDataObjectID>
+"DATA",178.101,49,9,173,0)
+<Type>
+"DATA",178.101,49,9,174,0)
+<Text>Occupation</Text>
+"DATA",178.101,49,9,175,0)
+</Type>
+"DATA",178.101,49,9,176,0)
+<Description>
+"DATA",178.101,49,9,177,0)
+<Text>Physician</Text>
+"DATA",178.101,49,9,178,0)
+</Description>
+"DATA",178.101,49,9,179,0)
+<Source>
+"DATA",178.101,49,9,180,0)
+<Actor>
+"DATA",178.101,49,9,181,0)
+<ActorID>AA0001</ActorID>
+"DATA",178.101,49,9,182,0)
+</Actor>
+"DATA",178.101,49,9,183,0)
+</Source>
+"DATA",178.101,49,9,184,0)
+</SocialHistoryElement>
+"DATA",178.101,49,9,185,0)
+</SocialHistory>
+"DATA",178.101,49,9,186,0)
+<Alerts>
+"DATA",178.101,49,9,187,0)
+<Alert>
+"DATA",178.101,49,9,188,0)
+<CCRDataObjectID>@@ALERTOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,189,0)
+<DateTime>
+"DATA",178.101,49,9,190,0)
+<ExactDateTime>@@ALERTDATETIME@@</ExactDateTime>
+"DATA",178.101,49,9,191,0)
+</DateTime>
+"DATA",178.101,49,9,192,0)
+<Type>
+"DATA",178.101,49,9,193,0)
+<Text>@@ALERTTYPE@@</Text>
+"DATA",178.101,49,9,194,0)
+</Type>
+"DATA",178.101,49,9,195,0)
+<Status>
+"DATA",178.101,49,9,196,0)
+<Text>@@ALERTSTATUSTEXT@@</Text>
+"DATA",178.101,49,9,197,0)
+</Status>
+"DATA",178.101,49,9,198,0)
+<Description>
+"DATA",178.101,49,9,199,0)
+<Text>@@ALERTDESCRIPTIONTEXT@@</Text>
+"DATA",178.101,49,9,200,0)
+<Code>
+"DATA",178.101,49,9,201,0)
+<Value>@@ALERTCODEVALUE@@</Value>
+"DATA",178.101,49,9,202,0)
+<CodingSystem>@@ALERTCODESYSTEM@@</CodingSystem>
+"DATA",178.101,49,9,203,0)
+</Code>
+"DATA",178.101,49,9,204,0)
+</Description>
+"DATA",178.101,49,9,205,0)
+<Source>
+"DATA",178.101,49,9,206,0)
+<Actor>
+"DATA",178.101,49,9,207,0)
+<ActorID>@@ALERTSOURCEID@@</ActorID>
+"DATA",178.101,49,9,208,0)
+</Actor>
+"DATA",178.101,49,9,209,0)
+</Source>
+"DATA",178.101,49,9,210,0)
+<Agent>
+"DATA",178.101,49,9,211,0)
+<Products>
+"DATA",178.101,49,9,212,0)
+<Product>
+"DATA",178.101,49,9,213,0)
+<CCRDataObjectID>@@ALERTAGENTPRODUCTOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,214,0)
+<Source>
+"DATA",178.101,49,9,215,0)
+<Actor>
+"DATA",178.101,49,9,216,0)
+<ActorID>@@ALERTSOURCEID@@</ActorID>
+"DATA",178.101,49,9,217,0)
+</Actor>
+"DATA",178.101,49,9,218,0)
+</Source>
+"DATA",178.101,49,9,219,0)
+<Product>
+"DATA",178.101,49,9,220,0)
+<ProductName>
+"DATA",178.101,49,9,221,0)
+<Text>@@ALERTAGENTPRODUCTNAMETEXT@@</Text>
+"DATA",178.101,49,9,222,0)
+<Code>
+"DATA",178.101,49,9,223,0)
+<Value>@@ALERTAGENTPRODUCTCODEVALUE@@</Value>
+"DATA",178.101,49,9,224,0)
+<CodingSystem>@@ALERTAGENTPRODUCTCODESYSTEM@@</CodingSystem>
+"DATA",178.101,49,9,225,0)
+</Code>
+"DATA",178.101,49,9,226,0)
+</ProductName>
+"DATA",178.101,49,9,227,0)
+</Product>
+"DATA",178.101,49,9,228,0)
+</Product>
+"DATA",178.101,49,9,229,0)
+</Products>
+"DATA",178.101,49,9,230,0)
+</Agent>
+"DATA",178.101,49,9,231,0)
+<Reaction>
+"DATA",178.101,49,9,232,0)
+<Description>
+"DATA",178.101,49,9,233,0)
+<Text>@@ALERTREACTIOINDESCRIPTIONTEXT@@</Text>
+"DATA",178.101,49,9,234,0)
+<Code>
+"DATA",178.101,49,9,235,0)
+<Value>@@ALERTREACTIONCODEVALUE@@</Value>
+"DATA",178.101,49,9,236,0)
+<CodingSystem>@@ALERTREACTIONCODESYSTEM@@</CodingSystem>
+"DATA",178.101,49,9,237,0)
+</Code>
+"DATA",178.101,49,9,238,0)
+</Description>
+"DATA",178.101,49,9,239,0)
+</Reaction>
+"DATA",178.101,49,9,240,0)
+</Alert>
+"DATA",178.101,49,9,241,0)
+</Alerts>
+"DATA",178.101,49,9,242,0)
+<Medications>
+"DATA",178.101,49,9,243,0)
+<Medication>
+"DATA",178.101,49,9,244,0)
+<CCRDataObjectID>@@MEDOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,245,0)
+<DateTime>
+"DATA",178.101,49,9,246,0)
+<Type>
+"DATA",178.101,49,9,247,0)
+<Text>@@MEDISSUEDATETXT@@</Text>
+"DATA",178.101,49,9,248,0)
+</Type>
+"DATA",178.101,49,9,249,0)
+<ExactDateTime>@@MEDISSUEDATE@@</ExactDateTime>
+"DATA",178.101,49,9,250,0)
+</DateTime>
+"DATA",178.101,49,9,251,0)
+<DateTime>
+"DATA",178.101,49,9,252,0)
+<Type>
+"DATA",178.101,49,9,253,0)
+<Text>@@MEDLASTFILLDATETXT@@</Text>
+"DATA",178.101,49,9,254,0)
+</Type>
+"DATA",178.101,49,9,255,0)
+<ExactDateTime>@@MEDLASTFILLDATE@@</ExactDateTime>
+"DATA",178.101,49,9,256,0)
+</DateTime>
+"DATA",178.101,49,9,257,0)
+<IDs>
+"DATA",178.101,49,9,258,0)
+<Type>
+"DATA",178.101,49,9,259,0)
+<Text>@@MEDRXNOTXT@@</Text>
+"DATA",178.101,49,9,260,0)
+</Type>
+"DATA",178.101,49,9,261,0)
+<ID>@@MEDRXNO@@</ID>
+"DATA",178.101,49,9,262,0)
+</IDs>
+"DATA",178.101,49,9,263,0)
+<Type>
+"DATA",178.101,49,9,264,0)
+<Text>@@MEDTYPETEXT@@</Text>
+"DATA",178.101,49,9,265,0)
+</Type>
+"DATA",178.101,49,9,266,0)
+<Description>
+"DATA",178.101,49,9,267,0)
+<Text>@@MEDDETAILUNADORNED@@</Text>
+"DATA",178.101,49,9,268,0)
+</Description>
+"DATA",178.101,49,9,269,0)
+<Status>
+"DATA",178.101,49,9,270,0)
+<Text>@@MEDSTATUSTEXT@@</Text>
+"DATA",178.101,49,9,271,0)
+</Status>
+"DATA",178.101,49,9,272,0)
+<Source>
+"DATA",178.101,49,9,273,0)
+<Actor>
+"DATA",178.101,49,9,274,0)
+<ActorID>@@MEDSOURCEACTORID@@</ActorID>
+"DATA",178.101,49,9,275,0)
+</Actor>
+"DATA",178.101,49,9,276,0)
+</Source>
+"DATA",178.101,49,9,277,0)
+<Product>
+"DATA",178.101,49,9,278,0)
+<ProductName>
+"DATA",178.101,49,9,279,0)
+<Text>@@MEDPRODUCTNAMETEXT@@</Text>
+"DATA",178.101,49,9,280,0)
+<Code>
+"DATA",178.101,49,9,281,0)
+<Value>@@MEDPRODUCTNAMECODEVALUE@@</Value>
+"DATA",178.101,49,9,282,0)
+<CodingSystem>@@MEDPRODUCTNAMECODINGINGSYSTEM@@</CodingSystem>
+"DATA",178.101,49,9,283,0)
+<Version>@@MEDPRODUCTNAMECODEVERSION@@</Version>
+"DATA",178.101,49,9,284,0)
+</Code>
+"DATA",178.101,49,9,285,0)
+</ProductName>
+"DATA",178.101,49,9,286,0)
+<BrandName>
+"DATA",178.101,49,9,287,0)
+<Text>@@MEDBRANDNAMETEXT@@</Text>
+"DATA",178.101,49,9,288,0)
+</BrandName>
+"DATA",178.101,49,9,289,0)
+<Strength>
+"DATA",178.101,49,9,290,0)
+<Value>@@MEDSTRENGTHVALUE@@</Value>
+"DATA",178.101,49,9,291,0)
+<Units>
+"DATA",178.101,49,9,292,0)
+<Unit>@@MEDSTRENGTHUNIT@@</Unit>
+"DATA",178.101,49,9,293,0)
+</Units>
+"DATA",178.101,49,9,294,0)
+</Strength>
+"DATA",178.101,49,9,295,0)
+<Form>
+"DATA",178.101,49,9,296,0)
+<Text>@@MEDFORMTEXT@@</Text>
+"DATA",178.101,49,9,297,0)
+</Form>
+"DATA",178.101,49,9,298,0)
+<Concentration>
+"DATA",178.101,49,9,299,0)
+<Value>@@MEDCONCVALUE@@</Value>
+"DATA",178.101,49,9,300,0)
+<Units>
+"DATA",178.101,49,9,301,0)
+<Unit>@@MEDCONCUNIT@@</Unit>
+"DATA",178.101,49,9,302,0)
+</Units>
+"DATA",178.101,49,9,303,0)
+</Concentration>
+"DATA",178.101,49,9,304,0)
+</Product>
+"DATA",178.101,49,9,305,0)
+<Quantity>
+"DATA",178.101,49,9,306,0)
+<Value>@@MEDQUANTITYVALUE@@</Value>
+"DATA",178.101,49,9,307,0)
+<Units>
+"DATA",178.101,49,9,308,0)
+<Unit>@@MEDQUANTITYUNIT@@</Unit>
+"DATA",178.101,49,9,309,0)
+</Units>
+"DATA",178.101,49,9,310,0)
+</Quantity>
+"DATA",178.101,49,9,311,0)
+<Directions>
+"DATA",178.101,49,9,312,0)
+<Direction>
+"DATA",178.101,49,9,313,0)
+<Description>
+"DATA",178.101,49,9,314,0)
+<Text>@@MEDDIRECTIONDESCRIPTIONTEXT@@</Text>
+"DATA",178.101,49,9,315,0)
+</Description>
+"DATA",178.101,49,9,316,0)
+<DoseIndicator>
+"DATA",178.101,49,9,317,0)
+<Text>@@MEDDOSEINDICATOR@@</Text>
+"DATA",178.101,49,9,318,0)
+</DoseIndicator>
+"DATA",178.101,49,9,319,0)
+<DeliveryMethod>
+"DATA",178.101,49,9,320,0)
+<Text>@@MEDDELIVERYMETHOD@@</Text>
+"DATA",178.101,49,9,321,0)
+</DeliveryMethod>
+"DATA",178.101,49,9,322,0)
+<Dose>
+"DATA",178.101,49,9,323,0)
+<Value>@@MEDDOSEVALUE@@</Value>
+"DATA",178.101,49,9,324,0)
+<Units>
+"DATA",178.101,49,9,325,0)
+<Unit>@@MEDDOSEUNIT@@</Unit>
+"DATA",178.101,49,9,326,0)
+</Units>
+"DATA",178.101,49,9,327,0)
+<Rate>
+"DATA",178.101,49,9,328,0)
+<Value>@@MEDRATEVALUE@@</Value>
+"DATA",178.101,49,9,329,0)
+<Units>
+"DATA",178.101,49,9,330,0)
+<Unit>@@MEDRATEUNIT@@</Unit>
+"DATA",178.101,49,9,331,0)
+</Units>
+"DATA",178.101,49,9,332,0)
+</Rate>
+"DATA",178.101,49,9,333,0)
+</Dose>
+"DATA",178.101,49,9,334,0)
+<Vehicle>
+"DATA",178.101,49,9,335,0)
+<Text>@@MEDVEHICLETEXT@@</Text>
+"DATA",178.101,49,9,336,0)
+</Vehicle>
+"DATA",178.101,49,9,337,0)
+<Route>
+"DATA",178.101,49,9,338,0)
+<Text>@@MEDDIRECTIONROUTETEXT@@</Text>
+"DATA",178.101,49,9,339,0)
+</Route>
+"DATA",178.101,49,9,340,0)
+<Frequency>
+"DATA",178.101,49,9,341,0)
+<Value>@@MEDFREQUENCYVALUE@@</Value>
+"DATA",178.101,49,9,342,0)
+</Frequency>
+"DATA",178.101,49,9,343,0)
+<Interval>
+"DATA",178.101,49,9,344,0)
+<Value>@@MEDINTERVALVALUE@@</Value>
+"DATA",178.101,49,9,345,0)
+<Units>
+"DATA",178.101,49,9,346,0)
+<Unit>@@MEDINTERVALUNIT@@</Unit>
+"DATA",178.101,49,9,347,0)
+</Units>
+"DATA",178.101,49,9,348,0)
+</Interval>
+"DATA",178.101,49,9,349,0)
+<Duration>
+"DATA",178.101,49,9,350,0)
+<Value>@@MEDDURATIONVALUE@@</Value>
+"DATA",178.101,49,9,351,0)
+<Units>
+"DATA",178.101,49,9,352,0)
+<Unit>@@MEDDURATIONUNIT@@</Unit>
+"DATA",178.101,49,9,353,0)
+</Units>
+"DATA",178.101,49,9,354,0)
+</Duration>
+"DATA",178.101,49,9,355,0)
+<Indication>
+"DATA",178.101,49,9,356,0)
+<PRNFlag>
+"DATA",178.101,49,9,357,0)
+<Text>@@MEDPRNFLAG@@</Text>
+"DATA",178.101,49,9,358,0)
+</PRNFlag>
+"DATA",178.101,49,9,359,0)
+<Problem>
+"DATA",178.101,49,9,360,0)
+<CCRDataObjectID>@@MEDPROBLEMOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,361,0)
+<Type>
+"DATA",178.101,49,9,362,0)
+<Text>@@MEDPROBLEMTYPETXT@@</Text>
+"DATA",178.101,49,9,363,0)
+</Type>
+"DATA",178.101,49,9,364,0)
+<Description>
+"DATA",178.101,49,9,365,0)
+<Text>@@MEDPROBLEMDESCRIPTION@@</Text>
+"DATA",178.101,49,9,366,0)
+<Code>
+"DATA",178.101,49,9,367,0)
+<Value>@@MEDPROBLEMCODEVALUE@@</Value>
+"DATA",178.101,49,9,368,0)
+<CodingSystem>@@MEDPROBLEMCODINGSYSTEM@@</CodingSystem>
+"DATA",178.101,49,9,369,0)
+<Version>@@MEDPROBLEMCODINGVERSION@@</Version>
+"DATA",178.101,49,9,370,0)
+</Code>
+"DATA",178.101,49,9,371,0)
+</Description>
+"DATA",178.101,49,9,372,0)
+<Source>
+"DATA",178.101,49,9,373,0)
+<Actor>
+"DATA",178.101,49,9,374,0)
+<ActorID>@@MEDPROBLEMSOURCEACTORID@@</ActorID>
+"DATA",178.101,49,9,375,0)
+</Actor>
+"DATA",178.101,49,9,376,0)
+</Source>
+"DATA",178.101,49,9,377,0)
+</Problem>
+"DATA",178.101,49,9,378,0)
+</Indication>
+"DATA",178.101,49,9,379,0)
+<StopIndicator>
+"DATA",178.101,49,9,380,0)
+<Text>@@MEDSTOPINDICATOR@@</Text>
+"DATA",178.101,49,9,381,0)
+</StopIndicator>
+"DATA",178.101,49,9,382,0)
+<DirectionSequenceModifier>@@MEDDIRSEQ@@</DirectionSequenceModifier>
+"DATA",178.101,49,9,383,0)
+<MultipleDirectionModifier>
+"DATA",178.101,49,9,384,0)
+<Text>@@MEDMULDIRMOD@@</Text>
+"DATA",178.101,49,9,385,0)
+</MultipleDirectionModifier>
+"DATA",178.101,49,9,386,0)
+</Direction>
+"DATA",178.101,49,9,387,0)
+</Directions>
+"DATA",178.101,49,9,388,0)
+<PatientInstructions>
+"DATA",178.101,49,9,389,0)
+<Instruction>@@MEDPTINSTRUCTIONS@@</Instruction>
+"DATA",178.101,49,9,390,0)
+</PatientInstructions>
+"DATA",178.101,49,9,391,0)
+<FullfillmentInstructions>
+"DATA",178.101,49,9,392,0)
+<Text>@@MEDFULLFILLMENTINSTRUCTIONS@@</Text>
+"DATA",178.101,49,9,393,0)
+</FullfillmentInstructions>
+"DATA",178.101,49,9,394,0)
+<Refills>
+"DATA",178.101,49,9,395,0)
+<Refill>
+"DATA",178.101,49,9,396,0)
+<Number>@@MEDRFNO@@</Number>
+"DATA",178.101,49,9,397,0)
+</Refill>
+"DATA",178.101,49,9,398,0)
+</Refills>
+"DATA",178.101,49,9,399,0)
+</Medication>
+"DATA",178.101,49,9,400,0)
+</Medications>
+"DATA",178.101,49,9,401,0)
+<VitalSigns>
+"DATA",178.101,49,9,402,0)
+<Result>
+"DATA",178.101,49,9,403,0)
+<CCRDataObjectID>@@VITALSIGNSDATAOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,404,0)
+<DateTime>
+"DATA",178.101,49,9,405,0)
+<Type>
+"DATA",178.101,49,9,406,0)
+<Text>@@VITALSIGNSDATETIMETYPETEXT@@</Text>
+"DATA",178.101,49,9,407,0)
+</Type>
+"DATA",178.101,49,9,408,0)
+<ExactDateTime>@@VITALSIGNSEXACTDATETIME@@</ExactDateTime>
+"DATA",178.101,49,9,409,0)
+</DateTime>
+"DATA",178.101,49,9,410,0)
+<Description>
+"DATA",178.101,49,9,411,0)
+<Text>@@VITALSIGNSDESCRIPTIONTEXT@@</Text>
+"DATA",178.101,49,9,412,0)
+</Description>
+"DATA",178.101,49,9,413,0)
+<Source>
+"DATA",178.101,49,9,414,0)
+<Actor>
+"DATA",178.101,49,9,415,0)
+<ActorID>@@VITALSIGNSSOURCEACTORID@@</ActorID>
+"DATA",178.101,49,9,416,0)
+</Actor>
+"DATA",178.101,49,9,417,0)
+</Source>
+"DATA",178.101,49,9,418,0)
+<Test>
+"DATA",178.101,49,9,419,0)
+<CCRDataObjectID>@@VITALSIGNSTESTOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,420,0)
+<Type>
+"DATA",178.101,49,9,421,0)
+<Text>@@VITALSIGNSTESTTYPETEXT@@</Text>
+"DATA",178.101,49,9,422,0)
+</Type>
+"DATA",178.101,49,9,423,0)
+<Description>
+"DATA",178.101,49,9,424,0)
+<Text>@@VITALSIGNSDESCRIPTIONTEXT@@</Text>
+"DATA",178.101,49,9,425,0)
+<Code>
+"DATA",178.101,49,9,426,0)
+<Value>@@VITALSIGNSDESCCODEVALUE@@</Value>
+"DATA",178.101,49,9,427,0)
+<CodingSystem>@@VITALSIGNSDESCCODINGSYSTEM@@</CodingSystem>
+"DATA",178.101,49,9,428,0)
+<Version>@@VITALSIGNSCODEVERSION@@</Version>
+"DATA",178.101,49,9,429,0)
+</Code>
+"DATA",178.101,49,9,430,0)
+</Description>
+"DATA",178.101,49,9,431,0)
+<Source>
+"DATA",178.101,49,9,432,0)
+<Actor>
+"DATA",178.101,49,9,433,0)
+<ActorID>@@VITALSIGNSTESTSOURCEACTORID@@</ActorID>
+"DATA",178.101,49,9,434,0)
+</Actor>
+"DATA",178.101,49,9,435,0)
+</Source>
+"DATA",178.101,49,9,436,0)
+<TestResult>
+"DATA",178.101,49,9,437,0)
+<Value>@@VITALSIGNSTESTRESULTVALUE@@</Value>
+"DATA",178.101,49,9,438,0)
+<Units>
+"DATA",178.101,49,9,439,0)
+<Unit>@@VITALSIGNSTESTRESULTUNIT@@</Unit>
+"DATA",178.101,49,9,440,0)
+</Units>
+"DATA",178.101,49,9,441,0)
+</TestResult>
+"DATA",178.101,49,9,442,0)
+</Test>
+"DATA",178.101,49,9,443,0)
+</Result>
+"DATA",178.101,49,9,444,0)
+</VitalSigns>
+"DATA",178.101,49,9,445,0)
+<Results>
+"DATA",178.101,49,9,446,0)
+<Result>
+"DATA",178.101,49,9,447,0)
+<CCRDataObjectID>@@RESULTOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,448,0)
+<DateTime>
+"DATA",178.101,49,9,449,0)
+<Type>
+"DATA",178.101,49,9,450,0)
+<Text>Assessment Time</Text>
+"DATA",178.101,49,9,451,0)
+</Type>
+"DATA",178.101,49,9,452,0)
+<ExactDateTime>@@RESULTASSESSMENTDATETIME@@</ExactDateTime>
+"DATA",178.101,49,9,453,0)
+</DateTime>
+"DATA",178.101,49,9,454,0)
+<Description>
+"DATA",178.101,49,9,455,0)
+<Text>@@RESULTDESCRIPTIONTEXT@@</Text>
+"DATA",178.101,49,9,456,0)
+<Code>
+"DATA",178.101,49,9,457,0)
+<Value>@@RESULTCODE@@</Value>
+"DATA",178.101,49,9,458,0)
+<CodingSystem>@@RESULTCODINGSYSTEM@@</CodingSystem>
+"DATA",178.101,49,9,459,0)
+</Code>
+"DATA",178.101,49,9,460,0)
+</Description>
+"DATA",178.101,49,9,461,0)
+<Status>
+"DATA",178.101,49,9,462,0)
+<Text>@@RESULTSTATUS@@</Text>
+"DATA",178.101,49,9,463,0)
+</Status>
+"DATA",178.101,49,9,464,0)
+<Source>
+"DATA",178.101,49,9,465,0)
+<Actor>
+"DATA",178.101,49,9,466,0)
+<ActorID>@@RESULTSOURCEACTORID@@</ActorID>
+"DATA",178.101,49,9,467,0)
+</Actor>
+"DATA",178.101,49,9,468,0)
+</Source>
+"DATA",178.101,49,9,469,0)
+<Test>
+"DATA",178.101,49,9,470,0)
+<CCRDataObjectID>@@RESULTTESTOBJECTID@@</CCRDataObjectID>
+"DATA",178.101,49,9,471,0)
+<DateTime>
+"DATA",178.101,49,9,472,0)
+<Type>
+"DATA",178.101,49,9,473,0)
+<Text>Assessment Time</Text>
+"DATA",178.101,49,9,474,0)
+</Type>
+"DATA",178.101,49,9,475,0)
+<ExactDateTime>@@RESULTTESTDATETIME@@</ExactDateTime>
+"DATA",178.101,49,9,476,0)
+</DateTime>
+"DATA",178.101,49,9,477,0)
+<Description>
+"DATA",178.101,49,9,478,0)
+<Text>@@RESULTTESTDESCRIPTIONTEXT@@</Text>
+"DATA",178.101,49,9,479,0)
+<Code>
+"DATA",178.101,49,9,480,0)
+<Value>@@RESULTTESTCODEVALUE@@</Value>
+"DATA",178.101,49,9,481,0)
+<CodingSystem>@@RESULTTESTCODINGSYSTEM@@</CodingSystem>
+"DATA",178.101,49,9,482,0)
+</Code>
+"DATA",178.101,49,9,483,0)
+</Description>
+"DATA",178.101,49,9,484,0)
+<Status>
+"DATA",178.101,49,9,485,0)
+<Text>@@RESULTTESTSTATUSTEXT@@</Text>
+"DATA",178.101,49,9,486,0)
+</Status>
+"DATA",178.101,49,9,487,0)
+<Source>
+"DATA",178.101,49,9,488,0)
+<Actor>
+"DATA",178.101,49,9,489,0)
+<ActorID>@@RESULTTESTSOURCEACTORID@@</ActorID>
+"DATA",178.101,49,9,490,0)
+</Actor>
+"DATA",178.101,49,9,491,0)
+</Source>
+"DATA",178.101,49,9,492,0)
+<TestResult>
+"DATA",178.101,49,9,493,0)
+<Value>@@RESULTTESTVALUE@@</Value>
+"DATA",178.101,49,9,494,0)
+<Units>
+"DATA",178.101,49,9,495,0)
+<Unit>@@RESULTTESTUNITS@@</Unit>
+"DATA",178.101,49,9,496,0)
+</Units>
+"DATA",178.101,49,9,497,0)
+</TestResult>
+"DATA",178.101,49,9,498,0)
+<NormalResult>
+"DATA",178.101,49,9,499,0)
+<Normal>
+"DATA",178.101,49,9,500,0)
+<Description>
+"DATA",178.101,49,9,501,0)
+<Text>@@RESULTTESTNORMALDESCTEXT@@</Text>
+"DATA",178.101,49,9,502,0)
+</Description>
+"DATA",178.101,49,9,503,0)
+<Source>
+"DATA",178.101,49,9,504,0)
+<Actor>
+"DATA",178.101,49,9,505,0)
+<ActorID>@@RESULTTESTNORMALSOURCEACTORID@@</ActorID>
+"DATA",178.101,49,9,506,0)
+</Actor>
+"DATA",178.101,49,9,507,0)
+</Source>
+"DATA",178.101,49,9,508,0)
+</Normal>
+"DATA",178.101,49,9,509,0)
+</NormalResult>
+"DATA",178.101,49,9,510,0)
+<Flag>
+"DATA",178.101,49,9,511,0)
+<Text>@@RESULTTESTFLAG@@</Text>
+"DATA",178.101,49,9,512,0)
+</Flag>
+"DATA",178.101,49,9,513,0)
+</Test>
+"DATA",178.101,49,9,514,0)
+</Result>
+"DATA",178.101,49,9,515,0)
+</Results>
+"DATA",178.101,49,9,516,0)
+<HealthCareProviders>
+"DATA",178.101,49,9,517,0)
+<Provider>
+"DATA",178.101,49,9,518,0)
+<ActorID>AA0005</ActorID>
+"DATA",178.101,49,9,519,0)
+<ActorRole>
+"DATA",178.101,49,9,520,0)
+<Text>Primary Provider</Text>
+"DATA",178.101,49,9,521,0)
+</ActorRole>
+"DATA",178.101,49,9,522,0)
+</Provider>
+"DATA",178.101,49,9,523,0)
+</HealthCareProviders>
+"DATA",178.101,49,9,524,0)
+</Body>
+"DATA",178.101,49,9,525,0)
+<Actors>
+"DATA",178.101,49,9,526,0)
+<ACTOR-PATIENT>
+"DATA",178.101,49,9,527,0)
+<Actor>
+"DATA",178.101,49,9,528,0)
+<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
+"DATA",178.101,49,9,529,0)
+<Person>
+"DATA",178.101,49,9,530,0)
+<Name>
+"DATA",178.101,49,9,531,0)
+<CurrentName>
+"DATA",178.101,49,9,532,0)
+<Given>@@ACTORGIVENNAME@@</Given>
+"DATA",178.101,49,9,533,0)
+<Middle>@@ACTORMIDDLENAME@@</Middle>
+"DATA",178.101,49,9,534,0)
+<Family>@@ACTORFAMILYNAME@@</Family>
+"DATA",178.101,49,9,535,0)
+</CurrentName>
+"DATA",178.101,49,9,536,0)
+</Name>
+"DATA",178.101,49,9,537,0)
+<DateOfBirth>
+"DATA",178.101,49,9,538,0)
+<ExactDateTime>@@ACTORDATEOFBIRTH@@</ExactDateTime>
+"DATA",178.101,49,9,539,0)
+</DateOfBirth>
+"DATA",178.101,49,9,540,0)
+<Gender>
+"DATA",178.101,49,9,541,0)
+<Text>@@ACTORGENDER@@</Text>
+"DATA",178.101,49,9,542,0)
+<Code>
+"DATA",178.101,49,9,543,0)
+<Value>@@ACTORGENDER@@</Value>
+"DATA",178.101,49,9,544,0)
+<CodingSystem>2.16.840.1.113883.5.1</CodingSystem>
+"DATA",178.101,49,9,545,0)
+</Code>
+"DATA",178.101,49,9,546,0)
+</Gender>
+"DATA",178.101,49,9,547,0)
+</Person>
+"DATA",178.101,49,9,548,0)
+<IDs>
+"DATA",178.101,49,9,549,0)
+<Type>
+"DATA",178.101,49,9,550,0)
+<Text>@@ACTORSSNTEXT@@</Text>
+"DATA",178.101,49,9,551,0)
+</Type>
+"DATA",178.101,49,9,552,0)
+<ID>@@ACTORSSN@@</ID>
+"DATA",178.101,49,9,553,0)
+<Source>
+"DATA",178.101,49,9,554,0)
+<Actor>
+"DATA",178.101,49,9,555,0)
+<ActorID>@@ACTORSSNSOURCEID@@</ActorID>
+"DATA",178.101,49,9,556,0)
+</Actor>
+"DATA",178.101,49,9,557,0)
+</Source>
+"DATA",178.101,49,9,558,0)
+</IDs>
+"DATA",178.101,49,9,559,0)
+<Address>
+"DATA",178.101,49,9,560,0)
+<Type>
+"DATA",178.101,49,9,561,0)
+<Text>@@ACTORADDRESSTYPE@@</Text>
+"DATA",178.101,49,9,562,0)
+</Type>
+"DATA",178.101,49,9,563,0)
+<Line1>@@ACTORADDRESSLINE1@@</Line1>
+"DATA",178.101,49,9,564,0)
+<Line2>@@ACTORADDRESSLINE2@@</Line2>
+"DATA",178.101,49,9,565,0)
+<City>@@ACTORADDRESSCITY@@</City>
+"DATA",178.101,49,9,566,0)
+<State>@@ACTORADDRESSSTATE@@</State>
+"DATA",178.101,49,9,567,0)
+<PostalCode>@@ACTORADDRESSZIPCODE@@</PostalCode>
+"DATA",178.101,49,9,568,0)
+</Address>
+"DATA",178.101,49,9,569,0)
+<Telephone>
+"DATA",178.101,49,9,570,0)
+<Value>@@ACTORRESTEL@@</Value>
+"DATA",178.101,49,9,571,0)
+<Type>
+"DATA",178.101,49,9,572,0)
+<Text>@@ACTORRESTELTEXT@@</Text>
+"DATA",178.101,49,9,573,0)
+</Type>
+"DATA",178.101,49,9,574,0)
+</Telephone>
+"DATA",178.101,49,9,575,0)
+<Telephone>
+"DATA",178.101,49,9,576,0)
+<Value>@@ACTORWORKTEL@@</Value>
+"DATA",178.101,49,9,577,0)
+<Type>
+"DATA",178.101,49,9,578,0)
+<Text>@@ACTORWORKTELTEXT@@</Text>
+"DATA",178.101,49,9,579,0)
+</Type>
+"DATA",178.101,49,9,580,0)
+</Telephone>
+"DATA",178.101,49,9,581,0)
+<Telephone>
+"DATA",178.101,49,9,582,0)
+<Value>@@ACTORCELLTEL@@</Value>
+"DATA",178.101,49,9,583,0)
+<Type>
+"DATA",178.101,49,9,584,0)
+<Text>@@ACTORCELLTELTEXT@@</Text>
+"DATA",178.101,49,9,585,0)
+</Type>
+"DATA",178.101,49,9,586,0)
+</Telephone>
+"DATA",178.101,49,9,587,0)
+<EMail>
+"DATA",178.101,49,9,588,0)
+<Value>@@ACTOREMAIL@@</Value>
+"DATA",178.101,49,9,589,0)
+</EMail>
+"DATA",178.101,49,9,590,0)
+<Source>
+"DATA",178.101,49,9,591,0)
+<Actor>
+"DATA",178.101,49,9,592,0)
+<ActorID>@@ACTORADDRESSSOURCEID@@</ActorID>
+"DATA",178.101,49,9,593,0)
+</Actor>
+"DATA",178.101,49,9,594,0)
+</Source>
+"DATA",178.101,49,9,595,0)
+</Actor>
+"DATA",178.101,49,9,596,0)
+</ACTOR-PATIENT>
+"DATA",178.101,49,9,597,0)
+<ACTOR-SYSTEM>
+"DATA",178.101,49,9,598,0)
+<Actor>
+"DATA",178.101,49,9,599,0)
+<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
+"DATA",178.101,49,9,600,0)
+<InformationSystem>
+"DATA",178.101,49,9,601,0)
+<Name>@@ACTORINFOSYSNAME@@</Name>
+"DATA",178.101,49,9,602,0)
+<Version>@@ACTORINFOSYSVER@@</Version>
+"DATA",178.101,49,9,603,0)
+</InformationSystem>
+"DATA",178.101,49,9,604,0)
+<Source>
+"DATA",178.101,49,9,605,0)
+<Actor>
+"DATA",178.101,49,9,606,0)
+<ActorID>@@ACTORINFOSYSSOURCEID@@</ActorID>
+"DATA",178.101,49,9,607,0)
+</Actor>
+"DATA",178.101,49,9,608,0)
+</Source>
+"DATA",178.101,49,9,609,0)
+</Actor>
+"DATA",178.101,49,9,610,0)
+</ACTOR-SYSTEM>
+"DATA",178.101,49,9,611,0)
+<ACTOR-NOK>
+"DATA",178.101,49,9,612,0)
+<Actor>
+"DATA",178.101,49,9,613,0)
+<ActorObjectID>AA0003</ActorObjectID>
+"DATA",178.101,49,9,614,0)
+<Person>
+"DATA",178.101,49,9,615,0)
+<Name>
+"DATA",178.101,49,9,616,0)
+<DisplayName>@@ACTORDISPLAYNAME@@</DisplayName>
+"DATA",178.101,49,9,617,0)
+</Name>
+"DATA",178.101,49,9,618,0)
+</Person>
+"DATA",178.101,49,9,619,0)
+<Relation>
+"DATA",178.101,49,9,620,0)
+<Text>@@ACTORRELATION@@</Text>
+"DATA",178.101,49,9,621,0)
+</Relation>
+"DATA",178.101,49,9,622,0)
+<Source>
+"DATA",178.101,49,9,623,0)
+<Actor>
+"DATA",178.101,49,9,624,0)
+<ActorID>@@ACTORRELATIONSOURCEID@@</ActorID>
+"DATA",178.101,49,9,625,0)
+</Actor>
+"DATA",178.101,49,9,626,0)
+</Source>
+"DATA",178.101,49,9,627,0)
+</Actor>
+"DATA",178.101,49,9,628,0)
+</ACTOR-NOK>
+"DATA",178.101,49,9,629,0)
+<ACTOR-PROVIDER>
+"DATA",178.101,49,9,630,0)
+<Actor>
+"DATA",178.101,49,9,631,0)
+<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
+"DATA",178.101,49,9,632,0)
+<Person>
+"DATA",178.101,49,9,633,0)
+<Name>
+"DATA",178.101,49,9,634,0)
+<CurrentName>
+"DATA",178.101,49,9,635,0)
+<Given>@@ACTORGIVENNAME@@</Given>
+"DATA",178.101,49,9,636,0)
+<Middle>@@ACTORMIDDLENAME@@</Middle>
+"DATA",178.101,49,9,637,0)
+<Family>@@ACTORFAMILYNAME@@</Family>
+"DATA",178.101,49,9,638,0)
+<Title>@@ACTORTITLE@@</Title>
+"DATA",178.101,49,9,639,0)
+</CurrentName>
+"DATA",178.101,49,9,640,0)
+</Name>
+"DATA",178.101,49,9,641,0)
+</Person>
+"DATA",178.101,49,9,642,0)
+<IDs>
+"DATA",178.101,49,9,643,0)
+<Type>
+"DATA",178.101,49,9,644,0)
+<Text>@@IDTYPE@@</Text>
+"DATA",178.101,49,9,645,0)
+</Type>
+"DATA",178.101,49,9,646,0)
+<ID>@@ID@@</ID>
+"DATA",178.101,49,9,647,0)
+<IssuedBy>
+"DATA",178.101,49,9,648,0)
+<Description>
+"DATA",178.101,49,9,649,0)
+<Text>@@IDDESC@@</Text>
+"DATA",178.101,49,9,650,0)
+</Description>
+"DATA",178.101,49,9,651,0)
+</IssuedBy>
+"DATA",178.101,49,9,652,0)
+</IDs>
+"DATA",178.101,49,9,653,0)
+<Specialty>
+"DATA",178.101,49,9,654,0)
+<Text>@@ACTORSPECIALITY@@</Text>
+"DATA",178.101,49,9,655,0)
+</Specialty>
+"DATA",178.101,49,9,656,0)
+<Address>
+"DATA",178.101,49,9,657,0)
+<Type>
+"DATA",178.101,49,9,658,0)
+<Text>@@ACTORADDRESSTYPE@@</Text>
+"DATA",178.101,49,9,659,0)
+</Type>
+"DATA",178.101,49,9,660,0)
+<Line1>@@ACTORADDRESSLINE1@@</Line1>
+"DATA",178.101,49,9,661,0)
+<City>@@ACTORADDRESSCITY@@</City>
+"DATA",178.101,49,9,662,0)
+<State>@@ACTORADDRESSSTATE@@</State>
+"DATA",178.101,49,9,663,0)
+<PostalCode>@@ACTORPOSTALCODE@@</PostalCode>
+"DATA",178.101,49,9,664,0)
+</Address>
+"DATA",178.101,49,9,665,0)
+<Telephone>
+"DATA",178.101,49,9,666,0)
+<Value>@@ACTORTELEPHONE@@</Value>
+"DATA",178.101,49,9,667,0)
+<Type>
+"DATA",178.101,49,9,668,0)
+<Text>@@ACTORTELEPHONETYPE@@</Text>
+"DATA",178.101,49,9,669,0)
+</Type>
+"DATA",178.101,49,9,670,0)
+</Telephone>
+"DATA",178.101,49,9,671,0)
+<Email>
+"DATA",178.101,49,9,672,0)
+<Value>@@ACTOREMAIL@@</Value>
+"DATA",178.101,49,9,673,0)
+</Email>
+"DATA",178.101,49,9,674,0)
+<Source>
+"DATA",178.101,49,9,675,0)
+<Actor>
+"DATA",178.101,49,9,676,0)
+<ActorID>@@ACTORSOURCEID@@</ActorID>
+"DATA",178.101,49,9,677,0)
+</Actor>
+"DATA",178.101,49,9,678,0)
+</Source>
+"DATA",178.101,49,9,679,0)
+</Actor>
+"DATA",178.101,49,9,680,0)
+</ACTOR-PROVIDER>
+"DATA",178.101,49,9,681,0)
+<ACTOR-ORG>
+"DATA",178.101,49,9,682,0)
+<Actor>
+"DATA",178.101,49,9,683,0)
+<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
+"DATA",178.101,49,9,684,0)
+<Organization>
+"DATA",178.101,49,9,685,0)
+<Name>@@ORGANIZATIONNAME@@</Name>
+"DATA",178.101,49,9,686,0)
+</Organization>
+"DATA",178.101,49,9,687,0)
+<Source>
+"DATA",178.101,49,9,688,0)
+<Actor>
+"DATA",178.101,49,9,689,0)
+<ActorID>@@ACTORSOURCEID@@</ActorID>
+"DATA",178.101,49,9,690,0)
+</Actor>
+"DATA",178.101,49,9,691,0)
+</Source>
+"DATA",178.101,49,9,692,0)
+</Actor>
+"DATA",178.101,49,9,693,0)
+</ACTOR-ORG>
+"DATA",178.101,49,9,694,0)
+</Actors>
+"DATA",178.101,49,9,695,0)
+<Signatures>
+"DATA",178.101,49,9,696,0)
+<CCRSignature>
+"DATA",178.101,49,9,697,0)
+<SignatureObjectID>S0001</SignatureObjectID>
+"DATA",178.101,49,9,698,0)
+<ExactDateTime>2008-03-18T23:10:58Z</ExactDateTime>
+"DATA",178.101,49,9,699,0)
+<Source>
+"DATA",178.101,49,9,700,0)
+<ActorID>AA0001</ActorID>
+"DATA",178.101,49,9,701,0)
+</Source>
+"DATA",178.101,49,9,702,0)
+<Signature>
+"DATA",178.101,49,9,703,0)
+<Signature xmlns="http://www.w3.org/2000/09/xmldsig#">
+"DATA",178.101,49,9,704,0)
+<SignedInfo>
+"DATA",178.101,49,9,705,0)
+<CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/>
+"DATA",178.101,49,9,706,0)
+<SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/>
+"DATA",178.101,49,9,707,0)
+<Reference URI="">
+"DATA",178.101,49,9,708,0)
+<Transforms>
+"DATA",178.101,49,9,709,0)
+<Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"/>
+"DATA",178.101,49,9,710,0)
+</Transforms>
+"DATA",178.101,49,9,711,0)
+<DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"/>
+"DATA",178.101,49,9,712,0)
+<DigestValue>YFveLLyo+75P7rSciv0/m1O6Ot4=</DigestValue>
+"DATA",178.101,49,9,713,0)
+</Reference>
+"DATA",178.101,49,9,714,0)
+</SignedInfo>
+"DATA",178.101,49,9,715,0)
+<SignatureValue>Bj6sACXl74hrlbUYnu8HqnRab5VGy69BOYjOH7dETxgppXMEd7AoVYaePZvgJft78JR4oQY76hbFyGcIslYauPpJxx2hCd5d56xFeaQg01R6AQOvGnhjlq63TbpFdUq0B4tYsmiibJPbQJhTQe+TcWTBvWaQt8Fkk5blO571YvI=</SignatureValue>
+"DATA",178.101,49,9,716,0)
+<KeyInfo>
+"DATA",178.101,49,9,717,0)
+<KeyValue>
+"DATA",178.101,49,9,718,0)
+<RSAKeyValue>
+"DATA",178.101,49,9,719,0)
+<Modulus>meH817QYol+/uUEg6j8Mg89s7GTlaN9B+/CGlzrtnQH+swMigZRnEPxHVO8PhEymP/W9nlhAjTScV/CUzA9yJ9WiaOn17c+KReKhfBqL24DX9BpbJ+kLYVz7mBO5Qydk5AzUT2hFwW93irD8iRKP+/t+2Mi2CjNfj8VTjJpHpm0=</Modulus>
+"DATA",178.101,49,9,720,0)
+<Exponent>AQAB</Exponent>
+"DATA",178.101,49,9,721,0)
+</RSAKeyValue>
+"DATA",178.101,49,9,722,0)
+</KeyValue>
+"DATA",178.101,49,9,723,0)
+</KeyInfo>
+"DATA",178.101,49,9,724,0)
+</Signature>
+"DATA",178.101,49,9,725,0)
+</Signature>
+"DATA",178.101,49,9,726,0)
+</CCRSignature>
+"DATA",178.101,49,9,727,0)
+</Signatures>
+"DATA",178.101,49,9,728,0)
+</ContinuityOfCareRecord>
+"DATA",178.101,50,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,50,5)
+entryRelationship
+"DATA",178.101,50,7,0)
+^178.111P^1^1
+"DATA",178.101,50,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,51,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,51,5)
+component^AdvanceDirectives
+"DATA",178.101,52,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,52,5)
+entry
+"DATA",178.101,52,7,0)
+^178.111P^1^1
+"DATA",178.101,52,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,53,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,53,5)
+observation
+"DATA",178.101,53,7,0)
+^178.111P^1^1
+"DATA",178.101,53,7,1,0)
+7^observation^Verification
+"DATA",178.101,54,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,54,5)
+entryRelationship
+"DATA",178.101,54,7,0)
+^178.111P^1^1
+"DATA",178.101,54,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,55,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,55,5)
+reference
+"DATA",178.101,55,7,0)
+^178.111P^1^1
+"DATA",178.101,55,7,1,0)
+7^reference^ref
+"DATA",178.101,56,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,56,5)
+component^FunctionalStatus
+"DATA",178.101,57,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,57,5)
+entryRelationship
+"DATA",178.101,57,7,0)
+^178.111P^1^1
+"DATA",178.101,57,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,58,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,58,5)
+entryRelationship
+"DATA",178.101,58,7,0)
+^178.111P^1^1
+"DATA",178.101,58,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,59,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,59,5)
+component^FamilyHistory
+"DATA",178.101,60,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,60,5)
+entry
+"DATA",178.101,60,7,0)
+^178.111P^1^1
+"DATA",178.101,60,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,61,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,61,5)
+component
+"DATA",178.101,61,7,0)
+^178.111P^1^1
+"DATA",178.101,61,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,62,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,62,5)
+component
+"DATA",178.101,62,7,0)
+^178.111P^1^1
+"DATA",178.101,62,7,1,0)
+19^component^FamHis
+"DATA",178.101,63,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,63,5)
+component^SocialHistory
+"DATA",178.101,64,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,64,5)
+entry
+"DATA",178.101,64,7,0)
+^178.111P^1^1
+"DATA",178.101,64,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,65,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,65,5)
+entryRelationship
+"DATA",178.101,65,7,0)
+^178.111P^1^1
+"DATA",178.101,65,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,66,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,66,5)
+component^MedicalEquipment
+"DATA",178.101,67,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,67,5)
+component^Immunizations
+"DATA",178.101,68,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,68,5)
+entry^Vital
+"DATA",178.101,68,7,0)
+^178.111P^1^1
+"DATA",178.101,68,7,1,0)
+37^entry^Result
+"DATA",178.101,69,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,69,5)
+encounter
+"DATA",178.101,69,7,0)
+^178.111P^1^1
+"DATA",178.101,69,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,70,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,70,5)
+entry
+"DATA",178.101,70,7,0)
+^178.111P^1^1
+"DATA",178.101,70,7,1,0)
+47^entry^Plan
+"DATA",178.101,71,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,71,5)
+entryRelationship
+"DATA",178.101,71,7,0)
+^178.111P^1^1
+"DATA",178.101,71,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,72,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,72,5)
+component^AdvanceDirectives
+"DATA",178.101,73,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,73,5)
+entry
+"DATA",178.101,73,7,0)
+^178.111P^1^1
+"DATA",178.101,73,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,74,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,74,5)
+observation
+"DATA",178.101,74,7,0)
+^178.111P^1^1
+"DATA",178.101,74,7,1,0)
+7^observation^Verification
+"DATA",178.101,75,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,75,5)
+entryRelationship
+"DATA",178.101,75,7,0)
+^178.111P^1^1
+"DATA",178.101,75,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,76,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,76,5)
+reference
+"DATA",178.101,76,7,0)
+^178.111P^1^1
+"DATA",178.101,76,7,1,0)
+7^reference^ref
+"DATA",178.101,77,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,77,5)
+component^FunctionalStatus
+"DATA",178.101,78,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,78,5)
+entryRelationship
+"DATA",178.101,78,7,0)
+^178.111P^1^1
+"DATA",178.101,78,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,79,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,79,5)
+entryRelationship
+"DATA",178.101,79,7,0)
+^178.111P^1^1
+"DATA",178.101,79,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,80,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,80,5)
+component^FamilyHistory
+"DATA",178.101,81,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,81,5)
+entry
+"DATA",178.101,81,7,0)
+^178.111P^1^1
+"DATA",178.101,81,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,82,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,82,5)
+component
+"DATA",178.101,82,7,0)
+^178.111P^1^1
+"DATA",178.101,82,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,83,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,83,5)
+component
+"DATA",178.101,83,7,0)
+^178.111P^1^1
+"DATA",178.101,83,7,1,0)
+19^component^FamHis
+"DATA",178.101,84,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,84,5)
+component^SocialHistory
+"DATA",178.101,85,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,85,5)
+entry
+"DATA",178.101,85,7,0)
+^178.111P^1^1
+"DATA",178.101,85,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,86,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,86,5)
+entryRelationship
+"DATA",178.101,86,7,0)
+^178.111P^1^1
+"DATA",178.101,86,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,87,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,87,5)
+component^MedicalEquipment
+"DATA",178.101,88,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,88,5)
+component^Immunizations
+"DATA",178.101,89,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,89,5)
+entry^Vital
+"DATA",178.101,89,7,0)
+^178.111P^1^1
+"DATA",178.101,89,7,1,0)
+37^entry^Result
+"DATA",178.101,90,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,90,5)
+encounter
+"DATA",178.101,90,7,0)
+^178.111P^1^1
+"DATA",178.101,90,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,91,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,91,5)
+entry
+"DATA",178.101,91,7,0)
+^178.111P^1^1
+"DATA",178.101,91,7,1,0)
+47^entry^Plan
+"DATA",178.101,92,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,92,5)
+entryRelationship
+"DATA",178.101,92,7,0)
+^178.111P^1^1
+"DATA",178.101,92,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,93,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,93,5)
+component^AdvanceDirectives
+"DATA",178.101,94,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,94,5)
+entry
+"DATA",178.101,94,7,0)
+^178.111P^1^1
+"DATA",178.101,94,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,95,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,95,5)
+observation
+"DATA",178.101,95,7,0)
+^178.111P^1^1
+"DATA",178.101,95,7,1,0)
+7^observation^Verification
+"DATA",178.101,96,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,96,5)
+entryRelationship
+"DATA",178.101,96,7,0)
+^178.111P^1^1
+"DATA",178.101,96,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,97,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,97,5)
+reference
+"DATA",178.101,97,7,0)
+^178.111P^1^1
+"DATA",178.101,97,7,1,0)
+7^reference^ref
+"DATA",178.101,98,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,98,5)
+component^FunctionalStatus
+"DATA",178.101,99,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,99,5)
+entryRelationship
+"DATA",178.101,99,7,0)
+^178.111P^1^1
+"DATA",178.101,99,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,100,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,100,5)
+entryRelationship
+"DATA",178.101,100,7,0)
+^178.111P^1^1
+"DATA",178.101,100,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,101,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,101,5)
+component^FamilyHistory
+"DATA",178.101,102,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,102,5)
+entry
+"DATA",178.101,102,7,0)
+^178.111P^1^1
+"DATA",178.101,102,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,103,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,103,5)
+component
+"DATA",178.101,103,7,0)
+^178.111P^1^1
+"DATA",178.101,103,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,104,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,104,5)
+component
+"DATA",178.101,104,7,0)
+^178.111P^1^1
+"DATA",178.101,104,7,1,0)
+19^component^FamHis
+"DATA",178.101,105,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,105,5)
+component^SocialHistory
+"DATA",178.101,106,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,106,5)
+entry
+"DATA",178.101,106,7,0)
+^178.111P^1^1
+"DATA",178.101,106,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,107,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,107,5)
+entryRelationship
+"DATA",178.101,107,7,0)
+^178.111P^1^1
+"DATA",178.101,107,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,108,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,108,5)
+component^MedicalEquipment
+"DATA",178.101,109,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,109,5)
+component^Immunizations
+"DATA",178.101,110,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,110,5)
+entry^Vital
+"DATA",178.101,110,7,0)
+^178.111P^1^1
+"DATA",178.101,110,7,1,0)
+37^entry^Result
+"DATA",178.101,111,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,111,5)
+encounter
+"DATA",178.101,111,7,0)
+^178.111P^1^1
+"DATA",178.101,111,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,112,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,112,5)
+entry
+"DATA",178.101,112,7,0)
+^178.111P^1^1
+"DATA",178.101,112,7,1,0)
+47^entry^Plan
+"DATA",178.101,113,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,113,5)
+entryRelationship
+"DATA",178.101,113,7,0)
+^178.111P^1^1
+"DATA",178.101,113,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,114,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,114,5)
+component^AdvanceDirectives
+"DATA",178.101,115,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,115,5)
+entry
+"DATA",178.101,115,7,0)
+^178.111P^1^1
+"DATA",178.101,115,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,116,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,116,5)
+observation
+"DATA",178.101,116,7,0)
+^178.111P^1^1
+"DATA",178.101,116,7,1,0)
+7^observation^Verification
+"DATA",178.101,117,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,117,5)
+entryRelationship
+"DATA",178.101,117,7,0)
+^178.111P^1^1
+"DATA",178.101,117,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,118,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,118,5)
+reference
+"DATA",178.101,118,7,0)
+^178.111P^1^1
+"DATA",178.101,118,7,1,0)
+7^reference^ref
+"DATA",178.101,119,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,119,5)
+component^FunctionalStatus
+"DATA",178.101,120,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,120,5)
+entryRelationship
+"DATA",178.101,120,7,0)
+^178.111P^1^1
+"DATA",178.101,120,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,121,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,121,5)
+entryRelationship
+"DATA",178.101,121,7,0)
+^178.111P^1^1
+"DATA",178.101,121,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,122,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,122,5)
+component^FamilyHistory
+"DATA",178.101,123,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,123,5)
+entry
+"DATA",178.101,123,7,0)
+^178.111P^1^1
+"DATA",178.101,123,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,124,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,124,5)
+component
+"DATA",178.101,124,7,0)
+^178.111P^1^1
+"DATA",178.101,124,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,125,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,125,5)
+component
+"DATA",178.101,125,7,0)
+^178.111P^1^1
+"DATA",178.101,125,7,1,0)
+19^component^FamHis
+"DATA",178.101,126,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,126,5)
+component^SocialHistory
+"DATA",178.101,127,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,127,5)
+entry
+"DATA",178.101,127,7,0)
+^178.111P^1^1
+"DATA",178.101,127,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,128,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,128,5)
+entryRelationship
+"DATA",178.101,128,7,0)
+^178.111P^1^1
+"DATA",178.101,128,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,129,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,129,5)
+component^MedicalEquipment
+"DATA",178.101,130,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,130,5)
+component^Immunizations
+"DATA",178.101,131,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,131,5)
+entry^Vital
+"DATA",178.101,131,7,0)
+^178.111P^1^1
+"DATA",178.101,131,7,1,0)
+37^entry^Result
+"DATA",178.101,132,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,132,5)
+encounter
+"DATA",178.101,132,7,0)
+^178.111P^1^1
+"DATA",178.101,132,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,133,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,133,5)
+entry
+"DATA",178.101,133,7,0)
+^178.111P^1^1
+"DATA",178.101,133,7,1,0)
+47^entry^Plan
+"DATA",178.101,134,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,134,5)
+entryRelationship
+"DATA",178.101,134,7,0)
+^178.111P^1^1
+"DATA",178.101,134,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,135,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,135,5)
+component^AdvanceDirectives
+"DATA",178.101,136,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,136,5)
+entry
+"DATA",178.101,136,7,0)
+^178.111P^1^1
+"DATA",178.101,136,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,137,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,137,5)
+observation
+"DATA",178.101,137,7,0)
+^178.111P^1^1
+"DATA",178.101,137,7,1,0)
+7^observation^Verification
+"DATA",178.101,138,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,138,5)
+entryRelationship
+"DATA",178.101,138,7,0)
+^178.111P^1^1
+"DATA",178.101,138,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,139,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,139,5)
+reference
+"DATA",178.101,139,7,0)
+^178.111P^1^1
+"DATA",178.101,139,7,1,0)
+7^reference^ref
+"DATA",178.101,140,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,140,5)
+component^FunctionalStatus
+"DATA",178.101,141,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,141,5)
+entryRelationship
+"DATA",178.101,141,7,0)
+^178.111P^1^1
+"DATA",178.101,141,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,142,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,142,5)
+entryRelationship
+"DATA",178.101,142,7,0)
+^178.111P^1^1
+"DATA",178.101,142,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,143,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,143,5)
+component^FamilyHistory
+"DATA",178.101,144,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,144,5)
+entry
+"DATA",178.101,144,7,0)
+^178.111P^1^1
+"DATA",178.101,144,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,145,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,145,5)
+component
+"DATA",178.101,145,7,0)
+^178.111P^1^1
+"DATA",178.101,145,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,146,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,146,5)
+component
+"DATA",178.101,146,7,0)
+^178.111P^1^1
+"DATA",178.101,146,7,1,0)
+19^component^FamHis
+"DATA",178.101,147,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,147,5)
+component^SocialHistory
+"DATA",178.101,148,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,148,5)
+entry
+"DATA",178.101,148,7,0)
+^178.111P^1^1
+"DATA",178.101,148,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,149,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,149,5)
+entryRelationship
+"DATA",178.101,149,7,0)
+^178.111P^1^1
+"DATA",178.101,149,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,150,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,150,5)
+component^MedicalEquipment
+"DATA",178.101,151,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,151,5)
+component^Immunizations
+"DATA",178.101,152,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,152,5)
+entry^Vital
+"DATA",178.101,152,7,0)
+^178.111P^1^1
+"DATA",178.101,152,7,1,0)
+37^entry^Result
+"DATA",178.101,153,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,153,5)
+encounter
+"DATA",178.101,153,7,0)
+^178.111P^1^1
+"DATA",178.101,153,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,154,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,154,5)
+entry
+"DATA",178.101,154,7,0)
+^178.111P^1^1
+"DATA",178.101,154,7,1,0)
+47^entry^Plan
+"DATA",178.101,155,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,155,5)
+entryRelationship
+"DATA",178.101,155,7,0)
+^178.111P^1^1
+"DATA",178.101,155,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,156,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,156,5)
+component^AdvanceDirectives
+"DATA",178.101,157,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,157,5)
+entry
+"DATA",178.101,157,7,0)
+^178.111P^1^1
+"DATA",178.101,157,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,158,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,158,5)
+observation
+"DATA",178.101,158,7,0)
+^178.111P^1^1
+"DATA",178.101,158,7,1,0)
+7^observation^Verification
+"DATA",178.101,159,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,159,5)
+entryRelationship
+"DATA",178.101,159,7,0)
+^178.111P^1^1
+"DATA",178.101,159,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,160,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,160,5)
+reference
+"DATA",178.101,160,7,0)
+^178.111P^1^1
+"DATA",178.101,160,7,1,0)
+7^reference^ref
+"DATA",178.101,161,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,161,5)
+component^FunctionalStatus
+"DATA",178.101,162,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,162,5)
+entryRelationship
+"DATA",178.101,162,7,0)
+^178.111P^1^1
+"DATA",178.101,162,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,163,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,163,5)
+entryRelationship
+"DATA",178.101,163,7,0)
+^178.111P^1^1
+"DATA",178.101,163,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,164,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,164,5)
+component^FamilyHistory
+"DATA",178.101,165,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,165,5)
+entry
+"DATA",178.101,165,7,0)
+^178.111P^1^1
+"DATA",178.101,165,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,166,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,166,5)
+component
+"DATA",178.101,166,7,0)
+^178.111P^1^1
+"DATA",178.101,166,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,167,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,167,5)
+component
+"DATA",178.101,167,7,0)
+^178.111P^1^1
+"DATA",178.101,167,7,1,0)
+19^component^FamHis
+"DATA",178.101,168,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,168,5)
+component^SocialHistory
+"DATA",178.101,169,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,169,5)
+entry
+"DATA",178.101,169,7,0)
+^178.111P^1^1
+"DATA",178.101,169,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,170,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,170,5)
+entryRelationship
+"DATA",178.101,170,7,0)
+^178.111P^1^1
+"DATA",178.101,170,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,171,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,171,5)
+component^MedicalEquipment
+"DATA",178.101,172,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,172,5)
+component^Immunizations
+"DATA",178.101,173,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,173,5)
+entry^Vital
+"DATA",178.101,173,7,0)
+^178.111P^1^1
+"DATA",178.101,173,7,1,0)
+37^entry^Result
+"DATA",178.101,174,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,174,5)
+encounter
+"DATA",178.101,174,7,0)
+^178.111P^1^1
+"DATA",178.101,174,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,175,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,175,5)
+entry
+"DATA",178.101,175,7,0)
+^178.111P^1^1
+"DATA",178.101,175,7,1,0)
+47^entry^Plan
+"DATA",178.101,176,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,176,5)
+entryRelationship
+"DATA",178.101,176,7,0)
+^178.111P^1^1
+"DATA",178.101,176,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,177,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,177,5)
+component^AdvanceDirectives
+"DATA",178.101,178,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,178,5)
+entry
+"DATA",178.101,178,7,0)
+^178.111P^1^1
+"DATA",178.101,178,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,179,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,179,5)
+observation
+"DATA",178.101,179,7,0)
+^178.111P^1^1
+"DATA",178.101,179,7,1,0)
+7^observation^Verification
+"DATA",178.101,180,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,180,5)
+entryRelationship
+"DATA",178.101,180,7,0)
+^178.111P^1^1
+"DATA",178.101,180,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,181,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,181,5)
+reference
+"DATA",178.101,181,7,0)
+^178.111P^1^1
+"DATA",178.101,181,7,1,0)
+7^reference^ref
+"DATA",178.101,182,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,182,5)
+component^FunctionalStatus
+"DATA",178.101,183,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,183,5)
+entryRelationship
+"DATA",178.101,183,7,0)
+^178.111P^1^1
+"DATA",178.101,183,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,184,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,184,5)
+entryRelationship
+"DATA",178.101,184,7,0)
+^178.111P^1^1
+"DATA",178.101,184,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,185,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,185,5)
+component^FamilyHistory
+"DATA",178.101,186,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,186,5)
+entry
+"DATA",178.101,186,7,0)
+^178.111P^1^1
+"DATA",178.101,186,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,187,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,187,5)
+component
+"DATA",178.101,187,7,0)
+^178.111P^1^1
+"DATA",178.101,187,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,188,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,188,5)
+component
+"DATA",178.101,188,7,0)
+^178.111P^1^1
+"DATA",178.101,188,7,1,0)
+19^component^FamHis
+"DATA",178.101,189,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,189,5)
+component^SocialHistory
+"DATA",178.101,190,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,190,5)
+entry
+"DATA",178.101,190,7,0)
+^178.111P^1^1
+"DATA",178.101,190,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,191,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,191,5)
+entryRelationship
+"DATA",178.101,191,7,0)
+^178.111P^1^1
+"DATA",178.101,191,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,192,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,192,5)
+component^MedicalEquipment
+"DATA",178.101,193,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,193,5)
+component^Immunizations
+"DATA",178.101,194,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,194,5)
+entry^Vital
+"DATA",178.101,194,7,0)
+^178.111P^1^1
+"DATA",178.101,194,7,1,0)
+37^entry^Result
+"DATA",178.101,195,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,195,5)
+encounter
+"DATA",178.101,195,7,0)
+^178.111P^1^1
+"DATA",178.101,195,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,196,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,196,5)
+entry
+"DATA",178.101,196,7,0)
+^178.111P^1^1
+"DATA",178.101,196,7,1,0)
+47^entry^Plan
+"DATA",178.101,197,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,197,5)
+entryRelationship
+"DATA",178.101,197,7,0)
+^178.111P^1^1
+"DATA",178.101,197,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,198,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,198,5)
+component^AdvanceDirectives
+"DATA",178.101,199,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,199,5)
+entry
+"DATA",178.101,199,7,0)
+^178.111P^1^1
+"DATA",178.101,199,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,200,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,200,5)
+observation
+"DATA",178.101,200,7,0)
+^178.111P^1^1
+"DATA",178.101,200,7,1,0)
+7^observation^Verification
+"DATA",178.101,201,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,201,5)
+entryRelationship
+"DATA",178.101,201,7,0)
+^178.111P^1^1
+"DATA",178.101,201,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,202,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,202,5)
+reference
+"DATA",178.101,202,7,0)
+^178.111P^1^1
+"DATA",178.101,202,7,1,0)
+7^reference^ref
+"DATA",178.101,203,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,203,5)
+component^FunctionalStatus
+"DATA",178.101,204,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,204,5)
+entryRelationship
+"DATA",178.101,204,7,0)
+^178.111P^1^1
+"DATA",178.101,204,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,205,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,205,5)
+entryRelationship
+"DATA",178.101,205,7,0)
+^178.111P^1^1
+"DATA",178.101,205,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,206,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,206,5)
+component^FamilyHistory
+"DATA",178.101,207,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,207,5)
+entry
+"DATA",178.101,207,7,0)
+^178.111P^1^1
+"DATA",178.101,207,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,208,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,208,5)
+component
+"DATA",178.101,208,7,0)
+^178.111P^1^1
+"DATA",178.101,208,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,209,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,209,5)
+component
+"DATA",178.101,209,7,0)
+^178.111P^1^1
+"DATA",178.101,209,7,1,0)
+19^component^FamHis
+"DATA",178.101,210,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,210,5)
+component^SocialHistory
+"DATA",178.101,211,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,211,5)
+entry
+"DATA",178.101,211,7,0)
+^178.111P^1^1
+"DATA",178.101,211,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,212,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,212,5)
+entryRelationship
+"DATA",178.101,212,7,0)
+^178.111P^1^1
+"DATA",178.101,212,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,213,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,213,5)
+component^MedicalEquipment
+"DATA",178.101,214,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,214,5)
+component^Immunizations
+"DATA",178.101,215,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,215,5)
+entry^Vital
+"DATA",178.101,215,7,0)
+^178.111P^1^1
+"DATA",178.101,215,7,1,0)
+37^entry^Result
+"DATA",178.101,216,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,216,5)
+encounter
+"DATA",178.101,216,7,0)
+^178.111P^1^1
+"DATA",178.101,216,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,217,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,217,5)
+entry
+"DATA",178.101,217,7,0)
+^178.111P^1^1
+"DATA",178.101,217,7,1,0)
+47^entry^Plan
+"DATA",178.101,218,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,218,5)
+entryRelationship
+"DATA",178.101,218,7,0)
+^178.111P^1^1
+"DATA",178.101,218,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,219,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,219,5)
+component^AdvanceDirectives
+"DATA",178.101,220,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,220,5)
+entry
+"DATA",178.101,220,7,0)
+^178.111P^1^1
+"DATA",178.101,220,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,221,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,221,5)
+observation
+"DATA",178.101,221,7,0)
+^178.111P^1^1
+"DATA",178.101,221,7,1,0)
+7^observation^Verification
+"DATA",178.101,222,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,222,5)
+entryRelationship
+"DATA",178.101,222,7,0)
+^178.111P^1^1
+"DATA",178.101,222,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,223,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,223,5)
+reference
+"DATA",178.101,223,7,0)
+^178.111P^1^1
+"DATA",178.101,223,7,1,0)
+7^reference^ref
+"DATA",178.101,224,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,224,5)
+component^FunctionalStatus
+"DATA",178.101,225,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,225,5)
+entryRelationship
+"DATA",178.101,225,7,0)
+^178.111P^1^1
+"DATA",178.101,225,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,226,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,226,5)
+entryRelationship
+"DATA",178.101,226,7,0)
+^178.111P^1^1
+"DATA",178.101,226,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,227,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,227,5)
+component^FamilyHistory
+"DATA",178.101,228,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,228,5)
+entry
+"DATA",178.101,228,7,0)
+^178.111P^1^1
+"DATA",178.101,228,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,229,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,229,5)
+component
+"DATA",178.101,229,7,0)
+^178.111P^1^1
+"DATA",178.101,229,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,230,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,230,5)
+component
+"DATA",178.101,230,7,0)
+^178.111P^1^1
+"DATA",178.101,230,7,1,0)
+19^component^FamHis
+"DATA",178.101,231,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,231,5)
+component^SocialHistory
+"DATA",178.101,232,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,232,5)
+entry
+"DATA",178.101,232,7,0)
+^178.111P^1^1
+"DATA",178.101,232,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,233,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,233,5)
+entryRelationship
+"DATA",178.101,233,7,0)
+^178.111P^1^1
+"DATA",178.101,233,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,234,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,234,5)
+component^MedicalEquipment
+"DATA",178.101,235,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,235,5)
+component^Immunizations
+"DATA",178.101,236,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,236,5)
+entry^Vital
+"DATA",178.101,236,7,0)
+^178.111P^1^1
+"DATA",178.101,236,7,1,0)
+37^entry^Result
+"DATA",178.101,237,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,237,5)
+encounter
+"DATA",178.101,237,7,0)
+^178.111P^1^1
+"DATA",178.101,237,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,238,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,238,5)
+entry
+"DATA",178.101,238,7,0)
+^178.111P^1^1
+"DATA",178.101,238,7,1,0)
+47^entry^Plan
+"DATA",178.101,239,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,239,5)
+entryRelationship
+"DATA",178.101,239,7,0)
+^178.111P^1^1
+"DATA",178.101,239,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,240,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,240,5)
+component^AdvanceDirectives
+"DATA",178.101,241,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,241,5)
+entry
+"DATA",178.101,241,7,0)
+^178.111P^1^1
+"DATA",178.101,241,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,242,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,242,5)
+observation
+"DATA",178.101,242,7,0)
+^178.111P^1^1
+"DATA",178.101,242,7,1,0)
+7^observation^Verification
+"DATA",178.101,243,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,243,5)
+entryRelationship
+"DATA",178.101,243,7,0)
+^178.111P^1^1
+"DATA",178.101,243,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,244,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,244,5)
+reference
+"DATA",178.101,244,7,0)
+^178.111P^1^1
+"DATA",178.101,244,7,1,0)
+7^reference^ref
+"DATA",178.101,245,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,245,5)
+component^FunctionalStatus
+"DATA",178.101,246,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,246,5)
+entryRelationship
+"DATA",178.101,246,7,0)
+^178.111P^1^1
+"DATA",178.101,246,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,247,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,247,5)
+entryRelationship
+"DATA",178.101,247,7,0)
+^178.111P^1^1
+"DATA",178.101,247,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,248,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,248,5)
+component^FamilyHistory
+"DATA",178.101,249,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,249,5)
+entry
+"DATA",178.101,249,7,0)
+^178.111P^1^1
+"DATA",178.101,249,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,250,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,250,5)
+component
+"DATA",178.101,250,7,0)
+^178.111P^1^1
+"DATA",178.101,250,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,251,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,251,5)
+component
+"DATA",178.101,251,7,0)
+^178.111P^1^1
+"DATA",178.101,251,7,1,0)
+19^component^FamHis
+"DATA",178.101,252,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,252,5)
+component^SocialHistory
+"DATA",178.101,253,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,253,5)
+entry
+"DATA",178.101,253,7,0)
+^178.111P^1^1
+"DATA",178.101,253,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,254,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,254,5)
+entryRelationship
+"DATA",178.101,254,7,0)
+^178.111P^1^1
+"DATA",178.101,254,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,255,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,255,5)
+component^MedicalEquipment
+"DATA",178.101,256,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,256,5)
+component^Immunizations
+"DATA",178.101,257,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,257,5)
+entry^Vital
+"DATA",178.101,257,7,0)
+^178.111P^1^1
+"DATA",178.101,257,7,1,0)
+37^entry^Result
+"DATA",178.101,258,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,258,5)
+encounter
+"DATA",178.101,258,7,0)
+^178.111P^1^1
+"DATA",178.101,258,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,259,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,259,5)
+entry
+"DATA",178.101,259,7,0)
+^178.111P^1^1
+"DATA",178.101,259,7,1,0)
+47^entry^Plan
+"DATA",178.101,260,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,260,5)
+entryRelationship
+"DATA",178.101,260,7,0)
+^178.111P^1^1
+"DATA",178.101,260,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,261,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,261,5)
+component^AdvanceDirectives
+"DATA",178.101,262,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,262,5)
+entry
+"DATA",178.101,262,7,0)
+^178.111P^1^1
+"DATA",178.101,262,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,263,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,263,5)
+observation
+"DATA",178.101,263,7,0)
+^178.111P^1^1
+"DATA",178.101,263,7,1,0)
+7^observation^Verification
+"DATA",178.101,264,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,264,5)
+entryRelationship
+"DATA",178.101,264,7,0)
+^178.111P^1^1
+"DATA",178.101,264,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,265,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,265,5)
+reference
+"DATA",178.101,265,7,0)
+^178.111P^1^1
+"DATA",178.101,265,7,1,0)
+7^reference^ref
+"DATA",178.101,266,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,266,5)
+component^FunctionalStatus
+"DATA",178.101,267,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,267,5)
+entryRelationship
+"DATA",178.101,267,7,0)
+^178.111P^1^1
+"DATA",178.101,267,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,268,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,268,5)
+entryRelationship
+"DATA",178.101,268,7,0)
+^178.111P^1^1
+"DATA",178.101,268,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,269,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,269,5)
+component^FamilyHistory
+"DATA",178.101,270,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,270,5)
+entry
+"DATA",178.101,270,7,0)
+^178.111P^1^1
+"DATA",178.101,270,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,271,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,271,5)
+component
+"DATA",178.101,271,7,0)
+^178.111P^1^1
+"DATA",178.101,271,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,272,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,272,5)
+component
+"DATA",178.101,272,7,0)
+^178.111P^1^1
+"DATA",178.101,272,7,1,0)
+19^component^FamHis
+"DATA",178.101,273,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,273,5)
+component^SocialHistory
+"DATA",178.101,274,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,274,5)
+entry
+"DATA",178.101,274,7,0)
+^178.111P^1^1
+"DATA",178.101,274,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,275,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,275,5)
+entryRelationship
+"DATA",178.101,275,7,0)
+^178.111P^1^1
+"DATA",178.101,275,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,276,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,276,5)
+component^MedicalEquipment
+"DATA",178.101,277,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,277,5)
+component^Immunizations
+"DATA",178.101,278,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,278,5)
+entry^Vital
+"DATA",178.101,278,7,0)
+^178.111P^1^1
+"DATA",178.101,278,7,1,0)
+37^entry^Result
+"DATA",178.101,279,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,279,5)
+encounter
+"DATA",178.101,279,7,0)
+^178.111P^1^1
+"DATA",178.101,279,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,280,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,280,5)
+entry
+"DATA",178.101,280,7,0)
+^178.111P^1^1
+"DATA",178.101,280,7,1,0)
+47^entry^Plan
+"DATA",178.101,281,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,281,5)
+entryRelationship
+"DATA",178.101,281,7,0)
+^178.111P^1^1
+"DATA",178.101,281,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,282,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,282,5)
+component^AdvanceDirectives
+"DATA",178.101,283,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,283,5)
+entry
+"DATA",178.101,283,7,0)
+^178.111P^1^1
+"DATA",178.101,283,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,284,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,284,5)
+observation
+"DATA",178.101,284,7,0)
+^178.111P^1^1
+"DATA",178.101,284,7,1,0)
+7^observation^Verification
+"DATA",178.101,285,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,285,5)
+entryRelationship
+"DATA",178.101,285,7,0)
+^178.111P^1^1
+"DATA",178.101,285,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,286,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,286,5)
+reference
+"DATA",178.101,286,7,0)
+^178.111P^1^1
+"DATA",178.101,286,7,1,0)
+7^reference^ref
+"DATA",178.101,287,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,287,5)
+component^FunctionalStatus
+"DATA",178.101,288,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,288,5)
+entryRelationship
+"DATA",178.101,288,7,0)
+^178.111P^1^1
+"DATA",178.101,288,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,289,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,289,5)
+entryRelationship
+"DATA",178.101,289,7,0)
+^178.111P^1^1
+"DATA",178.101,289,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,290,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,290,5)
+component^FamilyHistory
+"DATA",178.101,291,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,291,5)
+entry
+"DATA",178.101,291,7,0)
+^178.111P^1^1
+"DATA",178.101,291,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,292,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,292,5)
+component
+"DATA",178.101,292,7,0)
+^178.111P^1^1
+"DATA",178.101,292,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,293,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,293,5)
+component
+"DATA",178.101,293,7,0)
+^178.111P^1^1
+"DATA",178.101,293,7,1,0)
+19^component^FamHis
+"DATA",178.101,294,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,294,5)
+component^SocialHistory
+"DATA",178.101,295,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,295,5)
+entry
+"DATA",178.101,295,7,0)
+^178.111P^1^1
+"DATA",178.101,295,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,296,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,296,5)
+entryRelationship
+"DATA",178.101,296,7,0)
+^178.111P^1^1
+"DATA",178.101,296,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,297,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,297,5)
+component^MedicalEquipment
+"DATA",178.101,298,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,298,5)
+component^Immunizations
+"DATA",178.101,299,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,299,5)
+entry^Vital
+"DATA",178.101,299,7,0)
+^178.111P^1^1
+"DATA",178.101,299,7,1,0)
+37^entry^Result
+"DATA",178.101,300,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,300,5)
+encounter
+"DATA",178.101,300,7,0)
+^178.111P^1^1
+"DATA",178.101,300,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,301,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,301,5)
+entry
+"DATA",178.101,301,7,0)
+^178.111P^1^1
+"DATA",178.101,301,7,1,0)
+47^entry^Plan
+"DATA",178.101,302,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,302,5)
+entryRelationship
+"DATA",178.101,302,7,0)
+^178.111P^1^1
+"DATA",178.101,302,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,303,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,303,5)
+component^AdvanceDirectives
+"DATA",178.101,304,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,304,5)
+entry
+"DATA",178.101,304,7,0)
+^178.111P^1^1
+"DATA",178.101,304,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,305,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,305,5)
+observation
+"DATA",178.101,305,7,0)
+^178.111P^1^1
+"DATA",178.101,305,7,1,0)
+7^observation^Verification
+"DATA",178.101,306,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,306,5)
+entryRelationship
+"DATA",178.101,306,7,0)
+^178.111P^1^1
+"DATA",178.101,306,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,307,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,307,5)
+reference
+"DATA",178.101,307,7,0)
+^178.111P^1^1
+"DATA",178.101,307,7,1,0)
+7^reference^ref
+"DATA",178.101,308,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,308,5)
+component^FunctionalStatus
+"DATA",178.101,309,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,309,5)
+entryRelationship
+"DATA",178.101,309,7,0)
+^178.111P^1^1
+"DATA",178.101,309,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,310,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,310,5)
+entryRelationship
+"DATA",178.101,310,7,0)
+^178.111P^1^1
+"DATA",178.101,310,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,311,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,311,5)
+component^FamilyHistory
+"DATA",178.101,312,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,312,5)
+entry
+"DATA",178.101,312,7,0)
+^178.111P^1^1
+"DATA",178.101,312,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,313,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,313,5)
+component
+"DATA",178.101,313,7,0)
+^178.111P^1^1
+"DATA",178.101,313,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,314,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,314,5)
+component
+"DATA",178.101,314,7,0)
+^178.111P^1^1
+"DATA",178.101,314,7,1,0)
+19^component^FamHis
+"DATA",178.101,315,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,315,5)
+component^SocialHistory
+"DATA",178.101,316,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,316,5)
+entry
+"DATA",178.101,316,7,0)
+^178.111P^1^1
+"DATA",178.101,316,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,317,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,317,5)
+entryRelationship
+"DATA",178.101,317,7,0)
+^178.111P^1^1
+"DATA",178.101,317,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,318,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,318,5)
+component^MedicalEquipment
+"DATA",178.101,319,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,319,5)
+component^Immunizations
+"DATA",178.101,320,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,320,5)
+entry^Vital
+"DATA",178.101,320,7,0)
+^178.111P^1^1
+"DATA",178.101,320,7,1,0)
+37^entry^Result
+"DATA",178.101,321,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,321,5)
+encounter
+"DATA",178.101,321,7,0)
+^178.111P^1^1
+"DATA",178.101,321,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,322,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,322,5)
+entry
+"DATA",178.101,322,7,0)
+^178.111P^1^1
+"DATA",178.101,322,7,1,0)
+47^entry^Plan
+"DATA",178.101,323,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,323,5)
+entryRelationship
+"DATA",178.101,323,7,0)
+^178.111P^1^1
+"DATA",178.101,323,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,324,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,324,5)
+component^AdvanceDirectives
+"DATA",178.101,325,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,325,5)
+entry
+"DATA",178.101,325,7,0)
+^178.111P^1^1
+"DATA",178.101,325,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,326,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,326,5)
+observation
+"DATA",178.101,326,7,0)
+^178.111P^1^1
+"DATA",178.101,326,7,1,0)
+7^observation^Verification
+"DATA",178.101,327,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,327,5)
+entryRelationship
+"DATA",178.101,327,7,0)
+^178.111P^1^1
+"DATA",178.101,327,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,328,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,328,5)
+reference
+"DATA",178.101,328,7,0)
+^178.111P^1^1
+"DATA",178.101,328,7,1,0)
+7^reference^ref
+"DATA",178.101,329,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,329,5)
+component^FunctionalStatus
+"DATA",178.101,330,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,330,5)
+entryRelationship
+"DATA",178.101,330,7,0)
+^178.111P^1^1
+"DATA",178.101,330,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,331,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,331,5)
+entryRelationship
+"DATA",178.101,331,7,0)
+^178.111P^1^1
+"DATA",178.101,331,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,332,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,332,5)
+component^FamilyHistory
+"DATA",178.101,333,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,333,5)
+entry
+"DATA",178.101,333,7,0)
+^178.111P^1^1
+"DATA",178.101,333,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,334,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,334,5)
+component
+"DATA",178.101,334,7,0)
+^178.111P^1^1
+"DATA",178.101,334,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,335,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,335,5)
+component
+"DATA",178.101,335,7,0)
+^178.111P^1^1
+"DATA",178.101,335,7,1,0)
+19^component^FamHis
+"DATA",178.101,336,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,336,5)
+component^SocialHistory
+"DATA",178.101,337,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,337,5)
+entry
+"DATA",178.101,337,7,0)
+^178.111P^1^1
+"DATA",178.101,337,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,338,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,338,5)
+entryRelationship
+"DATA",178.101,338,7,0)
+^178.111P^1^1
+"DATA",178.101,338,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,339,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,339,5)
+component^MedicalEquipment
+"DATA",178.101,340,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,340,5)
+component^Immunizations
+"DATA",178.101,341,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,341,5)
+entry^Vital
+"DATA",178.101,341,7,0)
+^178.111P^1^1
+"DATA",178.101,341,7,1,0)
+37^entry^Result
+"DATA",178.101,342,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,342,5)
+encounter
+"DATA",178.101,342,7,0)
+^178.111P^1^1
+"DATA",178.101,342,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,343,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,343,5)
+entry
+"DATA",178.101,343,7,0)
+^178.111P^1^1
+"DATA",178.101,343,7,1,0)
+47^entry^Plan
+"DATA",178.101,344,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,344,5)
+entryRelationship
+"DATA",178.101,344,7,0)
+^178.111P^1^1
+"DATA",178.101,344,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,345,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,345,5)
+component^AdvanceDirectives
+"DATA",178.101,346,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,346,5)
+entry
+"DATA",178.101,346,7,0)
+^178.111P^1^1
+"DATA",178.101,346,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,347,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,347,5)
+observation
+"DATA",178.101,347,7,0)
+^178.111P^1^1
+"DATA",178.101,347,7,1,0)
+7^observation^Verification
+"DATA",178.101,348,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,348,5)
+entryRelationship
+"DATA",178.101,348,7,0)
+^178.111P^1^1
+"DATA",178.101,348,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,349,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,349,5)
+reference
+"DATA",178.101,349,7,0)
+^178.111P^1^1
+"DATA",178.101,349,7,1,0)
+7^reference^ref
+"DATA",178.101,350,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,350,5)
+component^FunctionalStatus
+"DATA",178.101,351,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,351,5)
+entryRelationship
+"DATA",178.101,351,7,0)
+^178.111P^1^1
+"DATA",178.101,351,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,352,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,352,5)
+entryRelationship
+"DATA",178.101,352,7,0)
+^178.111P^1^1
+"DATA",178.101,352,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,353,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,353,5)
+component^FamilyHistory
+"DATA",178.101,354,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,354,5)
+entry
+"DATA",178.101,354,7,0)
+^178.111P^1^1
+"DATA",178.101,354,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,355,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,355,5)
+component
+"DATA",178.101,355,7,0)
+^178.111P^1^1
+"DATA",178.101,355,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,356,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,356,5)
+component
+"DATA",178.101,356,7,0)
+^178.111P^1^1
+"DATA",178.101,356,7,1,0)
+19^component^FamHis
+"DATA",178.101,357,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,357,5)
+component^SocialHistory
+"DATA",178.101,358,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,358,5)
+entry
+"DATA",178.101,358,7,0)
+^178.111P^1^1
+"DATA",178.101,358,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,359,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,359,5)
+entryRelationship
+"DATA",178.101,359,7,0)
+^178.111P^1^1
+"DATA",178.101,359,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,360,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,360,5)
+component^MedicalEquipment
+"DATA",178.101,361,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,361,5)
+component^Immunizations
+"DATA",178.101,362,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,362,5)
+entry^Vital
+"DATA",178.101,362,7,0)
+^178.111P^1^1
+"DATA",178.101,362,7,1,0)
+37^entry^Result
+"DATA",178.101,363,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,363,5)
+encounter
+"DATA",178.101,363,7,0)
+^178.111P^1^1
+"DATA",178.101,363,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,364,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,364,5)
+entry
+"DATA",178.101,364,7,0)
+^178.111P^1^1
+"DATA",178.101,364,7,1,0)
+47^entry^Plan
+"DATA",178.101,365,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,365,5)
+entryRelationship
+"DATA",178.101,365,7,0)
+^178.111P^1^1
+"DATA",178.101,365,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,366,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,366,5)
+component^AdvanceDirectives
+"DATA",178.101,367,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,367,5)
+entry
+"DATA",178.101,367,7,0)
+^178.111P^1^1
+"DATA",178.101,367,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,368,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,368,5)
+observation
+"DATA",178.101,368,7,0)
+^178.111P^1^1
+"DATA",178.101,368,7,1,0)
+7^observation^Verification
+"DATA",178.101,369,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,369,5)
+entryRelationship
+"DATA",178.101,369,7,0)
+^178.111P^1^1
+"DATA",178.101,369,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,370,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,370,5)
+reference
+"DATA",178.101,370,7,0)
+^178.111P^1^1
+"DATA",178.101,370,7,1,0)
+7^reference^ref
+"DATA",178.101,371,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,371,5)
+component^FunctionalStatus
+"DATA",178.101,372,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,372,5)
+entryRelationship
+"DATA",178.101,372,7,0)
+^178.111P^1^1
+"DATA",178.101,372,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,373,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,373,5)
+entryRelationship
+"DATA",178.101,373,7,0)
+^178.111P^1^1
+"DATA",178.101,373,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,374,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,374,5)
+component^FamilyHistory
+"DATA",178.101,375,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,375,5)
+entry
+"DATA",178.101,375,7,0)
+^178.111P^1^1
+"DATA",178.101,375,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,376,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,376,5)
+component
+"DATA",178.101,376,7,0)
+^178.111P^1^1
+"DATA",178.101,376,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,377,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,377,5)
+component
+"DATA",178.101,377,7,0)
+^178.111P^1^1
+"DATA",178.101,377,7,1,0)
+19^component^FamHis
+"DATA",178.101,378,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,378,5)
+component^SocialHistory
+"DATA",178.101,379,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,379,5)
+entry
+"DATA",178.101,379,7,0)
+^178.111P^1^1
+"DATA",178.101,379,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,380,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,380,5)
+entryRelationship
+"DATA",178.101,380,7,0)
+^178.111P^1^1
+"DATA",178.101,380,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,381,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,381,5)
+component^MedicalEquipment
+"DATA",178.101,382,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,382,5)
+component^Immunizations
+"DATA",178.101,383,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,383,5)
+entry^Vital
+"DATA",178.101,383,7,0)
+^178.111P^1^1
+"DATA",178.101,383,7,1,0)
+37^entry^Result
+"DATA",178.101,384,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,384,5)
+encounter
+"DATA",178.101,384,7,0)
+^178.111P^1^1
+"DATA",178.101,384,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,385,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,385,5)
+entry
+"DATA",178.101,385,7,0)
+^178.111P^1^1
+"DATA",178.101,385,7,1,0)
+47^entry^Plan
+"DATA",178.101,386,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,386,5)
+entryRelationship
+"DATA",178.101,386,7,0)
+^178.111P^1^1
+"DATA",178.101,386,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,387,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,387,5)
+component^AdvanceDirectives
+"DATA",178.101,388,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,388,5)
+entry
+"DATA",178.101,388,7,0)
+^178.111P^1^1
+"DATA",178.101,388,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,389,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,389,5)
+observation
+"DATA",178.101,389,7,0)
+^178.111P^1^1
+"DATA",178.101,389,7,1,0)
+7^observation^Verification
+"DATA",178.101,390,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,390,5)
+entryRelationship
+"DATA",178.101,390,7,0)
+^178.111P^1^1
+"DATA",178.101,390,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,391,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,391,5)
+reference
+"DATA",178.101,391,7,0)
+^178.111P^1^1
+"DATA",178.101,391,7,1,0)
+7^reference^ref
+"DATA",178.101,392,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,392,5)
+component^FunctionalStatus
+"DATA",178.101,393,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,393,5)
+entryRelationship
+"DATA",178.101,393,7,0)
+^178.111P^1^1
+"DATA",178.101,393,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,394,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,394,5)
+entryRelationship
+"DATA",178.101,394,7,0)
+^178.111P^1^1
+"DATA",178.101,394,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,395,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,395,5)
+component^FamilyHistory
+"DATA",178.101,396,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,396,5)
+entry
+"DATA",178.101,396,7,0)
+^178.111P^1^1
+"DATA",178.101,396,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,397,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,397,5)
+component
+"DATA",178.101,397,7,0)
+^178.111P^1^1
+"DATA",178.101,397,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,398,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,398,5)
+component
+"DATA",178.101,398,7,0)
+^178.111P^1^1
+"DATA",178.101,398,7,1,0)
+19^component^FamHis
+"DATA",178.101,399,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,399,5)
+component^SocialHistory
+"DATA",178.101,400,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,400,5)
+entry
+"DATA",178.101,400,7,0)
+^178.111P^1^1
+"DATA",178.101,400,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,401,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,401,5)
+entryRelationship
+"DATA",178.101,401,7,0)
+^178.111P^1^1
+"DATA",178.101,401,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,402,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,402,5)
+component^MedicalEquipment
+"DATA",178.101,403,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,403,5)
+component^Immunizations
+"DATA",178.101,404,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,404,5)
+entry^Vital
+"DATA",178.101,404,7,0)
+^178.111P^1^1
+"DATA",178.101,404,7,1,0)
+37^entry^Result
+"DATA",178.101,405,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,405,5)
+encounter
+"DATA",178.101,405,7,0)
+^178.111P^1^1
+"DATA",178.101,405,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,406,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,406,5)
+entry
+"DATA",178.101,406,7,0)
+^178.111P^1^1
+"DATA",178.101,406,7,1,0)
+47^entry^Plan
+"DATA",178.101,407,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,407,5)
+entryRelationship
+"DATA",178.101,407,7,0)
+^178.111P^1^1
+"DATA",178.101,407,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,408,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,408,5)
+component^AdvanceDirectives
+"DATA",178.101,409,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,409,5)
+entry
+"DATA",178.101,409,7,0)
+^178.111P^1^1
+"DATA",178.101,409,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,410,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,410,5)
+observation
+"DATA",178.101,410,7,0)
+^178.111P^1^1
+"DATA",178.101,410,7,1,0)
+7^observation^Verification
+"DATA",178.101,411,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,411,5)
+entryRelationship
+"DATA",178.101,411,7,0)
+^178.111P^1^1
+"DATA",178.101,411,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,412,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,412,5)
+reference
+"DATA",178.101,412,7,0)
+^178.111P^1^1
+"DATA",178.101,412,7,1,0)
+7^reference^ref
+"DATA",178.101,413,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,413,5)
+component^FunctionalStatus
+"DATA",178.101,414,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,414,5)
+entryRelationship
+"DATA",178.101,414,7,0)
+^178.111P^1^1
+"DATA",178.101,414,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,415,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,415,5)
+entryRelationship
+"DATA",178.101,415,7,0)
+^178.111P^1^1
+"DATA",178.101,415,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,416,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,416,5)
+component^FamilyHistory
+"DATA",178.101,417,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,417,5)
+entry
+"DATA",178.101,417,7,0)
+^178.111P^1^1
+"DATA",178.101,417,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,418,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,418,5)
+component
+"DATA",178.101,418,7,0)
+^178.111P^1^1
+"DATA",178.101,418,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,419,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,419,5)
+component
+"DATA",178.101,419,7,0)
+^178.111P^1^1
+"DATA",178.101,419,7,1,0)
+19^component^FamHis
+"DATA",178.101,420,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,420,5)
+component^SocialHistory
+"DATA",178.101,421,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,421,5)
+entry
+"DATA",178.101,421,7,0)
+^178.111P^1^1
+"DATA",178.101,421,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,422,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,422,5)
+entryRelationship
+"DATA",178.101,422,7,0)
+^178.111P^1^1
+"DATA",178.101,422,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,423,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,423,5)
+component^MedicalEquipment
+"DATA",178.101,424,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,424,5)
+component^Immunizations
+"DATA",178.101,425,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,425,5)
+entry^Vital
+"DATA",178.101,425,7,0)
+^178.111P^1^1
+"DATA",178.101,425,7,1,0)
+37^entry^Result
+"DATA",178.101,426,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,426,5)
+encounter
+"DATA",178.101,426,7,0)
+^178.111P^1^1
+"DATA",178.101,426,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,427,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,427,5)
+entry
+"DATA",178.101,427,7,0)
+^178.111P^1^1
+"DATA",178.101,427,7,1,0)
+47^entry^Plan
+"DATA",178.101,428,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,428,5)
+entryRelationship
+"DATA",178.101,428,7,0)
+^178.111P^1^1
+"DATA",178.101,428,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,429,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,429,5)
+component^AdvanceDirectives
+"DATA",178.101,430,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,430,5)
+entry
+"DATA",178.101,430,7,0)
+^178.111P^1^1
+"DATA",178.101,430,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,431,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,431,5)
+observation
+"DATA",178.101,431,7,0)
+^178.111P^1^1
+"DATA",178.101,431,7,1,0)
+7^observation^Verification
+"DATA",178.101,432,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,432,5)
+entryRelationship
+"DATA",178.101,432,7,0)
+^178.111P^1^1
+"DATA",178.101,432,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,433,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,433,5)
+reference
+"DATA",178.101,433,7,0)
+^178.111P^1^1
+"DATA",178.101,433,7,1,0)
+7^reference^ref
+"DATA",178.101,434,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,434,5)
+component^FunctionalStatus
+"DATA",178.101,435,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,435,5)
+entryRelationship
+"DATA",178.101,435,7,0)
+^178.111P^1^1
+"DATA",178.101,435,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,436,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,436,5)
+entryRelationship
+"DATA",178.101,436,7,0)
+^178.111P^1^1
+"DATA",178.101,436,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,437,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,437,5)
+component^FamilyHistory
+"DATA",178.101,438,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,438,5)
+entry
+"DATA",178.101,438,7,0)
+^178.111P^1^1
+"DATA",178.101,438,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,439,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,439,5)
+component
+"DATA",178.101,439,7,0)
+^178.111P^1^1
+"DATA",178.101,439,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,440,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,440,5)
+component
+"DATA",178.101,440,7,0)
+^178.111P^1^1
+"DATA",178.101,440,7,1,0)
+19^component^FamHis
+"DATA",178.101,441,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,441,5)
+component^SocialHistory
+"DATA",178.101,442,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,442,5)
+entry
+"DATA",178.101,442,7,0)
+^178.111P^1^1
+"DATA",178.101,442,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,443,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,443,5)
+entryRelationship
+"DATA",178.101,443,7,0)
+^178.111P^1^1
+"DATA",178.101,443,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,444,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,444,5)
+component^MedicalEquipment
+"DATA",178.101,445,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,445,5)
+component^Immunizations
+"DATA",178.101,446,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,446,5)
+entry^Vital
+"DATA",178.101,446,7,0)
+^178.111P^1^1
+"DATA",178.101,446,7,1,0)
+37^entry^Result
+"DATA",178.101,447,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,447,5)
+encounter
+"DATA",178.101,447,7,0)
+^178.111P^1^1
+"DATA",178.101,447,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,448,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,448,5)
+entry
+"DATA",178.101,448,7,0)
+^178.111P^1^1
+"DATA",178.101,448,7,1,0)
+47^entry^Plan
+"DATA",178.101,449,0)
+Authorization activity template ^2.16.840.1.113883.10.20.1.19
+"DATA",178.101,449,5)
+entryRelationship
+"DATA",178.101,449,7,0)
+^178.111P^1^1
+"DATA",178.101,449,7,1,0)
+3^entryRelationship^Auth
+"DATA",178.101,450,0)
+Advance directives section template ^2.16.840.1.113883.10.20.1.1
+"DATA",178.101,450,5)
+component^AdvanceDirectives
+"DATA",178.101,451,0)
+Advance directive observation template ^2.16.840.1.113883.10.20.1.17
+"DATA",178.101,451,5)
+entry
+"DATA",178.101,451,7,0)
+^178.111P^1^1
+"DATA",178.101,451,7,1,0)
+7^entry^AdvDir
+"DATA",178.101,452,0)
+Verification of an advance directive observation template ^2.16.840.1.113883.10.20.1.58
+"DATA",178.101,452,5)
+observation
+"DATA",178.101,452,7,0)
+^178.111P^1^1
+"DATA",178.101,452,7,1,0)
+7^observation^Verification
+"DATA",178.101,453,0)
+Advance directive status observation template ^2.16.840.1.113883.10.20.1.37
+"DATA",178.101,453,5)
+entryRelationship
+"DATA",178.101,453,7,0)
+^178.111P^1^1
+"DATA",178.101,453,7,1,0)
+7^entryRelationship^status
+"DATA",178.101,454,0)
+Advance directive reference template ^2.16.840.1.113883.10.20.1.36
+"DATA",178.101,454,5)
+reference
+"DATA",178.101,454,7,0)
+^178.111P^1^1
+"DATA",178.101,454,7,1,0)
+7^reference^ref
+"DATA",178.101,455,0)
+Functional status section template ^2.16.840.1.113883.10.20.1.5
+"DATA",178.101,455,5)
+component^FunctionalStatus
+"DATA",178.101,456,0)
+Status of functional status observation template ^2.16.840.1.113883.10.20.1.44
+"DATA",178.101,456,5)
+entryRelationship
+"DATA",178.101,456,7,0)
+^178.111P^1^1
+"DATA",178.101,456,7,1,0)
+12^entryRelationship^Status
+"DATA",178.101,457,0)
+Problem status observation template ^2.16.840.1.113883.10.20.1.50
+"DATA",178.101,457,5)
+entryRelationship
+"DATA",178.101,457,7,0)
+^178.111P^1^1
+"DATA",178.101,457,7,1,0)
+16^entryRelationship^ProblemStatus
+"DATA",178.101,458,0)
+Family history section template ^2.16.840.1.113883.10.20.1.4
+"DATA",178.101,458,5)
+component^FamilyHistory
+"DATA",178.101,459,0)
+Family history organizer template ^2.16.840.1.113883.10.20.1.23
+"DATA",178.101,459,5)
+entry
+"DATA",178.101,459,7,0)
+^178.111P^1^1
+"DATA",178.101,459,7,1,0)
+19^entry^FamHisEntry
+"DATA",178.101,460,0)
+Family history cause of death observation template ^2.16.840.1.113883.10.20.1.42
+"DATA",178.101,460,5)
+component
+"DATA",178.101,460,7,0)
+^178.111P^1^1
+"DATA",178.101,460,7,1,0)
+19^component^CauseOfDeath
+"DATA",178.101,461,0)
+Family history observation template ^2.16.840.1.113883.10.20.1.22
+"DATA",178.101,461,5)
+component
+"DATA",178.101,461,7,0)
+^178.111P^1^1
+"DATA",178.101,461,7,1,0)
+19^component^FamHis
+"DATA",178.101,462,0)
+Social history section template ^2.16.840.1.113883.10.20.1.15
+"DATA",178.101,462,5)
+component^SocialHistory
+"DATA",178.101,463,0)
+Social history observation template ^2.16.840.1.113883.10.20.1.33
+"DATA",178.101,463,5)
+entry
+"DATA",178.101,463,7,0)
+^178.111P^1^1
+"DATA",178.101,463,7,1,0)
+24^entry^SocHisObs
+"DATA",178.101,464,0)
+Alert status observation template ^2.16.840.1.113883.10.20.1.39
+"DATA",178.101,464,5)
+entryRelationship
+"DATA",178.101,464,7,0)
+^178.111P^1^1
+"DATA",178.101,464,7,1,0)
+26^entryRelationship^AlertStatus
+"DATA",178.101,465,0)
+Medical equipment section template ^2.16.840.1.113883.10.20.1.7
+"DATA",178.101,465,5)
+component^MedicalEquipment
+"DATA",178.101,466,0)
+Immunizations section template ^2.16.840.1.113883.10.20.1.6
+"DATA",178.101,466,5)
+component^Immunizations
+"DATA",178.101,467,0)
+Vital signs organizer template ^2.16.840.1.113883.10.20.1.35
+"DATA",178.101,467,5)
+entry^Vital
+"DATA",178.101,467,7,0)
+^178.111P^1^1
+"DATA",178.101,467,7,1,0)
+37^entry^Result
+"DATA",178.101,468,0)
+Location participation template ^2.16.840.1.113883.10.20.1.45
+"DATA",178.101,468,5)
+encounter
+"DATA",178.101,468,7,0)
+^178.111P^1^1
+"DATA",178.101,468,7,1,0)
+44^encounter^Encounter
+"DATA",178.101,469,0)
+Plan of Activity activity template ^2.16.840.1.113883.10.20.1.25
+"DATA",178.101,469,5)
+entry
+"DATA",178.101,469,7,0)
+^178.111P^1^1
+"DATA",178.101,469,7,1,0)
+47^entry^Plan
+"DATA",178.301,1,0)
+TEST
+"DATA",178.301,1,9,0)
+^178.3014^2^2
+"DATA",178.301,1,9,1,0)
+//TEST/ONE
+"DATA",178.301,1,9,1,2)
+TESTONE
+"DATA",178.301,1,9,2,0)
+//TEST/TWO
+"DATA",178.301,1,9,2,1)
+DFN
+"DATA",178.301,1,9,2,2)
+TESTTWO
+"DATA",178.301,2,0)
+ICD9
+"DATA",178.301,2,1)
+http://www.webservicemart.com/icd9code.asmx/ICD9Codes
+"DATA",178.301,2,2)
+http://www.webservicemart.com/icd9code.asmx?op=ICD9Codes
+"DATA",178.301,2,3,0)
+^178.311^11^11^3100225^^^^
+"DATA",178.301,2,3,1,0)
+<?xml version="1.0" encoding="utf-8"?>
+"DATA",178.301,2,3,2,0)
+<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
+"DATA",178.301,2,3,3,0)
+xmlns:xsd="http://www.w3.org/2001/XMLSchema" 
+"DATA",178.301,2,3,4,0)
+xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
+"DATA",178.301,2,3,5,0)
+  <soap:Body>
+"DATA",178.301,2,3,6,0)
+    <ICD9Codes xmlns="http://webservicemart.com/ws/">
+"DATA",178.301,2,3,7,0)
+      <Code>string</Code>
+"DATA",178.301,2,3,8,0)
+      <CodeLenght>string</CodeLenght>
+"DATA",178.301,2,3,9,0)
+    </ICD9Codes>
+"DATA",178.301,2,3,10,0)
+  </soap:Body>
+"DATA",178.301,2,3,11,0)
+</soap:Envelope>
+"DATA",178.301,2,6)
+http://76.110.216.135/icd9code.asmx/ICD9Codes
+"DATA",178.301,2,8,0)
+^178.3013^11^11^3100225^^
+"DATA",178.301,2,8,1,0)
+<?xml version="1.0" encoding="utf-8" ?>
+"DATA",178.301,2,8,2,0)
+<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
+"DATA",178.301,2,8,3,0)
+xmlns:xsd="http://www.w3.org/2001/XMLSchema" 
+"DATA",178.301,2,8,4,0)
+xmlns:soap="http://schemas.xmls>
+"DATA",178.301,2,8,5,0)
+<soap:Body>
+"DATA",178.301,2,8,6,0)
+<ICD9Codes xmlns="http://webservicemart.com/ws/">
+"DATA",178.301,2,8,7,0)
+<Code>@@//soap:Envelope/soap:Body/ICD9Codes/Code@@</Code>
+"DATA",178.301,2,8,8,0)
+<CodeLenght>@@//soap:Envelope/soap:Body/ICD9Codes/CodeLenght@@</CodeLenght>
+"DATA",178.301,2,8,9,0)
+</ICD9Codes>
+"DATA",178.301,2,8,10,0)
+</soap:Body>
+"DATA",178.301,2,8,11,0)
+</soap:Envelope>
+"DATA",178.301,2,9,0)
+^178.3014^5^5
+"DATA",178.301,2,9,1,0)
+//soap:Envelope
+"DATA",178.301,2,9,2,0)
+//soap:Envelope/soap:Body
+"DATA",178.301,2,9,3,0)
+//soap:Envelope/soap:Body/ICD9Codes
+"DATA",178.301,2,9,4,0)
+//soap:Envelope/soap:Body/ICD9Codes/Code
+"DATA",178.301,2,9,4,2)
+CODE
+"DATA",178.301,2,9,5,0)
+//soap:Envelope/soap:Body/ICD9Codes/CodeLenght
+"DATA",178.301,2,9,5,2)
+CODELN
+"DATA",178.301,2,10,0)
+^^4^4^3100226^
+"DATA",178.301,2,10,1,0)
+User-Agent: Mozilla/4.0 
+"DATA",178.301,2,10,2,0)
+SOAPAction: "http://webservicemart.com/ws/ICD9Codes"
+"DATA",178.301,2,10,3,0)
+Expect: 100-continue
+"DATA",178.301,2,10,4,0)
+Connection: Keep-Alive
+"DATA",178.301,3,0)
+ICD9RESULT
+"DATA",178.301,3,3,0)
+^^31^31^3100227^
+"DATA",178.301,3,3,1,0)
+<?xml version="1.0" encoding="utf-8"?>
+"DATA",178.301,3,3,2,0)
+<items>
+"DATA",178.301,3,3,3,0)
+<item code="E01" description="*HIGH REFRACTIVE ERROR (+/-8 DIOPTRE OR MORE)"/>
+"DATA",178.301,3,3,4,0)
+<item code="E02" description="*CHANGE OF 0.5 DIOPTRES OR &gt; TO SPHERICAL OR CYLINDER LENS."/>
+"DATA",178.301,3,3,5,0)
+<item code="E03" description="*0.5 DIOPTRES OR GREATER CHANGE TO CYLINDER LENS"/>
+"DATA",178.301,3,3,6,0)
+<item code="E04" description="*CHANGE IN AXIS = &gt; CYLINDER LENS OF .5 DIOPTRES AND &lt;20 DEGREE"/>
+"DATA",178.301,3,3,7,0)
+<item code="E05" description="*CHANGE IN AXIS OF =/&gt; 20 DEGREES FOR A CYLINDER LENS OF 0.5 DIOPTRE OR &lt;"/>
+"DATA",178.301,3,3,8,0)
+<item code="E06" description="*10 DEGREES FOR A CYLINDER LENS OF &gt;0.5 DIOPTRE BUT NOT &gt;1.0 DIOPTRE"/>
+"DATA",178.301,3,3,9,0)
+<item code="E07" description="*INTRAOCULAR SURGERY"/>
+"DATA",178.301,3,3,10,0)
+<item code="E08" description="MEDICATIONS"/>
+"DATA",178.301,3,3,11,0)
+<item code="E09" description="*3 DEGREES FOR A CYLINDER LENS OF MORE THAN 1.0 DIOPTRE"/>
+"DATA",178.301,3,3,12,0)
+<item code="E01" description="*HIGH REFRACTIVE ERROR (+/-8 DIOPTRE OR MORE)"/>
+"DATA",178.301,3,3,13,0)
+<item code="E02" description="*CHANGE OF 0.5 DIOPTRES OR &gt; TO SPHERICAL OR CYLINDER LENS."/>
+"DATA",178.301,3,3,14,0)
+<item code="E03" description="*0.5 DIOPTRES OR GREATER CHANGE TO CYLINDER LENS"/>
+"DATA",178.301,3,3,15,0)
+<item code="E04" description="*CHANGE IN AXIS = &gt; CYLINDER LENS OF .5 DIOPTRES AND &lt;20 DEGREE"/>
+"DATA",178.301,3,3,16,0)
+<item code="E05" description="*CHANGE IN AXIS OF =/&gt; 20 DEGREES FOR A CYLINDER LENS OF 0.5 DIOPTRE OR &lt;"/>
+"DATA",178.301,3,3,17,0)
+<item code="E06" description="*10 DEGREES FOR A CYLINDER LENS OF &gt;0.5 DIOPTRE BUT NOT &gt;1.0 DIOPTRE"/>
+"DATA",178.301,3,3,18,0)
+<item code="E07" description="*INTRAOCULAR SURGERY"/>
+"DATA",178.301,3,3,19,0)
+<item code="E08" description="MEDICATIONS"/>
+"DATA",178.301,3,3,20,0)
+<item code="E09" description="*3 DEGREES FOR A CYLINDER LENS OF MORE THAN 1.0 DIOPTRE"/>
+"DATA",178.301,3,3,21,0)
+<item code="E10" description="*PREVIOUSLY +/- 8 D OR GREATER, AT RISK OF RETINAL DETACHMENT"/>
+"DATA",178.301,3,3,22,0)
+<item code="E91" description="*NO INDICATOR PRESENT"/>
+"DATA",178.301,3,3,23,0)
+<item code="E92" description="*INDICATOR OF OCULAR PATHOLOGY: EXTERNAL"/>
+"DATA",178.301,3,3,24,0)
+<item code="E93" description="*INDICATOR OF OCULAR PATHOLOGY: INTERNAL"/>
+"DATA",178.301,3,3,25,0)
+<item code="E94" description="*INDICATOR OF BINOCULARITY: PHORIA"/>
+"DATA",178.301,3,3,26,0)
+<item code="E95" description="*INDICATOR OF BINOCULARITY: STRABISMUS"/>
+"DATA",178.301,3,3,27,0)
+<item code="E96" description="*INDICATOR OF VISION: AMBLYOPIA"/>
+"DATA",178.301,3,3,28,0)
+<item code="E97" description="*INDICATOR OF REFRACTIVE ERROR: ASTIGMATISM"/>
+"DATA",178.301,3,3,29,0)
+<item code="E98" description="*INDICATOR OF REFRACTIVE ERROR: HYPEROPIA"/>
+"DATA",178.301,3,3,30,0)
+<item code="E99" description="*INDICATOR OF REFRACTIVE ERROR: MYOPIA"/>
+"DATA",178.301,3,3,31,0)
+</items>
+"DATA",178.301,4,0)
+PQRIXML
+"DATA",178.301,4,3,0)
+^^42^42^3110620^
+"DATA",178.301,4,3,1,0)
+<?xml version="1.0" encoding="UTF-8"?>
+"DATA",178.301,4,3,2,0)
+<submission type="PQRI-REGISTRY" option="PAYMENT" version="2.0" 
+"DATA",178.301,4,3,3,0)
+xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
+"DATA",178.301,4,3,4,0)
+xsi:noNamespaceSchemaLocation="Registry_Payment.xsd">
+"DATA",178.301,4,3,5,0)
+<file-audit-data>
+"DATA",178.301,4,3,6,0)
+<create-date>12-10-2010</create-date>
+"DATA",178.301,4,3,7,0)
+<create-time>14:27</create-time>
+"DATA",178.301,4,3,8,0)
+<create-by>RegistryA</create-by>
+"DATA",178.301,4,3,9,0)
+<version>1.0</version>
+"DATA",178.301,4,3,10,0)
+<file-number>1</file-number>
+"DATA",178.301,4,3,11,0)
+<number-of-files>9</number-of-files>
+"DATA",178.301,4,3,12,0)
+</file-audit-data>
+"DATA",178.301,4,3,13,0)
+<registry>
+"DATA",178.301,4,3,14,0)
+<registry-name>Model Registry</registry-name>
+"DATA",178.301,4,3,15,0)
+<registry-id>125789123</registry-id>
+"DATA",178.301,4,3,16,0)
+<submission-method>C</submission-method>
+"DATA",178.301,4,3,17,0)
+</registry>
+"DATA",178.301,4,3,18,0)
+<measure-group ID="C">
+"DATA",178.301,4,3,19,0)
+<provider>
+"DATA",178.301,4,3,20,0)
+<npi>12011989</npi>
+"DATA",178.301,4,3,21,0)
+<tin>387682321</tin>
+"DATA",178.301,4,3,22,0)
+<waiver-signed>Y</waiver-signed>
+"DATA",178.301,4,3,23,0)
+<encounter-from-date>06-13-2010</encounter-from-date>
+"DATA",178.301,4,3,24,0)
+<encounter-to-date>12-10-2010</encounter-to-date>
+"DATA",178.301,4,3,25,0)
+<measure-group-stat>
+"DATA",178.301,4,3,26,0)
+<ffs-patient-count>2</ffs-patient-count>
+"DATA",178.301,4,3,27,0)
+<group-reporting-rate-numerator>20</group-reporting-rate-numerator>
+"DATA",178.301,4,3,28,0)
+<group-eligible-instances>30</group-eligible-instances>
+"DATA",178.301,4,3,29,0)
+<group-reporting-rate>66.67</group-reporting-rate>
+"DATA",178.301,4,3,30,0)
+</measure-group-stat>
+"DATA",178.301,4,3,31,0)
+<pqri-measure>
+"DATA",178.301,4,3,32,0)
+<pqri-measure-number>128</pqri-measure-number>
+"DATA",178.301,4,3,33,0)
+<eligible-instances>100</eligible-instances>
+"DATA",178.301,4,3,34,0)
+<meets-performance-instances>18</meets-performance-instances>
+"DATA",178.301,4,3,35,0)
+<performance-exclusion-instances>0</performance-exclusion-instances>
+"DATA",178.301,4,3,36,0)
+<performance-not-met-instances>10</performance-not-met-instances>
+"DATA",178.301,4,3,37,0)
+<reporting-rate>28.00</reporting-rate>
+"DATA",178.301,4,3,38,0)
+<performance-rate>90.00</performance-rate>
+"DATA",178.301,4,3,39,0)
+</pqri-measure>
+"DATA",178.301,4,3,40,0)
+</provider>
+"DATA",178.301,4,3,41,0)
+</measure-group>
+"DATA",178.301,4,3,42,0)
+</submission>
+"DATA",178.301,4,8,0)
+^^42^42^3110614^
+"DATA",178.301,4,8,1,0)
+<?xml version="1.0" encoding="utf-8" ?>
+"DATA",178.301,4,8,2,0)
+<submission type="PQRI-REGISTRY" option="PAYMENT" version="2.0" 
+"DATA",178.301,4,8,3,0)
+xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
+"DATA",178.301,4,8,4,0)
+xsi:noNamespaceSchemaLocation="Registry_Payment.xsd">
+"DATA",178.301,4,8,5,0)
+<file-audit-data>
+"DATA",178.301,4,8,6,0)
+<create-date>@@//submission/file-audit-data/create-date@@</create-date>
+"DATA",178.301,4,8,7,0)
+<create-time>@@//submission/file-audit-data/create-time@@</create-time>
+"DATA",178.301,4,8,8,0)
+<create-by>@@//submission/file-audit-data/create-by@@</create-by>
+"DATA",178.301,4,8,9,0)
+<version>@@//submission/file-audit-data/version@@</version>
+"DATA",178.301,4,8,10,0)
+<file-number>@@//submission/file-audit-data/file-number@@</file-number>
+"DATA",178.301,4,8,11,0)
+<number-of-files>@@//submission/file-audit-data/number-of-files@@</number-of-files>
+"DATA",178.301,4,8,12,0)
+</file-audit-data>
+"DATA",178.301,4,8,13,0)
+<registry>
+"DATA",178.301,4,8,14,0)
+<registry-name>@@//submission/registry/registry-name@@</registry-name>
+"DATA",178.301,4,8,15,0)
+<registry-id>@@//submission/registry/registry-id@@</registry-id>
+"DATA",178.301,4,8,16,0)
+<submission-method>@@//submission/registry/submission-method@@</submission-method>
+"DATA",178.301,4,8,17,0)
+</registry>
+"DATA",178.301,4,8,18,0)
+<measure-group ID='C'>
+"DATA",178.301,4,8,19,0)
+<provider>
+"DATA",178.301,4,8,20,0)
+<npi>@@//submission/measure-group/provider/npi@@</npi>
+"DATA",178.301,4,8,21,0)
+<tin>@@//submission/measure-group/provider/tin@@</tin>
+"DATA",178.301,4,8,22,0)
+<waiver-signed>@@//submission/measure-group/provider/waiver-signed@@</waiver-signed>
+"DATA",178.301,4,8,23,0)
+<encounter-from-date>@@//submission/measure-group/provider/encounter-from-date@@</encounter-from-date>
+"DATA",178.301,4,8,24,0)
+<encounter-to-date>@@//submission/measure-group/provider/encounter-to-date@@</encounter-to-date>
+"DATA",178.301,4,8,25,0)
+<measure-group-stat>
+"DATA",178.301,4,8,26,0)
+<ffs-patient-count>@@//submission/measure-group/provider/measure-group-stat/ffs-patient-count@@</ffs-patient-count>
+"DATA",178.301,4,8,27,0)
+<group-reporting-rate-numerator>@@//submission/measure-group/provider/measure-group-stat/group-reporting-rate-numerator@@</group-reporting-rate-numerator>
+"DATA",178.301,4,8,28,0)
+<group-eligible-instances>@@//submission/measure-group/provider/measure-group-stat/group-eligible-instances@@</group-eligible-instances>
+"DATA",178.301,4,8,29,0)
+<group-reporting-rate>@@//submission/measure-group/provider/measure-group-stat/group-reporting-rate@@</group-reporting-rate>
+"DATA",178.301,4,8,30,0)
+</measure-group-stat>
+"DATA",178.301,4,8,31,0)
+<pqri-measure>
+"DATA",178.301,4,8,32,0)
+<pqri-measure-number>@@//submission/measure-group/provider/pqri-measure/pqri-measure-number@@</pqri-measure-number>
+"DATA",178.301,4,8,33,0)
+<eligible-instances>@@//submission/measure-group/provider/pqri-measure/eligible-instances@@</eligible-instances>
+"DATA",178.301,4,8,34,0)
+<meets-performance-instances>@@//submission/measure-group/provider/pqri-measure/meets-performance-instances@@</meets-performance-instances>
+"DATA",178.301,4,8,35,0)
+<performance-exclusion-instances>@@//submission/measure-group/provider/pqri-measure/performance-exclusion-instances@@</performance-exclusion-instances>
+"DATA",178.301,4,8,36,0)
+<performance-not-met-instances>@@//submission/measure-group/provider/pqri-measure/performance-not-met-instances@@</performance-not-met-instances>
+"DATA",178.301,4,8,37,0)
+<reporting-rate>@@//submission/measure-group/provider/pqri-measure/reporting-rate@@</reporting-rate>
+"DATA",178.301,4,8,38,0)
+<performance-rate>@@//submission/measure-group/provider/pqri-measure/performance-rate@@</performance-rate>
+"DATA",178.301,4,8,39,0)
+</pqri-measure>
+"DATA",178.301,4,8,40,0)
+</provider>
+"DATA",178.301,4,8,41,0)
+</measure-group>
+"DATA",178.301,4,8,42,0)
+</submission>
+"DATA",178.301,4,9,0)
+^178.3014^25^25
+"DATA",178.301,4,9,1,0)
+//submission/file-audit-data/create-by
+"DATA",178.301,4,9,1,1)
+a
+"DATA",178.301,4,9,1,2)
+create-by
+"DATA",178.301,4,9,2,0)
+//submission/file-audit-data/create-date
+"DATA",178.301,4,9,2,2)
+create-date
+"DATA",178.301,4,9,3,0)
+//submission/file-audit-data/create-time
+"DATA",178.301,4,9,3,2)
+create-time
+"DATA",178.301,4,9,4,0)
+//submission/file-audit-data/file-number
+"DATA",178.301,4,9,4,2)
+file-number
+"DATA",178.301,4,9,5,0)
+//submission/file-audit-data/number-of-files
+"DATA",178.301,4,9,5,2)
+number-of-files
+"DATA",178.301,4,9,6,0)
+//submission/file-audit-data/version
+"DATA",178.301,4,9,6,2)
+version
+"DATA",178.301,4,9,7,0)
+//submission/measure-group/provider/encounter-from-date
+"DATA",178.301,4,9,7,2)
+encounter-from-date
+"DATA",178.301,4,9,8,0)
+//submission/measure-group/provider/encounter-to-date
+"DATA",178.301,4,9,8,2)
+encounter-to-date
+"DATA",178.301,4,9,9,0)
+//submission/measure-group/provider/measure-group-stat/ffs-patient-count
+"DATA",178.301,4,9,9,2)
+ffs-patient-count
+"DATA",178.301,4,9,10,0)
+//submission/measure-group/provider/measure-group-stat/group-eligible-instances
+"DATA",178.301,4,9,10,2)
+group-eligible-instances
+"DATA",178.301,4,9,11,0)
+//submission/measure-group/provider/measure-group-stat/group-reporting-rate
+"DATA",178.301,4,9,11,2)
+group-reporting-rate
+"DATA",178.301,4,9,12,0)
+//submission/measure-group/provider/measure-group-stat/group-reporting-rate-numerator
+"DATA",178.301,4,9,12,2)
+group-reporting-rate-numerator
+"DATA",178.301,4,9,13,0)
+//submission/measure-group/provider/npi
+"DATA",178.301,4,9,13,2)
+npi
+"DATA",178.301,4,9,14,0)
+//submission/measure-group/provider/pqri-measure/eligible-instances
+"DATA",178.301,4,9,14,2)
+eligible-instances
+"DATA",178.301,4,9,15,0)
+//submission/measure-group/provider/pqri-measure/meets-performance-instances
+"DATA",178.301,4,9,15,2)
+meets-performance-instances
+"DATA",178.301,4,9,16,0)
+//submission/measure-group/provider/pqri-measure/performance-exclusion-instances
+"DATA",178.301,4,9,16,2)
+performance-exclusion-instances
+"DATA",178.301,4,9,17,0)
+//submission/measure-group/provider/pqri-measure/performance-not-met-instances
+"DATA",178.301,4,9,17,2)
+performance-not-met-instances
+"DATA",178.301,4,9,18,0)
+//submission/measure-group/provider/pqri-measure/performance-rate
+"DATA",178.301,4,9,18,2)
+performance-rate
+"DATA",178.301,4,9,19,0)
+//submission/measure-group/provider/pqri-measure/pqri-measure-number
+"DATA",178.301,4,9,19,2)
+pqri-measure-number
+"DATA",178.301,4,9,20,0)
+//submission/measure-group/provider/pqri-measure/reporting-rate
+"DATA",178.301,4,9,20,2)
+reporting-rate
+"DATA",178.301,4,9,21,0)
+//submission/measure-group/provider/tin
+"DATA",178.301,4,9,21,2)
+tin
+"DATA",178.301,4,9,22,0)
+//submission/measure-group/provider/waiver-signed
+"DATA",178.301,4,9,22,2)
+waiver-signed
+"DATA",178.301,4,9,23,0)
+//submission/registry/registry-id
+"DATA",178.301,4,9,23,2)
+registry-id
+"DATA",178.301,4,9,24,0)
+//submission/registry/registry-name
+"DATA",178.301,4,9,24,2)
+registry-name
+"DATA",178.301,4,9,25,0)
+//submission/registry/submission-method
+"DATA",178.301,4,9,25,2)
+submission-method
+"DATA",178.301,5,0)
+PQRI ONE MEASURE
+"DATA",178.301,5,3,0)
+^^12^12^3110620^
+"DATA",178.301,5,3,1,0)
+<?xml version="1.0" encoding="UTF-8"?>
+"DATA",178.301,5,3,2,0)
+<root>
+"DATA",178.301,5,3,3,0)
+<pqri-measure>
+"DATA",178.301,5,3,4,0)
+<pqri-measure-number>@@pqri-measure-number@@</pqri-measure-number>
+"DATA",178.301,5,3,5,0)
+<eligible-instances>@@eligible-instances@@</eligible-instances>
+"DATA",178.301,5,3,6,0)
+<meets-performance-instances>@@meets-performance-instances@@</meets-performance-instances>
+"DATA",178.301,5,3,7,0)
+<performance-exclusion-instances>@@performance-exclusion-instances@@</performance-exclusion-instances>
+"DATA",178.301,5,3,8,0)
+<performance-not-met-instances>@@performance-not-met-instances@@</performance-not-met-instances>
+"DATA",178.301,5,3,9,0)
+<reporting-rate>@@reporting-rate@@</reporting-rate>
+"DATA",178.301,5,3,10,0)
+<performance-rate>@@performance-rate@@</performance-rate>
+"DATA",178.301,5,3,11,0)
+</pqri-measure>
+"DATA",178.301,5,3,12,0)
+</root>
+"FIA",170)
+CCR DICTIONARY
+"FIA",170,0)
+^C0CDIC(170,
+"FIA",170,0,0)
+170
+"FIA",170,0,1)
+y^y^f^^n^^y^o^n
+"FIA",170,0,10)
+
+"FIA",170,0,11)
+
+"FIA",170,0,"RLRO")
+
+"FIA",170,0,"VR")
+1.2^C0C
+"FIA",170,170)
+0
+"FIA",170,170.01)
+0
+"FIA",170,170.04)
+0
+"FIA",170,170.08)
+0
+"FIA",170,170.81)
+0
+"FIA",170.101)
+CCR NODE TYPE
+"FIA",170.101,0)
+^C0CDIC(170.101,
+"FIA",170.101,0,0)
+170.101
+"FIA",170.101,0,1)
+y^y^f^^n^^y^o^n
+"FIA",170.101,0,10)
+
+"FIA",170.101,0,11)
+
+"FIA",170.101,0,"RLRO")
+
+"FIA",170.101,0,"VR")
+1.2^C0C
+"FIA",170.101,170.101)
+0
+"FIA",170.101,170.1012)
+0
+"FIA",170.101,170.1013)
+0
+"FIA",170.9)
+C0C PARAMETERS
+"FIA",170.9,0)
+^C0CPARM(
+"FIA",170.9,0,0)
+170.9
+"FIA",170.9,0,1)
+y^y^f^^n^^y^o^n
+"FIA",170.9,0,10)
+
+"FIA",170.9,0,11)
+
+"FIA",170.9,0,"RLRO")
+
+"FIA",170.9,0,"VR")
+1.2^C0C
+"FIA",170.9,170.9)
+0
+"FIA",171.101)
+CCR E2
+"FIA",171.101,0)
+^C0CE(
+"FIA",171.101,0,0)
+171.101P
+"FIA",171.101,0,1)
+y^y^f^^^^n
+"FIA",171.101,0,10)
+
+"FIA",171.101,0,11)
+
+"FIA",171.101,0,"RLRO")
+
+"FIA",171.101,0,"VR")
+1.2^C0C
+"FIA",171.101,171.101)
+0
+"FIA",171.101,171.111)
+0
+"FIA",171.101,171.121)
+0
+"FIA",171.101,171.131)
+0
+"FIA",171.101,171.1311)
+0
+"FIA",171.401)
+CCR SOURCE
+"FIA",171.401,0)
+^C0C(171.401,
+"FIA",171.401,0,0)
+171.401
+"FIA",171.401,0,1)
+y^y^f^^^^n
+"FIA",171.401,0,10)
+
+"FIA",171.401,0,11)
+
+"FIA",171.401,0,"RLRO")
+
+"FIA",171.401,0,"VR")
+1.2^C0C
+"FIA",171.401,171.401)
+0
+"FIA",171.401,171.4011)
+0
+"FIA",171.401,171.4012)
+0
+"FIA",175)
+C0C INCOMING XML
+"FIA",175,0)
+^C0CIN(
+"FIA",175,0,0)
+175PI
+"FIA",175,0,1)
+y^y^f^^^^n
+"FIA",175,0,10)
+
+"FIA",175,0,11)
+
+"FIA",175,0,"RLRO")
+
+"FIA",175,0,"VR")
+1.2^C0C
+"FIA",175,175)
+0
+"FIA",175,175.04)
+0
+"FIA",175,175.08)
+0
+"FIA",175,175.09)
+0
+"FIA",175,175.81)
+0
+"FIA",175,175.82)
+0
+"FIA",175,175.83)
+0
+"FIA",176.112)
+C0C RXNORM VUID EXPANSION
+"FIA",176.112,0)
+^C0CCODES(176.112,
+"FIA",176.112,0,0)
+176.112I
+"FIA",176.112,0,1)
+y^y^f^^n^^y^o^n
+"FIA",176.112,0,10)
+
+"FIA",176.112,0,11)
+
+"FIA",176.112,0,"RLRO")
+
+"FIA",176.112,0,"VR")
+1.2^C0C
+"FIA",176.112,176.112)
+0
+"FIA",177.101)
+CCR PATIENT SUBSCRIPTIONS
+"FIA",177.101,0)
+^C0CS(
+"FIA",177.101,0,0)
+177.101P
+"FIA",177.101,0,1)
+y^y^f^^^^n
+"FIA",177.101,0,10)
+
+"FIA",177.101,0,11)
+
+"FIA",177.101,0,"RLRO")
+
+"FIA",177.101,0,"VR")
+1.2^C0C
+"FIA",177.101,177.101)
+0
+"FIA",177.101,177.1011)
+0
+"FIA",177.101,177.1012)
+0
+"FIA",177.101,177.10121)
+0
+"FIA",177.201)
+CCR SUBSCRIBERS
+"FIA",177.201,0)
+^C0C(177.201,
+"FIA",177.201,0,0)
+177.201
+"FIA",177.201,0,1)
+y^y^f^^n^^y^o^n
+"FIA",177.201,0,10)
+
+"FIA",177.201,0,11)
+
+"FIA",177.201,0,"RLRO")
+
+"FIA",177.201,0,"VR")
+1.2^C0C
+"FIA",177.201,177.201)
+0
+"FIA",177.301)
+C0C BATCH CONTROL
+"FIA",177.301,0)
+^C0CB(
+"FIA",177.301,0,0)
+177.301D
+"FIA",177.301,0,1)
+y^y^f^^^^n
+"FIA",177.301,0,10)
+
+"FIA",177.301,0,11)
+
+"FIA",177.301,0,"RLRO")
+
+"FIA",177.301,0,"VR")
+1.2^C0C
+"FIA",177.301,177.301)
+0
+"FIA",177.301,177.3013)
+0
+"FIA",178.101)
+C0C XDS PROTOTYPE
+"FIA",178.101,0)
+^C0CXDS(178.101,
+"FIA",178.101,0,0)
+178.101I
+"FIA",178.101,0,1)
+y^y^f^^n^^y^o^n
+"FIA",178.101,0,10)
+
+"FIA",178.101,0,11)
+
+"FIA",178.101,0,"RLRO")
+
+"FIA",178.101,0,"VR")
+1.2^C0C
+"FIA",178.101,178.101)
+0
+"FIA",178.101,178.1012)
+0
+"FIA",178.101,178.1013)
+0
+"FIA",178.101,178.1014)
+0
+"FIA",178.101,178.111)
+0
+"FIA",178.101,178.121)
+0
+"FIA",178.301)
+C0C XML MISC
+"FIA",178.301,0)
+^C0CX(178.301,
+"FIA",178.301,0,0)
+178.301
+"FIA",178.301,0,1)
+y^y^f^^n^^y^o^n
+"FIA",178.301,0,10)
+
+"FIA",178.301,0,11)
+
+"FIA",178.301,0,"RLRO")
+
+"FIA",178.301,0,"VR")
+1.2^C0C
+"FIA",178.301,178.301)
+0
+"FIA",178.301,178.3013)
+0
+"FIA",178.301,178.3014)
+0
+"FIA",178.301,178.311)
+0
+"FIA",178.301,178.321)
+0
+"INI")
+PRE^C0CENV
+"INIT")
+POST^C0CENV
+"IX",170,170,"C",0)
+170^C^A whole file cross reference of Variables by Coding System^R^^F^IR^W^170.08^^^^^LS
+"IX",170,170,"C",1)
+S ^C0CDIC(170,"C",X,DA(1),DA)=""
+"IX",170,170,"C",2)
+K ^C0CDIC(170,"C",X,DA(1),DA)
+"IX",170,170,"C",2.5)
+K ^C0CDIC(170,"C")
+"IX",170,170,"C",11.1,0)
+^.114IA^1^1
+"IX",170,170,"C",11.1,1,0)
+1^F^170.08^.01^^1^F
+"IX",170,170,"D",0)
+170^D^Regular whole file cross index by section^R^^F^IR^I^170^^^^^LS
+"IX",170,170,"D",1)
+S ^C0CDIC(170,"D",X,DA)=""
+"IX",170,170,"D",2)
+K ^C0CDIC(170,"D",X,DA)
+"IX",170,170,"D",2.5)
+K ^C0CDIC(170,"D")
+"IX",170,170,"D",11.1,0)
+^.114IA^1^1
+"IX",170,170,"D",11.1,1,0)
+1^F^170^10^^1^F
+"IX",170,170,"D",11.1,1,3)
+
+"IX",170,170,"E",0)
+170^E^REGULAR INDEX OF ELEMENT AND XPATH^R^^R^IR^I^170^^^^^LS
+"IX",170,170,"E",1)
+S ^C0CDIC(170,"E",$E(X(3),1,40),$E(X(2),1,240),DA)=""
+"IX",170,170,"E",2)
+K ^C0CDIC(170,"E",$E(X(3),1,40),$E(X(2),1,240),DA)
+"IX",170,170,"E",2.5)
+K ^C0CDIC(170,"E")
+"IX",170,170,"E",11.1,0)
+^.114IA^3^3
+"IX",170,170,"E",11.1,1,0)
+1^F^170^12^^^F
+"IX",170,170,"E",11.1,1,3)
+
+"IX",170,170,"E",11.1,2,0)
+2^F^170^2^240^2^F
+"IX",170,170,"E",11.1,2,3)
+
+"IX",170,170,"E",11.1,3,0)
+3^C^^^40^1
+"IX",170,170,"E",11.1,3,1.5)
+S X=$$GET1^DIQ(170.101,X(1)_",",.01,"E")
+"IX",170,170,"SECTION",0)
+170^SECTION^Regular cross reference on the section field^R^^F^IR^I^170^^^^^LS
+"IX",170,170,"SECTION",1)
+S ^C0CDIC(170,"SECTION",X,DA)=""
+"IX",170,170,"SECTION",2)
+K ^C0CDIC(170,"SECTION",X,DA)
+"IX",170,170,"SECTION",2.5)
+K ^C0CDIC(170,"SECTION")
+"IX",170,170,"SECTION",11.1,0)
+^.114IA^1^1
+"IX",170,170,"SECTION",11.1,1,0)
+1^F^170^12^^1^
+"IX",170,170,"XPATH",0)
+170^XPATH^REGULAR INDEX ON XPATH^R^^F^IR^I^170^^^^^LS
+"IX",170,170,"XPATH",1)
+S ^C0CDIC(170,"XPATH",$E(X,1,240),DA)=""
+"IX",170,170,"XPATH",2)
+K ^C0CDIC(170,"XPATH",$E(X,1,240),DA)
+"IX",170,170,"XPATH",2.5)
+K ^C0CDIC(170,"XPATH")
+"IX",170,170,"XPATH",11.1,0)
+^.114IA^1^1
+"IX",170,170,"XPATH",11.1,1,0)
+1^F^170^2^240^1^F
+"IX",171.101,171.101,"E",0)
+171.101^E^REGULAR WHOLE FILE CROSS INDEX FOR ELEMENT TYPE^R^^F^IR^W^171.121^^^^^LS
+"IX",171.101,171.101,"E",1)
+S ^C0CE("E",X,DA(2),DA(1),DA)=""
+"IX",171.101,171.101,"E",2)
+K ^C0CE("E",X,DA(2),DA(1),DA)
+"IX",171.101,171.101,"E",2.5)
+K ^C0CE("E")
+"IX",171.101,171.101,"E",11.1,0)
+^.114IA^1^1
+"IX",171.101,171.101,"E",11.1,1,0)
+1^F^171.121^.01^^1^
+"IX",171.101,171.101,"E",11.1,1,3)
+
+"IX",175,175,"C0EADDR",0)
+175^C0EADDR^Lookup and sort the sending email address^R^^F^IR^I^175^^^^^LS
+"IX",175,175,"C0EADDR",1)
+S ^C0CIN("C0EADDR",$E(X,1,99),DA)=""
+"IX",175,175,"C0EADDR",2)
+K ^C0CIN("C0EADDR",$E(X,1,99),DA)
+"IX",175,175,"C0EADDR",2.5)
+K ^C0CIN("C0EADDR")
+"IX",175,175,"C0EADDR",11.1,0)
+^.114IA^1^1
+"IX",175,175,"C0EADDR",11.1,1,0)
+1^F^175^9^99^1^F
+"IX",176.112,176.112,"C",0)
+176.112^C^Regular index of the VUID TEXT field for matching on RPMS^R^^F^IR^I^176.112^^^^^LS
+"IX",176.112,176.112,"C",1)
+S ^C0CCODES(176.112,"C",$E(X,1,30),DA)=""
+"IX",176.112,176.112,"C",2)
+K ^C0CCODES(176.112,"C",$E(X,1,30),DA)
+"IX",176.112,176.112,"C",2.5)
+K ^C0CCODES(176.112,"C")
+"IX",176.112,176.112,"C",11.1,0)
+^.114IA^1^1
+"IX",176.112,176.112,"C",11.1,1,0)
+1^F^176.112^2^30^1^F
+"IX",176.112,176.112,"C",11.1,1,3)
+
+"IX",176.112,176.112,"RXNORM",0)
+176.112^RXNORM^Regular index of the RXNORM values^R^^F^IR^I^176.112^^^^^LS
+"IX",176.112,176.112,"RXNORM",1)
+S ^C0CCODES(176.112,"RXNORM",$E(X,1,30),DA)=""
+"IX",176.112,176.112,"RXNORM",2)
+K ^C0CCODES(176.112,"RXNORM",$E(X,1,30),DA)
+"IX",176.112,176.112,"RXNORM",2.5)
+K ^C0CCODES(176.112,"RXNORM")
+"IX",176.112,176.112,"RXNORM",11.1,0)
+^.114IA^1^1
+"IX",176.112,176.112,"RXNORM",11.1,1,0)
+1^F^176.112^1^30^1^F
+"IX",178.101,178.101,"B",0)
+178.101^B^Regular B index but allow length of 100^R^^F^IR^I^178.101^^^^^LS
+"IX",178.101,178.101,"B",1)
+S ^C0CXDS(178.101,"B",$E(X,1,100),DA)=""
+"IX",178.101,178.101,"B",2)
+K ^C0CXDS(178.101,"B",$E(X,1,100),DA)
+"IX",178.101,178.101,"B",2.5)
+K ^C0CXDS(178.101,"B")
+"IX",178.101,178.101,"B",11.1,0)
+^.114IA^1^1
+"IX",178.101,178.101,"B",11.1,1,0)
+1^F^178.101^.01^100^1^F
+"IX",178.101,178.101,"B",11.1,1,3)
+
+"IX",178.101,178.101,"C",0)
+178.101^C^Uniqueness Index for Key 'A' of File #178.101^R^^R^IR^I^178.101^^^^^LS
+"IX",178.101,178.101,"C",1)
+S ^C0CXDS(178.101,"C",X(1),X(2),DA)=""
+"IX",178.101,178.101,"C",2)
+K ^C0CXDS(178.101,"C",X(1),X(2),DA)
+"IX",178.101,178.101,"C",2.5)
+K ^C0CXDS(178.101,"C")
+"IX",178.101,178.101,"C",11.1,0)
+^.114IA^2^2
+"IX",178.101,178.101,"C",11.1,1,0)
+1^F^178.101^.01^^1
+"IX",178.101,178.101,"C",11.1,2,0)
+2^F^178.101^.02^^2
+"IX",178.101,178.101,"D",0)
+178.101^D^REGULAR INDEX FOR WHERE USED TEMPLATES^R^^F^IR^W^178.111^^^^^LS
+"IX",178.101,178.101,"D",1)
+S ^C0CXDS(178.101,"D",$E(X,1,60),DA(1),DA)=""
+"IX",178.101,178.101,"D",2)
+K ^C0CXDS(178.101,"D",$E(X,1,60),DA(1),DA)
+"IX",178.101,178.101,"D",2.5)
+K ^C0CXDS(178.101,"D")
+"IX",178.101,178.101,"D",11.1,0)
+^.114IA^1^1
+"IX",178.101,178.101,"D",11.1,1,0)
+1^F^178.111^.01^60^1^F
+"IX",178.101,178.101,"TID",0)
+178.101^TID^Regular index on the Template ID^R^^F^IR^I^178.101^^^^^LS
+"IX",178.101,178.101,"TID",1)
+S ^C0CXDS(178.101,"TID",$E(X,1,100),DA)=""
+"IX",178.101,178.101,"TID",2)
+K ^C0CXDS(178.101,"TID",$E(X,1,100),DA)
+"IX",178.101,178.101,"TID",2.5)
+K ^C0CXDS(178.101,"TID")
+"IX",178.101,178.101,"TID",11.1,0)
+^.114IA^1^1
+"IX",178.101,178.101,"TID",11.1,1,0)
+1^F^178.101^1^100^1^F
+"IX",178.301,178.301,"XPATH",0)
+178.301^XPATH^REGULAR WHOLE FILE INDEX ON XPATH BY TEMPLATE^R^^F^IR^W^178.3014^^^^^LS
+"IX",178.301,178.301,"XPATH",1)
+S ^C0CX(178.301,"XPATH",X(2),$E(X(1),1,240),DA(1),DA)=""
+"IX",178.301,178.301,"XPATH",2)
+K ^C0CX(178.301,"XPATH",X(2),$E(X(1),1,240),DA(1),DA)
+"IX",178.301,178.301,"XPATH",2.5)
+K ^C0CX(178.301,"XPATH")
+"IX",178.301,178.301,"XPATH",11.1,0)
+^.114IA^2^2
+"IX",178.301,178.301,"XPATH",11.1,1,0)
+1^F^178.3014^.01^240^2^F
+"IX",178.301,178.301,"XPATH",11.1,1,3)
+
+"IX",178.301,178.301,"XPATH",11.1,2,0)
+2^C^^^^1
+"IX",178.301,178.301,"XPATH",11.1,2,1.5)
+S X=DA(1)
+"KEY",178.101,178.101,"A",0)
+178.101^A^P^560
+"KEY",178.101,178.101,"A",2,0)
+^.312IA^2^2
+"KEY",178.101,178.101,"A",2,1,0)
+.01^178.101^1
+"KEY",178.101,178.101,"A",2,2,0)
+.02^178.101^2
+"KEYPTR",178.101,178.101,"A")
+178.101^C
+"KRN",19,10999,-1)
+0^9
+"KRN",19,10999,0)
+C0C STATUS OF CCR BATCH^STATUS OF CCR BATCH^^I^^^^^^^^
+"KRN",19,10999,30)
+C0CB(
+"KRN",19,10999,31)
+AEMQ
+"KRN",19,10999,63)
+[C
+"KRN",19,10999,80)
+C0CB(
+"KRN",19,10999,"U")
+STATUS OF CCR BATCH
+"KRN",19,11000,-1)
+0^8
+"KRN",19,11000,0)
+C0C START CCR BATCH PROCESSING^BEGIN CCR BATCH PROCESSING^^A^^^^^^^^^^1
+"KRN",19,11000,20)
+D START^C0CBAT
+"KRN",19,11000,"U")
+BEGIN CCR BATCH PROCESSING
+"KRN",19,11001,-1)
+0^1
+"KRN",19,11001,0)
+C0C BATCH OPTIONS^BATCH CCR OPTIONS^^M^^^^^^^^
+"KRN",19,11001,10,0)
+^19.01IP^3^3
+"KRN",19,11001,10,1,0)
+11000
+"KRN",19,11001,10,1,"^")
+C0C START CCR BATCH PROCESSING
+"KRN",19,11001,10,2,0)
+10999
+"KRN",19,11001,10,2,"^")
+C0C STATUS OF CCR BATCH
+"KRN",19,11001,10,3,0)
+11007
+"KRN",19,11001,10,3,"^")
+C0C KILL BATCH JOB
+"KRN",19,11001,99)
+62587,50123
+"KRN",19,11001,"U")
+BATCH CCR OPTIONS
+"KRN",19,11002,-1)
+0^3
+"KRN",19,11002,0)
+C0C CCR MENU^CCR MENU^^M^^^^^^^^
+"KRN",19,11002,10,0)
+^19.01IP^5^5
+"KRN",19,11002,10,1,0)
+11001
+"KRN",19,11002,10,1,"^")
+C0C BATCH OPTIONS
+"KRN",19,11002,10,2,0)
+11003
+"KRN",19,11002,10,2,"^")
+C0C CCR EXPORT BY PATIENT NAME
+"KRN",19,11002,10,3,0)
+11005
+"KRN",19,11002,10,3,"^")
+C0C DISPLAY ELEMENTS
+"KRN",19,11002,10,4,0)
+11004
+"KRN",19,11002,10,4,"^")
+C0C DISPLAY PATIENT VARIABLES
+"KRN",19,11002,10,5,0)
+11006
+"KRN",19,11002,10,5,"^")
+C0C LIST RIM CATEGORIES
+"KRN",19,11002,99)
+62587,50123
+"KRN",19,11002,"U")
+CCR MENU
+"KRN",19,11003,-1)
+0^2
+"KRN",19,11003,0)
+C0C CCR EXPORT BY PATIENT NAME^CCR EXPORT BY PATIENT NAME^^A^^^^^^^^^^1
+"KRN",19,11003,20)
+D EXPORT^C0CCCR
+"KRN",19,11003,"U")
+CCR EXPORT BY PATIENT NAME
+"KRN",19,11004,-1)
+0^5
+"KRN",19,11004,0)
+C0C DISPLAY PATIENT VARIABLES^VARIABLES DISPLAY^^A^^^^^^^^^^1^1^^
+"KRN",19,11004,15)
+D DPATV^C0CRIMA($P(Y,U,1))
+"KRN",19,11004,20)
+S DIC=2,DIC(0)="AEMQ" D ^DIC I Y<1 Q
+"KRN",19,11004,26)
+
+"KRN",19,11004,"U")
+VARIABLES DISPLAY
+"KRN",19,11005,-1)
+0^4
+"KRN",19,11005,0)
+C0C DISPLAY ELEMENTS^ELEMENT DISPLAY^^I^^^^^^^^^^
+"KRN",19,11005,20)
+
+"KRN",19,11005,30)
+C0CE(
+"KRN",19,11005,31)
+AEMQ
+"KRN",19,11005,63)
+[C
+"KRN",19,11005,80)
+C0CE(
+"KRN",19,11005,"U")
+ELEMENT DISPLAY
+"KRN",19,11006,-1)
+0^7
+"KRN",19,11006,0)
+C0C LIST RIM CATEGORIES^LIST RIM CATEGORIES^^A^^^^^^^^^^1
+"KRN",19,11006,20)
+D CLIST^C0CRIMA
+"KRN",19,11006,"U")
+LIST RIM CATEGORIES
+"KRN",19,11007,-1)
+0^6
+"KRN",19,11007,0)
+C0C KILL BATCH JOB^KILL CCR BATCH PROCESSING^^A^^^^^^^^^^1
+"KRN",19,11007,20)
+D STOP^C0CBAT
+"KRN",19,11007,"U")
+KILL CCR BATCH PROCESSING
+"KRN",19,11008,-1)
+0^10
+"KRN",19,11008,0)
+C0C CCR RPC^CCR RPC^^B^^^^^^^^^y
+"KRN",19,11008,"RPC",0)
+^19.05P^1^1
+"KRN",19,11008,"RPC",1,0)
+C0C CCR RPC
+"KRN",19,11008,"U")
+CCR RPC
+"KRN",8994,2518,-1)
+0^1
+"KRN",8994,2518,0)
+C0C CCR RPC^CCRRPC^C0CCCR^2^P
+"KRN",8994,2518,1,0)
+^8994.01^1^1^3090717^^
+"KRN",8994,2518,1,1,0)
+RPC TO RETURN A PATIENT'S CCR
+"KRN",8994,2518,2,0)
+^8994.02A^3^3
+"KRN",8994,2518,2,1,0)
+DFN^1^30^1^1
+"KRN",8994,2518,2,1,1,0)
+^^1^1^3090707^
+"KRN",8994,2518,2,1,1,1,0)
+PATIENT RECORD NUMBER
+"KRN",8994,2518,2,2,0)
+CCRPARMS^1^200^0^2
+"KRN",8994,2518,2,2,1,0)
+^^1^1^3090707^
+"KRN",8994,2518,2,2,1,1,0)
+PARAMETERS TO OVERRIDE DEFAULTS FOR EXTRACTING THE CCR
+"KRN",8994,2518,2,3,0)
+CCRPART^1^20^^3
+"KRN",8994,2518,2,"B","CCRPARM",2)
+
+"KRN",8994,2518,2,"B","CCRPARMS",2)
+
+"KRN",8994,2518,2,"B","CCRPART",3)
+
+"KRN",8994,2518,2,"B","DFN",1)
+
+"KRN",8994,2518,2,"PARAMSEQ",1,1)
+
+"KRN",8994,2518,2,"PARAMSEQ",2,2)
+
+"KRN",8994,2518,2,"PARAMSEQ",3,3)
+
+"MBREQ")
+0
+"ORD",16,8994)
+8994;16;1;;;;;;;RPCDEL^XPDIA1
+"ORD",16,8994,0)
+REMOTE PROCEDURE
+"ORD",18,19)
+19;18;;;OPT^XPDTA;OPTF1^XPDIA;OPTE1^XPDIA;OPTF2^XPDIA;;OPTDEL^XPDIA
+"ORD",18,19,0)
+OPTION
+"PKG",212,-1)
+1^1
+"PKG",212,0)
+CCD/CCR GENERATION UTILITIES^C0C^Utilities for the Generation of the CCD/C32/CCR
+"PKG",212,20,0)
+^9.402P^^
+"PKG",212,22,0)
+^9.49I^1^1
+"PKG",212,22,1,0)
+1.2^3120510
+"PKG",212,22,1,1,0)
+^^185^185^3120510
+"PKG",212,22,1,1,1,0)
+CCR Project release v1.2
+"PKG",212,22,1,1,2,0)
+ 
+"PKG",212,22,1,1,3,0)
+The purpose of the CCR package is to provide support for exporting and 
+"PKG",212,22,1,1,4,0)
+eventually importing patient information from/to VistA in XML documents 
+"PKG",212,22,1,1,5,0)
+conforming to the Continuity of Care Record (CCR - ASTM) and Continuity 
+"PKG",212,22,1,1,6,0)
+of Care Document (CCD - HL7) standards.
+"PKG",212,22,1,1,7,0)
+ 
+"PKG",212,22,1,1,8,0)
+This version of the CCR package provides:
+"PKG",212,22,1,1,9,0)
+ 
+"PKG",212,22,1,1,10,0)
+EXPORT^C0CCCR
+"PKG",212,22,1,1,11,0)
+A command line interface to export a single patient's CCR to a host 
+"PKG",212,22,1,1,12,0)
+directory by specifying the patient by name.
+"PKG",212,22,1,1,13,0)
+ 
+"PKG",212,22,1,1,14,0)
+EXPORT^C0CCCD
+"PKG",212,22,1,1,15,0)
+A command line interface to export a single patient's CCD to a host 
+"PKG",212,22,1,1,16,0)
+directory by specifying the patient by name. As an alternative to 
+"PKG",212,22,1,1,17,0)
+generating the CCD directly, an XSLT transformation is available to 
+"PKG",212,22,1,1,18,0)
+translate a CCR into a level 2 CCD. This tranformation has been tested 
+"PKG",212,22,1,1,19,0)
+and produces a CCD with all currently supported sections of the CCR. The 
+"PKG",212,22,1,1,20,0)
+EXPORT^C0CCCD only extracts the PROBLEMS section into a CCD.
+"PKG",212,22,1,1,21,0)
+ 
+"PKG",212,22,1,1,22,0)
+XPAT^C0CCCR(DFN,OUTDIR,OUTFILE)
+"PKG",212,22,1,1,23,0)
+A command line and program interface to export a single patient's CCR 
+"PKG",212,22,1,1,24,0)
+using the IEN of the patient in the ^DPT file (DFN).
+"PKG",212,22,1,1,25,0)
+OUTDIR specifies an existing directory on the Host system into which the 
+"PKG",212,22,1,1,26,0)
+CCR XML document will be written. If OUTDIR is null (""), the output 
+"PKG",212,22,1,1,27,0)
+directory name will be taken from ^TMP("C0CCCR","ODIR").
+"PKG",212,22,1,1,28,0)
+OUFILE specifies the host file name of the CCR XML document that will be 
+"PKG",212,22,1,1,29,0)
+written for this patient. If OUTFILE is null ("") the document name will 
+"PKG",212,22,1,1,30,0)
+default to PAT_x_CCR_V1.xml where x is the DFN of the patient.
+"PKG",212,22,1,1,31,0)
+ 
+"PKG",212,22,1,1,32,0)
+CCRRPC(CCRGRTN,DFN,CCRPARMS,CCRPART)
+"PKG",212,22,1,1,33,0)
+An RPC and program interface to return in return array CCRGRTN (passed by 
+"PKG",212,22,1,1,34,0)
+reference) a single patient's CCR.
+"PKG",212,22,1,1,35,0)
+DFN is the patient's IEN
+"PKG",212,22,1,1,36,0)
+CCRPART is what portion of the CCR should be returned. If "CCR" is 
+"PKG",212,22,1,1,37,0)
+specified, the entire CCR will be returned. If "PROBLEMS", "VITALS", or 
+"PKG",212,22,1,1,38,0)
+"MEDICATIONS" is specified, only that section of the CCR will be returned.
+"PKG",212,22,1,1,39,0)
+CCRPARMS ARE PARAMETERS THAT AFFECT THE EXTRACTION
+"PKG",212,22,1,1,40,0)
+IN THE FORM "PARM1:VALUE1^PARM2:VALUE2"
+"PKG",212,22,1,1,41,0)
+EXAMPLE: "LABLIMIT:T-60" TO LIMIT LAB EXTRACTION TO THE LAST 60 DAYS
+"PKG",212,22,1,1,42,0)
+SEE C0CPARMS FOR A COMPLETE LIST OF SUPPORTED PARAMETERS
+"PKG",212,22,1,1,43,0)
+ 
+"PKG",212,22,1,1,44,0)
+ANALYZE^C0CRIMA(BGNDFN,DFNCNT,CCRPARMS)
+"PKG",212,22,1,1,45,0)
+A command line and program interface to analyze the data from multiple 
+"PKG",212,22,1,1,46,0)
+patients into categories that can be batch extracted.
+"PKG",212,22,1,1,47,0)
+BGNDFN is the beginning DFN to be analyzed. If BGNDFN is null ("") its 
+"PKG",212,22,1,1,48,0)
+value will be taken from ^TMP("C0CRIM","RESUME"). If this variable does 
+"PKG",212,22,1,1,49,0)
+not exist, the routine will start with the first IEN in the patient file 
+"PKG",212,22,1,1,50,0)
+^DPT. ^TMP("C0CRIM","RESUME") is updated to the "next" patient to be 
+"PKG",212,22,1,1,51,0)
+analyzed on successful completion.
+"PKG",212,22,1,1,52,0)
+DFNCNT is the count of how many patient records will be analyzed in this 
+"PKG",212,22,1,1,53,0)
+execution.
+"PKG",212,22,1,1,54,0)
+For example ANALYZE^C0CRIMA(1000,1000) would start at patient DFN 1000 
+"PKG",212,22,1,1,55,0)
+and analyzes 1000 patient records. ANALYZE^C0CRIMA("",1000) would then 
+"PKG",212,22,1,1,56,0)
+analyze the next 1000 patients. When the end of the patient file is 
+"PKG",212,22,1,1,57,0)
+reached, the routine terminates with a message that RESET^C0CRIMA would 
+"PKG",212,22,1,1,58,0)
+need to be called to restart the analysis.
+"PKG",212,22,1,1,59,0)
+ 
+"PKG",212,22,1,1,60,0)
+The categories into which the records are analyzed consist of attribute 
+"PKG",212,22,1,1,61,0)
+strings. The attributes represent characteristics of the variables that 
+"PKG",212,22,1,1,62,0)
+can be extracted for a given patient into the CCR or the CCD. This 
+"PKG",212,22,1,1,63,0)
+version supports the following attributes:
+"PKG",212,22,1,1,64,0)
+VITALS : the patient has variables for the VITALS section of the CCR/CCD
+"PKG",212,22,1,1,65,0)
+PROBLEMS : the patient has variables for the PROBLEMS section of the 
+"PKG",212,22,1,1,66,0)
+CCR/CCD
+"PKG",212,22,1,1,67,0)
+MEDS : the patient has variables for the MEDICATIONS section of the 
+"PKG",212,22,1,1,68,0)
+CCR/CCD
+"PKG",212,22,1,1,69,0)
+HEADER : the patient has variables for the HEADER section of the CCR/CCD. 
+"PKG",212,22,1,1,70,0)
+All patients are marked with the HEADER attribute in this version.
+"PKG",212,22,1,1,71,0)
+NOTEXTRACTED : the CCR or CCD has not yet been produced/extracted for 
+"PKG",212,22,1,1,72,0)
+this patient. All patient records are marked with the NOTEXTRACTED 
+"PKG",212,22,1,1,73,0)
+attribute in this version for batch control processing (not implemented 
+"PKG",212,22,1,1,74,0)
+in this version).
+"PKG",212,22,1,1,75,0)
+ 
+"PKG",212,22,1,1,76,0)
+ANAZYZE^C0CRIMA calls the variable extraction routines that would be used 
+"PKG",212,22,1,1,77,0)
+to produce a CCR or a CCD and saves the results to ^TMP("C0CRIM",DFN) for 
+"PKG",212,22,1,1,78,0)
+each patient. In addition, the attribute string for each patient is saved 
+"PKG",212,22,1,1,79,0)
+in ^TMP("C0CRIM","ATTR")
+"PKG",212,22,1,1,80,0)
+ 
+"PKG",212,22,1,1,81,0)
+Categories are created as they first occur based on each unique 
+"PKG",212,22,1,1,82,0)
+combination of attributes that is encountered. They are named after the 
+"PKG",212,22,1,1,83,0)
+attribute table that is used for the analysis. This version supports only 
+"PKG",212,22,1,1,84,0)
+the attribute table .RIMTBL. and the categories are named "RIMTBL_x". An 
+"PKG",212,22,1,1,85,0)
+example set of categories from a demo systems is:
+"PKG",212,22,1,1,86,0)
+ 
+"PKG",212,22,1,1,87,0)
+GTM>D CLIST^C0CRIMA
+"PKG",212,22,1,1,88,0)
+(RIMTBL_1:105) ^NOTEXTRACTED^HEADER^^^PROBLEMS^^^^^VITALS^^^^^MEDS
+"PKG",212,22,1,1,89,0)
+(RIMTBL_2:596) ^NOTEXTRACTED^HEADER^^^^^^^^VITALS
+"PKG",212,22,1,1,90,0)
+(RIMTBL_3:44) ^NOTEXTRACTED^HEADER^^^PROBLEMS^^^^^VITALS
+"PKG",212,22,1,1,91,0)
+(RIMTBL_4:821) ^NOTEXTRACTED^HEADER
+"PKG",212,22,1,1,92,0)
+(RIMTBL_5:18) ^NOTEXTRACTED^HEADER^^^^^^^^VITALS^^^^^MEDS
+"PKG",212,22,1,1,93,0)
+(RIMTBL_6:14) ^NOTEXTRACTED^HEADER^^^PROBLEMS
+"PKG",212,22,1,1,94,0)
+(RIMTBL_7:15) ^NOTEXTRACTED^HEADER^^^^^^^^^^^^^MEDS
+"PKG",212,22,1,1,95,0)
+(RIMTBL_8:5) ^NOTEXTRACTED^HEADER^^^PROBLEMS^^^^^^^^^^MEDS
+"PKG",212,22,1,1,96,0)
+ 
+"PKG",212,22,1,1,97,0)
+for RIMTBL_1 in this example, 105 is the record count of patients who 
+"PKG",212,22,1,1,98,0)
+have this combination of attributes. The list of patients for each 
+"PKG",212,22,1,1,99,0)
+category is also maintained for batch extraction.
+"PKG",212,22,1,1,100,0)
+ 
+"PKG",212,22,1,1,101,0)
+CLIST^C0CRIMA
+"PKG",212,22,1,1,102,0)
+A command line interface to show a summary of the categories, record 
+"PKG",212,22,1,1,103,0)
+counts, and attributes that have been analyzed so far. It produces the 
+"PKG",212,22,1,1,104,0)
+listing in the example above from information stored in 
+"PKG",212,22,1,1,105,0)
+^TMP("C0CRIM","CATS","RIMTBL"). It is intended for future versions that 
+"PKG",212,22,1,1,106,0)
+attribute tables be supported in addition to the default "RIMTBL".
+"PKG",212,22,1,1,107,0)
+ 
+"PKG",212,22,1,1,108,0)
+CPAT^C0CRIMA(CPATCAT)
+"PKG",212,22,1,1,109,0)
+A command line interface which shows the DFN numbers of the patients 
+"PKG",212,22,1,1,110,0)
+represented by the category CPATCAT. DFNs are listed 10 per line. For 
+"PKG",212,22,1,1,111,0)
+example:
+"PKG",212,22,1,1,112,0)
+ 
+"PKG",212,22,1,1,113,0)
+GTM>D CPAT^C0CRIMA("RIMTBL_1")
+"PKG",212,22,1,1,114,0)
+1 3 8 25 42 69 123 140 146 149
+"PKG",212,22,1,1,115,0)
+151 168 204 205 217 218 224 228 229 231
+"PKG",212,22,1,1,116,0)
+236 237 240 253 260 267 271 301 347 350
+"PKG",212,22,1,1,117,0)
+366 379 384 391 407 418 419 420 428 433
+"PKG",212,22,1,1,118,0)
+442 520 569 600 620 692 706 715 722 723
+"PKG",212,22,1,1,119,0)
+724 728 730 744 745 746 747 748 749 750
+"PKG",212,22,1,1,120,0)
+751 752 753 754 755 756 757 758 759 760
+"PKG",212,22,1,1,121,0)
+761 762 763 764 765 766 767 768 769 770
+"PKG",212,22,1,1,122,0)
+771 772 773 774 775 776 777 778 779 780
+"PKG",212,22,1,1,123,0)
+100000 100001 100002 100003 100004 100005 100006 100007 100008 100009
+"PKG",212,22,1,1,124,0)
+100010 100011 100012 100013 100014
+"PKG",212,22,1,1,125,0)
+ 
+"PKG",212,22,1,1,126,0)
+These are the 105 patient records included in category "RIMTBL_1" from 
+"PKG",212,22,1,1,127,0)
+the above example.
+"PKG",212,22,1,1,128,0)
+ 
+"PKG",212,22,1,1,129,0)
+DPATV^C0CRIMA(DFN,"SECTION")
+"PKG",212,22,1,1,130,0)
+A command line interface to display the values of variables for a 
+"PKG",212,22,1,1,131,0)
+patient. "SECTION" can be any of the CCR sections. ie 
+"PKG",212,22,1,1,132,0)
+"ALERTS","RESULTS","MEDS". If SECTION is ommitted, all sections will be 
+"PKG",212,22,1,1,133,0)
+shown. An example:
+"PKG",212,22,1,1,134,0)
+ 
+"PKG",212,22,1,1,135,0)
+GTM>D DPATV^C0CRIMA(2,"PROBLEMS")
+"PKG",212,22,1,1,136,0)
+1 1^PROBLEMCODEVALUE^V18.0
+"PKG",212,22,1,1,137,0)
+2 1^PROBLEMCODINGVERSION^
+"PKG",212,22,1,1,138,0)
+3 1^PROBLEMCONDITION^P
+"PKG",212,22,1,1,139,0)
+4 1^PROBLEMDATEMOD^2005-07-19T00:00:00-05:00
+"PKG",212,22,1,1,140,0)
+5 1^PROBLEMDATEOFONSET^1700--T00:00:00-05:00
+"PKG",212,22,1,1,141,0)
+6 1^PROBLEMDESCRIPTION^Family History of Diabetes Mellitus (ICD-9-CM 
+"PKG",212,22,1,1,142,0)
+V18.0)
+"PKG",212,22,1,1,143,0)
+7 1^PROBLEMDTREC^1701--T00:00:00-05:00
+"PKG",212,22,1,1,144,0)
+8 1^PROBLEMHASCMT^
+"PKG",212,22,1,1,145,0)
+9 1^PROBLEMIEN^8
+"PKG",212,22,1,1,146,0)
+10 1^PROBLEMINACT^1700--T00:00:00-05:00
+"PKG",212,22,1,1,147,0)
+ 
+"PKG",212,22,1,1,148,0)
+DCCR^C0CCCR(DFN)
+"PKG",212,22,1,1,149,0)
+This will display the XML of a CCR that has been generated for a patient. 
+"PKG",212,22,1,1,150,0)
+It is run after generating the CCR with XPAT^C0CCCR or XCPAT^C0CRIMA.
+"PKG",212,22,1,1,151,0)
+ 
+"PKG",212,22,1,1,152,0)
+XCPAT^C0CRIMA(CPATCAT)
+"PKG",212,22,1,1,153,0)
+A command line interface to extract a batch of patient CCR documents that 
+"PKG",212,22,1,1,154,0)
+are associated with the category CPATCAT. For example,
+"PKG",212,22,1,1,155,0)
+ 
+"PKG",212,22,1,1,156,0)
+XCPAT^C0CRIMA("RIMTBL_1") to extract the CCR documents for the 105 
+"PKG",212,22,1,1,157,0)
+patients in the above example.
+"PKG",212,22,1,1,158,0)
+ 
+"PKG",212,22,1,1,159,0)
+RESET^C0CRIMA
+"PKG",212,22,1,1,160,0)
+A command line interface to kill all ANALYZE^C0CRIMA results stored so 
+"PKG",212,22,1,1,161,0)
+far so that the analysis can be done again. It kills 
+"PKG",212,22,1,1,162,0)
+^TMP("C0CRIM","RESUME") and all extraction variables that have been saved 
+"PKG",212,22,1,1,163,0)
+in ^TMP("C0CRIM")
+"PKG",212,22,1,1,164,0)
+ 
+"PKG",212,22,1,1,165,0)
+NOTES:
+"PKG",212,22,1,1,166,0)
+This version of the package is a prototype, and does not yet make use of 
+"PKG",212,22,1,1,167,0)
+the standard VistA features that are appropriate for it to use.
+"PKG",212,22,1,1,168,0)
+ 
+"PKG",212,22,1,1,169,0)
+^TMP("C0CCCR","ODIR") must be set manually to the output directory on the 
+"PKG",212,22,1,1,170,0)
+Host System. It is intended that this be maintainable in a parameter file.
+"PKG",212,22,1,1,171,0)
+ 
+"PKG",212,22,1,1,172,0)
+CCRRPC^C0CCCR and CCDRPC^C0CCCD are intended to be RPC interfaces to the 
+"PKG",212,22,1,1,173,0)
+package but there is no entry for them in the RPC table and the RPC 
+"PKG",212,22,1,1,174,0)
+method of access has not been tested.
+"PKG",212,22,1,1,175,0)
+ 
+"PKG",212,22,1,1,176,0)
+Most of the command line interface functions in the package are intended 
+"PKG",212,22,1,1,177,0)
+to also be made available as RPC calls. This will provide the ability to 
+"PKG",212,22,1,1,178,0)
+invoke and control batch extraction and analysis via RPCs
+"PKG",212,22,1,1,179,0)
+ 
+"PKG",212,22,1,1,180,0)
+The "RIM" variables and attributes that are now being stored in 
+"PKG",212,22,1,1,181,0)
+^TMP("C0CRIM") are intended to be maintained in a standard FILEMAN 
+"PKG",212,22,1,1,182,0)
+global, and to take advantage of FILEMAN indexing for efficient batch 
+"PKG",212,22,1,1,183,0)
+analysis and processing.
+"PKG",212,22,1,1,184,0)
+ 
+"PKG",212,22,1,1,185,0)
+It is intended that menu interfaces be provided in addition to command 
+"PKG",212,"VERSION")
+1.2
+"PRE")
+C0CENV
+"QUES","XPF1",0)
+Y
+"QUES","XPF1","??")
+^D REP^XPDH
+"QUES","XPF1","A")
+Shall I write over your |FLAG| File
+"QUES","XPF1","B")
+YES
+"QUES","XPF1","M")
+D XPF1^XPDIQ
+"QUES","XPF2",0)
+Y
+"QUES","XPF2","??")
+^D DTA^XPDH
+"QUES","XPF2","A")
+Want my data |FLAG| yours
+"QUES","XPF2","B")
+YES
+"QUES","XPF2","M")
+D XPF2^XPDIQ
+"QUES","XPI1",0)
+YO
+"QUES","XPI1","??")
+^D INHIBIT^XPDH
+"QUES","XPI1","A")
+Want KIDS to INHIBIT LOGONs during the install
+"QUES","XPI1","B")
+NO
+"QUES","XPI1","M")
+D XPI1^XPDIQ
+"QUES","XPM1",0)
+PO^VA(200,:EM
+"QUES","XPM1","??")
+^D MG^XPDH
+"QUES","XPM1","A")
+Enter the Coordinator for Mail Group '|FLAG|'
+"QUES","XPM1","B")
+
+"QUES","XPM1","M")
+D XPM1^XPDIQ
+"QUES","XPO1",0)
+Y
+"QUES","XPO1","??")
+^D MENU^XPDH
+"QUES","XPO1","A")
+Want KIDS to Rebuild Menu Trees Upon Completion of Install
+"QUES","XPO1","B")
+NO
+"QUES","XPO1","M")
+D XPO1^XPDIQ
+"QUES","XPZ1",0)
+Y
+"QUES","XPZ1","??")
+^D OPT^XPDH
+"QUES","XPZ1","A")
+Want to DISABLE Scheduled Options, Menu Options, and Protocols
+"QUES","XPZ1","B")
+NO
+"QUES","XPZ1","M")
+D XPZ1^XPDIQ
+"QUES","XPZ2",0)
+Y
+"QUES","XPZ2","??")
+^D RTN^XPDH
+"QUES","XPZ2","A")
+Want to MOVE routines to other CPUs
+"QUES","XPZ2","B")
+NO
+"QUES","XPZ2","M")
+D XPZ2^XPDIQ
+"RTN")
+70
+"RTN","C0CACTOR")
+0^47^B99733742
+"RTN","C0CACTOR",1,0)
+C0CACTOR  ; CCDCCR/GPL - CCR/CCD PROCESSING FOR ACTORS ; 7/3/08
+"RTN","C0CACTOR",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CACTOR",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota.
+"RTN","C0CACTOR",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CACTOR",5,0)
+ ;See attached copy of the License.
+"RTN","C0CACTOR",6,0)
+ ;
+"RTN","C0CACTOR",7,0)
+ ; This program is free software; you can redistribute it and/or modify
+"RTN","C0CACTOR",8,0)
+ ; it under the terms of the GNU General Public License as published by
+"RTN","C0CACTOR",9,0)
+ ; the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CACTOR",10,0)
+ ; (at your option) any later version.
+"RTN","C0CACTOR",11,0)
+ ;
+"RTN","C0CACTOR",12,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CACTOR",13,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CACTOR",14,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CACTOR",15,0)
+ ; GNU General Public License for more details.
+"RTN","C0CACTOR",16,0)
+ ;
+"RTN","C0CACTOR",17,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CACTOR",18,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CACTOR",19,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CACTOR",20,0)
+ ;
+"RTN","C0CACTOR",21,0)
+ ;  PROCESS THE ACTORS SECTION OF THE CCR
+"RTN","C0CACTOR",22,0)
+ ;
+"RTN","C0CACTOR",23,0)
+ ; ===Revision History===
+"RTN","C0CACTOR",24,0)
+ ; 0.1 Initial Writing of Skeleton--GPL
+"RTN","C0CACTOR",25,0)
+ ; 0.2 Patient Data Extraction--SMH
+"RTN","C0CACTOR",26,0)
+ ; 0.3 Information System Info Extraction--SMH
+"RTN","C0CACTOR",27,0)
+ ; 0.4 Patient data rouine refactored; adjustments here--SMH
+"RTN","C0CACTOR",28,0)
+ ;
+"RTN","C0CACTOR",29,0)
+EXTRACT(IPXML,ALST,AXML) ; EXTRACT ACTOR FROM ALST INTO PROVIDED XML TEMPLATE
+"RTN","C0CACTOR",30,0)
+ ; IPXML is the Input Actor Template into which we  substitute values
+"RTN","C0CACTOR",31,0)
+ ; This is straight XML. Values to be substituted are in @@VAL@@ format.
+"RTN","C0CACTOR",32,0)
+ ; ALST is the actor list global generated by ACTLST^C0CCCR and has format:
+"RTN","C0CACTOR",33,0)
+ ; ^TMP(7542,1,"ACTORS",0)=Count
+"RTN","C0CACTOR",34,0)
+ ; ^TMP(7542,1,"ACTORS",n)="ActorID^ActorType^ActorIEN"
+"RTN","C0CACTOR",35,0)
+ ; ActorType is an enum containing either "PROVIDER" "PATIENT" "SYSTEM"
+"RTN","C0CACTOR",36,0)
+ ; AXML is the output arrary, to contain XML.
+"RTN","C0CACTOR",37,0)
+ ;
+"RTN","C0CACTOR",38,0)
+ N I,J,AMAP,AOID,ATYP,AIEN
+"RTN","C0CACTOR",39,0)
+ D CP^C0CXPATH(IPXML,AXML) ; MAKE A COPY OF ACTORS XML
+"RTN","C0CACTOR",40,0)
+ D REPLACE^C0CXPATH(AXML,"","//Actors") ; DELETE THE INSIDES
+"RTN","C0CACTOR",41,0)
+ I DEBUG W "PROCESSING ACTORS ",!
+"RTN","C0CACTOR",42,0)
+ F I=1:1:@ALST@(0) D  ; PROCESS ALL ACTORS IN THE LIST
+"RTN","C0CACTOR",43,0)
+ . I @ALST@(I)["@@" Q  ; NOT A VALID ACTOR
+"RTN","C0CACTOR",44,0)
+ . S AOID=$P(@ALST@(I),"^",1) ; ACTOR OBJECT ID
+"RTN","C0CACTOR",45,0)
+ . S ATYP=$P(@ALST@(I),"^",2) ; ACTOR TYPE
+"RTN","C0CACTOR",46,0)
+ . S AIEN=$P(@ALST@(I),"^",3) ; ACTOR RECORD NUMBER
+"RTN","C0CACTOR",47,0)
+ . I AIEN="" D  Q  ; IEN CAN'T BE NULL
+"RTN","C0CACTOR",48,0)
+ . . W "WARING NUL ACTOR: ",ATYP,!
+"RTN","C0CACTOR",49,0)
+ . I ATYP="" Q  ; NOT A VALID ACTOR
+"RTN","C0CACTOR",50,0)
+ . ;
+"RTN","C0CACTOR",51,0)
+ . I DEBUG W AOID_" "_ATYP_" "_AIEN,!
+"RTN","C0CACTOR",52,0)
+ . I ATYP="PATIENT" D  ; PATIENT ACTOR TYPE
+"RTN","C0CACTOR",53,0)
+ . . D QUERY^C0CXPATH(IPXML,"//Actors/ACTOR-PATIENT","ATMP")
+"RTN","C0CACTOR",54,0)
+ . . D PATIENT("ATMP",AIEN,AOID,"ATMP2")
+"RTN","C0CACTOR",55,0)
+ . ;
+"RTN","C0CACTOR",56,0)
+ . I ATYP="SYSTEM" D  ; SYSTEM ACTOR TYPE
+"RTN","C0CACTOR",57,0)
+ . . D QUERY^C0CXPATH(IPXML,"//Actors/ACTOR-SYSTEM","ATMP")
+"RTN","C0CACTOR",58,0)
+ . . D SYSTEM("ATMP",AIEN,AOID,"ATMP2")
+"RTN","C0CACTOR",59,0)
+ . ;
+"RTN","C0CACTOR",60,0)
+ . I ATYP="NOK" D  ; NOK ACTOR TYPE
+"RTN","C0CACTOR",61,0)
+ . . D QUERY^C0CXPATH(IPXML,"//Actors/ACTOR-NOK","ATMP")
+"RTN","C0CACTOR",62,0)
+ . . D NOK("ATMP",AIEN,AOID,"ATMP2")
+"RTN","C0CACTOR",63,0)
+ . ;
+"RTN","C0CACTOR",64,0)
+ . I ATYP="PROVIDER" D  ; PROVIDER ACTOR TYPE
+"RTN","C0CACTOR",65,0)
+ . . D QUERY^C0CXPATH(IPXML,"//Actors/ACTOR-PROVIDER","ATMP")
+"RTN","C0CACTOR",66,0)
+ . . D PROVIDER("ATMP",AIEN,AOID,"ATMP2")
+"RTN","C0CACTOR",67,0)
+ . ;
+"RTN","C0CACTOR",68,0)
+ . I ATYP="ORGANIZATION" D  ; PROVIDER ACTOR TYPE
+"RTN","C0CACTOR",69,0)
+ . . D QUERY^C0CXPATH(IPXML,"//Actors/ACTOR-ORG","ATMP")
+"RTN","C0CACTOR",70,0)
+ . . D ORG("ATMP",AIEN,AOID,"ATMP2")
+"RTN","C0CACTOR",71,0)
+ . ;
+"RTN","C0CACTOR",72,0)
+ . W "PROCESSING:",ATYP," ",AIEN,!
+"RTN","C0CACTOR",73,0)
+ . ;I @ATMP2@(0)=0 Q  ; NOTHING RETURNED, SKIP THIS ONE
+"RTN","C0CACTOR",74,0)
+ . D INSINNER^C0CXPATH(AXML,"ATMP2") ; INSERT INTO ROOT
+"RTN","C0CACTOR",75,0)
+ . K ATYP,AIEN,AOID,ATMP,ATMP2 ; BE SURE TO GET THE NEXT ONE
+"RTN","C0CACTOR",76,0)
+ ;
+"RTN","C0CACTOR",77,0)
+ N ACTTMP
+"RTN","C0CACTOR",78,0)
+ D MISSING^C0CXPATH(AXML,"ACTTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CACTOR",79,0)
+ I ACTTMP(0)>0  D  ; IF THERE ARE MISSING VARS -
+"RTN","C0CACTOR",80,0)
+ . ; STRINGS MARKED AS @@X@@
+"RTN","C0CACTOR",81,0)
+ . W "ACTORS Missing list: ",!
+"RTN","C0CACTOR",82,0)
+ . F I=1:1:ACTTMP(0) W ACTTMP(I),!
+"RTN","C0CACTOR",83,0)
+ Q
+"RTN","C0CACTOR",84,0)
+ ;
+"RTN","C0CACTOR",85,0)
+PATIENT(INXML,AIEN,AOID,OUTXML) ; PROCESS A PATIENT ACTOR
+"RTN","C0CACTOR",86,0)
+ I DEBUG W "PROCESSING ACTOR PATIENT ",AIEN,!
+"RTN","C0CACTOR",87,0)
+ ;GPL SEPARATED EXTRACT FROM MAP FOR PROCESSING PATIENTS - TO MAKE
+"RTN","C0CACTOR",88,0)
+ ; CODE REUSABLE FROM ERX
+"RTN","C0CACTOR",89,0)
+ N AMAP
+"RTN","C0CACTOR",90,0)
+ S AMAP=$NA(^TMP($J,"AMAP"))
+"RTN","C0CACTOR",91,0)
+ K @AMAP
+"RTN","C0CACTOR",92,0)
+ D PEXTRACT(AMAP,AIEN,AOID) ;EXTRACT THE PATIENT ACTOR
+"RTN","C0CACTOR",93,0)
+ I $P($$SITE^VASITE(),U,2)="OROVILLE HOSPITAL" S C0CDE=1
+"RTN","C0CACTOR",94,0)
+ I $G(C0CDE)'="" D DEIDENT(AMAP,AIEN) ; DEIDENTIFY THE CCR
+"RTN","C0CACTOR",95,0)
+ D MAP(INXML,AMAP,OUTXML) ;MAP TO XML
+"RTN","C0CACTOR",96,0)
+ K @AMAP ; CLEAN UP BEHIND US
+"RTN","C0CACTOR",97,0)
+ Q
+"RTN","C0CACTOR",98,0)
+ ;
+"RTN","C0CACTOR",99,0)
+DEIDENT(GPL,ZDFN) ; QUICK WAY TO DEIDENTIFY THE CCR
+"RTN","C0CACTOR",100,0)
+ S @GPL@("ACTORADDRESSCITY")="ALTON"
+"RTN","C0CACTOR",101,0)
+ S @GPL@("ACTORADDRESSLINE1")="1234 Somewhere Lane"
+"RTN","C0CACTOR",102,0)
+ S @GPL@("ACTORADDRESSLINE2")=""
+"RTN","C0CACTOR",103,0)
+ S @GPL@("ACTORADDRESSSOURCEID")="ACTORPATIENT_"_ZDFN
+"RTN","C0CACTOR",104,0)
+ S @GPL@("ACTORADDRESSSTATE")="KANSAS"
+"RTN","C0CACTOR",105,0)
+ S @GPL@("ACTORADDRESSTYPE")="Home"
+"RTN","C0CACTOR",106,0)
+ S @GPL@("ACTORADDRESSZIPCODE")=67623
+"RTN","C0CACTOR",107,0)
+ S @GPL@("ACTORCELLTEL")=""
+"RTN","C0CACTOR",108,0)
+ S @GPL@("ACTORCELLTELTEXT")=""
+"RTN","C0CACTOR",109,0)
+ S @GPL@("ACTORDATEOFBIRTH")="1957-12-25"
+"RTN","C0CACTOR",110,0)
+ S @GPL@("ACTOREMAIL")=""
+"RTN","C0CACTOR",111,0)
+ S @GPL@("ACTORFAMILYNAME")="ZZ PATIENT"_ZDFN
+"RTN","C0CACTOR",112,0)
+ ;S @GPL@("ACTORGENDER")="MALE"
+"RTN","C0CACTOR",113,0)
+ S @GPL@("ACTORGIVENNAME")="TEST"_ZDFN
+"RTN","C0CACTOR",114,0)
+ S @GPL@("ACTORIEN")=2
+"RTN","C0CACTOR",115,0)
+ S @GPL@("ACTORMIDDLENAME")="TWO"
+"RTN","C0CACTOR",116,0)
+ S @GPL@("ACTOROBJECTID")="ACTORPATIENT_"_ZDFN
+"RTN","C0CACTOR",117,0)
+ S @GPL@("ACTORRESTEL")="888-555-1212"
+"RTN","C0CACTOR",118,0)
+ S @GPL@("ACTORRESTELTEXT")="Residential Telephone"
+"RTN","C0CACTOR",119,0)
+ S @GPL@("ACTORSOURCEID")="ACTORSYSTEM_1"
+"RTN","C0CACTOR",120,0)
+ S @GPL@("ACTORSSN")="769122557P"
+"RTN","C0CACTOR",121,0)
+ S @GPL@("ACTORSSNSOURCEID")="ACTORPATIENT_"_ZDFN
+"RTN","C0CACTOR",122,0)
+ S @GPL@("ACTORSSNTEXT")="SSN"
+"RTN","C0CACTOR",123,0)
+ S @GPL@("ACTORSUFFIXNAME")=""
+"RTN","C0CACTOR",124,0)
+ S @GPL@("ACTORWORKTEL")="888-121-1212"
+"RTN","C0CACTOR",125,0)
+ S @GPL@("ACTORWORKTELTEXT")="Work Telephone"
+"RTN","C0CACTOR",126,0)
+ Q
+"RTN","C0CACTOR",127,0)
+ ;
+"RTN","C0CACTOR",128,0)
+PEXTRACT(AMAP,AIEN,AOID) ; EXTRACT TO RETURN ARRAY RARY PASSED BY NAME
+"RTN","C0CACTOR",129,0)
+ N ZX
+"RTN","C0CACTOR",130,0)
+ S @AMAP@("ACTOROBJECTID")=AOID ;ACTOR OBJECT ID
+"RTN","C0CACTOR",131,0)
+ S @AMAP@("ACTORGIVENNAME")=$$GIVEN^C0CDPT(AIEN)
+"RTN","C0CACTOR",132,0)
+ S @AMAP@("ACTORMIDDLENAME")=$$MIDDLE^C0CDPT(AIEN)
+"RTN","C0CACTOR",133,0)
+ S @AMAP@("ACTORFAMILYNAME")=$$FAMILY^C0CDPT(AIEN)
+"RTN","C0CACTOR",134,0)
+ S @AMAP@("ACTORDATEOFBIRTH")=$$DOB^C0CDPT(AIEN)
+"RTN","C0CACTOR",135,0)
+ S @AMAP@("ACTORGENDER")=$P($$GENDER^C0CDPT(AIEN),U,2)
+"RTN","C0CACTOR",136,0)
+ S @AMAP@("ACTORGENDERCODE")=$P($$GENDER^C0CDPT(AIEN),U,1)
+"RTN","C0CACTOR",137,0)
+ S @AMAP@("ACTORSSN")=""
+"RTN","C0CACTOR",138,0)
+ S @AMAP@("ACTORSSNTEXT")=""
+"RTN","C0CACTOR",139,0)
+ S @AMAP@("ACTORSSNSOURCEID")=""
+"RTN","C0CACTOR",140,0)
+ S X="MSCDPTID" ; ROUTINE TO TEST FOR MRN ON OPENVISTA
+"RTN","C0CACTOR",141,0)
+ X ^%ZOSF("TEST") ; TEST TO SEE IF THE ROUTINE EXISTS
+"RTN","C0CACTOR",142,0)
+ I $T S MRN=$$^MSCDPTID(DFN) ;TEST FOR MRN ON OPENVISTA ;GPL
+"RTN","C0CACTOR",143,0)
+ I $G(MRN)'="" D  ; IF MRN IS PRESENT
+"RTN","C0CACTOR",144,0)
+ . S @AMAP@("ACTORSSN")=MRN
+"RTN","C0CACTOR",145,0)
+ . S @AMAP@("ACTORSSNTEXT")="MRN"
+"RTN","C0CACTOR",146,0)
+ . S @AMAP@("ACTORSSNSOURCEID")=AOID
+"RTN","C0CACTOR",147,0)
+ E  D  ; NO MRN, USE SSN
+"RTN","C0CACTOR",148,0)
+ . S ZX=$$SSN^C0CDPT(AIEN)
+"RTN","C0CACTOR",149,0)
+ . I ZX'="" D  ; IF THERE IS A SSN IN THE RECORD
+"RTN","C0CACTOR",150,0)
+ . . S @AMAP@("ACTORSSN")=ZX
+"RTN","C0CACTOR",151,0)
+ . . S @AMAP@("ACTORSSNTEXT")="SSN"
+"RTN","C0CACTOR",152,0)
+ . . S @AMAP@("ACTORSSNSOURCEID")=AOID
+"RTN","C0CACTOR",153,0)
+ S @AMAP@("ACTORADDRESSTYPE")=$$ADDRTYPE^C0CDPT(AIEN)
+"RTN","C0CACTOR",154,0)
+ S @AMAP@("ACTORADDRESSLINE1")=$$ADDR1^C0CDPT(AIEN)
+"RTN","C0CACTOR",155,0)
+ S @AMAP@("ACTORADDRESSLINE2")=$$ADDR2^C0CDPT(AIEN)
+"RTN","C0CACTOR",156,0)
+ S @AMAP@("ACTORADDRESSCITY")=$$CITY^C0CDPT(AIEN)
+"RTN","C0CACTOR",157,0)
+ S @AMAP@("ACTORADDRESSSTATE")=$$STATE^C0CDPT(AIEN)
+"RTN","C0CACTOR",158,0)
+ S @AMAP@("ACTORADDRESSZIPCODE")=$$ZIP^C0CDPT(AIEN)
+"RTN","C0CACTOR",159,0)
+ S @AMAP@("ACTORRESTEL")=""
+"RTN","C0CACTOR",160,0)
+ S @AMAP@("ACTORRESTELTEXT")=""
+"RTN","C0CACTOR",161,0)
+ S ZX=$$RESTEL^C0CDPT(AIEN)
+"RTN","C0CACTOR",162,0)
+ I ZX'="" D  ; IF THERE IS A RESIDENT PHONE IN THE RECORD
+"RTN","C0CACTOR",163,0)
+ . S @AMAP@("ACTORRESTEL")=ZX
+"RTN","C0CACTOR",164,0)
+ . S @AMAP@("ACTORRESTELTEXT")="Residential Telephone"
+"RTN","C0CACTOR",165,0)
+ S @AMAP@("ACTORWORKTEL")=""
+"RTN","C0CACTOR",166,0)
+ S @AMAP@("ACTORWORKTELTEXT")=""
+"RTN","C0CACTOR",167,0)
+ S ZX=$$WORKTEL^C0CDPT(AIEN)
+"RTN","C0CACTOR",168,0)
+ I ZX'="" D  ; IF THERE IS A RESIDENT PHONE IN THE RECORD
+"RTN","C0CACTOR",169,0)
+ . S @AMAP@("ACTORWORKTEL")=ZX
+"RTN","C0CACTOR",170,0)
+ . S @AMAP@("ACTORWORKTELTEXT")="Work Telephone"
+"RTN","C0CACTOR",171,0)
+ S @AMAP@("ACTORCELLTEL")=""
+"RTN","C0CACTOR",172,0)
+ S @AMAP@("ACTORCELLTELTEXT")=""
+"RTN","C0CACTOR",173,0)
+ S ZX=$$CELLTEL^C0CDPT(AIEN)
+"RTN","C0CACTOR",174,0)
+ I ZX'="" D  ; IF THERE IS A CELL PHONE IN THE RECORD
+"RTN","C0CACTOR",175,0)
+ . S @AMAP@("ACTORCELLTEL")=ZX
+"RTN","C0CACTOR",176,0)
+ . S @AMAP@("ACTORCELLTELTEXT")="Cell Phone"
+"RTN","C0CACTOR",177,0)
+ S @AMAP@("ACTOREMAIL")=$$EMAIL^C0CDPT(AIEN)
+"RTN","C0CACTOR",178,0)
+ S @AMAP@("ACTORADDRESSSOURCEID")=AOID
+"RTN","C0CACTOR",179,0)
+ S @AMAP@("ACTORIEN")=AIEN
+"RTN","C0CACTOR",180,0)
+ S @AMAP@("ACTORSUFFIXNAME")="" ; DOES VISTA STORE THE SUFFIX
+"RTN","C0CACTOR",181,0)
+ S @AMAP@("ACTORSOURCEID")="ACTORSYSTEM_1" ; THE SYSTEM IS THE SOURCE
+"RTN","C0CACTOR",182,0)
+ Q
+"RTN","C0CACTOR",183,0)
+ ;
+"RTN","C0CACTOR",184,0)
+MAP(INXML,AMAP,OUTXML) ;MAP ANY ACTOR TO XML
+"RTN","C0CACTOR",185,0)
+ D MAP^C0CXPATH(INXML,AMAP,OUTXML) ; MAP THE VARIABLE
+"RTN","C0CACTOR",186,0)
+ Q
+"RTN","C0CACTOR",187,0)
+ ;
+"RTN","C0CACTOR",188,0)
+SYSTEM(INXML,AIEN,AOID,OUTXML) ; PROCESS A SYSTEM ACTOR
+"RTN","C0CACTOR",189,0)
+     ;
+"RTN","C0CACTOR",190,0)
+     ; N AMAP
+"RTN","C0CACTOR",191,0)
+     S AMAP=$NA(^TMP($J,"AMAP"))
+"RTN","C0CACTOR",192,0)
+     K @AMAP
+"RTN","C0CACTOR",193,0)
+     S @AMAP@("ACTOROBJECTID")=AOID ;ACTOR OBJECT ID
+"RTN","C0CACTOR",194,0)
+     S @AMAP@("ACTORINFOSYSNAME")=$$SYSNAME^C0CSYS
+"RTN","C0CACTOR",195,0)
+     S @AMAP@("ACTORINFOSYSVER")=$$SYSVER^C0CSYS
+"RTN","C0CACTOR",196,0)
+     S @AMAP@("ACTORINFOSYSSOURCEID")=AOID
+"RTN","C0CACTOR",197,0)
+     D MAP^C0CXPATH(INXML,AMAP,OUTXML) ; MAP THE VARIABLE
+"RTN","C0CACTOR",198,0)
+     Q
+"RTN","C0CACTOR",199,0)
+     ;
+"RTN","C0CACTOR",200,0)
+NOK(INXML,AIEN,AOID,OUTXML) ; PROCESS A NEXT OF KIN TYPE ACTOR
+"RTN","C0CACTOR",201,0)
+     ;
+"RTN","C0CACTOR",202,0)
+     ; N AMAP
+"RTN","C0CACTOR",203,0)
+     S AMAP=$NA(^TMP($J,"AMAP"))
+"RTN","C0CACTOR",204,0)
+     K @AMAP
+"RTN","C0CACTOR",205,0)
+     S @AMAP@("ACTOROBJECTID")=AOID ;ACTOR OBJECT ID
+"RTN","C0CACTOR",206,0)
+     S @AMAP@("ACTORDISPLAYNAME")=""
+"RTN","C0CACTOR",207,0)
+     S @AMAP@("ACTORRELATION")=""
+"RTN","C0CACTOR",208,0)
+     S @AMAP@("ACTORRELATIONSOURCEID")=""
+"RTN","C0CACTOR",209,0)
+     S @AMAP@("ACTORSOURCEID")="ACTORSYSTEM_1" ; THE SYSTEM IS THE SOURCE
+"RTN","C0CACTOR",210,0)
+     D MAP^C0CXPATH(INXML,AMAP,OUTXML) ; MAP THE VARIABLE
+"RTN","C0CACTOR",211,0)
+     Q
+"RTN","C0CACTOR",212,0)
+     ;
+"RTN","C0CACTOR",213,0)
+ORG(INXML,AIEN,AOID,OUTXML) ; PROCESS AN ORGANIZATION TYPE ACTOR
+"RTN","C0CACTOR",214,0)
+     ;
+"RTN","C0CACTOR",215,0)
+     N AMAP,ZIEN,ZSITE
+"RTN","C0CACTOR",216,0)
+     S AMAP=$NA(^TMP($J,"AMAP"))
+"RTN","C0CACTOR",217,0)
+     K @AMAP
+"RTN","C0CACTOR",218,0)
+     S @AMAP@("ACTOROBJECTID")=AOID ;ACTOR OBJECT ID
+"RTN","C0CACTOR",219,0)
+     S ZSITE=$$SITE^VASITE ; SITE FORMAT IEN^NAME^DATE
+"RTN","C0CACTOR",220,0)
+     S ZIEN=$P(ZSITE,"^",1)
+"RTN","C0CACTOR",221,0)
+     S @AMAP@("ORGANIZATIONNAME")=$P(ZSITE,U,2)
+"RTN","C0CACTOR",222,0)
+     S @AMAP@("ACTORSOURCEID")="ACTORSYSTEM_1"
+"RTN","C0CACTOR",223,0)
+     S @AMAP@("ACTORADDRESSTYPE")="Office"
+"RTN","C0CACTOR",224,0)
+     S @AMAP@("ACTORADDRESSLINE1")=$$GET1^DIQ(4,ZIEN_",",1.01)
+"RTN","C0CACTOR",225,0)
+     S @AMAP@("ACTORADDRESSLINE2")=$$GET1^DIQ(4,ZIEN_",",1.02)
+"RTN","C0CACTOR",226,0)
+     S @AMAP@("ACTORADDRESSCITY")=$$GET1^DIQ(4,ZIEN_",",1.03)
+"RTN","C0CACTOR",227,0)
+     S @AMAP@("ACTORADDRESSSTATE")=$$GET1^DIQ(4,ZIEN_",",.02)
+"RTN","C0CACTOR",228,0)
+     S @AMAP@("ACTORPOSTALCODE")=$$GET1^DIQ(4,ZIEN_",",1.04)
+"RTN","C0CACTOR",229,0)
+     S @AMAP@("ACTORTELEPHONE")=""
+"RTN","C0CACTOR",230,0)
+     S @AMAP@("ACTORTELEPHONETYPE")=""
+"RTN","C0CACTOR",231,0)
+     S ZX=$$GET1^DIQ(4.03,"1,"_ZIEN_",",.03)
+"RTN","C0CACTOR",232,0)
+     I ZX'="" D  ; THERE IS A PHONE NUMBER AVAILABLE
+"RTN","C0CACTOR",233,0)
+     . S @AMAP@("ACTORTELEPHONE")=ZX
+"RTN","C0CACTOR",234,0)
+     . S @AMAP@("ACTORTELEPHONETYPE")="Office"
+"RTN","C0CACTOR",235,0)
+     D MAP^C0CXPATH(INXML,AMAP,OUTXML) ; MAP THE VARIABLE
+"RTN","C0CACTOR",236,0)
+     K @AMAP
+"RTN","C0CACTOR",237,0)
+     Q
+"RTN","C0CACTOR",238,0)
+     ;
+"RTN","C0CACTOR",239,0)
+PROVIDER(INXML,AIEN,AOID,OUTXML) ; PROCESS A PROVIDER TYPE ACTOR
+"RTN","C0CACTOR",240,0)
+     ;
+"RTN","C0CACTOR",241,0)
+     ; N AMAP
+"RTN","C0CACTOR",242,0)
+     S AMAP=$NA(^TMP($J,"AMAP"))
+"RTN","C0CACTOR",243,0)
+     K @AMAP
+"RTN","C0CACTOR",244,0)
+     I '$D(^VA(200,AIEN,0)) D  Q  ; IF NO PROVIDER RECORD (SHOULDN'T HAPPEN)
+"RTN","C0CACTOR",245,0)
+     . W "WARNING - MISSING PROVIDER: ",AIEN,!
+"RTN","C0CACTOR",246,0)
+     . S @OUTXML@(0)=0 ; SIGNAL NO OUTPUT
+"RTN","C0CACTOR",247,0)
+     S @AMAP@("ACTOROBJECTID")=AOID ;ACTOR OBJECT ID
+"RTN","C0CACTOR",248,0)
+     S @AMAP@("ACTORGIVENNAME")=$$GIVEN^C0CVA200(AIEN)
+"RTN","C0CACTOR",249,0)
+     S @AMAP@("ACTORMIDDLENAME")=$$MIDDLE^C0CVA200(AIEN)
+"RTN","C0CACTOR",250,0)
+     S @AMAP@("ACTORFAMILYNAME")=$$FAMILY^C0CVA200(AIEN)
+"RTN","C0CACTOR",251,0)
+     S @AMAP@("ACTORTITLE")=$$TITLE^C0CVA200(AIEN)
+"RTN","C0CACTOR",252,0)
+     S @AMAP@("IDTYPE")=$P($$NPI^C0CVA200(AIEN),U,1)
+"RTN","C0CACTOR",253,0)
+     S @AMAP@("ID")=$P($$NPI^C0CVA200(AIEN),U,2)
+"RTN","C0CACTOR",254,0)
+     S @AMAP@("IDDESC")=$P($$NPI^C0CVA200(AIEN),U,3)
+"RTN","C0CACTOR",255,0)
+     S @AMAP@("ACTORSPECIALITY")=$$SPEC^C0CVA200(AIEN)
+"RTN","C0CACTOR",256,0)
+     S @AMAP@("ACTORADDRESSTYPE")=$$ADDTYPE^C0CVA200(AIEN)
+"RTN","C0CACTOR",257,0)
+     S @AMAP@("ACTORADDRESSLINE1")=$$ADDLINE1^C0CVA200(AIEN)
+"RTN","C0CACTOR",258,0)
+     S @AMAP@("ACTORADDRESSCITY")=$$CITY^C0CVA200(AIEN)
+"RTN","C0CACTOR",259,0)
+     S @AMAP@("ACTORADDRESSSTATE")=$$STATE^C0CVA200(AIEN)
+"RTN","C0CACTOR",260,0)
+     S @AMAP@("ACTORPOSTALCODE")=$$POSTCODE^C0CVA200(AIEN)
+"RTN","C0CACTOR",261,0)
+     S @AMAP@("ACTORTELEPHONE")=""
+"RTN","C0CACTOR",262,0)
+     S @AMAP@("ACTORTELEPHONETYPE")=""
+"RTN","C0CACTOR",263,0)
+     S ZX=$$TEL^C0CVA200(AIEN)
+"RTN","C0CACTOR",264,0)
+     I ZX'="" D  ; THERE IS A PHONE NUMBER AVAILABLE
+"RTN","C0CACTOR",265,0)
+     . S @AMAP@("ACTORTELEPHONE")=ZX
+"RTN","C0CACTOR",266,0)
+     . S @AMAP@("ACTORTELEPHONETYPE")=$$TELTYPE^C0CVA200(AIEN)
+"RTN","C0CACTOR",267,0)
+     S @AMAP@("ACTOREMAIL")=$$EMAIL^C0CVA200(AIEN)
+"RTN","C0CACTOR",268,0)
+     S @AMAP@("ACTORADDRESSSOURCEID")="ACTORSYSTEM_1"
+"RTN","C0CACTOR",269,0)
+     S @AMAP@("ACTORSOURCEID")="ACTORSYSTEM_1" ; THE SYSTEM IS THE SOURCE
+"RTN","C0CACTOR",270,0)
+     S @AMAP@("ACTORORGLINK")="ACTORORGANIZATION_1"
+"RTN","C0CACTOR",271,0)
+     D MAP^C0CXPATH(INXML,AMAP,OUTXML) ; MAP THE VARIABLE
+"RTN","C0CACTOR",272,0)
+     Q
+"RTN","C0CACTOR",273,0)
+     ;
+"RTN","C0CALERT")
+0^46^B31627309
+"RTN","C0CALERT",1,0)
+C0CALERT  ; CCDCCR/CKU/GPL - CCR/CCD PROCESSING FOR ALERTS ; 09/11/08
+"RTN","C0CALERT",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CALERT",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota and others.
+"RTN","C0CALERT",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CALERT",5,0)
+ ;See attached copy of the License.
+"RTN","C0CALERT",6,0)
+ ;
+"RTN","C0CALERT",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CALERT",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CALERT",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CALERT",10,0)
+ ;(at your option) any later version.
+"RTN","C0CALERT",11,0)
+ ;
+"RTN","C0CALERT",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CALERT",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CALERT",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CALERT",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CALERT",16,0)
+ ;
+"RTN","C0CALERT",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CALERT",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CALERT",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CALERT",20,0)
+ ;
+"RTN","C0CALERT",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CALERT",22,0)
+ Q
+"RTN","C0CALERT",23,0)
+ ;
+"RTN","C0CALERT",24,0)
+EXTRACT(ALTXML,DFN,ALTOUTXML,CALLBK) ; EXTRACT ALERTS INTO  XML TEMPLATE
+"RTN","C0CALERT",25,0)
+ ; CALLBACK IF PROVIDED IS CALLED FOR EACH ALLERGY BEFORE MAPPING
+"RTN","C0CALERT",26,0)
+ ; ALTXML AND ALTOUTXML ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CALERT",27,0)
+ ;
+"RTN","C0CALERT",28,0)
+ ; GET ADVERSE REACTIONS AND ALLERGIES
+"RTN","C0CALERT",29,0)
+ ; N GMRA,GMRAL ; FOR DEBUGGING, DON'T NEW THESE VARIABLES
+"RTN","C0CALERT",30,0)
+ S GMRA="0^0^111"
+"RTN","C0CALERT",31,0)
+ D EN1^GMRADPT
+"RTN","C0CALERT",32,0)
+ I $G(GMRAL)'=1 D  Q ; NO ALLERGIES FOUND THUS *QUIT*
+"RTN","C0CALERT",33,0)
+ . S @ALTOUTXML@(0)=0
+"RTN","C0CALERT",34,0)
+ ; DEFINE MAPPING
+"RTN","C0CALERT",35,0)
+ N ALTTVMAP,ALTVMAP,ALTTARYTMP,ALTARYTMP
+"RTN","C0CALERT",36,0)
+ S ALTTVMAP=$NA(^TMP("C0CCCR",$J,"ALERTS"))
+"RTN","C0CALERT",37,0)
+ S ALTTARYTMP=$NA(^TMP("C0CCCR",$J,"ALERTSARYTMP"))
+"RTN","C0CALERT",38,0)
+ K @ALTTVMAP,@ALTTARYTMP
+"RTN","C0CALERT",39,0)
+ N ALTTMP,ALTCNT S ALTG=$NA(GMRAL),ALTCNT=1
+"RTN","C0CALERT",40,0)
+ S ALTTMP="" ;
+"RTN","C0CALERT",41,0)
+ F  S ALTTMP=$O(@ALTG@(ALTTMP)) Q:ALTTMP=""  D  ; CHANGED TO $O BY GPL
+"RTN","C0CALERT",42,0)
+ . W "ALTTMP="_ALTTMP,!
+"RTN","C0CALERT",43,0)
+ . ; I $QS(ALTTMP,2)="S" W !,"S FOUND",! Q
+"RTN","C0CALERT",44,0)
+ . S ALTVMAP=$NA(@ALTTVMAP@(ALTCNT))
+"RTN","C0CALERT",45,0)
+ . K @ALTVMAP
+"RTN","C0CALERT",46,0)
+ . S @ALTVMAP@("ALERTOBJECTID")="ALERT"_ALTCNT
+"RTN","C0CALERT",47,0)
+ . N A1 S A1=@ALTG@(ALTTMP) ; ALL THE PIECES
+"RTN","C0CALERT",48,0)
+ . I $D(CALLBK) D @CALLBK ;CALLBACK FOR EPRESCRIBING
+"RTN","C0CALERT",49,0)
+ . N A2 S A2=$$GET1^DIQ(120.8,ALTTMP,"MECHANISM","I") ; MECHANISM
+"RTN","C0CALERT",50,0)
+ . N A3 S A3=$P(A1,U,5) ; ADVERSE FLAG
+"RTN","C0CALERT",51,0)
+ . N ADT S ADT="Patient has an " ; X $ZINT H 5
+"RTN","C0CALERT",52,0)
+ . S ADT=ADT_$S(A2="P":"ADVERSE",A2="A":"ALLERGIC",1:"UNKNOWN")
+"RTN","C0CALERT",53,0)
+ . S ADT=ADT_" reaction to "_$P(@ALTG@(ALTTMP),U,2)_"."
+"RTN","C0CALERT",54,0)
+ . S @ALTVMAP@("ALERTDESCRIPTIONTEXT")=ADT
+"RTN","C0CALERT",55,0)
+ . N ADTY S ADTY=$S(A2="P":"Adverse Reaction",A2="A":"Allergy",1:"") ;
+"RTN","C0CALERT",56,0)
+ . S @ALTVMAP@("ALERTTYPE")=ADTY ; type of allergy
+"RTN","C0CALERT",57,0)
+ . N ALTCDE ; SNOMED CODE THE THE ALERT
+"RTN","C0CALERT",58,0)
+ . S ALTCDE=$S(A2="P":"282100009",A2="A":"416098002",1:"") ; IF NOT ADVERSE, IT IS ALLERGIC
+"RTN","C0CALERT",59,0)
+ . S @ALTVMAP@("ALERTCODEVALUE")=ALTCDE ;
+"RTN","C0CALERT",60,0)
+ . ; WILL USE 418634005 FOR ALLERGIC REACTION TO A SUBSTANCE
+"RTN","C0CALERT",61,0)
+ . ; AND  282100009 FOR ADVERSE REACTION TO A SUBSTANCE
+"RTN","C0CALERT",62,0)
+ . I ALTCDE'="" D  ; IF THERE IS A CODE
+"RTN","C0CALERT",63,0)
+ . . S @ALTVMAP@("ALERTCODESYSTEM")="SNOMED CT"
+"RTN","C0CALERT",64,0)
+ . . S @ALTVMAP@("ALERTCODESYSTEMVERSION")="2008"
+"RTN","C0CALERT",65,0)
+ . E  D  ; SET TO NULL
+"RTN","C0CALERT",66,0)
+ . . S @ALTVMAP@("ALERTCODESYSTEM")=""
+"RTN","C0CALERT",67,0)
+ . . S @ALTVMAP@("ALERTCODESYSTEMVERSION")=""
+"RTN","C0CALERT",68,0)
+ . S @ALTVMAP@("ALERTSTATUSTEXT")="" ; WHERE DO WE GET THIS?
+"RTN","C0CALERT",69,0)
+ . N ALTPROV S ALTPROV=$P(^GMR(120.8,ALTTMP,0),U,5) ; SOURCE PROVIDER IEN
+"RTN","C0CALERT",70,0)
+ . I ALTPROV'="" D  ; PROVIDER PROVIDEED
+"RTN","C0CALERT",71,0)
+ . . S @ALTVMAP@("ALERTSOURCEID")="ACTORPROVIDER_"_ALTPROV
+"RTN","C0CALERT",72,0)
+ . E  S @ALTVMAP@("ALERTSOURCEID")="" ; SOURCE NULL - SHOULD NOT HAPPEN
+"RTN","C0CALERT",73,0)
+ . W "RUNNING ALERTS, PROVIDER: ",@ALTVMAP@("ALERTSOURCEID"),!
+"RTN","C0CALERT",74,0)
+ . N ACGL1,ACGFI,ACIEN,ACVUID,ACNM,ACTMP
+"RTN","C0CALERT",75,0)
+ . S ACGL1=$P(@ALTG@(ALTTMP),U,9) ; ADDRESS OF THE REACTANT XX;GLB(YY.Z,
+"RTN","C0CALERT",76,0)
+ . S ACGFI=$$PRSGLB($P(ACGL1,";",2)) ; FILE NUMBER
+"RTN","C0CALERT",77,0)
+ . S ACIEN=$P(ACGL1,";",1) ; IEN OF REACTANT
+"RTN","C0CALERT",78,0)
+ . S ACVUID=$$GET1^DIQ(ACGFI,ACIEN,"VUID") ; VUID OF THE REACTANT
+"RTN","C0CALERT",79,0)
+ . S @ALTVMAP@("ALERTAGENTPRODUCTOBJECTID")="PRODUCT_"_ACIEN ; IE OF REACTANT
+"RTN","C0CALERT",80,0)
+ . S @ALTVMAP@("ALERTAGENTPRODUCTSOURCEID")="" ; WHERE DO WE GET THIS?
+"RTN","C0CALERT",81,0)
+ . S ACNM=$P(@ALTG@(ALTTMP),U,2) ; REACTANT
+"RTN","C0CALERT",82,0)
+ . S @ALTVMAP@("ALERTAGENTPRODUCTNAMETEXT")=ACNM
+"RTN","C0CALERT",83,0)
+ . N ZC,ZCD,ZCDS,ZCDSV ; CODE,CODE SYSTEM,CODE VERSION
+"RTN","C0CALERT",84,0)
+ . S (ZC,ZCD,ZCDS,ZCDSV)="" ; INITIALIZE
+"RTN","C0CALERT",85,0)
+ . I ACVUID'="" D  ; IF VUID IS NOT NULL
+"RTN","C0CALERT",86,0)
+ . . S ZC=$$CODE^C0CUTIL(ACVUID)
+"RTN","C0CALERT",87,0)
+ . . S ZCD=$P(ZC,"^",1) ; CODE TO USE
+"RTN","C0CALERT",88,0)
+ . . S ZCDS=$P(ZC,"^",2) ; CODING SYSTEM - RXNORM OR VUID
+"RTN","C0CALERT",89,0)
+ . . S ZCDSV=$P(ZC,"^",3) ; CODING SYSTEM VERSION
+"RTN","C0CALERT",90,0)
+ . E  D  ; IF REACTANT CODE VALUE IS NULL
+"RTN","C0CALERT",91,0)
+ . . I $G(DUZ("AG"))="I" D  ; IF WE ARE RUNNING ON RPMS
+"RTN","C0CALERT",92,0)
+ . . . S ACTMP=$O(^C0CCODES(176.112,"C",ACNM,0)) ;
+"RTN","C0CALERT",93,0)
+ . . . W "RPMS NAME FOUND",ACNM," ",ACTMP,!
+"RTN","C0CALERT",94,0)
+ . . S @ALTVMAP@("ALERTAGENTPRODUCTCODESYSTEM")=""
+"RTN","C0CALERT",95,0)
+ . . S @ALTVMAP@("ALERTAGENTPRODUCTCODEVALUE")=""
+"RTN","C0CALERT",96,0)
+ . S @ALTVMAP@("ALERTAGENTPRODUCTCODEVALUE")=ZCD
+"RTN","C0CALERT",97,0)
+ . S @ALTVMAP@("ALERTAGENTPRODUCTCODESYSTEM")=ZCDS
+"RTN","C0CALERT",98,0)
+ . S @ALTVMAP@("ALERTAGENTPRODUCTNAMETEXT")=ACNM_" "_ZCDS_": "_ZCD
+"RTN","C0CALERT",99,0)
+ . S @ALTVMAP@("ALERTDESCRIPTIONTEXT")=ADT_" "_ZCDS_": "_ZCD
+"RTN","C0CALERT",100,0)
+ . ; REACTIONS - THIS SHOULD BE MULTIPLE, IS SINGLE NOW
+"RTN","C0CALERT",101,0)
+ . N ARTMP,ARIEN,ARDES,ARVUID
+"RTN","C0CALERT",102,0)
+ . S (ARTMP,ARDES,ARVUID)=""
+"RTN","C0CALERT",103,0)
+ . I $D(@ALTG@(ALTTMP,"S",1)) D  ; IF REACTION EXISTS
+"RTN","C0CALERT",104,0)
+ . . S ARTMP=@ALTG@(ALTTMP,"S",1)
+"RTN","C0CALERT",105,0)
+ . . W "REACTION:",ARTMP,!
+"RTN","C0CALERT",106,0)
+ . . S ARIEN=$P(ARTMP,";",2)
+"RTN","C0CALERT",107,0)
+ . . S ARDES=$P(ARTMP,";",1)
+"RTN","C0CALERT",108,0)
+ . . S ARVUID=$$GET1^DIQ(120.83,ARIEN,"VUID")
+"RTN","C0CALERT",109,0)
+ . S @ALTVMAP@("ALERTREACTIOINDESCRIPTIONTEXT")=ARDES
+"RTN","C0CALERT",110,0)
+ . I ARVUID'="" D  ; IF REACTION VUID IS NOT NULL
+"RTN","C0CALERT",111,0)
+ . . S @ALTVMAP@("ALERTREACTIONCODEVALUE")=ARVUID
+"RTN","C0CALERT",112,0)
+ . . S @ALTVMAP@("ALERTREACTIONCODESYSTEM")="VUID"
+"RTN","C0CALERT",113,0)
+ . E  D  ; IF IT IS NULL DON'T SET CODE SYSTEM
+"RTN","C0CALERT",114,0)
+ . . S @ALTVMAP@("ALERTREACTIONCODEVALUE")=""
+"RTN","C0CALERT",115,0)
+ . . S @ALTVMAP@("ALERTREACTIONCODESYSTEM")=""
+"RTN","C0CALERT",116,0)
+ . S ALTARYTMP=$NA(@ALTTARYTMP@(ALTCNT))
+"RTN","C0CALERT",117,0)
+ . ; NOW GO TO THE GLOBAL TO GET THE DATE/TIME AND BETTER DESCRIPTION
+"RTN","C0CALERT",118,0)
+ . N C0CG1,C0CT ; ARRAY FOR VALUES FROM GLOBAL
+"RTN","C0CALERT",119,0)
+ . D GETN1^C0CRNF("C0CG1",120.8,ALTTMP,"") ;GET VALUES BY NAME
+"RTN","C0CALERT",120,0)
+ . S C0CT=$$ZVALUEI^C0CRNF("ORIGINATION DATE/TIME","C0CG1")
+"RTN","C0CALERT",121,0)
+ . S @ALTVMAP@("ALERTDATETIME")=$$FMDTOUTC^C0CUTIL(C0CT,"DT")
+"RTN","C0CALERT",122,0)
+ . K @ALTARYTMP
+"RTN","C0CALERT",123,0)
+ . D MAP^C0CXPATH(ALTXML,ALTVMAP,ALTARYTMP)
+"RTN","C0CALERT",124,0)
+ . I ALTCNT=1 D CP^C0CXPATH(ALTARYTMP,ALTOUTXML)
+"RTN","C0CALERT",125,0)
+ . I ALTCNT>1 D INSINNER^C0CXPATH(ALTOUTXML,ALTARYTMP)
+"RTN","C0CALERT",126,0)
+ . S ALTCNT=ALTCNT+1
+"RTN","C0CALERT",127,0)
+ S @ALTTVMAP@(0)=ALTCNT-1 ; RECORD THE NUMBER OF ALERTS
+"RTN","C0CALERT",128,0)
+ Q
+"RTN","C0CALERT",129,0)
+PRSGLB(INGLB) ; EXTRINSIC TO PARSE GLOBALS AND RETURN THE FILE NUMBER
+"RTN","C0CALERT",130,0)
+ ; INGLB IS OF THE FORM: PSNDF(50.6,
+"RTN","C0CALERT",131,0)
+ ; RETURN 50.6
+"RTN","C0CALERT",132,0)
+ Q $P($P(INGLB,"(",2),",",1)  ;
+"RTN","C0CBAT")
+0^57^B56971574
+"RTN","C0CBAT",1,0)
+C0CBAT   ; CCDCCR/GPL - CCR Batch utilities; 4/21/09
+"RTN","C0CBAT",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CBAT",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CBAT",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CBAT",5,0)
+ ;
+"RTN","C0CBAT",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CBAT",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CBAT",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CBAT",9,0)
+ ;(at your option) any later version.
+"RTN","C0CBAT",10,0)
+ ;
+"RTN","C0CBAT",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CBAT",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CBAT",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CBAT",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CBAT",15,0)
+ ;
+"RTN","C0CBAT",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CBAT",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CBAT",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CBAT",19,0)
+ ;
+"RTN","C0CBAT",20,0)
+ W "This is the CCR Batch Utility Library ",!
+"RTN","C0CBAT",21,0)
+ Q
+"RTN","C0CBAT",22,0)
+ ;
+"RTN","C0CBAT",23,0)
+STOP ; STOP A CURRENTLY RUNNING BATCH JOB
+"RTN","C0CBAT",24,0)
+ I '$D(^TMP("C0CBAT","RUNNING")) Q  ;
+"RTN","C0CBAT",25,0)
+ W !,!,"HALTING CCR BATCH",!
+"RTN","C0CBAT",26,0)
+ S ^TMP("C0CBAT","STOP")="" ; SIGNAL JOB TO TERMINATE
+"RTN","C0CBAT",27,0)
+ H 10 ; WAIT TEN SECONDS FOR SIGNAL TO BE RECEIVED
+"RTN","C0CBAT",28,0)
+ I '$D(^TMP("C0CBAT","STOP")) D  ; SIGNAL RECEIVED
+"RTN","C0CBAT",29,0)
+ . W "CCR BATCH JOB TERMINATING",!
+"RTN","C0CBAT",30,0)
+ E  D  ;
+"RTN","C0CBAT",31,0)
+ . K ^TMP("C0CBAT","STOP") ; STOP SIGNALING
+"RTN","C0CBAT",32,0)
+ . W !,"BATCH PROCESSING APPARENTLY NOT RUNNING",!
+"RTN","C0CBAT",33,0)
+ Q
+"RTN","C0CBAT",34,0)
+ ;
+"RTN","C0CBAT",35,0)
+START ; STARTS A TAKSMAN CCR BATCH JOB - FOR USE IN A MENU OPTION
+"RTN","C0CBAT",36,0)
+ ;
+"RTN","C0CBAT",37,0)
+ I $D(^TMP("C0CBAT","RUNNING")) D  Q  ; ONLY ONE ALLOWED AT A TIME
+"RTN","C0CBAT",38,0)
+ . W !,"CCR BATCH ALREADY RUNNING",!
+"RTN","C0CBAT",39,0)
+ . W !,"STOP FIRST WITH STOP^C0CBAT",!
+"RTN","C0CBAT",40,0)
+ N ZTRTN,ZTDESC,ZTDTH,ZTSAVE,ZTSK,ZTIO
+"RTN","C0CBAT",41,0)
+ S ZTRTN="EN^C0CBAT",ZTDESC="CCR Batch"
+"RTN","C0CBAT",42,0)
+ S ZTDTH=$H ; 
+"RTN","C0CBAT",43,0)
+ ;S ZTDTH=$S(($P(ZTDTH,",",2)+10)\86400:(1+ZTDTH)_","_((($P(ZTDTH,",",2)+10)#86400)/100000),1:(+ZTDTH)_","_($P(ZTDTH,",",2)+10))
+"RTN","C0CBAT",44,0)
+ S ZTSAVE("C0C")="",ZTSAVE("C0C*")=""
+"RTN","C0CBAT",45,0)
+ S ZTIO="NULL" ;
+"RTN","C0CBAT",46,0)
+ W !,!,"CCR BATCH JOB STARTED",!
+"RTN","C0CBAT",47,0)
+ D ^%ZTLOAD
+"RTN","C0CBAT",48,0)
+ Q
+"RTN","C0CBAT",49,0)
+ ;
+"RTN","C0CBAT",50,0)
+EN ; BATCH ENTRY POINT
+"RTN","C0CBAT",51,0)
+ ; PROCESSES THE SUBSCRIPTION FILE, EXTRACTING CCR VARIABLES FOR EACH
+"RTN","C0CBAT",52,0)
+ ; PATIENT WITH AN ACTIVE SUBSCRIPTION, AND IF CHECKSUMS INDICATE A CHANGE,
+"RTN","C0CBAT",53,0)
+ ; GENERATES A NEW CCR FOR THE PATIENT
+"RTN","C0CBAT",54,0)
+ ; UPDATES THE E2 CCR ELEMENTS FILE
+"RTN","C0CBAT",55,0)
+ ;
+"RTN","C0CBAT",56,0)
+ S C0CQT=1 ; QUIET MODE
+"RTN","C0CBAT",57,0)
+ I $D(^TMP("C0CBAT","RUNNING")) Q  ; ONLY ONE AT A TIME
+"RTN","C0CBAT",58,0)
+ S ^TMP("C0CBAT","RUNNING")="" ; RUNNING SIGNAL
+"RTN","C0CBAT",59,0)
+ S C0CBDT=$$NOW^XLFDT ; DATE OF THIS RUN
+"RTN","C0CBAT",60,0)
+ S C0CBF=177.301 ; FILE NUMBER OF C0C BATCH CONTROL FILE
+"RTN","C0CBAT",61,0)
+ S C0CBFR=177.3013 ; FILE NUMBER OF UPDATE SUBFILE
+"RTN","C0CBAT",62,0)
+ S C0CBB=$NA(^TMP("C0CBATCH",C0CBDT)) ; BATCH WORK AREA
+"RTN","C0CBAT",63,0)
+ I $D(@C0CBB@(0)) D  ; ERROR SHOULDN'T EXIST
+"RTN","C0CBAT",64,0)
+ . W "WORK AREA ERROR",!
+"RTN","C0CBAT",65,0)
+ . B
+"RTN","C0CBAT",66,0)
+ S @C0CBB@(0)="V22" ; VERSION USED TO CREATE THIS WORK AREA
+"RTN","C0CBAT",67,0)
+ S C0CBH=$NA(@C0CBB@("HOTLIST")) ; BASE FOR HOT LIST
+"RTN","C0CBAT",68,0)
+ S C0CBS=$NA(^C0CS("B")) ; SUBSCRIPTION LIST BASE
+"RTN","C0CBAT",69,0)
+ ;I $D(^C0CB("B",C0CDT)) D  ; BATCH RECORD EXISTS
+"RTN","C0CBAT",70,0)
+ ;. H 10 ; HANG 10 SECONDS
+"RTN","C0CBAT",71,0)
+ ;. S C0CBDT=$$NOW^XLFDT ; NEW DATE FOR THIS RUN
+"RTN","C0CBAT",72,0)
+ ;. I $D(^C0CB("B",C0CDT)) B ;DIDN'T WORK
+"RTN","C0CBAT",73,0)
+ D BLDHOT(C0CBH) ; BUILD THE HOT LIST
+"RTN","C0CBAT",74,0)
+ S C0CHN=$$COUNT(C0CBH) ;COUNT NUMBER IN HOT LIST
+"RTN","C0CBAT",75,0)
+ S C0CSN=$$COUNT(C0CBS) ;COUNT NUMBER OF PATIENTS WITH SUBSCRIPTIONS
+"RTN","C0CBAT",76,0)
+ S C0CFDA(C0CBF,"+1,",.01)=C0CBDT ; DATE KEY OF BATCH CONTROL
+"RTN","C0CBAT",77,0)
+ S C0CFDA(C0CBF,"+1,",.02)=C0CBDT ; BATCH ID IS DATE IN STRING FORM
+"RTN","C0CBAT",78,0)
+ S C0CFDA(C0CBF,"+1,",1)=C0CSN ; TOTAL SUBSCRIPTIONS
+"RTN","C0CBAT",79,0)
+ S C0CFDA(C0CBF,"+1,",2)=C0CHN ; TOTAL HOT LIST
+"RTN","C0CBAT",80,0)
+ D UPDIE ; CREATE THE BATCH RECORD
+"RTN","C0CBAT",81,0)
+ S C0CIEN=$O(^C0CB("B",C0CBDT,""))
+"RTN","C0CBAT",82,0)
+ S (C0CN,C0CNH)=0 ; COUNTERS FOR TOTAL AND HOT LIST
+"RTN","C0CBAT",83,0)
+ S C0CBCUR="" ; CURRENT PATIENT
+"RTN","C0CBAT",84,0)
+ S C0CSTOP=0 ; STOP FLAG FOR HALTING BATCH SET ^TMP("C0CBAT","STOP")=""
+"RTN","C0CBAT",85,0)
+ ;F  S C0CBCUR=$O(@C0CBH@(C0CBCUR),-1) Q:C0CBCUR=""  D  ; HOT LIST LATEST FIRST
+"RTN","C0CBAT",86,0)
+ F  S C0CBCUR=$O(@C0CBH@(C0CBCUR)) Q:(C0CSTOP)!(C0CBCUR="")  D  ; HOT LIST FIRST
+"RTN","C0CBAT",87,0)
+ . D ANALYZE^C0CRIMA(C0CBCUR,1,"LABLIMIT:T-900^VITLIMIT:T-900")
+"RTN","C0CBAT",88,0)
+ . I $G(C0CCHK) D  ;
+"RTN","C0CBAT",89,0)
+ . . D PUTRIM^C0CFM2(C0CBCUR)
+"RTN","C0CBAT",90,0)
+ . . D XPAT^C0CCCR(C0CBCUR) ; IF VARIABLES HAVE CHANGED GENERATE CCR
+"RTN","C0CBAT",91,0)
+ . . K C0CFDA
+"RTN","C0CBAT",92,0)
+ . . S C0CFDA(C0CBFR,"+1,"_C0CIEN_",",.01)=C0CBCUR
+"RTN","C0CBAT",93,0)
+ . . S C0CFDA(C0CBFR,"+1,"_C0CIEN_",",1)="Y"
+"RTN","C0CBAT",94,0)
+ . . S C0CFDA(C0CBFR,"+1,"_C0CIEN_",",2)=$G(^TMP("C0CCCR","FNAME",C0CBCUR))
+"RTN","C0CBAT",95,0)
+ . . D UPDIE ; CREATE UPDATE SUBFILE 
+"RTN","C0CBAT",96,0)
+ . S C0CN=C0CN+1 ; INCREMENT NUMBER IN TOTAL
+"RTN","C0CBAT",97,0)
+ . S C0CNH=C0CNH+1 ; INCREMENT HOT LIST TOTAL
+"RTN","C0CBAT",98,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",1.1)=C0CN ;UPDATE TOTAL PROGRESS
+"RTN","C0CBAT",99,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",2.1)=C0CNH ; UPDATE HOT LIST PROGRESS
+"RTN","C0CBAT",100,0)
+ . S C0CNOW=$$NOW^XLFDT
+"RTN","C0CBAT",101,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",4)=C0CNOW ; LAST UPDATED FIELD
+"RTN","C0CBAT",102,0)
+ . S C0CELPS=$$FMDIFF^XLFDT(C0CNOW,C0CBDT,2) ; DIFFERENCE IN SECONDS
+"RTN","C0CBAT",103,0)
+ . S C0CAVG=C0CELPS/C0CN ; AVERAGE ELAPSED TIME
+"RTN","C0CBAT",104,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",4.1)=C0CAVG ; AVERAGE ELAPSED TIME
+"RTN","C0CBAT",105,0)
+ . S C0CETOT=C0CAVG*C0CSN ; EST TOT ELASPSED TIME 
+"RTN","C0CBAT",106,0)
+ . S C0CEST=$$FMADD^XLFDT(C0CBDT,0,0,0,C0CETOT) ; ADD SECONDS TO BATCH START
+"RTN","C0CBAT",107,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",4.2)=C0CEST ;ESTIMATED COMPLETION TIME
+"RTN","C0CBAT",108,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",5)=C0CBCUR ; LAST RECORD PROCESSED
+"RTN","C0CBAT",109,0)
+ . D UPDIE ;
+"RTN","C0CBAT",110,0)
+ . I $D(^TMP("C0CBAT","STOP")) D  ; IF STOP SIGNAL DETECTED
+"RTN","C0CBAT",111,0)
+ . . S C0CSTOP=1
+"RTN","C0CBAT",112,0)
+ . . K ^TMP("C0CBAT","STOP") ; SIGNAL RECEIVED 
+"RTN","C0CBAT",113,0)
+ . H 1 ; GIVE OTHERS A CHANCE 
+"RTN","C0CBAT",114,0)
+ F  S C0CBCUR=$O(@C0CBS@(C0CBCUR)) Q:(C0CSTOP)!(C0CBCUR="")  D  ; SUBS LIST
+"RTN","C0CBAT",115,0)
+ . I $D(@C0CBH@(C0CBCUR)) Q  ; SKIP IF IN HOT LIST - ALREADY DONE
+"RTN","C0CBAT",116,0)
+ . D ANALYZE^C0CRIMA(C0CBCUR,1,"LABLIMIT:T-760^VITLIMIT:T-760")
+"RTN","C0CBAT",117,0)
+ . I $G(C0CCHK) D  ; IF CHECKSUMS HAVE CHANGED
+"RTN","C0CBAT",118,0)
+ . . D PUTRIM^C0CFM2(C0CBCUR)
+"RTN","C0CBAT",119,0)
+ . . D XPAT^C0CCCR(C0CBCUR) ; IF VARIABLES HAVE CHANGED GENERATE CCR
+"RTN","C0CBAT",120,0)
+ . . K C0CFDA
+"RTN","C0CBAT",121,0)
+ . . S C0CFDA(C0CBFR,"+1,"_C0CIEN_",",.01)=C0CBCUR
+"RTN","C0CBAT",122,0)
+ . . S C0CFDA(C0CBFR,"+1,"_C0CIEN_",",1)="Y"
+"RTN","C0CBAT",123,0)
+ . . S C0CFDA(C0CBFR,"+1,"_C0CIEN_",",2)=$G(^TMP("C0CCCR","FNAME",C0CBCUR))
+"RTN","C0CBAT",124,0)
+ . . D UPDIE ; CREATE UPDATE SUBFILE 
+"RTN","C0CBAT",125,0)
+ . S C0CN=C0CN+1 ; INCREMENT NUMBER IN TOTAL
+"RTN","C0CBAT",126,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",1.1)=C0CN ;UPDATE TOTAL PROGRESS
+"RTN","C0CBAT",127,0)
+ . S C0CNOW=$$NOW^XLFDT
+"RTN","C0CBAT",128,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",4)=C0CNOW ; LAST UPDATED FIELD
+"RTN","C0CBAT",129,0)
+ . S C0CELPS=$$FMDIFF^XLFDT(C0CNOW,C0CBDT,2) ; DIFFERENCE IN SECONDS
+"RTN","C0CBAT",130,0)
+ . S C0CAVG=C0CELPS/C0CN ; AVERAGE ELAPSED TIME
+"RTN","C0CBAT",131,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",4.1)=C0CAVG ; AVERAGE ELAPSED TIME
+"RTN","C0CBAT",132,0)
+ . S C0CETOT=C0CAVG*C0CSN ; EST TOT ELASPSED TIME 
+"RTN","C0CBAT",133,0)
+ . S C0CEST=$$FMADD^XLFDT(C0CBDT,0,0,0,C0CETOT) ; ADD SECONDS TO BATCH START
+"RTN","C0CBAT",134,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",4.2)=C0CEST ;ESTIMATED COMPLETION TIME
+"RTN","C0CBAT",135,0)
+ . S C0CFDA(C0CBF,C0CIEN_",",5)=C0CBCUR ; 
+"RTN","C0CBAT",136,0)
+ . D UPDIE ; 
+"RTN","C0CBAT",137,0)
+ . I $D(^TMP("C0CBAT","STOP")) D  ; IF STOP SIGNAL DETECTED
+"RTN","C0CBAT",138,0)
+ . . S C0CSTOP=1
+"RTN","C0CBAT",139,0)
+ . . K ^TMP("C0CBAT","STOP") ; SIGNAL RECEIVED 
+"RTN","C0CBAT",140,0)
+ . H 1 ; GIVE IT A BREAK
+"RTN","C0CBAT",141,0)
+ I (C0CSTOP) S C0CDISP="KILLED"
+"RTN","C0CBAT",142,0)
+ E  S C0CDISP="FINISHED"
+"RTN","C0CBAT",143,0)
+ S C0CFDA(C0CBF,C0CIEN_",",6)=C0CDISP
+"RTN","C0CBAT",144,0)
+ D UPDIE ; SET DISPOSITION FIELD
+"RTN","C0CBAT",145,0)
+ K ^TMP("C0CBAT","RUNNING")
+"RTN","C0CBAT",146,0)
+ Q
+"RTN","C0CBAT",147,0)
+ ;
+"RTN","C0CBAT",148,0)
+BLDHOT(ZHB) ; BUILD HOT LIST AT GLOBAL ZHB, PASSED BY NAME
+"RTN","C0CBAT",149,0)
+ ; SEARCHS FOR PATIENTS IN THE "AC" INDEX OF THE ORDER FILE
+"RTN","C0CBAT",150,0)
+ N ZDFN
+"RTN","C0CBAT",151,0)
+ S ZDFN=""
+"RTN","C0CBAT",152,0)
+ F  S ZDFN=$O(^OR(100,"AC",ZDFN)) Q:ZDFN=""  D  ; ALL PATIENTS IN THE AC INDX
+"RTN","C0CBAT",153,0)
+ . S ZZDFN=$P(ZDFN,";",1) ; FORMAT IS "N;DPT("
+"RTN","C0CBAT",154,0)
+ . I '$D(@C0CBS@(ZZDFN)) Q  ; SKIP IF NOT IN SUBSCRIPTION LIST
+"RTN","C0CBAT",155,0)
+ . S @ZHB@(ZZDFN)="" ;ADD PATIENT TO THE HOT LIST
+"RTN","C0CBAT",156,0)
+ Q
+"RTN","C0CBAT",157,0)
+ ;
+"RTN","C0CBAT",158,0)
+COUNT(ZB) ; EXTRINSIC THAT RETURNS THE NUMBER OF ARRAY ELEMENTS
+"RTN","C0CBAT",159,0)
+ N ZI,ZN
+"RTN","C0CBAT",160,0)
+ S ZN=0
+"RTN","C0CBAT",161,0)
+ S ZI=""
+"RTN","C0CBAT",162,0)
+ F  S ZI=$O(@ZB@(ZI)) Q:ZI=""  D  ;
+"RTN","C0CBAT",163,0)
+ . S ZN=ZN+1
+"RTN","C0CBAT",164,0)
+ Q ZN
+"RTN","C0CBAT",165,0)
+ ;
+"RTN","C0CBAT",166,0)
+UPDIEVARPTR(ZVAR,ZTYP) ;EXTRINSIC WHICH RETURNS THE POINTER TO ZVAR IN THE
+"RTN","C0CBAT",167,0)
+ ; CCR DICTIONARY. IT IS LAYGO, AS IT WILL ADD THE VARIABLE TO
+"RTN","C0CBAT",168,0)
+ ; THE CCR DICTIONARY IF IT IS NOT THERE. ZTYP IS REQUIRED FOR LAYGO
+"RTN","C0CBAT",169,0)
+ ;
+"RTN","C0CBAT",170,0)
+ N ZCCRD,ZVARN,C0CFDA2
+"RTN","C0CBAT",171,0)
+ S ZCCRD=170 ; FILE NUMBER FOR CCR DICTIONARY
+"RTN","C0CBAT",172,0)
+ S ZVARN=$O(^C0CDIC(170,"B",ZVAR,"")) ;FIND IEN OF VARIABLE
+"RTN","C0CBAT",173,0)
+ I ZVARN="" D  ; VARIABLE NOT IN CCR DICTIONARY - ADD IT
+"RTN","C0CBAT",174,0)
+ . I '$D(ZTYP) D  Q  ; WON'T ADD A VARIABLE WITHOUT A TYPE
+"RTN","C0CBAT",175,0)
+ . . W "CANNOT ADD VARIABLE WITHOUT A TYPE: ",ZVAR,!
+"RTN","C0CBAT",176,0)
+ . S C0CFDA2(ZCCRD,"?+1,",.01)=ZVAR ; NAME OF NEW VARIABLE
+"RTN","C0CBAT",177,0)
+ . S C0CFDA2(ZCCRD,"?+1,",12)=ZTYP ; TYPE EXTERNAL OF NEW VARIABLE
+"RTN","C0CBAT",178,0)
+ . D CLEAN^DILF ;MAKE SURE ERRORS ARE CLEAN
+"RTN","C0CBAT",179,0)
+ . D UPDATE^DIE("E","C0CFDA2","","ZERR") ;ADD VAR TO CCR DICTIONARY
+"RTN","C0CBAT",180,0)
+ . I $D(ZERR) D  ; LAYGO ERROR
+"RTN","C0CBAT",181,0)
+ . . W "ERROR ADDING "_ZC0CI_" TO CCR DICTIONARY",!
+"RTN","C0CBAT",182,0)
+ . E  D  ;
+"RTN","C0CBAT",183,0)
+ . . D CLEAN^DILF ; CLEAN UP
+"RTN","C0CBAT",184,0)
+ . . S ZVARN=$O(^C0CDIC(170,"B",ZVAR,"")) ;FIND IEN OF VARIABLE
+"RTN","C0CBAT",185,0)
+ . . W "ADDED ",ZVAR," TO CCR DICTIONARY, IEN:",ZVARN,!
+"RTN","C0CBAT",186,0)
+ Q ZVARN
+"RTN","C0CBAT",187,0)
+ ;
+"RTN","C0CBAT",188,0)
+UPDIE ; INTERNAL ROUTINE TO CALL UPDATE^DIE AND CHECK FOR ERRORS
+"RTN","C0CBAT",189,0)
+ K ZERR
+"RTN","C0CBAT",190,0)
+ D CLEAN^DILF
+"RTN","C0CBAT",191,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR")
+"RTN","C0CBAT",192,0)
+ I $D(ZERR) D  ;
+"RTN","C0CBAT",193,0)
+ . W "ERROR",!
+"RTN","C0CBAT",194,0)
+ . ZWR ZERR
+"RTN","C0CBAT",195,0)
+ . B
+"RTN","C0CBAT",196,0)
+ K C0CFDA
+"RTN","C0CBAT",197,0)
+ Q
+"RTN","C0CBAT",198,0)
+ ;
+"RTN","C0CBAT",199,0)
+SETFDA(C0CSN,C0CSV) ; INTERNAL ROUTINE TO MAKE AN FDA ENTRY FOR FIELD C0CSN
+"RTN","C0CBAT",200,0)
+ ; TO SET TO VALUE C0CSV.
+"RTN","C0CBAT",201,0)
+ ; C0CFDA,C0CC,C0CZX ARE ASSUMED FROM THE CALLING ROUTINE
+"RTN","C0CBAT",202,0)
+ ; C0CSN,C0CSV ARE PASSED BY VALUE
+"RTN","C0CBAT",203,0)
+ ;
+"RTN","C0CBAT",204,0)
+ N C0CSI,C0CSJ
+"RTN","C0CBAT",205,0)
+ S C0CSI=$$ZFILE(C0CSN,"C0CC") ; FILE NUMBER
+"RTN","C0CBAT",206,0)
+ S C0CSJ=$$ZFIELD(C0CSN,"C0CC") ; FIELD NUMBER
+"RTN","C0CBAT",207,0)
+ S C0CFDA(C0CSI,C0CZX_",",C0CSJ)=C0CSV
+"RTN","C0CBAT",208,0)
+ Q
+"RTN","C0CBAT",209,0)
+ZFILE(ZFN,ZTAB) ; EXTRINSIC TO RETURN FILE NUMBER FOR FIELD NAME PASSED
+"RTN","C0CBAT",210,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 1 OF C0CA(ZFN)
+"RTN","C0CBAT",211,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CBAT",212,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CBAT",213,0)
+ N ZR
+"RTN","C0CBAT",214,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",1)
+"RTN","C0CBAT",215,0)
+ E  S ZR=""
+"RTN","C0CBAT",216,0)
+ Q ZR
+"RTN","C0CBAT",217,0)
+ZFIELD(ZFN,ZTAB) ;EXTRINSIC TO RETURN FIELD NUMBER FOR FIELD NAME PASSED
+"RTN","C0CBAT",218,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 2 OF C0CA(ZFN)
+"RTN","C0CBAT",219,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CBAT",220,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CBAT",221,0)
+ N ZR
+"RTN","C0CBAT",222,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",2)
+"RTN","C0CBAT",223,0)
+ E  S ZR=""
+"RTN","C0CBAT",224,0)
+ Q ZR
+"RTN","C0CBAT",225,0)
+ ;
+"RTN","C0CBAT",226,0)
+ZVALUE(ZFN,ZTAB) ;EXTRINSIC TO RETURN VALUE FOR FIELD NAME PASSED
+"RTN","C0CBAT",227,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF C0CA(ZFN)
+"RTN","C0CBAT",228,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CBAT",229,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CBAT",230,0)
+ N ZR
+"RTN","C0CBAT",231,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",3)
+"RTN","C0CBAT",232,0)
+ E  S ZR=""
+"RTN","C0CBAT",233,0)
+ Q ZR
+"RTN","C0CBAT",234,0)
+ ;
+"RTN","C0CCCD")
+0^45^B114134049
+"RTN","C0CCCD",1,0)
+C0CCCD   ; CCDCCR/GPL - CCD MAIN PROCESSING; 6/6/08
+"RTN","C0CCCD",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CCCD",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota.
+"RTN","C0CCCD",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CCCD",5,0)
+ ;See attached copy of the License.
+"RTN","C0CCCD",6,0)
+ ;
+"RTN","C0CCCD",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CCCD",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CCCD",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CCCD",10,0)
+ ;(at your option) any later version.
+"RTN","C0CCCD",11,0)
+ ;
+"RTN","C0CCCD",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CCCD",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CCCD",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CCCD",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CCCD",16,0)
+ ;
+"RTN","C0CCCD",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CCCD",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CCCD",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CCCD",20,0)
+ ;
+"RTN","C0CCCD",21,0)
+ ; EXPORT A CCR
+"RTN","C0CCCD",22,0)
+ ;
+"RTN","C0CCCD",23,0)
+EXPORT   ; EXPORT ENTRY POINT FOR CCR
+"RTN","C0CCCD",24,0)
+       ; Select a patient.
+"RTN","C0CCCD",25,0)
+       S DIC=2,DIC(0)="AEMQ" D ^DIC
+"RTN","C0CCCD",26,0)
+       I Y<1 Q  ; EXIT
+"RTN","C0CCCD",27,0)
+       S DFN=$P(Y,U,1) ; SET THE PATIENT
+"RTN","C0CCCD",28,0)
+       D XPAT(DFN,"","") ; EXPORT TO A FILE
+"RTN","C0CCCD",29,0)
+       Q
+"RTN","C0CCCD",30,0)
+       ;
+"RTN","C0CCCD",31,0)
+XPAT(DFN,DIR,FN) ; EXPORT ONE PATIENT TO A FILE
+"RTN","C0CCCD",32,0)
+       ; DIR IS THE DIRECTORY, DEFAULTS IF NULL TO ^TMP("C0CCCR","ODIR")
+"RTN","C0CCCD",33,0)
+       ; FN IS FILE NAME, DEFAULTS IF NULL
+"RTN","C0CCCD",34,0)
+       ; N CCDGLO
+"RTN","C0CCCD",35,0)
+       D CCDRPC(.CCDGLO,DFN,"CCD","","","")
+"RTN","C0CCCD",36,0)
+       S OARY=$NA(^TMP("C0CCCR",$J,DFN,"CCD",1))
+"RTN","C0CCCD",37,0)
+       S ONAM=FN
+"RTN","C0CCCD",38,0)
+       I FN="" S ONAM="PAT_"_DFN_"_CCD_V1.xml"
+"RTN","C0CCCD",39,0)
+       S ODIRGLB=$NA(^TMP("C0CCCR","ODIR"))
+"RTN","C0CCCD",40,0)
+       I '$D(@ODIRGLB) D  ; IF NOT ODIR HAS BEEN SET
+"RTN","C0CCCD",41,0)
+       . S @ODIRGLB="/home/glilly/CCROUT"
+"RTN","C0CCCD",42,0)
+       . ;S @ODIRGLB="/home/cedwards/"
+"RTN","C0CCCD",43,0)
+       . ;S @ODIRGLB="/opt/wv/p/"
+"RTN","C0CCCD",44,0)
+       S ODIR=DIR
+"RTN","C0CCCD",45,0)
+       I DIR="" S ODIR=@ODIRGLB
+"RTN","C0CCCD",46,0)
+       N ZY
+"RTN","C0CCCD",47,0)
+       S ZY=$$OUTPUT^C0CXPATH(OARY,ONAM,ODIR)
+"RTN","C0CCCD",48,0)
+       W $P(ZY,U,2)
+"RTN","C0CCCD",49,0)
+       Q
+"RTN","C0CCCD",50,0)
+       ;
+"RTN","C0CCCD",51,0)
+CCDRPC(CCRGRTN,DFN,CCRPART,TIME1,TIME2,HDRARY)  ;RPC ENTRY POINT FOR CCR OUTPUT
+"RTN","C0CCCD",52,0)
+    ; CCRGRTN IS RETURN ARRAY PASSED BY NAME
+"RTN","C0CCCD",53,0)
+    ; DFN IS PATIENT IEN
+"RTN","C0CCCD",54,0)
+    ; CCRPART IS "CCR" FOR ENTIRE CCR, OR SECTION NAME FOR A PART
+"RTN","C0CCCD",55,0)
+    ;   OF THE CCR BODY.. PARTS INCLUDE "PROBLEMS" "VITALS" ETC
+"RTN","C0CCCD",56,0)
+    ; TIME1 IS STARTING TIME TO INCLUDE - NULL MEANS ALL
+"RTN","C0CCCD",57,0)
+    ; TIME2 IS ENDING TIME TO INCLUDE TIME IS FILEMAN TIME
+"RTN","C0CCCD",58,0)
+    ; - NULL MEANS NOW
+"RTN","C0CCCD",59,0)
+    ; HDRARY IS THE HEADER ARRAY DEFINING THE "FROM" AND
+"RTN","C0CCCD",60,0)
+    ;    "TO" VARIABLES
+"RTN","C0CCCD",61,0)
+    ;    IF NULL WILL DEFAULT TO "FROM" ORGANIZATION AND "TO" DFN
+"RTN","C0CCCD",62,0)
+    I '$D(DEBUG) S DEBUG=0
+"RTN","C0CCCD",63,0)
+    N CCD S CCD=0 ; FLAG FOR PROCESSING A CCD
+"RTN","C0CCCD",64,0)
+    I CCRPART="CCD" S CCD=1 ; WE ARE PROCESSING A CCD
+"RTN","C0CCCD",65,0)
+    S TGLOBAL=$NA(^TMP("C0CCCR",$J,"TEMPLATE")) ; GLOBAL FOR STORING TEMPLATE
+"RTN","C0CCCD",66,0)
+    I CCD S CCDGLO=$NA(^TMP("C0CCCR",$J,DFN,"CCD")) ; GLOBAL FOR THE CCD
+"RTN","C0CCCD",67,0)
+    E  S CCDGLO=$NA(^TMP("C0CCCR",$J,DFN,"CCR")) ; GLOBAL FOR BUILDING THE CCR
+"RTN","C0CCCD",68,0)
+    S ACTGLO=$NA(^TMP("C0CCCR",$J,DFN,"ACTORS")) ; GLOBAL FOR ALL ACTORS
+"RTN","C0CCCD",69,0)
+    ; TO GET PART OF THE CCR RETURNED, PASS CCRPART="PROBLEMS" ETC
+"RTN","C0CCCD",70,0)
+    S CCRGRTN=$NA(^TMP("C0CCCR",$J,DFN,CCRPART)) ; RTN GLO NM OF PART OR ALL
+"RTN","C0CCCD",71,0)
+    I CCD D LOAD^C0CCCD1(TGLOBAL)  ; LOAD THE CCR TEMPLATE
+"RTN","C0CCCD",72,0)
+    E  D LOAD^C0CCCR0(TGLOBAL)  ; LOAD THE CCR TEMPLATE
+"RTN","C0CCCD",73,0)
+    D CP^C0CXPATH(TGLOBAL,CCDGLO) ; COPY THE TEMPLATE TO CCR GLOBAL
+"RTN","C0CCCD",74,0)
+    N CAPSAVE,CAPSAVE2 ; FOR HOLDING THE CCD ROOT LINES
+"RTN","C0CCCD",75,0)
+    S CAPSAVE=@TGLOBAL@(3) ; SAVE THE CCD ROOT
+"RTN","C0CCCD",76,0)
+    S CAPSAVE2=@TGLOBAL@(@TGLOBAL@(0)) ; SAVE LAST LINE OF CCD
+"RTN","C0CCCD",77,0)
+    S @CCDGLO@(3)="<ContinuityOfCareRecord>" ; CAP WITH CCR ROOT
+"RTN","C0CCCD",78,0)
+    S @TGLOBAL@(3)=@CCDGLO@(3) ; CAP THE TEMPLATE TOO
+"RTN","C0CCCD",79,0)
+    S @CCDGLO@(@CCDGLO@(0))="</ContinuityOfCareRecord>" ; FINISH CAP
+"RTN","C0CCCD",80,0)
+    S @TGLOBAL@(@TGLOBAL@(0))="</ContinuityOfCareRecord>" ; FINISH CAP TEMP
+"RTN","C0CCCD",81,0)
+    ;
+"RTN","C0CCCD",82,0)
+    ; DELETE THE BODY, ACTORS AND SIGNATURES SECTIONS FROM GLOBAL
+"RTN","C0CCCD",83,0)
+    ; THESE WILL BE POPULATED AFTER CALLS TO THE XPATH ROUTINES
+"RTN","C0CCCD",84,0)
+    D REPLACE^C0CXPATH(CCDGLO,"","//ContinuityOfCareRecord/Body")
+"RTN","C0CCCD",85,0)
+    D REPLACE^C0CXPATH(CCDGLO,"","//ContinuityOfCareRecord/Actors")
+"RTN","C0CCCD",86,0)
+    I 'CCD D REPLACE^C0CXPATH(CCDGLO,"","//ContinuityOfCareRecord/Signatures")
+"RTN","C0CCCD",87,0)
+    I DEBUG F I=1:1:@CCDGLO@(0) W @CCDGLO@(I),!
+"RTN","C0CCCD",88,0)
+    ;
+"RTN","C0CCCD",89,0)
+    I 'CCD D HDRMAP(CCDGLO,DFN,HDRARY) ; MAP HEADER VARIABLES
+"RTN","C0CCCD",90,0)
+    ; MAPPING THE PATIENT PORTION OF THE CDA HEADER
+"RTN","C0CCCD",91,0)
+    S ZZX="//ContinuityOfCareRecord/recordTarget/patientRole/patient"
+"RTN","C0CCCD",92,0)
+    D QUERY^C0CXPATH(CCDGLO,ZZX,"ACTT1")
+"RTN","C0CCCD",93,0)
+    D PATIENT^C0CACTOR("ACTT1",DFN,"ACTORPATIENT_"_DFN,"ACTT2") ; MAP PATIENT
+"RTN","C0CCCD",94,0)
+    I DEBUG D PARY^C0CXPATH("ACTT2")
+"RTN","C0CCCD",95,0)
+    D REPLACE^C0CXPATH(CCDGLO,"ACTT2",ZZX)
+"RTN","C0CCCD",96,0)
+    I DEBUG D PARY^C0CXPATH(CCDGLO)
+"RTN","C0CCCD",97,0)
+    K ACTT1 K ACCT2
+"RTN","C0CCCD",98,0)
+    ; MAPPING THE PROVIDER ORGANIZATION,AUTHOR,INFORMANT,CUSTODIAN CDA HEADER
+"RTN","C0CCCD",99,0)
+    ; FOR NOW, THEY ARE ALL THE SAME AND RESOLVE TO ORGANIZATION
+"RTN","C0CCCD",100,0)
+    D ORG^C0CACTOR(CCDGLO,DFN,"ACTORPATIENTORGANIZATION","ACTT2") ; MAP ORG
+"RTN","C0CCCD",101,0)
+    D CP^C0CXPATH("ACTT2",CCDGLO)
+"RTN","C0CCCD",102,0)
+    ;
+"RTN","C0CCCD",103,0)
+    K ^TMP("C0CCCR",$J,"CCRSTEP") ; KILL GLOBAL PRIOR TO ADDING TO IT
+"RTN","C0CCCD",104,0)
+    S CCRXTAB=$NA(^TMP("C0CCCR",$J,"CCRSTEP")) ; GLOBAL TO STORE CCR STEPS
+"RTN","C0CCCD",105,0)
+    D INITSTPS(CCRXTAB) ; INITIALIZED CCR PROCESSING STEPS
+"RTN","C0CCCD",106,0)
+    N I,XI,TAG,RTN,CALL,XPATH,IXML,OXML,INXML,CCRBLD
+"RTN","C0CCCD",107,0)
+    F I=1:1:@CCRXTAB@(0)  D  ; PROCESS THE CCR BODY SECTIONS
+"RTN","C0CCCD",108,0)
+    . S XI=@CCRXTAB@(I) ; CALL COPONENTS TO PARSE
+"RTN","C0CCCD",109,0)
+    . S RTN=$P(XI,";",2) ; NAME OF ROUTINE TO CALL
+"RTN","C0CCCD",110,0)
+    . S TAG=$P(XI,";",1) ; LABEL INSIDE ROUTINE TO CALL
+"RTN","C0CCCD",111,0)
+    . S XPATH=$P(XI,";",3) ; XPATH TO XML TO PASS TO ROUTINE
+"RTN","C0CCCD",112,0)
+    . D QUERY^C0CXPATH(TGLOBAL,XPATH,"INXML") ; EXTRACT XML TO PASS
+"RTN","C0CCCD",113,0)
+    . S IXML="INXML"
+"RTN","C0CCCD",114,0)
+    . I CCD D SHAVE(IXML) ; REMOVE ALL BUT REPEATING PARTS OF TEMPLATE SECTION
+"RTN","C0CCCD",115,0)
+    . S OXML=$P(XI,";",4) ; ARRAY FOR SECTION VALUES
+"RTN","C0CCCD",116,0)
+    . ; W OXML,!
+"RTN","C0CCCD",117,0)
+    . S CALL="D "_TAG_"^"_RTN_"(IXML,DFN,OXML)" ; SETUP THE CALL
+"RTN","C0CCCD",118,0)
+    . W "RUNNING ",CALL,!
+"RTN","C0CCCD",119,0)
+    . X CALL
+"RTN","C0CCCD",120,0)
+    . I @OXML@(0)'=0 D  ; THERE IS A RESULT
+"RTN","C0CCCD",121,0)
+    . . I CCD D QUERY^C0CXPATH(TGLOBAL,XPATH,"ITMP") ; XML TO UNSHAVE WITH
+"RTN","C0CCCD",122,0)
+    . . I CCD D UNSHAVE("ITMP",OXML)
+"RTN","C0CCCD",123,0)
+    . . I CCD D UNMARK^C0CXPATH(OXML) ; REMOVE THE CCR MARKUP FROM SECTION
+"RTN","C0CCCD",124,0)
+    . ; NOW INSERT THE RESULTS IN THE CCR BUFFER
+"RTN","C0CCCD",125,0)
+    . D INSERT^C0CXPATH(CCDGLO,OXML,"//ContinuityOfCareRecord/Body")
+"RTN","C0CCCD",126,0)
+    . I DEBUG F C0CI=1:1:@OXML@(0) W @OXML@(C0CI),!
+"RTN","C0CCCD",127,0)
+    ; NEED TO ADD BACK IN ACTOR PROCESSING AFTER WE FIGURE OUT LINKAGE
+"RTN","C0CCCD",128,0)
+    ; D ACTLST^C0CCCR(CCDGLO,ACTGLO) ; GEN THE ACTOR LIST
+"RTN","C0CCCD",129,0)
+    ; D QUERY^C0CXPATH(TGLOBAL,"//ContinuityOfCareRecord/Actors","ACTT")
+"RTN","C0CCCD",130,0)
+    ; D EXTRACT^C0CACTOR("ACTT",ACTGLO,"ACTT2")
+"RTN","C0CCCD",131,0)
+    ; D INSINNER^C0CXPATH(CCDGLO,"ACTT2","//ContinuityOfCareRecord/Actors")
+"RTN","C0CCCD",132,0)
+    N I,J,DONE S DONE=0
+"RTN","C0CCCD",133,0)
+    F I=0:0 D  Q:DONE  ; DELETE UNTIL ALL EMPTY ELEMENTS ARE GONE
+"RTN","C0CCCD",134,0)
+    . S J=$$TRIM^C0CXPATH(CCDGLO) ; DELETE EMPTY ELEMENTS
+"RTN","C0CCCD",135,0)
+    . W "TRIMMED",J,!
+"RTN","C0CCCD",136,0)
+    . I J=0 S DONE=1 ; DONE WHEN TRIM RETURNS FALSE
+"RTN","C0CCCD",137,0)
+    I CCD D  ; TURN THE BODY INTO A CCD COMPONENT
+"RTN","C0CCCD",138,0)
+    . N I
+"RTN","C0CCCD",139,0)
+    . F I=1:1:@CCDGLO@(0) D  ; SEARCH THROUGH THE ENTIRE ARRAY
+"RTN","C0CCCD",140,0)
+    . . I @CCDGLO@(I)["<Body>" D  ; REPLACE BODY MARKUP
+"RTN","C0CCCD",141,0)
+    . . . S @CCDGLO@(I)="<component><structuredBody>" ; WITH CCD EQ
+"RTN","C0CCCD",142,0)
+    . . I @CCDGLO@(I)["</Body>" D  ; REPLACE BODY MARKUP
+"RTN","C0CCCD",143,0)
+    . . . S @CCDGLO@(I)="</structuredBody></component>"
+"RTN","C0CCCD",144,0)
+    S @CCDGLO@(3)=CAPSAVE ; UNCAP - TURN IT BACK INTO A CCD
+"RTN","C0CCCD",145,0)
+    S @CCDGLO@(@CCDGLO@(0))=CAPSAVE2 ; UNCAP LAST LINE
+"RTN","C0CCCD",146,0)
+    Q
+"RTN","C0CCCD",147,0)
+    ;
+"RTN","C0CCCD",148,0)
+INITSTPS(TAB)  ; INITIALIZE CCR PROCESSING STEPS
+"RTN","C0CCCD",149,0)
+    ; TAB IS PASSED BY NAME
+"RTN","C0CCCD",150,0)
+    W "TAB= ",TAB,!
+"RTN","C0CCCD",151,0)
+    ; ORDER FOR CCR IS PROBLEMS,FAMILYHISTORY,SOCIALHISTORY,MEDICATIONS,VITALSIGNS,RESULTS,HEALTHCAREPROVIDERS
+"RTN","C0CCCD",152,0)
+    D PUSH^C0CXPATH(TAB,"EXTRACT;C0CPROBS;//ContinuityOfCareRecord/Body/Problems;^TMP(""C0CCCR"",$J,DFN,""PROBLEMS"")")
+"RTN","C0CCCD",153,0)
+    ;D PUSH^C0CXPATH(TAB,"EXTRACT;C0CMED;//ContinuityOfCareRecord/Body/Medications;^TMP(""C0CCCR"",$J,DFN,""MEDICATIONS"")")
+"RTN","C0CCCD",154,0)
+    I 'CCD D PUSH^C0CXPATH(TAB,"EXTRACT;C0CVITAL;//ContinuityOfCareRecord/Body/VitalSigns;^TMP(""C0CCCR"",$J,DFN,""VITALS"")")
+"RTN","C0CCCD",155,0)
+    Q
+"RTN","C0CCCD",156,0)
+    ;
+"RTN","C0CCCD",157,0)
+SHAVE(SHXML) ; REMOVES THE 2-6 AND N-1 AND N-2 LINES FROM A COMPONENT
+"RTN","C0CCCD",158,0)
+    ; NEEDED TO EXPOSE THE REPEATING PARTS FOR GENERATION
+"RTN","C0CCCD",159,0)
+    N SHTMP,SHBLD ; TEMP ARRAY AND BUILD LIST
+"RTN","C0CCCD",160,0)
+    W SHXML,!
+"RTN","C0CCCD",161,0)
+    W @SHXML@(1),!
+"RTN","C0CCCD",162,0)
+    D QUEUE^C0CXPATH("SHBLD",SHXML,1,1) ; THE FIRST LINE IS NEEDED
+"RTN","C0CCCD",163,0)
+    D QUEUE^C0CXPATH("SHBLD",SHXML,7,@SHXML@(0)-3) ; REPEATING PART
+"RTN","C0CCCD",164,0)
+    D QUEUE^C0CXPATH("SHBLD",SHXML,@SHXML@(0),@SHXML@(0)) ; LAST LINE
+"RTN","C0CCCD",165,0)
+    D PARY^C0CXPATH("SHBLD") ; PRINT BUILD LIST
+"RTN","C0CCCD",166,0)
+    D BUILD^C0CXPATH("SHBLD","SHTMP") ; BUILD EDITED SECTION
+"RTN","C0CCCD",167,0)
+    D CP^C0CXPATH("SHTMP",SHXML) ; COPY RESULT TO PASSED ARRAY
+"RTN","C0CCCD",168,0)
+    Q
+"RTN","C0CCCD",169,0)
+    ;
+"RTN","C0CCCD",170,0)
+UNSHAVE(ORIGXML,SHXML) ; REPLACES THE 2-6 AND N-1 AND N-2 LINES FROM TEMPLATE
+"RTN","C0CCCD",171,0)
+    ; NEEDED TO RESTORM FIXED TOP AND BOTTOM OF THE COMPONENT XML
+"RTN","C0CCCD",172,0)
+    N SHTMP,SHBLD ; TEMP ARRAY AND BUILD LIST
+"RTN","C0CCCD",173,0)
+    W SHXML,!
+"RTN","C0CCCD",174,0)
+    W @SHXML@(1),!
+"RTN","C0CCCD",175,0)
+    D QUEUE^C0CXPATH("SHBLD",ORIGXML,1,6) ; FIRST 6 LINES OF TEMPLATE
+"RTN","C0CCCD",176,0)
+    D QUEUE^C0CXPATH("SHBLD",SHXML,2,@SHXML@(0)-1) ; INS ALL BUT FIRST/LAST
+"RTN","C0CCCD",177,0)
+    D QUEUE^C0CXPATH("SHBLD",ORIGXML,@ORIGXML@(0)-2,@ORIGXML@(0)) ; FROM TEMP
+"RTN","C0CCCD",178,0)
+    D PARY^C0CXPATH("SHBLD") ; PRINT BUILD LIST
+"RTN","C0CCCD",179,0)
+    D BUILD^C0CXPATH("SHBLD","SHTMP") ; BUILD EDITED SECTION
+"RTN","C0CCCD",180,0)
+    D CP^C0CXPATH("SHTMP",SHXML) ; COPY RESULT TO PASSED ARRAY
+"RTN","C0CCCD",181,0)
+    Q
+"RTN","C0CCCD",182,0)
+    ;
+"RTN","C0CCCD",183,0)
+HDRMAP(CXML,DFN,IHDR)   ; MAP HEADER VARIABLES: FROM, TO ECT
+"RTN","C0CCCD",184,0)
+    N VMAP S VMAP=$NA(^TMP("C0CCCR",$J,DFN,"HEADER"))
+"RTN","C0CCCD",185,0)
+    ; K @VMAP
+"RTN","C0CCCD",186,0)
+    S @VMAP@("DATETIME")=$$FMDTOUTC^C0CUTIL($$NOW^XLFDT,"DT")
+"RTN","C0CCCD",187,0)
+    I IHDR="" D  ; HEADER ARRAY IS NOT PROVIDED, USE DEFAULTS
+"RTN","C0CCCD",188,0)
+    . S @VMAP@("ACTORPATIENT")="ACTORPATIENT_"_DFN
+"RTN","C0CCCD",189,0)
+    . S @VMAP@("ACTORFROM")="ACTORORGANIZATION_"_DUZ ; FROM DUZ - ???
+"RTN","C0CCCD",190,0)
+    . S @VMAP@("ACTORFROM2")="ACTORSYSTEM_1" ; SECOND FROM IS THE SYSTEM
+"RTN","C0CCCD",191,0)
+    . S @VMAP@("ACTORTO")="ACTORPATIENT_"_DFN  ; FOR TEST PURPOSES
+"RTN","C0CCCD",192,0)
+    . S @VMAP@("PURPOSEDESCRIPTION")="CEND PHR"  ; FOR TEST PURPOSES
+"RTN","C0CCCD",193,0)
+    . S @VMAP@("ACTORTOTEXT")="Patient"  ; FOR TEST PURPOSES
+"RTN","C0CCCD",194,0)
+    . ; THIS IS THE USE CASE FOR THE PHR WHERE "TO" IS THE PATIENT
+"RTN","C0CCCD",195,0)
+    I IHDR'="" D  ; HEADER VALUES ARE PROVIDED
+"RTN","C0CCCD",196,0)
+    . D CP^C0CXPATH(IHDR,VMAP) ; COPY HEADER VARIABLES TO MAP ARRAY
+"RTN","C0CCCD",197,0)
+    N CTMP
+"RTN","C0CCCD",198,0)
+    D MAP^C0CXPATH(CXML,VMAP,"CTMP")
+"RTN","C0CCCD",199,0)
+    D CP^C0CXPATH("CTMP",CXML)
+"RTN","C0CCCD",200,0)
+    Q
+"RTN","C0CCCD",201,0)
+    ;
+"RTN","C0CCCD",202,0)
+ACTLST(AXML,ACTRTN) ; RETURN THE ACTOR LIST FOR THE XML IN AXML
+"RTN","C0CCCD",203,0)
+    ; AXML AND ACTRTN ARE PASSED BY NAME
+"RTN","C0CCCD",204,0)
+    ; EACH ACTOR RECORD HAS 3 PARTS - IE IF OBJECTID=ACTORPATIENT_2
+"RTN","C0CCCD",205,0)
+    ; P1= OBJECTID - ACTORPATIENT_2
+"RTN","C0CCCD",206,0)
+    ; P2= OBJECT TYPE - PATIENT OR PROVIDER OR SOFTWARE
+"RTN","C0CCCD",207,0)
+    ;OR INSTITUTION
+"RTN","C0CCCD",208,0)
+    ;  OR PERSON(IN PATIENT FILE IE NOK)
+"RTN","C0CCCD",209,0)
+    ; P3= IEN RECORD NUMBER FOR ACTOR - 2
+"RTN","C0CCCD",210,0)
+    N I,J,K,L
+"RTN","C0CCCD",211,0)
+    K @ACTRTN ; CLEAR RETURN ARRAY
+"RTN","C0CCCD",212,0)
+    F I=1:1:@AXML@(0) D  ; SCAN ALL LINES
+"RTN","C0CCCD",213,0)
+    . I @AXML@(I)?.E1"<ActorID>".E D  ; THERE IS AN ACTOR THIS LINE
+"RTN","C0CCCD",214,0)
+    . . S J=$P($P(@AXML@(I),"<ActorID>",2),"</ActorID>",1)
+"RTN","C0CCCD",215,0)
+    . . W "<ActorID>=>",J,!
+"RTN","C0CCCD",216,0)
+    . . I J'="" S K(J)="" ; HASHING ACTOR
+"RTN","C0CCCD",217,0)
+    . . ;  TO GET RID OF DUPLICATES
+"RTN","C0CCCD",218,0)
+    S I="" ; GOING TO $O THROUGH THE HASH
+"RTN","C0CCCD",219,0)
+    F J=0:0 D  Q:$O(K(I))=""  ;
+"RTN","C0CCCD",220,0)
+    . S I=$O(K(I)) ; WALK THROUGH THE HASH OF ACTORS
+"RTN","C0CCCD",221,0)
+    . S $P(L,U,1)=I ; FIRST PIECE IS THE OBJECT ID
+"RTN","C0CCCD",222,0)
+    . S $P(L,U,2)=$P($P(I,"ACTOR",2),"_",1) ; ACTOR TYPE
+"RTN","C0CCCD",223,0)
+    . S $P(L,U,3)=$P(I,"_",2) ; IEN RECORD NUMBER FOR ACTOR
+"RTN","C0CCCD",224,0)
+    . D PUSH^C0CXPATH(ACTRTN,L) ; ADD THE ACTOR TO THE RETURN ARRAY
+"RTN","C0CCCD",225,0)
+    Q
+"RTN","C0CCCD",226,0)
+    ;
+"RTN","C0CCCD",227,0)
+TEST ; RUN ALL THE TEST CASES
+"RTN","C0CCCD",228,0)
+  D TESTALL^C0CUNIT("C0CCCR")
+"RTN","C0CCCD",229,0)
+  Q
+"RTN","C0CCCD",230,0)
+  ;
+"RTN","C0CCCD",231,0)
+ZTEST(WHICH)  ; RUN ONE SET OF TESTS
+"RTN","C0CCCD",232,0)
+  N ZTMP
+"RTN","C0CCCD",233,0)
+  D ZLOAD^C0CUNIT("ZTMP","C0CCCR")
+"RTN","C0CCCD",234,0)
+  D ZTEST^C0CUNIT(.ZTMP,WHICH)
+"RTN","C0CCCD",235,0)
+  Q
+"RTN","C0CCCD",236,0)
+  ;
+"RTN","C0CCCD",237,0)
+TLIST  ; LIST THE TESTS
+"RTN","C0CCCD",238,0)
+  N ZTMP
+"RTN","C0CCCD",239,0)
+  D ZLOAD^C0CUNIT("ZTMP","C0CCCR")
+"RTN","C0CCCD",240,0)
+  D TLIST^C0CUNIT(.ZTMP)
+"RTN","C0CCCD",241,0)
+  Q
+"RTN","C0CCCD",242,0)
+  ;
+"RTN","C0CCCD",243,0)
+ ;;><TEST>
+"RTN","C0CCCD",244,0)
+ ;;><PROBLEMS>
+"RTN","C0CCCD",245,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CCCD",246,0)
+ ;;>>>D CCRRPC^C0CCCR(.C0C,"2","PROBLEMS","","","")
+"RTN","C0CCCD",247,0)
+ ;;>>?@C0C@(@C0C@(0))["</Problems>"
+"RTN","C0CCCD",248,0)
+ ;;><VITALS>
+"RTN","C0CCCD",249,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CCCD",250,0)
+ ;;>>>D CCRRPC^C0CCCR(.C0C,"2","VITALS","","","")
+"RTN","C0CCCD",251,0)
+ ;;>>?@C0C@(@C0C@(0))["</VitalSigns>"
+"RTN","C0CCCD",252,0)
+ ;;><CCR>
+"RTN","C0CCCD",253,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CCCD",254,0)
+ ;;>>>D CCRRPC^C0CCCR(.C0C,"2","CCR","","","")
+"RTN","C0CCCD",255,0)
+ ;;>>?@C0C@(@C0C@(0))["</ContinuityOfCareRecord>"
+"RTN","C0CCCD",256,0)
+ ;;><ACTLST>
+"RTN","C0CCCD",257,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CCCD",258,0)
+ ;;>>>D CCRRPC^C0CCCR(.C0C,"2","CCR","","","")
+"RTN","C0CCCD",259,0)
+ ;;>>>D ACTLST^C0CCCR(C0C,"ACTTEST")
+"RTN","C0CCCD",260,0)
+ ;;><ACTORS>
+"RTN","C0CCCD",261,0)
+ ;;>>>D ZTEST^C0CCCR("ACTLST")
+"RTN","C0CCCD",262,0)
+ ;;>>>D QUERY^C0CXPATH(TGLOBAL,"//ContinuityOfCareRecord/Actors","G2")
+"RTN","C0CCCD",263,0)
+ ;;>>>D EXTRACT^C0CACTOR("G2","ACTTEST","G3")
+"RTN","C0CCCD",264,0)
+ ;;>>?G3(G3(0))["</Actors>"
+"RTN","C0CCCD",265,0)
+ ;;><TRIM>
+"RTN","C0CCCD",266,0)
+ ;;>>>D ZTEST^C0CCCR("CCR")
+"RTN","C0CCCD",267,0)
+ ;;>>>W $$TRIM^C0CXPATH(CCDGLO)
+"RTN","C0CCCD",268,0)
+ ;;><CCD>
+"RTN","C0CCCD",269,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CCCD",270,0)
+ ;;>>>D CCRRPC^C0CCCR(.C0C,"2","CCD","","","")
+"RTN","C0CCCD",271,0)
+ ;;>>?@C0C@(@C0C@(0))["</ContinuityOfCareRecord>"
+"RTN","C0CCCD",272,0)
+ ;;></TEST>
+"RTN","C0CCCD1")
+0^44^B100634737
+"RTN","C0CCCD1",1,0)
+C0CCCD1 ; CCDCCR/GPL - CCD TEMPLATE AND ACCESS ROUTINES; 6/7/08
+"RTN","C0CCCD1",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CCCD1",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota.
+"RTN","C0CCCD1",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CCCD1",5,0)
+ ;See attached copy of the License.
+"RTN","C0CCCD1",6,0)
+ ;
+"RTN","C0CCCD1",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CCCD1",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CCCD1",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CCCD1",10,0)
+ ;(at your option) any later version.
+"RTN","C0CCCD1",11,0)
+ ;
+"RTN","C0CCCD1",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CCCD1",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CCCD1",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CCCD1",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CCCD1",16,0)
+ ;
+"RTN","C0CCCD1",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CCCD1",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CCCD1",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CCCD1",20,0)
+ ;
+"RTN","C0CCCD1",21,0)
+          W "This is a CCD TEMPLATE with processing routines",!
+"RTN","C0CCCD1",22,0)
+          W !
+"RTN","C0CCCD1",23,0)
+          Q
+"RTN","C0CCCD1",24,0)
+          ;
+"RTN","C0CCCD1",25,0)
+ZT(ZARY,BAT,LINE) ; private routine to add a line to the ZARY array
+"RTN","C0CCCD1",26,0)
+          ; ZARY IS PASSED BY NAME
+"RTN","C0CCCD1",27,0)
+          ; BAT is a string identifying the section
+"RTN","C0CCCD1",28,0)
+          ; LINE is a test which will evaluate to true or false
+"RTN","C0CCCD1",29,0)
+          ; I '$G(@ZARY) D  ; IF ZARY DOES NOT EXIST '
+"RTN","C0CCCD1",30,0)
+          ; . S @ZARY@(0)=0 ; initially there are no elements
+"RTN","C0CCCD1",31,0)
+          ; . W "GOT HERE LOADING "_LINE,!
+"RTN","C0CCCD1",32,0)
+          N CNT ; count of array elements
+"RTN","C0CCCD1",33,0)
+          S CNT=@ZARY@(0) ; contains array count
+"RTN","C0CCCD1",34,0)
+          S CNT=CNT+1 ; increment count
+"RTN","C0CCCD1",35,0)
+          S @ZARY@(CNT)=LINE ; put the line in the array
+"RTN","C0CCCD1",36,0)
+          ; S @ZARY@(BAT,CNT)="" ; index the test by battery
+"RTN","C0CCCD1",37,0)
+          S @ZARY@(0)=CNT ; update the array counter
+"RTN","C0CCCD1",38,0)
+          Q
+"RTN","C0CCCD1",39,0)
+          ;
+"RTN","C0CCCD1",40,0)
+ZLOAD(ZARY,ROUTINE) ; load tests into ZARY which is passed by reference
+"RTN","C0CCCD1",41,0)
+          ; ZARY IS PASSED BY NAME
+"RTN","C0CCCD1",42,0)
+          ; ZARY = name of the root, closed array format (e.g., "^TMP($J)")
+"RTN","C0CCCD1",43,0)
+          ; ROUTINE = NAME OF THE ROUTINE - PASSED BY VALUE
+"RTN","C0CCCD1",44,0)
+          K @ZARY S @ZARY=""
+"RTN","C0CCCD1",45,0)
+          S @ZARY@(0)=0 ; initialize array count
+"RTN","C0CCCD1",46,0)
+          N LINE,LABEL,BODY
+"RTN","C0CCCD1",47,0)
+          N INTEST S INTEST=0 ; switch for in the TEMPLATE section
+"RTN","C0CCCD1",48,0)
+          N SECTION S SECTION="[anonymous]" ; NO section LABEL
+"RTN","C0CCCD1",49,0)
+          ;
+"RTN","C0CCCD1",50,0)
+          N NUM F NUM=1:1 S LINE=$T(+NUM^@ROUTINE) Q:LINE=""  D
+"RTN","C0CCCD1",51,0)
+          . I LINE?." "1";<TEMPLATE>".E S INTEST=1 ; entering section
+"RTN","C0CCCD1",52,0)
+          . I LINE?." "1";</TEMPLATE>".E S INTEST=0 ; leaving section
+"RTN","C0CCCD1",53,0)
+          . I INTEST  D  ; within the section
+"RTN","C0CCCD1",54,0)
+          . . I LINE?." "1";><".E  D  ; sub-section name found
+"RTN","C0CCCD1",55,0)
+          . . . S SECTION=$P($P(LINE,";><",2),">",1) ; pull out name
+"RTN","C0CCCD1",56,0)
+          . . I LINE?." "1";;".E  D  ; line found
+"RTN","C0CCCD1",57,0)
+          . . . D ZT(ZARY,SECTION,$P(LINE,";;",2)) ; put the line in the array
+"RTN","C0CCCD1",58,0)
+          Q
+"RTN","C0CCCD1",59,0)
+          ;
+"RTN","C0CCCD1",60,0)
+LOAD(ARY) ; LOAD A CCR TEMPLATE INTO ARY PASSED BY NAME
+"RTN","C0CCCD1",61,0)
+          D ZLOAD(ARY,"C0CCCD1")
+"RTN","C0CCCD1",62,0)
+          ; ZWR @ARY
+"RTN","C0CCCD1",63,0)
+          Q
+"RTN","C0CCCD1",64,0)
+          ;
+"RTN","C0CCCD1",65,0)
+TRMCCD    ; ROUTINE TO BE WRITTEN TO REMOVE CCR MARKUP FROM CCD
+"RTN","C0CCCD1",66,0)
+          Q
+"RTN","C0CCCD1",67,0)
+MARKUP ;<MARKUP>
+"RTN","C0CCCD1",68,0)
+ ;;<Body>
+"RTN","C0CCCD1",69,0)
+ ;;<Problems>
+"RTN","C0CCCD1",70,0)
+ ;;</Problems>
+"RTN","C0CCCD1",71,0)
+ ;;<FamilyHistory>
+"RTN","C0CCCD1",72,0)
+ ;;</FamilyHistory>
+"RTN","C0CCCD1",73,0)
+ ;;<SocialHistory>
+"RTN","C0CCCD1",74,0)
+ ;;</SocialHistory>
+"RTN","C0CCCD1",75,0)
+ ;;<Alerts>
+"RTN","C0CCCD1",76,0)
+ ;;</Alerts>
+"RTN","C0CCCD1",77,0)
+ ;;<Medications>
+"RTN","C0CCCD1",78,0)
+ ;;</Medications>
+"RTN","C0CCCD1",79,0)
+ ;;<VitalSigns>
+"RTN","C0CCCD1",80,0)
+ ;;</VitalSigns>
+"RTN","C0CCCD1",81,0)
+ ;;<Results>
+"RTN","C0CCCD1",82,0)
+ ;;</Results>
+"RTN","C0CCCD1",83,0)
+ ;;</Body>
+"RTN","C0CCCD1",84,0)
+ ;;</ContinuityOfCareRecord>
+"RTN","C0CCCD1",85,0)
+ ;</MARKUP>
+"RTN","C0CCCD1",86,0)
+ ;;<ClinicalDocument xmlns="urn:hl7-org:v3" xmlns:voc="urn:hl7-org:v3/voc" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="urn:hl7-org:v3 CDA.xsd">
+"RTN","C0CCCD1",87,0)
+ ;;</ClinicalDocument>
+"RTN","C0CCCD1",88,0)
+ Q
+"RTN","C0CCCD1",89,0)
+ ;
+"RTN","C0CCCD1",90,0)
+ ;<TEMPLATE>
+"RTN","C0CCCD1",91,0)
+ ;;<?xml version="1.0"?>
+"RTN","C0CCCD1",92,0)
+ ;;<?xml-stylesheet type="text/xsl" href="CCD.xsl"?>
+"RTN","C0CCCD1",93,0)
+ ;;<ClinicalDocument xmlns="urn:hl7-org:v3" xmlns:voc="urn:hl7-org:v3/voc" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="urn:hl7-org:v3 CDA.xsd">
+"RTN","C0CCCD1",94,0)
+ ;;<typeId root="2.16.840.1.113883.1.3" extension="POCD_HD000040"/>
+"RTN","C0CCCD1",95,0)
+ ;;<templateId root="2.16.840.1.113883.10.20.1"/>
+"RTN","C0CCCD1",96,0)
+ ;;<id root="db734647-fc99-424c-a864-7e3cda82e703"/>
+"RTN","C0CCCD1",97,0)
+ ;;<code code="34133-9" codeSystem="2.16.840.1.113883.6.1" displayName="Summarization of episode note"/>
+"RTN","C0CCCD1",98,0)
+ ;;<title>Continuity of Care Document</title>
+"RTN","C0CCCD1",99,0)
+ ;;<effectiveTime value="20000407130000+0500"/>
+"RTN","C0CCCD1",100,0)
+ ;;<confidentialityCode code="N" codeSystem="2.16.840.1.113883.5.25"/>
+"RTN","C0CCCD1",101,0)
+ ;;<languageCode code="en-US"/>
+"RTN","C0CCCD1",102,0)
+ ;;<recordTarget>
+"RTN","C0CCCD1",103,0)
+ ;;<patientRole>
+"RTN","C0CCCD1",104,0)
+ ;;<id extension="@@ACTORIEN@@" root="2.16.840.1.113883.19.5"/>
+"RTN","C0CCCD1",105,0)
+ ;;<patient>
+"RTN","C0CCCD1",106,0)
+ ;;<name>
+"RTN","C0CCCD1",107,0)
+ ;;<given>@@ACTORGIVENNAME@@</given>
+"RTN","C0CCCD1",108,0)
+ ;;<family>@@ACTORFAMILYNAME@@</family>
+"RTN","C0CCCD1",109,0)
+ ;;<suffix>@@ACTORSUFFIXNAME@@</suffix>
+"RTN","C0CCCD1",110,0)
+ ;;</name>
+"RTN","C0CCCD1",111,0)
+ ;;<administrativeGenderCode code="@@ACTORGENDER@@" codeSystem="2.16.840.1.113883.5.1"/>
+"RTN","C0CCCD1",112,0)
+ ;;<birthTime value="@@ACTORDATEOFBIRTH@@"/>
+"RTN","C0CCCD1",113,0)
+ ;;</patient>
+"RTN","C0CCCD1",114,0)
+ ;;<providerOrganization>
+"RTN","C0CCCD1",115,0)
+ ;;<id root="2.16.840.1.113883.19.5"/>
+"RTN","C0CCCD1",116,0)
+ ;;<name>@@ORGANIZATIONNAME@@</name>
+"RTN","C0CCCD1",117,0)
+ ;;</providerOrganization>
+"RTN","C0CCCD1",118,0)
+ ;;</patientRole>
+"RTN","C0CCCD1",119,0)
+ ;;</recordTarget>
+"RTN","C0CCCD1",120,0)
+ ;;<author>
+"RTN","C0CCCD1",121,0)
+ ;;<time value="20000407130000+0500"/>
+"RTN","C0CCCD1",122,0)
+ ;;<assignedAuthor>
+"RTN","C0CCCD1",123,0)
+ ;;<id root="20cf14fb-b65c-4c8c-a54d-b0cca834c18c"/>
+"RTN","C0CCCD1",124,0)
+ ;;<assignedPerson>
+"RTN","C0CCCD1",125,0)
+ ;;<name>
+"RTN","C0CCCD1",126,0)
+ ;;<prefix>@@ACTORNAMEPREFIX@@</prefix>
+"RTN","C0CCCD1",127,0)
+ ;;<given>@@ACTORGIVENNAME@@</given>
+"RTN","C0CCCD1",128,0)
+ ;;<family>@@ACTORFAMILYNAME@@</family>
+"RTN","C0CCCD1",129,0)
+ ;;</name>
+"RTN","C0CCCD1",130,0)
+ ;;</assignedPerson>
+"RTN","C0CCCD1",131,0)
+ ;;<representedOrganization>
+"RTN","C0CCCD1",132,0)
+ ;;<id root="2.16.840.1.113883.19.5"/>
+"RTN","C0CCCD1",133,0)
+ ;;<name>@@ORGANIZATIONNAME@@</name>
+"RTN","C0CCCD1",134,0)
+ ;;</representedOrganization>
+"RTN","C0CCCD1",135,0)
+ ;;</assignedAuthor>
+"RTN","C0CCCD1",136,0)
+ ;;</author>
+"RTN","C0CCCD1",137,0)
+ ;;<informant>
+"RTN","C0CCCD1",138,0)
+ ;;<assignedEntity>
+"RTN","C0CCCD1",139,0)
+ ;;<id nullFlavor="NI"/>
+"RTN","C0CCCD1",140,0)
+ ;;<representedOrganization>
+"RTN","C0CCCD1",141,0)
+ ;;<id root="2.16.840.1.113883.19.5"/>
+"RTN","C0CCCD1",142,0)
+ ;;<name>@@ORGANIZATIONNAME@@</name>
+"RTN","C0CCCD1",143,0)
+ ;;</representedOrganization>
+"RTN","C0CCCD1",144,0)
+ ;;</assignedEntity>
+"RTN","C0CCCD1",145,0)
+ ;;</informant>
+"RTN","C0CCCD1",146,0)
+ ;;<custodian>
+"RTN","C0CCCD1",147,0)
+ ;;<assignedCustodian>
+"RTN","C0CCCD1",148,0)
+ ;;<representedCustodianOrganization>
+"RTN","C0CCCD1",149,0)
+ ;;<id root="2.16.840.1.113883.19.5"/>
+"RTN","C0CCCD1",150,0)
+ ;;<name>@@ORGANIZATIONNAME@@</name>
+"RTN","C0CCCD1",151,0)
+ ;;</representedCustodianOrganization>
+"RTN","C0CCCD1",152,0)
+ ;;</assignedCustodian>
+"RTN","C0CCCD1",153,0)
+ ;;</custodian>
+"RTN","C0CCCD1",154,0)
+ ;;<legalAuthenticator>
+"RTN","C0CCCD1",155,0)
+ ;;<time value="20000407130000+0500"/>
+"RTN","C0CCCD1",156,0)
+ ;;<signatureCode code="S"/>
+"RTN","C0CCCD1",157,0)
+ ;;<assignedEntity>
+"RTN","C0CCCD1",158,0)
+ ;;<id nullFlavor="NI"/>
+"RTN","C0CCCD1",159,0)
+ ;;<representedOrganization>
+"RTN","C0CCCD1",160,0)
+ ;;<id root="2.16.840.1.113883.19.5"/>
+"RTN","C0CCCD1",161,0)
+ ;;<name>@@ORGANIZATIONNAME@@</name>
+"RTN","C0CCCD1",162,0)
+ ;;</representedOrganization>
+"RTN","C0CCCD1",163,0)
+ ;;</assignedEntity>
+"RTN","C0CCCD1",164,0)
+ ;;</legalAuthenticator>
+"RTN","C0CCCD1",165,0)
+ ;;<Actors>
+"RTN","C0CCCD1",166,0)
+ ;;<ACTOR-NOK>
+"RTN","C0CCCD1",167,0)
+ ;;<participant typeCode="IND">
+"RTN","C0CCCD1",168,0)
+ ;;<associatedEntity classCode="NOK">
+"RTN","C0CCCD1",169,0)
+ ;;<id root="4ac71514-6a10-4164-9715-f8d96af48e6d"/>
+"RTN","C0CCCD1",170,0)
+ ;;<code code="65656005" codeSystem="2.16.840.1.113883.6.96" displayName="Biiological mother"/>
+"RTN","C0CCCD1",171,0)
+ ;;<telecom value="tel:(999)555-1212"/>
+"RTN","C0CCCD1",172,0)
+ ;;<associatedPerson>
+"RTN","C0CCCD1",173,0)
+ ;;<name>
+"RTN","C0CCCD1",174,0)
+ ;;<given>Henrietta</given>
+"RTN","C0CCCD1",175,0)
+ ;;<family>Levin</family>
+"RTN","C0CCCD1",176,0)
+ ;;</name>
+"RTN","C0CCCD1",177,0)
+ ;;</associatedPerson>
+"RTN","C0CCCD1",178,0)
+ ;;</associatedEntity>
+"RTN","C0CCCD1",179,0)
+ ;;</participant>
+"RTN","C0CCCD1",180,0)
+ ;;</ACTOR-NOK>
+"RTN","C0CCCD1",181,0)
+ ;;</Actors>
+"RTN","C0CCCD1",182,0)
+ ;;<documentationOf>
+"RTN","C0CCCD1",183,0)
+ ;;<serviceEvent classCode="PCPR">
+"RTN","C0CCCD1",184,0)
+ ;;<effectiveTime>
+"RTN","C0CCCD1",185,0)
+ ;;<high value="@@DATETIME@@"/>
+"RTN","C0CCCD1",186,0)
+ ;;</effectiveTime>
+"RTN","C0CCCD1",187,0)
+ ;;<performer typeCode="PRF">
+"RTN","C0CCCD1",188,0)
+ ;;<functionCode code="PCP" codeSystem="2.16.840.1.113883.5.88"/>
+"RTN","C0CCCD1",189,0)
+ ;;<time>
+"RTN","C0CCCD1",190,0)
+ ;;<low value="1990"/>
+"RTN","C0CCCD1",191,0)
+ ;;<high value='20000407'/>
+"RTN","C0CCCD1",192,0)
+ ;;</time>
+"RTN","C0CCCD1",193,0)
+ ;;<assignedEntity>
+"RTN","C0CCCD1",194,0)
+ ;;<id root="20cf14fb-b65c-4c8c-a54d-b0cca834c18c"/>
+"RTN","C0CCCD1",195,0)
+ ;;<assignedPerson>
+"RTN","C0CCCD1",196,0)
+ ;;<name>
+"RTN","C0CCCD1",197,0)
+ ;;<prefix>@@ACTORPREFIXNAME@@</prefix>
+"RTN","C0CCCD1",198,0)
+ ;;<given>@@ACTORGIVENNAME@@</given>
+"RTN","C0CCCD1",199,0)
+ ;;<family>@@ACTORFAMILYNAME@@</family>
+"RTN","C0CCCD1",200,0)
+ ;;</name>
+"RTN","C0CCCD1",201,0)
+ ;;</assignedPerson>
+"RTN","C0CCCD1",202,0)
+ ;;<representedOrganization>
+"RTN","C0CCCD1",203,0)
+ ;;<id root="2.16.840.1.113883.19.5"/>
+"RTN","C0CCCD1",204,0)
+ ;;<name>@@ORGANIZATIONNAME@@</name>
+"RTN","C0CCCD1",205,0)
+ ;;</representedOrganization>
+"RTN","C0CCCD1",206,0)
+ ;;</assignedEntity>
+"RTN","C0CCCD1",207,0)
+ ;;</performer>
+"RTN","C0CCCD1",208,0)
+ ;;</serviceEvent>
+"RTN","C0CCCD1",209,0)
+ ;;</documentationOf>
+"RTN","C0CCCD1",210,0)
+ ;;<Body>
+"RTN","C0CCCD1",211,0)
+ ;;<PROBLEMS-HTML>
+"RTN","C0CCCD1",212,0)
+ ;;<text><table border="1" width="100%"><thead><tr><th>Condition</th><th>Effective Dates</th><th>Condition Status</th></tr></thead><tbody>
+"RTN","C0CCCD1",213,0)
+ ;;<tr><td>@@PROBLEMDESCRIPTION@@</td>
+"RTN","C0CCCD1",214,0)
+ ;;<td>@@PROBLEMDATEOFONSET@@</td>
+"RTN","C0CCCD1",215,0)
+ ;;<td>Active</td></tr>
+"RTN","C0CCCD1",216,0)
+ ;;</tbody></table></text>
+"RTN","C0CCCD1",217,0)
+ ;;</PROBLEMS-HTML>
+"RTN","C0CCCD1",218,0)
+ ;;<Problems>
+"RTN","C0CCCD1",219,0)
+ ;;<component>
+"RTN","C0CCCD1",220,0)
+ ;;<section>
+"RTN","C0CCCD1",221,0)
+ ;;<templateId root='2.16.840.1.113883.10.20.1.11'/>
+"RTN","C0CCCD1",222,0)
+ ;;<code code="11450-4" codeSystem="2.16.840.1.113883.6.1"/>
+"RTN","C0CCCD1",223,0)
+ ;;<title>Problems</title>
+"RTN","C0CCCD1",224,0)
+ ;;<entry typeCode="DRIV">
+"RTN","C0CCCD1",225,0)
+ ;;<act classCode="ACT" moodCode="EVN">
+"RTN","C0CCCD1",226,0)
+ ;;<templateId root='2.16.840.1.113883.10.20.1.27'/>
+"RTN","C0CCCD1",227,0)
+ ;;<id root="6a2fa88d-4174-4909-aece-db44b60a3abb"/>
+"RTN","C0CCCD1",228,0)
+ ;;<code nullFlavor="NA"/>
+"RTN","C0CCCD1",229,0)
+ ;;<entryRelationship typeCode="SUBJ">
+"RTN","C0CCCD1",230,0)
+ ;;<observation classCode="OBS" moodCode="EVN">
+"RTN","C0CCCD1",231,0)
+ ;;<templateId root='2.16.840.1.113883.10.20.1.28'/>
+"RTN","C0CCCD1",232,0)
+ ;;<id root="d11275e7-67ae-11db-bd13-0800200c9a66"/>
+"RTN","C0CCCD1",233,0)
+ ;;<code code="ASSERTION" codeSystem="2.16.840.1.113883.5.4"/>
+"RTN","C0CCCD1",234,0)
+ ;;<statusCode code="completed"/>
+"RTN","C0CCCD1",235,0)
+ ;;<effectiveTime>
+"RTN","C0CCCD1",236,0)
+ ;;<low value="@@PROBLEMDATEOFONSET@@"/>
+"RTN","C0CCCD1",237,0)
+ ;;</effectiveTime>
+"RTN","C0CCCD1",238,0)
+ ;;<value xsi:type="CD" code="@@PROBLEMCODEVALUE@@" codeSystem="2.16.840.1.113883.6.96" displayName="@@PROBLEMDESCRIPTION@@"/>
+"RTN","C0CCCD1",239,0)
+ ;;<entryRelationship typeCode="REFR">
+"RTN","C0CCCD1",240,0)
+ ;;<observation classCode="OBS" moodCode="EVN">
+"RTN","C0CCCD1",241,0)
+ ;;<templateId root='2.16.840.1.113883.10.20.1.50'/>
+"RTN","C0CCCD1",242,0)
+ ;;<code code="33999-4" codeSystem="2.16.840.1.113883.6.1" displayName="Status"/>
+"RTN","C0CCCD1",243,0)
+ ;;<statusCode code="completed"/>
+"RTN","C0CCCD1",244,0)
+ ;;<value xsi:type="CE" code="55561003" codeSystem="2.16.840.1.113883.6.96" displayName="Active"/>
+"RTN","C0CCCD1",245,0)
+ ;;</observation>
+"RTN","C0CCCD1",246,0)
+ ;;</entryRelationship>
+"RTN","C0CCCD1",247,0)
+ ;;</observation>
+"RTN","C0CCCD1",248,0)
+ ;;</entryRelationship>
+"RTN","C0CCCD1",249,0)
+ ;;</act>
+"RTN","C0CCCD1",250,0)
+ ;;</entry>
+"RTN","C0CCCD1",251,0)
+ ;;</section>
+"RTN","C0CCCD1",252,0)
+ ;;</component>
+"RTN","C0CCCD1",253,0)
+ ;;</Problems>
+"RTN","C0CCCD1",254,0)
+ ;;<FamilyHistory>
+"RTN","C0CCCD1",255,0)
+ ;;</FamilyHistory>
+"RTN","C0CCCD1",256,0)
+ ;;<SocialHistory>
+"RTN","C0CCCD1",257,0)
+ ;;</SocialHistory>
+"RTN","C0CCCD1",258,0)
+ ;;<Alerts>
+"RTN","C0CCCD1",259,0)
+ ;;</Alerts>
+"RTN","C0CCCD1",260,0)
+ ;;<Medications>
+"RTN","C0CCCD1",261,0)
+ ;;</Medications>
+"RTN","C0CCCD1",262,0)
+ ;;<VitalSigns>
+"RTN","C0CCCD1",263,0)
+ ;;</VitalSigns>
+"RTN","C0CCCD1",264,0)
+ ;;<Results>
+"RTN","C0CCCD1",265,0)
+ ;;</Results>
+"RTN","C0CCCD1",266,0)
+ ;;</Body>
+"RTN","C0CCCD1",267,0)
+ ;;</ClinicalDocument>
+"RTN","C0CCCD1",268,0)
+ ;</TEMPLATE>
+"RTN","C0CCCR")
+0^43^B111682825
+"RTN","C0CCCR",1,0)
+C0CCCR   ; CCDCCR/GPL - CCR MAIN PROCESSING; 6/6/08
+"RTN","C0CCCR",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CCCR",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota.
+"RTN","C0CCCR",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CCCR",5,0)
+ ;See attached copy of the License.
+"RTN","C0CCCR",6,0)
+ ;
+"RTN","C0CCCR",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CCCR",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CCCR",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CCCR",10,0)
+ ;(at your option) any later version.
+"RTN","C0CCCR",11,0)
+ ;
+"RTN","C0CCCR",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CCCR",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CCCR",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CCCR",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CCCR",16,0)
+ ;
+"RTN","C0CCCR",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CCCR",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CCCR",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CCCR",20,0)
+ ;
+"RTN","C0CCCR",21,0)
+ ; EXPORT A CCR
+"RTN","C0CCCR",22,0)
+ ;
+"RTN","C0CCCR",23,0)
+EXPORT   ; EXPORT ENTRY POINT FOR CCR
+"RTN","C0CCCR",24,0)
+ ; Select a patient.
+"RTN","C0CCCR",25,0)
+ S DIC=2,DIC(0)="AEMQ" D ^DIC
+"RTN","C0CCCR",26,0)
+ I Y<1 Q  ; EXIT
+"RTN","C0CCCR",27,0)
+ S DFN=$P(Y,U,1) ; SET THE PATIENT
+"RTN","C0CCCR",28,0)
+ ;OHUM/RUT 3120109 commented
+"RTN","C0CCCR",29,0)
+ ;;OHUM/RUT 3120102 To take inputs from user for date limits and notes
+"RTN","C0CCCR",30,0)
+ ;D ^C0CVALID
+"RTN","C0CCCR",31,0)
+ ;;OHUM/RUT
+"RTN","C0CCCR",32,0)
+ ;OHUM/RUT
+"RTN","C0CCCR",33,0)
+ D XPAT(DFN) ; EXPORT TO A FILE
+"RTN","C0CCCR",34,0)
+ Q
+"RTN","C0CCCR",35,0)
+ ;
+"RTN","C0CCCR",36,0)
+XPAT(DFN,XPARMS,DIR,FN) ; EXPORT ONE PATIENT TO A FILE
+"RTN","C0CCCR",37,0)
+ ; DIR IS THE DIRECTORY, DEFAULTS IF NULL TO ^TMP("C0CCCR","ODIR")
+"RTN","C0CCCR",38,0)
+ ; FN IS FILE NAME, DEFAULTS IF NULL
+"RTN","C0CCCR",39,0)
+ N CCRGLO,UDIR,UFN
+"RTN","C0CCCR",40,0)
+ S C0CNRPC=1 ; FLAG FOR NOT AN RPC CALL - FOR DEBUGGING THE RPC
+"RTN","C0CCCR",41,0)
+ I '$D(DIR) S UDIR=""
+"RTN","C0CCCR",42,0)
+ E  S UDIR=DIR
+"RTN","C0CCCR",43,0)
+ I '$D(FN) S UFN="" ; IF FILENAME IS NOT PASSED
+"RTN","C0CCCR",44,0)
+ E  S UFN=FN
+"RTN","C0CCCR",45,0)
+ I '$D(XPARMS) S XPARMS=""
+"RTN","C0CCCR",46,0)
+ N C0CRTN  ; RETURN ARRAY
+"RTN","C0CCCR",47,0)
+ D CCRRPC(.C0CRTN,DFN,XPARMS,"CCR")
+"RTN","C0CCCR",48,0)
+ S OARY=$NA(^TMP("C0CCUR",$J,DFN,"CCR",1))
+"RTN","C0CCCR",49,0)
+ S ONAM=UFN
+"RTN","C0CCCR",50,0)
+ I UFN="" S ONAM="PAT_"_DFN_"_CCR_V1_0_0.xml"
+"RTN","C0CCCR",51,0)
+ S ODIRGLB=$NA(^TMP("C0CCCR","ODIR"))
+"RTN","C0CCCR",52,0)
+ S ^TMP("C0CCCR","FNAME",DFN)=ONAM ; FILE NAME FOR BATCH USE
+"RTN","C0CCCR",53,0)
+ I $D(^TMP("GPLCCR","ODIR")) S @ODIRGLB=^TMP("GPLCCR","ODIR")
+"RTN","C0CCCR",54,0)
+ I '$D(@ODIRGLB) D  ; IF NOT ODIR HAS BEEN SET
+"RTN","C0CCCR",55,0)
+ . W "Warning.. please set ^TMP(""C0CCCR"",""ODIR"")=""output path""",! Q
+"RTN","C0CCCR",56,0)
+ . ;S @ODIRGLB="/home/glilly/CCROUT"
+"RTN","C0CCCR",57,0)
+ . ;S @ODIRGLB="/home/cedwards/"
+"RTN","C0CCCR",58,0)
+ . S @ODIRGLB="/opt/wv/p/"
+"RTN","C0CCCR",59,0)
+ S ODIR=UDIR
+"RTN","C0CCCR",60,0)
+ I UDIR="" S ODIR=@ODIRGLB
+"RTN","C0CCCR",61,0)
+ N ZY
+"RTN","C0CCCR",62,0)
+ S ZY=$$OUTPUT^C0CXPATH(OARY,ONAM,ODIR)
+"RTN","C0CCCR",63,0)
+ W !,$P(ZY,U,2),!
+"RTN","C0CCCR",64,0)
+ Q
+"RTN","C0CCCR",65,0)
+ ;
+"RTN","C0CCCR",66,0)
+DCCR(DFN) ; DISPLAY A CCR THAT HAS JUST BEEN EXTRACTED
+"RTN","C0CCCR",67,0)
+ ;
+"RTN","C0CCCR",68,0)
+ N G1
+"RTN","C0CCCR",69,0)
+ S G1=$NA(^TMP("C0CCUR",$J,DFN,"CCR"))
+"RTN","C0CCCR",70,0)
+ I $D(@G1@(0)) D  ; CCR EXISTS
+"RTN","C0CCCR",71,0)
+ . D PARY^C0CXPATH(G1)
+"RTN","C0CCCR",72,0)
+ E  W "CCR NOT CREATED, RUN D XPAT^C0CCCR(DFN,"""","""") FIRST",!
+"RTN","C0CCCR",73,0)
+ Q
+"RTN","C0CCCR",74,0)
+ ;
+"RTN","C0CCCR",75,0)
+CCRRPC(CCRGRTN,DFN,CCRPARMS,CCRPART)  ;RPC ENTRY POINT FOR CCR OUTPUT
+"RTN","C0CCCR",76,0)
+ ; CCRGRTN IS RETURN ARRAY PASSED BY REFERENCE
+"RTN","C0CCCR",77,0)
+ ; DFN IS PATIENT IEN
+"RTN","C0CCCR",78,0)
+ ; CCRPART IS "CCR" FOR ENTIRE CCR, OR SECTION NAME FOR A PART
+"RTN","C0CCCR",79,0)
+ ;   OF THE CCR BODY.. PARTS INCLUDE "PROBLEMS" "VITALS" ETC
+"RTN","C0CCCR",80,0)
+ ; CCRPARMS ARE PARAMETERS THAT AFFECT THE EXTRACTION
+"RTN","C0CCCR",81,0)
+ ; IN THE FORM "PARM1:VALUE1^PARM2:VALUE2"
+"RTN","C0CCCR",82,0)
+ ; EXAMPLE: "LABLIMIT:T-60" TO LIMIT LAB EXTRACTION TO THE LAST 60 DAYS
+"RTN","C0CCCR",83,0)
+ ; SEE C0CPARMS FOR A COMPLETE LIST OF SUPPORTED PARAMETERS
+"RTN","C0CCCR",84,0)
+ K ^TMP("C0CCCR",$J) ; CLEAN UP THE GLOBAL BEFORE WE USE IT
+"RTN","C0CCCR",85,0)
+ M ^TMP("C0CSAV",$J)=^TMP($J) ; SAVING CALLER'S TMP SETTINGS
+"RTN","C0CCCR",86,0)
+ K ^TMP($J) ; START CLEAN
+"RTN","C0CCCR",87,0)
+ I '$D(DEBUG) S DEBUG=0
+"RTN","C0CCCR",88,0)
+ S CCD=0 ; NEED THIS FLAG TO DISTINGUISH FROM CCD
+"RTN","C0CCCR",89,0)
+ I '$D(CCRPARMS) S CCRPARMS=""
+"RTN","C0CCCR",90,0)
+ I '$D(CCRPART) S CCRPART="CCR"
+"RTN","C0CCCR",91,0)
+ I '$D(C0CNRPC) S ^TMP("C0CRPC",$H,"CALL",DFN)=""
+"RTN","C0CCCR",92,0)
+ D SET^C0CPARMS(CCRPARMS) ;SET PARAMETERS WITH CCRPARMS AS OVERRIDES
+"RTN","C0CCCR",93,0)
+ I '$D(TESTVIT) S TESTVIT=0 ; FLAG FOR TESTING VITALS
+"RTN","C0CCCR",94,0)
+ I '$D(TESTLAB) S TESTLAB=0 ; FLAG FOR TESTING RESULTS SECTION
+"RTN","C0CCCR",95,0)
+ I '$D(TESTALERT) S TESTALERT=1 ; FLAG FOR TESTING ALERTS SECTION
+"RTN","C0CCCR",96,0)
+ I '$D(TESTMEDS) S TESTMEDS=0 ; FLAG FOR TESTING C0CMED SECTION
+"RTN","C0CCCR",97,0)
+ S TGLOBAL=$NA(^TMP("C0CCCR",$J,"TEMPLATE")) ; GLOBAL FOR STORING TEMPLATE
+"RTN","C0CCCR",98,0)
+ S CCRGLO=$NA(^TMP("C0CCUR",$J,DFN,"CCR")) ; GLOBAL FOR BUILDING THE CCR
+"RTN","C0CCCR",99,0)
+ S ACTGLO=$NA(^TMP("C0CCCR",$J,DFN,"ACTORS")) ; GLOBAL FOR ALL ACTORS
+"RTN","C0CCCR",100,0)
+ ; TO GET PART OF THE CCR RETURNED, PASS CCRPART="PROBLEMS" ETC
+"RTN","C0CCCR",101,0)
+ ;M CCRGRTN=^TMP("C0CCCR",$J,DFN,CCRPART) ; RTN GLOBAL OF PART OR ALL
+"RTN","C0CCCR",102,0)
+ D LOAD^C0CCCR0(TGLOBAL)  ; LOAD THE CCR TEMPLATE
+"RTN","C0CCCR",103,0)
+ D CP^C0CXPATH(TGLOBAL,CCRGLO) ; COPY THE TEMPLATE TO CCR GLOBAL
+"RTN","C0CCCR",104,0)
+ ;
+"RTN","C0CCCR",105,0)
+ ; DELETE THE BODY, ACTORS AND SIGNATURES SECTIONS FROM GLOBAL
+"RTN","C0CCCR",106,0)
+ ; THESE WILL BE POPULATED AFTER CALLS TO THE XPATH ROUTINES
+"RTN","C0CCCR",107,0)
+ D REPLACE^C0CXPATH(CCRGLO,"","//ContinuityOfCareRecord/Body")
+"RTN","C0CCCR",108,0)
+ D REPLACE^C0CXPATH(CCRGLO,"","//ContinuityOfCareRecord/Actors")
+"RTN","C0CCCR",109,0)
+ D REPLACE^C0CXPATH(CCRGLO,"","//ContinuityOfCareRecord/Signatures")
+"RTN","C0CCCR",110,0)
+ D REPLACE^C0CXPATH(CCRGLO,"","//ContinuityOfCareRecord/Comments")
+"RTN","C0CCCR",111,0)
+ I DEBUG F I=1:1:@CCRGLO@(0) W @CCRGLO@(I),!
+"RTN","C0CCCR",112,0)
+ ;
+"RTN","C0CCCR",113,0)
+ D HDRMAP(CCRGLO,DFN) ; MAP HEADER VARIABLES
+"RTN","C0CCCR",114,0)
+ ;
+"RTN","C0CCCR",115,0)
+ K ^TMP("C0CCCR",$J,"CCRSTEP") ; KILL GLOBAL PRIOR TO ADDING TO IT
+"RTN","C0CCCR",116,0)
+ S CCRXTAB=$NA(^TMP("C0CCCR",$J,"CCRSTEP")) ; GLOBAL TO STORE CCR STEPS
+"RTN","C0CCCR",117,0)
+ D INITSTPS(CCRXTAB) ; INITIALIZED CCR PROCESSING STEPS
+"RTN","C0CCCR",118,0)
+ N PROCI,XI,TAG,RTN,CALL,XPATH,IXML,OXML,INXML,CCRBLD
+"RTN","C0CCCR",119,0)
+ F PROCI=1:1:@CCRXTAB@(0) D  ; PROCESS THE CCR BODY SECTIONS
+"RTN","C0CCCR",120,0)
+ . S XI=@CCRXTAB@(PROCI) ; CALL COPONENTS TO PARSE
+"RTN","C0CCCR",121,0)
+ . S RTN=$P(XI,";",2) ; NAME OF ROUTINE TO CALL
+"RTN","C0CCCR",122,0)
+ . S TAG=$P(XI,";",1) ; LABEL INSIDE ROUTINE TO CALL
+"RTN","C0CCCR",123,0)
+ . S XPATH=$P(XI,";",3) ; XPATH TO XML TO PASS TO ROUTINE
+"RTN","C0CCCR",124,0)
+ . D QUERY^C0CXPATH(TGLOBAL,XPATH,"INXML") ; EXTRACT XML TO PASS
+"RTN","C0CCCR",125,0)
+ . S IXML="INXML"
+"RTN","C0CCCR",126,0)
+ . S OXML=$P(XI,";",4) ; ARRAY FOR SECTION VALUES
+"RTN","C0CCCR",127,0)
+ . ; K @OXML ; KILL EXPECTED OUTPUT ARRAY
+"RTN","C0CCCR",128,0)
+ . ; W OXML,!
+"RTN","C0CCCR",129,0)
+ . S CALL="D "_TAG_"^"_RTN_"(IXML,DFN,OXML)" ; SETUP THE CALL
+"RTN","C0CCCR",130,0)
+ . W "RUNNING ",CALL,!
+"RTN","C0CCCR",131,0)
+ . X CALL
+"RTN","C0CCCR",132,0)
+ . ; NOW INSERT THE RESULTS IN THE CCR BUFFER
+"RTN","C0CCCR",133,0)
+ . I $G(@OXML@(0))>0 D  ; THERE IS A RESULT
+"RTN","C0CCCR",134,0)
+ . . D INSERT^C0CXPATH(CCRGLO,OXML,"//ContinuityOfCareRecord/Body")
+"RTN","C0CCCR",135,0)
+ . . I DEBUG F C0CI=1:1:@OXML@(0) W @OXML@(C0CI),!
+"RTN","C0CCCR",136,0)
+ N ACTT,ATMP,ACTT2,ATMP2 ; TEMPORARY ARRAY SYMBOLS FOR ACTOR PROCESSING
+"RTN","C0CCCR",137,0)
+ D ACTLST^C0CCCR(CCRGLO,ACTGLO) ; GEN THE ACTOR LIST
+"RTN","C0CCCR",138,0)
+ D QUERY^C0CXPATH(TGLOBAL,"//ContinuityOfCareRecord/Actors","ACTT")
+"RTN","C0CCCR",139,0)
+ D EXTRACT^C0CACTOR("ACTT",ACTGLO,"ACTT2")
+"RTN","C0CCCR",140,0)
+ D INSINNER^C0CXPATH(CCRGLO,"ACTT2","//ContinuityOfCareRecord/Actors")
+"RTN","C0CCCR",141,0)
+ K ACTT,ACTT2
+"RTN","C0CCCR",142,0)
+ ;D QUERY^C0CXPATH(TGLOBAL,"//ContinuityOfCareRecord/Comments","CMTT")
+"RTN","C0CCCR",143,0)
+ ;D EXTRACT^C0CCMT("CMTT",DFN,"CMTT2")
+"RTN","C0CCCR",144,0)
+ ;D INSINNER^C0CXPATH(CCRGLO,"CMTT2","//ContinuityOfCareRecord/Comments")
+"RTN","C0CCCR",145,0)
+ ; gpl - turned off Comments for Certification
+"RTN","C0CCCR",146,0)
+ K CMTT,CMTT2
+"RTN","C0CCCR",147,0)
+ N TRIMI,J,DONE S DONE=0
+"RTN","C0CCCR",148,0)
+ F TRIMI=0:0 D  Q:DONE  ; DELETE UNTIL ALL EMPTY ELEMENTS ARE GONE
+"RTN","C0CCCR",149,0)
+ . S J=$$TRIM^C0CXPATH(CCRGLO) ; DELETE EMPTY ELEMENTS
+"RTN","C0CCCR",150,0)
+ . I DEBUG W "TRIMMED",J,!
+"RTN","C0CCCR",151,0)
+ . I J=0 S DONE=1 ; DONE WHEN TRIM RETURNS FALSE
+"RTN","C0CCCR",152,0)
+ ;S CCRGRTN=$NA(^TMP("C0CCCR",$J,DFN,CCRPART)) ; RTN GLOBAL OF PART OR ALL
+"RTN","C0CCCR",153,0)
+ I CCRPART="CCR" M CCRGRTN=@CCRGLO ; ENTIRE CCR
+"RTN","C0CCCR",154,0)
+ E  M CCRGRTN=^TMP("C0CCCR",$J,DFN,CCRPART) ; RTN GLOBAL OF PART
+"RTN","C0CCCR",155,0)
+ I '$D(C0CNRPC) S ^TMP("C0CRPC",$H,"RESULT",CCRGRTN(0))=""
+"RTN","C0CCCR",156,0)
+ K ^TMP("C0CCCR",$J) ; BEGIN TO CLEAN UP
+"RTN","C0CCCR",157,0)
+ K ^TMP($J) ; REALLY CLEAN UP
+"RTN","C0CCCR",158,0)
+ M ^TMP($J)=^TMP("C0CSAV",$J) ; RESTORE CALLER'S $J
+"RTN","C0CCCR",159,0)
+ Q
+"RTN","C0CCCR",160,0)
+ ;
+"RTN","C0CCCR",161,0)
+INITSTPS(TAB)  ; INITIALIZE CCR PROCESSING STEPS
+"RTN","C0CCCR",162,0)
+ ; TAB IS PASSED BY NAME
+"RTN","C0CCCR",163,0)
+ I DEBUG W "TAB= ",TAB,!
+"RTN","C0CCCR",164,0)
+ ; ORDER FOR CCR IS PROBLEMS,FAMILYHISTORY,SOCIALHISTORY,MEDICATIONS,VITALSIGNS,RESULTS,HEALTHCAREPROVIDERS
+"RTN","C0CCCR",165,0)
+ D PUSH^C0CXPATH(TAB,"EXTRACT;C0CPROBS;//ContinuityOfCareRecord/Body/Problems;^TMP(""C0CCCR"",$J,DFN,""PROBLEMS"")")
+"RTN","C0CCCR",166,0)
+ I TESTALERT D PUSH^C0CXPATH(TAB,"EXTRACT;C0CALERT;//ContinuityOfCareRecord/Body/Alerts;^TMP(""C0CCCR"",$J,DFN,""ALERTS"")")
+"RTN","C0CCCR",167,0)
+ D PUSH^C0CXPATH(TAB,"EXTRACT;C0CMED;//ContinuityOfCareRecord/Body/Medications;^TMP(""C0CCCR"",$J,DFN,""MEDICATIONS"")")
+"RTN","C0CCCR",168,0)
+ D PUSH^C0CXPATH(TAB,"MAP;C0CIMMU;//ContinuityOfCareRecord/Body/Immunizations;^TMP(""C0CCCR"",$J,DFN,""IMMUNE"")")
+"RTN","C0CCCR",169,0)
+ I TESTVIT D PUSH^C0CXPATH(TAB,"EXTRACT;C0CVIT2;//ContinuityOfCareRecord/Body/VitalSigns;^TMP(""C0CCCR"",$J,DFN,""VITALS"")")
+"RTN","C0CCCR",170,0)
+ E  D PUSH^C0CXPATH(TAB,"EXTRACT;C0CVITAL;//ContinuityOfCareRecord/Body/VitalSigns;^TMP(""C0CCCR"",$J,DFN,""VITALS"")")
+"RTN","C0CCCR",171,0)
+ D PUSH^C0CXPATH(TAB,"MAP;C0CLABS;//ContinuityOfCareRecord/Body/Results;^TMP(""C0CCCR"",$J,DFN,""RESULTS"")")
+"RTN","C0CCCR",172,0)
+ D PUSH^C0CXPATH(TAB,"EXTRACT;C0CPROC;//ContinuityOfCareRecord/Body/Procedures;^TMP(""C0CCCR"",$J,DFN,""PROCEDURES"")")
+"RTN","C0CCCR",173,0)
+ ;D PUSH^C0CXPATH(TAB,"EXTRACT;C0CENC;//ContinuityOfCareRecord/Body/Encounters;^TMP(""C0CCCR"",$J,DFN,""ENCOUNTERS"")")
+"RTN","C0CCCR",174,0)
+ ; gpl - turned off Encounters for Certification
+"RTN","C0CCCR",175,0)
+ ;OHUM/RUT 3120109 Changed the condition
+"RTN","C0CCCR",176,0)
+ ;;OHUM/RUT 3111228 Condition for Notes ; It should be included or not
+"RTN","C0CCCR",177,0)
+ ;;I ^TMP("C0CCCR","TIULIMIT")'="" D PUSH^C0CXPATH(TAB,"EXTRACT;C0CENC;//ContinuityOfCareRecord/Body/Encounters;^TMP(""C0CCCR"",$J,DFN,""ENCOUNTERS"")")
+"RTN","C0CCCR",178,0)
+ I $P(^C0CPARM(1,2),"^",3)=1 D PUSH^C0CXPATH(TAB,"EXTRACT;C0CENC;//ContinuityOfCareRecord/Body/Encounters;^TMP(""C0CCCR"",$J,DFN,""ENCOUNTERS"")")
+"RTN","C0CCCR",179,0)
+ ;;OHUM/RUT
+"RTN","C0CCCR",180,0)
+ ;OHUM/RUT
+"RTN","C0CCCR",181,0)
+ Q
+"RTN","C0CCCR",182,0)
+ ;
+"RTN","C0CCCR",183,0)
+HDRMAP(CXML,DFN) ; MAP HEADER VARIABLES: FROM, TO ECT
+"RTN","C0CCCR",184,0)
+ N VMAP S VMAP=$NA(^TMP("C0CCCR",$J,DFN,"HEADER"))
+"RTN","C0CCCR",185,0)
+ ; K @VMAP
+"RTN","C0CCCR",186,0)
+ S @VMAP@("DATETIME")=$$FMDTOUTC^C0CUTIL($$NOW^XLFDT,"DT")
+"RTN","C0CCCR",187,0)
+ ; I IHDR="" D  ; HEADER ARRAY IS NOT PROVIDED, USE DEFAULTS
+"RTN","C0CCCR",188,0)
+ D  ; ALWAYS MAP THESE VARIABLES
+"RTN","C0CCCR",189,0)
+ . S @VMAP@("CCRDOCOBJECTID")=$$UUID^C0CUTIL ; UUID FOR THIS CCR
+"RTN","C0CCCR",190,0)
+ . S @VMAP@("ACTORPATIENT")="ACTORPATIENT_"_DFN
+"RTN","C0CCCR",191,0)
+ . S @VMAP@("ACTORFROM")="ACTORPROVIDER_"_DUZ ; FROM DUZ - FROM PROVIDER
+"RTN","C0CCCR",192,0)
+ . ;S @VMAP@("ACTORFROM")="ACTORORGANIZATION_"_DUZ ; FROM DUZ - ???
+"RTN","C0CCCR",193,0)
+ . S @VMAP@("ACTORFROM2")="ACTORSYSTEM_1" ; SECOND FROM IS THE SYSTEM
+"RTN","C0CCCR",194,0)
+ . S @VMAP@("ACTORTO")="ACTORPATIENT_"_DFN ; FOR TEST PURPOSES
+"RTN","C0CCCR",195,0)
+ . S @VMAP@("PURPOSEDESCRIPTION")="CEND PHR"  ; FOR TEST PURPOSES
+"RTN","C0CCCR",196,0)
+ . S @VMAP@("ACTORTOTEXT")="Patient"  ; FOR TEST PURPOSES
+"RTN","C0CCCR",197,0)
+ . ; THIS IS THE USE CASE FOR THE PHR WHERE "TO" IS THE PATIENT
+"RTN","C0CCCR",198,0)
+ ;I IHDR'="" D  ; HEADER VALUES ARE PROVIDED
+"RTN","C0CCCR",199,0)
+ ;. D CP^C0CXPATH(IHDR,VMAP) ; COPY HEADER VARIABLES TO MAP ARRAY
+"RTN","C0CCCR",200,0)
+ N CTMP
+"RTN","C0CCCR",201,0)
+ D MAP^C0CXPATH(CXML,VMAP,"CTMP")
+"RTN","C0CCCR",202,0)
+ D CP^C0CXPATH("CTMP",CXML)
+"RTN","C0CCCR",203,0)
+ N HRIMVARS ;
+"RTN","C0CCCR",204,0)
+ S HRIMVARS=$NA(^TMP("C0CRIM","VARS",DFN,"HEADER")) ; TO PERSIST VARS
+"RTN","C0CCCR",205,0)
+ M @HRIMVARS@(1)=@VMAP ; PERSIST THE HEADER VARIABLES IN RIM TABLE
+"RTN","C0CCCR",206,0)
+ S @HRIMVARS@(0)=1 ; ONLY ONE SET OF HEADERS PER PATIENT
+"RTN","C0CCCR",207,0)
+ Q
+"RTN","C0CCCR",208,0)
+ ;
+"RTN","C0CCCR",209,0)
+ACTLST(AXML,ACTRTN) ; RETURN THE ACTOR LIST FOR THE XML IN AXML
+"RTN","C0CCCR",210,0)
+ ; AXML AND ACTRTN ARE PASSED BY NAME
+"RTN","C0CCCR",211,0)
+ ; EACH ACTOR RECORD HAS 3 PARTS - IE IF OBJECTID=ACTORPATIENT_2
+"RTN","C0CCCR",212,0)
+ ; P1= OBJECTID - ACTORPATIENT_2
+"RTN","C0CCCR",213,0)
+ ; P2= OBJECT TYPE - PATIENT OR PROVIDER OR SOFTWARE
+"RTN","C0CCCR",214,0)
+ ;OR INSTITUTION
+"RTN","C0CCCR",215,0)
+ ;  OR PERSON(IN PATIENT FILE IE NOK)
+"RTN","C0CCCR",216,0)
+ ; P3= IEN RECORD NUMBER FOR ACTOR - 2
+"RTN","C0CCCR",217,0)
+ N I,J,K,L
+"RTN","C0CCCR",218,0)
+ K @ACTRTN ; CLEAR RETURN ARRAY
+"RTN","C0CCCR",219,0)
+ F I=1:1:@AXML@(0) D  ; FIRST FIX MISSING LINKS
+"RTN","C0CCCR",220,0)
+ . I @AXML@(I)?.E1"_<".E D  ;
+"RTN","C0CCCR",221,0)
+ . . N ZA,ZB
+"RTN","C0CCCR",222,0)
+ . . S ZA=$P(@AXML@(I),">",1)_">"
+"RTN","C0CCCR",223,0)
+ . . S ZB="<"_$P(@AXML@(I),"<",3)
+"RTN","C0CCCR",224,0)
+ . . S @AXML@(I)=ZA_"ACTORORGANIZATION_1"_ZB
+"RTN","C0CCCR",225,0)
+ F I=1:1:@AXML@(0) D  ; SCAN ALL LINES
+"RTN","C0CCCR",226,0)
+ . I @AXML@(I)?.E1"<ActorID>".E D  ; THERE IS AN ACTOR THIS LINE
+"RTN","C0CCCR",227,0)
+ . . S J=$P($P(@AXML@(I),"<ActorID>",2),"</ActorID>",1)
+"RTN","C0CCCR",228,0)
+ . . I $G(LINKDEBUG) W "<ActorID>=>",J,!
+"RTN","C0CCCR",229,0)
+ . . I J'="" S K(J)="" ; HASHING ACTOR
+"RTN","C0CCCR",230,0)
+ . I @AXML@(I)?.E1"<LinkID>".E D  ; THERE IS AN ACTOR THIS LINE
+"RTN","C0CCCR",231,0)
+ . . S J=$P($P(@AXML@(I),"<LinkID>",2),"</LinkID>",1)
+"RTN","C0CCCR",232,0)
+ . . I $G(LINKDEBUG) W "<LinkID>=>",J,!
+"RTN","C0CCCR",233,0)
+ . . I J'="" S K(J)="" ; HASHING ACTOR
+"RTN","C0CCCR",234,0)
+ . . ;  TO GET RID OF DUPLICATES
+"RTN","C0CCCR",235,0)
+ S I="" ; GOING TO $O THROUGH THE HASH
+"RTN","C0CCCR",236,0)
+ F J=0:0 D  Q:$O(K(I))=""
+"RTN","C0CCCR",237,0)
+ . S I=$O(K(I)) ; WALK THROUGH THE HASH OF ACTORS
+"RTN","C0CCCR",238,0)
+ . S $P(L,U,1)=I ; FIRST PIECE IS THE OBJECT ID
+"RTN","C0CCCR",239,0)
+ . S $P(L,U,2)=$P($P(I,"ACTOR",2),"_",1) ; ACTOR TYPE
+"RTN","C0CCCR",240,0)
+ . S $P(L,U,3)=$P(I,"_",2) ; IEN RECORD NUMBER FOR ACTOR
+"RTN","C0CCCR",241,0)
+ . D PUSH^C0CXPATH(ACTRTN,L) ; ADD THE ACTOR TO THE RETURN ARRAY
+"RTN","C0CCCR",242,0)
+ Q
+"RTN","C0CCCR",243,0)
+ ;
+"RTN","C0CCCR",244,0)
+TEST ; RUN ALL THE TEST CASES
+"RTN","C0CCCR",245,0)
+ D TESTALL^C0CUNIT("C0CCCR")
+"RTN","C0CCCR",246,0)
+ Q
+"RTN","C0CCCR",247,0)
+ ;
+"RTN","C0CCCR",248,0)
+ZTEST(WHICH)  ; RUN ONE SET OF TESTS
+"RTN","C0CCCR",249,0)
+ N ZTMP
+"RTN","C0CCCR",250,0)
+ D ZLOAD^C0CUNIT("ZTMP","C0CCCR")
+"RTN","C0CCCR",251,0)
+ D ZTEST^C0CUNIT(.ZTMP,WHICH)
+"RTN","C0CCCR",252,0)
+ Q
+"RTN","C0CCCR",253,0)
+ ;
+"RTN","C0CCCR",254,0)
+TLIST  ; LIST THE TESTS
+"RTN","C0CCCR",255,0)
+ N ZTMP
+"RTN","C0CCCR",256,0)
+ D ZLOAD^C0CUNIT("ZTMP","C0CCCR")
+"RTN","C0CCCR",257,0)
+ D TLIST^C0CUNIT(.ZTMP)
+"RTN","C0CCCR",258,0)
+ Q
+"RTN","C0CCCR",259,0)
+ ;
+"RTN","C0CCCR",260,0)
+ ;;><TEST>
+"RTN","C0CCCR",261,0)
+ ;;><PROBLEMS>
+"RTN","C0CCCR",262,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CCCR",263,0)
+ ;;>>>D CCRRPC^C0CCCR(.C0C,"2","PROBLEMS","")
+"RTN","C0CCCR",264,0)
+ ;;>>?@C0C@(@C0C@(0))["</Problems>"
+"RTN","C0CCCR",265,0)
+ ;;><VITALS>
+"RTN","C0CCCR",266,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CCCR",267,0)
+ ;;>>>D CCRRPC^C0CCCR(.C0C,"2","VITALS","")
+"RTN","C0CCCR",268,0)
+ ;;>>?@C0C@(@C0C@(0))["</VitalSigns>"
+"RTN","C0CCCR",269,0)
+ ;;><CCR>
+"RTN","C0CCCR",270,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CCCR",271,0)
+ ;;>>>D CCRRPC^C0CCCR(.C0C,"2","CCR","")
+"RTN","C0CCCR",272,0)
+ ;;>>?@C0C@(@C0C@(0))["</ContinuityOfCareRecord>"
+"RTN","C0CCCR",273,0)
+ ;;><ACTLST>
+"RTN","C0CCCR",274,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CCCR",275,0)
+ ;;>>>D CCRRPC^C0CCCR(.C0C,"2","CCR","")
+"RTN","C0CCCR",276,0)
+ ;;>>>D ACTLST^C0CCCR(C0C,"ACTTEST")
+"RTN","C0CCCR",277,0)
+ ;;><ACTORS>
+"RTN","C0CCCR",278,0)
+ ;;>>>D ZTEST^C0CCCR("ACTLST")
+"RTN","C0CCCR",279,0)
+ ;;>>>D QUERY^C0CXPATH(TGLOBAL,"//ContinuityOfCareRecord/Actors","G2")
+"RTN","C0CCCR",280,0)
+ ;;>>>D EXTRACT^C0CACTOR("G2","ACTTEST","G3")
+"RTN","C0CCCR",281,0)
+ ;;>>?G3(G3(0))["</Actors>"
+"RTN","C0CCCR",282,0)
+ ;;><TRIM>
+"RTN","C0CCCR",283,0)
+ ;;>>>D ZTEST^C0CCCR("CCR")
+"RTN","C0CCCR",284,0)
+ ;;>>>W $$TRIM^C0CXPATH(CCRGLO)
+"RTN","C0CCCR",285,0)
+ ;;><ALERTS>
+"RTN","C0CCCR",286,0)
+ ;;>>>S TESTALERT=1
+"RTN","C0CCCR",287,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CCCR",288,0)
+ ;;>>>D CCRRPC^C0CCCR(.C0C,"2","ALERTS","")
+"RTN","C0CCCR",289,0)
+ ;;>>?@C0C@(@C0C@(0))["</Alerts>"
+"RTN","C0CCCR",290,0)
+ 
+"RTN","C0CCCR",291,0)
+ 
+"RTN","C0CCCR0")
+0^42^B790419172
+"RTN","C0CCCR0",1,0)
+C0CCCR0 ; CCDCCR/GPL - CCR TEMPLATE AND ACCESS ROUTINES; 5/31/08
+"RTN","C0CCCR0",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CCCR0",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota.
+"RTN","C0CCCR0",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CCCR0",5,0)
+ ;See attached copy of the License.
+"RTN","C0CCCR0",6,0)
+ ;
+"RTN","C0CCCR0",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CCCR0",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CCCR0",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CCCR0",10,0)
+ ;(at your option) any later version.
+"RTN","C0CCCR0",11,0)
+ ;
+"RTN","C0CCCR0",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CCCR0",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CCCR0",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CCCR0",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CCCR0",16,0)
+ ;
+"RTN","C0CCCR0",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CCCR0",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CCCR0",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CCCR0",20,0)
+ ;
+"RTN","C0CCCR0",21,0)
+ W "This is a CCR TEMPLATE with processing routines",!
+"RTN","C0CCCR0",22,0)
+ W !
+"RTN","C0CCCR0",23,0)
+ Q
+"RTN","C0CCCR0",24,0)
+ ;
+"RTN","C0CCCR0",25,0)
+ZT(ZARY,BAT,LINE)       ; private routine to add a line to the ZARY array
+"RTN","C0CCCR0",26,0)
+ ; ZARY IS PASSED BY NAME
+"RTN","C0CCCR0",27,0)
+ ; BAT is a string identifying the section
+"RTN","C0CCCR0",28,0)
+ ; LINE is a test which will evaluate to true or false
+"RTN","C0CCCR0",29,0)
+ ; I '$G(@ZARY) D  ;
+"RTN","C0CCCR0",30,0)
+ ; . S @ZARY@(0)=0 ; initially there are no elements
+"RTN","C0CCCR0",31,0)
+ ; . W "GOT HERE LOADING "_LINE,!
+"RTN","C0CCCR0",32,0)
+ N CNT ; count of array elements
+"RTN","C0CCCR0",33,0)
+ S CNT=@ZARY@(0) ; contains array count
+"RTN","C0CCCR0",34,0)
+ S CNT=CNT+1 ; increment count
+"RTN","C0CCCR0",35,0)
+ S @ZARY@(CNT)=LINE ; put the line in the array
+"RTN","C0CCCR0",36,0)
+ ; S @ZARY@(BAT,CNT)="" ; index the test by battery
+"RTN","C0CCCR0",37,0)
+ S @ZARY@(0)=CNT ; update the array counter
+"RTN","C0CCCR0",38,0)
+ Q
+"RTN","C0CCCR0",39,0)
+ ;
+"RTN","C0CCCR0",40,0)
+ZLOAD(ZARY,ROUTINE)      ; load tests into ZARY which is passed by reference
+"RTN","C0CCCR0",41,0)
+ ; ZARY IS PASSED BY NAME
+"RTN","C0CCCR0",42,0)
+ ; ZARY = name of the root, closed array format (e.g., "^TMP($J)")
+"RTN","C0CCCR0",43,0)
+ ; ROUTINE = NAME OF THE ROUTINE - PASSED BY VALUE
+"RTN","C0CCCR0",44,0)
+ K @ZARY S @ZARY=""
+"RTN","C0CCCR0",45,0)
+ S @ZARY@(0)=0 ; initialize array count
+"RTN","C0CCCR0",46,0)
+ N LINE,LABEL,BODY
+"RTN","C0CCCR0",47,0)
+ N INTEST S INTEST=0 ; switch for in the TEMPLATE section
+"RTN","C0CCCR0",48,0)
+ N SECTION S SECTION="[anonymous]" ; NO section LABEL
+"RTN","C0CCCR0",49,0)
+ ;
+"RTN","C0CCCR0",50,0)
+ N NUM F NUM=1:1 S LINE=$T(+NUM^@ROUTINE) Q:LINE=""  D
+"RTN","C0CCCR0",51,0)
+ . I LINE?." "1";<TEMPLATE>".E S INTEST=1 ; entering section
+"RTN","C0CCCR0",52,0)
+ . I LINE?." "1";</TEMPLATE>".E S INTEST=0 ; leaving section
+"RTN","C0CCCR0",53,0)
+ . I INTEST  D  ; within the section
+"RTN","C0CCCR0",54,0)
+ . . I LINE?." "1";><".E  D  ; sub-section name found
+"RTN","C0CCCR0",55,0)
+ . . . S SECTION=$P($P(LINE,";><",2),">",1) ; pull out name
+"RTN","C0CCCR0",56,0)
+ . . I LINE?." "1";;".E  D  ; line found
+"RTN","C0CCCR0",57,0)
+ . . . D ZT(ZARY,SECTION,$P(LINE,";;",2)) ; put the line in the array
+"RTN","C0CCCR0",58,0)
+ Q
+"RTN","C0CCCR0",59,0)
+ ;
+"RTN","C0CCCR0",60,0)
+LOAD(ARY) ; LOAD A CCR TEMPLATE INTO ARY PASSED BY NAME
+"RTN","C0CCCR0",61,0)
+ D ZLOAD(ARY,"C0CCCR0")
+"RTN","C0CCCR0",62,0)
+ ; ZWR @ARY
+"RTN","C0CCCR0",63,0)
+ Q
+"RTN","C0CCCR0",64,0)
+ ;
+"RTN","C0CCCR0",65,0)
+ ;<TEMPLATE>
+"RTN","C0CCCR0",66,0)
+ ;;<?xml version="1.0" encoding="UTF-8"?>
+"RTN","C0CCCR0",67,0)
+ ;;<?xml-stylesheet type="text/xsl" href="ccr.xsl"?>
+"RTN","C0CCCR0",68,0)
+ ;;<ContinuityOfCareRecord xmlns="urn:astm-org:CCR">
+"RTN","C0CCCR0",69,0)
+ ;;<CCRDocumentObjectID>@@CCRDOCOBJECTID@@</CCRDocumentObjectID>
+"RTN","C0CCCR0",70,0)
+ ;;<Language>
+"RTN","C0CCCR0",71,0)
+ ;;<Text>English</Text>
+"RTN","C0CCCR0",72,0)
+ ;;</Language>
+"RTN","C0CCCR0",73,0)
+ ;;<Version>V1.0</Version>
+"RTN","C0CCCR0",74,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",75,0)
+ ;;<ExactDateTime>@@DATETIME@@</ExactDateTime>
+"RTN","C0CCCR0",76,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",77,0)
+ ;;<Patient>
+"RTN","C0CCCR0",78,0)
+ ;;<ActorID>@@ACTORPATIENT@@</ActorID>
+"RTN","C0CCCR0",79,0)
+ ;;</Patient>
+"RTN","C0CCCR0",80,0)
+ ;;<From>
+"RTN","C0CCCR0",81,0)
+ ;;<ActorLink>
+"RTN","C0CCCR0",82,0)
+ ;;<ActorID>@@ACTORFROM@@</ActorID>
+"RTN","C0CCCR0",83,0)
+ ;;</ActorLink>
+"RTN","C0CCCR0",84,0)
+ ;;<ActorLink>
+"RTN","C0CCCR0",85,0)
+ ;;<ActorID>@@ACTORFROM2@@</ActorID>
+"RTN","C0CCCR0",86,0)
+ ;;</ActorLink>
+"RTN","C0CCCR0",87,0)
+ ;;</From>
+"RTN","C0CCCR0",88,0)
+ ;;<To>
+"RTN","C0CCCR0",89,0)
+ ;;<ActorLink>
+"RTN","C0CCCR0",90,0)
+ ;;<ActorID>@@ACTORTO@@</ActorID>
+"RTN","C0CCCR0",91,0)
+ ;;<ActorRole>
+"RTN","C0CCCR0",92,0)
+ ;;<Text>@@ACTORTOTEXT@@</Text>
+"RTN","C0CCCR0",93,0)
+ ;;</ActorRole>
+"RTN","C0CCCR0",94,0)
+ ;;</ActorLink>
+"RTN","C0CCCR0",95,0)
+ ;;</To>
+"RTN","C0CCCR0",96,0)
+ ;;<Purpose>
+"RTN","C0CCCR0",97,0)
+ ;;<Description>
+"RTN","C0CCCR0",98,0)
+ ;;<Text>@@PURPOSEDESCRIPTION@@</Text>
+"RTN","C0CCCR0",99,0)
+ ;;</Description>
+"RTN","C0CCCR0",100,0)
+ ;;</Purpose>
+"RTN","C0CCCR0",101,0)
+ ;;<Body>
+"RTN","C0CCCR0",102,0)
+ ;;<Problems>
+"RTN","C0CCCR0",103,0)
+ ;;<Problem>
+"RTN","C0CCCR0",104,0)
+ ;;<CCRDataObjectID>@@PROBLEMOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",105,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",106,0)
+ ;;<ExactDateTime>@@PROBLEMDATEMOD@@</ExactDateTime>
+"RTN","C0CCCR0",107,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",108,0)
+ ;;<Type>
+"RTN","C0CCCR0",109,0)
+ ;;<Text>Problem</Text>
+"RTN","C0CCCR0",110,0)
+ ;;</Type>
+"RTN","C0CCCR0",111,0)
+ ;;<Description>
+"RTN","C0CCCR0",112,0)
+ ;;<Text>@@PROBLEMDESCRIPTION@@</Text>
+"RTN","C0CCCR0",113,0)
+ ;;<Code>
+"RTN","C0CCCR0",114,0)
+ ;;<Value>@@PROBLEMCODEVALUE@@</Value>
+"RTN","C0CCCR0",115,0)
+ ;;<CodingSystem>ICD9CM</CodingSystem>
+"RTN","C0CCCR0",116,0)
+ ;;<Version>@@PROBLEMCODINGVERSION@@</Version>
+"RTN","C0CCCR0",117,0)
+ ;;</Code>
+"RTN","C0CCCR0",118,0)
+ ;;</Description>
+"RTN","C0CCCR0",119,0)
+ ;;<Status>
+"RTN","C0CCCR0",120,0)
+ ;;<Text>@@PROBLEMSTATUS@@</Text>
+"RTN","C0CCCR0",121,0)
+ ;;</Status>
+"RTN","C0CCCR0",122,0)
+ ;;<Source>
+"RTN","C0CCCR0",123,0)
+ ;;<Actor>
+"RTN","C0CCCR0",124,0)
+ ;;<ActorID>@@PROBLEMSOURCEACTORID@@</ActorID>
+"RTN","C0CCCR0",125,0)
+ ;;</Actor>
+"RTN","C0CCCR0",126,0)
+ ;;</Source>
+"RTN","C0CCCR0",127,0)
+ ;;</Problem>
+"RTN","C0CCCR0",128,0)
+ ;;</Problems>
+"RTN","C0CCCR0",129,0)
+ ;;<Immunizations>
+"RTN","C0CCCR0",130,0)
+ ;;<Immunization>
+"RTN","C0CCCR0",131,0)
+ ;;<CCRDataObjectID>@@IMMUNEOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",132,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",133,0)
+ ;;<Type>
+"RTN","C0CCCR0",134,0)
+ ;;<Text>@@IMMUNEDATETIMETYPETEXT@@</Text>
+"RTN","C0CCCR0",135,0)
+ ;;</Type>
+"RTN","C0CCCR0",136,0)
+ ;;<ExactDateTime>@@IMMUNEDATETIME@@</ExactDateTime>
+"RTN","C0CCCR0",137,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",138,0)
+ ;;<Source>
+"RTN","C0CCCR0",139,0)
+ ;;<Actor>
+"RTN","C0CCCR0",140,0)
+ ;;<ActorID>@@IMMUNESOURCEACTORID@@</ActorID>
+"RTN","C0CCCR0",141,0)
+ ;;</Actor>
+"RTN","C0CCCR0",142,0)
+ ;;</Source>
+"RTN","C0CCCR0",143,0)
+ ;;<Product>
+"RTN","C0CCCR0",144,0)
+ ;;<ProductName>
+"RTN","C0CCCR0",145,0)
+ ;;<Text>@@IMMUNEPRODUCTNAMETEXT@@</Text>
+"RTN","C0CCCR0",146,0)
+ ;;<Code>
+"RTN","C0CCCR0",147,0)
+ ;;<Value>@@IMMUNEPRODUCTCODE@@</Value>
+"RTN","C0CCCR0",148,0)
+ ;;<CodingSystem>@@IMMUNEPRODUCTCODESYSTEM@@</CodingSystem>
+"RTN","C0CCCR0",149,0)
+ ;;</Code>
+"RTN","C0CCCR0",150,0)
+ ;;</ProductName>
+"RTN","C0CCCR0",151,0)
+ ;;</Product>
+"RTN","C0CCCR0",152,0)
+ ;;</Immunization>
+"RTN","C0CCCR0",153,0)
+ ;;</Immunizations>
+"RTN","C0CCCR0",154,0)
+ ;;<FamilyHistory>
+"RTN","C0CCCR0",155,0)
+ ;;<FamilyProblemHistory>
+"RTN","C0CCCR0",156,0)
+ ;;<CCRDataObjectID>@@FAMILYHISTORYOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",157,0)
+ ;;<Source>
+"RTN","C0CCCR0",158,0)
+ ;;<Actor>
+"RTN","C0CCCR0",159,0)
+ ;;<ActorID>@@FAMILYHISTORYACTORID@@</ActorID>
+"RTN","C0CCCR0",160,0)
+ ;;</Actor>
+"RTN","C0CCCR0",161,0)
+ ;;</Source>
+"RTN","C0CCCR0",162,0)
+ ;;<FamilyMember>
+"RTN","C0CCCR0",163,0)
+ ;;<ActorID>@@FAMILYMEMBERACTORID@@</ActorID>
+"RTN","C0CCCR0",164,0)
+ ;;<ActorRole>
+"RTN","C0CCCR0",165,0)
+ ;;<Text>@@FAMILYMEMBERACTORROLETEXT@@</Text>
+"RTN","C0CCCR0",166,0)
+ ;;</ActorRole>
+"RTN","C0CCCR0",167,0)
+ ;;<Source>
+"RTN","C0CCCR0",168,0)
+ ;;<Actor>
+"RTN","C0CCCR0",169,0)
+ ;;<ActorID>@@FAMILYMEMBERSOURCACTORID@@</ActorID>
+"RTN","C0CCCR0",170,0)
+ ;;</Actor>
+"RTN","C0CCCR0",171,0)
+ ;;</Source>
+"RTN","C0CCCR0",172,0)
+ ;;</FamilyMember>
+"RTN","C0CCCR0",173,0)
+ ;;<Problem>
+"RTN","C0CCCR0",174,0)
+ ;;<Type>
+"RTN","C0CCCR0",175,0)
+ ;;<Text>Problem</Text>
+"RTN","C0CCCR0",176,0)
+ ;;</Type>
+"RTN","C0CCCR0",177,0)
+ ;;<Description>
+"RTN","C0CCCR0",178,0)
+ ;;<Text>@@FAMILYMEMBERPROBLEMDESCRIPTION@@</Text>
+"RTN","C0CCCR0",179,0)
+ ;;<Code>
+"RTN","C0CCCR0",180,0)
+ ;;<Value>@@FAMILYMEMBERPROBLEMCODE@@</Value>
+"RTN","C0CCCR0",181,0)
+ ;;<CodingSystem>@@FAMILYMEMBERCODESYSTEM@@</CodingSystem>
+"RTN","C0CCCR0",182,0)
+ ;;<Version>@@FAMILYMEMBERCODEVERSION@@</Version>
+"RTN","C0CCCR0",183,0)
+ ;;</Code>
+"RTN","C0CCCR0",184,0)
+ ;;</Description>
+"RTN","C0CCCR0",185,0)
+ ;;<Source>
+"RTN","C0CCCR0",186,0)
+ ;;<Actor>
+"RTN","C0CCCR0",187,0)
+ ;;<ActorID>@@FAMILYMEMBERPROBLEMSOURCEID@@</ActorID>
+"RTN","C0CCCR0",188,0)
+ ;;</Actor>
+"RTN","C0CCCR0",189,0)
+ ;;</Source>
+"RTN","C0CCCR0",190,0)
+ ;;</Problem>
+"RTN","C0CCCR0",191,0)
+ ;;</FamilyProblemHistory>
+"RTN","C0CCCR0",192,0)
+ ;;</FamilyHistory>
+"RTN","C0CCCR0",193,0)
+ ;;<SocialHistory>
+"RTN","C0CCCR0",194,0)
+ ;;<SocialHistoryElement>
+"RTN","C0CCCR0",195,0)
+ ;;<CCRDataObjectID>@@SOCIALHISTORYOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",196,0)
+ ;;<Type>
+"RTN","C0CCCR0",197,0)
+ ;;<Text>@@SOCIALHISTORYTYPETEXT@@</Text>
+"RTN","C0CCCR0",198,0)
+ ;;</Type>
+"RTN","C0CCCR0",199,0)
+ ;;<Description>
+"RTN","C0CCCR0",200,0)
+ ;;<Text>@@SOCIALHISTORYDESCRIPTIONTEXT@@</Text>
+"RTN","C0CCCR0",201,0)
+ ;;</Description>
+"RTN","C0CCCR0",202,0)
+ ;;<Source>
+"RTN","C0CCCR0",203,0)
+ ;;<Actor>
+"RTN","C0CCCR0",204,0)
+ ;;<ActorID>@@SOCIALHISTORYSOURCACTORID@@</ActorID>
+"RTN","C0CCCR0",205,0)
+ ;;</Actor>
+"RTN","C0CCCR0",206,0)
+ ;;</Source>
+"RTN","C0CCCR0",207,0)
+ ;;</SocialHistoryElement>
+"RTN","C0CCCR0",208,0)
+ ;;<SocialHistoryElement>
+"RTN","C0CCCR0",209,0)
+ ;;<CCRDataObjectID>BB0005</CCRDataObjectID>
+"RTN","C0CCCR0",210,0)
+ ;;<Type>
+"RTN","C0CCCR0",211,0)
+ ;;<Text>Ethnic Origin</Text>
+"RTN","C0CCCR0",212,0)
+ ;;</Type>
+"RTN","C0CCCR0",213,0)
+ ;;<Description>
+"RTN","C0CCCR0",214,0)
+ ;;<Text>Not Hispanic or Latino</Text>
+"RTN","C0CCCR0",215,0)
+ ;;</Description>
+"RTN","C0CCCR0",216,0)
+ ;;<Source>
+"RTN","C0CCCR0",217,0)
+ ;;<Actor>
+"RTN","C0CCCR0",218,0)
+ ;;<ActorID>AA0001</ActorID>
+"RTN","C0CCCR0",219,0)
+ ;;</Actor>
+"RTN","C0CCCR0",220,0)
+ ;;</Source>
+"RTN","C0CCCR0",221,0)
+ ;;</SocialHistoryElement>
+"RTN","C0CCCR0",222,0)
+ ;;<SocialHistoryElement>
+"RTN","C0CCCR0",223,0)
+ ;;<CCRDataObjectID>BB0006</CCRDataObjectID>
+"RTN","C0CCCR0",224,0)
+ ;;<Type>
+"RTN","C0CCCR0",225,0)
+ ;;<Text>Race</Text>
+"RTN","C0CCCR0",226,0)
+ ;;</Type>
+"RTN","C0CCCR0",227,0)
+ ;;<Description>
+"RTN","C0CCCR0",228,0)
+ ;;<Text>White</Text>
+"RTN","C0CCCR0",229,0)
+ ;;</Description>
+"RTN","C0CCCR0",230,0)
+ ;;<Source>
+"RTN","C0CCCR0",231,0)
+ ;;<Actor>
+"RTN","C0CCCR0",232,0)
+ ;;<ActorID>AA0001</ActorID>
+"RTN","C0CCCR0",233,0)
+ ;;</Actor>
+"RTN","C0CCCR0",234,0)
+ ;;</Source>
+"RTN","C0CCCR0",235,0)
+ ;;</SocialHistoryElement>
+"RTN","C0CCCR0",236,0)
+ ;;<SocialHistoryElement>
+"RTN","C0CCCR0",237,0)
+ ;;<CCRDataObjectID>BB0007</CCRDataObjectID>
+"RTN","C0CCCR0",238,0)
+ ;;<Type>
+"RTN","C0CCCR0",239,0)
+ ;;<Text>Occupation</Text>
+"RTN","C0CCCR0",240,0)
+ ;;</Type>
+"RTN","C0CCCR0",241,0)
+ ;;<Description>
+"RTN","C0CCCR0",242,0)
+ ;;<Text>Physician</Text>
+"RTN","C0CCCR0",243,0)
+ ;;</Description>
+"RTN","C0CCCR0",244,0)
+ ;;<Source>
+"RTN","C0CCCR0",245,0)
+ ;;<Actor>
+"RTN","C0CCCR0",246,0)
+ ;;<ActorID>AA0001</ActorID>
+"RTN","C0CCCR0",247,0)
+ ;;</Actor>
+"RTN","C0CCCR0",248,0)
+ ;;</Source>
+"RTN","C0CCCR0",249,0)
+ ;;</SocialHistoryElement>
+"RTN","C0CCCR0",250,0)
+ ;;</SocialHistory>
+"RTN","C0CCCR0",251,0)
+ ;;<Alerts>
+"RTN","C0CCCR0",252,0)
+ ;;<Alert>
+"RTN","C0CCCR0",253,0)
+ ;;<CCRDataObjectID>@@ALERTOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",254,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",255,0)
+ ;;<ExactDateTime>@@ALERTDATETIME@@</ExactDateTime>
+"RTN","C0CCCR0",256,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",257,0)
+ ;;<Type>
+"RTN","C0CCCR0",258,0)
+ ;;<Text>@@ALERTTYPE@@</Text>
+"RTN","C0CCCR0",259,0)
+ ;;</Type>
+"RTN","C0CCCR0",260,0)
+ ;;<Status>
+"RTN","C0CCCR0",261,0)
+ ;;<Text>@@ALERTSTATUSTEXT@@</Text>
+"RTN","C0CCCR0",262,0)
+ ;;</Status>
+"RTN","C0CCCR0",263,0)
+ ;;<Description>
+"RTN","C0CCCR0",264,0)
+ ;;<Text>@@ALERTDESCRIPTIONTEXT@@</Text>
+"RTN","C0CCCR0",265,0)
+ ;;<Code>
+"RTN","C0CCCR0",266,0)
+ ;;<Value>@@ALERTCODEVALUE@@</Value>
+"RTN","C0CCCR0",267,0)
+ ;;<CodingSystem>@@ALERTCODESYSTEM@@</CodingSystem>
+"RTN","C0CCCR0",268,0)
+ ;;</Code>
+"RTN","C0CCCR0",269,0)
+ ;;</Description>
+"RTN","C0CCCR0",270,0)
+ ;;<Source>
+"RTN","C0CCCR0",271,0)
+ ;;<Actor>
+"RTN","C0CCCR0",272,0)
+ ;;<ActorID>@@ALERTSOURCEID@@</ActorID>
+"RTN","C0CCCR0",273,0)
+ ;;</Actor>
+"RTN","C0CCCR0",274,0)
+ ;;</Source>
+"RTN","C0CCCR0",275,0)
+ ;;<Agent>
+"RTN","C0CCCR0",276,0)
+ ;;<Products>
+"RTN","C0CCCR0",277,0)
+ ;;<Product>
+"RTN","C0CCCR0",278,0)
+ ;;<CCRDataObjectID>@@ALERTAGENTPRODUCTOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",279,0)
+ ;;<Source>
+"RTN","C0CCCR0",280,0)
+ ;;<Actor>
+"RTN","C0CCCR0",281,0)
+ ;;<ActorID>@@ALERTSOURCEID@@</ActorID>
+"RTN","C0CCCR0",282,0)
+ ;;</Actor>
+"RTN","C0CCCR0",283,0)
+ ;;</Source>
+"RTN","C0CCCR0",284,0)
+ ;;<Product>
+"RTN","C0CCCR0",285,0)
+ ;;<ProductName>
+"RTN","C0CCCR0",286,0)
+ ;;<Text>@@ALERTAGENTPRODUCTNAMETEXT@@</Text>
+"RTN","C0CCCR0",287,0)
+ ;;<Code>
+"RTN","C0CCCR0",288,0)
+ ;;<Value>@@ALERTAGENTPRODUCTCODEVALUE@@</Value>
+"RTN","C0CCCR0",289,0)
+ ;;<CodingSystem>@@ALERTAGENTPRODUCTCODESYSTEM@@</CodingSystem>
+"RTN","C0CCCR0",290,0)
+ ;;</Code>
+"RTN","C0CCCR0",291,0)
+ ;;</ProductName>
+"RTN","C0CCCR0",292,0)
+ ;;</Product>
+"RTN","C0CCCR0",293,0)
+ ;;</Product>
+"RTN","C0CCCR0",294,0)
+ ;;</Products>
+"RTN","C0CCCR0",295,0)
+ ;;</Agent>
+"RTN","C0CCCR0",296,0)
+ ;;<Reaction>
+"RTN","C0CCCR0",297,0)
+ ;;<Description>
+"RTN","C0CCCR0",298,0)
+ ;;<Text>@@ALERTREACTIOINDESCRIPTIONTEXT@@</Text>
+"RTN","C0CCCR0",299,0)
+ ;;<Code>
+"RTN","C0CCCR0",300,0)
+ ;;<Value>@@ALERTREACTIONCODEVALUE@@</Value>
+"RTN","C0CCCR0",301,0)
+ ;;<CodingSystem>@@ALERTREACTIONCODESYSTEM@@</CodingSystem>
+"RTN","C0CCCR0",302,0)
+ ;;</Code>
+"RTN","C0CCCR0",303,0)
+ ;;</Description>
+"RTN","C0CCCR0",304,0)
+ ;;</Reaction>
+"RTN","C0CCCR0",305,0)
+ ;;</Alert>
+"RTN","C0CCCR0",306,0)
+ ;;</Alerts>
+"RTN","C0CCCR0",307,0)
+ ;;<Medications>
+"RTN","C0CCCR0",308,0)
+ ;;<Medication>
+"RTN","C0CCCR0",309,0)
+ ;;<CCRDataObjectID>@@MEDOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",310,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",311,0)
+ ;;<Type>
+"RTN","C0CCCR0",312,0)
+ ;;<Text>@@MEDISSUEDATETXT@@</Text>
+"RTN","C0CCCR0",313,0)
+ ;;</Type>
+"RTN","C0CCCR0",314,0)
+ ;;<ExactDateTime>@@MEDISSUEDATE@@</ExactDateTime>
+"RTN","C0CCCR0",315,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",316,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",317,0)
+ ;;<Type>
+"RTN","C0CCCR0",318,0)
+ ;;<Text>@@MEDLASTFILLDATETXT@@</Text>
+"RTN","C0CCCR0",319,0)
+ ;;</Type>
+"RTN","C0CCCR0",320,0)
+ ;;<ExactDateTime>@@MEDLASTFILLDATE@@</ExactDateTime>
+"RTN","C0CCCR0",321,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",322,0)
+ ;;<IDs>
+"RTN","C0CCCR0",323,0)
+ ;;<Type>
+"RTN","C0CCCR0",324,0)
+ ;;<Text>@@MEDRXNOTXT@@</Text>
+"RTN","C0CCCR0",325,0)
+ ;;</Type>
+"RTN","C0CCCR0",326,0)
+ ;;<ID>@@MEDRXNO@@</ID>
+"RTN","C0CCCR0",327,0)
+ ;;</IDs>
+"RTN","C0CCCR0",328,0)
+ ;;<Type>
+"RTN","C0CCCR0",329,0)
+ ;;<Text>@@MEDTYPETEXT@@</Text>
+"RTN","C0CCCR0",330,0)
+ ;;</Type>
+"RTN","C0CCCR0",331,0)
+ ;;<Description>
+"RTN","C0CCCR0",332,0)
+ ;;<Text>@@MEDDETAILUNADORNED@@</Text>
+"RTN","C0CCCR0",333,0)
+ ;;</Description>
+"RTN","C0CCCR0",334,0)
+ ;;<Status>
+"RTN","C0CCCR0",335,0)
+ ;;<Text>@@MEDSTATUSTEXT@@</Text>
+"RTN","C0CCCR0",336,0)
+ ;;</Status>
+"RTN","C0CCCR0",337,0)
+ ;;<Source>
+"RTN","C0CCCR0",338,0)
+ ;;<Actor>
+"RTN","C0CCCR0",339,0)
+ ;;<ActorID>@@MEDSOURCEACTORID@@</ActorID>
+"RTN","C0CCCR0",340,0)
+ ;;</Actor>
+"RTN","C0CCCR0",341,0)
+ ;;</Source>
+"RTN","C0CCCR0",342,0)
+ ;;<Product>
+"RTN","C0CCCR0",343,0)
+ ;;<ProductName>
+"RTN","C0CCCR0",344,0)
+ ;;<Text>@@MEDPRODUCTNAMETEXT@@</Text>
+"RTN","C0CCCR0",345,0)
+ ;;<Code>
+"RTN","C0CCCR0",346,0)
+ ;;<Value>@@MEDPRODUCTNAMECODEVALUE@@</Value>
+"RTN","C0CCCR0",347,0)
+ ;;<CodingSystem>@@MEDPRODUCTNAMECODINGINGSYSTEM@@</CodingSystem>
+"RTN","C0CCCR0",348,0)
+ ;;<Version>@@MEDPRODUCTNAMECODEVERSION@@</Version>
+"RTN","C0CCCR0",349,0)
+ ;;</Code>
+"RTN","C0CCCR0",350,0)
+ ;;</ProductName>
+"RTN","C0CCCR0",351,0)
+ ;;<BrandName>
+"RTN","C0CCCR0",352,0)
+ ;;<Text>@@MEDBRANDNAMETEXT@@</Text>
+"RTN","C0CCCR0",353,0)
+ ;;</BrandName>
+"RTN","C0CCCR0",354,0)
+ ;;<Strength>
+"RTN","C0CCCR0",355,0)
+ ;;<Value>@@MEDSTRENGTHVALUE@@</Value>
+"RTN","C0CCCR0",356,0)
+ ;;<Units>
+"RTN","C0CCCR0",357,0)
+ ;;<Unit>@@MEDSTRENGTHUNIT@@</Unit>
+"RTN","C0CCCR0",358,0)
+ ;;</Units>
+"RTN","C0CCCR0",359,0)
+ ;;</Strength>
+"RTN","C0CCCR0",360,0)
+ ;;<Form>
+"RTN","C0CCCR0",361,0)
+ ;;<Text>@@MEDFORMTEXT@@</Text>
+"RTN","C0CCCR0",362,0)
+ ;;</Form>
+"RTN","C0CCCR0",363,0)
+ ;;<Concentration>
+"RTN","C0CCCR0",364,0)
+ ;;<Value>@@MEDCONCVALUE@@</Value>
+"RTN","C0CCCR0",365,0)
+ ;;<Units>
+"RTN","C0CCCR0",366,0)
+ ;;<Unit>@@MEDCONCUNIT@@</Unit>
+"RTN","C0CCCR0",367,0)
+ ;;</Units>
+"RTN","C0CCCR0",368,0)
+ ;;</Concentration>
+"RTN","C0CCCR0",369,0)
+ ;;</Product>
+"RTN","C0CCCR0",370,0)
+ ;;<Quantity>
+"RTN","C0CCCR0",371,0)
+ ;;<Value>@@MEDQUANTITYVALUE@@</Value>
+"RTN","C0CCCR0",372,0)
+ ;;<Units>
+"RTN","C0CCCR0",373,0)
+ ;;<Unit>@@MEDQUANTITYUNIT@@</Unit>
+"RTN","C0CCCR0",374,0)
+ ;;</Units>
+"RTN","C0CCCR0",375,0)
+ ;;</Quantity>
+"RTN","C0CCCR0",376,0)
+ ;;<Directions>
+"RTN","C0CCCR0",377,0)
+ ;;<Direction>
+"RTN","C0CCCR0",378,0)
+ ;;<Description>
+"RTN","C0CCCR0",379,0)
+ ;;<Text>@@MEDDIRECTIONDESCRIPTIONTEXT@@</Text>
+"RTN","C0CCCR0",380,0)
+ ;;</Description>
+"RTN","C0CCCR0",381,0)
+ ;;<DoseIndicator>
+"RTN","C0CCCR0",382,0)
+ ;;<Text>@@MEDDOSEINDICATOR@@</Text>
+"RTN","C0CCCR0",383,0)
+ ;;</DoseIndicator>
+"RTN","C0CCCR0",384,0)
+ ;;<DeliveryMethod>
+"RTN","C0CCCR0",385,0)
+ ;;<Text>@@MEDDELIVERYMETHOD@@</Text>
+"RTN","C0CCCR0",386,0)
+ ;;</DeliveryMethod>
+"RTN","C0CCCR0",387,0)
+ ;;<Dose>
+"RTN","C0CCCR0",388,0)
+ ;;<Value>@@MEDDOSEVALUE@@</Value>
+"RTN","C0CCCR0",389,0)
+ ;;<Units>
+"RTN","C0CCCR0",390,0)
+ ;;<Unit>@@MEDDOSEUNIT@@</Unit>
+"RTN","C0CCCR0",391,0)
+ ;;</Units>
+"RTN","C0CCCR0",392,0)
+ ;;<Rate>
+"RTN","C0CCCR0",393,0)
+ ;;<Value>@@MEDRATEVALUE@@</Value>
+"RTN","C0CCCR0",394,0)
+ ;;<Units>
+"RTN","C0CCCR0",395,0)
+ ;;<Unit>@@MEDRATEUNIT@@</Unit>
+"RTN","C0CCCR0",396,0)
+ ;;</Units>
+"RTN","C0CCCR0",397,0)
+ ;;</Rate>
+"RTN","C0CCCR0",398,0)
+ ;;</Dose>
+"RTN","C0CCCR0",399,0)
+ ;;<Vehicle>
+"RTN","C0CCCR0",400,0)
+ ;;<Text>@@MEDVEHICLETEXT@@</Text>
+"RTN","C0CCCR0",401,0)
+ ;;</Vehicle>
+"RTN","C0CCCR0",402,0)
+ ;;<Route>
+"RTN","C0CCCR0",403,0)
+ ;;<Text>@@MEDDIRECTIONROUTETEXT@@</Text>
+"RTN","C0CCCR0",404,0)
+ ;;</Route>
+"RTN","C0CCCR0",405,0)
+ ;;<Frequency>
+"RTN","C0CCCR0",406,0)
+ ;;<Value>@@MEDFREQUENCYVALUE@@</Value>
+"RTN","C0CCCR0",407,0)
+ ;;</Frequency>
+"RTN","C0CCCR0",408,0)
+ ;;<Interval>
+"RTN","C0CCCR0",409,0)
+ ;;<Value>@@MEDINTERVALVALUE@@</Value>
+"RTN","C0CCCR0",410,0)
+ ;;<Units>
+"RTN","C0CCCR0",411,0)
+ ;;<Unit>@@MEDINTERVALUNIT@@</Unit>
+"RTN","C0CCCR0",412,0)
+ ;;</Units>
+"RTN","C0CCCR0",413,0)
+ ;;</Interval>
+"RTN","C0CCCR0",414,0)
+ ;;<Duration>
+"RTN","C0CCCR0",415,0)
+ ;;<Value>@@MEDDURATIONVALUE@@</Value>
+"RTN","C0CCCR0",416,0)
+ ;;<Units>
+"RTN","C0CCCR0",417,0)
+ ;;<Unit>@@MEDDURATIONUNIT@@</Unit>
+"RTN","C0CCCR0",418,0)
+ ;;</Units>
+"RTN","C0CCCR0",419,0)
+ ;;</Duration>
+"RTN","C0CCCR0",420,0)
+ ;;<Indication>
+"RTN","C0CCCR0",421,0)
+ ;;<PRNFlag>
+"RTN","C0CCCR0",422,0)
+ ;;<Text>@@MEDPRNFLAG@@</Text>
+"RTN","C0CCCR0",423,0)
+ ;;</PRNFlag>
+"RTN","C0CCCR0",424,0)
+ ;;<Problem>
+"RTN","C0CCCR0",425,0)
+ ;;<CCRDataObjectID>@@MEDPROBLEMOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",426,0)
+ ;;<Type>
+"RTN","C0CCCR0",427,0)
+ ;;<Text>@@MEDPROBLEMTYPETXT@@</Text>
+"RTN","C0CCCR0",428,0)
+ ;;</Type>
+"RTN","C0CCCR0",429,0)
+ ;;<Description>
+"RTN","C0CCCR0",430,0)
+ ;;<Text>@@MEDPROBLEMDESCRIPTION@@</Text>
+"RTN","C0CCCR0",431,0)
+ ;;<Code>
+"RTN","C0CCCR0",432,0)
+ ;;<Value>@@MEDPROBLEMCODEVALUE@@</Value>
+"RTN","C0CCCR0",433,0)
+ ;;<CodingSystem>@@MEDPROBLEMCODINGSYSTEM@@</CodingSystem>
+"RTN","C0CCCR0",434,0)
+ ;;<Version>@@MEDPROBLEMCODINGVERSION@@</Version>
+"RTN","C0CCCR0",435,0)
+ ;;</Code>
+"RTN","C0CCCR0",436,0)
+ ;;</Description>
+"RTN","C0CCCR0",437,0)
+ ;;<Source>
+"RTN","C0CCCR0",438,0)
+ ;;<Actor>
+"RTN","C0CCCR0",439,0)
+ ;;<ActorID>@@MEDPROBLEMSOURCEACTORID@@</ActorID>
+"RTN","C0CCCR0",440,0)
+ ;;</Actor>
+"RTN","C0CCCR0",441,0)
+ ;;</Source>
+"RTN","C0CCCR0",442,0)
+ ;;</Problem>
+"RTN","C0CCCR0",443,0)
+ ;;</Indication>
+"RTN","C0CCCR0",444,0)
+ ;;<StopIndicator>
+"RTN","C0CCCR0",445,0)
+ ;;<Text>@@MEDSTOPINDICATOR@@</Text>
+"RTN","C0CCCR0",446,0)
+ ;;</StopIndicator>
+"RTN","C0CCCR0",447,0)
+ ;;<DirectionSequenceModifier>@@MEDDIRSEQ@@</DirectionSequenceModifier>
+"RTN","C0CCCR0",448,0)
+ ;;<MultipleDirectionModifier>
+"RTN","C0CCCR0",449,0)
+ ;;<Text>@@MEDMULDIRMOD@@</Text>
+"RTN","C0CCCR0",450,0)
+ ;;</MultipleDirectionModifier>
+"RTN","C0CCCR0",451,0)
+ ;;</Direction>
+"RTN","C0CCCR0",452,0)
+ ;;</Directions>
+"RTN","C0CCCR0",453,0)
+ ;;<PatientInstructions>
+"RTN","C0CCCR0",454,0)
+ ;;<Instruction>
+"RTN","C0CCCR0",455,0)
+ ;;<Text>@@MEDPTINSTRUCTIONS@@</Text>
+"RTN","C0CCCR0",456,0)
+ ;;</Instruction>
+"RTN","C0CCCR0",457,0)
+ ;;</PatientInstructions>
+"RTN","C0CCCR0",458,0)
+ ;;<FullfillmentInstructions>
+"RTN","C0CCCR0",459,0)
+ ;;<Text>@@MEDFULLFILLMENTINSTRUCTIONS@@</Text>
+"RTN","C0CCCR0",460,0)
+ ;;</FullfillmentInstructions>
+"RTN","C0CCCR0",461,0)
+ ;;<Refills>
+"RTN","C0CCCR0",462,0)
+ ;;<Refill>
+"RTN","C0CCCR0",463,0)
+ ;;<Number>@@MEDRFNO@@</Number>
+"RTN","C0CCCR0",464,0)
+ ;;</Refill>
+"RTN","C0CCCR0",465,0)
+ ;;</Refills>
+"RTN","C0CCCR0",466,0)
+ ;;</Medication>
+"RTN","C0CCCR0",467,0)
+ ;;</Medications>
+"RTN","C0CCCR0",468,0)
+ ;;<VitalSigns>
+"RTN","C0CCCR0",469,0)
+ ;;<Result>
+"RTN","C0CCCR0",470,0)
+ ;;<CCRDataObjectID>@@VITALSIGNSDATAOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",471,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",472,0)
+ ;;<Type>
+"RTN","C0CCCR0",473,0)
+ ;;<Text>@@VITALSIGNSDATETIMETYPETEXT@@</Text>
+"RTN","C0CCCR0",474,0)
+ ;;</Type>
+"RTN","C0CCCR0",475,0)
+ ;;<ExactDateTime>@@VITALSIGNSEXACTDATETIME@@</ExactDateTime>
+"RTN","C0CCCR0",476,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",477,0)
+ ;;<Description>
+"RTN","C0CCCR0",478,0)
+ ;;<Text>@@VITALSIGNSDESCRIPTIONTEXT@@</Text>
+"RTN","C0CCCR0",479,0)
+ ;;</Description>
+"RTN","C0CCCR0",480,0)
+ ;;<Source>
+"RTN","C0CCCR0",481,0)
+ ;;<Actor>
+"RTN","C0CCCR0",482,0)
+ ;;<ActorID>@@VITALSIGNSSOURCEACTORID@@</ActorID>
+"RTN","C0CCCR0",483,0)
+ ;;</Actor>
+"RTN","C0CCCR0",484,0)
+ ;;</Source>
+"RTN","C0CCCR0",485,0)
+ ;;<Test>
+"RTN","C0CCCR0",486,0)
+ ;;<CCRDataObjectID>@@VITALSIGNSTESTOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",487,0)
+ ;;<Type>
+"RTN","C0CCCR0",488,0)
+ ;;<Text>@@VITALSIGNSTESTTYPETEXT@@</Text>
+"RTN","C0CCCR0",489,0)
+ ;;</Type>
+"RTN","C0CCCR0",490,0)
+ ;;<Description>
+"RTN","C0CCCR0",491,0)
+ ;;<Text>@@VITALSIGNSDESCRIPTIONTEXT@@</Text>
+"RTN","C0CCCR0",492,0)
+ ;;<Code>
+"RTN","C0CCCR0",493,0)
+ ;;<Value>@@VITALSIGNSDESCCODEVALUE@@</Value>
+"RTN","C0CCCR0",494,0)
+ ;;<CodingSystem>@@VITALSIGNSDESCCODINGSYSTEM@@</CodingSystem>
+"RTN","C0CCCR0",495,0)
+ ;;<Version>@@VITALSIGNSCODEVERSION@@</Version>
+"RTN","C0CCCR0",496,0)
+ ;;</Code>
+"RTN","C0CCCR0",497,0)
+ ;;</Description>
+"RTN","C0CCCR0",498,0)
+ ;;<Source>
+"RTN","C0CCCR0",499,0)
+ ;;<Actor>
+"RTN","C0CCCR0",500,0)
+ ;;<ActorID>@@VITALSIGNSTESTSOURCEACTORID@@</ActorID>
+"RTN","C0CCCR0",501,0)
+ ;;</Actor>
+"RTN","C0CCCR0",502,0)
+ ;;</Source>
+"RTN","C0CCCR0",503,0)
+ ;;<TestResult>
+"RTN","C0CCCR0",504,0)
+ ;;<Value>@@VITALSIGNSTESTRESULTVALUE@@</Value>
+"RTN","C0CCCR0",505,0)
+ ;;<Units>
+"RTN","C0CCCR0",506,0)
+ ;;<Unit>@@VITALSIGNSTESTRESULTUNIT@@</Unit>
+"RTN","C0CCCR0",507,0)
+ ;;</Units>
+"RTN","C0CCCR0",508,0)
+ ;;</TestResult>
+"RTN","C0CCCR0",509,0)
+ ;;</Test>
+"RTN","C0CCCR0",510,0)
+ ;;</Result>
+"RTN","C0CCCR0",511,0)
+ ;;</VitalSigns>
+"RTN","C0CCCR0",512,0)
+ ;;<Results>
+"RTN","C0CCCR0",513,0)
+ ;;<Result>
+"RTN","C0CCCR0",514,0)
+ ;;<CCRDataObjectID>@@RESULTOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",515,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",516,0)
+ ;;<Type>
+"RTN","C0CCCR0",517,0)
+ ;;<Text>Assessment Time</Text>
+"RTN","C0CCCR0",518,0)
+ ;;</Type>
+"RTN","C0CCCR0",519,0)
+ ;;<ExactDateTime>@@RESULTASSESSMENTDATETIME@@</ExactDateTime>
+"RTN","C0CCCR0",520,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",521,0)
+ ;;<Description>
+"RTN","C0CCCR0",522,0)
+ ;;<Text>@@RESULTDESCRIPTIONTEXT@@</Text>
+"RTN","C0CCCR0",523,0)
+ ;;<Code>
+"RTN","C0CCCR0",524,0)
+ ;;<Value>@@RESULTCODE@@</Value>
+"RTN","C0CCCR0",525,0)
+ ;;<CodingSystem>@@RESULTCODINGSYSTEM@@</CodingSystem>
+"RTN","C0CCCR0",526,0)
+ ;;</Code>
+"RTN","C0CCCR0",527,0)
+ ;;</Description>
+"RTN","C0CCCR0",528,0)
+ ;;<Status>
+"RTN","C0CCCR0",529,0)
+ ;;<Text>@@RESULTSTATUS@@</Text>
+"RTN","C0CCCR0",530,0)
+ ;;</Status>
+"RTN","C0CCCR0",531,0)
+ ;;<Source>
+"RTN","C0CCCR0",532,0)
+ ;;<Actor>
+"RTN","C0CCCR0",533,0)
+ ;;<ActorID>@@RESULTSOURCEACTORID@@</ActorID>
+"RTN","C0CCCR0",534,0)
+ ;;</Actor>
+"RTN","C0CCCR0",535,0)
+ ;;</Source>
+"RTN","C0CCCR0",536,0)
+ ;;<Test>
+"RTN","C0CCCR0",537,0)
+ ;;<CCRDataObjectID>@@RESULTTESTOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",538,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",539,0)
+ ;;<Type>
+"RTN","C0CCCR0",540,0)
+ ;;<Text>Assessment Time</Text>
+"RTN","C0CCCR0",541,0)
+ ;;</Type>
+"RTN","C0CCCR0",542,0)
+ ;;<ExactDateTime>@@RESULTTESTDATETIME@@</ExactDateTime>
+"RTN","C0CCCR0",543,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",544,0)
+ ;;<Description>
+"RTN","C0CCCR0",545,0)
+ ;;<Text>@@RESULTTESTDESCRIPTIONTEXT@@</Text>
+"RTN","C0CCCR0",546,0)
+ ;;<Code>
+"RTN","C0CCCR0",547,0)
+ ;;<Value>@@RESULTTESTCODEVALUE@@</Value>
+"RTN","C0CCCR0",548,0)
+ ;;<CodingSystem>@@RESULTTESTCODINGSYSTEM@@</CodingSystem>
+"RTN","C0CCCR0",549,0)
+ ;;</Code>
+"RTN","C0CCCR0",550,0)
+ ;;</Description>
+"RTN","C0CCCR0",551,0)
+ ;;<Status>
+"RTN","C0CCCR0",552,0)
+ ;;<Text>@@RESULTTESTSTATUSTEXT@@</Text>
+"RTN","C0CCCR0",553,0)
+ ;;</Status>
+"RTN","C0CCCR0",554,0)
+ ;;<Source>
+"RTN","C0CCCR0",555,0)
+ ;;<Actor>
+"RTN","C0CCCR0",556,0)
+ ;;<ActorID>@@RESULTTESTSOURCEACTORID@@</ActorID>
+"RTN","C0CCCR0",557,0)
+ ;;</Actor>
+"RTN","C0CCCR0",558,0)
+ ;;</Source>
+"RTN","C0CCCR0",559,0)
+ ;;<TestResult>
+"RTN","C0CCCR0",560,0)
+ ;;<Value>@@RESULTTESTVALUE@@</Value>
+"RTN","C0CCCR0",561,0)
+ ;;<Units>
+"RTN","C0CCCR0",562,0)
+ ;;<Unit>@@RESULTTESTUNITS@@</Unit>
+"RTN","C0CCCR0",563,0)
+ ;;</Units>
+"RTN","C0CCCR0",564,0)
+ ;;</TestResult>
+"RTN","C0CCCR0",565,0)
+ ;;<NormalResult>
+"RTN","C0CCCR0",566,0)
+ ;;<Normal>
+"RTN","C0CCCR0",567,0)
+ ;;<Description>
+"RTN","C0CCCR0",568,0)
+ ;;<Text>@@RESULTTESTNORMALDESCTEXT@@</Text>
+"RTN","C0CCCR0",569,0)
+ ;;</Description>
+"RTN","C0CCCR0",570,0)
+ ;;<Source>
+"RTN","C0CCCR0",571,0)
+ ;;<Actor>
+"RTN","C0CCCR0",572,0)
+ ;;<ActorID>@@RESULTTESTNORMALSOURCEACTORID@@</ActorID>
+"RTN","C0CCCR0",573,0)
+ ;;</Actor>
+"RTN","C0CCCR0",574,0)
+ ;;</Source>
+"RTN","C0CCCR0",575,0)
+ ;;</Normal>
+"RTN","C0CCCR0",576,0)
+ ;;</NormalResult>
+"RTN","C0CCCR0",577,0)
+ ;;<Flag>
+"RTN","C0CCCR0",578,0)
+ ;;<Text>@@RESULTTESTFLAG@@</Text>
+"RTN","C0CCCR0",579,0)
+ ;;</Flag>
+"RTN","C0CCCR0",580,0)
+ ;;</Test>
+"RTN","C0CCCR0",581,0)
+ ;;</Result>
+"RTN","C0CCCR0",582,0)
+ ;;</Results>
+"RTN","C0CCCR0",583,0)
+ ;;<Procedures>
+"RTN","C0CCCR0",584,0)
+ ;;<Procedure>
+"RTN","C0CCCR0",585,0)
+ ;;<CCRDataObjectID>@@PROCOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",586,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",587,0)
+ ;;<Type>
+"RTN","C0CCCR0",588,0)
+ ;;<Text>@@PROCDATETEXT@@</Text>
+"RTN","C0CCCR0",589,0)
+ ;;</Type>
+"RTN","C0CCCR0",590,0)
+ ;;<ExactDateTime>@@PROCDATETIME@@</ExactDateTime>
+"RTN","C0CCCR0",591,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",592,0)
+ ;;<Description>
+"RTN","C0CCCR0",593,0)
+ ;;<Text>@@PROCDESCTEXT@@</Text>
+"RTN","C0CCCR0",594,0)
+ ;;<ObjectAttribute>
+"RTN","C0CCCR0",595,0)
+ ;;<Attribute>@@PROCDESCOBJATTR@@</Attribute>
+"RTN","C0CCCR0",596,0)
+ ;;<AttributeValue>
+"RTN","C0CCCR0",597,0)
+ ;;<Value>@@PROCDESCOBJATTRVAL@@</Value>
+"RTN","C0CCCR0",598,0)
+ ;;<Code>
+"RTN","C0CCCR0",599,0)
+ ;;<Value>@@PROCDESCOBJATTRCODE@@</Value>
+"RTN","C0CCCR0",600,0)
+ ;;<CodingSystem>@@PROCDESCOBJATTRCODESYS@@</CodingSystem>
+"RTN","C0CCCR0",601,0)
+ ;;</Code>
+"RTN","C0CCCR0",602,0)
+ ;;</AttributeValue>
+"RTN","C0CCCR0",603,0)
+ ;;</ObjectAttribute>
+"RTN","C0CCCR0",604,0)
+ ;;<Code>
+"RTN","C0CCCR0",605,0)
+ ;;<Value>@@PROCCODE@@</Value>
+"RTN","C0CCCR0",606,0)
+ ;;<CodingSystem>@@PROCCODESYS@@</CodingSystem>
+"RTN","C0CCCR0",607,0)
+ ;;</Code>
+"RTN","C0CCCR0",608,0)
+ ;;</Description>
+"RTN","C0CCCR0",609,0)
+ ;;<Status>
+"RTN","C0CCCR0",610,0)
+ ;;<Text>@@PROCSTATUS@@</Text>
+"RTN","C0CCCR0",611,0)
+ ;;</Status>
+"RTN","C0CCCR0",612,0)
+ ;;<Source>
+"RTN","C0CCCR0",613,0)
+ ;;<Actor>
+"RTN","C0CCCR0",614,0)
+ ;;<ActorID>@@PROCACTOROBJID@@</ActorID>
+"RTN","C0CCCR0",615,0)
+ ;;</Actor>
+"RTN","C0CCCR0",616,0)
+ ;;</Source>
+"RTN","C0CCCR0",617,0)
+ ;;<InternalCCRLink>
+"RTN","C0CCCR0",618,0)
+ ;;<LinkID>@@PROCLINKID@@</LinkID>
+"RTN","C0CCCR0",619,0)
+ ;;<LinkRelationship>@@PROCLINKREL@@</LinkRelationship>
+"RTN","C0CCCR0",620,0)
+ ;;</InternalCCRLink>
+"RTN","C0CCCR0",621,0)
+ ;;</Procedure>
+"RTN","C0CCCR0",622,0)
+ ;;</Procedures>
+"RTN","C0CCCR0",623,0)
+ ;;<Encounters>
+"RTN","C0CCCR0",624,0)
+ ;;<Encounter>
+"RTN","C0CCCR0",625,0)
+ ;;<CCRDataObjectID>@@ENCOBJECTID@@</CCRDataObjectID>
+"RTN","C0CCCR0",626,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",627,0)
+ ;;<ExactDateTime>@@ENCDATETIME@@</ExactDateTime>
+"RTN","C0CCCR0",628,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",629,0)
+ ;;<Type>
+"RTN","C0CCCR0",630,0)
+ ;;<Text>@@ENCTYPETXT@@</Text>
+"RTN","C0CCCR0",631,0)
+ ;;<Code>
+"RTN","C0CCCR0",632,0)
+ ;;<Value>@@ENCTYPECODE@@</Value>
+"RTN","C0CCCR0",633,0)
+ ;;<CodingSystem>@@ENCTYPECODESYS@@</CodingSystem>
+"RTN","C0CCCR0",634,0)
+ ;;</Code>
+"RTN","C0CCCR0",635,0)
+ ;;</Type>
+"RTN","C0CCCR0",636,0)
+ ;;<Description>
+"RTN","C0CCCR0",637,0)
+ ;;<Text>@@ENCDESCTXT@@</Text>
+"RTN","C0CCCR0",638,0)
+ ;;<Code>
+"RTN","C0CCCR0",639,0)
+ ;;<Value>@@ENCDESCCODE@@</Value>
+"RTN","C0CCCR0",640,0)
+ ;;<CodingSystem>@@ENCDESCCODESYS@@</CodingSystem>
+"RTN","C0CCCR0",641,0)
+ ;;</Code>
+"RTN","C0CCCR0",642,0)
+ ;;</Description>
+"RTN","C0CCCR0",643,0)
+ ;;<Location>
+"RTN","C0CCCR0",644,0)
+ ;;<Actor>
+"RTN","C0CCCR0",645,0)
+ ;;<ActorID>@@ENCLOCACTORID@@</ActorID>
+"RTN","C0CCCR0",646,0)
+ ;;</Actor>
+"RTN","C0CCCR0",647,0)
+ ;;</Location>
+"RTN","C0CCCR0",648,0)
+ ;;<Practioner>
+"RTN","C0CCCR0",649,0)
+ ;;<Actor>
+"RTN","C0CCCR0",650,0)
+ ;;<ActorID>@@ENCPRVACTORID@@</ActorID>
+"RTN","C0CCCR0",651,0)
+ ;;</Actor>
+"RTN","C0CCCR0",652,0)
+ ;;</Practioner>
+"RTN","C0CCCR0",653,0)
+ ;;<Indication>
+"RTN","C0CCCR0",654,0)
+ ;;<Text>@@ENCINDTXT@@</Text>
+"RTN","C0CCCR0",655,0)
+ ;;<Code>
+"RTN","C0CCCR0",656,0)
+ ;;<Value>@@ENCINDCODE@@</Value>
+"RTN","C0CCCR0",657,0)
+ ;;<CodingSystem>@@ENCINDCODESYS@@</CodingSystem>
+"RTN","C0CCCR0",658,0)
+ ;;</Code>
+"RTN","C0CCCR0",659,0)
+ ;;</Indication>
+"RTN","C0CCCR0",660,0)
+ ;;<Source>
+"RTN","C0CCCR0",661,0)
+ ;;<Actor>
+"RTN","C0CCCR0",662,0)
+ ;;<ActorID>@@ENCACTORID@@</ActorID>
+"RTN","C0CCCR0",663,0)
+ ;;</Actor>
+"RTN","C0CCCR0",664,0)
+ ;;</Source>
+"RTN","C0CCCR0",665,0)
+ ;;<CommentID>@@ENCCOMMENTID@@</CommentID>
+"RTN","C0CCCR0",666,0)
+ ;;</Encounter>
+"RTN","C0CCCR0",667,0)
+ ;;</Encounters>
+"RTN","C0CCCR0",668,0)
+ ;;<HealthCareProviders>
+"RTN","C0CCCR0",669,0)
+ ;;<Provider>
+"RTN","C0CCCR0",670,0)
+ ;;<ActorID>AA0005</ActorID>
+"RTN","C0CCCR0",671,0)
+ ;;<ActorRole>
+"RTN","C0CCCR0",672,0)
+ ;;<Text>Primary Provider</Text>
+"RTN","C0CCCR0",673,0)
+ ;;</ActorRole>
+"RTN","C0CCCR0",674,0)
+ ;;</Provider>
+"RTN","C0CCCR0",675,0)
+ ;;</HealthCareProviders>
+"RTN","C0CCCR0",676,0)
+ ;;</Body>
+"RTN","C0CCCR0",677,0)
+ ;;<Actors>
+"RTN","C0CCCR0",678,0)
+ ;;<ACTOR-PATIENT>
+"RTN","C0CCCR0",679,0)
+ ;;<Actor>
+"RTN","C0CCCR0",680,0)
+ ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
+"RTN","C0CCCR0",681,0)
+ ;;<Person>
+"RTN","C0CCCR0",682,0)
+ ;;<Name>
+"RTN","C0CCCR0",683,0)
+ ;;<CurrentName>
+"RTN","C0CCCR0",684,0)
+ ;;<Given>@@ACTORGIVENNAME@@</Given>
+"RTN","C0CCCR0",685,0)
+ ;;<Middle>@@ACTORMIDDLENAME@@</Middle>
+"RTN","C0CCCR0",686,0)
+ ;;<Family>@@ACTORFAMILYNAME@@</Family>
+"RTN","C0CCCR0",687,0)
+ ;;</CurrentName>
+"RTN","C0CCCR0",688,0)
+ ;;</Name>
+"RTN","C0CCCR0",689,0)
+ ;;<DateOfBirth>
+"RTN","C0CCCR0",690,0)
+ ;;<ExactDateTime>@@ACTORDATEOFBIRTH@@</ExactDateTime>
+"RTN","C0CCCR0",691,0)
+ ;;</DateOfBirth>
+"RTN","C0CCCR0",692,0)
+ ;;<Gender>
+"RTN","C0CCCR0",693,0)
+ ;;<Text>@@ACTORGENDER@@</Text>
+"RTN","C0CCCR0",694,0)
+ ;;<Code>
+"RTN","C0CCCR0",695,0)
+ ;;<Value>@@ACTORGENDERCODE@@</Value>
+"RTN","C0CCCR0",696,0)
+ ;;<CodingSystem>HL7 AdministrativeGender</CodingSystem>
+"RTN","C0CCCR0",697,0)
+ ;;</Code>
+"RTN","C0CCCR0",698,0)
+ ;;</Gender>
+"RTN","C0CCCR0",699,0)
+ ;;</Person>
+"RTN","C0CCCR0",700,0)
+ ;;<IDs>
+"RTN","C0CCCR0",701,0)
+ ;;<Type>
+"RTN","C0CCCR0",702,0)
+ ;;<Text>@@ACTORSSNTEXT@@</Text>
+"RTN","C0CCCR0",703,0)
+ ;;</Type>
+"RTN","C0CCCR0",704,0)
+ ;;<ID>@@ACTORSSN@@</ID>
+"RTN","C0CCCR0",705,0)
+ ;;<Source>
+"RTN","C0CCCR0",706,0)
+ ;;<Actor>
+"RTN","C0CCCR0",707,0)
+ ;;<ActorID>@@ACTORSSNSOURCEID@@</ActorID>
+"RTN","C0CCCR0",708,0)
+ ;;</Actor>
+"RTN","C0CCCR0",709,0)
+ ;;</Source>
+"RTN","C0CCCR0",710,0)
+ ;;</IDs>
+"RTN","C0CCCR0",711,0)
+ ;;<Address>
+"RTN","C0CCCR0",712,0)
+ ;;<Type>
+"RTN","C0CCCR0",713,0)
+ ;;<Text>@@ACTORADDRESSTYPE@@</Text>
+"RTN","C0CCCR0",714,0)
+ ;;</Type>
+"RTN","C0CCCR0",715,0)
+ ;;<Line1>@@ACTORADDRESSLINE1@@</Line1>
+"RTN","C0CCCR0",716,0)
+ ;;<Line2>@@ACTORADDRESSLINE2@@</Line2>
+"RTN","C0CCCR0",717,0)
+ ;;<City>@@ACTORADDRESSCITY@@</City>
+"RTN","C0CCCR0",718,0)
+ ;;<State>@@ACTORADDRESSSTATE@@</State>
+"RTN","C0CCCR0",719,0)
+ ;;<PostalCode>@@ACTORADDRESSZIPCODE@@</PostalCode>
+"RTN","C0CCCR0",720,0)
+ ;;</Address>
+"RTN","C0CCCR0",721,0)
+ ;;<Telephone>
+"RTN","C0CCCR0",722,0)
+ ;;<Value>@@ACTORRESTEL@@</Value>
+"RTN","C0CCCR0",723,0)
+ ;;<Type>
+"RTN","C0CCCR0",724,0)
+ ;;<Text>@@ACTORRESTELTEXT@@</Text>
+"RTN","C0CCCR0",725,0)
+ ;;</Type>
+"RTN","C0CCCR0",726,0)
+ ;;</Telephone>
+"RTN","C0CCCR0",727,0)
+ ;;<Telephone>
+"RTN","C0CCCR0",728,0)
+ ;;<Value>@@ACTORWORKTEL@@</Value>
+"RTN","C0CCCR0",729,0)
+ ;;<Type>
+"RTN","C0CCCR0",730,0)
+ ;;<Text>@@ACTORWORKTELTEXT@@</Text>
+"RTN","C0CCCR0",731,0)
+ ;;</Type>
+"RTN","C0CCCR0",732,0)
+ ;;</Telephone>
+"RTN","C0CCCR0",733,0)
+ ;;<Telephone>
+"RTN","C0CCCR0",734,0)
+ ;;<Value>@@ACTORCELLTEL@@</Value>
+"RTN","C0CCCR0",735,0)
+ ;;<Type>
+"RTN","C0CCCR0",736,0)
+ ;;<Text>@@ACTORCELLTELTEXT@@</Text>
+"RTN","C0CCCR0",737,0)
+ ;;</Type>
+"RTN","C0CCCR0",738,0)
+ ;;</Telephone>
+"RTN","C0CCCR0",739,0)
+ ;;<EMail>
+"RTN","C0CCCR0",740,0)
+ ;;<Value>@@ACTOREMAIL@@</Value>
+"RTN","C0CCCR0",741,0)
+ ;;</EMail>
+"RTN","C0CCCR0",742,0)
+ ;;<Source>
+"RTN","C0CCCR0",743,0)
+ ;;<Actor>
+"RTN","C0CCCR0",744,0)
+ ;;<ActorID>@@ACTORADDRESSSOURCEID@@</ActorID>
+"RTN","C0CCCR0",745,0)
+ ;;</Actor>
+"RTN","C0CCCR0",746,0)
+ ;;</Source>
+"RTN","C0CCCR0",747,0)
+ ;;</Actor>
+"RTN","C0CCCR0",748,0)
+ ;;</ACTOR-PATIENT>
+"RTN","C0CCCR0",749,0)
+ ;;<ACTOR-SYSTEM>
+"RTN","C0CCCR0",750,0)
+ ;;<Actor>
+"RTN","C0CCCR0",751,0)
+ ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
+"RTN","C0CCCR0",752,0)
+ ;;<InformationSystem>
+"RTN","C0CCCR0",753,0)
+ ;;<Name>@@ACTORINFOSYSNAME@@</Name>
+"RTN","C0CCCR0",754,0)
+ ;;<Version>@@ACTORINFOSYSVER@@</Version>
+"RTN","C0CCCR0",755,0)
+ ;;</InformationSystem>
+"RTN","C0CCCR0",756,0)
+ ;;<Source>
+"RTN","C0CCCR0",757,0)
+ ;;<Actor>
+"RTN","C0CCCR0",758,0)
+ ;;<ActorID>@@ACTORINFOSYSSOURCEID@@</ActorID>
+"RTN","C0CCCR0",759,0)
+ ;;</Actor>
+"RTN","C0CCCR0",760,0)
+ ;;</Source>
+"RTN","C0CCCR0",761,0)
+ ;;</Actor>
+"RTN","C0CCCR0",762,0)
+ ;;</ACTOR-SYSTEM>
+"RTN","C0CCCR0",763,0)
+ ;;<ACTOR-NOK>
+"RTN","C0CCCR0",764,0)
+ ;;<Actor>
+"RTN","C0CCCR0",765,0)
+ ;;<ActorObjectID>AA0003</ActorObjectID>
+"RTN","C0CCCR0",766,0)
+ ;;<Person>
+"RTN","C0CCCR0",767,0)
+ ;;<Name>
+"RTN","C0CCCR0",768,0)
+ ;;<DisplayName>@@ACTORDISPLAYNAME@@</DisplayName>
+"RTN","C0CCCR0",769,0)
+ ;;</Name>
+"RTN","C0CCCR0",770,0)
+ ;;</Person>
+"RTN","C0CCCR0",771,0)
+ ;;<Relation>
+"RTN","C0CCCR0",772,0)
+ ;;<Text>@@ACTORRELATION@@</Text>
+"RTN","C0CCCR0",773,0)
+ ;;</Relation>
+"RTN","C0CCCR0",774,0)
+ ;;<Source>
+"RTN","C0CCCR0",775,0)
+ ;;<Actor>
+"RTN","C0CCCR0",776,0)
+ ;;<ActorID>@@ACTORRELATIONSOURCEID@@</ActorID>
+"RTN","C0CCCR0",777,0)
+ ;;</Actor>
+"RTN","C0CCCR0",778,0)
+ ;;</Source>
+"RTN","C0CCCR0",779,0)
+ ;;</Actor>
+"RTN","C0CCCR0",780,0)
+ ;;</ACTOR-NOK>
+"RTN","C0CCCR0",781,0)
+ ;;<ACTOR-PROVIDER>
+"RTN","C0CCCR0",782,0)
+ ;;<Actor>
+"RTN","C0CCCR0",783,0)
+ ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
+"RTN","C0CCCR0",784,0)
+ ;;<Person>
+"RTN","C0CCCR0",785,0)
+ ;;<Name>
+"RTN","C0CCCR0",786,0)
+ ;;<CurrentName>
+"RTN","C0CCCR0",787,0)
+ ;;<Given>@@ACTORGIVENNAME@@</Given>
+"RTN","C0CCCR0",788,0)
+ ;;<Middle>@@ACTORMIDDLENAME@@</Middle>
+"RTN","C0CCCR0",789,0)
+ ;;<Family>@@ACTORFAMILYNAME@@</Family>
+"RTN","C0CCCR0",790,0)
+ ;;<Title>@@ACTORTITLE@@</Title>
+"RTN","C0CCCR0",791,0)
+ ;;</CurrentName>
+"RTN","C0CCCR0",792,0)
+ ;;</Name>
+"RTN","C0CCCR0",793,0)
+ ;;</Person>
+"RTN","C0CCCR0",794,0)
+ ;;<Specialty>
+"RTN","C0CCCR0",795,0)
+ ;;<Text>@@ACTORSPECIALITY@@</Text>
+"RTN","C0CCCR0",796,0)
+ ;;</Specialty>
+"RTN","C0CCCR0",797,0)
+ ;;<Address>
+"RTN","C0CCCR0",798,0)
+ ;;<Type>
+"RTN","C0CCCR0",799,0)
+ ;;<Text>@@ACTORADDRESSTYPE@@</Text>
+"RTN","C0CCCR0",800,0)
+ ;;</Type>
+"RTN","C0CCCR0",801,0)
+ ;;<Line1>@@ACTORADDRESSLINE1@@</Line1>
+"RTN","C0CCCR0",802,0)
+ ;;<City>@@ACTORADDRESSCITY@@</City>
+"RTN","C0CCCR0",803,0)
+ ;;<State>@@ACTORADDRESSSTATE@@</State>
+"RTN","C0CCCR0",804,0)
+ ;;<PostalCode>@@ACTORPOSTALCODE@@</PostalCode>
+"RTN","C0CCCR0",805,0)
+ ;;</Address>
+"RTN","C0CCCR0",806,0)
+ ;;<Telephone>
+"RTN","C0CCCR0",807,0)
+ ;;<Value>@@ACTORTELEPHONE@@</Value>
+"RTN","C0CCCR0",808,0)
+ ;;<Type>
+"RTN","C0CCCR0",809,0)
+ ;;<Text>@@ACTORTELEPHONETYPE@@</Text>
+"RTN","C0CCCR0",810,0)
+ ;;</Type>
+"RTN","C0CCCR0",811,0)
+ ;;</Telephone>
+"RTN","C0CCCR0",812,0)
+ ;;<Email>
+"RTN","C0CCCR0",813,0)
+ ;;<Value>@@ACTOREMAIL@@</Value>
+"RTN","C0CCCR0",814,0)
+ ;;</Email>
+"RTN","C0CCCR0",815,0)
+ ;;<Source>
+"RTN","C0CCCR0",816,0)
+ ;;<Actor>
+"RTN","C0CCCR0",817,0)
+ ;;<ActorID>@@ACTORSOURCEID@@</ActorID>
+"RTN","C0CCCR0",818,0)
+ ;;</Actor>
+"RTN","C0CCCR0",819,0)
+ ;;</Source>
+"RTN","C0CCCR0",820,0)
+ ;;<InternalCCRLink>
+"RTN","C0CCCR0",821,0)
+ ;;<LinkID>@@ACTORORGLINK@@</LinkID>
+"RTN","C0CCCR0",822,0)
+ ;;<LinkRelationship>representedOrganization</LinkRelationship>
+"RTN","C0CCCR0",823,0)
+ ;;</InternalCCRLink>
+"RTN","C0CCCR0",824,0)
+ ;;</Actor>
+"RTN","C0CCCR0",825,0)
+ ;;</ACTOR-PROVIDER>
+"RTN","C0CCCR0",826,0)
+ ;;<ACTOR-ORG>
+"RTN","C0CCCR0",827,0)
+ ;;<Actor>
+"RTN","C0CCCR0",828,0)
+ ;;<ActorObjectID>@@ACTOROBJECTID@@</ActorObjectID>
+"RTN","C0CCCR0",829,0)
+ ;;<Organization>
+"RTN","C0CCCR0",830,0)
+ ;;<Name>@@ORGANIZATIONNAME@@</Name>
+"RTN","C0CCCR0",831,0)
+ ;;</Organization>
+"RTN","C0CCCR0",832,0)
+ ;;<Address>
+"RTN","C0CCCR0",833,0)
+ ;;<Type>
+"RTN","C0CCCR0",834,0)
+ ;;<Text>@@ACTORADDRESSTYPE@@</Text>
+"RTN","C0CCCR0",835,0)
+ ;;</Type>
+"RTN","C0CCCR0",836,0)
+ ;;<Line1>@@ACTORADDRESSLINE1@@</Line1>
+"RTN","C0CCCR0",837,0)
+ ;;<City>@@ACTORADDRESSCITY@@</City>
+"RTN","C0CCCR0",838,0)
+ ;;<State>@@ACTORADDRESSSTATE@@</State>
+"RTN","C0CCCR0",839,0)
+ ;;<PostalCode>@@ACTORPOSTALCODE@@</PostalCode>
+"RTN","C0CCCR0",840,0)
+ ;;</Address>
+"RTN","C0CCCR0",841,0)
+ ;;<Telephone>
+"RTN","C0CCCR0",842,0)
+ ;;<Value>@@ACTORTELEPHONE@@</Value>
+"RTN","C0CCCR0",843,0)
+ ;;<Type>
+"RTN","C0CCCR0",844,0)
+ ;;<Text>@@ACTORTELEPHONETYPE@@</Text>
+"RTN","C0CCCR0",845,0)
+ ;;</Type>
+"RTN","C0CCCR0",846,0)
+ ;;</Telephone>
+"RTN","C0CCCR0",847,0)
+ ;;<Source>
+"RTN","C0CCCR0",848,0)
+ ;;<Actor>
+"RTN","C0CCCR0",849,0)
+ ;;<ActorID>@@ACTORSOURCEID@@</ActorID>
+"RTN","C0CCCR0",850,0)
+ ;;</Actor>
+"RTN","C0CCCR0",851,0)
+ ;;</Source>
+"RTN","C0CCCR0",852,0)
+ ;;</Actor>
+"RTN","C0CCCR0",853,0)
+ ;;</ACTOR-ORG>
+"RTN","C0CCCR0",854,0)
+ ;;</Actors>
+"RTN","C0CCCR0",855,0)
+ ;;<Signatures>
+"RTN","C0CCCR0",856,0)
+ ;;<CCRSignature>
+"RTN","C0CCCR0",857,0)
+ ;;<SignatureObjectID>S0001</SignatureObjectID>
+"RTN","C0CCCR0",858,0)
+ ;;<ExactDateTime>2008-03-18T23:10:58Z</ExactDateTime>
+"RTN","C0CCCR0",859,0)
+ ;;<Source>
+"RTN","C0CCCR0",860,0)
+ ;;<ActorID>AA0001</ActorID>
+"RTN","C0CCCR0",861,0)
+ ;;</Source>
+"RTN","C0CCCR0",862,0)
+ ;;<Signature>
+"RTN","C0CCCR0",863,0)
+ ;;<Signature xmlns="http://www.w3.org/2000/09/xmldsig#">
+"RTN","C0CCCR0",864,0)
+ ;;<SignedInfo>
+"RTN","C0CCCR0",865,0)
+ ;;<CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/>
+"RTN","C0CCCR0",866,0)
+ ;;<SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/>
+"RTN","C0CCCR0",867,0)
+ ;;<Reference URI="">
+"RTN","C0CCCR0",868,0)
+ ;;<Transforms>
+"RTN","C0CCCR0",869,0)
+ ;;<Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"/>
+"RTN","C0CCCR0",870,0)
+ ;;</Transforms>
+"RTN","C0CCCR0",871,0)
+ ;;<DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"/>
+"RTN","C0CCCR0",872,0)
+ ;;<DigestValue>YFveLLyo+75P7rSciv0/m1O6Ot4=</DigestValue>
+"RTN","C0CCCR0",873,0)
+ ;;</Reference>
+"RTN","C0CCCR0",874,0)
+ ;;</SignedInfo>
+"RTN","C0CCCR0",875,0)
+ ;;<SignatureValue>Bj6sACXl74hrlbUYnu8HqnRab5VGy69BOYjOH7dETxgppXMEd7AoVYaePZvgJft78JR4oQY76hbFyGcIslYauPpJxx2hCd5d56xFeaQg01R6AQOvGnhjlq63TbpFdUq0B4tYsmiibJPbQJhTQe+TcWTBvWaQt8Fkk5blO571YvI=</SignatureValue>
+"RTN","C0CCCR0",876,0)
+ ;;<KeyInfo>
+"RTN","C0CCCR0",877,0)
+ ;;<KeyValue>
+"RTN","C0CCCR0",878,0)
+ ;;<RSAKeyValue>
+"RTN","C0CCCR0",879,0)
+ ;;<Modulus>meH817QYol+/uUEg6j8Mg89s7GTlaN9B+/CGlzrtnQH+swMigZRnEPxHVO8PhEymP/W9nlhAjTScV/CUzA9yJ9WiaOn17c+KReKhfBqL24DX9BpbJ+kLYVz7mBO5Qydk5AzUT2hFwW93irD8iRKP+/t+2Mi2CjNfj8VTjJpHpm0=</Modulus>
+"RTN","C0CCCR0",880,0)
+ ;;<Exponent>AQAB</Exponent>
+"RTN","C0CCCR0",881,0)
+ ;;</RSAKeyValue>
+"RTN","C0CCCR0",882,0)
+ ;;</KeyValue>
+"RTN","C0CCCR0",883,0)
+ ;;</KeyInfo>
+"RTN","C0CCCR0",884,0)
+ ;;</Signature>
+"RTN","C0CCCR0",885,0)
+ ;;</Signature>
+"RTN","C0CCCR0",886,0)
+ ;;</CCRSignature>
+"RTN","C0CCCR0",887,0)
+ ;;</Signatures>
+"RTN","C0CCCR0",888,0)
+ ;;<Comments>
+"RTN","C0CCCR0",889,0)
+ ;;<Comment>
+"RTN","C0CCCR0",890,0)
+ ;;<CommentObjectID>@@COMMENTOBJECTID@@</CommentObjectID>
+"RTN","C0CCCR0",891,0)
+ ;;<DateTime>
+"RTN","C0CCCR0",892,0)
+ ;;<ExactDateTime>@@CMTDATETIME@@</ExactDateTime>
+"RTN","C0CCCR0",893,0)
+ ;;</DateTime>
+"RTN","C0CCCR0",894,0)
+ ;;<Description>
+"RTN","C0CCCR0",895,0)
+ ;;<Text>
+"RTN","C0CCCR0",896,0)
+ ;;</Text>
+"RTN","C0CCCR0",897,0)
+ ;;</Description>
+"RTN","C0CCCR0",898,0)
+ ;;<Source>
+"RTN","C0CCCR0",899,0)
+ ;;<Actor>
+"RTN","C0CCCR0",900,0)
+ ;;<ActorID>@@ACTORSOURCEID@@</ActorID>
+"RTN","C0CCCR0",901,0)
+ ;;</Actor>
+"RTN","C0CCCR0",902,0)
+ ;;</Source>
+"RTN","C0CCCR0",903,0)
+ ;;</Comment>
+"RTN","C0CCCR0",904,0)
+ ;;</Comments>
+"RTN","C0CCCR0",905,0)
+ ;;</ContinuityOfCareRecord>
+"RTN","C0CCCR0",906,0)
+ ;</TEMPLATE>
+"RTN","C0CCMT")
+0^71^B6740701
+"RTN","C0CCMT",1,0)
+C0CCMT  ; CCDCCR/GPL - CCR/CCD PROCESSING FOR COMMENTS ; 05/21/10
+"RTN","C0CCMT",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CCMT",3,0)
+ ;Copyright 2010 George Lilly, University of Minnesota and others.
+"RTN","C0CCMT",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CCMT",5,0)
+ ;See attached copy of the License.
+"RTN","C0CCMT",6,0)
+ ;
+"RTN","C0CCMT",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CCMT",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CCMT",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CCMT",10,0)
+ ;(at your option) any later version.
+"RTN","C0CCMT",11,0)
+ ;
+"RTN","C0CCMT",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CCMT",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CCMT",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CCMT",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CCMT",16,0)
+ ;
+"RTN","C0CCMT",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CCMT",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CCMT",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CCMT",20,0)
+ ;
+"RTN","C0CCMT",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CCMT",22,0)
+ Q
+"RTN","C0CCMT",23,0)
+ ;
+"RTN","C0CCMT",24,0)
+EXTRACT(NOTEXML,DFN,NOTEOUT) ; EXTRACT NOTES INTO  XML TEMPLATE
+"RTN","C0CCMT",25,0)
+ ; NOTEXML AND NOTEOUT ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CCMT",26,0)
+ ;
+"RTN","C0CCMT",27,0)
+ D SETVARS^C0CPROC ; SET UP VARIABLES FOR PROCEDUCRES, ENCOUNTERS, AND NOTES
+"RTN","C0CCMT",28,0)
+ ;I '$D(@C0CNTE) Q  ; NO NOTES AVAILABLE
+"RTN","C0CCMT",29,0)
+ D MAP(NOTEXML,C0CNTE,NOTEOUT) ;MAP RESULTS FOR NOTES
+"RTN","C0CCMT",30,0)
+ Q
+"RTN","C0CCMT",31,0)
+ ;
+"RTN","C0CCMT",32,0)
+MAP(NOTEXML,C0CNTE,NOTEOUT) ; MAP PROCEDURES XML 
+"RTN","C0CCMT",33,0)
+ ;
+"RTN","C0CCMT",34,0)
+ N ZTEMP S ZTEMP=$NA(^TMP("C0CCCR",$J,DFN,"NOTETEMP")) ;WORK AREA FOR TEMPLATE
+"RTN","C0CCMT",35,0)
+ K @ZTEMP
+"RTN","C0CCMT",36,0)
+ N ZBLD
+"RTN","C0CCMT",37,0)
+ S ZBLD=$NA(^TMP("C0CCCR",$J,DFN,"NOTEBLD")) ; BUILD LIST AREA
+"RTN","C0CCMT",38,0)
+ D QUEUE^C0CXPATH(ZBLD,NOTEXML,1,1) ; FIRST LINE
+"RTN","C0CCMT",39,0)
+ N ZINNER
+"RTN","C0CCMT",40,0)
+ D QUERY^C0CXPATH(NOTEXML,"//Comments/Comment","ZINNER") ;ONE NOTE
+"RTN","C0CCMT",41,0)
+ N ZTMP,ZVAR,ZI
+"RTN","C0CCMT",42,0)
+ S ZI=""
+"RTN","C0CCMT",43,0)
+ F  S ZI=$O(@C0CNTE@(ZI)) Q:ZI=""  D  ;FOR EACH NOTE
+"RTN","C0CCMT",44,0)
+ . S ZTMP=$NA(@ZTEMP@(ZI)) ;THIS NOTE XML
+"RTN","C0CCMT",45,0)
+ . S ZVAR=$NA(@C0CNTE@(ZI)) ;THIS NOTE VARIABLES
+"RTN","C0CCMT",46,0)
+ . D MAP^C0CXPATH("ZINNER",ZVAR,ZTMP) ; MAP THE PROCEDURE
+"RTN","C0CCMT",47,0)
+ . N ZNOTE,ZN
+"RTN","C0CCMT",48,0)
+ . D CLEAN($NA(@C0CNTE@(ZI,"TEXT"))) ;REMOVE CONTROL CHARS AND XML RESERVED
+"RTN","C0CCMT",49,0)
+ . M ZNOTE=@C0CNTE@(ZI,"TEXT") ;THE NOTE TO ADD TO THE BUILD
+"RTN","C0CCMT",50,0)
+ . S ZNOTE(0)=$O(ZNOTE(""),-1) ;LENGTH OF THE NOTE
+"RTN","C0CCMT",51,0)
+ . D INSERT^C0CXPATH(ZTMP,"ZNOTE","//Comment/Description/Text")
+"RTN","C0CCMT",52,0)
+ . D QUEUE^C0CXPATH(ZBLD,ZTMP,1,@ZTMP@(0)) ;QUE FOR BUILD
+"RTN","C0CCMT",53,0)
+ D QUEUE^C0CXPATH(ZBLD,NOTEXML,@NOTEXML@(0),@NOTEXML@(0))
+"RTN","C0CCMT",54,0)
+ N ZZTMP
+"RTN","C0CCMT",55,0)
+ D BUILD^C0CXPATH(ZBLD,NOTEOUT) ;BUILD FINAL XML
+"RTN","C0CCMT",56,0)
+ K @ZTEMP,@ZBLD,@C0CNTE
+"RTN","C0CCMT",57,0)
+ Q
+"RTN","C0CCMT",58,0)
+ ;  
+"RTN","C0CCMT",59,0)
+CLEAN(INARY) ; INARY IS PASSED BY NAME
+"RTN","C0CCMT",60,0)
+ ; REMOVE CONTROL CHARACTERS AND XML RESERVED SYMBOLS FROM THE ARRAY
+"RTN","C0CCMT",61,0)
+ N ZI,ZJ S ZI=""
+"RTN","C0CCMT",62,0)
+ F  S ZI=$O(@INARY@(ZI)) Q:ZI=""  D  ;
+"RTN","C0CCMT",63,0)
+ . S @INARY@(ZI)=$$CLEAN^C0CXPATH(@INARY@(ZI)) ; CONTROL CHARS
+"RTN","C0CCMT",64,0)
+ . S @INARY@(ZI)=$$SYMENC^MXMLUTL(@INARY@(ZI)) ; XML RESERVED SYMBOLS
+"RTN","C0CCMT",65,0)
+ Q
+"RTN","C0CCMT",66,0)
+ ;
+"RTN","C0CCPT")
+0^68^B16531537
+"RTN","C0CCPT",1,0)
+C0CCPT ;;BSL;RETURN CPT DATA;
+"RTN","C0CCPT",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CCPT",3,0)
+ ;Sequence Managers Software GPL;;;;;Build 2
+"RTN","C0CCPT",4,0)
+ ;Copied into C0C namespace from SQMCPT with permission from
+"RTN","C0CCPT",5,0)
+ ;Brian Lord - and with our thanks. gpl 01/20/2010
+"RTN","C0CCPT",6,0)
+ENTRY(DFN,STDT,ENDDT,TXT) ;BUILD TOTAL ARRAY OF ALL IEN'S FOR TIU NOTES
+"RTN","C0CCPT",7,0)
+ ;DFN=PATIENT IEN
+"RTN","C0CCPT",8,0)
+ ;STDT=START DATE IN 3100101 FORMAT (VA YEAR YYYMMDD)
+"RTN","C0CCPT",9,0)
+ ;ENDDT=END DATE IN 3100101 FORMAT
+"RTN","C0CCPT",10,0)
+ ;TXT=INCLUDE TEXT FROM ENCOUNTER NOTE
+"RTN","C0CCPT",11,0)
+ ;THAT FALL INSIDE DATA RANGE. IF NO STDT OR ENDDT ASSUME 
+"RTN","C0CCPT",12,0)
+        ;ALL INCLUSIVE IN THAT DIRECTION
+"RTN","C0CCPT",13,0)
+        ;LIST OF TIU DOCS IN ^TIU(8925,"ACLPT",3,DFN)
+"RTN","C0CCPT",14,0)
+        ;BUILD INTO NOTE(Y)=""
+"RTN","C0CCPT",15,0)
+        S U="^",X=""
+"RTN","C0CCPT",16,0)
+        F  S X=$O(^TIU(8925,"ACLPT",3,DFN,X)) Q:X=""  D
+"RTN","C0CCPT",17,0)
+        . S Y=""
+"RTN","C0CCPT",18,0)
+        . F  S Y=$O(^TIU(8925,"ACLPT",3,DFN,X,Y)) Q:Y=""  D
+"RTN","C0CCPT",19,0)
+        .. S NOTE(Y)=""
+"RTN","C0CCPT",20,0)
+        ;NOW DELETE ANY NOTES THAT DON'T FALL INTO DATE RANGE
+"RTN","C0CCPT",21,0)
+        ;GET DATE OF NOTE
+"RTN","C0CCPT",22,0)
+ ;RUT 3120109 Changing DATE in FILMAN's FORMAT
+"RTN","C0CCPT",23,0)
+ ;;OHUM/RUT 3111228 Date Range for Notes
+"RTN","C0CCPT",24,0)
+        ;S STDT=^TMP("C0CCCR","TIULIMIT") D NOW^%DTC S ENDDT=X
+"RTN","C0CCPT",25,0)
+ N FLAGS1,FLAGS2
+"RTN","C0CCPT",26,0)
+ S FLAGS1=$P(^C0CPARM(1,2),"^",1) S STDT=$$HTOF^C0CVALID(FLAGS1)
+"RTN","C0CCPT",27,0)
+ S FLAGS2=$P(^C0CPARM(1,2),"^",2) S ENDDT=$$HTOF^C0CVALID(FLAGS2)
+"RTN","C0CCPT",28,0)
+ ;S STDT=^TMP("C0CCCR","TIULIMIT"),ENDDT=^TMP("C0CCCR","TIUSTART")
+"RTN","C0CCPT",29,0)
+        ;;OHUM/RUT
+"RTN","C0CCPT",30,0)
+ ;RUT
+"RTN","C0CCPT",31,0)
+        S Z=""
+"RTN","C0CCPT",32,0)
+        F  S Z=$O(NOTE(Z)) Q:Z=""  D
+"RTN","C0CCPT",33,0)
+        . S DT=$P(^TIU(8925,Z,0),U,7)
+"RTN","C0CCPT",34,0)
+        . I $G(STDT)]"" D
+"RTN","C0CCPT",35,0)
+        .. I STDT>DT S NOTE(Z)="D"  ;SET NOTE TO BE DELETED
+"RTN","C0CCPT",36,0)
+        . I $G(ENDDT)]"" D
+"RTN","C0CCPT",37,0)
+        .. I ENDDT<DT S NOTE(Z)="D"
+"RTN","C0CCPT",38,0)
+        . I NOTE(Z)="D" K NOTE(Z)
+"RTN","C0CCPT",39,0)
+ D VISIT
+"RTN","C0CCPT",40,0)
+        Q
+"RTN","C0CCPT",41,0)
+VISIT   ;GET VISIT INFO FOR A GIVEN NOTE. BUILD INTO RETURN ARRAY .VISIT
+"RTN","C0CCPT",42,0)
+ S ILST=1,X0="",X12="",VISIT="",LST="",X811=""
+"RTN","C0CCPT",43,0)
+ S IEN=""  F  S IEN=$O(NOTE(IEN)) Q:IEN=""  D
+"RTN","C0CCPT",44,0)
+ . S X0=^TIU(8925,IEN,0),X12=$G(^(12))
+"RTN","C0CCPT",45,0)
+ . S VISIT=$P(X12,U,7)
+"RTN","C0CCPT",46,0)
+ . I 'VISIT S VISIT=$P(X0,U,3)
+"RTN","C0CCPT",47,0)
+ . K ^TMP("PXKENC",$J)
+"RTN","C0CCPT",48,0)
+ . Q:VISIT=""!(VISIT'>0)
+"RTN","C0CCPT",49,0)
+ . D ENCEVENT^PXKENC(VISIT,1)
+"RTN","C0CCPT",50,0)
+ . I '$D(^TMP("PXKENC",$J,VISIT,"VST",VISIT,0)) Q
+"RTN","C0CCPT",51,0)
+ . S IPRV=0 F  S IPRV=$O(^TMP("PXKENC",$J,VISIT,"PRV",IPRV)) Q:'IPRV  D
+"RTN","C0CCPT",52,0)
+ .. S X0=^TMP("PXKENC",$J,VISIT,"PRV",IPRV,0)
+"RTN","C0CCPT",53,0)
+ .. ;Q:$P(X0,U,4)'="P"
+"RTN","C0CCPT",54,0)
+ .. S CODE=$P(X0,U),NARR=$P($G(^VA(200,CODE,0)),U)
+"RTN","C0CCPT",55,0)
+ .. S PRIM=($P(X0,U,4)="P")
+"RTN","C0CCPT",56,0)
+ .. S ILST=ILST+1
+"RTN","C0CCPT",57,0)
+ .. S LST(ILST)="PRV"_U_CODE_"^^^"_NARR_"^"_PRIM
+"RTN","C0CCPT",58,0)
+ .. S VISIT(IEN,"PRV",ILST)=CODE_"^^^"_NARR_"^"_PRIM
+"RTN","C0CCPT",59,0)
+ . S IPOV=0 F  S IPOV=$O(^TMP("PXKENC",$J,VISIT,"POV",IPOV)) Q:'IPOV  D
+"RTN","C0CCPT",60,0)
+ .. S X0=^TMP("PXKENC",$J,VISIT,"POV",IPOV,0),X802=$G(^(802)),X811=$G(^(811))
+"RTN","C0CCPT",61,0)
+ .. S CODE=$P(X0,U)
+"RTN","C0CCPT",62,0)
+ .. S:CODE CODE=$P(^ICD9(CODE,0),U)
+"RTN","C0CCPT",63,0)
+ .. S CAT=$P(X802,U)
+"RTN","C0CCPT",64,0)
+ .. S:CAT CAT=$P(^AUTNPOV(CAT,0),U)
+"RTN","C0CCPT",65,0)
+ .. S NARR=$P(X0,U,4)
+"RTN","C0CCPT",66,0)
+ .. S:NARR NARR=$P(^AUTNPOV(NARR,0),U)
+"RTN","C0CCPT",67,0)
+ .. S PRIM=($P(X0,U,12)="P")
+"RTN","C0CCPT",68,0)
+ .. S PRV=$P(X12,U,4)
+"RTN","C0CCPT",69,0)
+ .. S ILST=ILST+1
+"RTN","C0CCPT",70,0)
+ .. S LST(ILST)="POV"_U_CODE_U_CAT_U_NARR_U_PRIM_U_PRV
+"RTN","C0CCPT",71,0)
+ .. S VISIT(IEN,"POV",ILST)=CODE_U_CAT_U_NARR_U_PRIM_U_PRV
+"RTN","C0CCPT",72,0)
+ . S ICPT=0 F  S ICPT=$O(^TMP("PXKENC",$J,VISIT,"CPT",ICPT)) Q:'ICPT  D
+"RTN","C0CCPT",73,0)
+ .. S X0=^TMP("PXKENC",$J,VISIT,"CPT",ICPT,0),X802=$G(^(802)),X12=$G(^(12)),X811=$G(^(811))
+"RTN","C0CCPT",74,0)
+ .. ;S CODE=$P(X0,U)
+"RTN","C0CCPT",75,0)
+ .. S CODE=$O(^ICPT("B",$P(X0,U),0))
+"RTN","C0CCPT",76,0)
+ .. S:CODE CODE=$P(^ICPT(CODE,0),U)
+"RTN","C0CCPT",77,0)
+ .. S CAT=$P(X802,U)
+"RTN","C0CCPT",78,0)
+ .. S:CAT CAT=$P(^AUTNPOV(CAT,0),U)
+"RTN","C0CCPT",79,0)
+ .. S NARR=$P(X0,U,4)
+"RTN","C0CCPT",80,0)
+ .. S:NARR NARR=$P(^AUTNPOV(NARR,0),U)
+"RTN","C0CCPT",81,0)
+ .. S QTY=$P(X0,U,16)
+"RTN","C0CCPT",82,0)
+ .. S PRV=$P(X12,U,4)
+"RTN","C0CCPT",83,0)
+ .. S MCNT=0,MIDX=0,MODS=""
+"RTN","C0CCPT",84,0)
+ .. F  S MIDX=$O(^TMP("PXKENC",$J,VISIT,"CPT",ICPT,1,MIDX)) Q:'MIDX  D
+"RTN","C0CCPT",85,0)
+ ... S MIEN=$G(^TMP("PXKENC",$J,VISIT,"CPT",ICPT,1,MIDX,0))
+"RTN","C0CCPT",86,0)
+ ... I +MIEN S MCNT=MCNT+1,MODS=MODS_";/"_MIEN
+"RTN","C0CCPT",87,0)
+ .. I +MCNT S MODS=MCNT_MODS
+"RTN","C0CCPT",88,0)
+ .. S ILST=ILST+1
+"RTN","C0CCPT",89,0)
+ .. S LST(ILST)="CPT"_U_CODE_U_CAT_U_NARR_U_QTY_U_PRV_U_U_U_MODS
+"RTN","C0CCPT",90,0)
+ .. S VISIT(IEN,"CPT",ILST)=CODE_U_CAT_U_NARR_U_QTY_U_PRV_U_U_U_MODS
+"RTN","C0CCPT",91,0)
+ . S VISIT(IEN,"DATE",0)=$P($P(^TIU(8925,IEN,0),U,7),".")
+"RTN","C0CCPT",92,0)
+ . S VISIT(IEN,"CLASS")=$$GET1^DIQ(8925,IEN_",",.04) ;GPL 5/21/10
+"RTN","C0CCPT",93,0)
+ . I $G(TXT)=1 D GETNOTE(IEN)
+"RTN","C0CCPT",94,0)
+ Q
+"RTN","C0CCPT",95,0)
+GETNOTE(IEN) ;GET THE TEXT THAT GOES WITH VISIT
+"RTN","C0CCPT",96,0)
+ ;EXTRACT NOTE TEXT FROM ^TIU(8925,IEN,"TEXT"
+"RTN","C0CCPT",97,0)
+ Q:'$D(VISIT(IEN,"CPT"))
+"RTN","C0CCPT",98,0)
+ S TXTCNT=0
+"RTN","C0CCPT",99,0)
+ F  S TXTCNT=TXTCNT+1 Q:'$D(^TIU(8925,IEN,"TEXT",TXTCNT,0))  D
+"RTN","C0CCPT",100,0)
+ . S VISIT(IEN,"TEXT",TXTCNT)=^TIU(8925,IEN,"TEXT",TXTCNT,0)
+"RTN","C0CCPT",101,0)
+ Q
+"RTN","C0CDIC")
+0^73^B43527636
+"RTN","C0CDIC",1,0)
+C0CDIC   ; CCDCCR/GPL - CCR Dictionary utilities; 6/1/08
+"RTN","C0CDIC",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CDIC",3,0)
+ ;Copyright 2008 WorldVistA.  Licensed under the terms of the GNU
+"RTN","C0CDIC",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CDIC",5,0)
+ ;
+"RTN","C0CDIC",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CDIC",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CDIC",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CDIC",9,0)
+ ;(at your option) any later version.
+"RTN","C0CDIC",10,0)
+ ;
+"RTN","C0CDIC",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CDIC",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CDIC",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CDIC",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CDIC",15,0)
+ ;
+"RTN","C0CDIC",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CDIC",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CDIC",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CDIC",19,0)
+ ;
+"RTN","C0CDIC",20,0)
+ W "This is the CCR Dictionary Utility Library ",!
+"RTN","C0CDIC",21,0)
+ W !
+"RTN","C0CDIC",22,0)
+ Q
+"RTN","C0CDIC",23,0)
+ ;
+"RTN","C0CDIC",24,0)
+DIC2CSV ;OUTPUT THE CCR DICTIONARY TO A CSV FILE
+"RTN","C0CDIC",25,0)
+ ;
+"RTN","C0CDIC",26,0)
+ N ZI
+"RTN","C0CDIC",27,0)
+ S ZI=""
+"RTN","C0CDIC",28,0)
+ S G1=$NA(^TMP($J,"C0CCSV",1))
+"RTN","C0CDIC",29,0)
+ S G1A=$NA(@G1@("V"))
+"RTN","C0CDIC",30,0)
+ S G2=$NA(^TMP($J,"C0CCSV",2))
+"RTN","C0CDIC",31,0)
+ D GETN2^C0CRNF(G1,170) ; GET THE MATRIX
+"RTN","C0CDIC",32,0)
+ F  S ZI=$O(@G1A@(ZI)) Q:ZI=""  D  ;FOR EACH ROW IN THE MATRIX
+"RTN","C0CDIC",33,0)
+ . I $G(@G1A@(ZI,"MAPPING METHOD",1))'="" D  ;
+"RTN","C0CDIC",34,0)
+ . . W @G1A@(ZI,"MAPPING METHOD",1),!
+"RTN","C0CDIC",35,0)
+ . . ;K @G1A@(ZI,"MAPPING METHOD")
+"RTN","C0CDIC",36,0)
+ . ;W !,ZI,$G(@G1A@(ZI,"MAPPING METHOD",1))
+"RTN","C0CDIC",37,0)
+ D RNF2CSV^C0CRNF(G2,G1,"VN") ; PREPARE THE CVS FILE
+"RTN","C0CDIC",38,0)
+ K @G1
+"RTN","C0CDIC",39,0)
+ D FILEOUT^C0CRNF(G2,"FILE_"_170_".csv")
+"RTN","C0CDIC",40,0)
+ K @G2
+"RTN","C0CDIC",41,0)
+ Q
+"RTN","C0CDIC",42,0)
+ ;
+"RTN","C0CDIC",43,0)
+GVARS(C0CVARS,C0CT) ; Get the CCR variables from the CCR template
+"RTN","C0CDIC",44,0)
+ ; and return them in C0CVARS, which is passed by name
+"RTN","C0CDIC",45,0)
+ ; FIRST PIECE OF C0CVARS(x) IS THE VARIABLE NAME, SECOND PIECE
+"RTN","C0CDIC",46,0)
+ ; IS THE LINE NUMBER OF THE VARIABLE IN THE TEMPLATE
+"RTN","C0CDIC",47,0)
+ ; C0CT IS RETURNED AS THE CCR TEMPLATE
+"RTN","C0CDIC",48,0)
+ N C0CTVARS ; ARRAY FOR THE TEMPLATE AND ARRAY FOR THE VARS
+"RTN","C0CDIC",49,0)
+ D LOAD^GPLCCR0(C0CT) ; LOAD THE CCR TEMPLATE
+"RTN","C0CDIC",50,0)
+ D XVARS^GPLXPATH("C0CTVARS",C0CT) ; PULL OUT THE VARS
+"RTN","C0CDIC",51,0)
+ N C0CI,C0CX
+"RTN","C0CDIC",52,0)
+ S @C0CVARS@(0)=C0CTVARS(0) ; SAME COUNT
+"RTN","C0CDIC",53,0)
+ F C0CI=1:1:C0CTVARS(0) D  ; FOR EVERY LINE IN THE ARRAY
+"RTN","C0CDIC",54,0)
+ . S C0CX=C0CTVARS(C0CI) ; THE VARIABLE - 3 PIECES, FIRST ONE NULL
+"RTN","C0CDIC",55,0)
+ . S @C0CVARS@(C0CI)=$P(C0CX,"^",2)_"^"_$P(C0CX,"^",3) ; VAR NAME^LINE NUMBER
+"RTN","C0CDIC",56,0)
+ ;D PARY^GPLXPATH("C0CVARS")
+"RTN","C0CDIC",57,0)
+ Q
+"RTN","C0CDIC",58,0)
+ ;
+"RTN","C0CDIC",59,0)
+GXPATH(C0CPVARS,C0CPT) ; LOAD THE CCR TEMPLATE INTO C0CPT, PULL OUT VARIABLES
+"RTN","C0CDIC",60,0)
+ ; AND THE XPATH TO THE VARIABLES INTO C0CPVARS
+"RTN","C0CDIC",61,0)
+ ; BY INDEXING THE TEMPLATE C0CT AND MATCHING THE XPATH TO THE VARIABLE
+"RTN","C0CDIC",62,0)
+ ; BOTH ARE PASSED BY NAME
+"RTN","C0CDIC",63,0)
+ ; C0CPVARS(x) IS VAR^LINENUM^XPATH SORTED BY LINENUM
+"RTN","C0CDIC",64,0)
+ ; C0CPVARS(0) IS NUMBER OF VARIABLES
+"RTN","C0CDIC",65,0)
+ ; C0CPT(0) IS NUMBER OF LINES IN THE TEMPLATE
+"RTN","C0CDIC",66,0)
+ D GVARS(C0CPVARS,C0CPT) ; GET THE VARIABLES AND LINE NUMBERS
+"RTN","C0CDIC",67,0)
+ ;N C0CTVARS ; HASH TABLE FOR VARIABLE BY LINE NUMBER
+"RTN","C0CDIC",68,0)
+ D HASHV ; PUT THE VARIABLES IN A LINE NUMBER HASH FOR MATCHING TO XPATHS
+"RTN","C0CDIC",69,0)
+ ; NOW GO GET THE XPATH INDEXES
+"RTN","C0CDIC",70,0)
+ D INDEX^GPLXPATH(C0CPT) ; ADD THE XPATH INDEXES TO THE TEMPLATE ARRAY
+"RTN","C0CDIC",71,0)
+ S C0CI="" ; GOING TO LOOP THROUGH THE WHOLE ARRAY LOOKING AT XPATHS
+"RTN","C0CDIC",72,0)
+ F  S C0CI=$O(@C0CPT@(C0CI)) Q:C0CI=""  D  ; VISIT EVERY LINE
+"RTN","C0CDIC",73,0)
+ . I +C0CI'=0 Q  ; SKIP EVERYTHING BUT THE XPATH INDEX
+"RTN","C0CDIC",74,0)
+ . I C0CI=0 Q  ; SKIP THE ZERO NODE
+"RTN","C0CDIC",75,0)
+ . S C0CX=@C0CPT@(C0CI) ; PULL OUT THE LINE NUMBERS X^Y
+"RTN","C0CDIC",76,0)
+ . S C0CY=$P(C0CX,"^",1) ; STARTING LINE NUMBER
+"RTN","C0CDIC",77,0)
+ . S C0CZ=$P(C0CX,"^",2) ; ENDING LINE NUMBER
+"RTN","C0CDIC",78,0)
+ . I C0CY=C0CZ D  ; THIS IS AN XPATH END NODE, HAS A VARIABLE (WE HOPE)
+"RTN","C0CDIC",79,0)
+ . . ; W "FOUND ",C0CI,!
+"RTN","C0CDIC",80,0)
+ . . I $D(C0CTVARS(C0CY)) D  ; IF THERE IS A VARIABLE THERE
+"RTN","C0CDIC",81,0)
+ . . . S $P(C0CTVARS(C0CY),"^",3)=C0CI ; INSERT THE XPATH FOR THE VAR
+"RTN","C0CDIC",82,0)
+ D SORTV ; SORT THE ARRAY BY LINE NUMBER
+"RTN","C0CDIC",83,0)
+ Q
+"RTN","C0CDIC",84,0)
+ ;
+"RTN","C0CDIC",85,0)
+HASHV ; INTERNAL ROUTINE TO PUT VARIABLE NAMES IN A LINE NUMBER HASH
+"RTN","C0CDIC",86,0)
+ ;N C0CI,C0CTVARS,C0CX,C0CY
+"RTN","C0CDIC",87,0)
+ F C0CI=1:1:@C0CPVARS@(0) D  ; FOR THE ENTIRE ARRAY
+"RTN","C0CDIC",88,0)
+ . S C0CX=$P(@C0CPVARS@(C0CI),"^",2) ; LINE NUMBER
+"RTN","C0CDIC",89,0)
+ . S C0CY=$P(@C0CPVARS@(C0CI),"^",1) ; VARIABLE NAME
+"RTN","C0CDIC",90,0)
+ . S C0CTVARS(C0CX)=C0CY ; BUILD HASH OF VARIABLES BY LINE NUMBER
+"RTN","C0CDIC",91,0)
+ Q
+"RTN","C0CDIC",92,0)
+ ;
+"RTN","C0CDIC",93,0)
+SORTV ; INTERNAL ROUTINE TO OUTPUT VARIABLES (AND XPATHS) IN LINE NUMBER ORDER
+"RTN","C0CDIC",94,0)
+ ;N C0CV2 ; SCRACTH SPACE FOR BUILDING SORTED ARRAY
+"RTN","C0CDIC",95,0)
+ S C0CI="" ;
+"RTN","C0CDIC",96,0)
+ F  S C0CI=$O(C0CTVARS(C0CI)) Q:C0CI=""  D  ; BY LINE NUMBER
+"RTN","C0CDIC",97,0)
+ . S C0CX=C0CTVARS(C0CI) ;VARIABLE NAME
+"RTN","C0CDIC",98,0)
+ . S $P(C0CX,"^",2)=C0CI ; LINE NUMBER IS SECOND PIECE
+"RTN","C0CDIC",99,0)
+ . D PUSH^GPLXPATH("C0C2",C0CX) ; PUT ONTO ARRAY
+"RTN","C0CDIC",100,0)
+ K @C0CPVARS
+"RTN","C0CDIC",101,0)
+ M @C0CPVARS=C0C2
+"RTN","C0CDIC",102,0)
+ Q
+"RTN","C0CDIC",103,0)
+ ;
+"RTN","C0CDIC",104,0)
+LOAD ; LOAD VARIABLE NAMES AND XPATH IN ^C0CDIC(170
+"RTN","C0CDIC",105,0)
+ ; INITIAL LOAD OF THE CCR DICTIONARY
+"RTN","C0CDIC",106,0)
+ ;
+"RTN","C0CDIC",107,0)
+ N C0CDIC,C0CARY,C0CXML,C0CFDA,C0CI
+"RTN","C0CDIC",108,0)
+ S C0CDIC="^C0CDIC(170," ; ROOT OF THE CCR DICTIONARY
+"RTN","C0CDIC",109,0)
+ D GXPATH("C0CARY","C0CXML") ; FETCH THE VARIABLES AND XPATH INTO C0CARY
+"RTN","C0CDIC",110,0)
+ ; C0CXML WILL CONTAIN THE TEMPLATE - NOT NEEDED FOR LOAD
+"RTN","C0CDIC",111,0)
+ D PARY^GPLXPATH("C0CARY") ;TEST
+"RTN","C0CDIC",112,0)
+ F C0CI=1:1:C0CARY(0) D  ; LOAD EACH VARIABLE
+"RTN","C0CDIC",113,0)
+ . S C0CFDA(170,"+"_C0CI_",",.01)=$P(C0CARY(C0CI),"^",1) ; VAR NAME
+"RTN","C0CDIC",114,0)
+ . S C0CFDA(170,"+"_C0CI_",",2)=$P(C0CARY(C0CI),"^",3) ; XPATH
+"RTN","C0CDIC",115,0)
+ . D UPDATE^DIE("","C0CFDA")
+"RTN","C0CDIC",116,0)
+ . I $D(^TMP("DIERR",$J)) U $P BREAK
+"RTN","C0CDIC",117,0)
+ . W "LOADING:",C0CI," ",C0CARY(C0CI),!
+"RTN","C0CDIC",118,0)
+ Q
+"RTN","C0CDIC",119,0)
+ ;
+"RTN","C0CDIC",120,0)
+INIT ; INITIALIZE CCR DICTIONARY BASED ON VARIABLE NAMES
+"RTN","C0CDIC",121,0)
+ ;
+"RTN","C0CDIC",122,0)
+ ; CHEAT SHEET FOR VARIABLE NAMES IN ^C0CDIC(170.xx,
+"RTN","C0CDIC",123,0)
+ ; THIS IS WHAT WILL BE IN C0CA FOR EACH DICTIONARY ENTRY
+"RTN","C0CDIC",124,0)
+ ;G1("CODING")="170^8"
+"RTN","C0CDIC",125,0)
+ ;G1("DATA ELEMENT")="170^7"
+"RTN","C0CDIC",126,0)
+ ;G1("DESCRIPTION")="170^3"
+"RTN","C0CDIC",127,0)
+ ;G1("ID")="170^1"
+"RTN","C0CDIC",128,0)
+ ;G1("M","170^8","CODING")="170.08^.01"
+"RTN","C0CDIC",129,0)
+ ;G1("MAPPING METHOD")="170.08^1"
+"RTN","C0CDIC",130,0)
+ ;G1("SECTION")="170^10"
+"RTN","C0CDIC",131,0)
+ ;G1("SOURCE")="170^4"
+"RTN","C0CDIC",132,0)
+ ;G1("STATUS")="170^9"
+"RTN","C0CDIC",133,0)
+ ;G1("TYPE")="170^6"
+"RTN","C0CDIC",134,0)
+ ;G1("VARIABLE")="170^.01"
+"RTN","C0CDIC",135,0)
+ ;G1("XPATH")="170^2"
+"RTN","C0CDIC",136,0)
+ ;
+"RTN","C0CDIC",137,0)
+ N C0CZA,C0CZX,C0CN,C0CSTAT
+"RTN","C0CDIC",138,0)
+ S C0CZX=0
+"RTN","C0CDIC",139,0)
+ S C0CSTAT=0 ; INIT STATUS SET FLAG
+"RTN","C0CDIC",140,0)
+ F  S C0CZX=$O(^C0CDIC(170,C0CZX)) Q:+C0CZX=0  D  ; FOR EACH DICT ENTRY
+"RTN","C0CDIC",141,0)
+ . ;W C0CZX,!
+"RTN","C0CDIC",142,0)
+ . K C0CA,C0CN ; CLEAR OUT THE LAST ONE
+"RTN","C0CDIC",143,0)
+ . D GETN1^C0CRNF("C0CA",170,C0CZX,"","ALL") ; GET VARIABLE HASH
+"RTN","C0CDIC",144,0)
+ . ;ZWR C0CA B ;
+"RTN","C0CDIC",145,0)
+ . S C0CN=$$ZVALUE("VARIABLE") ;NAME OF THE VARIABLE
+"RTN","C0CDIC",146,0)
+ . W "VARIABLE: ",C0CN,!
+"RTN","C0CDIC",147,0)
+ . I $E(C0CN,1,5)="ACTOR" D SETFDA("SECTION","ACTORS") ;
+"RTN","C0CDIC",148,0)
+ . I $E(C0CN,1,6)="SOCIAL" D  ;
+"RTN","C0CDIC",149,0)
+ . . D SETFDA("SECTION","SOC") ;
+"RTN","C0CDIC",150,0)
+ . . D SETFDA("STATUS","X") ;SOCIAL HISTORY NOT IMPLEMENTED
+"RTN","C0CDIC",151,0)
+ . . S C0CSTAT=1
+"RTN","C0CDIC",152,0)
+ . I $E(C0CN,1,6)="FAMILY" D  ;
+"RTN","C0CDIC",153,0)
+ . . D SETFDA("SECTION","FAM") ;
+"RTN","C0CDIC",154,0)
+ . . D SETFDA("STATUS","X") ;FAMILY HISTORY NOT IMPLEMENTED
+"RTN","C0CDIC",155,0)
+ . . S C0CSTAT=1
+"RTN","C0CDIC",156,0)
+ . ;D SETFDA("TYPE","") ;CORRECT FOR TYPE ERRORS
+"RTN","C0CDIC",157,0)
+ . I $E(C0CN,1,5)="ALERT" D SETFDA("SECTION","ALERTS")
+"RTN","C0CDIC",158,0)
+ . I $E(C0CN,1,5)="VITAL" D SETFDA("SECTION","VITALS")
+"RTN","C0CDIC",159,0)
+ . I $E(C0CN,1,7)="PROBLEM" D SETFDA("SECTION","PROBLEMS")
+"RTN","C0CDIC",160,0)
+ . I $E(C0CN,1,10)="RESULTTEST" D SETFDA("SECTION","TEST")
+"RTN","C0CDIC",161,0)
+ . E  I $E(C0CN,1,6)="RESULT" D SETFDA("SECTION","LABS")
+"RTN","C0CDIC",162,0)
+ . I C0CN["CODEVALUE" D SETFDA("TYPE","CD") ;CODES
+"RTN","C0CDIC",163,0)
+ . I C0CN["CODEVERSION" D SETFDA("TYPE","CV") ; CODE VERSION
+"RTN","C0CDIC",164,0)
+ . I C0CN["CODINGSYSTEM" D SETFDA("TYPE","CS") ;CODING SYSTEM
+"RTN","C0CDIC",165,0)
+ . I $$ZVALUE("STATUS")=""!'C0CSTAT D SETFDA("STATUS","N") ;BLANK STATUS TO N
+"RTN","C0CDIC",166,0)
+ . I $$ZVALUE("XPATH")["/Medication/Directions/" D  ; MEDS DIRECTIONS VAR
+"RTN","C0CDIC",167,0)
+ . . D SETFDA("SECTION","DIR") ; SPECIAL SECTION FOR DIRECTIONS
+"RTN","C0CDIC",168,0)
+ . E  I $$ZVALUE("XPATH")["/Medications/Medication/" D  ; ALL OTHER MEDS
+"RTN","C0CDIC",169,0)
+ . . D SETFDA("SECTION","MEDS") ; A MEDS VAR
+"RTN","C0CDIC",170,0)
+ . I $E(C0CN,($L(C0CN)-1),$L(C0CN))="ID" D SETFDA("TYPE","ID") ;CATCH THE IDS
+"RTN","C0CDIC",171,0)
+ . I C0CN["DATETIME" D SETFDA("TYPE","DT") ; DATE/TIME VARIABLE
+"RTN","C0CDIC",172,0)
+ . W "VARIABLE: ",C0CZX," ",C0CA("VARIABLE"),!
+"RTN","C0CDIC",173,0)
+ . ;ZWR C0CFDA
+"RTN","C0CDIC",174,0)
+ . I $D(C0CFDA) D  ; WE HAVE CHANGES ON THIS VARIABLE
+"RTN","C0CDIC",175,0)
+ . . ;ZWR C0CFDA
+"RTN","C0CDIC",176,0)
+ . . D UPDATE^DIE("","C0CFDA(C0CZX)")
+"RTN","C0CDIC",177,0)
+ . . I $D(^TMP("DIERR",$J)) U $P BREAK
+"RTN","C0CDIC",178,0)
+ . . D CLEAN^DILF ; CLEAN UP
+"RTN","C0CDIC",179,0)
+ . ;ZWR C0CFDA
+"RTN","C0CDIC",180,0)
+ Q
+"RTN","C0CDIC",181,0)
+ ;
+"RTN","C0CDIC",182,0)
+SETFDA(C0CSN,C0CSV) ; INTERNAL ROUTINE TO MAKE AN FDA ENTRY FOR FIELD C0CSN
+"RTN","C0CDIC",183,0)
+ ; TO SET TO VALUE C0CSV.
+"RTN","C0CDIC",184,0)
+ ; C0CFDA,C0CA,C0CZX ARE ASSUMED FROM THE CALLING ROUTINE
+"RTN","C0CDIC",185,0)
+ ; C0CSN,C0CSV ARE PASSED BY VALUE
+"RTN","C0CDIC",186,0)
+ ;
+"RTN","C0CDIC",187,0)
+ N C0CSI,C0CSJ
+"RTN","C0CDIC",188,0)
+ S C0CSI=$$ZFILE(C0CSN,"C0CA") ; FILE NUMBER
+"RTN","C0CDIC",189,0)
+ S C0CSJ=$$ZFIELD(C0CSN,"C0CA") ; FIELD NUMBER
+"RTN","C0CDIC",190,0)
+ S C0CFDA(C0CZX,C0CSI,C0CZX_",",C0CSJ)=C0CSV
+"RTN","C0CDIC",191,0)
+ Q
+"RTN","C0CDIC",192,0)
+ZFILE(ZFN,ZTAB) ; EXTRINSIC TO RETURN FILE NUMBER FOR FIELD NAME PASSED
+"RTN","C0CDIC",193,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 1 OF C0CA(ZFN)
+"RTN","C0CDIC",194,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CDIC",195,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CDIC",196,0)
+ Q $P(@ZTAB@(ZFN),"^",1)
+"RTN","C0CDIC",197,0)
+ZFIELD(ZFN,ZTAB) ;EXTRINSIC TO RETURN FIELD NUMBER FOR FIELD NAME PASSED
+"RTN","C0CDIC",198,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 2 OF C0CA(ZFN)
+"RTN","C0CDIC",199,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CDIC",200,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CDIC",201,0)
+ Q $P(@ZTAB@(ZFN),"^",2)
+"RTN","C0CDIC",202,0)
+ZVALUE(ZFN,ZTAB) ;EXTRINSIC TO RETURN VALUE FOR FIELD NAME PASSED
+"RTN","C0CDIC",203,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF C0CA(ZFN)
+"RTN","C0CDIC",204,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CDIC",205,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CDIC",206,0)
+ Q $P(@ZTAB@(ZFN),"^",3)
+"RTN","C0CDIC",207,0)
+ ;
+"RTN","C0CDOM")
+0^74^B86773980
+"RTN","C0CDOM",1,0)
+C0CDOM   ; GPL - DOM PROCESSING ROUTINES ;6/6/11  17:05
+"RTN","C0CDOM",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CDOM",3,0)
+ ;Copyright 2011 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CDOM",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CDOM",5,0)
+ ;
+"RTN","C0CDOM",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CDOM",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CDOM",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CDOM",9,0)
+ ;(at your option) any later version.
+"RTN","C0CDOM",10,0)
+ ;
+"RTN","C0CDOM",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CDOM",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CDOM",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CDOM",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CDOM",15,0)
+ ;
+"RTN","C0CDOM",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CDOM",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CDOM",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CDOM",19,0)
+ ;
+"RTN","C0CDOM",20,0)
+ Q
+"RTN","C0CDOM",21,0)
+ ;
+"RTN","C0CDOM",22,0)
+DOMO(ZOID,ZPATH,ZNARY,ZXIDX,ZXPARY,ZNUM,ZREDUX) ; RECURSIVE ROUTINE TO POPULATE
+"RTN","C0CDOM",23,0)
+ ; THE XPATH INDEX ZXIDX, PASSED BY NAME
+"RTN","C0CDOM",24,0)
+ ; THE XPATH ARRAY XPARY, PASSED BY NAME
+"RTN","C0CDOM",25,0)
+ ; ZOID IS THE STARTING OID
+"RTN","C0CDOM",26,0)
+ ; ZPATH IS THE STARTING XPATH, USUALLY "/"
+"RTN","C0CDOM",27,0)
+ ; ZNUM IS THE MULTIPLE NUMBER [x], USUALLY NULL WHEN ON THE TOP NODE
+"RTN","C0CDOM",28,0)
+ ; ZREDUX IS THE XPATH REDUCTION STRING, TAKEN OUT OF EACH XPATH IF PRESENT
+"RTN","C0CDOM",29,0)
+ I $G(ZREDUX)="" S ZREDUX=""
+"RTN","C0CDOM",30,0)
+ N NEWPATH,NARY ; NEWPATH IS AN XPATH NARY IS AN NHIN MUMPS ARRAY
+"RTN","C0CDOM",31,0)
+ N NEWNUM S NEWNUM=""
+"RTN","C0CDOM",32,0)
+ I $G(ZNUM)>0 S NEWNUM="["_ZNUM_"]"
+"RTN","C0CDOM",33,0)
+ S NEWPATH=ZPATH_"/"_$$TAG(ZOID)_NEWNUM ; CREATE THE XPATH FOR THIS NODE
+"RTN","C0CDOM",34,0)
+ I $G(ZREDUX)'="" D  ; REDUX PROVIDED?
+"RTN","C0CDOM",35,0)
+ . N GT S GT=$P(NEWPATH,ZREDUX,2)
+"RTN","C0CDOM",36,0)
+ . I GT'="" S NEWPATH=GT
+"RTN","C0CDOM",37,0)
+ S @ZXIDX@(NEWPATH)=ZOID ; ADD THE XPATH FOR THIS NODE TO THE XPATH INDEX
+"RTN","C0CDOM",38,0)
+ N GA D ATT("GA",ZOID) ; GET ATTRIBUTES FOR THIS NODE
+"RTN","C0CDOM",39,0)
+ I $D(GA) D  ; PROCESS THE ATTRIBUTES
+"RTN","C0CDOM",40,0)
+ . N ZI S ZI=""
+"RTN","C0CDOM",41,0)
+ . F  S ZI=$O(GA(ZI)) Q:ZI=""  D  ; FOR EACH ATTRIBUTE
+"RTN","C0CDOM",42,0)
+ . . N ZP S ZP=NEWPATH_"@"_ZI ; PATH FOR ATTRIBUTE
+"RTN","C0CDOM",43,0)
+ . . S @ZXPARY@(ZP)=GA(ZI) ; ADD THE ATTRIBUTE XPATH TO THE XP ARRAY
+"RTN","C0CDOM",44,0)
+ . . I GA(ZI)'="" D ADDNARY(ZP,GA(ZI)) ; ADD THE NHIN ARRAY VALUE
+"RTN","C0CDOM",45,0)
+ N GD D DATA("GD",ZOID) ; SEE IF THERE IS DATA FOR THIS NODE
+"RTN","C0CDOM",46,0)
+ I $D(GD(2)) D  ;
+"RTN","C0CDOM",47,0)
+ . M @ZXPARY@(NEWPATH)=GD ; IF MULITPLE DATA MERGE TO THE ARRAY
+"RTN","C0CDOM",48,0)
+ E  I $D(GD(1)) D  ;
+"RTN","C0CDOM",49,0)
+ . S @ZXPARY@(NEWPATH)=GD(1) ; IF SINGLE VALUE, ADD TO ARRAY
+"RTN","C0CDOM",50,0)
+ . I GD(1)'="" D ADDNARY(NEWPATH,GD(1)) ; ADD TO NHIN ARRAY
+"RTN","C0CDOM",51,0)
+ N ZFRST S ZFRST=$$FIRST(ZOID) ; SET FIRST CHILD
+"RTN","C0CDOM",52,0)
+ I ZFRST'=0 D  ; THERE IS A CHILD
+"RTN","C0CDOM",53,0)
+ . N ZNUM
+"RTN","C0CDOM",54,0)
+ . N ZMULT S ZMULT=$$ISMULT(ZFRST) ; IS FIRST CHILD A MULTIPLE
+"RTN","C0CDOM",55,0)
+ . D DOMO(ZFRST,NEWPATH,ZNARY,ZXIDX,ZXPARY,$S(ZMULT:1,1:""),ZREDUX) ; THE CHILD
+"RTN","C0CDOM",56,0)
+ N GNXT S GNXT=$$NXTSIB(ZOID)
+"RTN","C0CDOM",57,0)
+ I $$TAG(GNXT)'=$$TAG(ZOID) S ZNUM="" ; RESET COUNTING AFTER MULTIPLES
+"RTN","C0CDOM",58,0)
+ I GNXT'=0 D  ;
+"RTN","C0CDOM",59,0)
+ . N ZMULT S ZMULT=$$ISMULT(GNXT) ; IS THE SIBLING A MULTIPLE?
+"RTN","C0CDOM",60,0)
+ . I (ZNUM="")&(ZMULT) D  ; SIBLING IS FIRST OF MULTIPLES
+"RTN","C0CDOM",61,0)
+ . . N ZNUM S ZNUM=1 ;
+"RTN","C0CDOM",62,0)
+ . . D DOMO(GNXT,ZPATH,ZNARY,ZXIDX,ZXPARY,ZNUM,ZREDUX) ; DO NEXT SIB
+"RTN","C0CDOM",63,0)
+ . E  D DOMO(GNXT,ZPATH,ZNARY,ZXIDX,ZXPARY,$S(ZNUM>0:ZNUM+1,1:""),ZREDUX) ; SIB
+"RTN","C0CDOM",64,0)
+ Q
+"RTN","C0CDOM",65,0)
+ ;
+"RTN","C0CDOM",66,0)
+ADDNARY(ZXP,ZVALUE) ; ADD AN NHIN ARRAY VALUE TO ZNARY
+"RTN","C0CDOM",67,0)
+ ;
+"RTN","C0CDOM",68,0)
+ ; IF ZATT=1 THE ARRAY IS ADDED AS ATTRIBUTES
+"RTN","C0CDOM",69,0)
+ ;
+"RTN","C0CDOM",70,0)
+ N ZZI,ZZJ,ZZN
+"RTN","C0CDOM",71,0)
+ S ZZI=$P(ZXP,"/",1) ; FIRST PIECE OF XPATH ARRAY
+"RTN","C0CDOM",72,0)
+ I ZZI="" Q  ; DON'T ADD THIS ONE .. PROBABLY THE //results NODE
+"RTN","C0CDOM",73,0)
+ S ZZJ=$P(ZXP,ZZI_"/",2) ; REST OF XPATH ARRAY
+"RTN","C0CDOM",74,0)
+ S ZZJ=$TR(ZZJ,"/",".") ; REPLACE / WITH .
+"RTN","C0CDOM",75,0)
+ I ZZI'["]" D  ; A SINGLETON
+"RTN","C0CDOM",76,0)
+ . S ZZN=1
+"RTN","C0CDOM",77,0)
+ E  D  ; THERE IS AN [x] OCCURANCE
+"RTN","C0CDOM",78,0)
+ . S ZZN=$P($P(ZZI,"[",2),"]",1) ; PULL OUT THE OCCURANCE
+"RTN","C0CDOM",79,0)
+ . S ZZI=$P(ZZI,"[",1) ; TAKE OUT THE [X]
+"RTN","C0CDOM",80,0)
+ I ZZJ'="" D  ; TIME TO ADD THE VALUE
+"RTN","C0CDOM",81,0)
+ . S @ZNARY@(ZZI,ZZN,ZZJ)=ZVALUE
+"RTN","C0CDOM",82,0)
+ Q
+"RTN","C0CDOM",83,0)
+ ;
+"RTN","C0CDOM",84,0)
+PARSE(INXML,INDOC) ;CALL THE MXML PARSER ON INXML, PASSED BY NAME
+"RTN","C0CDOM",85,0)
+ ; INDOC IS PASSED AS THE DOCUMENT NAME - DON'T KNOW WHERE TO STORE THIS NOW
+"RTN","C0CDOM",86,0)
+ ; EXTRINSIC WHICH RETURNS THE DOCID ASSIGNED BY MXML
+"RTN","C0CDOM",87,0)
+ ;Q $$EN^MXMLDOM(INXML)
+"RTN","C0CDOM",88,0)
+ Q $$EN^MXMLDOM(INXML,"W")
+"RTN","C0CDOM",89,0)
+ ;
+"RTN","C0CDOM",90,0)
+ISMULT(ZOID) ; RETURN TRUE IF ZOID IS ONE OF A MULTIPLE
+"RTN","C0CDOM",91,0)
+ N ZN
+"RTN","C0CDOM",92,0)
+ ;I $$TAG(ZOID)["entry" B
+"RTN","C0CDOM",93,0)
+ S ZN=$$NXTSIB(ZOID)
+"RTN","C0CDOM",94,0)
+ I ZN'="" Q $$TAG(ZOID)=$$TAG(ZN) ; IF TAG IS THE SAME AS NEXT SIB TAG
+"RTN","C0CDOM",95,0)
+ Q 0
+"RTN","C0CDOM",96,0)
+ ;
+"RTN","C0CDOM",97,0)
+FIRST(ZOID) ;RETURNS THE OID OF THE FIRST CHILD OF ZOID
+"RTN","C0CDOM",98,0)
+ Q $$CHILD^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CDOM",99,0)
+ ;
+"RTN","C0CDOM",100,0)
+PARENT(ZOID) ;RETURNS THE OID OF THE PARENT OF ZOID
+"RTN","C0CDOM",101,0)
+ Q $$PARENT^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CDOM",102,0)
+ ;
+"RTN","C0CDOM",103,0)
+ATT(RTN,NODE) ;GET ATTRIBUTES FOR ZOID
+"RTN","C0CDOM",104,0)
+ S HANDLE=C0CDOCID
+"RTN","C0CDOM",105,0)
+ K @RTN
+"RTN","C0CDOM",106,0)
+ D GETTXT^MXMLDOM("A")
+"RTN","C0CDOM",107,0)
+ Q
+"RTN","C0CDOM",108,0)
+ ;
+"RTN","C0CDOM",109,0)
+TAG(ZOID) ; RETURNS THE XML TAG FOR THE NODE
+"RTN","C0CDOM",110,0)
+ ;I ZOID=149 B ;GPLTEST
+"RTN","C0CDOM",111,0)
+ N X,Y
+"RTN","C0CDOM",112,0)
+ S Y=""
+"RTN","C0CDOM",113,0)
+ S X=$G(C0CCBK("TAG")) ;IS THERE A CALLBACK FOR THIS ROUTINE
+"RTN","C0CDOM",114,0)
+ I X'="" X X ; EXECUTE THE CALLBACK, SHOULD SET Y
+"RTN","C0CDOM",115,0)
+ I Y="" S Y=$$NAME^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CDOM",116,0)
+ Q Y
+"RTN","C0CDOM",117,0)
+ ;
+"RTN","C0CDOM",118,0)
+NXTSIB(ZOID) ; RETURNS THE NEXT SIBLING
+"RTN","C0CDOM",119,0)
+ Q $$SIBLING^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CDOM",120,0)
+ ;
+"RTN","C0CDOM",121,0)
+DATA(ZT,ZOID) ; RETURNS DATA FOR THE NODE
+"RTN","C0CDOM",122,0)
+ ;N ZT,ZN S ZT=""
+"RTN","C0CDOM",123,0)
+ ;S C0CDOM=$NA(^TMP("MXMLDOM",$J,C0CDOCID))
+"RTN","C0CDOM",124,0)
+ ;Q $G(@C0CDOM@(ZOID,"T",1))
+"RTN","C0CDOM",125,0)
+ S ZN=$$TEXT^MXMLDOM(C0CDOCID,ZOID,ZT)
+"RTN","C0CDOM",126,0)
+ Q
+"RTN","C0CDOM",127,0)
+ ;
+"RTN","C0CDOM",128,0)
+OUTXML(ZRTN,INID,NO1ST) ; USES C0CMXMLB (MXMLBLD) TO OUTPUT XML FROM AN MXMLDOM
+"RTN","C0CDOM",129,0)
+ ;
+"RTN","C0CDOM",130,0)
+ S C0CDOCID=INID
+"RTN","C0CDOM",131,0)
+ I '$D(NO1ST) S NO1ST=0 ; DO NOT SURPRESS THE <?xml tag generation
+"RTN","C0CDOM",132,0)
+ D START^C0CMXMLB($$TAG(1),,"G",NO1ST)
+"RTN","C0CDOM",133,0)
+ D NDOUT($$FIRST(1))
+"RTN","C0CDOM",134,0)
+ D END^C0CMXMLB ;END THE DOCUMENT
+"RTN","C0CDOM",135,0)
+ M @ZRTN=^TMP("MXMLBLD",$J)
+"RTN","C0CDOM",136,0)
+ K ^TMP("MXMLBLD",$J)
+"RTN","C0CDOM",137,0)
+ Q
+"RTN","C0CDOM",138,0)
+ ;
+"RTN","C0CDOM",139,0)
+NDOUT(ZOID) ;CALLBACK ROUTINE - IT IS RECURSIVE
+"RTN","C0CDOM",140,0)
+ N ZI S ZI=$$FIRST(ZOID)
+"RTN","C0CDOM",141,0)
+ I ZI'=0 D  ; THERE IS A CHILD
+"RTN","C0CDOM",142,0)
+ . N ZATT D ATT("ZATT",ZOID) ; THESE ARE THE ATTRIBUTES MOVED TO ZATT
+"RTN","C0CDOM",143,0)
+ . D MULTI^C0CMXMLB("",$$TAG(ZOID),.ZATT,"NDOUT^C0CMXML(ZI)") ;HAVE CHILDREN
+"RTN","C0CDOM",144,0)
+ E  D  ; NO CHILD - IF NO CHILDREN, A NODE HAS DATA, IS AN ENDPOINT
+"RTN","C0CDOM",145,0)
+ . ;W "DOING",ZOID,!
+"RTN","C0CDOM",146,0)
+ . N ZD D DATA("ZD",ZOID) ;NODES WITHOUT CHILDREN HAVE DATA
+"RTN","C0CDOM",147,0)
+ . N ZATT D ATT("ZATT",ZOID) ;ATTRIBUTES
+"RTN","C0CDOM",148,0)
+ . D ITEM^C0CMXMLB("",$$TAG(ZOID),.ZATT,$G(ZD(1))) ;NO CHILDREN
+"RTN","C0CDOM",149,0)
+ I $$NXTSIB(ZOID)'=0 D  ; THERE IS A SIBLING
+"RTN","C0CDOM",150,0)
+ . D NDOUT($$NXTSIB(ZOID)) ;RECURSE FOR SIBLINGS
+"RTN","C0CDOM",151,0)
+ Q
+"RTN","C0CDOM",152,0)
+ ;
+"RTN","C0CDOM",153,0)
+WNHIN(ZDFN) ; WRITES THE XML OUTPUT OF GET^NHINV TO AN XML FILE
+"RTN","C0CDOM",154,0)
+ ;
+"RTN","C0CDOM",155,0)
+ N GN,GN2
+"RTN","C0CDOM",156,0)
+ D GET^NHINV(.GN,ZDFN) ; EXTRACT THE XML
+"RTN","C0CDOM",157,0)
+ S GN2=$NA(@GN@(1))
+"RTN","C0CDOM",158,0)
+ W $$OUTPUT^C0CXPATH(GN2,"nhin_"_ZDFN_".xml","/home/wvehr3-09/")
+"RTN","C0CDOM",159,0)
+ Q
+"RTN","C0CDOM",160,0)
+ ;
+"RTN","C0CDOM",161,0)
+NARY2XML(ZGOUT,ZGIN) ; CREATE XML FROM AN NHIN ARRAY
+"RTN","C0CDOM",162,0)
+ ; ZGOUT AND ZGIN ARE PASSED BY NAME
+"RTN","C0CDOM",163,0)
+ N C0CDOCID
+"RTN","C0CDOM",164,0)
+ W !,ZGOUT," ",ZGIN
+"RTN","C0CDOM",165,0)
+ S C0CDOCID=$$DOMI(ZGIN) ; PUT IT INTO THE DOM
+"RTN","C0CDOM",166,0)
+ D OUTXML(ZGOUT,C0CDOCID)
+"RTN","C0CDOM",167,0)
+ Q
+"RTN","C0CDOM",168,0)
+ ;
+"RTN","C0CDOM",169,0)
+ ; EXAMPLE OF NHIN ARRAY FORMAT - THIS IS AN OUTPUT OF DOMO ABOVE WHEN RUN
+"RTN","C0CDOM",170,0)
+ ; AGAINST THE OUTPUT OF THE GET^NHINV ROUTINE. (THIS IS NOT REAL PATIENT DATA)
+"RTN","C0CDOM",171,0)
+ ;
+"RTN","C0CDOM",172,0)
+ ;GNARY("med",1,"doses.dose@dose")=10
+"RTN","C0CDOM",173,0)
+ ;GNARY("med",1,"doses.dose@noun")="TABLET"
+"RTN","C0CDOM",174,0)
+ ;GNARY("med",1,"doses.dose@route")="PO"
+"RTN","C0CDOM",175,0)
+ ;GNARY("med",1,"doses.dose@schedule")="QD"
+"RTN","C0CDOM",176,0)
+ ;GNARY("med",1,"doses.dose@units")="MG"
+"RTN","C0CDOM",177,0)
+ ;GNARY("med",1,"doses.dose@unitsPerDose")=1
+"RTN","C0CDOM",178,0)
+ ;GNARY("med",1,"facility@code")=100
+"RTN","C0CDOM",179,0)
+ ;GNARY("med",1,"facility@name")="VOE OFFICE INSTITUTION"
+"RTN","C0CDOM",180,0)
+ ;GNARY("med",1,"form@value")="TAB"
+"RTN","C0CDOM",181,0)
+ ;GNARY("med",1,"id@value")="1N;O"
+"RTN","C0CDOM",182,0)
+ ;GNARY("med",1,"location@code")=5
+"RTN","C0CDOM",183,0)
+ ;GNARY("med",1,"location@name")="3 WEST"
+"RTN","C0CDOM",184,0)
+ ;GNARY("med",1,"name@value")="LISINOPRIL TAB"
+"RTN","C0CDOM",185,0)
+ ;GNARY("med",1,"orderID@value")=294
+"RTN","C0CDOM",186,0)
+ ;GNARY("med",1,"ordered@value")=3110531.001233
+"RTN","C0CDOM",187,0)
+ ;GNARY("med",1,"orderingProvider@code")=63
+"RTN","C0CDOM",188,0)
+ ;GNARY("med",1,"orderingProvider@name")="KING,MATTHEW MICHAEL"
+"RTN","C0CDOM",189,0)
+ ;GNARY("med",1,"products.product.class@code")="ACE INHIBITORS"
+"RTN","C0CDOM",190,0)
+ ;GNARY("med",1,"products.product.vaGeneric@code")=1990
+"RTN","C0CDOM",191,0)
+ ;GNARY("med",1,"products.product.vaGeneric@name")="LISINOPRIL"
+"RTN","C0CDOM",192,0)
+ ;GNARY("med",1,"products.product.vaGeneric@vuid")=4019380
+"RTN","C0CDOM",193,0)
+ ;GNARY("med",1,"products.product.vaProduct@code")=8118
+"RTN","C0CDOM",194,0)
+ ;GNARY("med",1,"products.product.vaProduct@name")="LISINOPRIL 10MG TAB"
+"RTN","C0CDOM",195,0)
+ ;GNARY("med",1,"products.product.vaProduct@vuid")=4008593
+"RTN","C0CDOM",196,0)
+ ;GNARY("med",1,"products.product@code")=6174
+"RTN","C0CDOM",197,0)
+ ;GNARY("med",1,"products.product@name")="LISINOPRIL 10MG U/D"
+"RTN","C0CDOM",198,0)
+ ;GNARY("med",1,"products.product@role")="D"
+"RTN","C0CDOM",199,0)
+ ;GNARY("med",1,"sig")="10MG BY MOUTH EVERY DAY"
+"RTN","C0CDOM",200,0)
+ ;GNARY("med",1,"sig@xml:space")="preserve"
+"RTN","C0CDOM",201,0)
+ ;GNARY("med",1,"status@value")="active"
+"RTN","C0CDOM",202,0)
+ ;GNARY("med",1,"type@value")="OTC"
+"RTN","C0CDOM",203,0)
+ ;GNARY("med",1,"vaType@value")="N"
+"RTN","C0CDOM",204,0)
+ ;
+"RTN","C0CDOM",205,0)
+ ; DOMI is an extrinsic to insert NHIN ARRAY FORMAT arrays into the DOM
+"RTN","C0CDOM",206,0)
+ ; it returns 0 or 1 based on success.
+"RTN","C0CDOM",207,0)
+ ;
+"RTN","C0CDOM",208,0)
+ ; INARY is passed by name and has the format shown above
+"RTN","C0CDOM",209,0)
+ ; HANDLE is the document number in the DOM (both MXML and EWD DOMs will
+"RTN","C0CDOM",210,0)
+ ; be supported eventually - initial implementation is for MXML
+"RTN","C0CDOM",211,0)
+ ;
+"RTN","C0CDOM",212,0)
+ ; PARENT is the node id or tag of the parent under which the DOM will
+"RTN","C0CDOM",213,0)
+ ; be populated. If it is numeric, it is a node. If it is a string, the DOM
+"RTN","C0CDOM",214,0)
+ ; will be searched to find the tag. If not found and there is no root,
+"RTN","C0CDOM",215,0)
+ ; it will be inserted as the root. If not found and there is a root, it
+"RTN","C0CDOM",216,0)
+ ; will be inserted under the root.
+"RTN","C0CDOM",217,0)
+ ;
+"RTN","C0CDOM",218,0)
+ ; For the above example the call would be OK=$$DOMI("GNARY",0,"results")
+"RTN","C0CDOM",219,0)
+ ; because "results" is the root tag. Use OUTXML to render the xml from
+"RTN","C0CDOM",220,0)
+ ; the DOM.
+"RTN","C0CDOM",221,0)
+ ;
+"RTN","C0CDOM",222,0)
+DOMI(INARY,HANDLE,PARENT) ; EXTRINSIC TO INSERT NHIN ARRAYS TO A DOM
+"RTN","C0CDOM",223,0)
+ ;
+"RTN","C0CDOM",224,0)
+ N ZPARNODE
+"RTN","C0CDOM",225,0)
+ S (SUCCESS,LEVEL,LEVEL(0),NODE)=0
+"RTN","C0CDOM",226,0)
+ I '$D(INARY) Q 0 ; NO ARRAY PASSED
+"RTN","C0CDOM",227,0)
+ I '$D(HANDLE) S HANDLE=$$NEWDOM() ; MAKE A NEW DOM
+"RTN","C0CDOM",228,0)
+ ;I PARENT="" S PARENT="root"
+"RTN","C0CDOM",229,0)
+ I +$G(PARENT)>0 S ZPARNODE=PARENT ; WE HAVE BEEN PASSED A PARENT NODE ID
+"RTN","C0CDOM",230,0)
+ E  I $L($G(PARENT))>0 D  ; TBD FIND THE PARENT IN THE DOM AND SET LEVEL
+"RTN","C0CDOM",231,0)
+ . D STARTELE^MXMLDOM(PARENT) ; INSERT THE PARENT NODE
+"RTN","C0CDOM",232,0)
+ . S ZPARNODE=1 ;
+"RTN","C0CDOM",233,0)
+ ; WE NOW HAVE A HANDLE AND A PARENT NODE AND LEVEL HAS BEEN SET
+"RTN","C0CDOM",234,0)
+ N ZEXARY
+"RTN","C0CDOM",235,0)
+ D EXPAND("ZEXARY",INARY) ; EXPAND THE NHIN ARRAY
+"RTN","C0CDOM",236,0)
+ D MAJOR("ZEXARY") ; PROCESS ALL THE NODES TO BE ADDED
+"RTN","C0CDOM",237,0)
+ I $L($G(PARENT))>0 D ENDELE^MXMLDOM(PARENT) ; CLOSE OUT THE PARENT NODE
+"RTN","C0CDOM",238,0)
+ Q HANDLE ; SUCCESS
+"RTN","C0CDOM",239,0)
+ ; 
+"RTN","C0CDOM",240,0)
+MAJOR(ZARY) ; RECURSIVE ROUTINE FOR INTERMEDIATE NODES
+"RTN","C0CDOM",241,0)
+ N ZI S ZI=""
+"RTN","C0CDOM",242,0)
+ N ZTAG
+"RTN","C0CDOM",243,0)
+ F  S ZI=$O(@ZARY@(ZI)) Q:ZI=""  D  ; FOR EACH SECTION
+"RTN","C0CDOM",244,0)
+ . N ZELEADD S ZELEADD=0
+"RTN","C0CDOM",245,0)
+ . I ZI["@" D  ; END NODE HAS NO VALUE, ONLY ATTRIBUTES
+"RTN","C0CDOM",246,0)
+ . . S ZTAG=$P(ZI,"@",1) ; PULL OUT THE TAG
+"RTN","C0CDOM",247,0)
+ . . K ZATT ; CLEAR OUT LAST ONE
+"RTN","C0CDOM",248,0)
+ . . M ZATT=@ZARY@(ZI,1) ; GET ATTRIBUTE ARRAY
+"RTN","C0CDOM",249,0)
+ . . D STARTELE^MXMLDOM(ZTAG,.ZATT) ; ADD THE NODE
+"RTN","C0CDOM",250,0)
+ . . S ZELEADD=1 ; FLAG TO NOT ADD THE ELEMENT TWICE
+"RTN","C0CDOM",251,0)
+ . I $O(@ZARY@(ZI,""))="" D  ;END NODE
+"RTN","C0CDOM",252,0)
+ . . S ZTAG=ZI ; USE ZI FOR THE TAG
+"RTN","C0CDOM",253,0)
+ . . I 'ZELEADD D STARTELE^MXMLDOM(ZTAG) ; ADD ELEMENT IF NOT THERE
+"RTN","C0CDOM",254,0)
+ . . S ZELEADD=1 ; ADDED AN ELEMENT
+"RTN","C0CDOM",255,0)
+ . . D CHAR^MXMLDOM($G(@ZARY@(ZI))) ; INSERT THE VALUE
+"RTN","C0CDOM",256,0)
+ . I ZELEADD D  Q  ; NO MORE TO DO ON THIS LEVEL
+"RTN","C0CDOM",257,0)
+ . . D ENDELE^MXMLDOM(ZTAG) ; CLOSE THE ELEMENT BEFORE LEAVING
+"RTN","C0CDOM",258,0)
+ . N NEWARY ; INDENTED ARRAY
+"RTN","C0CDOM",259,0)
+ . N ZN S ZN=0
+"RTN","C0CDOM",260,0)
+ . F  S ZN=$O(@ZARY@(ZI,ZN)) Q:ZN=""  D  ; FOR EACH MULTIPLE
+"RTN","C0CDOM",261,0)
+ . . D STARTELE^MXMLDOM(ZI) ; ADD THE INTERMEDIATE TAG
+"RTN","C0CDOM",262,0)
+ . . S NEWARY=$NA(@ZARY@(ZI,ZN)) ; INDENT THE ARRAY
+"RTN","C0CDOM",263,0)
+ . . D MAJOR(NEWARY) ; RECURSE FOR INDENTED ARRAY
+"RTN","C0CDOM",264,0)
+ . . D ENDELE^MXMLDOM(ZI) ; END THE INTERMEDIATE TAG
+"RTN","C0CDOM",265,0)
+ Q
+"RTN","C0CDOM",266,0)
+ ;
+"RTN","C0CDOM",267,0)
+EXPAND(ZZOUT,ZZIN) ; EXPANDS NHIN ARRAY FORMAT TO AN EXPANDED 
+"RTN","C0CDOM",268,0)
+ ; CONSISTENT FORMAT
+"RTN","C0CDOM",269,0)
+ ; GNARY("patient",1,"facilities[2].facility@code")="050"
+"RTN","C0CDOM",270,0)
+ ; becomes G2ARY("patient",1,"facilities",2,"facility@",1,"code")="050"
+"RTN","C0CDOM",271,0)
+ ; for easier processing (this is fileman format genius)
+"RTN","C0CDOM",272,0)
+ ; basically removes the dot notation from the strings
+"RTN","C0CDOM",273,0)
+ ;
+"RTN","C0CDOM",274,0)
+ N ZZI
+"RTN","C0CDOM",275,0)
+ S ZZI=""
+"RTN","C0CDOM",276,0)
+ F  S ZZI=$O(@ZZIN@(ZZI)) Q:ZZI=""  D  ;
+"RTN","C0CDOM",277,0)
+ . N ZZN S ZZN=0
+"RTN","C0CDOM",278,0)
+ . F  S ZZN=$O(@ZZIN@(ZZI,ZZN)) Q:ZZN=""  D  ;
+"RTN","C0CDOM",279,0)
+ . . N ZZS S ZZS=""
+"RTN","C0CDOM",280,0)
+ . . N GA ;PUSH STACK
+"RTN","C0CDOM",281,0)
+ . . F  S ZZS=$O(@ZZIN@(ZZI,ZZN,ZZS)) Q:ZZS=""  D  ;
+"RTN","C0CDOM",282,0)
+ . . . K GA ; NEW STACK
+"RTN","C0CDOM",283,0)
+ . . . D PUSH^C0CXPATH("GA",ZZI_"^"_ZZN) ; PUSH PARENT
+"RTN","C0CDOM",284,0)
+ . . . N ZZV ; PLACE TO STASH THE VALUE
+"RTN","C0CDOM",285,0)
+ . . . S ZZV=@ZZIN@(ZZI,ZZN,ZZS) ; VALUE
+"RTN","C0CDOM",286,0)
+ . . . W !,"VALUE:",ZZV
+"RTN","C0CDOM",287,0)
+ . . . N GK ; COUNTER
+"RTN","C0CDOM",288,0)
+ . . . F GK=1:1:$L(ZZS,".") D  ; FOR EACH INTERMEDIATE NODE
+"RTN","C0CDOM",289,0)
+ . . . . N ZZN2 S ZZN2=1 ; DEFAULT IF NO [X]
+"RTN","C0CDOM",290,0)
+ . . . . N GM S GM=$P(ZZS,".",GK) ; TAG
+"RTN","C0CDOM",291,0)
+ . . . . I GM["[" D  ; IT'S A MULTIPLE
+"RTN","C0CDOM",292,0)
+ . . . . . S ZZN2=$P($P(GM,"[",2),"]",1) ; PULL OUT THE NUMBER
+"RTN","C0CDOM",293,0)
+ . . . . . S GM=$P(GM,"[",1) ; PULL OUT THE TAG
+"RTN","C0CDOM",294,0)
+ . . . . I GM["@" D  ; IT'S GOT ATTRIBUTES
+"RTN","C0CDOM",295,0)
+ . . . . . N GM2 S GM2=$P(GM,"@",2) ; PULLOUT THE ATTRIBUTE NAME
+"RTN","C0CDOM",296,0)
+ . . . . . D PUSH^C0CXPATH("GA",$P(GM,"@",1)_"@"_"^"_ZZN2) ; PUSH THE TAG
+"RTN","C0CDOM",297,0)
+ . . . . . D PUSH^C0CXPATH("GA",GM2_"^"_ZZN2)
+"RTN","C0CDOM",298,0)
+ . . . . E  D PUSH^C0CXPATH("GA",GM_"^"_ZZN2) ;
+"RTN","C0CDOM",299,0)
+ . . . S GA(GA(0))=$P(GA(GA(0)),"^",1)_"^" ; GET RID OF THE LAST "1" 
+"RTN","C0CDOM",300,0)
+ . . . N GZI S GZI="" ; STRING FOR THE INDEX
+"RTN","C0CDOM",301,0)
+ . . . F GK=1:1:GA(0) D  ; TIME TO REVERSE POP THE TAGS
+"RTN","C0CDOM",302,0)
+ . . . . S GM=$P(GA(GK),"^",1) ; THE TAG
+"RTN","C0CDOM",303,0)
+ . . . . S ZZN2=$P(GA(GK),"^",2) ; THE NUMBER IF ANY
+"RTN","C0CDOM",304,0)
+ . . . . I ZZN2="" S GZI=GZI_""""_GM_"""" ; FOR THE LAST ONE
+"RTN","C0CDOM",305,0)
+ . . . . E  S GZI=GZI_""""_GM_""""_","_ZZN2_"," ; FOR THE REST
+"RTN","C0CDOM",306,0)
+ . . . S GZI2=ZZOUT_"("_GZI_")" ; INCLUDE THE ARRAY NAME
+"RTN","C0CDOM",307,0)
+ . . . W !,GZI
+"RTN","C0CDOM",308,0)
+ . . . S @GZI2=ZZV ; REMEMBER THE VALUE?
+"RTN","C0CDOM",309,0)
+ Q
+"RTN","C0CDOM",310,0)
+ ;
+"RTN","C0CDOM",311,0)
+NEWDOM() ; extrinsic which creates a new DOM and returns the HANDLE
+"RTN","C0CDOM",312,0)
+ N CBK,SUCCESS,LEVEL,NODE,HANDLE
+"RTN","C0CDOM",313,0)
+ K ^TMP("MXMLERR",$J)
+"RTN","C0CDOM",314,0)
+ L +^TMP("MXMLDOM",$J):5
+"RTN","C0CDOM",315,0)
+ E  Q 0
+"RTN","C0CDOM",316,0)
+ S HANDLE=$O(^TMP("MXMLDOM",$J,""),-1)+1,^(HANDLE)=""
+"RTN","C0CDOM",317,0)
+ L -^TMP("MXMLDOM",$J)
+"RTN","C0CDOM",318,0)
+ Q HANDLE
+"RTN","C0CDOM",319,0)
+ ;
+"RTN","C0CDPT")
+0^53^B45873061
+"RTN","C0CDPT",1,0)
+C0CDPT ;WV/CCRCCD/SMH - Routines to Extract Patient Data for CCDCCR; 6/15/08
+"RTN","C0CDPT",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CDPT",3,0)
+ ;
+"RTN","C0CDPT",4,0)
+ ; Copyright 2008 WorldVistA.  Licensed under the terms of the GNU
+"RTN","C0CDPT",5,0)
+ ; General Public License. 
+"RTN","C0CDPT",6,0)
+ ; 
+"RTN","C0CDPT",7,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CDPT",8,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CDPT",9,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CDPT",10,0)
+ ; GNU General Public License for more details.
+"RTN","C0CDPT",11,0)
+ ; 
+"RTN","C0CDPT",12,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CDPT",13,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CDPT",14,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CDPT",15,0)
+ ;
+"RTN","C0CDPT",16,0)
+ ; FAMILY       Family Name
+"RTN","C0CDPT",17,0)
+ ; GIVEN        Given Name
+"RTN","C0CDPT",18,0)
+ ; MIDDLE       Middle Name
+"RTN","C0CDPT",19,0)
+ ; SUFFIX       Suffix Name
+"RTN","C0CDPT",20,0)
+ ; DISPNAME     Display Name
+"RTN","C0CDPT",21,0)
+ ; DOB          Date of Birth
+"RTN","C0CDPT",22,0)
+ ; GENDER       Get Gender
+"RTN","C0CDPT",23,0)
+ ; SSN          Get SSN for ID
+"RTN","C0CDPT",24,0)
+ ; ADDRTYPE     Get Home Address
+"RTN","C0CDPT",25,0)
+ ; ADDR1        Get Home Address line 1
+"RTN","C0CDPT",26,0)
+ ; ADDR2        Get Home Address line 2
+"RTN","C0CDPT",27,0)
+ ; CITY         Get City for Home Address
+"RTN","C0CDPT",28,0)
+ ; STATE        Get State for Home Address
+"RTN","C0CDPT",29,0)
+ ; ZIP          Get Zip code for Home Address
+"RTN","C0CDPT",30,0)
+ ; COUNTY       Get County for our Address
+"RTN","C0CDPT",31,0)
+ ; COUNTRY      Get Country for our Address
+"RTN","C0CDPT",32,0)
+ ; RESTEL       Residential Telephone
+"RTN","C0CDPT",33,0)
+ ; WORKTEL      Work Telephone
+"RTN","C0CDPT",34,0)
+ ; EMAIL        Email Adddress
+"RTN","C0CDPT",35,0)
+ ; CELLTEL      Cell Phone
+"RTN","C0CDPT",36,0)
+ ; NOK1FAM      Next of Kin 1 (NOK1) Family Name
+"RTN","C0CDPT",37,0)
+ ; NOK1GIV      NOK1 Given Name
+"RTN","C0CDPT",38,0)
+ ; NOK1MID      NOK1 Middle Name
+"RTN","C0CDPT",39,0)
+ ; NOK1SUF      NOK1 Suffi Name
+"RTN","C0CDPT",40,0)
+ ; NOK1DISP     NOK1 Display Name
+"RTN","C0CDPT",41,0)
+ ; NOK1REL      NOK1 Relationship to the patient
+"RTN","C0CDPT",42,0)
+ ; NOK1ADD1     NOK1 Address 1
+"RTN","C0CDPT",43,0)
+ ; NOK1ADD2     NOK1 Address 2
+"RTN","C0CDPT",44,0)
+ ; NOK1CITY     NOK1 City
+"RTN","C0CDPT",45,0)
+ ; NOK1STAT     NOK1 State
+"RTN","C0CDPT",46,0)
+ ; NOK1ZIP      NOK1 Zip Code
+"RTN","C0CDPT",47,0)
+ ; NOK1HTEL     NOK1 Home Telephone
+"RTN","C0CDPT",48,0)
+ ; NOK1WTEL     NOK1 Work Telephone
+"RTN","C0CDPT",49,0)
+ ; NOK1SAME     Is NOK1's Address the same the patient?
+"RTN","C0CDPT",50,0)
+ ; NOK2FAM      NOK2 Family Name
+"RTN","C0CDPT",51,0)
+ ; NOK2GIV      NOK2 Given Name
+"RTN","C0CDPT",52,0)
+ ; NOK2MID      NOK2 Middle Name
+"RTN","C0CDPT",53,0)
+ ; NOK2SUF      NOK2 Suffi Name
+"RTN","C0CDPT",54,0)
+ ; NOK2DISP     NOK2 Display Name
+"RTN","C0CDPT",55,0)
+ ; NOK2REL      NOK2 Relationship to the patient
+"RTN","C0CDPT",56,0)
+ ; NOK2ADD1     NOK2 Address 1
+"RTN","C0CDPT",57,0)
+ ; NOK2ADD2     NOK2 Address 2
+"RTN","C0CDPT",58,0)
+ ; NOK2CITY     NOK2 City
+"RTN","C0CDPT",59,0)
+ ; NOK2STAT     NOK2 State
+"RTN","C0CDPT",60,0)
+ ; NOK2ZIP      NOK2 Zip Code
+"RTN","C0CDPT",61,0)
+ ; NOK2HTEL     NOK2 Home Telephone
+"RTN","C0CDPT",62,0)
+ ; NOK2WTEL     NOK2 Work Telephone
+"RTN","C0CDPT",63,0)
+ ; NOK2SAME     Is NOK2's Address the same the patient?
+"RTN","C0CDPT",64,0)
+ ; EMERFAM      Emergency Contact (EMER) Family Name
+"RTN","C0CDPT",65,0)
+ ; EMERGIV      EMER Given Name
+"RTN","C0CDPT",66,0)
+ ; EMERMID      EMER Middle Name
+"RTN","C0CDPT",67,0)
+ ; EMERSUF      EMER Suffi Name
+"RTN","C0CDPT",68,0)
+ ; EMERDISP     EMER Display Name
+"RTN","C0CDPT",69,0)
+ ; EMERREL      EMER Relationship to the patient
+"RTN","C0CDPT",70,0)
+ ; EMERADD1     EMER Address 1
+"RTN","C0CDPT",71,0)
+ ; EMERADD2     EMER Address 2
+"RTN","C0CDPT",72,0)
+ ; EMERCITY     EMER City
+"RTN","C0CDPT",73,0)
+ ; EMERSTAT     EMER State
+"RTN","C0CDPT",74,0)
+ ; EMERZIP      EMER Zip Code
+"RTN","C0CDPT",75,0)
+ ; EMERHTEL     EMER Home Telephone
+"RTN","C0CDPT",76,0)
+ ; EMERWTEL     EMER Work Telephone
+"RTN","C0CDPT",77,0)
+ ; EMERSAME     Is EMER's Address the same the NOK?
+"RTN","C0CDPT",78,0)
+ ;
+"RTN","C0CDPT",79,0)
+ W "No Entry at top!" Q
+"RTN","C0CDPT",80,0)
+ ;
+"RTN","C0CDPT",81,0)
+ ;**Revision History**
+"RTN","C0CDPT",82,0)
+ ; - June 15, 08: v0.1 using merged global
+"RTN","C0CDPT",83,0)
+ ; - Oct 3, 08: v0.2 using fileman calls, many formatting changes.
+"RTN","C0CDPT",84,0)
+ ;
+"RTN","C0CDPT",85,0)
+ ; All methods are Public and Extrinsic
+"RTN","C0CDPT",86,0)
+ ; All calls use Fileman file 2 (Patient).
+"RTN","C0CDPT",87,0)
+ ; You can obtain field numbers using the data dictionary
+"RTN","C0CDPT",88,0)
+ ;
+"RTN","C0CDPT",89,0)
+FAMILY(DFN) ; Family Name
+"RTN","C0CDPT",90,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.01)
+"RTN","C0CDPT",91,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",92,0)
+ Q NAME("FAMILY")
+"RTN","C0CDPT",93,0)
+GIVEN(DFN) ; Given Name
+"RTN","C0CDPT",94,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.01)
+"RTN","C0CDPT",95,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",96,0)
+ Q NAME("GIVEN")
+"RTN","C0CDPT",97,0)
+MIDDLE(DFN) ; Middle Name
+"RTN","C0CDPT",98,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.01)
+"RTN","C0CDPT",99,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",100,0)
+ Q NAME("MIDDLE")
+"RTN","C0CDPT",101,0)
+SUFFIX(DFN) ; Suffi Name
+"RTN","C0CDPT",102,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.01)
+"RTN","C0CDPT",103,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",104,0)
+ Q NAME("SUFFIX")
+"RTN","C0CDPT",105,0)
+DISPNAME(DFN) ; Display Name
+"RTN","C0CDPT",106,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.01)
+"RTN","C0CDPT",107,0)
+ ; "G" is Given Name First; "MXc" is Mixed Case, With Suffx Preceded by Comma
+"RTN","C0CDPT",108,0)
+ Q $$NAMEFMT^XLFNAME(.NAME,"G","MXc")
+"RTN","C0CDPT",109,0)
+DOB(DFN) ; Date of Birth
+"RTN","C0CDPT",110,0)
+ N DOB S DOB=$$GET1^DIQ(2,DFN,.03,"I")
+"RTN","C0CDPT",111,0)
+ ; Date in FM Date Format. Convert to UTC/ISO 8601.
+"RTN","C0CDPT",112,0)
+ Q $$FMDTOUTC^C0CUTIL(DOB,"D")
+"RTN","C0CDPT",113,0)
+GENDER(DFN) ; Gender/Sex
+"RTN","C0CDPT",114,0)
+ Q $$GET1^DIQ(2,DFN,.02,"I")_"^"_$$GET1^DIQ(2,DFN,.02,"E") ;
+"RTN","C0CDPT",115,0)
+SSN(DFN) ; SSN
+"RTN","C0CDPT",116,0)
+ Q $$GET1^DIQ(2,DFN,.09)
+"RTN","C0CDPT",117,0)
+ADDRTYPE(DFN) ; Address Type
+"RTN","C0CDPT",118,0)
+ ; Vista only stores a home address for the patient.
+"RTN","C0CDPT",119,0)
+ Q "Home"
+"RTN","C0CDPT",120,0)
+ADDR1(DFN) ; Get Home Address line 1
+"RTN","C0CDPT",121,0)
+ Q $$GET1^DIQ(2,DFN,.111)
+"RTN","C0CDPT",122,0)
+ADDR2(DFN) ; Get Home Address line 2
+"RTN","C0CDPT",123,0)
+ ; Vista has Lines 2,3; CCR has only line 1,2; so compromise
+"RTN","C0CDPT",124,0)
+ N ADDLN2,ADDLN3
+"RTN","C0CDPT",125,0)
+ S ADDLN2=$$GET1^DIQ(2,DFN,.112),ADDLN3=$$GET1^DIQ(2,DFN,.113)
+"RTN","C0CDPT",126,0)
+ Q:ADDLN3="" ADDLN2
+"RTN","C0CDPT",127,0)
+ Q ADDLN2_", "_ADDLN3
+"RTN","C0CDPT",128,0)
+CITY(DFN) ; Get City for Home Address
+"RTN","C0CDPT",129,0)
+ Q $$GET1^DIQ(2,DFN,.114)
+"RTN","C0CDPT",130,0)
+STATE(DFN) ; Get State for Home Address
+"RTN","C0CDPT",131,0)
+ Q $$GET1^DIQ(2,DFN,.115)
+"RTN","C0CDPT",132,0)
+ZIP(DFN) ; Get Zip code for Home Address
+"RTN","C0CDPT",133,0)
+ Q $$GET1^DIQ(2,DFN,.116)
+"RTN","C0CDPT",134,0)
+COUNTY(DFN) ; Get County for our Address
+"RTN","C0CDPT",135,0)
+ Q $$GET1^DIQ(2,DFN,.117)
+"RTN","C0CDPT",136,0)
+COUNTRY(DFN) ; Get Country for our Address
+"RTN","C0CDPT",137,0)
+ ; Unfortunately, it's not stored anywhere in Vista, so the inevitable...
+"RTN","C0CDPT",138,0)
+ Q "USA"
+"RTN","C0CDPT",139,0)
+RESTEL(DFN) ; Residential Telephone
+"RTN","C0CDPT",140,0)
+ Q $$GET1^DIQ(2,DFN,.131)
+"RTN","C0CDPT",141,0)
+WORKTEL(DFN) ; Work Telephone
+"RTN","C0CDPT",142,0)
+ Q $$GET1^DIQ(2,DFN,.132)
+"RTN","C0CDPT",143,0)
+EMAIL(DFN) ; Email Adddress
+"RTN","C0CDPT",144,0)
+ Q $$GET1^DIQ(2,DFN,.133)
+"RTN","C0CDPT",145,0)
+CELLTEL(DFN) ; Cell Phone
+"RTN","C0CDPT",146,0)
+ Q $$GET1^DIQ(2,DFN,.134)
+"RTN","C0CDPT",147,0)
+NOK1FAM(DFN) ; Next of Kin 1 (NOK1) Family Name
+"RTN","C0CDPT",148,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.211)
+"RTN","C0CDPT",149,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",150,0)
+ Q NAME("FAMILY")
+"RTN","C0CDPT",151,0)
+NOK1GIV(DFN) ; NOK1 Given Name
+"RTN","C0CDPT",152,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.211)
+"RTN","C0CDPT",153,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",154,0)
+ Q NAME("GIVEN")
+"RTN","C0CDPT",155,0)
+NOK1MID(DFN) ; NOK1 Middle Name
+"RTN","C0CDPT",156,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.211)
+"RTN","C0CDPT",157,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",158,0)
+ Q NAME("MIDDLE")
+"RTN","C0CDPT",159,0)
+NOK1SUF(DFN) ; NOK1 Suffi Name
+"RTN","C0CDPT",160,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.211)
+"RTN","C0CDPT",161,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",162,0)
+ Q NAME("SUFFIX")
+"RTN","C0CDPT",163,0)
+NOK1DISP(DFN) ; NOK1 Display Name
+"RTN","C0CDPT",164,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.211)
+"RTN","C0CDPT",165,0)
+ ; "G" is Given Name First; "MXc" is Mixed Case, With Suffx Preceded by Comma
+"RTN","C0CDPT",166,0)
+ Q $$NAMEFMT^XLFNAME(.NAME,"G","MXc")
+"RTN","C0CDPT",167,0)
+NOK1REL(DFN) ; NOK1 Relationship to the patient
+"RTN","C0CDPT",168,0)
+ Q $$GET1^DIQ(2,DFN,.212)
+"RTN","C0CDPT",169,0)
+NOK1ADD1(DFN) ; NOK1 Address 1
+"RTN","C0CDPT",170,0)
+ Q $$GET1^DIQ(2,DFN,.213)
+"RTN","C0CDPT",171,0)
+NOK1ADD2(DFN) ; NOK1 Address 2 
+"RTN","C0CDPT",172,0)
+ N ADDLN2,ADDLN3
+"RTN","C0CDPT",173,0)
+ S ADDLN2=$$GET1^DIQ(2,DFN,.214),ADDLN3=$$GET1^DIQ(2,DFN,.215)
+"RTN","C0CDPT",174,0)
+ Q:ADDLN3="" ADDLN2
+"RTN","C0CDPT",175,0)
+ Q ADDLN2_", "_ADDLN3
+"RTN","C0CDPT",176,0)
+NOK1CITY(DFN) ; NOK1 City
+"RTN","C0CDPT",177,0)
+ Q $$GET1^DIQ(2,DFN,.216)
+"RTN","C0CDPT",178,0)
+NOK1STAT(DFN) ; NOK1 State
+"RTN","C0CDPT",179,0)
+ Q $$GET1^DIQ(2,DFN,.217)
+"RTN","C0CDPT",180,0)
+NOK1ZIP(DFN) ; NOK1 Zip Code
+"RTN","C0CDPT",181,0)
+ Q $$GET1^DIQ(2,DFN,.218)
+"RTN","C0CDPT",182,0)
+NOK1HTEL(DFN) ; NOK1 Home Telephone
+"RTN","C0CDPT",183,0)
+ Q $$GET1^DIQ(2,DFN,.219)
+"RTN","C0CDPT",184,0)
+NOK1WTEL(DFN) ; NOK1 Work Telephone
+"RTN","C0CDPT",185,0)
+ Q $$GET1^DIQ(2,DFN,.21011)
+"RTN","C0CDPT",186,0)
+NOK1SAME(DFN) ; Is NOK1's Address the same the patient?
+"RTN","C0CDPT",187,0)
+ Q $$GET1^DIQ(2,DFN,.2125)
+"RTN","C0CDPT",188,0)
+NOK2FAM(DFN) ; NOK2 Family Name
+"RTN","C0CDPT",189,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.2191)
+"RTN","C0CDPT",190,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",191,0)
+ Q NAME("FAMILY")
+"RTN","C0CDPT",192,0)
+NOK2GIV(DFN) ; NOK2 Given Name
+"RTN","C0CDPT",193,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.2191)
+"RTN","C0CDPT",194,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",195,0)
+ Q NAME("GIVEN")
+"RTN","C0CDPT",196,0)
+NOK2MID(DFN) ; NOK2 Middle Name
+"RTN","C0CDPT",197,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.2191)
+"RTN","C0CDPT",198,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",199,0)
+ Q NAME("MIDDLE")
+"RTN","C0CDPT",200,0)
+NOK2SUF(DFN) ; NOK2 Suffi Name
+"RTN","C0CDPT",201,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.2191)
+"RTN","C0CDPT",202,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",203,0)
+ Q NAME("SUFFIX")
+"RTN","C0CDPT",204,0)
+NOK2DISP(DFN) ; NOK2 Display Name
+"RTN","C0CDPT",205,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.2191)
+"RTN","C0CDPT",206,0)
+ ; "G" is Given Name First; "MXc" is Mixed Case, With Suffx Preceded by Comma
+"RTN","C0CDPT",207,0)
+ Q $$NAMEFMT^XLFNAME(.NAME,"G","MXc")
+"RTN","C0CDPT",208,0)
+NOK2REL(DFN) ; NOK2 Relationship to the patient
+"RTN","C0CDPT",209,0)
+ Q $$GET1^DIQ(2,DFN,.2192)
+"RTN","C0CDPT",210,0)
+NOK2ADD1(DFN) ; NOK2 Address 1
+"RTN","C0CDPT",211,0)
+ Q $$GET1^DIQ(2,DFN,.2193)
+"RTN","C0CDPT",212,0)
+NOK2ADD2(DFN) ; NOK2 Address 2
+"RTN","C0CDPT",213,0)
+ N ADDLN2,ADDLN3
+"RTN","C0CDPT",214,0)
+ S ADDLN2=$$GET1^DIQ(2,DFN,.2194),ADDLN3=$$GET1^DIQ(2,DFN,.2195)
+"RTN","C0CDPT",215,0)
+ Q:ADDLN3="" ADDLN2
+"RTN","C0CDPT",216,0)
+ Q ADDLN2_", "_ADDLN3
+"RTN","C0CDPT",217,0)
+NOK2CITY(DFN) ; NOK2 City
+"RTN","C0CDPT",218,0)
+ Q $$GET1^DIQ(2,DFN,.2196)
+"RTN","C0CDPT",219,0)
+NOK2STAT(DFN) ; NOK2 State
+"RTN","C0CDPT",220,0)
+ Q $$GET1^DIQ(2,DFN,.2197)
+"RTN","C0CDPT",221,0)
+NOK2ZIP(DFN) ; NOK2 Zip Code
+"RTN","C0CDPT",222,0)
+ Q $$GET1^DIQ(2,DFN,.2198)
+"RTN","C0CDPT",223,0)
+NOK2HTEL(DFN) ; NOK2 Home Telephone
+"RTN","C0CDPT",224,0)
+ Q $$GET1^DIQ(2,DFN,.2199)
+"RTN","C0CDPT",225,0)
+NOK2WTEL(DFN) ; NOK2 Work Telephone
+"RTN","C0CDPT",226,0)
+ Q $$GET1^DIQ(2,DFN,.211011)
+"RTN","C0CDPT",227,0)
+NOK2SAME(DFN) ; Is NOK2's Address the same the patient?
+"RTN","C0CDPT",228,0)
+ Q $$GET1^DIQ(2,DFN,.21925)
+"RTN","C0CDPT",229,0)
+EMERFAM(DFN) ; Emergency Contact (EMER) Family Name
+"RTN","C0CDPT",230,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.331)
+"RTN","C0CDPT",231,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",232,0)
+ Q NAME("FAMILY")
+"RTN","C0CDPT",233,0)
+EMERGIV(DFN) ; EMER Given Name
+"RTN","C0CDPT",234,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.331)
+"RTN","C0CDPT",235,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",236,0)
+ Q NAME("GIVEN")
+"RTN","C0CDPT",237,0)
+EMERMID(DFN) ; EMER Middle Name
+"RTN","C0CDPT",238,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.331)
+"RTN","C0CDPT",239,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",240,0)
+ Q NAME("MIDDLE")
+"RTN","C0CDPT",241,0)
+EMERSUF(DFN) ; EMER Suffi Name
+"RTN","C0CDPT",242,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.331)
+"RTN","C0CDPT",243,0)
+ D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CDPT",244,0)
+ Q NAME("SUFFIX")
+"RTN","C0CDPT",245,0)
+EMERDISP(DFN) ; EMER Display Name
+"RTN","C0CDPT",246,0)
+ N NAME S NAME=$$GET1^DIQ(2,DFN,.331)
+"RTN","C0CDPT",247,0)
+ ; "G" is Given Name First; "MXc" is Mixed Case, With Suffx Preceded by Comma
+"RTN","C0CDPT",248,0)
+ Q $$NAMEFMT^XLFNAME(.NAME,"G","MXc")
+"RTN","C0CDPT",249,0)
+EMERREL(DFN) ; EMER Relationship to the patient
+"RTN","C0CDPT",250,0)
+ Q $$GET1^DIQ(2,DFN,.331)
+"RTN","C0CDPT",251,0)
+EMERADD1(DFN) ; EMER Address 1
+"RTN","C0CDPT",252,0)
+ Q $$GET1^DIQ(2,DFN,.333)
+"RTN","C0CDPT",253,0)
+EMERADD2(DFN) ; EMER Address 2
+"RTN","C0CDPT",254,0)
+ N ADDLN2,ADDLN3
+"RTN","C0CDPT",255,0)
+ S ADDLN2=$$GET1^DIQ(2,DFN,.334),ADDLN3=$$GET1^DIQ(2,DFN,.335)
+"RTN","C0CDPT",256,0)
+ Q:ADDLN3="" ADDLN2
+"RTN","C0CDPT",257,0)
+ Q ADDLN2_", "_ADDLN3
+"RTN","C0CDPT",258,0)
+EMERCITY(DFN) ; EMER City
+"RTN","C0CDPT",259,0)
+ Q $$GET1^DIQ(2,DFN,.336)
+"RTN","C0CDPT",260,0)
+EMERSTAT(DFN) ; EMER State
+"RTN","C0CDPT",261,0)
+ Q $$GET1^DIQ(2,DFN,.337)
+"RTN","C0CDPT",262,0)
+EMERZIP(DFN) ; EMER Zip Code
+"RTN","C0CDPT",263,0)
+ Q $$GET1^DIQ(2,DFN,.338)
+"RTN","C0CDPT",264,0)
+EMERHTEL(DFN) ; EMER Home Telephone
+"RTN","C0CDPT",265,0)
+ Q $$GET1^DIQ(2,DFN,.339)
+"RTN","C0CDPT",266,0)
+EMERWTEL(DFN) ; EMER Work Telephone
+"RTN","C0CDPT",267,0)
+ Q $$GET1^DIQ(2,DFN,.33011)
+"RTN","C0CDPT",268,0)
+EMERSAME(DFN) ; Is EMER's Address the same the NOK?
+"RTN","C0CDPT",269,0)
+ Q $$GET1^DIQ(2,DFN,.3305)
+"RTN","C0CENC")
+0^70^B46321144
+"RTN","C0CENC",1,0)
+C0CENC  ; CCDCCR/GPL - CCR/CCD PROCESSING FOR ENCOUNTERS ; 05/21/10
+"RTN","C0CENC",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CENC",3,0)
+ ;Copyright 2010 George Lilly, University of Minnesota and others.
+"RTN","C0CENC",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CENC",5,0)
+ ;See attached copy of the License.
+"RTN","C0CENC",6,0)
+ ;
+"RTN","C0CENC",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CENC",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CENC",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CENC",10,0)
+ ;(at your option) any later version.
+"RTN","C0CENC",11,0)
+ ;
+"RTN","C0CENC",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CENC",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CENC",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CENC",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CENC",16,0)
+ ;
+"RTN","C0CENC",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CENC",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CENC",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CENC",20,0)
+ ;
+"RTN","C0CENC",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CENC",22,0)
+ Q
+"RTN","C0CENC",23,0)
+ ;
+"RTN","C0CENC",24,0)
+EXTRACT(ENCXML,DFN,ENCOUT) ; EXTRACT ENCOUNTERS INTO  XML TEMPLATE
+"RTN","C0CENC",25,0)
+ ; ENCXML AND ENCOUT ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CENC",26,0)
+ ;
+"RTN","C0CENC",27,0)
+ D SETVARS^C0CPROC ; SET UP VARIABLES FOR PROCEDUCRES, ENCOUNTERS, AND NOTES
+"RTN","C0CENC",28,0)
+ ;I '$D(@C0CENC) D TIUGET(DFN,C0CENC,C0CPRC,C0CNTE) ; GET VARS IF NOT THERE
+"RTN","C0CENC",29,0)
+ K @C0CENC
+"RTN","C0CENC",30,0)
+ D TIUGET(DFN,C0CENC,C0CPRC,C0CNTE) ; GET ENCOUNTERS
+"RTN","C0CENC",31,0)
+ D MAP(ENCXML,C0CENC,ENCOUT) ;MAP RESULTS FOR ENCOUNTERS
+"RTN","C0CENC",32,0)
+ Q
+"RTN","C0CENC",33,0)
+ ;
+"RTN","C0CENC",34,0)
+TIUGET(DFN,C0CENC,C0CPRC,C0CNTE) ; CALLS ENTRY^C0CCPT TO GET PROCEDURES, 
+"RTN","C0CENC",35,0)
+ ; ENCOUNTERS AND NOTES. RETURNS THEM IN RNF2 ARRAYS PASSED BY NAME
+"RTN","C0CENC",36,0)
+ ; C0CENC: ENCOUNTERS, C0CPRC: PROCEDURES, C0CNTE: NOTES
+"RTN","C0CENC",37,0)
+ ; READY TO BE MAPPED TO XML BY MAP^C0CENC, MAP^C0CPROC, AND MAP^C0CCMT
+"RTN","C0CENC",38,0)
+ ; THESE RETURN ARRAYS ARE NOT INITIALIZED, BUT ARE ADDED TO IF THEY 
+"RTN","C0CENC",39,0)
+ ; EXIST. THIS IS SO THAT ADDITIONAL PROCEDURES CAN BE OBTAINED FROM
+"RTN","C0CENC",40,0)
+ ; THE SURGERY PACKGE AND ADDITIONAL COMMENTS FROM OTHER CCR SECTIONS
+"RTN","C0CENC",41,0)
+ ;
+"RTN","C0CENC",42,0)
+ ;K VISIT,LST,NOTE
+"RTN","C0CENC",43,0)
+ I '$D(C0CPRC) D SETVARS^C0CPROC ; INITIALIZE WORK AREAS IF NOT ALREADY THERE
+"RTN","C0CENC",44,0)
+ I '$D(VISIT) D ENTRY^C0CCPT(DFN,,,1) ; RETURNS VISIT LOCAL VARIABLE
+"RTN","C0CENC",45,0)
+ ; NEED TO ADD START AND END DATES FROM PARAMETERS
+"RTN","C0CENC",46,0)
+ N ZI S ZI=""
+"RTN","C0CENC",47,0)
+ N PREVCPT,PREVDT S (PREVCPT,PREVDT)=""
+"RTN","C0CENC",48,0)
+ F  S ZI=$O(VISIT(ZI),-1) Q:ZI=""  D  ; REVERSE TIME ORDER - MOST RECENT FIRST
+"RTN","C0CENC",49,0)
+ . N ZDATE
+"RTN","C0CENC",50,0)
+ . S ZDATE=$$DATE(VISIT(ZI,"DATE",0))
+"RTN","C0CENC",51,0)
+ . S ZPRVARY=$NA(VISIT(ZI,"PRV"))
+"RTN","C0CENC",52,0)
+ . N ZPRV
+"RTN","C0CENC",53,0)
+ . S ZPRV=$$PRV(ZPRVARY) ; THE PRIMARY PROVIDER OBJECT IN THE FORM
+"RTN","C0CENC",54,0)
+ . ; ACTORPROVIDER_IEN WHERE IEN IS THE PROVIDER IEN IN NEW PERSON 
+"RTN","C0CENC",55,0)
+ . ; ENCOBJECTID - ENCOUNTER OBJECT ID
+"RTN","C0CENC",56,0)
+ . ; ENCDATETIME - ENCOUNTER DATE TIME
+"RTN","C0CENC",57,0)
+ . ; ENCTYPETXT - ENCOUNTER TYPE (PLANNING TO USE ADMINISTRATIVE CPT IF AVAIL)
+"RTN","C0CENC",58,0)
+ . ; ENCTYPECODE - CODE OF TYPE - PLANNING CPT CODE
+"RTN","C0CENC",59,0)
+ . ; ENCTYPECODESYS - CODING SYSTEM OF TYPE - CPT-4
+"RTN","C0CENC",60,0)
+ . ; ENCDESCTXT - ENCOUNTER DESCRIPTION TEXT
+"RTN","C0CENC",61,0)
+ . ; ENCDESCCODE - ENCOUNTER DESCRIPTION CODE
+"RTN","C0CENC",62,0)
+ . ; ENCDESCCODESYS - ENCOUNTER DESCRIPTION CODE SYSTEM
+"RTN","C0CENC",63,0)
+ . ; ENCLOCACTORID - ENCOUNTER LOCATION ACTOR ID
+"RTN","C0CENC",64,0)
+ . ; ENCPRVACTORID - ENCOUNTER PRACTIONER ACTOR ID
+"RTN","C0CENC",65,0)
+ . ; ENCINDTXT - ENCOUNTER INDICATION TEXT
+"RTN","C0CENC",66,0)
+ . ; ENCINDCODE - ENCOUNTER INDICATION CODE
+"RTN","C0CENC",67,0)
+ . ; ENCINDCODESYS - ENCOUNTER INDICATION CODE SYSTEM
+"RTN","C0CENC",68,0)
+ . ; ENCACTORID - ENCOUNTER SOURCE ACTOR ID
+"RTN","C0CENC",69,0)
+ . ; ENCCOMMENTID - ENCOUNTER COMMENT ID - POINTER TO NOTE IN COMMENT SECTION
+"RTN","C0CENC",70,0)
+ . S ZRNF("ENCOBJECTID")="ENCOUNTER_"_ZI
+"RTN","C0CENC",71,0)
+ . S ZRNF("ENCDATETIME")=ZDATE ; ENCOUNTER DATE TIME
+"RTN","C0CENC",72,0)
+ . S ZRNF("ENCTYPETXT")=""
+"RTN","C0CENC",73,0)
+ . S ZRNF("ENCTYPECODE")=""
+"RTN","C0CENC",74,0)
+ . S ZRNF("ENCTYPECODESYS")=""
+"RTN","C0CENC",75,0)
+ . S ZRNF("ENCDESCTXT")=""
+"RTN","C0CENC",76,0)
+ . S ZRNF("ENCDESCCODE")=""
+"RTN","C0CENC",77,0)
+ . S ZRNF("ENCDESCCODESYS")=""
+"RTN","C0CENC",78,0)
+ . N TYPTXT,TYPCDE,TYPSYS  ; WILL BE UPDATED BY GETTYPE CALL
+"RTN","C0CENC",79,0)
+ . I $$GETTYPE("VISIT(ZI)",.TYPTXT,.TYPCDE,.TYPSYS) D  ; RETURNS FALSE IF NO TYPE
+"RTN","C0CENC",80,0)
+ . . S ZRNF("ENCTYPETXT")=TYPTXT
+"RTN","C0CENC",81,0)
+ . . S ZRNF("ENCTYPECODE")=TYPCDE
+"RTN","C0CENC",82,0)
+ . . S ZRNF("ENCTYPECODESYS")=TYPSYS
+"RTN","C0CENC",83,0)
+ . . S ZRNF("ENCDESCTXT")=TYPTXT ; FOR NOW, DESCRIPTION IS SAME AS TYPE
+"RTN","C0CENC",84,0)
+ . . S ZRNF("ENCDESCCODE")=TYPCDE ; DESCRIPTION IS REQUIRED (TYPE IS NOT)
+"RTN","C0CENC",85,0)
+ . . S ZRNF("ENCDESCCODESYS")=TYPSYS ; NEED TO CLARIFY FOR VISTA
+"RTN","C0CENC",86,0)
+ . S ZRNF("ENCLOCACTORID")="ACTORORGANIZATION_1"
+"RTN","C0CENC",87,0)
+ . S ZRNF("ENCPRVACTORID")=ZPRV ; PRIMARY PROVIDER LISTED FOR THE ENCOUNTER
+"RTN","C0CENC",88,0)
+ . S ZRNF("ENCINDTXT")="" ; WE WILL PUT POINTERS TO PROBLEMS HERE
+"RTN","C0CENC",89,0)
+ . S ZRNF("ENCINDCODE")=""
+"RTN","C0CENC",90,0)
+ . S ZRNF("ENCINDCODESYS")=""
+"RTN","C0CENC",91,0)
+ . S ZRNF("ENCACTORID")=ZPRV ; SOURCE WILL BE PRIMARY PROVIDER
+"RTN","C0CENC",92,0)
+ . S ZRNF("ENCCOMMENTID")=""
+"RTN","C0CENC",93,0)
+ . I $G(VISIT(ZI,"TEXT",1))'="" D  ; THERE IS A NOTE
+"RTN","C0CENC",94,0)
+ . . M @C0CNTE@(ZI,"TEXT")=VISIT(ZI,"TEXT") ; COPY THE TEXT OF THE NOTE
+"RTN","C0CENC",95,0)
+ . . S @C0CNTE@(ZI,"COMMENTOBJECTID")="NOTE_"_ZI
+"RTN","C0CENC",96,0)
+ . . S @C0CNTE@(ZI,"CMTDATETIME")=ZDATE ; DATE OF THE NOTE
+"RTN","C0CENC",97,0)
+ . . S @C0CNTE@(ZI,"ACTORSOURCEID")=ZPRV ; SOURCE OF THE NOTE
+"RTN","C0CENC",98,0)
+ . . S ZRNF("ENCCOMMENTID")="NOTE_"_ZI ; POINT TO THE NOTE FROM THE ENCOUNTER
+"RTN","C0CENC",99,0)
+ . D RNF1TO2^C0CRNF(C0CENC,"ZRNF") ; ADD THIS ROW TO THE ARRAY
+"RTN","C0CENC",100,0)
+ . ;S PREVCPT=ZCPT
+"RTN","C0CENC",101,0)
+ . ;S PREVDT=ZDATE
+"RTN","C0CENC",102,0)
+ N ZRIM S ZRIM=$NA(^TMP("C0CRIM","VARS",DFN,"ENCOUNTERS"))
+"RTN","C0CENC",103,0)
+ M @ZRIM=@C0CENC@("V")
+"RTN","C0CENC",104,0)
+ K VISIT,LST,NOTE
+"RTN","C0CENC",105,0)
+ Q
+"RTN","C0CENC",106,0)
+ ;
+"RTN","C0CENC",107,0)
+GETTYPE(ZARY,ZTXT,ZCDE,ZSYS) ; EXTRINSIC WHICH RETURNS FALSE IF NO ENCOUNTER TYPE
+"RTN","C0CENC",108,0)
+ ; UPDATES ZTXT WITH ENCOUNTER TYPE TEXT, ZCDE WITH ENCOUNTER TYPE CODE
+"RTN","C0CENC",109,0)
+ ; AND ZSYS WITH ENCOUNTER TYPE CODING SYSTEM
+"RTN","C0CENC",110,0)
+ ; THIS ROUTINE SHOULD BE UPDATED TO SEARCH FOR AN ADMINISTRATIVE CPT CODE
+"RTN","C0CENC",111,0)
+ ; INSTEAD OF JUST THE FIRST ONE IN THE LIST - GPL 1/23/10
+"RTN","C0CENC",112,0)
+ N ZS,ZC
+"RTN","C0CENC",113,0)
+ S ZC="" S ZS=""
+"RTN","C0CENC",114,0)
+ S (ZTXT,ZCDE,ZSYS)=""
+"RTN","C0CENC",115,0)
+ F  S ZC=$O(@ZARY@("CPT",ZC)) Q:ZC=""  D  ; TRY AND FIND A "99" CPT CODE
+"RTN","C0CENC",116,0)
+ . N ZT
+"RTN","C0CENC",117,0)
+ . S ZT=$$CPT^C0CPROC(@ZARY@("CPT",ZC)) ; VALUES IN A CPT MULTIPLE
+"RTN","C0CENC",118,0)
+ . I $E($P(ZT,U,1),1,2)="99" S ZS=ZT ; IS IT AN ADMIN CPT CODE?
+"RTN","C0CENC",119,0)
+ I ZS'="" D  ; CODED ENCOUNTER TYPE FOUND
+"RTN","C0CENC",120,0)
+ . S ZTXT=$P(ZS,U,2)_" "_$P(ZS,U,3) ; USE BOTH PIECES FOR THE TYPE
+"RTN","C0CENC",121,0)
+ . S ZCDE=$P($$CPT^C0CPROC(ZS),U,1) ; CPT CODE FOR ENCOUTER
+"RTN","C0CENC",122,0)
+ . S ZSYS=""
+"RTN","C0CENC",123,0)
+ . I ZCDE'="" S ZSYS="CPT-4" ; ONLY HAVE A CODING SYSTEM IF THERE IS A CODE
+"RTN","C0CENC",124,0)
+ I ZS="" S ZTXT=$$ANYTXT(ZARY) ; TRY AND GET FREE FORM TEXT FROM CPT MULTIPLES
+"RTN","C0CENC",125,0)
+ I ZTXT="" Q 0 ; FAILED
+"RTN","C0CENC",126,0)
+ W !,ZTXT
+"RTN","C0CENC",127,0)
+ Q 1 ; SUCCESS
+"RTN","C0CENC",128,0)
+ ;
+"RTN","C0CENC",129,0)
+ANYTXT(ZVST) ; EXTRINSIC WHICH RETURNS TEXT FROM THE CPT MULTIPLE
+"RTN","C0CENC",130,0)
+ ; OF A VISIT ARRAY WITHOUT CHECKING THE CPT CODE (THAT HAVING FAILED)
+"RTN","C0CENC",131,0)
+ ; ZVST IS THE VISIT ARRAY AND IS PASSED BY NAME
+"RTN","C0CENC",132,0)
+ ; RETURNS TEXT TO USE AS ENCOUNTER TYPE IF ANY
+"RTN","C0CENC",133,0)
+ N ZK,ZL
+"RTN","C0CENC",134,0)
+ S ZK="" S ZL=""
+"RTN","C0CENC",135,0)
+ F  S ZK=$O(@ZVST@("CPT",ZK)) Q:ZK=""  D  ; LOOK FOR SOME TEXT TO USE
+"RTN","C0CENC",136,0)
+ . N ZT
+"RTN","C0CENC",137,0)
+ . S ZT=$G(@ZVST@("CPT",ZK)) ; LOOK AT THIS CPT MULTIPLE
+"RTN","C0CENC",138,0)
+ . I $P(ZT,U,2)_" "_$P(ZT,U,3)'=" " S ZL=$P(ZT,U,2)_" "_$P(ZT,U,3)
+"RTN","C0CENC",139,0)
+ . ; CONCATENATE PIECE 2 AND 3 OF THE CPT MULTIPLE FOR A TYPE
+"RTN","C0CENC",140,0)
+ I ZL="" S ZL=$G(@ZVST@("CLASS")) ; USE THE NOTE DOCUMENT CLASS FOR ENCOUTNER TYPE
+"RTN","C0CENC",141,0)
+ Q ZL
+"RTN","C0CENC",142,0)
+ ;
+"RTN","C0CENC",143,0)
+PRV(IARY) ; RETURNS THE PRIMARY PROVIDER FROM THE "PRV" ARRAY PASSED BY NAME
+"RTN","C0CENC",144,0)
+ N ZI,ZR,ZRTN S ZI="" S ZR="" S ZRTN=""
+"RTN","C0CENC",145,0)
+ F  S ZI=$O(@IARY@(ZI)) Q:ZI=""  D  ; FOR EACH PRV SEG
+"RTN","C0CENC",146,0)
+ . I ZR'="" Q  ;ONLY WANT THE FIRST PRIMARY PROVIDER
+"RTN","C0CENC",147,0)
+ . I $P(@IARY@(ZI),U,5)=1 S ZR=$P(@IARY@(ZI),U,1)
+"RTN","C0CENC",148,0)
+ I ZR'="" S ZRTN="ACTORPROVIDER_"_ZR
+"RTN","C0CENC",149,0)
+ Q ZRTN
+"RTN","C0CENC",150,0)
+ ;
+"RTN","C0CENC",151,0)
+DATE(ISTR) ; EXTRINSIC TO RETURN THE DATE IN CCR FORMAT
+"RTN","C0CENC",152,0)
+ Q $$FMDTOUTC^C0CUTIL(ISTR,"DT")
+"RTN","C0CENC",153,0)
+ ;
+"RTN","C0CENC",154,0)
+CPT(ISTR) ; EXTRINSIC THAT SEARCHES FOR CPT CODES AND RETURNS
+"RTN","C0CENC",155,0)
+ ; CPT^CATEGORY^TEXT
+"RTN","C0CENC",156,0)
+ N Z1,Z2,Z3,ZRTN
+"RTN","C0CENC",157,0)
+ S Z1=$P(ISTR,U,1) 
+"RTN","C0CENC",158,0)
+ I Z1="" D  ;
+"RTN","C0CENC",159,0)
+ . I ISTR["(CPT-4 " S Z1=$P($P(ISTR,"(CPT-4 ",2),")",1)
+"RTN","C0CENC",160,0)
+ I Z1'="" D  ; IF THERE IS A CPT CODE IN THERE
+"RTN","C0CENC",161,0)
+ . ;S Z1=$P(ISTR,U,1)
+"RTN","C0CENC",162,0)
+ . S Z2=$P(ISTR,U,2)
+"RTN","C0CENC",163,0)
+ . S Z3=$P(ISTR,U,3)
+"RTN","C0CENC",164,0)
+ . S ZRTN=Z1_U_Z2_U_Z3
+"RTN","C0CENC",165,0)
+ E  S ZRTN=""
+"RTN","C0CENC",166,0)
+ Q ZRTN
+"RTN","C0CENC",167,0)
+ ;
+"RTN","C0CENC",168,0)
+MAP(ENCXML,C0CENC,ENCOUT) ; MAP PROCEDURES XML 
+"RTN","C0CENC",169,0)
+ ;
+"RTN","C0CENC",170,0)
+ N ZTEMP S ZTEMP=$NA(^TMP("C0CCCR",$J,DFN,"ENCTEMP")) ;WORK AREA FOR TEMPLATE
+"RTN","C0CENC",171,0)
+ K @ZTEMP
+"RTN","C0CENC",172,0)
+ N ZBLD
+"RTN","C0CENC",173,0)
+ S ZBLD=$NA(^TMP("C0CCCR",$J,DFN,"ENCBLD")) ; BUILD LIST AREA
+"RTN","C0CENC",174,0)
+ D QUEUE^C0CXPATH(ZBLD,ENCXML,1,1) ; FIRST LINE
+"RTN","C0CENC",175,0)
+ N ZINNER
+"RTN","C0CENC",176,0)
+ D QUERY^C0CXPATH(ENCXML,"//Encounters/Encounter","ZINNER") ;ONE ENCOUNTER
+"RTN","C0CENC",177,0)
+ N ZTMP,ZVAR,ZI
+"RTN","C0CENC",178,0)
+ S ZI=""
+"RTN","C0CENC",179,0)
+ F  S ZI=$O(@C0CENC@("V",ZI)) Q:ZI=""  D  ;FOR EACH ENCOUNTER
+"RTN","C0CENC",180,0)
+ . S ZTMP=$NA(@ZTEMP@(ZI)) ;THIS ENCOUNTER XML
+"RTN","C0CENC",181,0)
+ . S ZVAR=$NA(@C0CENC@("V",ZI)) ;THIS ENCOUNTER VARIABLES
+"RTN","C0CENC",182,0)
+ . D MAP^C0CXPATH("ZINNER",ZVAR,ZTMP) ; MAP THE PROCEDURE
+"RTN","C0CENC",183,0)
+ . D QUEUE^C0CXPATH(ZBLD,ZTMP,1,@ZTMP@(0)) ;QUE FOR BUILD
+"RTN","C0CENC",184,0)
+ D QUEUE^C0CXPATH(ZBLD,ENCXML,@ENCXML@(0),@ENCXML@(0))
+"RTN","C0CENC",185,0)
+ N ZZTMP
+"RTN","C0CENC",186,0)
+ D BUILD^C0CXPATH(ZBLD,ENCOUT) ;BUILD FINAL XML
+"RTN","C0CENC",187,0)
+ K @ZTEMP,@ZBLD,@C0CENC
+"RTN","C0CENC",188,0)
+ Q
+"RTN","C0CENC",189,0)
+ ;  
+"RTN","C0CENV")
+0^75^B25371113
+"RTN","C0CENV",1,0)
+C0CENV ;WV/JMC - CCD/CCR Environment Check/Install Routine ; Aug 16, 2009
+"RTN","C0CENV",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CENV",3,0)
+ ;
+"RTN","C0CENV",4,0)
+ ;
+"RTN","C0CENV",5,0)
+ENV ; Does not prevent loading of the transport global.
+"RTN","C0CENV",6,0)
+ ; Environment check is done only during the install.
+"RTN","C0CENV",7,0)
+ ;
+"RTN","C0CENV",8,0)
+ N XQA,XQAMSG
+"RTN","C0CENV",9,0)
+ ;
+"RTN","C0CENV",10,0)
+ ;
+"RTN","C0CENV",11,0)
+ ; Make sure the patch name exist
+"RTN","C0CENV",12,0)
+ ;
+"RTN","C0CENV",13,0)
+ I '$D(XPDNM) D  Q
+"RTN","C0CENV",14,0)
+ . D BMES("No valid patch name exist")
+"RTN","C0CENV",15,0)
+ . S XPDQUIT=2
+"RTN","C0CENV",16,0)
+ . D EXIT
+"RTN","C0CENV",17,0)
+ ;
+"RTN","C0CENV",18,0)
+ D CHECK
+"RTN","C0CENV",19,0)
+ D EXIT
+"RTN","C0CENV",20,0)
+ Q
+"RTN","C0CENV",21,0)
+ ;
+"RTN","C0CENV",22,0)
+ ;
+"RTN","C0CENV",23,0)
+CHECK ; Perform environment check
+"RTN","C0CENV",24,0)
+ ;
+"RTN","C0CENV",25,0)
+ I $S('$G(IOM):1,'$G(IOSL):1,$G(U)'="^":1,1:0) D
+"RTN","C0CENV",26,0)
+ . D BMES("Terminal Device is not defined")
+"RTN","C0CENV",27,0)
+ . S XPDQUIT=2
+"RTN","C0CENV",28,0)
+ ;
+"RTN","C0CENV",29,0)
+ I $S('$G(DUZ):1,$D(DUZ)[0:1,$D(DUZ(0))[0:1,1:0) D
+"RTN","C0CENV",30,0)
+ . D BMES("Please log in to set local DUZ... variables")
+"RTN","C0CENV",31,0)
+ . S XPDQUIT=2
+"RTN","C0CENV",32,0)
+ ;
+"RTN","C0CENV",33,0)
+ I $P($$ACTIVE^XUSER(DUZ),"^")'=1 D
+"RTN","C0CENV",34,0)
+ . D BMES("You are not a valid user on this system")
+"RTN","C0CENV",35,0)
+ . S XPDQUIT=2
+"RTN","C0CENV",36,0)
+ Q
+"RTN","C0CENV",37,0)
+ ;
+"RTN","C0CENV",38,0)
+ ;
+"RTN","C0CENV",39,0)
+EXIT ;
+"RTN","C0CENV",40,0)
+ ;
+"RTN","C0CENV",41,0)
+ ;
+"RTN","C0CENV",42,0)
+ I $G(XPDQUIT) D BMES("--- Install Environment Check FAILED ---") Q
+"RTN","C0CENV",43,0)
+ D BMES("--- Environment Check is Ok ---")
+"RTN","C0CENV",44,0)
+ ;
+"RTN","C0CENV",45,0)
+ Q
+"RTN","C0CENV",46,0)
+ ;
+"RTN","C0CENV",47,0)
+ ;
+"RTN","C0CENV",48,0)
+PRE ;Pre-install entry point
+"RTN","C0CENV",49,0)
+ ;
+"RTN","C0CENV",50,0)
+ ; No action needed in pre-install
+"RTN","C0CENV",51,0)
+ D BMES("No action need for pre-install")
+"RTN","C0CENV",52,0)
+ ;
+"RTN","C0CENV",53,0)
+ Q
+"RTN","C0CENV",54,0)
+ ;
+"RTN","C0CENV",55,0)
+ ;
+"RTN","C0CENV",56,0)
+POST ;Post install
+"RTN","C0CENV",57,0)
+ ;
+"RTN","C0CENV",58,0)
+ ; Check for RPMS system with V LAB file.
+"RTN","C0CENV",59,0)
+ ;
+"RTN","C0CENV",60,0)
+ I $$VFILE^DILFD(9000010.09)'=1 Q
+"RTN","C0CENV",61,0)
+ ;
+"RTN","C0CENV",62,0)
+ S %=$$NEWCP^XPDUTL("RPMS1","POST1^C0CENV")
+"RTN","C0CENV",63,0)
+ S %=$$NEWCP^XPDUTL("RPMS2","POST2^C0CENV")
+"RTN","C0CENV",64,0)
+ S %=$$NEWCP^XPDUTL("RPMS3","POST3^C0CENV")
+"RTN","C0CENV",65,0)
+ S %=$$NEWCP^XPDUTL("RPMS4","POST4^C0CENV")
+"RTN","C0CENV",66,0)
+ S %=$$NEWCP^XPDUTL("RPMS5","POST5^C0CENV")
+"RTN","C0CENV",67,0)
+ S %=$$NEWCP^XPDUTL("RPMS6","POST6^C0CENV")
+"RTN","C0CENV",68,0)
+ S %=$$NEWCP^XPDUTL("RPMS7","POST7^C0CENV")
+"RTN","C0CENV",69,0)
+ ;
+"RTN","C0CENV",70,0)
+ Q
+"RTN","C0CENV",71,0)
+ ;
+"RTN","C0CENV",72,0)
+ ;
+"RTN","C0CENV",73,0)
+POST1 ; Checkpoint call back entry point.
+"RTN","C0CENV",74,0)
+ ; Add new style ALR1 cross-reference to V LAB file.
+"RTN","C0CENV",75,0)
+ ;
+"RTN","C0CENV",76,0)
+ N MSG
+"RTN","C0CENV",77,0)
+ S MSG="Starting installation of ALR1 cross-reference at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CENV",78,0)
+ D BMES(MSG)
+"RTN","C0CENV",79,0)
+ D ALR1^C0CLA7DD
+"RTN","C0CENV",80,0)
+ S MSG="Installation of ALR1 cross-reference completed at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CENV",81,0)
+ D BMES(MSG)
+"RTN","C0CENV",82,0)
+ Q
+"RTN","C0CENV",83,0)
+ ;
+"RTN","C0CENV",84,0)
+ ;
+"RTN","C0CENV",85,0)
+POST2 ; Checkpoint call back entry point.
+"RTN","C0CENV",86,0)
+ ; Add new style ALR2 cross-reference to V LAB file.
+"RTN","C0CENV",87,0)
+ ;
+"RTN","C0CENV",88,0)
+ N MSG
+"RTN","C0CENV",89,0)
+ S MSG="Starting installation of ALR2 cross-reference at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CENV",90,0)
+ D BMES(MSG)
+"RTN","C0CENV",91,0)
+ D ALR2^C0CLA7DD
+"RTN","C0CENV",92,0)
+ S MSG="Installation of ALR2 cross-reference completed at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CENV",93,0)
+ D BMES(MSG)
+"RTN","C0CENV",94,0)
+ Q
+"RTN","C0CENV",95,0)
+ ;
+"RTN","C0CENV",96,0)
+ ;
+"RTN","C0CENV",97,0)
+POST3 ; Checkpoint call back entry point.
+"RTN","C0CENV",98,0)
+ ; Add new style ALR3 cross-reference to V LAB file.
+"RTN","C0CENV",99,0)
+ ;
+"RTN","C0CENV",100,0)
+ N MSG
+"RTN","C0CENV",101,0)
+ S MSG="Starting installation of ALR3 cross-reference at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CENV",102,0)
+ D BMES(MSG)
+"RTN","C0CENV",103,0)
+ D ALR3^C0CLA7DD
+"RTN","C0CENV",104,0)
+ S MSG="Installation of ALR3 cross-reference completed at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CENV",105,0)
+ D BMES(MSG)
+"RTN","C0CENV",106,0)
+ Q
+"RTN","C0CENV",107,0)
+ ;
+"RTN","C0CENV",108,0)
+ ;
+"RTN","C0CENV",109,0)
+POST4 ; Checkpoint call back entry point.
+"RTN","C0CENV",110,0)
+ ; Add new style ALR4 cross-reference to V LAB file.
+"RTN","C0CENV",111,0)
+ ;
+"RTN","C0CENV",112,0)
+ N MSG
+"RTN","C0CENV",113,0)
+ S MSG="Starting installation of ALR4 cross-reference at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CENV",114,0)
+ D BMES(MSG)
+"RTN","C0CENV",115,0)
+ D ALR4^C0CLA7DD
+"RTN","C0CENV",116,0)
+ S MSG="Installation of ALR4 cross-reference completed at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CENV",117,0)
+ D BMES(MSG)
+"RTN","C0CENV",118,0)
+ Q
+"RTN","C0CENV",119,0)
+ ;
+"RTN","C0CENV",120,0)
+ ;
+"RTN","C0CENV",121,0)
+POST5 ; Checkpoint call back entry point.
+"RTN","C0CENV",122,0)
+ ; Add new style ALR5 cross-reference to V LAB file.
+"RTN","C0CENV",123,0)
+ ;
+"RTN","C0CENV",124,0)
+ N MSG
+"RTN","C0CENV",125,0)
+ S MSG="Starting installation of ALR5 cross-reference at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CENV",126,0)
+ D BMES(MSG)
+"RTN","C0CENV",127,0)
+ D ALR5^C0CLA7DD
+"RTN","C0CENV",128,0)
+ S MSG="Installation of ALR5 cross-reference completed at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CENV",129,0)
+ D BMES(MSG)
+"RTN","C0CENV",130,0)
+ Q
+"RTN","C0CENV",131,0)
+ ;
+"RTN","C0CENV",132,0)
+ ;
+"RTN","C0CENV",133,0)
+POST6 ; Checkpoint call back entry point.
+"RTN","C0CENV",134,0)
+ ; Check for RPMS system and determine LAB patch level
+"RTN","C0CENV",135,0)
+ ;  and need to load in C0C version of LA7 routines.
+"RTN","C0CENV",136,0)
+ ;
+"RTN","C0CENV",137,0)
+ N MSG
+"RTN","C0CENV",138,0)
+ ;
+"RTN","C0CENV",139,0)
+ ; Load and rename C0CQRY2 to LA7QRY2 if LA*5.2*69 not installed
+"RTN","C0CENV",140,0)
+ I '$$PATCH^XPDUTL("LA*5.2*69") D
+"RTN","C0CENV",141,0)
+ . S MSG="This system missing LAB patch LA*5.2*69"
+"RTN","C0CENV",142,0)
+ . D BMES(MSG)
+"RTN","C0CENV",143,0)
+ . S MSG="Renaming routine C0CQRY2 to LA7QRY2"
+"RTN","C0CENV",144,0)
+ . D BMES(MSG)
+"RTN","C0CENV",145,0)
+ . D LOAD("C0CQRY2")
+"RTN","C0CENV",146,0)
+ . D SAVE("C0CQRY2","LA7QRY2")
+"RTN","C0CENV",147,0)
+ ;
+"RTN","C0CENV",148,0)
+ ; Load and rename C0CVOBX1 to LA7VOBX1 if LA*5.2*64 not installed.
+"RTN","C0CENV",149,0)
+ I '$$PATCH^XPDUTL("LA*5.2*64") D
+"RTN","C0CENV",150,0)
+ . S MSG="This system missing LAB patch LA*5.2*64"
+"RTN","C0CENV",151,0)
+ . D BMES(MSG)
+"RTN","C0CENV",152,0)
+ . S MSG="Renaming routine C0CVOBX1 to LA7VOBX1"
+"RTN","C0CENV",153,0)
+ . D BMES(MSG)
+"RTN","C0CENV",154,0)
+ . D LOAD("C0CVOBX1")
+"RTN","C0CENV",155,0)
+ . D SAVE("C0CVOBX1","LA7VOBX1")
+"RTN","C0CENV",156,0)
+ ;
+"RTN","C0CENV",157,0)
+ ; Load and rename C0CQRY1 to LA7QRY1 if LA*5.2*68 not installed.
+"RTN","C0CENV",158,0)
+ I '$$PATCH^XPDUTL("LA*5.2*68") D
+"RTN","C0CENV",159,0)
+ . S MSG="This system missing LAB patch LA*5.2*68"
+"RTN","C0CENV",160,0)
+ . D BMES(MSG)
+"RTN","C0CENV",161,0)
+ . S MSG="Renaming routine C0CQRY1 to LA7QRY1"
+"RTN","C0CENV",162,0)
+ . D BMES(MSG)
+"RTN","C0CENV",163,0)
+ . D LOAD("C0CQRY1")
+"RTN","C0CENV",164,0)
+ . D SAVE("C0CQRY1","LA7QRY1")
+"RTN","C0CENV",165,0)
+ ;
+"RTN","C0CENV",166,0)
+ Q
+"RTN","C0CENV",167,0)
+ ;
+"RTN","C0CENV",168,0)
+ ;
+"RTN","C0CENV",169,0)
+POST7 ; Checkpoint call back entry point.
+"RTN","C0CENV",170,0)
+ ;
+"RTN","C0CENV",171,0)
+ D REINDEX^C0CLA7DD
+"RTN","C0CENV",172,0)
+ ;
+"RTN","C0CENV",173,0)
+ Q
+"RTN","C0CENV",174,0)
+ ;
+"RTN","C0CENV",175,0)
+ ;
+"RTN","C0CENV",176,0)
+BMES(STR) ; Write BMES^XPDUTL statements
+"RTN","C0CENV",177,0)
+ ;
+"RTN","C0CENV",178,0)
+ D BMES^XPDUTL($$CJ^XLFSTR(STR,IOM))
+"RTN","C0CENV",179,0)
+ ;
+"RTN","C0CENV",180,0)
+ Q
+"RTN","C0CENV",181,0)
+ ;
+"RTN","C0CENV",182,0)
+ ;
+"RTN","C0CENV",183,0)
+LOAD(X) ; load routine X
+"RTN","C0CENV",184,0)
+ N %N,DIF,XCNP
+"RTN","C0CENV",185,0)
+ K ^TMP($J,X)
+"RTN","C0CENV",186,0)
+ S DIF="^TMP($J,X,",XCNP=0
+"RTN","C0CENV",187,0)
+ X ^%ZOSF("LOAD")
+"RTN","C0CENV",188,0)
+ Q
+"RTN","C0CENV",189,0)
+ ;
+"RTN","C0CENV",190,0)
+ ;
+"RTN","C0CENV",191,0)
+SAVE(OLD,NEW) ; restore routine X
+"RTN","C0CENV",192,0)
+ N %,DIE,X,XCM,XCN,XCS
+"RTN","C0CENV",193,0)
+ S DIE="^TMP($J,"""_OLD_""",",XCN=0,X=NEW
+"RTN","C0CENV",194,0)
+ X ^%ZOSF("SAVE")
+"RTN","C0CENV",195,0)
+ Q
+"RTN","C0CEVC")
+0^76^B18388545
+"RTN","C0CEVC",1,0)
+C0CEVC   ; CCDCCR/GPL - SUPPORT FOR EWD VISTCOM PAGES ; 3/1/2010
+"RTN","C0CEVC",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CEVC",3,0)
+gpltest2 ; experiment with sending a CCR to an ewd page
+"RTN","C0CEVC",4,0)
+ N ZI
+"RTN","C0CEVC",5,0)
+ S ZI=""
+"RTN","C0CEVC",6,0)
+ D PSEUDO
+"RTN","C0CEVC",7,0)
+ N ZIO
+"RTN","C0CEVC",8,0)
+ S ZIO=IO
+"RTN","C0CEVC",9,0)
+ S IO="/dev/null"
+"RTN","C0CEVC",10,0)
+ OPEN IO
+"RTN","C0CEVC",11,0)
+ U IO
+"RTN","C0CEVC",12,0)
+ N G
+"RTN","C0CEVC",13,0)
+ S G=$$URLTOKEN^C0CEWD
+"RTN","C0CEVC",14,0)
+ D CCRRPC^C0CCCR(.GPL,2)
+"RTN","C0CEVC",15,0)
+ S IO=ZIO
+"RTN","C0CEVC",16,0)
+ OPEN IO
+"RTN","C0CEVC",17,0)
+ U IO
+"RTN","C0CEVC",18,0)
+ K GPL(0)
+"RTN","C0CEVC",19,0)
+ F  S ZI=$O(GPL(ZI)) Q:ZI=""  W GPL(ZI),!
+"RTN","C0CEVC",20,0)
+ Q
+"RTN","C0CEVC",21,0)
+ ;
+"RTN","C0CEVC",22,0)
+gpltest ; experiment with sending a CCR to an ewd page
+"RTN","C0CEVC",23,0)
+ N ZI
+"RTN","C0CEVC",24,0)
+ S ZI=""
+"RTN","C0CEVC",25,0)
+ K ^GPL(0)
+"RTN","C0CEVC",26,0)
+ S ^GPL(2)="<?xml-stylesheet type=""text/xsl"" href=""/resources/ccr.xsl""?>"
+"RTN","C0CEVC",27,0)
+ F  S ZI=$O(^GPL(ZI)) Q:ZI=""  W ^GPL(ZI),!
+"RTN","C0CEVC",28,0)
+ Q
+"RTN","C0CEVC",29,0)
+ ;
+"RTN","C0CEVC",30,0)
+TEST(sessid); 
+"RTN","C0CEVC",31,0)
+ d setSessionValue^%zewdAPI("person.Name","Rob",sessid)
+"RTN","C0CEVC",32,0)
+ d setSessionValue^%zewdAPI("person.DateOfBirth","13/06/55",sessid)
+"RTN","C0CEVC",33,0)
+ d setSessionValue^%zewdAPI("person.Address.PostCode","SW1 3QA",sessid)
+"RTN","C0CEVC",34,0)
+ d setSessionValue^%zewdAPI("person.Address.Line1","1 The Street",sessid)
+"RTN","C0CEVC",35,0)
+ d setSessionValue^%zewdAPI("person.Address.2.hello","world",sessid)
+"RTN","C0CEVC",36,0)
+ d setJSONValue^%zewdAPI("json","person",sessid)
+"RTN","C0CEVC",37,0)
+ Q ""
+"RTN","C0CEVC",38,0)
+ 
+"RTN","C0CEVC",39,0)
+PARSE(INXML,INDOC) ;CALL THE EWD PARSER ON INXML, PASSED BY NAME
+"RTN","C0CEVC",40,0)
+ ; INDOC IS PASSED AS THE DOCUMENT NAME TO EWD
+"RTN","C0CEVC",41,0)
+ ; EXTRINSIC WHICH RETURNS THE DOCID ASSIGNED BY EWD
+"RTN","C0CEVC",42,0)
+ N ZR
+"RTN","C0CEVC",43,0)
+ M ^CacheTempEWD($j)=@INXML ;
+"RTN","C0CEVC",44,0)
+ S ZR=$$parseDocument^%zewdHTMLParser(INDOC)
+"RTN","C0CEVC",45,0)
+ Q ZR
+"RTN","C0CEVC",46,0)
+ ;
+"RTN","C0CEVC",47,0)
+TEST2(sessid) ; try to put a ccr in the session
+"RTN","C0CEVC",48,0)
+ S U="^"
+"RTN","C0CEVC",49,0)
+ D PSEUDO ; FAKE LOGIN
+"RTN","C0CEVC",50,0)
+ S ZIO=$IO
+"RTN","C0CEVC",51,0)
+ S DEV="/dev/null"
+"RTN","C0CEVC",52,0)
+ O DEV U DEV
+"RTN","C0CEVC",53,0)
+ N G
+"RTN","C0CEVC",54,0)
+ N ZDFN
+"RTN","C0CEVC",55,0)
+ S ZDFN=$$getSessionValue^%zewdAPI("vista.dfn",sessid)
+"RTN","C0CEVC",56,0)
+ I ZDFN="" S ZDFN=2
+"RTN","C0CEVC",57,0)
+ ;K ^TMP("GPL")
+"RTN","C0CEVC",58,0)
+ ;M ^TMP("GPL")=^%zewdSession("session",sessid)
+"RTN","C0CEVC",59,0)
+ D CCRRPC^C0CCCR(.GPL,ZDFN)
+"RTN","C0CEVC",60,0)
+ K GPL(0)   
+"RTN","C0CEVC",61,0)
+ S GPL(2)="<?xml-stylesheet type=""text/xsl"" href=""/resources/ccr.xsl""?>"
+"RTN","C0CEVC",62,0)
+ C DEV U ZIO
+"RTN","C0CEVC",63,0)
+ ;M ^CacheTempEWD($j)=GPL
+"RTN","C0CEVC",64,0)
+ S DOCNAME="CCR"
+"RTN","C0CEVC",65,0)
+ ;ZWR GPL 
+"RTN","C0CEVC",66,0)
+ ;S ZR=$$parseDocument^%zewdHTMLParser(DOCNAME)
+"RTN","C0CEVC",67,0)
+ ;d setSessionValues^%zewdAPI(DOCNAME,GPL,sessid)
+"RTN","C0CEVC",68,0)
+ d mergeArrayToSession^%zewdAPI(.GPL,DOCNAME,sessid)
+"RTN","C0CEVC",69,0)
+ Q ""
+"RTN","C0CEVC",70,0)
+ ;
+"RTN","C0CEVC",71,0)
+INITSES(sessid) ;initialize an EWD/CPRS session
+"RTN","C0CEVC",72,0)
+ K ^TMP("GPL")
+"RTN","C0CEVC",73,0)
+ ;M ^TMP("GPL")=^%zewdSession("session",sessid)
+"RTN","C0CEVC",74,0)
+ N ZT,ZDFN
+"RTN","C0CEVC",75,0)
+ S ZT=$$URLTOKEN^C0CEWD(sessid)
+"RTN","C0CEVC",76,0)
+ ;S ^TMP("GPL")=ZT
+"RTN","C0CEVC",77,0)
+ d trace^%zewdAPI("*********************ZT="_ZT)
+"RTN","C0CEVC",78,0)
+ S ZDFN=$$PRSEORTK(ZT) ; PARSE THE TOKEN AND LOOK UP THE DFN
+"RTN","C0CEVC",79,0)
+ S ^TMP("GPL","DFN")=ZDFN
+"RTN","C0CEVC",80,0)
+ I ZDFN=0 S DFN=2 ; DEFAULT TEST PATIENT
+"RTN","C0CEVC",81,0)
+ D setSessionValue^%zewdAPI("vista.dfn",ZDFN,sessid)
+"RTN","C0CEVC",82,0)
+ ;M ^TMP("GPL","request")=requestArray
+"RTN","C0CEVC",83,0)
+ ;D PSEUDO
+"RTN","C0CEVC",84,0)
+ ;D ^%ZTER
+"RTN","C0CEVC",85,0)
+ q ""
+"RTN","C0CEVC",86,0)
+ ;
+"RTN","C0CEVC",87,0)
+PRSEORTK(ZTOKEN) ;PARSES THE TOKEN SENT BY CPRS AND RETURNS THE DFN 
+"RTN","C0CEVC",88,0)
+ ; OF THE PATIENT ; HERE'S WHAT THE TOKEN LOOKS LIKE: 
+"RTN","C0CEVC",89,0)
+ ; ^TMP('ORWCHART',6547,'192.168.169.8',002E0FE6)
+"RTN","C0CEVC",90,0)
+ N ZX,ZN1,ZIP,ZN2,ZDFN,ZG
+"RTN","C0CEVC",91,0)
+ S ZDFN=0 ; DEFAULT RETURN
+"RTN","C0CEVC",92,0)
+ S ZN1=$P(ZTOKEN,",",2) ; FIRST NUMBER
+"RTN","C0CEVC",93,0)
+ S ZIP=$P(ZTOKEN,",",3) ; IP NUMBER
+"RTN","C0CEVC",94,0)
+ S ZIP=$P(ZIP,"'",2) ; GET RID OF '
+"RTN","C0CEVC",95,0)
+ S ZN2=$P(ZTOKEN,",",4) ; SECOND NUMBER
+"RTN","C0CEVC",96,0)
+ S ZN2=$P(ZN2,")",1) ; GET RID OF )
+"RTN","C0CEVC",97,0)
+ S ZG=$NA(^TMP("ORWCHART",ZN1,ZIP,ZN2)) ; BUILD THE GLOBAL NAME
+"RTN","C0CEVC",98,0)
+ I $G(@ZG)'="" S ZDFN=@ZG ; ACCESS THE GLOBAL
+"RTN","C0CEVC",99,0)
+ S ^TMP("GPL","FIRSTDFN")=ZDFN
+"RTN","C0CEVC",100,0)
+ S ^TMP("GPL","FIRSTGLB")=ZG
+"RTN","C0CEVC",101,0)
+ Q ZDFN
+"RTN","C0CEVC",102,0)
+ ;
+"RTN","C0CEVC",103,0)
+GETPATIENTLIST(sessid) ;
+"RTN","C0CEVC",104,0)
+ D PSEUDO
+"RTN","C0CEVC",105,0)
+ D LISTALL^ORWPT(.RTN,"NAME","1")
+"RTN","C0CEVC",106,0)
+ N ZI
+"RTN","C0CEVC",107,0)
+ S ZI=""
+"RTN","C0CEVC",108,0)
+ F  S ZI=$O(RTN(ZI)) Q:ZI=""  D  ;
+"RTN","C0CEVC",109,0)
+ . S data(ZI,"DFN")=$P(RTN(ZI),"^",1)
+"RTN","C0CEVC",110,0)
+ . S data(ZI,"Name")=$P(RTN(ZI),"^",2)
+"RTN","C0CEVC",111,0)
+ ; ZWR data
+"RTN","C0CEVC",112,0)
+ ;S data(1,"DFN")=$P(RTN(1),"^",1)
+"RTN","C0CEVC",113,0)
+ ;S data(1,"Name")=$P(RTN(1),"^",2)
+"RTN","C0CEVC",114,0)
+ d deleteFromSession^%zewdAPI("patients",sessid)
+"RTN","C0CEVC",115,0)
+ d createDataTableStore^%zewdYUIRuntime(.data,"patients",sessid)
+"RTN","C0CEVC",116,0)
+ ;d mergeArrayToSession^%zewdAPI(.data,"patients",sessid)
+"RTN","C0CEVC",117,0)
+ Q ""
+"RTN","C0CEVC",118,0)
+ ;
+"RTN","C0CEVC",119,0)
+PSEUDO 
+"RTN","C0CEVC",120,0)
+ S U="^"
+"RTN","C0CEVC",121,0)
+ S DILOCKTM=3
+"RTN","C0CEVC",122,0)
+ S DISYS=19
+"RTN","C0CEVC",123,0)
+ S DT=3100219
+"RTN","C0CEVC",124,0)
+ S DTIME=999
+"RTN","C0CEVC",125,0)
+ S DUZ=10
+"RTN","C0CEVC",126,0)
+ S DUZ(0)="@"
+"RTN","C0CEVC",127,0)
+ S DUZ(1)=""
+"RTN","C0CEVC",128,0)
+ S DUZ(2)=1
+"RTN","C0CEVC",129,0)
+ S DUZ("AG")="V"
+"RTN","C0CEVC",130,0)
+ S DUZ("BUF")=1
+"RTN","C0CEVC",131,0)
+ S DUZ("LANG")=""
+"RTN","C0CEVC",132,0)
+ ;S IO="/dev/pts/2"
+"RTN","C0CEVC",133,0)
+ ;S IO(0)="/dev/pts/2"
+"RTN","C0CEVC",134,0)
+ ;S IO(1,"/dev/pts/2")=""
+"RTN","C0CEVC",135,0)
+ ;S IO("ERROR")=""
+"RTN","C0CEVC",136,0)
+ ;S IO("HOME")="41^/dev/pts/2"
+"RTN","C0CEVC",137,0)
+ ;S IO("ZIO")="/dev/pts/2"
+"RTN","C0CEVC",138,0)
+ ;S IOBS="$C(8)"
+"RTN","C0CEVC",139,0)
+ ;S IOF="#,$C(27,91,50,74,27,91,72)"
+"RTN","C0CEVC",140,0)
+ ;S SIOM=80
+"RTN","C0CEVC",141,0)
+ Q
+"RTN","C0CEVC",142,0)
+ ;
+"RTN","C0CEVC",143,0)
+PSEUDO2 ; FAKE LOGIN SETS SOME LOCAL VARIABLE TO FOOL FILEMAN
+"RTN","C0CEVC",144,0)
+ S DILOCKTM=3
+"RTN","C0CEVC",145,0)
+ S DISYS=19
+"RTN","C0CEVC",146,0)
+ S DT=3100112
+"RTN","C0CEVC",147,0)
+ S DTIME=9999
+"RTN","C0CEVC",148,0)
+ S DUZ=10000000020
+"RTN","C0CEVC",149,0)
+ S DUZ(0)="@"
+"RTN","C0CEVC",150,0)
+ S DUZ(1)=""
+"RTN","C0CEVC",151,0)
+ S DUZ(2)=67
+"RTN","C0CEVC",152,0)
+ S DUZ("AG")="E"
+"RTN","C0CEVC",153,0)
+ S DUZ("BUF")=1
+"RTN","C0CEVC",154,0)
+ S DUZ("LANG")=1
+"RTN","C0CEVC",155,0)
+ S IO="/dev/pts/0"
+"RTN","C0CEVC",156,0)
+ ;S IO(0)="/dev/pts/0"
+"RTN","C0CEVC",157,0)
+ ;S IO(1,"/dev/pts/0")=""
+"RTN","C0CEVC",158,0)
+ ;S IO("ERROR")=""
+"RTN","C0CEVC",159,0)
+ ;S IO("HOME")="50^/dev/pts/0"
+"RTN","C0CEVC",160,0)
+ ;S IO("ZIO")="/dev/pts/0"
+"RTN","C0CEVC",161,0)
+ ;S IOBS="$C(8)"
+"RTN","C0CEVC",162,0)
+ ;S IOF="!!!!!!!!!!!!!!!!!!!!!!!!,#,$C(27,91,50,74,27,91,72)"
+"RTN","C0CEVC",163,0)
+ ;S IOM=80
+"RTN","C0CEVC",164,0)
+ ;S ION="GTM/UNIX TELNET"
+"RTN","C0CEVC",165,0)
+ ;S IOS=50
+"RTN","C0CEVC",166,0)
+ ;S IOSL=24
+"RTN","C0CEVC",167,0)
+ ;S IOST="C-VT100"
+"RTN","C0CEVC",168,0)
+ ;S IOST(0)=9
+"RTN","C0CEVC",169,0)
+ ;S IOT="VTRM"
+"RTN","C0CEVC",170,0)
+ ;S IOXY="W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)"
+"RTN","C0CEVC",171,0)
+ S U="^"
+"RTN","C0CEVC",172,0)
+ S X="1;DIC(4.2,"
+"RTN","C0CEVC",173,0)
+ S XPARSYS="1;DIC(4.2,"
+"RTN","C0CEVC",174,0)
+ S XQXFLG="^^XUP"
+"RTN","C0CEVC",175,0)
+ S Y="DEV^VISTA^hollywood^VISTA:hollywood"
+"RTN","C0CEVC",176,0)
+ Q
+"RTN","C0CEVC",177,0)
+ ;
+"RTN","C0CEWD")
+0^77^B5607678
+"RTN","C0CEWD",1,0)
+C0CEWD   ; CCDCCR/GPL - CCR EWD utilities; 1/6/11
+"RTN","C0CEWD",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CEWD",3,0)
+ ;Copyright 2011 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CEWD",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CEWD",5,0)
+ ;
+"RTN","C0CEWD",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CEWD",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CEWD",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CEWD",9,0)
+ ;(at your option) any later version.
+"RTN","C0CEWD",10,0)
+ ;
+"RTN","C0CEWD",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CEWD",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CEWD",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CEWD",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CEWD",15,0)
+ ;
+"RTN","C0CEWD",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CEWD",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CEWD",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CEWD",19,0)
+ ;
+"RTN","C0CEWD",20,0)
+ Q
+"RTN","C0CEWD",21,0)
+ ;
+"RTN","C0CEWD",22,0)
+TOKEN() ; EXTRINSIC WHICH RETURNS A NEW RANDOM TOKEN
+"RTN","C0CEWD",23,0)
+ Q $$UUID^C0CUTIL ; USE THE UUID FUNCTION IN THE CCR PACKAGE
+"RTN","C0CEWD",24,0)
+ ;
+"RTN","C0CEWD",25,0)
+STORE(ZARY) ; STORE AN ARRAY OF VALUES INDEXED BY A NEW TOKEN
+"RTN","C0CEWD",26,0)
+ ; IN ^TMP("C0E","TOKEN") FOR LATER RETRIEVAL FROM INSIDE AN EWD SESSION
+"RTN","C0CEWD",27,0)
+ ; RETURNS THE TOKEN. ZARY IS PASSED BY NAME
+"RTN","C0CEWD",28,0)
+ N ZT
+"RTN","C0CEWD",29,0)
+ S ZT=$$TOKEN ; GET A NEW TOKEN
+"RTN","C0CEWD",30,0)
+ M ^TMP("C0E","TOKEN",ZT)=@ZARY ;
+"RTN","C0CEWD",31,0)
+ Q ZT
+"RTN","C0CEWD",32,0)
+ ;
+"RTN","C0CEWD",33,0)
+GET(C0ERTN,C0ETOKEN,NOKILL) ; RETRIEVE A STORED ARRAY INDEXED BY ZTOKEN
+"RTN","C0CEWD",34,0)
+ ; KILL THE ARRAY AFTER RETRIEVAL UNLESS NOKILL=1
+"RTN","C0CEWD",35,0)
+ ; C0ERTN IS PASSED BY NAME
+"RTN","C0CEWD",36,0)
+ I '$D(^TMP("C0E","TOKEN",C0ETOKEN)) D  Q  ; DOESN'T EXIST
+"RTN","C0CEWD",37,0)
+ . S @C0ERTN="" ; PASS BACK NULL
+"RTN","C0CEWD",38,0)
+ M @C0ERTN=^TMP("C0E","TOKEN",C0ETOKEN) ; RETRIEVE
+"RTN","C0CEWD",39,0)
+ I $G(NOKILL)'=1 K ^TMP("C0E","TOKEN",C0ETOKEN) ; DELETE
+"RTN","C0CEWD",40,0)
+ Q
+"RTN","C0CEWD",41,0)
+ ;
+"RTN","C0CEWD",42,0)
+URLTOKEN(sessid) ; EXTRINSIC WHICH RETRIEVES THE TOKEN PASSED ON THE URL
+"RTN","C0CEWD",43,0)
+ ; IN EWD EXAMPLE: https://example.com/ewd/myApp/index.ewd?token="12345"
+"RTN","C0CEWD",44,0)
+ N token
+"RTN","C0CEWD",45,0)
+ S token=""
+"RTN","C0CEWD",46,0)
+ s token=$$getRequestValue^%zewdAPI("token",sessid)
+"RTN","C0CEWD",47,0)
+ s token=$tr(token,"""") ; strip out quotes
+"RTN","C0CEWD",48,0)
+ Q token
+"RTN","C0CEWD",49,0)
+ ;
+"RTN","C0CEWD",50,0)
+cbTestMethod(prefix,seedValue,lastSeedValue,optionNo,options) 
+"RTN","C0CEWD",51,0)
+ ;
+"RTN","C0CEWD",52,0)
+ n maxNo,noFound
+"RTN","C0CEWD",53,0)
+ ;
+"RTN","C0CEWD",54,0)
+ s maxNo=50
+"RTN","C0CEWD",55,0)
+ s noFound=0
+"RTN","C0CEWD",56,0)
+ f  s seedValue=$o(^DPT("B",seedValue)) q:seedValue=""  q:noFound=maxNo  d
+"RTN","C0CEWD",57,0)
+ . s lastSeedValue=seedValue
+"RTN","C0CEWD",58,0)
+ . i prefix'="",$e(seedValue,1,$l(prefix))'=prefix q
+"RTN","C0CEWD",59,0)
+ . s optionNo=optionNo+1
+"RTN","C0CEWD",60,0)
+ . s noFound=noFound+1
+"RTN","C0CEWD",61,0)
+ . s options(optionNo)=seedValue
+"RTN","C0CEWD",62,0)
+ QUIT
+"RTN","C0CEWD",63,0)
+ ;
+"RTN","C0CEWD",64,0)
+set1 ;
+"RTN","C0CEWD",65,0)
+ s ^zewd("comboPlus","methodMap","test")="cbTestMethod^C0PEREW"
+"RTN","C0CEWD",66,0)
+ q
+"RTN","C0CEWD",67,0)
+ ;
+"RTN","C0CEWD",68,0)
+test1(sessid) ;
+"RTN","C0CEWD",69,0)
+ d setSessionValue^%zewdAPI("testing","ZZ",sessid)
+"RTN","C0CEWD",70,0)
+ q 0
+"RTN","C0CEWD",71,0)
+ ;
+"RTN","C0CEWD1")
+0^78^B6563070
+"RTN","C0CEWD1",1,0)
+C0CEWD1   ; CCDCCR/GPL - CCR FILEMAN utilities; 12/6/08
+"RTN","C0CEWD1",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CEWD1",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CEWD1",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CEWD1",5,0)
+ ;
+"RTN","C0CEWD1",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CEWD1",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CEWD1",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CEWD1",9,0)
+ ;(at your option) any later version.
+"RTN","C0CEWD1",10,0)
+ ;
+"RTN","C0CEWD1",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CEWD1",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CEWD1",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CEWD1",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CEWD1",15,0)
+ ;
+"RTN","C0CEWD1",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CEWD1",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CEWD1",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CEWD1",19,0)
+ ;
+"RTN","C0CEWD1",20,0)
+ Q
+"RTN","C0CEWD1",21,0)
+ ;
+"RTN","C0CEWD1",22,0)
+TEST(filepath) ; filepath IS THE PATH/FILE TO BE READ IN
+"RTN","C0CEWD1",23,0)
+ i $g(^%ZISH)["" d  ; if the VistA Kernal routine %ZISH exists
+"RTN","C0CEWD1",24,0)
+ . n zfile,zpath,ztmp s (zfile,zpath,ztmp)=""
+"RTN","C0CEWD1",25,0)
+ . s zfile=$re($p($re(filepath),"/",1)) ;file name
+"RTN","C0CEWD1",26,0)
+ . s zpath=$p(filepath,zfile,1) ; file path
+"RTN","C0CEWD1",27,0)
+ . s ztmp=$na(^CacheTempEWD($j,0))
+"RTN","C0CEWD1",28,0)
+ . s ok=$$FTG^%ZISH(zpath,zfile,ztmp,2) ; import the file incrementing subscr 2
+"RTN","C0CEWD1",29,0)
+ q
+"RTN","C0CEWD1",30,0)
+ ;
+"RTN","C0CEWD1",31,0)
+TEST2 ;
+"RTN","C0CEWD1",32,0)
+ s zfilepath="/home/vademo2/CCR/PAT_780_CCR_V1_0_17.xml"
+"RTN","C0CEWD1",33,0)
+ ;s ok=$$gtmImportFile^%zewdHTMLParser(zfilepath)
+"RTN","C0CEWD1",34,0)
+ s ok=$$LOAD(zfilepath) ;load the XML file to the EWD global
+"RTN","C0CEWD1",35,0)
+ s ok=$$parseDocument^%zewdHTMLParser("DerekDOM",0)
+"RTN","C0CEWD1",36,0)
+ ;s ok=$$parseXMLFile^%zewdAPI(zfilepath,"fourthDOM")
+"RTN","C0CEWD1",37,0)
+ w ok,!
+"RTN","C0CEWD1",38,0)
+ q
+"RTN","C0CEWD1",39,0)
+ ;
+"RTN","C0CEWD1",40,0)
+LOAD(filepath) ; load an xml file into the EWD global for DOM processing
+"RTN","C0CEWD1",41,0)
+ ; need to call s error=$$parseDocument^%zewdHTMLParser(docName,isHTML)
+"RTN","C0CEWD1",42,0)
+ ; after to process it to the DOM - isHTML=0 for XML files
+"RTN","C0CEWD1",43,0)
+ n i
+"RTN","C0CEWD1",44,0)
+ i $g(^%ZISH)["" d  QUIT i ; if VistA Kernal routine %ZISH exists - gpl 2/23/09
+"RTN","C0CEWD1",45,0)
+ . n zfile,zpath,ztmp,zok s (zfile,zpath,ztmp)=""
+"RTN","C0CEWD1",46,0)
+ . s zfile=$re($p($re(filepath),"/",1)) ;file name
+"RTN","C0CEWD1",47,0)
+ . s zpath=$p(filepath,zfile,1) ; file path
+"RTN","C0CEWD1",48,0)
+ . s ztmp=$na(^CacheTempEWD($j,0))
+"RTN","C0CEWD1",49,0)
+ . s zok=$$FTG^%ZISH(zpath,zfile,ztmp,2) ; import the file increment subscr 2
+"RTN","C0CEWD1",50,0)
+ . s i=$o(^CacheTempEWD($j,""),-1) ; highest line number
+"RTN","C0CEWD1",51,0)
+ q i
+"RTN","C0CEWD1",52,0)
+ ;
+"RTN","C0CEWD1",53,0)
+Q(ZQ,ZD) ; SEND QUERY ZQ TO DOM ZD AND DIPLAY NODES RETURNED
+"RTN","C0CEWD1",54,0)
+ I '$D(ZD) S ZD="DerekDOM"
+"RTN","C0CEWD1",55,0)
+ s error=$$select^%zewdXPath(ZQ,ZD,.nodes) ;
+"RTN","C0CEWD1",56,0)
+ d displayNodes^%zewdXPath(.nodes)
+"RTN","C0CEWD1",57,0)
+ q
+"RTN","C0CEWD1",58,0)
+ ;
+"RTN","C0CEWD1",59,0)
+GET1URL0(URL) ;
+"RTN","C0CEWD1",60,0)
+ s ok=$$httpGET^%zewdGTM(URL,.gpl)
+"RTN","C0CEWD1",61,0)
+ D INDEX^C0CXPATH("gpl","gpl2")
+"RTN","C0CEWD1",62,0)
+ W !,"S URL=""",URL,"""",!
+"RTN","C0CEWD1",63,0)
+ S G=""
+"RTN","C0CEWD1",64,0)
+ F  S G=$O(gpl2(G)) Q:G=""  D  ;
+"RTN","C0CEWD1",65,0)
+ . W " S VDX(""",G,""")=""",gpl2(G),"""",!
+"RTN","C0CEWD1",66,0)
+ W !
+"RTN","C0CEWD1",67,0)
+ Q
+"RTN","C0CFM1")
+0^24^B27048099
+"RTN","C0CFM1",1,0)
+C0CFM1   ; CCDCCR/GPL - CCR FILEMAN utilities; 12/6/08
+"RTN","C0CFM1",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CFM1",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CFM1",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CFM1",5,0)
+ ;
+"RTN","C0CFM1",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CFM1",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CFM1",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CFM1",9,0)
+ ;(at your option) any later version.
+"RTN","C0CFM1",10,0)
+ ;
+"RTN","C0CFM1",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CFM1",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CFM1",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CFM1",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CFM1",15,0)
+ ;
+"RTN","C0CFM1",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CFM1",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CFM1",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CFM1",19,0)
+ ;
+"RTN","C0CFM1",20,0)
+ W "This is the CCR FILEMAN Utility Library ",!
+"RTN","C0CFM1",21,0)
+ W !
+"RTN","C0CFM1",22,0)
+ Q
+"RTN","C0CFM1",23,0)
+ ;
+"RTN","C0CFM1",24,0)
+PUTRIM(DFN,ZWHICH) ;DFN IS PATIENT , WHICH IS ELEMENT TYPE
+"RTN","C0CFM1",25,0)
+ ;
+"RTN","C0CFM1",26,0)
+ S C0CGLB=$NA(^TMP("GPLRIM","VARS",DFN))
+"RTN","C0CFM1",27,0)
+ I '$D(ZWHICH) S ZWHICH="ALL"
+"RTN","C0CFM1",28,0)
+ I ZWHICH'="ALL" D  ; SINGLE SECTION REQUESTED
+"RTN","C0CFM1",29,0)
+ . S C0CVARS=$NA(@C0CGLB@(ZWHICH))
+"RTN","C0CFM1",30,0)
+ . D PUTRIM1(DFN,ZWHICH,C0CVARS) ; IF ONE SECTION
+"RTN","C0CFM1",31,0)
+ E  D  ; MULTIPLE SECTIONS
+"RTN","C0CFM1",32,0)
+ . S C0CVARS=$NA(@C0CGLB)
+"RTN","C0CFM1",33,0)
+ . S C0CI=""
+"RTN","C0CFM1",34,0)
+ . F  S C0CI=$O(@C0CVARS@(C0CI)) Q:C0CI=""  D  ;FOR EACH SECTION
+"RTN","C0CFM1",35,0)
+ . . S C0CVARSN=$NA(@C0CVARS@(C0CI)) ; GRAB ONE SECTION
+"RTN","C0CFM1",36,0)
+ . . D PUTRIM1(DFN,C0CI,C0CVARSN)
+"RTN","C0CFM1",37,0)
+ Q
+"RTN","C0CFM1",38,0)
+ ;
+"RTN","C0CFM1",39,0)
+PUTRIM1(DFN,ZZTYP,ZVARS) ; PUT ONE SECTION OF VARIABLES INTO CCR ELEMENTS
+"RTN","C0CFM1",40,0)
+ ; ZVARS IS PASSED BY NAME AN HAS THE FORM @ZVARS@(1,"VAR1")="VAL1"
+"RTN","C0CFM1",41,0)
+ S C0CX=0
+"RTN","C0CFM1",42,0)
+ F  S C0CX=$O(@ZVARS@(C0CX)) Q:C0CX=""  D  ; FOR EACH OCCURANCE
+"RTN","C0CFM1",43,0)
+ . W "ZOCC=",C0CX,!
+"RTN","C0CFM1",44,0)
+ . S C0CV=$NA(@ZVARS@(C0CX)) ; VARIABLES FOR THIS OCCURANCE
+"RTN","C0CFM1",45,0)
+ . D PUTELS(DFN,ZZTYP,C0CX,C0CV) ; PUT THEM TO THE CCR ELEMENTS FILE
+"RTN","C0CFM1",46,0)
+ Q
+"RTN","C0CFM1",47,0)
+ ;
+"RTN","C0CFM1",48,0)
+PUTELS(DFN,ZTYPE,ZOCC,ZVALS) ; PUT CCR VALUES INTO THE CCR ELEMENTS FILE
+"RTN","C0CFM1",49,0)
+ ; ^C0C(171.201,   DFN IS THE PATIENT IEN PASSED BY VALUE
+"RTN","C0CFM1",50,0)
+ ; ZTYPE IS THE NODE TYPE IE RESULTS,PROBLEMS PASSED BY VALUE
+"RTN","C0CFM1",51,0)
+ ; ZOCC IS THE OCCURANCE NUMBER IE PROBLEM NUMBER 1,2,3 ETC
+"RTN","C0CFM1",52,0)
+ ; ZVALS ARE THE VARIABLES AND VALUES PASSED BY NAME AND IN THE FORM
+"RTN","C0CFM1",53,0)
+ ; @ZVALS@("VAR1")="VALUE1" FOR ALL VARIABLES IN THIS ELEMENT
+"RTN","C0CFM1",54,0)
+ ; AND @ZVALS@("M",SUBOCCUR,"VAR2")="VALUE2" FOR SUB VARIABLES
+"RTN","C0CFM1",55,0)
+ ;
+"RTN","C0CFM1",56,0)
+ S ZSRC=1 ; CCR SOURCE IS ASSUMED TO BE THIS EHR, WHICH IS ALWAYS SOURCE 1
+"RTN","C0CFM1",57,0)
+ ; PUT THIS IN PARAMETERS - SO SOURCE NUMBER FOR PROCESSING IN CONFIGURABLE
+"RTN","C0CFM1",58,0)
+ N ZF,ZFV S ZF=171.201 S ZFV=171.2012
+"RTN","C0CFM1",59,0)
+ S ZSUBF=171.20122 ;FILE AND SUBFILE NUMBERS
+"RTN","C0CFM1",60,0)
+ N ZSFV S ZSFV=171.201221 ; SUBFILE VARIABLE FILE NUMBER
+"RTN","C0CFM1",61,0)
+ N ZTYPN S ZTYPN=$O(^C0CDIC(170.101,"B",ZTYPE,""))
+"RTN","C0CFM1",62,0)
+ W "ZTYPE: ",ZTYPE," ",ZTYPN,!
+"RTN","C0CFM1",63,0)
+ N ZVARN ; IEN OF VARIABLE BEING PROCESSED
+"RTN","C0CFM1",64,0)
+ ;N C0CFDA ; FDA FOR CCR ELEMENT UPDATE
+"RTN","C0CFM1",65,0)
+ S C0CFDA(ZF,"?+1,",.01)=DFN
+"RTN","C0CFM1",66,0)
+ S C0CFDA(ZF,"?+1,",.02)=ZSRC
+"RTN","C0CFM1",67,0)
+ S C0CFDA(ZF,"?+1,",.03)=ZTYPN
+"RTN","C0CFM1",68,0)
+ S C0CFDA(ZF,"?+1,",.04)=ZOCC ;CREATE OCCURANCE
+"RTN","C0CFM1",69,0)
+ K ZERR
+"RTN","C0CFM1",70,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR") ;ASSIGN RECORD NUMBER
+"RTN","C0CFM1",71,0)
+ I $D(ZERR) B  ;OOPS
+"RTN","C0CFM1",72,0)
+ K C0CFDA
+"RTN","C0CFM1",73,0)
+ S ZD0=$O(^C0C(ZF,"C",DFN,ZSRC,ZTYPN,ZOCC,""))
+"RTN","C0CFM1",74,0)
+ W "RECORD NUMBER: ",ZD0,!
+"RTN","C0CFM1",75,0)
+ ;B
+"RTN","C0CFM1",76,0)
+ S ZCNT=0
+"RTN","C0CFM1",77,0)
+ S ZC0CI="" ;
+"RTN","C0CFM1",78,0)
+ F  S ZC0CI=$O(@ZVALS@(ZC0CI)) Q:ZC0CI=""  D  ;
+"RTN","C0CFM1",79,0)
+ . I ZC0CI'="M" D  ; NOT A SUBVARIABLE
+"RTN","C0CFM1",80,0)
+ . . S ZCNT=ZCNT+1 ;INCREMENT COUNT
+"RTN","C0CFM1",81,0)
+ . . S ZVARN=$$VARPTR(ZC0CI,ZTYPE) ;GET THE POINTER TO THE VAR IN THE CCR DICT
+"RTN","C0CFM1",82,0)
+ . . ; WILL ALLOW FOR LAYGO IF THE VARIABLE IS NOT FOUND
+"RTN","C0CFM1",83,0)
+ . . S C0CFDA(ZFV,"?+"_ZCNT_","_ZD0_",",.01)=ZVARN
+"RTN","C0CFM1",84,0)
+ . . S C0CFDA(ZFV,"?+"_ZCNT_","_ZD0_",",1)=@ZVALS@(ZC0CI)
+"RTN","C0CFM1",85,0)
+ . . ;S C0CFDA(ZSFV,"+1,"_DFN_","_ZSRC_","_ZTYPN_","_ZOCC_",",.01)=ZVARN
+"RTN","C0CFM1",86,0)
+ . . ;S C0CFDA(ZSFV,"+1,"_DFN_","_ZSRC_","_ZTYPN_","_ZOCC_",",1)=@ZVALS@(ZC0CI)
+"RTN","C0CFM1",87,0)
+ ;S GT1(170,"?+1,",.01)="ZZZ NEW MEDVEHICLETEXT"
+"RTN","C0CFM1",88,0)
+ ;S GT1(170,"?+1,",12)="DIR"
+"RTN","C0CFM1",89,0)
+ ;S GT1(171.201221,"?+1,1,5,1,",.01)="ZZZ NEW MEDVEHICLETEXT"
+"RTN","C0CFM1",90,0)
+ ;S GT1(171.201221,"+1,1,5,1,",1)="THIRD NEW MED DIRECTION TEXT"
+"RTN","C0CFM1",91,0)
+ D CLEAN^DILF
+"RTN","C0CFM1",92,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR")
+"RTN","C0CFM1",93,0)
+ Q
+"RTN","C0CFM1",94,0)
+ ;
+"RTN","C0CFM1",95,0)
+VARPTR(ZVAR,ZTYP) ;EXTRINSIC WHICH RETURNS THE POINTER TO ZVAR IN THE
+"RTN","C0CFM1",96,0)
+ ; CCR DICTIONARY. IT IS LAYGO, AS IT WILL ADD THE VARIABLE TO
+"RTN","C0CFM1",97,0)
+ ; THE CCR DICTIONARY IF IT IS NOT THERE. ZTYP IS REQUIRED FOR LAYGO
+"RTN","C0CFM1",98,0)
+ ;
+"RTN","C0CFM1",99,0)
+ N ZCCRD,ZVARN,C0CFDA2
+"RTN","C0CFM1",100,0)
+ S ZCCRD=170 ; FILE NUMBER FOR CCR DICTIONARY
+"RTN","C0CFM1",101,0)
+ S ZVARN=$O(^C0CDIC(170,"B",ZVAR,"")) ;FIND IEN OF VARIABLE
+"RTN","C0CFM1",102,0)
+ I ZVARN="" D  ; VARIABLE NOT IN CCR DICTIONARY - ADD IT
+"RTN","C0CFM1",103,0)
+ . I '$D(ZTYP) D  Q  ; WON'T ADD A VARIABLE WITHOUT A TYPE
+"RTN","C0CFM1",104,0)
+ . . W "CANNOT ADD VARIABLE WITHOUT A TYPE: ",ZVAR,!
+"RTN","C0CFM1",105,0)
+ . S C0CFDA2(ZCCRD,"?+1,",.01)=ZVAR ; NAME OF NEW VARIABLE
+"RTN","C0CFM1",106,0)
+ . S C0CFDA2(ZCCRD,"?+1,",12)=ZTYP ; TYPE EXTERNAL OF NEW VARIABLE
+"RTN","C0CFM1",107,0)
+ . D CLEAN^DILF ;MAKE SURE ERRORS ARE CLEAN
+"RTN","C0CFM1",108,0)
+ . D UPDATE^DIE("E","C0CFDA2","","ZERR") ;ADD VAR TO CCR DICTIONARY
+"RTN","C0CFM1",109,0)
+ . I $D(ZERR) D  ; LAYGO ERROR
+"RTN","C0CFM1",110,0)
+ . . W "ERROR ADDING "_ZC0CI_" TO CCR DICTIONARY",!
+"RTN","C0CFM1",111,0)
+ . E  D  ;
+"RTN","C0CFM1",112,0)
+ . . D CLEAN^DILF ; CLEAN UP
+"RTN","C0CFM1",113,0)
+ . . S ZVARN=$O(^C0CDIC(170,"B",ZVAR,"")) ;FIND IEN OF VARIABLE
+"RTN","C0CFM1",114,0)
+ . . W "ADDED ",ZVAR," TO CCR DICTIONARY, IEN:",ZVARN,!
+"RTN","C0CFM1",115,0)
+ Q ZVARN
+"RTN","C0CFM1",116,0)
+ ;
+"RTN","C0CFM1",117,0)
+BLDTYPS ; ROUTINE TO POPULATE THE CCR NODE TYPES FILE (^C0CDIC(170.101,)
+"RTN","C0CFM1",118,0)
+ ; THE CCR DICTIONARY (^C0CDIC(170, ) HAS MOST OF WHAT'S NEEDED
+"RTN","C0CFM1",119,0)
+ ;
+"RTN","C0CFM1",120,0)
+ N C0CDIC,C0CNODE ;
+"RTN","C0CFM1",121,0)
+ S C0CDIC=$$FILEREF^C0CRNF(170) ; CLOSED FILE REFERENCE TO THE CCR DICTIONARY
+"RTN","C0CFM1",122,0)
+ S C0CNODE=$$FILEREF^C0CRNF(170.101) ; CLOSED REF TO CCR NODE TYPE FILE
+"RTN","C0CFM1",123,0)
+ Q
+"RTN","C0CFM1",124,0)
+ ;
+"RTN","C0CFM1",125,0)
+FIXSEC ;FIX THE SECTION FIELD OF THE CCR DICTIONARY.. IT HAS BEEN REDEFINED
+"RTN","C0CFM1",126,0)
+ ; AS A POINTER TO CCR NODE TYPE INSTEAD OF BEING A SET
+"RTN","C0CFM1",127,0)
+ ; THE SET VALUES ARE PRESERVED IN ^KBAI("SECTION") TO FACILITATE THIS
+"RTN","C0CFM1",128,0)
+ ; CONVERSION
+"RTN","C0CFM1",129,0)
+ ;N C0CC,C0CI,C0CJ,C0CN,C0CZX
+"RTN","C0CFM1",130,0)
+ D FIELDS^C0CRNF("C0CC",170)
+"RTN","C0CFM1",131,0)
+ S C0CI=""
+"RTN","C0CFM1",132,0)
+ F  S C0CI=$O(^KBAI("SECTION",C0CI)) Q:C0CI=""  D  ; EACH SECTION
+"RTN","C0CFM1",133,0)
+ . S C0CZX=""
+"RTN","C0CFM1",134,0)
+ . F  S C0CZX=$O(^KBAI("SECTION",C0CI,C0CZX)) Q:C0CZX=""  D  ; EACH VARIABLE
+"RTN","C0CFM1",135,0)
+ . . W "SECTION ",C0CI," VAR ",C0CZX
+"RTN","C0CFM1",136,0)
+ . . S C0CV=$O(^C0CDIC(170.101,"B",C0CI,""))
+"RTN","C0CFM1",137,0)
+ . . W " TYPE: ",C0CV,!
+"RTN","C0CFM1",138,0)
+ . . D SETFDA("SECTION",C0CV)
+"RTN","C0CFM1",139,0)
+ . . ;ZWR C0CFDA
+"RTN","C0CFM1",140,0)
+ Q
+"RTN","C0CFM1",141,0)
+ ;
+"RTN","C0CFM1",142,0)
+SETFDA(C0CSN,C0CSV) ; INTERNAL ROUTINE TO MAKE AN FDA ENTRY FOR FIELD C0CSN
+"RTN","C0CFM1",143,0)
+ ; TO SET TO VALUE C0CSV.
+"RTN","C0CFM1",144,0)
+ ; C0CFDA,C0CC,C0CZX ARE ASSUMED FROM THE CALLING ROUTINE
+"RTN","C0CFM1",145,0)
+ ; C0CSN,C0CSV ARE PASSED BY VALUE
+"RTN","C0CFM1",146,0)
+ ;
+"RTN","C0CFM1",147,0)
+ N C0CSI,C0CSJ
+"RTN","C0CFM1",148,0)
+ S C0CSI=$$ZFILE(C0CSN,"C0CC") ; FILE NUMBER
+"RTN","C0CFM1",149,0)
+ S C0CSJ=$$ZFIELD(C0CSN,"C0CC") ; FIELD NUMBER
+"RTN","C0CFM1",150,0)
+ S C0CFDA(C0CSI,C0CZX_",",C0CSJ)=C0CSV
+"RTN","C0CFM1",151,0)
+ Q
+"RTN","C0CFM1",152,0)
+ZFILE(ZFN,ZTAB) ; EXTRINSIC TO RETURN FILE NUMBER FOR FIELD NAME PASSED
+"RTN","C0CFM1",153,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 1 OF C0CA(ZFN)
+"RTN","C0CFM1",154,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CFM1",155,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CFM1",156,0)
+ N ZR
+"RTN","C0CFM1",157,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",1)
+"RTN","C0CFM1",158,0)
+ E  S ZR=""
+"RTN","C0CFM1",159,0)
+ Q ZR
+"RTN","C0CFM1",160,0)
+ZFIELD(ZFN,ZTAB) ;EXTRINSIC TO RETURN FIELD NUMBER FOR FIELD NAME PASSED
+"RTN","C0CFM1",161,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 2 OF C0CA(ZFN)
+"RTN","C0CFM1",162,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CFM1",163,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CFM1",164,0)
+ N ZR
+"RTN","C0CFM1",165,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",2)
+"RTN","C0CFM1",166,0)
+ E  S ZR=""
+"RTN","C0CFM1",167,0)
+ Q ZR
+"RTN","C0CFM1",168,0)
+ ;
+"RTN","C0CFM1",169,0)
+ZVALUE(ZFN,ZTAB) ;EXTRINSIC TO RETURN VALUE FOR FIELD NAME PASSED
+"RTN","C0CFM1",170,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF C0CA(ZFN)
+"RTN","C0CFM1",171,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CFM1",172,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CFM1",173,0)
+ N ZR
+"RTN","C0CFM1",174,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",3)
+"RTN","C0CFM1",175,0)
+ E  S ZR=""
+"RTN","C0CFM1",176,0)
+ Q ZR
+"RTN","C0CFM1",177,0)
+ ;
+"RTN","C0CFM2")
+0^31^B102195978
+"RTN","C0CFM2",1,0)
+C0CFM2   ; CCDCCR/GPL - CCR FILEMAN utilities; 12/6/08
+"RTN","C0CFM2",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CFM2",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CFM2",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CFM2",5,0)
+ ;
+"RTN","C0CFM2",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CFM2",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CFM2",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CFM2",9,0)
+ ;(at your option) any later version.
+"RTN","C0CFM2",10,0)
+ ;
+"RTN","C0CFM2",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CFM2",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CFM2",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CFM2",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CFM2",15,0)
+ ;
+"RTN","C0CFM2",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CFM2",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CFM2",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CFM2",19,0)
+ ;
+"RTN","C0CFM2",20,0)
+ W "This is the CCR FILEMAN Utility Library ",!
+"RTN","C0CFM2",21,0)
+ ; THIS SET OF ROUTINES USE CCR E2 (^C0CE(, FILE 171.101) INSTEAD OF
+"RTN","C0CFM2",22,0)
+ ; CCR ELEMENTS (^C0C(179.201,
+"RTN","C0CFM2",23,0)
+ ; E2 IS A SIMPLIFICATION OF CCR ELEMENTS WHERE SUB-ELEMENTS ARE
+"RTN","C0CFM2",24,0)
+ ; AT THE TOP LEVEL. OCCURANCE, THE 4TH PART OF THE KEY IS NOW FREE TEXT
+"RTN","C0CFM2",25,0)
+ ; AND HAS THE FORM X;Y FOR SUB-ELEMENTS
+"RTN","C0CFM2",26,0)
+ ; ALL SUB-VARIABLES HAVE BEEN REMOVED
+"RTN","C0CFM2",27,0)
+ W !
+"RTN","C0CFM2",28,0)
+ Q
+"RTN","C0CFM2",29,0)
+ ;
+"RTN","C0CFM2",30,0)
+RIMTBL(ZWHICH) ; PUT ALL PATIENT IN RIMTBL ZWHICH INTO THE CCR ELEMENTS FILE
+"RTN","C0CFM2",31,0)
+ ;
+"RTN","C0CFM2",32,0)
+ I '$D(RIMBASE) D ASETUP^C0CRIMA ; FOR COMMAND LINE CALLS
+"RTN","C0CFM2",33,0)
+ N ZI,ZJ,ZC,ZPATBASE
+"RTN","C0CFM2",34,0)
+ S ZPATBASE=$NA(@RIMBASE@("RIMTBL","PATS",ZWHICH))
+"RTN","C0CFM2",35,0)
+ S ZI=""
+"RTN","C0CFM2",36,0)
+ F ZJ=0:0 D  Q:$O(@ZPATBASE@(ZI))=""  ; TIL END
+"RTN","C0CFM2",37,0)
+ . S ZI=$O(@ZPATBASE@(ZI))
+"RTN","C0CFM2",38,0)
+ . D PUTRIM(ZI) ; EXPORT THE PATIENT TO A FILE
+"RTN","C0CFM2",39,0)
+ Q
+"RTN","C0CFM2",40,0)
+ ;
+"RTN","C0CFM2",41,0)
+PUTRIM(DFN,ZWHICH) ;DFN IS PATIENT , WHICH IS ELEMENT TYPE
+"RTN","C0CFM2",42,0)
+ ;
+"RTN","C0CFM2",43,0)
+ S C0CGLB=$NA(^TMP("C0CRIM","VARS",DFN))
+"RTN","C0CFM2",44,0)
+ I '$D(ZWHICH) S ZWHICH="ALL"
+"RTN","C0CFM2",45,0)
+ I ZWHICH'="ALL" D  ; SINGLE SECTION REQUESTED
+"RTN","C0CFM2",46,0)
+ . S C0CVARS=$NA(@C0CGLB@(ZWHICH))
+"RTN","C0CFM2",47,0)
+ . D PUTRIM1(DFN,ZWHICH,C0CVARS) ; IF ONE SECTION
+"RTN","C0CFM2",48,0)
+ E  D  ; MULTIPLE SECTIONS
+"RTN","C0CFM2",49,0)
+ . S C0CVARS=$NA(@C0CGLB)
+"RTN","C0CFM2",50,0)
+ . S C0CI=""
+"RTN","C0CFM2",51,0)
+ . F  S C0CI=$O(@C0CVARS@(C0CI)) Q:C0CI=""  D  ;FOR EACH SECTION
+"RTN","C0CFM2",52,0)
+ . . S C0CVARSN=$NA(@C0CVARS@(C0CI)) ; GRAB ONE SECTION
+"RTN","C0CFM2",53,0)
+ . . D PUTRIM1(DFN,C0CI,C0CVARSN)
+"RTN","C0CFM2",54,0)
+ Q
+"RTN","C0CFM2",55,0)
+ ;
+"RTN","C0CFM2",56,0)
+PUTRIM1(DFN,ZZTYP,ZVARS) ; PUT ONE SECTION OF VARIABLES INTO CCR ELEMENTS
+"RTN","C0CFM2",57,0)
+ ; ZVARS IS PASSED BY NAME AN HAS THE FORM @ZVARS@(1,"VAR1")="VAL1"
+"RTN","C0CFM2",58,0)
+ S C0CX=0
+"RTN","C0CFM2",59,0)
+ F  S C0CX=$O(@ZVARS@(C0CX)) Q:C0CX=""  D  ; FOR EACH OCCURANCE
+"RTN","C0CFM2",60,0)
+ . W "ZOCC=",C0CX,!
+"RTN","C0CFM2",61,0)
+ . K C0CMDO ; MULTIPLE SUBELEMENTS FOR THIS OCCURANCE PASSED BY NAME
+"RTN","C0CFM2",62,0)
+ . S C0CV=$NA(@ZVARS@(C0CX)) ; VARIABLES FOR THIS OCCURANCE
+"RTN","C0CFM2",63,0)
+ . D PUTELS(DFN,ZZTYP,C0CX,C0CV) ; PUT THEM TO THE CCR ELEMENTS FILE
+"RTN","C0CFM2",64,0)
+ . I $D(C0CMDO) D  ; MULTIPLES TO HANDLE (THIS IS INSTEAD OF RECURSION :()
+"RTN","C0CFM2",65,0)
+ . . N ZZCNT,ZZC0CI,ZZVALS,ZT,ZZCNT,ZV
+"RTN","C0CFM2",66,0)
+ . . S ZZCNT=0
+"RTN","C0CFM2",67,0)
+ . . S ZZC0CI=0
+"RTN","C0CFM2",68,0)
+ . . S ZZVALS=$NA(@C0CMDO@("M")) ; LOCATION OF THIS MULTILPE
+"RTN","C0CFM2",69,0)
+ . . S ZT=$O(@ZZVALS@("")) ; ELEMENT TYPE OF MULTIPLE
+"RTN","C0CFM2",70,0)
+ . . S ZZVALS=$NA(@ZZVALS@(ZT)) ; PAST MULTIPLE TYPE INDICATOR
+"RTN","C0CFM2",71,0)
+ . . W "MULTIPLE:",ZZVALS,!
+"RTN","C0CFM2",72,0)
+ . . ;B
+"RTN","C0CFM2",73,0)
+ . . F  S ZZC0CI=$O(@ZZVALS@(ZZC0CI)) Q:ZZC0CI=""  D  ; EACH MULTIPLE
+"RTN","C0CFM2",74,0)
+ . . . S ZZCNT=ZZCNT+1 ;INCREMENT COUNT
+"RTN","C0CFM2",75,0)
+ . . . W "COUNT:",ZZCNT,!
+"RTN","C0CFM2",76,0)
+ . . . S ZV=$NA(@ZZVALS@(ZZC0CI))
+"RTN","C0CFM2",77,0)
+ . . . D PUTELS(DFN,ZT,C0CX_";"_ZZCNT,ZV)
+"RTN","C0CFM2",78,0)
+ Q
+"RTN","C0CFM2",79,0)
+ ;
+"RTN","C0CFM2",80,0)
+PUTELS(DFN,ZTYPE,ZOCC,ZVALS) ; PUT CCR VALUES INTO THE CCR ELEMENTS FILE
+"RTN","C0CFM2",81,0)
+ ; 171.101, ^C0CE  DFN IS THE PATIENT IEN PASSED BY VALUE
+"RTN","C0CFM2",82,0)
+ ; ZTYPE IS THE NODE TYPE IE RESULTS,PROBLEMS PASSED BY VALUE
+"RTN","C0CFM2",83,0)
+ ; ZOCC IS THE OCCURANCE NUMBER IE PROBLEM NUMBER 1,2,3 ETC
+"RTN","C0CFM2",84,0)
+ ; ZVALS ARE THE VARIABLES AND VALUES PASSED BY NAME AND IN THE FORM
+"RTN","C0CFM2",85,0)
+ ; @ZVALS@("VAR1")="VALUE1" FOR ALL VARIABLES IN THIS ELEMENT
+"RTN","C0CFM2",86,0)
+ ; AND @ZVALS@("M",SUBOCCUR,"VAR2")="VALUE2" FOR SUB VARIABLES
+"RTN","C0CFM2",87,0)
+ ;
+"RTN","C0CFM2",88,0)
+ N PATN,ZTYPN,XD0,ZTYP
+"RTN","C0CFM2",89,0)
+ I '$D(ZSRC) S ZSRC=1 ; CCR SOURCE IS ASSUMED, 1 IF NOT SET
+"RTN","C0CFM2",90,0)
+ ; PUT THIS IN PARAMETERS - SO SOURCE NUMBER FOR PROCESSING IN CONFIGURABLE
+"RTN","C0CFM2",91,0)
+ N C0CFPAT S C0CFPAT=171.101 ; FILE AT PATIENT LEVEL
+"RTN","C0CFM2",92,0)
+ N C0CFSRC S C0CFSRC=171.111 ; FILE AT CCR SOURCE LVL
+"RTN","C0CFM2",93,0)
+ N C0CFTYP S C0CFTYP=171.121 ; FILE AT ELEMENT TYPE LVL
+"RTN","C0CFM2",94,0)
+ N C0CFOCC S C0CFOCC=171.131 ; FILE AT OCCURANCE LVL
+"RTN","C0CFM2",95,0)
+ N C0CFVAR S C0CFVAR=171.1311 ; FILE AT VARIABLE LVL
+"RTN","C0CFM2",96,0)
+ ;FILE IS ^C0CE(PAT,1,SCR,1,TYP,1,OCC,1,VAR,1, ...
+"RTN","C0CFM2",97,0)
+ ; AND WE HAVE TO ADD THEM LEVEL AT A TIME I THINK
+"RTN","C0CFM2",98,0)
+ N C0CFDA
+"RTN","C0CFM2",99,0)
+ S C0CFDA(C0CFPAT,"?+1,",.01)=DFN
+"RTN","C0CFM2",100,0)
+ D UPDIE ; ADD THE PATIENT
+"RTN","C0CFM2",101,0)
+ S PATN=$O(^C0CE("B",DFN,"")) ; IEN FOR THE PATIENT
+"RTN","C0CFM2",102,0)
+ S C0CFDA(C0CFSRC,"?+1,"_PATN_",",.01)=ZSRC
+"RTN","C0CFM2",103,0)
+ D UPDIE ; ADD THE CCR SOURCE
+"RTN","C0CFM2",104,0)
+ N ZTYPN S ZTYPN=$O(^C0CDIC(170.101,"B",ZTYPE,"")) ; FIND THE ELE TYPE
+"RTN","C0CFM2",105,0)
+ S C0CFDA(C0CFTYP,"?+1,"_ZSRC_","_PATN_",",.01)=ZTYPN
+"RTN","C0CFM2",106,0)
+ D UPDIE ; ADD THE ELEMENT TYPE
+"RTN","C0CFM2",107,0)
+ S ZTYP=$O(^C0CE(PATN,1,ZSRC,1,"B",ZTYPN,"")) ; IEN OF ELEMENT TYPE
+"RTN","C0CFM2",108,0)
+ S C0CFDA(C0CFOCC,"?+1,"_ZTYP_","_ZSRC_","_PATN_",",.01)=ZOCC ; STRING OCC
+"RTN","C0CFM2",109,0)
+ ; OCC IS PRECEDED BY " " TO FORCE STRING STORAGE AND PRESERVE
+"RTN","C0CFM2",110,0)
+ ; STRING COLLATION ON THE INDEX
+"RTN","C0CFM2",111,0)
+ D UPDIE ; ADD THE OCCURANCE
+"RTN","C0CFM2",112,0)
+ S ZD0=$O(^C0CE(PATN,1,ZSRC,1,ZTYP,1,"B",ZOCC,""))
+"RTN","C0CFM2",113,0)
+ W "RECORD NUMBER: ",ZD0,!
+"RTN","C0CFM2",114,0)
+ ;I ZD0=32 B
+"RTN","C0CFM2",115,0)
+ ;I ZD0=31 B
+"RTN","C0CFM2",116,0)
+ N ZCNT,ZC0CI,ZVARN,C0CZ1
+"RTN","C0CFM2",117,0)
+ S ZCNT=0
+"RTN","C0CFM2",118,0)
+ S ZC0CI="" ;
+"RTN","C0CFM2",119,0)
+ F  S ZC0CI=$O(@ZVALS@(ZC0CI)) Q:ZC0CI=""  D  ;
+"RTN","C0CFM2",120,0)
+ . I ZC0CI'="M" D  ; NOT A SUBVARIABLE
+"RTN","C0CFM2",121,0)
+ . . S ZCNT=ZCNT+1 ;INCREMENT COUNT
+"RTN","C0CFM2",122,0)
+ . . S ZVARN=$$VARPTR(ZC0CI,ZTYPE) ;GET THE POINTER TO THE VAR IN THE CCR DICT
+"RTN","C0CFM2",123,0)
+ . . ; WILL ALLOW FOR LAYGO IF THE VARIABLE IS NOT FOUND
+"RTN","C0CFM2",124,0)
+ . . S C0CZ1=ZTYP_","_ZSRC_","_PATN_","
+"RTN","C0CFM2",125,0)
+ . . S C0CFDA(C0CFVAR,"?+"_ZCNT_","_ZD0_","_C0CZ1,.01)=ZVARN
+"RTN","C0CFM2",126,0)
+ . . S ZZVAL=$TR(@ZVALS@(ZC0CI),"^","|")
+"RTN","C0CFM2",127,0)
+ . . S C0CFDA(C0CFVAR,"?+"_ZCNT_","_ZD0_","_C0CZ1,1)=ZZVAL
+"RTN","C0CFM2",128,0)
+ . E  D  ; THIS IS A SUBELEMENT
+"RTN","C0CFM2",129,0)
+ . . ;PUT THE FOLLOWING BACK TO USE RECURSION
+"RTN","C0CFM2",130,0)
+ . . ;N ZZCNT,ZZC0CI,ZZVALS,ZT,ZZCNT,ZV
+"RTN","C0CFM2",131,0)
+ . . ;S ZZCNT=0
+"RTN","C0CFM2",132,0)
+ . . ;S ZZC0CI=0
+"RTN","C0CFM2",133,0)
+ . . ;S ZZVALS=$NA(@ZVALS@("M")) ; LOCATION OF THIS MULTILPE
+"RTN","C0CFM2",134,0)
+ . . ;S ZT=$O(@ZZVALS@("")) ; ELEMENT TYPE OF MULTIPLE
+"RTN","C0CFM2",135,0)
+ . . ;S ZZVALS=$NA(@ZZVALS@(ZT)) ; PAST MULTIPLE TYPE INDICATOR
+"RTN","C0CFM2",136,0)
+ . . ;W "MULTIPLE:",ZZVALS,!
+"RTN","C0CFM2",137,0)
+ . . ;B
+"RTN","C0CFM2",138,0)
+ . . ;F  S ZZC0CI=$O(@ZZVALS@(ZZC0CI)) Q:ZZC0CI=""  D  ; EACH MULTIPLE
+"RTN","C0CFM2",139,0)
+ . . ;. S ZZCNT=ZZCNT+1 ;INCREMENT COUNT
+"RTN","C0CFM2",140,0)
+ . . ;. W "COUNT:",ZZCNT,!
+"RTN","C0CFM2",141,0)
+ . . ;. S ZV=$NA(@ZZVALS@(ZZC0CI))
+"RTN","C0CFM2",142,0)
+ . . ;. D PUTELS(DFN,ZT,ZOCC_";"_ZZCNT,ZV) ; PUT THIS BACK TO DEBUG RECURSION
+"RTN","C0CFM2",143,0)
+ . . S C0CMDO=ZVALS ; FLAG TO HANDLE MULTIPLES (INSTEAD OF RECURSION)
+"RTN","C0CFM2",144,0)
+ D UPDIE ; UPDATE
+"RTN","C0CFM2",145,0)
+ Q
+"RTN","C0CFM2",146,0)
+ ;
+"RTN","C0CFM2",147,0)
+UPDIE ; INTERNAL ROUTINE TO CALL UPDATE^DIE AND CHECK FOR ERRORS
+"RTN","C0CFM2",148,0)
+ K ZERR
+"RTN","C0CFM2",149,0)
+ D CLEAN^DILF
+"RTN","C0CFM2",150,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR")
+"RTN","C0CFM2",151,0)
+ I $D(ZERR) D  ;
+"RTN","C0CFM2",152,0)
+ . W "ERROR",!
+"RTN","C0CFM2",153,0)
+ . ZWR ZERR
+"RTN","C0CFM2",154,0)
+ . B
+"RTN","C0CFM2",155,0)
+ K C0CFDA
+"RTN","C0CFM2",156,0)
+ Q
+"RTN","C0CFM2",157,0)
+ ;
+"RTN","C0CFM2",158,0)
+CHECK ; CHECKSUM EXPERIMENTS
+"RTN","C0CFM2",159,0)
+ ;
+"RTN","C0CFM2",160,0)
+ ;B
+"RTN","C0CFM2",161,0)
+ S ZG=$NA(^C0CE(DA(2),1,DA(1),1,DA))
+"RTN","C0CFM2",162,0)
+ ;S G2=$NA(^C0CE(8,1,1,1,2,1,6))
+"RTN","C0CFM2",163,0)
+ S X=$$CHKSUM^XUSESIG1(ZG)
+"RTN","C0CFM2",164,0)
+ W G1,!
+"RTN","C0CFM2",165,0)
+ Q
+"RTN","C0CFM2",166,0)
+ ;
+"RTN","C0CFM2",167,0)
+CHKELS(DFN) ; CHECKSUM ALL ELEMENTS FOR  A PATIENT
+"RTN","C0CFM2",168,0)
+ ;
+"RTN","C0CFM2",169,0)
+ S ZGLB=$NA(^TMP("C0CCHK"))
+"RTN","C0CFM2",170,0)
+ S ZPAT=$O(^C0CE("B",DFN,""))
+"RTN","C0CFM2",171,0)
+ K @ZGLB@(ZPAT) ; CLEAR PREVIOUS CHECKSUMS
+"RTN","C0CFM2",172,0)
+ S ZSRC=""
+"RTN","C0CFM2",173,0)
+ F  S ZSRC=$O(^C0CE(ZPAT,1,"B",ZSRC)) Q:ZSRC=""  D  ;
+"RTN","C0CFM2",174,0)
+ . W "PAT:",ZPAT," SRC:",ZSRC,!
+"RTN","C0CFM2",175,0)
+ . S ZEL=""
+"RTN","C0CFM2",176,0)
+ . F  S ZEL=$O(^C0CE(ZPAT,1,ZSRC,1,"B",ZEL)) Q:ZEL=""  D  ;ELEMENTS
+"RTN","C0CFM2",177,0)
+ . . W "ELEMENT:",ZEL," "
+"RTN","C0CFM2",178,0)
+ . . S ZELE=$$GET1^DIQ(170.101,ZEL,.01,"E") ;ELEMENT NAME
+"RTN","C0CFM2",179,0)
+ . . W ZELE," "
+"RTN","C0CFM2",180,0)
+ . . S ZELI=$O(^C0CE(ZPAT,1,ZSRC,1,"B",ZEL,""))
+"RTN","C0CFM2",181,0)
+ . . S ZG=$NA(^C0CE(ZPAT,1,ZSRC,1,ZELI))
+"RTN","C0CFM2",182,0)
+ . . S ZCHK=$$CHKSUM^XUSESIG1(ZG) ; CHECKSUM FOR THE ELEMENT
+"RTN","C0CFM2",183,0)
+ . . W ZCHK,!
+"RTN","C0CFM2",184,0)
+ . . S @ZGLB@(ZPAT,ZELE,ZSRC)=ZCHK
+"RTN","C0CFM2",185,0)
+ ZWR ^TMP("C0CCHK",ZPAT,*)
+"RTN","C0CFM2",186,0)
+ Q
+"RTN","C0CFM2",187,0)
+ ;
+"RTN","C0CFM2",188,0)
+DOIT(DFN) ; EXPERIMENT FOR TIMING CALLS USING mumps -dir DOIT^C0CFM2(DFN)
+"RTN","C0CFM2",189,0)
+ D SETXUP
+"RTN","C0CFM2",190,0)
+ D CHKELS(DFN)
+"RTN","C0CFM2",191,0)
+ Q
+"RTN","C0CFM2",192,0)
+ ;
+"RTN","C0CFM2",193,0)
+SETXUP ; SET UP ENVIRONMENT
+"RTN","C0CFM2",194,0)
+ S DISYS=19
+"RTN","C0CFM2",195,0)
+ S DT=3090325
+"RTN","C0CFM2",196,0)
+ S DTIME=300
+"RTN","C0CFM2",197,0)
+ S DUZ=1
+"RTN","C0CFM2",198,0)
+ S DUZ(0)="@"
+"RTN","C0CFM2",199,0)
+ S DUZ(1)=""
+"RTN","C0CFM2",200,0)
+ S DUZ(2)=7247
+"RTN","C0CFM2",201,0)
+ S DUZ("AG")="I"
+"RTN","C0CFM2",202,0)
+ S DUZ("BUF")=1
+"RTN","C0CFM2",203,0)
+ S DUZ("LANG")=""
+"RTN","C0CFM2",204,0)
+ S IO="/dev/pts/20"
+"RTN","C0CFM2",205,0)
+ S IO(0)="/dev/pts/20"
+"RTN","C0CFM2",206,0)
+ S IO(1,"/dev/pts/20")=""
+"RTN","C0CFM2",207,0)
+ S IO("ERROR")=""
+"RTN","C0CFM2",208,0)
+ S IO("HOME")="344^/dev/pts/20"
+"RTN","C0CFM2",209,0)
+ S IO("ZIO")="/dev/pts/20"
+"RTN","C0CFM2",210,0)
+ S IOBS="$C(8)"
+"RTN","C0CFM2",211,0)
+ S IOF="#,$C(27,91,50,74,27,91,72)"
+"RTN","C0CFM2",212,0)
+ S IOM=80
+"RTN","C0CFM2",213,0)
+ S ION="TELNET"
+"RTN","C0CFM2",214,0)
+ S IOS=344
+"RTN","C0CFM2",215,0)
+ S IOSL=24
+"RTN","C0CFM2",216,0)
+ S IOST="C-VT100"
+"RTN","C0CFM2",217,0)
+ S IOST(0)=9
+"RTN","C0CFM2",218,0)
+ S IOT="VTRM"
+"RTN","C0CFM2",219,0)
+ S IOXY="W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)"
+"RTN","C0CFM2",220,0)
+ S U="^"
+"RTN","C0CFM2",221,0)
+ S X="216;DIC(4.2,"
+"RTN","C0CFM2",222,0)
+ S XPARSYS="216;DIC(4.2,"
+"RTN","C0CFM2",223,0)
+ S XQXFLG="^^XUP"
+"RTN","C0CFM2",224,0)
+ Q
+"RTN","C0CFM2",225,0)
+ ; 
+"RTN","C0CFM2",226,0)
+PUTELSOLD(DFN,ZTYPE,ZOCC,ZVALS) ; PUT CCR VALUES INTO THE CCR ELEMENTS FILE
+"RTN","C0CFM2",227,0)
+ ; 171.101, ^C0CE  DFN IS THE PATIENT IEN PASSED BY VALUE
+"RTN","C0CFM2",228,0)
+ ; ZTYPE IS THE NODE TYPE IE RESULTS,PROBLEMS PASSED BY VALUE
+"RTN","C0CFM2",229,0)
+ ; ZOCC IS THE OCCURANCE NUMBER IE PROBLEM NUMBER 1,2,3 ETC
+"RTN","C0CFM2",230,0)
+ ; ZVALS ARE THE VARIABLES AND VALUES PASSED BY NAME AND IN THE FORM
+"RTN","C0CFM2",231,0)
+ ; @ZVALS@("VAR1")="VALUE1" FOR ALL VARIABLES IN THIS ELEMENT
+"RTN","C0CFM2",232,0)
+ ; AND @ZVALS@("M",SUBOCCUR,"VAR2")="VALUE2" FOR SUB VARIABLES
+"RTN","C0CFM2",233,0)
+ ;
+"RTN","C0CFM2",234,0)
+ S ZSRC=1 ; CCR SOURCE IS ASSUMED TO BE THIS EHR, WHICH IS ALWAYS SOURCE 1
+"RTN","C0CFM2",235,0)
+ ; PUT THIS IN PARAMETERS - SO SOURCE NUMBER FOR PROCESSING IN CONFIGURABLE
+"RTN","C0CFM2",236,0)
+ N ZF,ZFV S ZF=171.101 S ZFV=171.1011
+"RTN","C0CFM2",237,0)
+ ;S ZSUBF=171.20122 ;FILE AND SUBFILE NUMBERS
+"RTN","C0CFM2",238,0)
+ ;N ZSFV S ZSFV=171.201221 ; SUBFILE VARIABLE FILE NUMBER
+"RTN","C0CFM2",239,0)
+ N ZTYPN S ZTYPN=$O(^C0CDIC(170.101,"B",ZTYPE,""))
+"RTN","C0CFM2",240,0)
+ W "ZTYPE: ",ZTYPE," ",ZTYPN,!
+"RTN","C0CFM2",241,0)
+ N ZVARN ; IEN OF VARIABLE BEING PROCESSED
+"RTN","C0CFM2",242,0)
+ ;N C0CFDA ; FDA FOR CCR ELEMENT UPDATE
+"RTN","C0CFM2",243,0)
+ K C0CFDA
+"RTN","C0CFM2",244,0)
+ S C0CFDA(ZF,"?+1,",.01)=DFN
+"RTN","C0CFM2",245,0)
+ S C0CFDA(ZF,"?+1,",.02)=ZSRC
+"RTN","C0CFM2",246,0)
+ S C0CFDA(ZF,"?+1,",.03)=ZTYPN
+"RTN","C0CFM2",247,0)
+ S C0CFDA(ZF,"?+1,",.04)=" "_ZOCC ;CREATE OCCURANCE
+"RTN","C0CFM2",248,0)
+ K ZERR
+"RTN","C0CFM2",249,0)
+ ;B
+"RTN","C0CFM2",250,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR") ;ASSIGN RECORD NUMBER
+"RTN","C0CFM2",251,0)
+ I $D(ZERR) B  ;OOPS
+"RTN","C0CFM2",252,0)
+ K C0CFDA
+"RTN","C0CFM2",253,0)
+ S ZD0=$O(^C0CE("C",DFN,ZSRC,ZTYPN,ZOCC,""))
+"RTN","C0CFM2",254,0)
+ W "RECORD NUMBER: ",ZD0,!
+"RTN","C0CFM2",255,0)
+ ;B
+"RTN","C0CFM2",256,0)
+ S ZCNT=0
+"RTN","C0CFM2",257,0)
+ S ZC0CI="" ;
+"RTN","C0CFM2",258,0)
+ F  S ZC0CI=$O(@ZVALS@(ZC0CI)) Q:ZC0CI=""  D  ;
+"RTN","C0CFM2",259,0)
+ . I ZC0CI'="M" D  ; NOT A SUBVARIABLE
+"RTN","C0CFM2",260,0)
+ . . S ZCNT=ZCNT+1 ;INCREMENT COUNT
+"RTN","C0CFM2",261,0)
+ . . S ZVARN=$$VARPTR(ZC0CI,ZTYPE) ;GET THE POINTER TO THE VAR IN THE CCR DICT
+"RTN","C0CFM2",262,0)
+ . . ; WILL ALLOW FOR LAYGO IF THE VARIABLE IS NOT FOUND
+"RTN","C0CFM2",263,0)
+ . . S C0CFDA(ZFV,"?+"_ZCNT_","_ZD0_",",.01)=ZVARN
+"RTN","C0CFM2",264,0)
+ . . S C0CFDA(ZFV,"?+"_ZCNT_","_ZD0_",",1)=@ZVALS@(ZC0CI)
+"RTN","C0CFM2",265,0)
+ . . ;S C0CFDA(ZSFV,"+1,"_DFN_","_ZSRC_","_ZTYPN_","_ZOCC_",",.01)=ZVARN
+"RTN","C0CFM2",266,0)
+ . . ;S C0CFDA(ZSFV,"+1,"_DFN_","_ZSRC_","_ZTYPN_","_ZOCC_",",1)=@ZVALS@(ZC0CI)
+"RTN","C0CFM2",267,0)
+ ;S GT1(170,"?+1,",.01)="ZZZ NEW MEDVEHICLETEXT"
+"RTN","C0CFM2",268,0)
+ ;S GT1(170,"?+1,",12)="DIR"
+"RTN","C0CFM2",269,0)
+ ;S GT1(171.201221,"?+1,1,5,1,",.01)="ZZZ NEW MEDVEHICLETEXT"
+"RTN","C0CFM2",270,0)
+ ;S GT1(171.201221,"+1,1,5,1,",1)="THIRD NEW MED DIRECTION TEXT"
+"RTN","C0CFM2",271,0)
+ D CLEAN^DILF
+"RTN","C0CFM2",272,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR")
+"RTN","C0CFM2",273,0)
+ I $D(ZERR) D  ;
+"RTN","C0CFM2",274,0)
+ . W "ERROR",!
+"RTN","C0CFM2",275,0)
+ . ZWR ZERR
+"RTN","C0CFM2",276,0)
+ . B
+"RTN","C0CFM2",277,0)
+ K C0CFDA
+"RTN","C0CFM2",278,0)
+ Q
+"RTN","C0CFM2",279,0)
+ ;
+"RTN","C0CFM2",280,0)
+VARPTR(ZVAR,ZTYP) ;EXTRINSIC WHICH RETURNS THE POINTER TO ZVAR IN THE
+"RTN","C0CFM2",281,0)
+ ; CCR DICTIONARY. IT IS LAYGO, AS IT WILL ADD THE VARIABLE TO
+"RTN","C0CFM2",282,0)
+ ; THE CCR DICTIONARY IF IT IS NOT THERE. ZTYP IS REQUIRED FOR LAYGO
+"RTN","C0CFM2",283,0)
+ ;
+"RTN","C0CFM2",284,0)
+ N ZCCRD,ZVARN,C0CFDA2
+"RTN","C0CFM2",285,0)
+ S ZCCRD=170 ; FILE NUMBER FOR CCR DICTIONARY
+"RTN","C0CFM2",286,0)
+ S ZVARN=$O(^C0CDIC(170,"B",ZVAR,"")) ;FIND IEN OF VARIABLE
+"RTN","C0CFM2",287,0)
+ I ZVARN="" D  ; VARIABLE NOT IN CCR DICTIONARY - ADD IT
+"RTN","C0CFM2",288,0)
+ . I '$D(ZTYP) D  Q  ; WON'T ADD A VARIABLE WITHOUT A TYPE
+"RTN","C0CFM2",289,0)
+ . . W "CANNOT ADD VARIABLE WITHOUT A TYPE: ",ZVAR,!
+"RTN","C0CFM2",290,0)
+ . S C0CFDA2(ZCCRD,"?+1,",.01)=ZVAR ; NAME OF NEW VARIABLE
+"RTN","C0CFM2",291,0)
+ . S C0CFDA2(ZCCRD,"?+1,",12)=ZTYP ; TYPE EXTERNAL OF NEW VARIABLE
+"RTN","C0CFM2",292,0)
+ . D CLEAN^DILF ;MAKE SURE ERRORS ARE CLEAN
+"RTN","C0CFM2",293,0)
+ . D UPDATE^DIE("E","C0CFDA2","","ZERR") ;ADD VAR TO CCR DICTIONARY
+"RTN","C0CFM2",294,0)
+ . I $D(ZERR) D  ; LAYGO ERROR
+"RTN","C0CFM2",295,0)
+ . . W "ERROR ADDING "_ZC0CI_" TO CCR DICTIONARY",!
+"RTN","C0CFM2",296,0)
+ . E  D  ;
+"RTN","C0CFM2",297,0)
+ . . D CLEAN^DILF ; CLEAN UP
+"RTN","C0CFM2",298,0)
+ . . S ZVARN=$O(^C0CDIC(170,"B",ZVAR,"")) ;FIND IEN OF VARIABLE
+"RTN","C0CFM2",299,0)
+ . . W "ADDED ",ZVAR," TO CCR DICTIONARY, IEN:",ZVARN,!
+"RTN","C0CFM2",300,0)
+ Q ZVARN
+"RTN","C0CFM2",301,0)
+ ;
+"RTN","C0CFM2",302,0)
+BLDTYPS ; ROUTINE TO POPULATE THE CCR NODE TYPES FILE (^C0CDIC(170.101,)
+"RTN","C0CFM2",303,0)
+ ; THE CCR DICTIONARY (^C0CDIC(170, ) HAS MOST OF WHAT'S NEEDED
+"RTN","C0CFM2",304,0)
+ ;
+"RTN","C0CFM2",305,0)
+ N C0CDIC,C0CNODE ;
+"RTN","C0CFM2",306,0)
+ S C0CDIC=$$FILEREF^C0CRNF(170) ; CLOSED FILE REFERENCE TO THE CCR DICTIONARY
+"RTN","C0CFM2",307,0)
+ S C0CNODE=$$FILEREF^C0CRNF(170.101) ; CLOSED REF TO CCR NODE TYPE FILE
+"RTN","C0CFM2",308,0)
+ Q
+"RTN","C0CFM2",309,0)
+ ;
+"RTN","C0CFM2",310,0)
+FIXSEC ;FIX THE SECTION FIELD OF THE CCR DICTIONARY.. IT HAS BEEN REDEFINED
+"RTN","C0CFM2",311,0)
+ ; AS A POINTER TO CCR NODE TYPE INSTEAD OF BEING A SET
+"RTN","C0CFM2",312,0)
+ ; THE SET VALUES ARE PRESERVED IN ^KBAI("SECTION") TO FACILITATE THIS
+"RTN","C0CFM2",313,0)
+ ; CONVERSION
+"RTN","C0CFM2",314,0)
+ ;N C0CC,C0CI,C0CJ,C0CN,C0CZX
+"RTN","C0CFM2",315,0)
+ D FIELDS^C0CRNF("C0CC",170)
+"RTN","C0CFM2",316,0)
+ S C0CI=""
+"RTN","C0CFM2",317,0)
+ F  S C0CI=$O(^KBAI("SECTION",C0CI)) Q:C0CI=""  D  ; EACH SECTION
+"RTN","C0CFM2",318,0)
+ . S C0CZX=""
+"RTN","C0CFM2",319,0)
+ . F  S C0CZX=$O(^KBAI("SECTION",C0CI,C0CZX)) Q:C0CZX=""  D  ; EACH VARIABLE
+"RTN","C0CFM2",320,0)
+ . . W "SECTION ",C0CI," VAR ",C0CZX
+"RTN","C0CFM2",321,0)
+ . . S C0CV=$O(^C0CDIC(170.101,"B",C0CI,""))
+"RTN","C0CFM2",322,0)
+ . . W " TYPE: ",C0CV,!
+"RTN","C0CFM2",323,0)
+ . . D SETFDA("SECTION",C0CV)
+"RTN","C0CFM2",324,0)
+ . . ;ZWR C0CFDA
+"RTN","C0CFM2",325,0)
+ Q
+"RTN","C0CFM2",326,0)
+ ;
+"RTN","C0CFM2",327,0)
+SETFDA(C0CSN,C0CSV) ; INTERNAL ROUTINE TO MAKE AN FDA ENTRY FOR FIELD C0CSN
+"RTN","C0CFM2",328,0)
+ ; TO SET TO VALUE C0CSV.
+"RTN","C0CFM2",329,0)
+ ; C0CFDA,C0CC,C0CZX ARE ASSUMED FROM THE CALLING ROUTINE
+"RTN","C0CFM2",330,0)
+ ; C0CSN,C0CSV ARE PASSED BY VALUE
+"RTN","C0CFM2",331,0)
+ ;
+"RTN","C0CFM2",332,0)
+ N C0CSI,C0CSJ
+"RTN","C0CFM2",333,0)
+ S C0CSI=$$ZFILE(C0CSN,"C0CC") ; FILE NUMBER
+"RTN","C0CFM2",334,0)
+ S C0CSJ=$$ZFIELD(C0CSN,"C0CC") ; FIELD NUMBER
+"RTN","C0CFM2",335,0)
+ S C0CFDA(C0CSI,C0CZX_",",C0CSJ)=C0CSV
+"RTN","C0CFM2",336,0)
+ Q
+"RTN","C0CFM2",337,0)
+ZFILE(ZFN,ZTAB) ; EXTRINSIC TO RETURN FILE NUMBER FOR FIELD NAME PASSED
+"RTN","C0CFM2",338,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 1 OF C0CA(ZFN)
+"RTN","C0CFM2",339,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CFM2",340,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CFM2",341,0)
+ N ZR
+"RTN","C0CFM2",342,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",1)
+"RTN","C0CFM2",343,0)
+ E  S ZR=""
+"RTN","C0CFM2",344,0)
+ Q ZR
+"RTN","C0CFM2",345,0)
+ZFIELD(ZFN,ZTAB) ;EXTRINSIC TO RETURN FIELD NUMBER FOR FIELD NAME PASSED
+"RTN","C0CFM2",346,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 2 OF C0CA(ZFN)
+"RTN","C0CFM2",347,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CFM2",348,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CFM2",349,0)
+ N ZR
+"RTN","C0CFM2",350,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",2)
+"RTN","C0CFM2",351,0)
+ E  S ZR=""
+"RTN","C0CFM2",352,0)
+ Q ZR
+"RTN","C0CFM2",353,0)
+ ;
+"RTN","C0CFM2",354,0)
+ZVALUE(ZFN,ZTAB) ;EXTRINSIC TO RETURN VALUE FOR FIELD NAME PASSED
+"RTN","C0CFM2",355,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF C0CA(ZFN)
+"RTN","C0CFM2",356,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CFM2",357,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CFM2",358,0)
+ N ZR
+"RTN","C0CFM2",359,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",3)
+"RTN","C0CFM2",360,0)
+ E  S ZR=""
+"RTN","C0CFM2",361,0)
+ Q ZR
+"RTN","C0CFM2",362,0)
+ ;
+"RTN","C0CFM3")
+0^79^B68203631
+"RTN","C0CFM3",1,0)
+C0CFM3   ; CCDCCR/GPL - CCR FILEMAN utilities; 12/6/08
+"RTN","C0CFM3",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CFM3",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CFM3",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CFM3",5,0)
+ ;
+"RTN","C0CFM3",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CFM3",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CFM3",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CFM3",9,0)
+ ;(at your option) any later version.
+"RTN","C0CFM3",10,0)
+ ;
+"RTN","C0CFM3",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CFM3",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CFM3",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CFM3",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CFM3",15,0)
+ ;
+"RTN","C0CFM3",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CFM3",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CFM3",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CFM3",19,0)
+ ;
+"RTN","C0CFM3",20,0)
+ W "This is the CCR FILEMAN Utility Library ",!
+"RTN","C0CFM3",21,0)
+ ; THIS SET OF ROUTINES USE CCR E2 (^C0CE(, FILE 171.101) INSTEAD OF
+"RTN","C0CFM3",22,0)
+ ; CCR ELEMENTS (^C0C(179.201,
+"RTN","C0CFM3",23,0)
+ ; E2 IS A SIMPLIFICATION OF CCR ELEMENTS WHERE SUB-ELEMENTS ARE
+"RTN","C0CFM3",24,0)
+ ; AT THE TOP LEVEL. OCCURANCE, THE 4TH PART OF THE KEY IS NOW FREE TEXT
+"RTN","C0CFM3",25,0)
+ ; AND HAS THE FORM X;Y FOR SUB-ELEMENTS
+"RTN","C0CFM3",26,0)
+ ; ALL SUB-VARIABLES HAVE BEEN REMOVED
+"RTN","C0CFM3",27,0)
+ W !
+"RTN","C0CFM3",28,0)
+ Q
+"RTN","C0CFM3",29,0)
+ ;
+"RTN","C0CFM3",30,0)
+RIMTBL(ZWHICH) ; PUT ALL PATIENT IN RIMTBL ZWHICH INTO THE CCR ELEMENTS FILE
+"RTN","C0CFM3",31,0)
+ ; '
+"RTN","C0CFM3",32,0)
+ I '$D(RIMBASE) D ASETUP^GPLRIMA ; FOR COMMAND LINE CALLS
+"RTN","C0CFM3",33,0)
+ N ZI,ZJ,ZC,ZPATBASE
+"RTN","C0CFM3",34,0)
+ S ZPATBASE=$NA(@RIMBASE@("RIMTBL","PATS",ZWHICH))
+"RTN","C0CFM3",35,0)
+ S ZI=""
+"RTN","C0CFM3",36,0)
+ F ZJ=0:0 D  Q:$O(@ZPATBASE@(ZI))=""  ; TIL END
+"RTN","C0CFM3",37,0)
+ . S ZI=$O(@ZPATBASE@(ZI))
+"RTN","C0CFM3",38,0)
+ . D PUTRIM(ZI) ; EXPORT THE PATIENT TO A FILE
+"RTN","C0CFM3",39,0)
+ Q
+"RTN","C0CFM3",40,0)
+ ;
+"RTN","C0CFM3",41,0)
+PUTRIM(DFN,ZWHICH) ;DFN IS PATIENT , WHICH IS ELEMENT TYPE
+"RTN","C0CFM3",42,0)
+ ;
+"RTN","C0CFM3",43,0)
+ S C0CGLB=$NA(^TMP("C0CRIM","VARS",DFN))
+"RTN","C0CFM3",44,0)
+ I '$D(ZWHICH) S ZWHICH="ALL"
+"RTN","C0CFM3",45,0)
+ I ZWHICH'="ALL" D  ; SINGLE SECTION REQUESTED
+"RTN","C0CFM3",46,0)
+ . S C0CVARS=$NA(@C0CGLB@(ZWHICH))
+"RTN","C0CFM3",47,0)
+ . D PUTRIM1(DFN,ZWHICH,C0CVARS) ; IF ONE SECTION
+"RTN","C0CFM3",48,0)
+ E  D  ; MULTIPLE SECTIONS
+"RTN","C0CFM3",49,0)
+ . S C0CVARS=$NA(@C0CGLB)
+"RTN","C0CFM3",50,0)
+ . S C0CI=""
+"RTN","C0CFM3",51,0)
+ . F  S C0CI=$O(@C0CVARS@(C0CI)) Q:C0CI=""  D  ;FOR EACH SECTION
+"RTN","C0CFM3",52,0)
+ . . S C0CVARSN=$NA(@C0CVARS@(C0CI)) ; GRAB ONE SECTION
+"RTN","C0CFM3",53,0)
+ . . D PUTRIM1(DFN,C0CI,C0CVARSN)
+"RTN","C0CFM3",54,0)
+ Q
+"RTN","C0CFM3",55,0)
+ ;
+"RTN","C0CFM3",56,0)
+PUTRIM1(DFN,ZZTYP,ZVARS) ; PUT ONE SECTION OF VARIABLES INTO CCR ELEMENTS
+"RTN","C0CFM3",57,0)
+ ; ZVARS IS PASSED BY NAME AN HAS THE FORM @ZVARS@(1,"VAR1")="VAL1"
+"RTN","C0CFM3",58,0)
+ S C0CX=0
+"RTN","C0CFM3",59,0)
+ F  S C0CX=$O(@ZVARS@(C0CX)) Q:C0CX=""  D  ; FOR EACH OCCURANCE
+"RTN","C0CFM3",60,0)
+ . W "ZOCC=",C0CX,!
+"RTN","C0CFM3",61,0)
+ . K C0CMDO ; MULTIPLE SUBELEMENTS FOR THIS OCCURANCE PASSED BY NAME
+"RTN","C0CFM3",62,0)
+ . S C0CV=$NA(@ZVARS@(C0CX)) ; VARIABLES FOR THIS OCCURANCE
+"RTN","C0CFM3",63,0)
+ . D PUTELS(DFN,ZZTYP,C0CX,C0CV) ; PUT THEM TO THE CCR ELEMENTS FILE
+"RTN","C0CFM3",64,0)
+ . I $D(C0CMDO) D  ; MULTIPLES TO HANDLE (THIS IS INSTEAD OF RECURSION :()
+"RTN","C0CFM3",65,0)
+ . . N ZZCNT,ZZC0CI,ZZVALS,ZT,ZZCNT,ZV
+"RTN","C0CFM3",66,0)
+ . . S ZZCNT=0
+"RTN","C0CFM3",67,0)
+ . . S ZZC0CI=0
+"RTN","C0CFM3",68,0)
+ . . S ZZVALS=$NA(@C0CMDO@("M")) ; LOCATION OF THIS MULTILPE
+"RTN","C0CFM3",69,0)
+ . . S ZT=$O(@ZZVALS@("")) ; ELEMENT TYPE OF MULTIPLE
+"RTN","C0CFM3",70,0)
+ . . S ZZVALS=$NA(@ZZVALS@(ZT)) ; PAST MULTIPLE TYPE INDICATOR
+"RTN","C0CFM3",71,0)
+ . . W "MULTIPLE:",ZZVALS,!
+"RTN","C0CFM3",72,0)
+ . . ;B
+"RTN","C0CFM3",73,0)
+ . . F  S ZZC0CI=$O(@ZZVALS@(ZZC0CI)) Q:ZZC0CI=""  D  ; EACH MULTIPLE
+"RTN","C0CFM3",74,0)
+ . . . S ZZCNT=ZZCNT+1 ;INCREMENT COUNT
+"RTN","C0CFM3",75,0)
+ . . . W "COUNT:",ZZCNT,!
+"RTN","C0CFM3",76,0)
+ . . . S ZV=$NA(@ZZVALS@(ZZC0CI))
+"RTN","C0CFM3",77,0)
+ . . . D PUTELS(DFN,ZT,C0CX_";"_ZZCNT,ZV)
+"RTN","C0CFM3",78,0)
+ Q
+"RTN","C0CFM3",79,0)
+ ;
+"RTN","C0CFM3",80,0)
+PUTELS(DFN,ZTYPE,ZOCC,ZVALS) ; PUT CCR VALUES INTO THE CCR ELEMENTS FILE
+"RTN","C0CFM3",81,0)
+ ; 171.601, ^C0CE  DFN IS THE PATIENT IEN PASSED BY VALUE
+"RTN","C0CFM3",82,0)
+ ; ZTYPE IS THE NODE TYPE IE RESULTS,PROBLEMS PASSED BY VALUE
+"RTN","C0CFM3",83,0)
+ ; ZOCC IS THE OCCURANCE NUMBER IE PROBLEM NUMBER 1,2,3 ETC
+"RTN","C0CFM3",84,0)
+ ; ZVALS ARE THE VARIABLES AND VALUES PASSED BY NAME AND IN THE FORM
+"RTN","C0CFM3",85,0)
+ ; @ZVALS@("VAR1")="VALUE1" FOR ALL VARIABLES IN THIS ELEMENT
+"RTN","C0CFM3",86,0)
+ ; AND @ZVALS@("M",SUBOCCUR,"VAR2")="VALUE2" FOR SUB VARIABLES
+"RTN","C0CFM3",87,0)
+ ;
+"RTN","C0CFM3",88,0)
+ N ZSRC,PATN,ZTYPN,XD0,ZTYP
+"RTN","C0CFM3",89,0)
+ S ZSRC=1 ; CCR SOURCE IS ASSUMED TO BE THIS EHR, WHICH IS ALWAYS SOURCE 1
+"RTN","C0CFM3",90,0)
+ ; PUT THIS IN PARAMETERS - SO SOURCE NUMBER FOR PROCESSING IN CONFIGURABLE
+"RTN","C0CFM3",91,0)
+ N C0CF S C0CF=171.601 ; FILE AT ELEMENT LEVEL
+"RTN","C0CFM3",92,0)
+ N C0CFV S C0CFV=171.6011 ; FILE AT VARIABLE LVL
+"RTN","C0CFM3",93,0)
+ N C0CFDA
+"RTN","C0CFM3",94,0)
+ N ZTYPN S ZTYPN=$O(^C0CDIC(170.101,"B",ZTYPE,""))
+"RTN","C0CFM3",95,0)
+ W "ZTYPE: ",ZTYPE," ",ZTYPN,!
+"RTN","C0CFM3",96,0)
+ N ZVARN ; IEN OF VARIABLE BEING PROCESSED
+"RTN","C0CFM3",97,0)
+ ;N C0CFDA ; FDA FOR CCR ELEMENT UPDATE
+"RTN","C0CFM3",98,0)
+ S C0CFDA(C0CF,"+1,",.01)=ZTYPN
+"RTN","C0CFM3",99,0)
+ S C0CFDA(C0CF,"+1,",.02)=DFN
+"RTN","C0CFM3",100,0)
+ S C0CFDA(C0CF,"+1,",.03)=ZSRC
+"RTN","C0CFM3",101,0)
+ S C0CFDA(C0CF,"+1,",.04)=" "_ZOCC ;CREATE OCCURANCE with leading space
+"RTN","C0CFM3",102,0)
+ D UPDIE ; CREATE THE RECORD
+"RTN","C0CFM3",103,0)
+ S C0CIEN=$O(^C0CE4("C",DFN,ZSRC,ZTYPN," "_ZOCC,""))
+"RTN","C0CFM3",104,0)
+ N ZCNT,ZC0CI,ZVARN,C0CZ1
+"RTN","C0CFM3",105,0)
+ S ZCNT=0
+"RTN","C0CFM3",106,0)
+ S ZC0CI="" ;
+"RTN","C0CFM3",107,0)
+ F  S ZC0CI=$O(@ZVALS@(ZC0CI)) Q:ZC0CI=""  D  ;
+"RTN","C0CFM3",108,0)
+ . I ZC0CI'="M" D  ; NOT A SUBVARIABLE
+"RTN","C0CFM3",109,0)
+ . . S ZCNT=ZCNT+1 ;INCREMENT COUNT
+"RTN","C0CFM3",110,0)
+ . . S ZVARN=$$VARPTR(ZC0CI,ZTYPE) ;GET THE POINTER TO THE VAR IN THE CCR DICT
+"RTN","C0CFM3",111,0)
+ . . ; WILL ALLOW FOR LAYGO IF THE VARIABLE IS NOT FOUND
+"RTN","C0CFM3",112,0)
+ . . S C0CFDA(C0CFV,"+"_ZCNT_","_C0CIEN_",",.01)=ZVARN
+"RTN","C0CFM3",113,0)
+ . . S C0CFDA(C0CFV,"+"_ZCNT_","_C0CIEN_",",1)=@ZVALS@(ZC0CI)
+"RTN","C0CFM3",114,0)
+ . E  D  ; THIS IS A SUBELEMENT
+"RTN","C0CFM3",115,0)
+ . . ;PUT THE FOLLOWING BACK TO USE RECURSION
+"RTN","C0CFM3",116,0)
+ . . ;N ZZCNT,ZZC0CI,ZZVALS,ZT,ZZCNT,ZV
+"RTN","C0CFM3",117,0)
+ . . ;S ZZCNT=0
+"RTN","C0CFM3",118,0)
+ . . ;S ZZC0CI=0
+"RTN","C0CFM3",119,0)
+ . . ;S ZZVALS=$NA(@ZVALS@("M")) ; LOCATION OF THIS MULTILPE
+"RTN","C0CFM3",120,0)
+ . . ;S ZT=$O(@ZZVALS@("")) ; ELEMENT TYPE OF MULTIPLE
+"RTN","C0CFM3",121,0)
+ . . ;S ZZVALS=$NA(@ZZVALS@(ZT)) ; PAST MULTIPLE TYPE INDICATOR
+"RTN","C0CFM3",122,0)
+ . . ;W "MULTIPLE:",ZZVALS,!
+"RTN","C0CFM3",123,0)
+ . . ;B
+"RTN","C0CFM3",124,0)
+ . . ;F  S ZZC0CI=$O(@ZZVALS@(ZZC0CI)) Q:ZZC0CI=""  D  ; EACH MULTIPLE
+"RTN","C0CFM3",125,0)
+ . . ;. S ZZCNT=ZZCNT+1 ;INCREMENT COUNT
+"RTN","C0CFM3",126,0)
+ . . ;. W "COUNT:",ZZCNT,!
+"RTN","C0CFM3",127,0)
+ . . ;. S ZV=$NA(@ZZVALS@(ZZC0CI))
+"RTN","C0CFM3",128,0)
+ . . ;. D PUTELS(DFN,ZT,ZOCC_";"_ZZCNT,ZV) ; PUT THIS BACK TO DEBUG RECURSION
+"RTN","C0CFM3",129,0)
+ . . S C0CMDO=ZVALS ; FLAG TO HANDLE MULTIPLES (INSTEAD OF RECURSION)
+"RTN","C0CFM3",130,0)
+ D UPDIE ; UPDATE
+"RTN","C0CFM3",131,0)
+ Q
+"RTN","C0CFM3",132,0)
+ ;
+"RTN","C0CFM3",133,0)
+UPDIE ; INTERNAL ROUTINE TO CALL UPDATE^DIE AND CHECK FOR ERRORS
+"RTN","C0CFM3",134,0)
+ K ZERR
+"RTN","C0CFM3",135,0)
+ D CLEAN^DILF
+"RTN","C0CFM3",136,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR")
+"RTN","C0CFM3",137,0)
+ I $D(ZERR) D  ;
+"RTN","C0CFM3",138,0)
+ . W "ERROR",!
+"RTN","C0CFM3",139,0)
+ . ZWR ZERR
+"RTN","C0CFM3",140,0)
+ . B
+"RTN","C0CFM3",141,0)
+ K C0CFDA
+"RTN","C0CFM3",142,0)
+ Q
+"RTN","C0CFM3",143,0)
+ ;
+"RTN","C0CFM3",144,0)
+PUTELSOLD(DFN,ZTYPE,ZOCC,ZVALS) ; PUT CCR VALUES INTO THE CCR ELEMENTS FILE
+"RTN","C0CFM3",145,0)
+ ; 171.101, ^C0CE  DFN IS THE PATIENT IEN PASSED BY VALUE
+"RTN","C0CFM3",146,0)
+ ; ZTYPE IS THE NODE TYPE IE RESULTS,PROBLEMS PASSED BY VALUE
+"RTN","C0CFM3",147,0)
+ ; ZOCC IS THE OCCURANCE NUMBER IE PROBLEM NUMBER 1,2,3 ETC
+"RTN","C0CFM3",148,0)
+ ; ZVALS ARE THE VARIABLES AND VALUES PASSED BY NAME AND IN THE FORM
+"RTN","C0CFM3",149,0)
+ ; @ZVALS@("VAR1")="VALUE1" FOR ALL VARIABLES IN THIS ELEMENT
+"RTN","C0CFM3",150,0)
+ ; AND @ZVALS@("M",SUBOCCUR,"VAR2")="VALUE2" FOR SUB VARIABLES
+"RTN","C0CFM3",151,0)
+ ;
+"RTN","C0CFM3",152,0)
+ S ZSRC=1 ; CCR SOURCE IS ASSUMED TO BE THIS EHR, WHICH IS ALWAYS SOURCE 1
+"RTN","C0CFM3",153,0)
+ ; PUT THIS IN PARAMETERS - SO SOURCE NUMBER FOR PROCESSING IN CONFIGURABLE
+"RTN","C0CFM3",154,0)
+ N ZF,ZFV S ZF=171.101 S ZFV=171.1011
+"RTN","C0CFM3",155,0)
+ ;S ZSUBF=171.20122 ;FILE AND SUBFILE NUMBERS
+"RTN","C0CFM3",156,0)
+ ;N ZSFV S ZSFV=171.201221 ; SUBFILE VARIABLE FILE NUMBER
+"RTN","C0CFM3",157,0)
+ N ZTYPN S ZTYPN=$O(^C0CDIC(170.101,"B",ZTYPE,""))
+"RTN","C0CFM3",158,0)
+ W "ZTYPE: ",ZTYPE," ",ZTYPN,!
+"RTN","C0CFM3",159,0)
+ N ZVARN ; IEN OF VARIABLE BEING PROCESSED
+"RTN","C0CFM3",160,0)
+ ;N C0CFDA ; FDA FOR CCR ELEMENT UPDATE
+"RTN","C0CFM3",161,0)
+ K C0CFDA
+"RTN","C0CFM3",162,0)
+ S C0CFDA(ZF,"?+1,",.01)=DFN
+"RTN","C0CFM3",163,0)
+ S C0CFDA(ZF,"?+1,",.02)=ZSRC
+"RTN","C0CFM3",164,0)
+ S C0CFDA(ZF,"?+1,",.03)=ZTYPN
+"RTN","C0CFM3",165,0)
+ S C0CFDA(ZF,"?+1,",.04)=" "_ZOCC ;CREATE OCCURANCE
+"RTN","C0CFM3",166,0)
+ K ZERR
+"RTN","C0CFM3",167,0)
+ ;B
+"RTN","C0CFM3",168,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR") ;ASSIGN RECORD NUMBER
+"RTN","C0CFM3",169,0)
+ I $D(ZERR) B  ;OOPS
+"RTN","C0CFM3",170,0)
+ K C0CFDA
+"RTN","C0CFM3",171,0)
+ S ZD0=$O(^C0CE("C",DFN,ZSRC,ZTYPN,ZOCC,""))
+"RTN","C0CFM3",172,0)
+ W "RECORD NUMBER: ",ZD0,!
+"RTN","C0CFM3",173,0)
+ ;B
+"RTN","C0CFM3",174,0)
+ S ZCNT=0
+"RTN","C0CFM3",175,0)
+ S ZC0CI="" ;
+"RTN","C0CFM3",176,0)
+ F  S ZC0CI=$O(@ZVALS@(ZC0CI)) Q:ZC0CI=""  D  ;
+"RTN","C0CFM3",177,0)
+ . I ZC0CI'="M" D  ; NOT A SUBVARIABLE
+"RTN","C0CFM3",178,0)
+ . . S ZCNT=ZCNT+1 ;INCREMENT COUNT
+"RTN","C0CFM3",179,0)
+ . . S ZVARN=$$VARPTR(ZC0CI,ZTYPE) ;GET THE POINTER TO THE VAR IN THE CCR DICT
+"RTN","C0CFM3",180,0)
+ . . ; WILL ALLOW FOR LAYGO IF THE VARIABLE IS NOT FOUND
+"RTN","C0CFM3",181,0)
+ . . S C0CFDA(ZFV,"?+"_ZCNT_","_ZD0_",",.01)=ZVARN
+"RTN","C0CFM3",182,0)
+ . . S C0CFDA(ZFV,"?+"_ZCNT_","_ZD0_",",1)=@ZVALS@(ZC0CI)
+"RTN","C0CFM3",183,0)
+ . . ;S C0CFDA(ZSFV,"+1,"_DFN_","_ZSRC_","_ZTYPN_","_ZOCC_",",.01)=ZVARN
+"RTN","C0CFM3",184,0)
+ . . ;S C0CFDA(ZSFV,"+1,"_DFN_","_ZSRC_","_ZTYPN_","_ZOCC_",",1)=@ZVALS@(ZC0CI)
+"RTN","C0CFM3",185,0)
+ ;S GT1(170,"?+1,",.01)="ZZZ NEW MEDVEHICLETEXT"
+"RTN","C0CFM3",186,0)
+ ;S GT1(170,"?+1,",12)="DIR"
+"RTN","C0CFM3",187,0)
+ ;S GT1(171.201221,"?+1,1,5,1,",.01)="ZZZ NEW MEDVEHICLETEXT"
+"RTN","C0CFM3",188,0)
+ ;S GT1(171.201221,"+1,1,5,1,",1)="THIRD NEW MED DIRECTION TEXT"
+"RTN","C0CFM3",189,0)
+ D CLEAN^DILF
+"RTN","C0CFM3",190,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR")
+"RTN","C0CFM3",191,0)
+ I $D(ZERR) D  ;
+"RTN","C0CFM3",192,0)
+ . W "ERROR",!
+"RTN","C0CFM3",193,0)
+ . ZWR ZERR
+"RTN","C0CFM3",194,0)
+ . B
+"RTN","C0CFM3",195,0)
+ K C0CFDA
+"RTN","C0CFM3",196,0)
+ Q
+"RTN","C0CFM3",197,0)
+ ;
+"RTN","C0CFM3",198,0)
+VARPTR(ZVAR,ZTYP) ;EXTRINSIC WHICH RETURNS THE POINTER TO ZVAR IN THE
+"RTN","C0CFM3",199,0)
+ ; CCR DICTIONARY. IT IS LAYGO, AS IT WILL ADD THE VARIABLE TO
+"RTN","C0CFM3",200,0)
+ ; THE CCR DICTIONARY IF IT IS NOT THERE. ZTYP IS REQUIRED FOR LAYGO
+"RTN","C0CFM3",201,0)
+ ;
+"RTN","C0CFM3",202,0)
+ N ZCCRD,ZVARN,C0CFDA2
+"RTN","C0CFM3",203,0)
+ S ZCCRD=170 ; FILE NUMBER FOR CCR DICTIONARY
+"RTN","C0CFM3",204,0)
+ S ZVARN=$O(^C0CDIC(170,"B",ZVAR,"")) ;FIND IEN OF VARIABLE
+"RTN","C0CFM3",205,0)
+ I ZVARN="" D  ; VARIABLE NOT IN CCR DICTIONARY - ADD IT
+"RTN","C0CFM3",206,0)
+ . I '$D(ZTYP) D  Q  ; WON'T ADD A VARIABLE WITHOUT A TYPE
+"RTN","C0CFM3",207,0)
+ . . W "CANNOT ADD VARIABLE WITHOUT A TYPE: ",ZVAR,!
+"RTN","C0CFM3",208,0)
+ . S C0CFDA2(ZCCRD,"?+1,",.01)=ZVAR ; NAME OF NEW VARIABLE
+"RTN","C0CFM3",209,0)
+ . S C0CFDA2(ZCCRD,"?+1,",12)=ZTYP ; TYPE EXTERNAL OF NEW VARIABLE
+"RTN","C0CFM3",210,0)
+ . D CLEAN^DILF ;MAKE SURE ERRORS ARE CLEAN
+"RTN","C0CFM3",211,0)
+ . D UPDATE^DIE("E","C0CFDA2","","ZERR") ;ADD VAR TO CCR DICTIONARY
+"RTN","C0CFM3",212,0)
+ . I $D(ZERR) D  ; LAYGO ERROR
+"RTN","C0CFM3",213,0)
+ . . W "ERROR ADDING "_ZC0CI_" TO CCR DICTIONARY",!
+"RTN","C0CFM3",214,0)
+ . E  D  ;
+"RTN","C0CFM3",215,0)
+ . . D CLEAN^DILF ; CLEAN UP
+"RTN","C0CFM3",216,0)
+ . . S ZVARN=$O(^C0CDIC(170,"B",ZVAR,"")) ;FIND IEN OF VARIABLE
+"RTN","C0CFM3",217,0)
+ . . W "ADDED ",ZVAR," TO CCR DICTIONARY, IEN:",ZVARN,!
+"RTN","C0CFM3",218,0)
+ Q ZVARN
+"RTN","C0CFM3",219,0)
+ ;
+"RTN","C0CFM3",220,0)
+BLDTYPS ; ROUTINE TO POPULATE THE CCR NODE TYPES FILE (^C0CDIC(170.101,)
+"RTN","C0CFM3",221,0)
+ ; THE CCR DICTIONARY (^C0CDIC(170, ) HAS MOST OF WHAT'S NEEDED
+"RTN","C0CFM3",222,0)
+ ;
+"RTN","C0CFM3",223,0)
+ N C0CDIC,C0CNODE ;
+"RTN","C0CFM3",224,0)
+ S C0CDIC=$$FILEREF^C0CRNF(170) ; CLOSED FILE REFERENCE TO THE CCR DICTIONARY
+"RTN","C0CFM3",225,0)
+ S C0CNODE=$$FILEREF^C0CRNF(170.101) ; CLOSED REF TO CCR NODE TYPE FILE
+"RTN","C0CFM3",226,0)
+ Q
+"RTN","C0CFM3",227,0)
+ ;
+"RTN","C0CFM3",228,0)
+FIXSEC ;FIX THE SECTION FIELD OF THE CCR DICTIONARY.. IT HAS BEEN REDEFINED
+"RTN","C0CFM3",229,0)
+ ; AS A POINTER TO CCR NODE TYPE INSTEAD OF BEING A SET
+"RTN","C0CFM3",230,0)
+ ; THE SET VALUES ARE PRESERVED IN ^KBAI("SECTION") TO FACILITATE THIS
+"RTN","C0CFM3",231,0)
+ ; CONVERSION
+"RTN","C0CFM3",232,0)
+ ;N C0CC,C0CI,C0CJ,C0CN,C0CZX
+"RTN","C0CFM3",233,0)
+ D FIELDS^C0CRNF("C0CC",170)
+"RTN","C0CFM3",234,0)
+ S C0CI=""
+"RTN","C0CFM3",235,0)
+ F  S C0CI=$O(^KBAI("SECTION",C0CI)) Q:C0CI=""  D  ; EACH SECTION
+"RTN","C0CFM3",236,0)
+ . S C0CZX=""
+"RTN","C0CFM3",237,0)
+ . F  S C0CZX=$O(^KBAI("SECTION",C0CI,C0CZX)) Q:C0CZX=""  D  ; EACH VARIABLE
+"RTN","C0CFM3",238,0)
+ . . W "SECTION ",C0CI," VAR ",C0CZX
+"RTN","C0CFM3",239,0)
+ . . S C0CV=$O(^C0CDIC(170.101,"B",C0CI,""))
+"RTN","C0CFM3",240,0)
+ . . W " TYPE: ",C0CV,!
+"RTN","C0CFM3",241,0)
+ . . D SETFDA("SECTION",C0CV)
+"RTN","C0CFM3",242,0)
+ . . ;ZWR C0CFDA
+"RTN","C0CFM3",243,0)
+ Q
+"RTN","C0CFM3",244,0)
+ ;
+"RTN","C0CFM3",245,0)
+SETFDA(C0CSN,C0CSV) ; INTERNAL ROUTINE TO MAKE AN FDA ENTRY FOR FIELD C0CSN
+"RTN","C0CFM3",246,0)
+ ; TO SET TO VALUE C0CSV.
+"RTN","C0CFM3",247,0)
+ ; C0CFDA,C0CC,C0CZX ARE ASSUMED FROM THE CALLING ROUTINE
+"RTN","C0CFM3",248,0)
+ ; C0CSN,C0CSV ARE PASSED BY VALUE
+"RTN","C0CFM3",249,0)
+ ;
+"RTN","C0CFM3",250,0)
+ N C0CSI,C0CSJ
+"RTN","C0CFM3",251,0)
+ S C0CSI=$$ZFILE(C0CSN,"C0CC") ; FILE NUMBER
+"RTN","C0CFM3",252,0)
+ S C0CSJ=$$ZFIELD(C0CSN,"C0CC") ; FIELD NUMBER
+"RTN","C0CFM3",253,0)
+ S C0CFDA(C0CSI,C0CZX_",",C0CSJ)=C0CSV
+"RTN","C0CFM3",254,0)
+ Q
+"RTN","C0CFM3",255,0)
+ZFILE(ZFN,ZTAB) ; EXTRINSIC TO RETURN FILE NUMBER FOR FIELD NAME PASSED
+"RTN","C0CFM3",256,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 1 OF C0CA(ZFN)
+"RTN","C0CFM3",257,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CFM3",258,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CFM3",259,0)
+ N ZR
+"RTN","C0CFM3",260,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",1)
+"RTN","C0CFM3",261,0)
+ E  S ZR=""
+"RTN","C0CFM3",262,0)
+ Q ZR
+"RTN","C0CFM3",263,0)
+ZFIELD(ZFN,ZTAB) ;EXTRINSIC TO RETURN FIELD NUMBER FOR FIELD NAME PASSED
+"RTN","C0CFM3",264,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 2 OF C0CA(ZFN)
+"RTN","C0CFM3",265,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CFM3",266,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CFM3",267,0)
+ N ZR
+"RTN","C0CFM3",268,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",2)
+"RTN","C0CFM3",269,0)
+ E  S ZR=""
+"RTN","C0CFM3",270,0)
+ Q ZR
+"RTN","C0CFM3",271,0)
+ ;
+"RTN","C0CFM3",272,0)
+ZVALUE(ZFN,ZTAB) ;EXTRINSIC TO RETURN VALUE FOR FIELD NAME PASSED
+"RTN","C0CFM3",273,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF C0CA(ZFN)
+"RTN","C0CFM3",274,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CFM3",275,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CFM3",276,0)
+ N ZR
+"RTN","C0CFM3",277,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",3)
+"RTN","C0CFM3",278,0)
+ E  S ZR=""
+"RTN","C0CFM3",279,0)
+ Q ZR
+"RTN","C0CFM3",280,0)
+ ;
+"RTN","C0CFM3",281,0)
+SHOWE4(DFN) ;
+"RTN","C0CFM3",282,0)
+ ;
+"RTN","C0CFM3",283,0)
+ N ZG
+"RTN","C0CFM3",284,0)
+ S ZG=""
+"RTN","C0CFM3",285,0)
+ F  S ZG=$O(^C0CE4("P",DFN,ZG)) Q:ZG=""  D  ZWR ^C0CE4(ZG,*)
+"RTN","C0CFM3",286,0)
+ Q
+"RTN","C0CFM3",287,0)
+ ;
+"RTN","C0CIM2")
+0^67^B20157375
+"RTN","C0CIM2",1,0)
+C0CIM2  ; CCDCCR/GPL/CJE - CCR/CCD PROCESSING FOR IMMUNIZATIONS ; 01/27/10
+"RTN","C0CIM2",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CIM2",3,0)
+ ;Copyright 2010 George Lilly, University of Minnesota and others.
+"RTN","C0CIM2",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CIM2",5,0)
+ ;See attached copy of the License.
+"RTN","C0CIM2",6,0)
+ ;
+"RTN","C0CIM2",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CIM2",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CIM2",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CIM2",10,0)
+ ;(at your option) any later version.
+"RTN","C0CIM2",11,0)
+ ;
+"RTN","C0CIM2",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CIM2",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CIM2",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CIM2",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CIM2",16,0)
+ ;
+"RTN","C0CIM2",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CIM2",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CIM2",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CIM2",20,0)
+ ;
+"RTN","C0CIM2",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CIM2",22,0)
+ Q
+"RTN","C0CIM2",23,0)
+ ;
+"RTN","C0CIM2",24,0)
+EXTRACT(IMMXML,DFN,IMMOUT) ; EXTRACT PROCEDURES INTO XML TEMPLATE
+"RTN","C0CIM2",25,0)
+ ; IMMXML AND IMMOUT ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CIM2",26,0)
+ ;
+"RTN","C0CIM2",27,0)
+ ; USE THE FOLLOWING TEMPLATE FOR THE RNF2 ARRAYS
+"RTN","C0CIM2",28,0)
+ ; THAT GET PASSED TO *GET ROUTINES
+"RTN","C0CIM2",29,0)
+ ;C0C[NAME]=$NA(^TMP("C0CCCR",$J,DFN,"C0C(NAME))
+"RTN","C0CIM2",30,0)
+ N C0CIMM
+"RTN","C0CIM2",31,0)
+ S C0CIMM=$NA(^TMP("C0CCCR",$J,DFN,"C0CIMM"))
+"RTN","C0CIM2",32,0)
+ ; USE THE FOLLOWING TEMPLATE FOR GETTING/GENERATING THE RNF2 ARRAYS
+"RTN","C0CIM2",33,0)
+ ; THAT GET INSERTED INTO THE XML TEMPLATE
+"RTN","C0CIM2",34,0)
+ ; I '$D(@C0CIMM) D GET[VISTA/RPMS](DFN,C0CIMM) ; GET VARS IF NOT THERE
+"RTN","C0CIM2",35,0)
+ D GETRPMS(DFN,C0CIMM) ; GET VARS IF NOT THERE
+"RTN","C0CIM2",36,0)
+ ; USE THE FOLLOWING TEMPATE FOR MAPPING RNF2 ARRAYS TO XML TEMPLATE
+"RTN","C0CIM2",37,0)
+ ; D MAP([NAME]XML,C0C[NAME],[NAME]OUT) ;MAP RESULTS FOR PROCEDURES
+"RTN","C0CIM2",38,0)
+ D MAP(IMMXML,C0CIMM,IMMOUT) ;MAP RESULTS FOR PROCEDURES
+"RTN","C0CIM2",39,0)
+ Q
+"RTN","C0CIM2",40,0)
+ ;
+"RTN","C0CIM2",41,0)
+GETRPMS(DFN,C0CIMM) ; CALLS GET^BGOVIMM TO GET IMMUNIZATIONS. 
+"RTN","C0CIM2",42,0)
+ ; ERETURNS THEM IN RNF2 ARRAYS PASSED BY NAME
+"RTN","C0CIM2",43,0)
+ ; C0CIMM: IMMUNIZATIONS
+"RTN","C0CIM2",44,0)
+ ; READY TO BE MAPPED TO XML BY MAP^C0CIMM
+"RTN","C0CIM2",45,0)
+ ; THESE RETURN ARRAYS ARE NOT INITIALIZED, BUT ARE ADDED TO IF THEY 
+"RTN","C0CIM2",46,0)
+ ; EXIST.
+"RTN","C0CIM2",47,0)
+ ;
+"RTN","C0CIM2",48,0)
+ ; KILL OF ARRAYS IS TAKEN CARE OF IN ^C0CCCR (K ^TMP("C0CCCR",$J))
+"RTN","C0CIM2",49,0)
+ ;
+"RTN","C0CIM2",50,0)
+ ; SETUP RPC/API CALL HERE
+"RTN","C0CIM2",51,0)
+ ; USE START AND END DATES FROM PARAMETERS IF REQUIRED
+"RTN","C0CIM2",52,0)
+ N IMMA
+"RTN","C0CIM2",53,0)
+ D GET^BGOVIMM(.IMMA,DFN) ; RETURNS ALL RESULTS IN VISIT LOCAL VARIABLE
+"RTN","C0CIM2",54,0)
+ ; PREFORM SORT HERE IF NEEDED
+"RTN","C0CIM2",55,0)
+ ;
+"RTN","C0CIM2",56,0)
+ ; NO SORT REQUIRED FOR IMMUNIZATIONS
+"RTN","C0CIM2",57,0)
+ ;
+"RTN","C0CIM2",58,0)
+ ; MAP EACH ROW OF RPC/API TO RNF1 ARRAY
+"RTN","C0CIM2",59,0)
+ ; RNF1 ARRAY FORMAT:
+"RTN","C0CIM2",60,0)
+ ; VAR("NAME_OF_RIM_VARIABLE")=VALUE
+"RTN","C0CIM2",61,0)
+ ;
+"RTN","C0CIM2",62,0)
+ ; IMMUNIZATIONS ARE DONE DIFFERENTLY DUE TO THE DIFFERENT TYPES OF IMMUNIZATION RESULTS
+"RTN","C0CIM2",63,0)
+ ; THIS LOOP WILL GET EACH ROW, DETERMINE THE TYPE, AND CALL THE RESPECTIVE PROCESSING METHOD
+"RTN","C0CIM2",64,0)
+ ; THAT WILL DO THE MAPPING TO RNF1 STYLE ARRAYS
+"RTN","C0CIM2",65,0)
+ N C0CIM,C0CC,ZRNF
+"RTN","C0CIM2",66,0)
+ S C0CIM="" ; INITIALIZE FOR $O
+"RTN","C0CIM2",67,0)
+ F C0CC=1:1 S C0CIM=$O(@IMMA@(C0CIM)) Q:C0CIM=""  D  ; FOR EACH IMMUNE TYPE IN THE LIST
+"RTN","C0CIM2",68,0)
+ . I DEBUG W @IMMA@(C0CIM),!
+"RTN","C0CIM2",69,0)
+ . ; FIGURE OUT WHICH TYPE OF IMMUNIZATION IT IS (IMMUNIZATION, FORECAST, CONTRAINDICATIONS, REFUSALS)
+"RTN","C0CIM2",70,0)
+ . D:$P(@IMMA@(C0CIM),U,1)="I" IMMUN
+"RTN","C0CIM2",71,0)
+ . D:$P(@IMMA@(C0CIM),U,1)="F" FORECAST
+"RTN","C0CIM2",72,0)
+ . D:$P(@IMMA@(C0CIM),U,1)="C" CONTRA
+"RTN","C0CIM2",73,0)
+ . D:$P(@IMMA@(C0CIM),U,1)="R" REFUSE
+"RTN","C0CIM2",74,0)
+ . D RNF1TO2^C0CRNF(C0CIMM,"ZRNF") ;ADD THIS ROW TO THE ARRAY
+"RTN","C0CIM2",75,0)
+ . K ZRNF
+"RTN","C0CIM2",76,0)
+ ; SAVE RIM VARIABLES SEE C0CRIMA
+"RTN","C0CIM2",77,0)
+ N ZRIM S ZRIM=$NA(^TMP("C0CRIM","VARS",DFN,"IMMUNE"))
+"RTN","C0CIM2",78,0)
+ M @ZRIM=@C0CIMM@("V")
+"RTN","C0CIM2",79,0)
+ Q
+"RTN","C0CIM2",80,0)
+ ;
+"RTN","C0CIM2",81,0)
+IMMUN ; PARSES IMMUNIZATION TYPE ROWS FOR RPMS
+"RTN","C0CIM2",82,0)
+ ; RPC FORMAT
+"RTN","C0CIM2",83,0)
+ ;    I ^ Imm Name [2] ^ Visit Date [3] ^ V File IEN [4] ^ Other Location [5] ^ Group [6] ^ Imm IEN [7] ^ Lot [8] ^
+"RTN","C0CIM2",84,0)
+ ;     Reaction [9] ^ VIS Date [10] ^ Age [11] ^ Visit Date [12] ^ Provider IEN~Name [13] ^ Inj Site [14] ^
+"RTN","C0CIM2",85,0)
+ ;     Volume [15] ^ Visit IEN [16] ^ Visit Category [17] ^ Full Name [18] ^ Location IEN~Name [19] ^ Visit Locked [20]
+"RTN","C0CIM2",86,0)
+ ; RETRIEVE IMMUNIZATION RECORD FROM IMMUNIZATION FILE (9999999.14) FOR THIS IMMUNIZATION
+"RTN","C0CIM2",87,0)
+ D GETN^C0CRNF("C0CZIM",9999999.14,$P(@IMMA@(C0CIM),U,7)) ; GET IMMUNIZATION RECORD
+"RTN","C0CIM2",88,0)
+ ; RETIREVE IMMUNIZATION RECORD FROM V IMMUNIZATION FILE (9000010.11) FOR THIS IMMUNIZATION
+"RTN","C0CIM2",89,0)
+ D GETN^C0CRNF("C0CZVI",9000010.11,$P(@IMMA@(C0CIM),U,4)) ; GET V IMMUNIZATION RECORD
+"RTN","C0CIM2",90,0)
+ S ZRNF("IMMUNEOBJECTID")="IMMUNIZATION_"_C0CC ;UNIQUE OBJECT ID
+"RTN","C0CIM2",91,0)
+ S ZRNF("IMMUNEDATETIMETYPETEXT")="Immunization Date" ; ALL ARE THE SAME
+"RTN","C0CIM2",92,0)
+ S ZRNF("IMMUNEDATETIME")=$$FMDTOUTC^C0CUTIL($$ZVALUEI^C0CRNF("EVENT DATE AND TIME","C0CZVI"),"DT")
+"RTN","C0CIM2",93,0)
+ S ZRNF("IMMUNESOURCEACTORID")="ACTORPROVIDER_"_$P($P(@IMMA@(C0CIM),U,13),"~",1)
+"RTN","C0CIM2",94,0)
+ S ZRNF("IMMUNEPRODUCTNAMETEXT")=$$ZVALUE^C0CRNF("NAME","C0CZIM") ; USE NAME IN IMMUNE RECORD
+"RTN","C0CIM2",95,0)
+ S ZRNF("IMMUNEPRODUCTCODE")=$$ZVALUE^C0CRNF("HL7-CVX CODE","C0CZIM") ;CVX CODE
+"RTN","C0CIM2",96,0)
+ I $$ZVALUE^C0CRNF("HL7-CVX CODE","C0CZIM")'="" S ZRNF("IMMUNEPRODUCTCODESYSTEM")="CDC Vaccine Code"
+"RTN","C0CIM2",97,0)
+ E  S ZRNF("IMMUNEPRODUCTCODESYSTEM")="" ;NULL
+"RTN","C0CIM2",98,0)
+ ;CLEANUP FROM C0CRNF CALLS
+"RTN","C0CIM2",99,0)
+ K C0CZIM,C0CZVI
+"RTN","C0CIM2",100,0)
+ Q
+"RTN","C0CIM2",101,0)
+FORECAST ; PARSES FORECAST TYPE ROWS FOR RPMS
+"RTN","C0CIM2",102,0)
+ ; CURRENTLY DISABLED
+"RTN","C0CIM2",103,0)
+ Q
+"RTN","C0CIM2",104,0)
+CONTRA ; PARSES FORECAST TYPE ROWS FOR RPMS
+"RTN","C0CIM2",105,0)
+ ; CURRENTLY DISABLED
+"RTN","C0CIM2",106,0)
+ Q
+"RTN","C0CIM2",107,0)
+REFUSE ; PARSES FORECAST TYPE ROWS FOR RPMS
+"RTN","C0CIM2",108,0)
+ ; CURRENTLY DISABLED
+"RTN","C0CIM2",109,0)
+ Q
+"RTN","C0CIM2",110,0)
+ ;
+"RTN","C0CIM2",111,0)
+MAP(IMMXML,C0CIMM,IMMOUT) ; MAP IMMUNIZATION XML 
+"RTN","C0CIM2",112,0)
+ ;
+"RTN","C0CIM2",113,0)
+ N ZTEMP S ZTEMP=$NA(^TMP("C0CCCR",$J,DFN,"IMMTEMP")) ;WORK AREA FOR TEMPLATE
+"RTN","C0CIM2",114,0)
+ K @ZTEMP
+"RTN","C0CIM2",115,0)
+ N ZBLD
+"RTN","C0CIM2",116,0)
+ S ZBLD=$NA(^TMP("C0CCCR",$J,DFN,"IMMBLD")) ; BUILD LIST AREA
+"RTN","C0CIM2",117,0)
+ D QUEUE^C0CXPATH(ZBLD,IMMXML,1,1) ; FIRST LINE
+"RTN","C0CIM2",118,0)
+ N ZINNER
+"RTN","C0CIM2",119,0)
+ ; XPATH NEEDS TO MATCH YOUR SECTION
+"RTN","C0CIM2",120,0)
+ D QUERY^C0CXPATH(IMMXML,"//Immunizations/Immunization","ZINNER") ;ONE PROC
+"RTN","C0CIM2",121,0)
+ N ZTMP,ZVAR,ZI
+"RTN","C0CIM2",122,0)
+ S ZI=""
+"RTN","C0CIM2",123,0)
+ F  S ZI=$O(@C0CIMM@("V",ZI)) Q:ZI=""  D  ;FOR EACH IMMUNIZATION
+"RTN","C0CIM2",124,0)
+ . S ZTMP=$NA(@ZTEMP@(ZI)) ;THIS IMMUNIZATION XML
+"RTN","C0CIM2",125,0)
+ . S ZVAR=$NA(@C0CIMM@("V",ZI)) ;THIS IMMUNIZATION VARIABLES
+"RTN","C0CIM2",126,0)
+ . D MAP^C0CXPATH("ZINNER",ZVAR,ZTMP) ; MAP THE IMMUNIZATION
+"RTN","C0CIM2",127,0)
+ . D QUEUE^C0CXPATH(ZBLD,ZTMP,1,@ZTMP@(0)) ;QUEUE FOR BUILD
+"RTN","C0CIM2",128,0)
+ D QUEUE^C0CXPATH(ZBLD,IMMXML,@IMMXML@(0),@IMMXML@(0))
+"RTN","C0CIM2",129,0)
+ N ZZTMP ; IS THIS NEEDED?
+"RTN","C0CIM2",130,0)
+ D BUILD^C0CXPATH(ZBLD,IMMOUT) ;BUILD FINAL XML
+"RTN","C0CIM2",131,0)
+ K @ZTEMP,@ZBLD
+"RTN","C0CIM2",132,0)
+ Q
+"RTN","C0CIM2",133,0)
+ ;  
+"RTN","C0CIMMU")
+0^41^B20441765
+"RTN","C0CIMMU",1,0)
+C0CIMMU ; CCDCCR/GPL - CCR/CCD PROCESSING FOR IMMUNIZATIONS ; 2/2/09
+"RTN","C0CIMMU",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CIMMU",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota.
+"RTN","C0CIMMU",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CIMMU",5,0)
+ ;See attached copy of the License.
+"RTN","C0CIMMU",6,0)
+ ;
+"RTN","C0CIMMU",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CIMMU",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CIMMU",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CIMMU",10,0)
+ ;(at your option) any later version.
+"RTN","C0CIMMU",11,0)
+ ;
+"RTN","C0CIMMU",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CIMMU",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CIMMU",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CIMMU",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CIMMU",16,0)
+ ;
+"RTN","C0CIMMU",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CIMMU",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CIMMU",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CIMMU",20,0)
+ ;
+"RTN","C0CIMMU",21,0)
+ ;
+"RTN","C0CIMMU",22,0)
+ ; PROCESS THE IMMUNIZATIONS SECTION OF THE CCR
+"RTN","C0CIMMU",23,0)
+ ;
+"RTN","C0CIMMU",24,0)
+MAP(IPXML,DFN,OUTXML) ; MAP IMMUNIZATIONS
+"RTN","C0CIMMU",25,0)
+ ;
+"RTN","C0CIMMU",26,0)
+ N C0CZV,C0CZVI ; TO STORE MAPPED VARIABLES
+"RTN","C0CIMMU",27,0)
+ N C0CZT ; TMP ARRAY OF MAPPED XML
+"RTN","C0CIMMU",28,0)
+ S C0CZV=$NA(^TMP("C0CCCR",$J,"IMMUNE")) ; TEMP STORAGE FOR VARIABLES
+"RTN","C0CIMMU",29,0)
+ D EXTRACT(IPXML,DFN,OUTXML) ;EXTRACT THE VARIABLES
+"RTN","C0CIMMU",30,0)
+ N C0CZI,C0CZIC ; COUNT OF IMMUNIZATIONS
+"RTN","C0CIMMU",31,0)
+ S C0CZIC=$G(@C0CZV@(0)) ; TOTAL FROM VARIABLE ARRAY
+"RTN","C0CIMMU",32,0)
+ I C0CZIC>0 D  ;IMMUNIZATIONS FOUND
+"RTN","C0CIMMU",33,0)
+ . F C0CZI=1:1:C0CZIC D  ;FOR EACH IMMUNIZATION
+"RTN","C0CIMMU",34,0)
+ . . S C0CZVI=$NA(@C0CZV@(C0CZI)) ;THIS IMMUNIZATION
+"RTN","C0CIMMU",35,0)
+ . . D MAP^C0CXPATH(IPXML,C0CZVI,"C0CZT") ;MAP THE VARIABLES TO XML
+"RTN","C0CIMMU",36,0)
+ . . I C0CZI=1 D  ; FIRST ONE
+"RTN","C0CIMMU",37,0)
+ . . . D CP^C0CXPATH("C0CZT",OUTXML) ;JUST COPY RESULTS
+"RTN","C0CIMMU",38,0)
+ . . E  D  ;NOT THE FIRST
+"RTN","C0CIMMU",39,0)
+ . . . D INSINNER^C0CXPATH(OUTXML,"C0CZT")
+"RTN","C0CIMMU",40,0)
+ E  S @OUTXML@(0)=0 ; SIGNAL NO IMMUNIZATIONS
+"RTN","C0CIMMU",41,0)
+ N IMMUTMP,I
+"RTN","C0CIMMU",42,0)
+ D MISSING^C0CXPATH(OUTXML,"IMMUTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CIMMU",43,0)
+ I IMMUTMP(0)>0  D  ; IF THERE ARE MISSING VARS -
+"RTN","C0CIMMU",44,0)
+ . ; STRINGS MARKED AS @@X@@
+"RTN","C0CIMMU",45,0)
+ . W !,"IMMUNE Missing list: ",!
+"RTN","C0CIMMU",46,0)
+ . F I=1:1:IMMUTMP(0) W IMMUTMP(I),!
+"RTN","C0CIMMU",47,0)
+ Q
+"RTN","C0CIMMU",48,0)
+ ;
+"RTN","C0CIMMU",49,0)
+EXTRACT(IPXML,DFN,OUTXML) ; EXTRACT IMMUNIZATIONS INTO VARIABLES
+"RTN","C0CIMMU",50,0)
+ ;
+"RTN","C0CIMMU",51,0)
+ ; INXML AND OUTXML ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CIMMU",52,0)
+ ; INXML WILL CONTAIN ONLY THE PROBLEM SECTION OF THE OVERALL TEMPLATE
+"RTN","C0CIMMU",53,0)
+ ; ONLY THE XML FOR ONE PROBLEM WILL BE PASSED. THIS ROUTINE WILL MAKE
+"RTN","C0CIMMU",54,0)
+ ; COPIES AS NECESSARY TO REPRESENT MULTIPLE PROBLEMS
+"RTN","C0CIMMU",55,0)
+ ; INSERT^C0CXPATH IS USED TO APPEND THE PROBLEMS TO THE OUTPUT
+"RTN","C0CIMMU",56,0)
+ ;
+"RTN","C0CIMMU",57,0)
+ N RPCRSLT,J,K,PTMP,X,VMAP,TBU
+"RTN","C0CIMMU",58,0)
+ S TVMAP=$NA(^TMP("C0CCCR",$J,"IMMUNE"))
+"RTN","C0CIMMU",59,0)
+ S TARYTMP=$NA(^TMP("C0CCCR",$J,"IMMUARYTMP"))
+"RTN","C0CIMMU",60,0)
+ S IMMA=$NA(^TMP("PXI",$J)) ;
+"RTN","C0CIMMU",61,0)
+ K @IMMA ; CLEAR OUT PREVIOUS RESULTS
+"RTN","C0CIMMU",62,0)
+ K @TVMAP,@TARYTMP ; KILL OLD ARRAY VALUES
+"RTN","C0CIMMU",63,0)
+ D IMMUN^PXRHS03(DFN) ;
+"RTN","C0CIMMU",64,0)
+ I $O(@IMMA@(""))="" D  Q  ; RPC RETURNS NULL
+"RTN","C0CIMMU",65,0)
+ . W "NULL RESULT FROM IMMUN^PXRHS03 ",!
+"RTN","C0CIMMU",66,0)
+ . S @TVMAP@(0)=0
+"RTN","C0CIMMU",67,0)
+ N C0CIM,C0CC,C0CIMD,C0CIEN,C0CT ;
+"RTN","C0CIMMU",68,0)
+ S C0CIM=""
+"RTN","C0CIMMU",69,0)
+ S C0CC=0 ; COUNT
+"RTN","C0CIMMU",70,0)
+ F  S C0CIM=$O(@IMMA@(C0CIM)) Q:C0CIM=""  D  ; FOR EACH IMMUNE TYPE IN THE LIST
+"RTN","C0CIMMU",71,0)
+ . S C0CC=C0CC+1 ;INCREMENT COUNT
+"RTN","C0CIMMU",72,0)
+ . S @TVMAP@(0)=C0CC ; SAVE NEW COUNT TO ARRAY
+"RTN","C0CIMMU",73,0)
+ . S VMAP=$NA(@TVMAP@(C0CC)) ; THIS IMMUNE ELEMENT
+"RTN","C0CIMMU",74,0)
+ . K @VMAP ; MAKE SURE IT IS CLEARED OUT
+"RTN","C0CIMMU",75,0)
+ . W C0CIM,!
+"RTN","C0CIMMU",76,0)
+ . S C0CIMD="" ; IMMUNE DATE
+"RTN","C0CIMMU",77,0)
+ . F  S C0CIMD=$O(@IMMA@(C0CIM,C0CIMD)) Q:C0CIMD=""  D  ; FOR EACH DATE
+"RTN","C0CIMMU",78,0)
+ . . S C0CIEN=$O(@IMMA@(C0CIM,C0CIMD,"")) ;IEN OF IMMUNE RECORD
+"RTN","C0CIMMU",79,0)
+ . . D GETN^C0CRNF("C0CI",9000010.11,C0CIEN) ; GET THE FILEMAN RECORD FOR IENS
+"RTN","C0CIMMU",80,0)
+ . . W C0CIEN,"_",C0CIMD
+"RTN","C0CIMMU",81,0)
+ . . S C0CT=$$FMDTOUTC^C0CUTIL(9999999-C0CIMD,"DT") ; FORMAT DATE/TIME
+"RTN","C0CIMMU",82,0)
+ . . W C0CT,!
+"RTN","C0CIMMU",83,0)
+ . . S @VMAP@("IMMUNEOBJECTID")="IMMUNIZATION_"_C0CC ;UNIQUE OBJECT ID
+"RTN","C0CIMMU",84,0)
+ . . S @VMAP@("IMMUNEDATETIMETYPETEXT")="Immunization Date" ; ALL ARE THE SAME
+"RTN","C0CIMMU",85,0)
+ . . S @VMAP@("IMMUNEDATETIME")=C0CT ;FORMATTED DATE/TIME
+"RTN","C0CIMMU",86,0)
+ . . S C0CIP=$$ZVALUEI^C0CRNF("ENCOUNTER PROVIDER","C0CI") ;IEN OF PROVIDER
+"RTN","C0CIMMU",87,0)
+ . . S @VMAP@("IMMUNESOURCEACTORID")="ACTORPROVIDER_"_C0CIP
+"RTN","C0CIMMU",88,0)
+ . . S C0CIIEN=$$ZVALUEI^C0CRNF("IMMUNIZATION","C0CI") ;IEN OF IMMUNIZATION
+"RTN","C0CIMMU",89,0)
+ . . I $G(DUZ("AG"))="I" D  ; RUNNING IN RPMS
+"RTN","C0CIMMU",90,0)
+ . . . D GETN^C0CRNF("C0CZIM",9999999.14,C0CIIEN) ;GET IMMUNE RECORD
+"RTN","C0CIMMU",91,0)
+ . . . S C0CIN=$$ZVALUE^C0CRNF("NAME","C0CZIM") ; USE NAME IN IMMUNE RECORD
+"RTN","C0CIMMU",92,0)
+ . . . ; FOR LOOKING UP THE CODE
+"RTN","C0CIMMU",93,0)
+ . . . ; GET IT FROM THE CODE FILE
+"RTN","C0CIMMU",94,0)
+ . . . S C0CICD=$$ZVALUE^C0CRNF("HL7-CVX CODE","C0CZIM") ;CVX CODE
+"RTN","C0CIMMU",95,0)
+ . . . S @VMAP@("IMMUNEPRODUCTNAMETEXT")=C0CIN ;NAME
+"RTN","C0CIMMU",96,0)
+ . . . S @VMAP@("IMMUNEPRODUCTCODE")=C0CICD ; CVX CODE
+"RTN","C0CIMMU",97,0)
+ . . . I C0CICD'="" S @VMAP@("IMMUNEPRODUCTCODESYSTEM")="CDC Vaccine Code" ;
+"RTN","C0CIMMU",98,0)
+ . . . E  S @VMAP@("IMMUNEPRODUCTCODESYSTEM")="" ;NULL
+"RTN","C0CIMMU",99,0)
+ . . E  D  ; NOT IN RPMS
+"RTN","C0CIMMU",100,0)
+ . . . S C0CIN=$$ZVALUE^C0CRNF("IMMUNIZATION","C0CI") ;NAME OF IMMUNIZATION
+"RTN","C0CIMMU",101,0)
+ . . . S @VMAP@("IMMUNEPRODUCTNAMETEXT")=C0CIN ;NAME
+"RTN","C0CIMMU",102,0)
+ . . . S @VMAP@("IMMUNEPRODUCTCODE")="" ; CVX CODE
+"RTN","C0CIMMU",103,0)
+ . . . S @VMAP@("IMMUNEPRODUCTCODESYSTEM")="" ;NO CODE
+"RTN","C0CIMMU",104,0)
+ N C0CIRIM S C0CIRIM=$NA(^TMP("C0CRIM","VARS",DFN,"IMMUNE"))
+"RTN","C0CIMMU",105,0)
+ M @C0CIRIM=@TVMAP ; PERSIST RIM VARIABLES
+"RTN","C0CIMMU",106,0)
+ Q
+"RTN","C0CIMMU",107,0)
+ ;
+"RTN","C0CIN")
+0^72^B30946883
+"RTN","C0CIN",1,0)
+C0CIN   ; CCDCCR/GPL - CCR IMPORT utilities; 9/20/08
+"RTN","C0CIN",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CIN",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CIN",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CIN",5,0)
+ ;
+"RTN","C0CIN",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CIN",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CIN",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CIN",9,0)
+ ;(at your option) any later version.
+"RTN","C0CIN",10,0)
+ ;
+"RTN","C0CIN",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CIN",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CIN",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CIN",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CIN",15,0)
+ ;
+"RTN","C0CIN",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CIN",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CIN",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CIN",19,0)
+ ;
+"RTN","C0CIN",20,0)
+ W "This is the CCR Import Utility Library ",!
+"RTN","C0CIN",21,0)
+ Q
+"RTN","C0CIN",22,0)
+ ;
+"RTN","C0CIN",23,0)
+TEST ; TESTS BOTH ROUTINES AT ONCE
+"RTN","C0CIN",24,0)
+ N ZI,ZJ
+"RTN","C0CIN",25,0)
+ S ZI="/home/vademo2/CCR" ;directory purposely leaving off the trailing /
+"RTN","C0CIN",26,0)
+ S ZJ="PAT_358_CCR_V1_0_21.xml" ; random test patient
+"RTN","C0CIN",27,0)
+ D RPCFIN(.GPL,358,135,"GPLTEST","CCR",ZJ,ZI)
+"RTN","C0CIN",28,0)
+ Q
+"RTN","C0CIN",29,0)
+ ;
+"RTN","C0CIN",30,0)
+RPCAIN(RTN,DFN,DUZ,SOURCE,TYPE,ARY) ; ARRAY IN RPC - ACCEPT AN XML DOCUMENT
+"RTN","C0CIN",31,0)
+ ; AND STORE IT IN THE INCOMING XML FILE
+"RTN","C0CIN",32,0)
+ ; RETURNS THE IEN OF THE RECORD OR TEXT IF THERE IS AN ERROR
+"RTN","C0CIN",33,0)
+ I $G(DFN)="" S RTN="DFN NOT DEFINED" Q  ;
+"RTN","C0CIN",34,0)
+ N C0CXF S C0CXF=175 ; FILE NUMBER FOR INCOMING XML FILE
+"RTN","C0CIN",35,0)
+ N C0CFDA,ZX
+"RTN","C0CIN",36,0)
+ S C0CFDA(C0CXF,"+1,",.01)=DFN ; PATIENT
+"RTN","C0CIN",37,0)
+ S C0CFDA(C0CXF,"+1,",.02)=DUZ ; PROVIDER CREATING THE RECORD
+"RTN","C0CIN",38,0)
+ S C0CFDA(C0CXF,"+1,",1)=$$NOW^XLFDT ;DATE
+"RTN","C0CIN",39,0)
+ S C0CFDA(C0CXF,"+1,",2)=TYPE  ;TYPE
+"RTN","C0CIN",40,0)
+ S C0CFDA(C0CXF,"+1,",3)=$$ADDSRC(SOURCE) ;SOURCE
+"RTN","C0CIN",41,0)
+ S C0CFDA(C0CXF,"+1,",7)="NEW" ; STATUS OF NEW FOR NOT PROCESSED
+"RTN","C0CIN",42,0)
+ D UPDIE ; CREATE THE RECORD
+"RTN","C0CIN",43,0)
+ S ZX=C0CIEN(1) ; CAPTURE THE RECORD NUMBER
+"RTN","C0CIN",44,0)
+ D WP^DIE(C0CXF,ZX_",",4,,ARY,"ZERR")
+"RTN","C0CIN",45,0)
+ ;W "RECORD:",ZX,!
+"RTN","C0CIN",46,0)
+ S RTN=ZX ; RETURN IEN OF THE XML FILE
+"RTN","C0CIN",47,0)
+ Q
+"RTN","C0CIN",48,0)
+ ;
+"RTN","C0CIN",49,0)
+ADDSRC(ZSRC) ;EXTRISIC TO ADD A SOURCE TO THE CCR SOURCE FILE
+"RTN","C0CIN",50,0)
+ ; RETURNS RECORD NUMBER. IF SOURCE EXISTS, JUST RETURNS IT'S RECORD NUMBER
+"RTN","C0CIN",51,0)
+ ;
+"RTN","C0CIN",52,0)
+ N ZX,ZF,C0CFDA
+"RTN","C0CIN",53,0)
+ S ZF=171.401 ; FILE NUMBER FOR CCR SOURCE FILE
+"RTN","C0CIN",54,0)
+ S C0CFDA(ZF,"?+1,",.01)=ZSRC
+"RTN","C0CIN",55,0)
+ D UPDIE
+"RTN","C0CIN",56,0)
+ Q $O(^C0C(171.401,"B",ZSRC,""))
+"RTN","C0CIN",57,0)
+ ;
+"RTN","C0CIN",58,0)
+RPCFIN(RTN,DFN,DUZ,SOURCE,TYPE,FN,FP) ; FILE IN RPC - READ AN XML DOCUMENT
+"RTN","C0CIN",59,0)
+ ; FROM A HOST FILE AND STORE IT IN THE INCOMING XML FILE
+"RTN","C0CIN",60,0)
+ N ZX,ZTMP
+"RTN","C0CIN",61,0)
+ I $E($RE(FP))'="/" S ZX=FP_"/"
+"RTN","C0CIN",62,0)
+ E  S ZX=FP
+"RTN","C0CIN",63,0)
+ S ZX=ZX_FN
+"RTN","C0CIN",64,0)
+ D LOAD("ZTMP",ZX)
+"RTN","C0CIN",65,0)
+ I '$D(ZTMP) D  Q  ; NO LUCK
+"RTN","C0CIN",66,0)
+ . W "FILE NOT LOADED",!
+"RTN","C0CIN",67,0)
+ D RPCAIN(.RTN,DFN,DUZ,SOURCE,TYPE,"ZTMP")
+"RTN","C0CIN",68,0)
+ N C0CFDA
+"RTN","C0CIN",69,0)
+ S C0CFDA(175,RTN_",",5)=FN ; FILE NAME
+"RTN","C0CIN",70,0)
+ S C0CFDA(175,RTN_",",6)=FP ; FILE PATH
+"RTN","C0CIN",71,0)
+ D UPDIE ; UPDATE WITH FILE NAME AND PATH
+"RTN","C0CIN",72,0)
+ Q
+"RTN","C0CIN",73,0)
+ ;
+"RTN","C0CIN",74,0)
+RPCLIST(RTN,DFN) ; CCR LIST - LIST XML DOCUMENTS FOR PATIENT DFN
+"RTN","C0CIN",75,0)
+ ; THAT ARE STORED IN THE INCOMING XML FILE
+"RTN","C0CIN",76,0)
+ ; RETURNS AN ARRAY OF THE FORM 
+"RTN","C0CIN",77,0)
+ ; RTN(x)="IEN^DATE^TYPE^SOURCE^STATUS^CREATEDBY" WHERE
+"RTN","C0CIN",78,0)
+ ; IEN IS THE RECORD NUMBER OF THE XML DOCUMENT
+"RTN","C0CIN",79,0)
+ ; DATE IS THE DATE THE DOCUMENT WAS STORED IN THE FILE
+"RTN","C0CIN",80,0)
+ ; TYPE IS "CCD" OR "CCR" OR "OTHER"
+"RTN","C0CIN",81,0)
+ ; SOURCE IS THE NAME OF THE DOCUMENT SOURCE FROM THE CCR SOURCE FILE
+"RTN","C0CIN",82,0)
+ ; STATUS IS THE STATUS OF THE DOCUMENT (VALUES TO BE DEFINED)
+"RTN","C0CIN",83,0)
+ ; CREATEDBY IS THE NAME OF THE PROVIDER WHO UPLOADED THE XML
+"RTN","C0CIN",84,0)
+ N ZF S ZF=175 ; FILE NUMBER OF INCOMING XML FILE
+"RTN","C0CIN",85,0)
+ N ZI S ZI=""
+"RTN","C0CIN",86,0)
+ N ZN S ZN=0
+"RTN","C0CIN",87,0)
+ F  S ZI=$O(^C0CIN("B",DFN,ZI),-1) Q:ZI=""  D  ; FOR EACH RECORD FOR THIS PATIENT
+"RTN","C0CIN",88,0)
+ . S ZN=ZN+1 ;INCREMENT COUNT OF RETURN ARRAY
+"RTN","C0CIN",89,0)
+ . S $P(RTN(ZN),"^",1)=ZI ; IEN OF RECORD
+"RTN","C0CIN",90,0)
+ . S $P(RTN(ZN),"^",2)=$$GET1^DIQ(ZF,ZI_",",1,"E") ;DATE
+"RTN","C0CIN",91,0)
+ . S $P(RTN(ZN),"^",3)=$$GET1^DIQ(ZF,ZI_",",2,"E") ;TYPE
+"RTN","C0CIN",92,0)
+ . S $P(RTN(ZN),"^",4)=$$GET1^DIQ(ZF,ZI_",",3,"E") ;SOURCE
+"RTN","C0CIN",93,0)
+ . S $P(RTN(ZN),"^",5)=$$GET1^DIQ(ZF,ZI_",",7,"I") ; STATUS
+"RTN","C0CIN",94,0)
+ . S $P(RTN(ZN),"^",6)=$$GET1^DIQ(ZF,ZI_",",.02,"E") ; CREATED BY
+"RTN","C0CIN",95,0)
+ Q
+"RTN","C0CIN",96,0)
+ ;
+"RTN","C0CIN",97,0)
+RPCDOC(RTN,IEN) ; RETRIEVE DOCUMENT NUMBER IEN FROM THE INCOMING XML FILE
+"RTN","C0CIN",98,0)
+ ; RETURNED IN ARRAY RTN
+"RTN","C0CIN",99,0)
+ N ZI
+"RTN","C0CIN",100,0)
+ S ZI=$$GET1^DIQ(175,IEN_",",4,,"RTN")
+"RTN","C0CIN",101,0)
+ Q
+"RTN","C0CIN",102,0)
+ ;
+"RTN","C0CIN",103,0)
+EN(INXML,SOURCE,C0CDFN) ; IMPORT A CCR, PASSED BY NAME INXML
+"RTN","C0CIN",104,0)
+ ; FILE UNDER SOURCE, WHICH IS A POINTER TO THE CCR SOURCE FILE
+"RTN","C0CIN",105,0)
+ ; FOR PATIENT C0CDFN
+"RTN","C0CIN",106,0)
+ ;N C0CXP
+"RTN","C0CIN",107,0)
+ S C0CINB=$NA(^TMP("C0CIN",$J,"VARS",C0CDFN))
+"RTN","C0CIN",108,0)
+ S C0CDOCID=$$PARSE^C0CMXML(INXML) ;W !,"DocID: ",C0CDOCID
+"RTN","C0CIN",109,0)
+ ;S REDUX="//ContinuityOfCareRecord/Body"
+"RTN","C0CIN",110,0)
+ S REDUX=""
+"RTN","C0CIN",111,0)
+ D XPATH^C0CMXML(1,"/","C0CIDX","C0CXP",,REDUX)
+"RTN","C0CIN",112,0)
+ ;D INDEX^C0CXPATH(INXML,"C0CXP",-1) ; GENERATE XPATHS FROM THE CCR
+"RTN","C0CIN",113,0)
+ ;N ZI,ZJ,ZK 
+"RTN","C0CIN",114,0)
+ S ZI=""
+"RTN","C0CIN",115,0)
+ F  S ZI=$O(C0CXP(ZI)) Q:ZI=""  D  ; FOR EACH XPATH
+"RTN","C0CIN",116,0)
+ . D DEMUX^C0CMXP("ZJ",ZI) ;
+"RTN","C0CIN",117,0)
+ . W ZJ,!
+"RTN","C0CIN",118,0)
+ . S ZK=$P(ZJ,"^",3) ; PULL OUT THE XPATH
+"RTN","C0CIN",119,0)
+ . S ZM=$P(ZJ,"^",1) ; PULL OUT THE MULTIPLE
+"RTN","C0CIN",120,0)
+ . S ZS=$P(ZJ,"^",2) ; PULL OUT THE SUBMULTIPLE
+"RTN","C0CIN",121,0)
+ . S C0CDICN=$O(^C0CDIC(170,"XPATH",ZK,""))
+"RTN","C0CIN",122,0)
+ . I C0CDICN="" D  Q  ;
+"RTN","C0CIN",123,0)
+ . . W "MISSING XPATH:",!,ZK,! ; OOPS, XPATH NOT IN C0CDIC
+"RTN","C0CIN",124,0)
+ . . S MISSING(ZK)=""
+"RTN","C0CIN",125,0)
+ . ;D GETS^DIQ(170,C0CDICN_",","*",,"C0CFDA")
+"RTN","C0CIN",126,0)
+ . S C0CVAR=$$GET1^DIQ(170,C0CDICN_",",.01) ; VARIABLE NAME
+"RTN","C0CIN",127,0)
+ . S C0CSEC=$$GET1^DIQ(170,C0CDICN_",",12) ;ELEMENT TYPE
+"RTN","C0CIN",128,0)
+ . W C0CSEC,":",C0CVAR,!
+"RTN","C0CIN",129,0)
+ Q
+"RTN","C0CIN",130,0)
+ ; 
+"RTN","C0CIN",131,0)
+GETACCR(AOUT,C0CDFN) ; EXTRACT A CCR FOR PATIENT ADFN AND PUT IT IN ARRAY AOUT
+"RTN","C0CIN",132,0)
+ ;PASSED BY NAME
+"RTN","C0CIN",133,0)
+ N ZT
+"RTN","C0CIN",134,0)
+ D CCRRPC^C0CCCR(.ZT,C0CDFN,"LABLIMIT:T-1000")
+"RTN","C0CIN",135,0)
+ M @AOUT=ZT
+"RTN","C0CIN",136,0)
+ Q
+"RTN","C0CIN",137,0)
+ ;
+"RTN","C0CIN",138,0)
+TEST64 ;TEST BASE64 DECODING FOR IMPORTING CCR FROM THE NHIN
+"RTN","C0CIN",139,0)
+ W $$FTG^%ZISH("/tmp/","base64_encoded_ccr.txt","G64(1)",1)
+"RTN","C0CIN",140,0)
+ S G=G64(1)
+"RTN","C0CIN",141,0)
+ S ZI=""
+"RTN","C0CIN",142,0)
+ F  S ZI=$O(G64(1,"OVF",ZI)) Q:ZI=""  D  ; FOR EVERY OVERFLOW RECORD
+"RTN","C0CIN",143,0)
+ . S G=G_G64(1,"OVF",ZI) ;HOPE IT'S NOT TOO BIG
+"RTN","C0CIN",144,0)
+ S G2=$$DECODE^RGUTUU(G)
+"RTN","C0CIN",145,0)
+ Q
+"RTN","C0CIN",146,0)
+ ;
+"RTN","C0CIN",147,0)
+NORMAL(OUTXML,INXML) ;NORMALIZES AN XML STRING PASSED BY NAME IN INXML
+"RTN","C0CIN",148,0)
+ ; INTO AN XML ARRAY RETURNED IN OUTXML, ALSO PASSED BY NAME
+"RTN","C0CIN",149,0)
+ ;
+"RTN","C0CIN",150,0)
+ N ZI,ZN,ZTMP
+"RTN","C0CIN",151,0)
+ S ZN=1
+"RTN","C0CIN",152,0)
+ S @OUTXML@(ZN)=$P(@INXML,"><",ZN)_">"
+"RTN","C0CIN",153,0)
+ S ZN=ZN+1
+"RTN","C0CIN",154,0)
+ F  S @OUTXML@(ZN)="<"_$P(@INXML,"><",ZN) Q:$P(@INXML,"><",ZN+1)=""  D  ;
+"RTN","C0CIN",155,0)
+ . S @OUTXML@(ZN)=@OUTXML@(ZN)_">"
+"RTN","C0CIN",156,0)
+ . S ZN=ZN+1
+"RTN","C0CIN",157,0)
+ Q
+"RTN","C0CIN",158,0)
+ ;
+"RTN","C0CIN",159,0)
+CLEANCR(OUTXML,INXML) ; USE $C(10) TO SEPARATE THE STRING INXML INTO
+"RTN","C0CIN",160,0)
+ ;AN ARRAY OUTXML(n) OUTXML AND INXML PASSED BY NAME
+"RTN","C0CIN",161,0)
+ N ZX,ZY,ZN
+"RTN","C0CIN",162,0)
+ S ZX=1,ZN=1
+"RTN","C0CIN",163,0)
+ F  S ZY=$F(@INXML,$C(10),ZX) Q:ZY=0  D  ;
+"RTN","C0CIN",164,0)
+ . S @OUTXML@(ZN)=$E(G2,ZX,ZY-2)
+"RTN","C0CIN",165,0)
+ . I @OUTXML@(ZN)'="" S ZN=ZN+1
+"RTN","C0CIN",166,0)
+ . S ZX=ZY
+"RTN","C0CIN",167,0)
+ Q
+"RTN","C0CIN",168,0)
+ ;
+"RTN","C0CIN",169,0)
+LOAD(ZRTN,filepath) ; load an xml file into the ZRTN array, passed by name
+"RTN","C0CIN",170,0)
+ n i
+"RTN","C0CIN",171,0)
+ D  ;
+"RTN","C0CIN",172,0)
+ . n zfile,zpath,ztmp,zok s (zfile,zpath,ztmp)=""
+"RTN","C0CIN",173,0)
+ . s ztmp=$na(^TMP("C0CLOAD",$J))
+"RTN","C0CIN",174,0)
+ . k @ztmp
+"RTN","C0CIN",175,0)
+ . s zfile=$re($p($re(filepath),"/",1)) ;file name
+"RTN","C0CIN",176,0)
+ . s zpath=$p(filepath,zfile,1) ; file path
+"RTN","C0CIN",177,0)
+ . s zok=$$FTG^%ZISH(zpath,zfile,$NA(@ztmp@(1)),3) ; import the file incr sub 3
+"RTN","C0CIN",178,0)
+ . m @ZRTN=@ztmp
+"RTN","C0CIN",179,0)
+ . k @ztmp
+"RTN","C0CIN",180,0)
+ . s i=$o(@ZRTN@(""),-1) ; highest line number
+"RTN","C0CIN",181,0)
+ q
+"RTN","C0CIN",182,0)
+ ;
+"RTN","C0CIN",183,0)
+UPDIE ; INTERNAL ROUTINE TO CALL UPDATE^DIE AND CHECK FOR ERRORS
+"RTN","C0CIN",184,0)
+ K ZERR,C0CIEN
+"RTN","C0CIN",185,0)
+ D CLEAN^DILF
+"RTN","C0CIN",186,0)
+ D UPDATE^DIE("","C0CFDA","C0CIEN","ZERR")
+"RTN","C0CIN",187,0)
+ I $D(ZERR) D  ;
+"RTN","C0CIN",188,0)
+ . W "ERROR",!
+"RTN","C0CIN",189,0)
+ . ZWR ZERR
+"RTN","C0CIN",190,0)
+ . B
+"RTN","C0CIN",191,0)
+ K C0CFDA
+"RTN","C0CIN",192,0)
+ Q
+"RTN","C0CIN",193,0)
+ ; 
+"RTN","C0CLA7DD")
+0^80^B66668579
+"RTN","C0CLA7DD",1,0)
+C0CLA7DD ;WV/JMC - CCD/CCR Post Install DD X-Ref Setup Routine ; Aug 31, 2009
+"RTN","C0CLA7DD",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CLA7DD",3,0)
+ ;
+"RTN","C0CLA7DD",4,0)
+ ; Tasked by C0C post-install routine C0CENV to create C0C cross-references on V LAB file.
+"RTN","C0CLA7DD",5,0)
+ ;
+"RTN","C0CLA7DD",6,0)
+ Q
+"RTN","C0CLA7DD",7,0)
+ ;
+"RTN","C0CLA7DD",8,0)
+ ;
+"RTN","C0CLA7DD",9,0)
+EN ; Add new style cross-references to V LAB file if it exists.
+"RTN","C0CLA7DD",10,0)
+ ; OLD entry point - see new KIDS check points in C0CENV.
+"RTN","C0CLA7DD",11,0)
+ ;
+"RTN","C0CLA7DD",12,0)
+ ;
+"RTN","C0CLA7DD",13,0)
+ ; Quit if AUPNVLAB global does not exist.
+"RTN","C0CLA7DD",14,0)
+ I $$VFILE^DILFD(9000010.09)'=1 Q
+"RTN","C0CLA7DD",15,0)
+ ;
+"RTN","C0CLA7DD",16,0)
+ N MSG
+"RTN","C0CLA7DD",17,0)
+ ;
+"RTN","C0CLA7DD",18,0)
+ S MSG="Starting installation of ALR1 cross-reference at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CLA7DD",19,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",20,0)
+ D ALR1
+"RTN","C0CLA7DD",21,0)
+ S MSG="Installation of ALR1 cross-reference completed at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CLA7DD",22,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",23,0)
+ ;
+"RTN","C0CLA7DD",24,0)
+ S MSG="Starting installation of ALR2 cross-reference at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CLA7DD",25,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",26,0)
+ D ALR2
+"RTN","C0CLA7DD",27,0)
+ S MSG="Installation of ALR2 cross-reference completed at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CLA7DD",28,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",29,0)
+ ;
+"RTN","C0CLA7DD",30,0)
+ S MSG="Starting installation of ALR3 cross-reference at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CLA7DD",31,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",32,0)
+ D ALR3
+"RTN","C0CLA7DD",33,0)
+ S MSG="Installation of ALR3 cross-reference completed at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CLA7DD",34,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",35,0)
+ ;
+"RTN","C0CLA7DD",36,0)
+ S MSG="Starting installation of ALR4 cross-reference at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CLA7DD",37,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",38,0)
+ D ALR4
+"RTN","C0CLA7DD",39,0)
+ S MSG="Installation of ALR4 cross-reference completed at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CLA7DD",40,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",41,0)
+ ;
+"RTN","C0CLA7DD",42,0)
+ S MSG="Starting installation of ALR5 cross-reference at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CLA7DD",43,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",44,0)
+ D ALR5
+"RTN","C0CLA7DD",45,0)
+ S MSG="Installation of ALR5 cross-reference completed at "_$$HTE^XLFDT($H,"1Z")
+"RTN","C0CLA7DD",46,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",47,0)
+ ;
+"RTN","C0CLA7DD",48,0)
+ Q
+"RTN","C0CLA7DD",49,0)
+ ;
+"RTN","C0CLA7DD",50,0)
+ ;
+"RTN","C0CLA7DD",51,0)
+ALR1 ; Installation of ALR1 cross-reference
+"RTN","C0CLA7DD",52,0)
+ ;
+"RTN","C0CLA7DD",53,0)
+ N C0CFLAG,C0CXR,C0CRES,C0COUT
+"RTN","C0CLA7DD",54,0)
+ ;
+"RTN","C0CLA7DD",55,0)
+ S C0CFLAG=""
+"RTN","C0CLA7DD",56,0)
+ ;
+"RTN","C0CLA7DD",57,0)
+ S C0CXR("FILE")=9000010.09
+"RTN","C0CLA7DD",58,0)
+ S C0CXR("NAME")="ALR1"
+"RTN","C0CLA7DD",59,0)
+ S C0CXR("TYPE")="R"
+"RTN","C0CLA7DD",60,0)
+ S C0CXR("USE")="S"
+"RTN","C0CLA7DD",61,0)
+ S C0CXR("EXECUTION")="R"
+"RTN","C0CLA7DD",62,0)
+ S C0CXR("ACTIVITY")="IR"
+"RTN","C0CLA7DD",63,0)
+ S C0CXR("SHORT DESCR")="X-ref to link entry with parent in LAB DATA file (#63)"
+"RTN","C0CLA7DD",64,0)
+ S C0CXR("VAL",1)=.02
+"RTN","C0CLA7DD",65,0)
+ S C0CXR("VAL",1,"SUBSCRIPT")=1
+"RTN","C0CLA7DD",66,0)
+ S C0CXR("VAL",1,"COLLATION")="F"
+"RTN","C0CLA7DD",67,0)
+ S C0CXR("VAL",2)=.06
+"RTN","C0CLA7DD",68,0)
+ S C0CXR("VAL",2,"SUBSCRIPT")=2
+"RTN","C0CLA7DD",69,0)
+ S C0CXR("VAL",2,"LENGTH")=30
+"RTN","C0CLA7DD",70,0)
+ S C0CXR("VAL",2,"COLLATION")="F"
+"RTN","C0CLA7DD",71,0)
+ S C0CXR("VAL",3)=.01
+"RTN","C0CLA7DD",72,0)
+ S C0CXR("VAL",3,"SUBSCRIPT")=3
+"RTN","C0CLA7DD",73,0)
+ S C0CXR("VAL",3,"COLLATION")="F"
+"RTN","C0CLA7DD",74,0)
+ S C0CXR("VAL",4)=1201
+"RTN","C0CLA7DD",75,0)
+ S C0CXR("VAL",4,"SUBSCRIPT")=4
+"RTN","C0CLA7DD",76,0)
+ S C0CXR("VAL",4,"COLLATION")="F"
+"RTN","C0CLA7DD",77,0)
+ D CREIXN^DDMOD(.C0CXR,C0CFLAG,.C0CRES,"C0COUT")
+"RTN","C0CLA7DD",78,0)
+ ;
+"RTN","C0CLA7DD",79,0)
+ Q
+"RTN","C0CLA7DD",80,0)
+ ;
+"RTN","C0CLA7DD",81,0)
+ ;
+"RTN","C0CLA7DD",82,0)
+ALR2 ; Installation of ALR2 cross-reference
+"RTN","C0CLA7DD",83,0)
+ ;
+"RTN","C0CLA7DD",84,0)
+ N C0CFLAG,C0CXR,C0CRES,C0COUT
+"RTN","C0CLA7DD",85,0)
+ ;
+"RTN","C0CLA7DD",86,0)
+ S C0CFLAG=""
+"RTN","C0CLA7DD",87,0)
+ ;
+"RTN","C0CLA7DD",88,0)
+ S C0CXR("FILE")=9000010.09
+"RTN","C0CLA7DD",89,0)
+ S C0CXR("NAME")="ALR2"
+"RTN","C0CLA7DD",90,0)
+ S C0CXR("TYPE")="MU"
+"RTN","C0CLA7DD",91,0)
+ S C0CXR("USE")="S"
+"RTN","C0CLA7DD",92,0)
+ S C0CXR("EXECUTION")="R"
+"RTN","C0CLA7DD",93,0)
+ S C0CXR("ACTIVITY")="IR"
+"RTN","C0CLA7DD",94,0)
+ S C0CXR("SHORT DESCR")="X-ref for LOINC code related to test result."
+"RTN","C0CLA7DD",95,0)
+ S C0CXR("DESCR",1)="This cross-reference is used to identify the LOINC codes"
+"RTN","C0CLA7DD",96,0)
+ S C0CXR("DESCR",2)="that has been assigned to a lab result. Allows queries to"
+"RTN","C0CLA7DD",97,0)
+ S C0CXR("DESCR",3)="retrieve the LOINC code associated with a specific test"
+"RTN","C0CLA7DD",98,0)
+ S C0CXR("DESCR",4)="result."
+"RTN","C0CLA7DD",99,0)
+ S C0CXR("SET")="S ^AUPNVLAB(""ALR2"",X(1),X(2),X(3),X(4),X(5),DA)="""""
+"RTN","C0CLA7DD",100,0)
+ S C0CXR("KILL")="K ^AUPNVLAB(""ALR2"",X(1),X(2),X(3),X(4),X(5),DA)"
+"RTN","C0CLA7DD",101,0)
+ S C0CXR("WHOLE KILL")="K ^AUPNVLAB(""ALR2"")"
+"RTN","C0CLA7DD",102,0)
+ S C0CXR("VAL",1)=.02
+"RTN","C0CLA7DD",103,0)
+ S C0CXR("VAL",1,"SUBSCRIPT")=1
+"RTN","C0CLA7DD",104,0)
+ S C0CXR("VAL",1,"COLLATION")="F"
+"RTN","C0CLA7DD",105,0)
+ S C0CXR("VAL",2)=1201
+"RTN","C0CLA7DD",106,0)
+ S C0CXR("VAL",2,"SUBSCRIPT")=2
+"RTN","C0CLA7DD",107,0)
+ S C0CXR("VAL",2,"COLLATION")="F"
+"RTN","C0CLA7DD",108,0)
+ S C0CXR("VAL",3)=.06
+"RTN","C0CLA7DD",109,0)
+ S C0CXR("VAL",3,"SUBSCRIPT")=3
+"RTN","C0CLA7DD",110,0)
+ S C0CXR("VAL",3,"COLLATION")="F"
+"RTN","C0CLA7DD",111,0)
+ S C0CXR("VAL",4)=.01
+"RTN","C0CLA7DD",112,0)
+ S C0CXR("VAL",4,"SUBSCRIPT")=4
+"RTN","C0CLA7DD",113,0)
+ S C0CXR("VAL",4,"COLLATION")="F"
+"RTN","C0CLA7DD",114,0)
+ S C0CXR("VAL",5)=1113
+"RTN","C0CLA7DD",115,0)
+ S C0CXR("VAL",5,"SUBSCRIPT")=5
+"RTN","C0CLA7DD",116,0)
+ S C0CXR("VAL",5,"COLLATION")="F"
+"RTN","C0CLA7DD",117,0)
+ D CREIXN^DDMOD(.C0CXR,C0CFLAG,.C0CRES,"C0COUT")
+"RTN","C0CLA7DD",118,0)
+ ;
+"RTN","C0CLA7DD",119,0)
+ Q
+"RTN","C0CLA7DD",120,0)
+ ;
+"RTN","C0CLA7DD",121,0)
+ ;
+"RTN","C0CLA7DD",122,0)
+ALR3 ; Installation of ALR3 cross-reference
+"RTN","C0CLA7DD",123,0)
+ ;
+"RTN","C0CLA7DD",124,0)
+ N C0CFLAG,C0CXR,C0CRES,C0COUT
+"RTN","C0CLA7DD",125,0)
+ ;
+"RTN","C0CLA7DD",126,0)
+ S C0CFLAG=""
+"RTN","C0CLA7DD",127,0)
+ ;
+"RTN","C0CLA7DD",128,0)
+ S C0CXR("FILE")=9000010.09
+"RTN","C0CLA7DD",129,0)
+ S C0CXR("NAME")="ALR3"
+"RTN","C0CLA7DD",130,0)
+ S C0CXR("TYPE")="R"
+"RTN","C0CLA7DD",131,0)
+ S C0CXR("USE")="S"
+"RTN","C0CLA7DD",132,0)
+ S C0CXR("EXECUTION")="F"
+"RTN","C0CLA7DD",133,0)
+ S C0CXR("ACTIVITY")="IR"
+"RTN","C0CLA7DD",134,0)
+ S C0CXR("SHORT DESCR")="X-ref for LOINC code related to test result - any patient"
+"RTN","C0CLA7DD",135,0)
+ S C0CXR("DESCR",1)="This cross-reference is used to identify the LOINC codes that has been assigned to a lab result. Allows queries"
+"RTN","C0CLA7DD",136,0)
+ S C0CXR("DESCR",2)="to retrieve the LOINC code associated with a specific test result. It allows any patient"
+"RTN","C0CLA7DD",137,0)
+ S C0CXR("DESCR",3)="lab results to be identified by LOINC"
+"RTN","C0CLA7DD",138,0)
+ S C0CXR("VAL",1)=1113
+"RTN","C0CLA7DD",139,0)
+ S C0CXR("VAL",1,"SUBSCRIPT")=1
+"RTN","C0CLA7DD",140,0)
+ S C0CXR("VAL",1,"COLLATION")="F"
+"RTN","C0CLA7DD",141,0)
+ ;
+"RTN","C0CLA7DD",142,0)
+ D CREIXN^DDMOD(.C0CXR,C0CFLAG,.C0CRES,"C0COUT")
+"RTN","C0CLA7DD",143,0)
+ ;
+"RTN","C0CLA7DD",144,0)
+ Q
+"RTN","C0CLA7DD",145,0)
+ ;
+"RTN","C0CLA7DD",146,0)
+ ;
+"RTN","C0CLA7DD",147,0)
+ALR4 ; Installation of ALR4 cross-reference
+"RTN","C0CLA7DD",148,0)
+ ;
+"RTN","C0CLA7DD",149,0)
+ N C0CFLAG,C0CXR,C0CRES,C0COUT
+"RTN","C0CLA7DD",150,0)
+ ;
+"RTN","C0CLA7DD",151,0)
+ S C0CFLAG=""
+"RTN","C0CLA7DD",152,0)
+ ;
+"RTN","C0CLA7DD",153,0)
+ S C0CXR("FILE")=9000010.09
+"RTN","C0CLA7DD",154,0)
+ S C0CXR("NAME")="ALR4"
+"RTN","C0CLA7DD",155,0)
+ S C0CXR("TYPE")="R"
+"RTN","C0CLA7DD",156,0)
+ S C0CXR("USE")="S"
+"RTN","C0CLA7DD",157,0)
+ S C0CXR("EXECUTION")="R"
+"RTN","C0CLA7DD",158,0)
+ S C0CXR("ACTIVITY")="IR"
+"RTN","C0CLA7DD",159,0)
+ S C0CXR("SHORT DESCR")="X-ref by patient and collection date/time"
+"RTN","C0CLA7DD",160,0)
+ S C0CXR("DESCR",1)="This cross-reference is used to identify all lab results for a"
+"RTN","C0CLA7DD",161,0)
+ S C0CXR("DESCR",2)="patient by collection date/time. This includes results that are only in"
+"RTN","C0CLA7DD",162,0)
+ S C0CXR("DESCR",3)="this file and therefore do not have a corresponding entry in LAB DATA"
+"RTN","C0CLA7DD",163,0)
+ S C0CXR("DESCR",4)="file (#63)."
+"RTN","C0CLA7DD",164,0)
+ S C0CXR("VAL",1)=.02
+"RTN","C0CLA7DD",165,0)
+ S C0CXR("VAL",1,"SUBSCRIPT")=1
+"RTN","C0CLA7DD",166,0)
+ S C0CXR("VAL",1,"COLLATION")="F"
+"RTN","C0CLA7DD",167,0)
+ S C0CXR("VAL",2)=1201
+"RTN","C0CLA7DD",168,0)
+ S C0CXR("VAL",2,"SUBSCRIPT")=2
+"RTN","C0CLA7DD",169,0)
+ S C0CXR("VAL",2,"COLLATION")="F"
+"RTN","C0CLA7DD",170,0)
+ ;
+"RTN","C0CLA7DD",171,0)
+ D CREIXN^DDMOD(.C0CXR,C0CFLAG,.C0CRES,"C0COUT")
+"RTN","C0CLA7DD",172,0)
+ ;
+"RTN","C0CLA7DD",173,0)
+ Q
+"RTN","C0CLA7DD",174,0)
+ ;
+"RTN","C0CLA7DD",175,0)
+ ;
+"RTN","C0CLA7DD",176,0)
+ALR5 ; Installation of ALR5 cross-reference
+"RTN","C0CLA7DD",177,0)
+ ;
+"RTN","C0CLA7DD",178,0)
+ N C0CFLAG,C0CXR,C0CRES,C0COUT
+"RTN","C0CLA7DD",179,0)
+ ;
+"RTN","C0CLA7DD",180,0)
+ S C0CFLAG=""
+"RTN","C0CLA7DD",181,0)
+ ;
+"RTN","C0CLA7DD",182,0)
+ S C0CXR("FILE")=9000010.09
+"RTN","C0CLA7DD",183,0)
+ S C0CXR("NAME")="ALR5"
+"RTN","C0CLA7DD",184,0)
+ S C0CXR("TYPE")="R"
+"RTN","C0CLA7DD",185,0)
+ S C0CXR("USE")="S"
+"RTN","C0CLA7DD",186,0)
+ S C0CXR("EXECUTION")="R"
+"RTN","C0CLA7DD",187,0)
+ S C0CXR("ACTIVITY")="IR"
+"RTN","C0CLA7DD",188,0)
+ S C0CXR("SHORT DESCR")="X-ref by patient and results availble date/time"
+"RTN","C0CLA7DD",189,0)
+ S C0CXR("DESCR",1)="This cross-reference is used to identify all lab results for a"
+"RTN","C0CLA7DD",190,0)
+ S C0CXR("DESCR",2)="patient by results available date/time. This includes results that are only in"
+"RTN","C0CLA7DD",191,0)
+ S C0CXR("DESCR",3)="this file and therefore do not have a corresponding entry in LAB DATA"
+"RTN","C0CLA7DD",192,0)
+ S C0CXR("DESCR",4)="file (#63)."
+"RTN","C0CLA7DD",193,0)
+ S C0CXR("VAL",1)=.02
+"RTN","C0CLA7DD",194,0)
+ S C0CXR("VAL",1,"SUBSCRIPT")=1
+"RTN","C0CLA7DD",195,0)
+ S C0CXR("VAL",1,"COLLATION")="F"
+"RTN","C0CLA7DD",196,0)
+ S C0CXR("VAL",2)=1212
+"RTN","C0CLA7DD",197,0)
+ S C0CXR("VAL",2,"SUBSCRIPT")=2
+"RTN","C0CLA7DD",198,0)
+ S C0CXR("VAL",2,"COLLATION")="F"
+"RTN","C0CLA7DD",199,0)
+ ;
+"RTN","C0CLA7DD",200,0)
+ D CREIXN^DDMOD(.C0CXR,C0CFLAG,.C0CRES,"C0COUT")
+"RTN","C0CLA7DD",201,0)
+ ;
+"RTN","C0CLA7DD",202,0)
+ Q
+"RTN","C0CLA7DD",203,0)
+ ;
+"RTN","C0CLA7DD",204,0)
+ ;
+"RTN","C0CLA7DD",205,0)
+REINDEX ; Set data into indexes for current entries.
+"RTN","C0CLA7DD",206,0)
+ ;
+"RTN","C0CLA7DD",207,0)
+ ;
+"RTN","C0CLA7DD",208,0)
+ N C0CHLOG,DA,DIK,MSG
+"RTN","C0CLA7DD",209,0)
+ ;
+"RTN","C0CLA7DD",210,0)
+ S C0CHLOG("START")=$H
+"RTN","C0CLA7DD",211,0)
+ S MSG="Starting indexing of ALR1, ALR2, ALR4, ALR5 indexes - "_$$HTE^XLFDT(C0CHLOG("START"),"1Z")
+"RTN","C0CLA7DD",212,0)
+ D BMES(MSG),SENDXQA(MSG)
+"RTN","C0CLA7DD",213,0)
+ ;
+"RTN","C0CLA7DD",214,0)
+ S DIK="^AUPNVLAB("
+"RTN","C0CLA7DD",215,0)
+ S DIK(1)=".02^ALR1^ALR2^ALR4^ALR5"
+"RTN","C0CLA7DD",216,0)
+ D ENALL^DIK
+"RTN","C0CLA7DD",217,0)
+ ;
+"RTN","C0CLA7DD",218,0)
+ S C0CHLOG("END")=$H
+"RTN","C0CLA7DD",219,0)
+ S MSG="Finished indexing of ALR1, ALR2, ALR4, ALR5 indexes - "_$$HTE^XLFDT(C0CHLOG("END"),"1Z")
+"RTN","C0CLA7DD",220,0)
+ D BMES(MSG),SENDXQA(MSG)
+"RTN","C0CLA7DD",221,0)
+ ;
+"RTN","C0CLA7DD",222,0)
+ S MSG="Elapsed Time: "_$$HDIFF^XLFDT(C0CHLOG("END"),C0CHLOG("START"),3)
+"RTN","C0CLA7DD",223,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",224,0)
+ ;
+"RTN","C0CLA7DD",225,0)
+ S C0CHLOG("START")=$H
+"RTN","C0CLA7DD",226,0)
+ S MSG="Starting indexing of ALR3 index - "_$$HTE^XLFDT(C0CHLOG("START"),"1Z")
+"RTN","C0CLA7DD",227,0)
+ D BMES(MSG),SENDXQA(MSG)
+"RTN","C0CLA7DD",228,0)
+ ;
+"RTN","C0CLA7DD",229,0)
+ K DA,DIK
+"RTN","C0CLA7DD",230,0)
+ S DIK="^AUPNVLAB("
+"RTN","C0CLA7DD",231,0)
+ S DIK(1)="1113^ALR3"
+"RTN","C0CLA7DD",232,0)
+ D ENALL^DIK
+"RTN","C0CLA7DD",233,0)
+ ;
+"RTN","C0CLA7DD",234,0)
+ S C0CHLOG("END")=$H
+"RTN","C0CLA7DD",235,0)
+ S MSG="Finished indexing of ALR3 index - "_$$HTE^XLFDT(C0CHLOG("END"),"1Z")
+"RTN","C0CLA7DD",236,0)
+ D BMES(MSG),SENDXQA(MSG)
+"RTN","C0CLA7DD",237,0)
+ ;
+"RTN","C0CLA7DD",238,0)
+ S MSG="Elapsed Time: "_$$HDIFF^XLFDT(C0CHLOG("END"),C0CHLOG("START"),3)
+"RTN","C0CLA7DD",239,0)
+ D BMES(MSG)
+"RTN","C0CLA7DD",240,0)
+ ;
+"RTN","C0CLA7DD",241,0)
+ Q
+"RTN","C0CLA7DD",242,0)
+ ;
+"RTN","C0CLA7DD",243,0)
+ ;
+"RTN","C0CLA7DD",244,0)
+BMES(STR) ; Write BMES^XPDUTL statements
+"RTN","C0CLA7DD",245,0)
+ ;
+"RTN","C0CLA7DD",246,0)
+ D BMES^XPDUTL($$CJ^XLFSTR(STR,IOM))
+"RTN","C0CLA7DD",247,0)
+ ;
+"RTN","C0CLA7DD",248,0)
+ Q
+"RTN","C0CLA7DD",249,0)
+ ;
+"RTN","C0CLA7DD",250,0)
+ ;
+"RTN","C0CLA7DD",251,0)
+SENDXQA(MSG) ; Send alert for reindex status
+"RTN","C0CLA7DD",252,0)
+ ;
+"RTN","C0CLA7DD",253,0)
+ N XQA,XQAMSG
+"RTN","C0CLA7DD",254,0)
+ ;
+"RTN","C0CLA7DD",255,0)
+ S XQA(DUZ)=""
+"RTN","C0CLA7DD",256,0)
+ S XQAMSG=MSG
+"RTN","C0CLA7DD",257,0)
+ D SETUP^XQALERT
+"RTN","C0CLA7DD",258,0)
+ ;
+"RTN","C0CLA7DD",259,0)
+ Q
+"RTN","C0CLA7Q")
+0^62^B21818572
+"RTN","C0CLA7Q",1,0)
+C0CLA7Q ;WV/JMC - CCD/CCR Lab HL7 Query Utility ;Jul 6, 2009
+"RTN","C0CLA7Q",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CLA7Q",3,0)
+ ;
+"RTN","C0CLA7Q",4,0)
+ ;
+"RTN","C0CLA7Q",5,0)
+ Q
+"RTN","C0CLA7Q",6,0)
+ ;
+"RTN","C0CLA7Q",7,0)
+ ;
+"RTN","C0CLA7Q",8,0)
+LAB(C0CPTID,C0CSDT,C0CEDT,C0CSC,C0CSPEC,C0CERR,C0CDEST,C0CHL7) ; Entry point for Lab Result Query
+"RTN","C0CLA7Q",9,0)
+ ;
+"RTN","C0CLA7Q",10,0)
+ ;
+"RTN","C0CLA7Q",11,0)
+ K ^TMP("C0C-VLAB",$J)
+"RTN","C0CLA7Q",12,0)
+ ;
+"RTN","C0CLA7Q",13,0)
+ ; Check and retrieve lab results from LAB DATA file (#63)
+"RTN","C0CLA7Q",14,0)
+ S C0CDEST=$$GCPR^LA7QRY($G(C0CPTID),$G(C0CSDT),$G(C0CEDT),.C0CSC,.C0CSPEC,.C0CERR,$G(C0CDEST),$G(C0CHL7))
+"RTN","C0CLA7Q",15,0)
+ ;
+"RTN","C0CLA7Q",16,0)
+ ; If V LAB file present then check for lab results that are only in this file
+"RTN","C0CLA7Q",17,0)
+ ; If results found in V Lab file then build results and add to above results.
+"RTN","C0CLA7Q",18,0)
+ I $D(^AUPNVLAB) D
+"RTN","C0CLA7Q",19,0)
+ . D VCHECK
+"RTN","C0CLA7Q",20,0)
+ . I $D(^TMP("C0C-VLAB",$J,3)) D VBUILD
+"RTN","C0CLA7Q",21,0)
+ ;
+"RTN","C0CLA7Q",22,0)
+ ;K ^TMP("C0C-VLAB",$J)
+"RTN","C0CLA7Q",23,0)
+ ;
+"RTN","C0CLA7Q",24,0)
+ Q C0CDEST
+"RTN","C0CLA7Q",25,0)
+ ;
+"RTN","C0CLA7Q",26,0)
+ ;
+"RTN","C0CLA7Q",27,0)
+VCHECK ; If V LAB file present then check for lab results that are only in this file.
+"RTN","C0CLA7Q",28,0)
+ ;
+"RTN","C0CLA7Q",29,0)
+ N C0CDA,C0CEND,C0CROOT,C0CVLAB,LA7PTID,LA7SC,LA7SCRC,LA7SPEC
+"RTN","C0CLA7Q",30,0)
+ ;
+"RTN","C0CLA7Q",31,0)
+ S LA7PTID=C0CPTID
+"RTN","C0CLA7Q",32,0)
+ D PATID^LA7QRY2
+"RTN","C0CLA7Q",33,0)
+ I $D(LA7ERR) Q
+"RTN","C0CLA7Q",34,0)
+ ;
+"RTN","C0CLA7Q",35,0)
+ ; Resolve search codes to lab datanames
+"RTN","C0CLA7Q",36,0)
+ S LA7SC=$G(C0CSC)
+"RTN","C0CLA7Q",37,0)
+ I $T(SCLIST^LA7QRY2)'="" D
+"RTN","C0CLA7Q",38,0)
+ . N TMP
+"RTN","C0CLA7Q",39,0)
+ . S LA7SCRC=$G(C0CSC)
+"RTN","C0CLA7Q",40,0)
+ . S TMP=$$SCLIST^LA7QRY2(LA7SCRC)
+"RTN","C0CLA7Q",41,0)
+ . S LA7SC=TMP
+"RTN","C0CLA7Q",42,0)
+ ;
+"RTN","C0CLA7Q",43,0)
+ I LA7SC'="*" D CHKSC^LA7QRY1
+"RTN","C0CLA7Q",44,0)
+ ;
+"RTN","C0CLA7Q",45,0)
+ ; Convert specimen codes to file #61 Topography entries
+"RTN","C0CLA7Q",46,0)
+ S LA7SPEC=$G(C0CSPEC)
+"RTN","C0CLA7Q",47,0)
+ I LA7SPEC'="*"  D SPEC^LA7QRY1
+"RTN","C0CLA7Q",48,0)
+ ;
+"RTN","C0CLA7Q",49,0)
+ S C0CROOT="^AUPNVLAB(""ALR4"",DFN,C0CSDT)",C0CEND=0
+"RTN","C0CLA7Q",50,0)
+ ;
+"RTN","C0CLA7Q",51,0)
+ F  S C0CROOT=$Q(@C0CROOT) Q:C0CROOT=""  D  Q:C0CEND
+"RTN","C0CLA7Q",52,0)
+ . I $QS(C0CROOT,1)'="ALR4"!($QS(C0CROOT,2)'=DFN) S C0CEND=1 Q  ; Left x-ref or patient
+"RTN","C0CLA7Q",53,0)
+ . I $QS(C0CROOT,3)>C0CEDT S C0CEND=1 Q  ; Exceeded end date/time
+"RTN","C0CLA7Q",54,0)
+ . S C0CDA=$QS(C0CROOT,4)
+"RTN","C0CLA7Q",55,0)
+ . I $D(^TMP("C0C-VLAB",$J,1,C0CDA)) Q  ; Already checked during scan of file #63
+"RTN","C0CLA7Q",56,0)
+ . I $P($G(^AUPNVLAB(C0CDA,11)),"^",8)=1 Q  ; Source is LAB DATA file - skip
+"RTN","C0CLA7Q",57,0)
+ . D VCHK1
+"RTN","C0CLA7Q",58,0)
+ ;
+"RTN","C0CLA7Q",59,0)
+ ;
+"RTN","C0CLA7Q",60,0)
+ Q
+"RTN","C0CLA7Q",61,0)
+ ;
+"RTN","C0CLA7Q",62,0)
+ ;
+"RTN","C0CLA7Q",63,0)
+VBUILD ; Build results found only in V LAB file into HL7 structure.
+"RTN","C0CLA7Q",64,0)
+ ;
+"RTN","C0CLA7Q",65,0)
+ ;
+"RTN","C0CLA7Q",66,0)
+ Q
+"RTN","C0CLA7Q",67,0)
+ ;
+"RTN","C0CLA7Q",68,0)
+ ;
+"RTN","C0CLA7Q",69,0)
+LNCHK ; Check for corresponding entry in V LAB file and related LOINC code for a result in file #63.
+"RTN","C0CLA7Q",70,0)
+ ; Call from LA7QRY2
+"RTN","C0CLA7Q",71,0)
+ ;
+"RTN","C0CLA7Q",72,0)
+ N DFN,C0C60,C0C63,C0CACC,C0CDA,C0CDT,C0CLN,C0CPDA,C0CPTEST,C0CSPEC,C0CTEST,X
+"RTN","C0CLA7Q",73,0)
+ ;
+"RTN","C0CLA7Q",74,0)
+ S DFN=$P(^LR(LRDFN,0),"^",3)
+"RTN","C0CLA7Q",75,0)
+ S C0C63(0)=^LR(LRDFN,LRSS,LRIDT,0)
+"RTN","C0CLA7Q",76,0)
+ S C0CDT=$P(C0C63(0),"^"),C0CACC=$P(C0C63(0),"^",6),C0CSPEC=$P(C0C63(0),"^",5)
+"RTN","C0CLA7Q",77,0)
+ S (C0CTEST,C0CTEST(64),C0CPTEST,C0CPTEST(64),C0CLN)=""
+"RTN","C0CLA7Q",78,0)
+ ;
+"RTN","C0CLA7Q",79,0)
+ ; ^AUPNVLAB("ALR1",5380,"EKT 0307 48",173,3080307.211055,5427197)=""
+"RTN","C0CLA7Q",80,0)
+ ;
+"RTN","C0CLA7Q",81,0)
+ S C0C60=""
+"RTN","C0CLA7Q",82,0)
+ F  S C0C60=$O(^LAB(60,"C",LRSS_";"_LRSB_";1",C0C60)) Q:'C0C60  D  Q:C0CLN'=""
+"RTN","C0CLA7Q",83,0)
+ . D FINDDT
+"RTN","C0CLA7Q",84,0)
+ . I C0CDA<1 Q
+"RTN","C0CLA7Q",85,0)
+ . I $P($G(^AUPNVLAB(C0CDA,11)),"^",8)'=1 Q  ; Source is not LAB DATA file - skip
+"RTN","C0CLA7Q",86,0)
+ . S C0CLN=$P($G(^AUPNVLAB(C0CDA,11)),"^",13)
+"RTN","C0CLA7Q",87,0)
+ . S C0CPDA=$P($G(^AUPNVLAB(C0CDA,12)),"^",8)
+"RTN","C0CLA7Q",88,0)
+ . I C0CPDA,'$D(^AUPNVLAB(C0CPDA,0)) S C0CPDA="" ; Dangling pointer
+"RTN","C0CLA7Q",89,0)
+ . I C0CPDA="" S C0CPDA=C0CDA
+"RTN","C0CLA7Q",90,0)
+ . S C0CTEST=$P($G(^AUPNVLAB(C0CDA,0)),"^"),X=$P($G(^LAB(60,C0CTEST,64)),"^",2)
+"RTN","C0CLA7Q",91,0)
+ . I X S C0CTEST(64)=$P($G(^LAM(X,0)),"^",2)
+"RTN","C0CLA7Q",92,0)
+ . S C0CPTEST=$P($G(^AUPNVLAB(C0CPDA,0)),"^"),X=$P($G(^LAB(60,C0CPTEST,64)),"^")
+"RTN","C0CLA7Q",93,0)
+ . I X S C0CPTEST(64)=$P($G(^LAM(X,0)),"^",2)
+"RTN","C0CLA7Q",94,0)
+ . S ^TMP("C0C-VLAB",$J,1,C0CDA)=""
+"RTN","C0CLA7Q",95,0)
+ . I C0CDA'=C0CPDA S ^TMP("C0C-VLAB",$J,1,C0CPDA)=""
+"RTN","C0CLA7Q",96,0)
+ . S ^TMP("C0C-VLAB",$J,2,LRDFN,LRSS,LRIDT,LRSB)=C0CPTEST(64)_"^"_C0CTEST(64)_"^"_C0CLN_"^"_C0CDA_"^"_C0CTEST_"^"_C0CPDA_"^"_C0CPTEST
+"RTN","C0CLA7Q",97,0)
+ ;
+"RTN","C0CLA7Q",98,0)
+ S X=$P(LA7X,"^",3)
+"RTN","C0CLA7Q",99,0)
+ ; If order NLT then update if no order NLT
+"RTN","C0CLA7Q",100,0)
+ I C0CPTEST(64),$P(X,"!")="" S $P(X,"!")=C0CPTEST(64)
+"RTN","C0CLA7Q",101,0)
+ ;
+"RTN","C0CLA7Q",102,0)
+ ; If result NLT then update if no result NLT
+"RTN","C0CLA7Q",103,0)
+ I C0CTEST(64),$P(X,"!",2)="" S $P(X,"!",2)=C0CTEST(64)
+"RTN","C0CLA7Q",104,0)
+ ;
+"RTN","C0CLA7Q",105,0)
+ ; If LOINC found then update variable with LN code
+"RTN","C0CLA7Q",106,0)
+ I C0CLN'="",$P(X,"!",3)="" S $P(X,"!",3)=C0CLN
+"RTN","C0CLA7Q",107,0)
+ ;
+"RTN","C0CLA7Q",108,0)
+ S $P(LA7X,"^",3)=X
+"RTN","C0CLA7Q",109,0)
+ ;
+"RTN","C0CLA7Q",110,0)
+ Q
+"RTN","C0CLA7Q",111,0)
+ ;
+"RTN","C0CLA7Q",112,0)
+ ;
+"RTN","C0CLA7Q",113,0)
+TMPCHK ; Check if LN/NLT codes saved from V LAB file above and use when building OBR/OBX segments
+"RTN","C0CLA7Q",114,0)
+ ; Called from LA7VOBX1
+"RTN","C0CLA7Q",115,0)
+ ;
+"RTN","C0CLA7Q",116,0)
+ N I,X
+"RTN","C0CLA7Q",117,0)
+ ;
+"RTN","C0CLA7Q",118,0)
+ S X=$G(^TMP("C0C-VLAB",$J,2,LRDFN,LRSS,LRIDT,LRSB))
+"RTN","C0CLA7Q",119,0)
+ I X="" Q
+"RTN","C0CLA7Q",120,0)
+ F I=1:1:3 I $P(LA7X,"!",I)="",$P(X,"^",I)'="" S $P(LA7X,"!",I)=$P(X,"^",I)
+"RTN","C0CLA7Q",121,0)
+ S $P(LA7VAL,"^",3)=LA7X
+"RTN","C0CLA7Q",122,0)
+ ;
+"RTN","C0CLA7Q",123,0)
+ Q
+"RTN","C0CLA7Q",124,0)
+ ;
+"RTN","C0CLA7Q",125,0)
+ ;
+"RTN","C0CLA7Q",126,0)
+VCHK1 ; Check the entry in V Lab to determine if it meets criteria
+"RTN","C0CLA7Q",127,0)
+ ;
+"RTN","C0CLA7Q",128,0)
+ N C0CVLAB,I
+"RTN","C0CLA7Q",129,0)
+ ;
+"RTN","C0CLA7Q",130,0)
+ F I=0,12 S C0CVLAB(I)=$G(^AUPNVLAB(C0CDA,I))
+"RTN","C0CLA7Q",131,0)
+ ;
+"RTN","C0CLA7Q",132,0)
+ ; JMC 04/13/09 - Store anything for now that meets date criteria.
+"RTN","C0CLA7Q",133,0)
+ D VSTORE
+"RTN","C0CLA7Q",134,0)
+ ;
+"RTN","C0CLA7Q",135,0)
+ Q
+"RTN","C0CLA7Q",136,0)
+ ;
+"RTN","C0CLA7Q",137,0)
+ ;
+"RTN","C0CLA7Q",138,0)
+VSTORE ; Store entry for building in HL7 message when parent is from V LAB file.
+"RTN","C0CLA7Q",139,0)
+ ;
+"RTN","C0CLA7Q",140,0)
+ N C0CPDA,C0CPTEST
+"RTN","C0CLA7Q",141,0)
+ ;
+"RTN","C0CLA7Q",142,0)
+ ; Determine parent test to use for OBR segment
+"RTN","C0CLA7Q",143,0)
+ S C0CPDA=$P(C0CVLAB(12),"^",8)
+"RTN","C0CLA7Q",144,0)
+ I C0CPDA="" S C0CPDA=C0CDA
+"RTN","C0CLA7Q",145,0)
+ ;
+"RTN","C0CLA7Q",146,0)
+ ; Determine parent test
+"RTN","C0CLA7Q",147,0)
+ S C0CPTEST=$P($G(^AUPNVLAB(C0CPDA,0)),"^")
+"RTN","C0CLA7Q",148,0)
+ ;
+"RTN","C0CLA7Q",149,0)
+ S ^TMP("C0C-VLAB",$J,3,$P(C0CVLAB(0),"^",2),$P(C0CVLAB(12),"^"),C0CPTEST,C0CDA)=C0CPDA
+"RTN","C0CLA7Q",150,0)
+ ;
+"RTN","C0CLA7Q",151,0)
+ Q
+"RTN","C0CLA7Q",152,0)
+ ;
+"RTN","C0CLA7Q",153,0)
+ ;
+"RTN","C0CLA7Q",154,0)
+FINDDT ; Find entry in V LAB for the date/time or one close to it.
+"RTN","C0CLA7Q",155,0)
+ ; RPMS stores related specimen entries under the same date/time.
+"RTN","C0CLA7Q",156,0)
+ ; Lab file #63 creates unique entries with slightly different times.
+"RTN","C0CLA7Q",157,0)
+ ;
+"RTN","C0CLA7Q",158,0)
+ S C0CDA=$O(^AUPNVLAB("ALR1",DFN,C0CACC,C0C60,C0CDT,0))
+"RTN","C0CLA7Q",159,0)
+ I C0CDA>0 Q
+"RTN","C0CLA7Q",160,0)
+ ;
+"RTN","C0CLA7Q",161,0)
+ ; If entry found then confirm that specimen type matches.
+"RTN","C0CLA7Q",162,0)
+ N C0CDTY
+"RTN","C0CLA7Q",163,0)
+ S C0CDTY=$O(^AUPNVLAB("ALR1",DFN,C0CACC,C0C60,0))
+"RTN","C0CLA7Q",164,0)
+ I C0CDTY D
+"RTN","C0CLA7Q",165,0)
+ . I $P(C0CDT,".")'=$P(C0CDTY,".") Q
+"RTN","C0CLA7Q",166,0)
+ . S C0CDA=$O(^AUPNVLAB("ALR1",DFN,C0CACC,C0C60,C0CDTY,0))
+"RTN","C0CLA7Q",167,0)
+ . I C0CSPEC'=$P($G(^AUPNVLAB(C0CDA,11)),"^",3) S C0CDA=""
+"RTN","C0CLA7Q",168,0)
+ ;
+"RTN","C0CLA7Q",169,0)
+ Q
+"RTN","C0CLABS")
+0^40^B282604886
+"RTN","C0CLABS",1,0)
+C0CLABS ; CCDCCR/GPL - CCR/CCD PROCESSING FOR LAB RESULTS ; 10/01/08 ; 5/10/12 2:49pm
+"RTN","C0CLABS",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CLABS",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota.
+"RTN","C0CLABS",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CLABS",5,0)
+ ;See attached copy of the License.
+"RTN","C0CLABS",6,0)
+ ;
+"RTN","C0CLABS",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CLABS",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CLABS",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CLABS",10,0)
+ ;(at your option) any later version.
+"RTN","C0CLABS",11,0)
+ ;
+"RTN","C0CLABS",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CLABS",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CLABS",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CLABS",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CLABS",16,0)
+ ;
+"RTN","C0CLABS",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CLABS",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CLABS",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CLABS",20,0)
+           ;
+"RTN","C0CLABS",21,0)
+MAP(MIXML,DFN,MOXML) ;TO MAKE THIS COMPATIBLE WITH OLD CALLING FOR EXTRACT
+"RTN","C0CLABS",22,0)
+ ; ASSUMES THAT EXTRACT HAS BEEN RUN AND THE VARIABLES STORED IN MIVAR
+"RTN","C0CLABS",23,0)
+ ; MIXML,MIVAR, AND MOXML ARE PASSED BY NAME
+"RTN","C0CLABS",24,0)
+ ; MIXML IS THE TEMPLATE TO USE
+"RTN","C0CLABS",25,0)
+ ; MOXML IS THE OUTPUT XML ARRAY
+"RTN","C0CLABS",26,0)
+ ; DFN IS THE PATIENT RECORD NUMBER
+"RTN","C0CLABS",27,0)
+ N C0COXML,C0CO,C0CV,C0CIXML
+"RTN","C0CLABS",28,0)
+ I '$D(MIVAR) S C0CV="" ;DEFAULT
+"RTN","C0CLABS",29,0)
+ E  S C0CV=MIVAR ;PASSED VARIABLE ARRAY
+"RTN","C0CLABS",30,0)
+ I '$D(MIXML) S C0CIXML="" ;DEFAULT
+"RTN","C0CLABS",31,0)
+ E  S C0CIXML=MIXML ;PASSED INPUT XML
+"RTN","C0CLABS",32,0)
+ D RPCMAP(.C0COXML,DFN,C0CV,C0CIXML) ; CALL RPC TO DO THE WORK
+"RTN","C0CLABS",33,0)
+ I '$D(MOXML) S C0CO=$NA(^TMP("C0CCCR",$J,DFN,"RESULTS")) ;DEFAULT FOR OUTPUT
+"RTN","C0CLABS",34,0)
+ E  S C0CO=MOXML
+"RTN","C0CLABS",35,0)
+ ; ZWR C0COXML
+"RTN","C0CLABS",36,0)
+ M @C0CO=C0COXML ; COPY RESULTS TO OUTPUT
+"RTN","C0CLABS",37,0)
+ Q
+"RTN","C0CLABS",38,0)
+ ;
+"RTN","C0CLABS",39,0)
+RPCMAP(RTN,DFN,RMIVAR,RMIXML) ; RPC ENTRY POINT FOR MAPPING RESULTS
+"RTN","C0CLABS",40,0)
+ ; RTN IS PASSED BY REFERENCE
+"RTN","C0CLABS",41,0)
+ ;N C0CT0,C0CT,C0CV ; CCR TEMPLATE, RESULTS SUBTEMPLATE, VARIABLES
+"RTN","C0CLABS",42,0)
+ ;N C0CRT,C0CTT ; TEST REQUEST TEMPLATE, TEST RESULT TEMPLATE
+"RTN","C0CLABS",43,0)
+ I '$D(DEBUG) S DEBUG=0 ; DEFAULT NO DEBUGGING
+"RTN","C0CLABS",44,0)
+ I RMIXML="" D  ; INPUT XML NOT PASSED
+"RTN","C0CLABS",45,0)
+ . D LOAD^C0CCCR0("C0CT0") ; LOAD ENTIRE CCR TEMPLATE
+"RTN","C0CLABS",46,0)
+ . D QUERY^C0CXPATH("C0CT0","//ContinuityOfCareRecord/Body/Results","C0CT0R")
+"RTN","C0CLABS",47,0)
+ . S C0CT="C0CT0R" ; NAME OF EXTRACTED RESULTS TEMPLATE
+"RTN","C0CLABS",48,0)
+ E  S C0CT=RMIXML ; WE ARE PASSED THE RESULTS PART OF THE TEMPLATE
+"RTN","C0CLABS",49,0)
+ I RMIVAR="" D  ; LOCATION OF VARIABLES NOT PASSED
+"RTN","C0CLABS",50,0)
+ . S C0CV=$NA(^TMP("C0CCCR",$J,"RESULTS")) ;DEFAULT VARIABLE LOCATION
+"RTN","C0CLABS",51,0)
+ E  S C0CV=RMIVAR ; PASSED LOCATIONS OF VARS
+"RTN","C0CLABS",52,0)
+ D CP^C0CXPATH(C0CT,"C0CRT") ; START MAKING TEST REQUEST TEMPLATE
+"RTN","C0CLABS",53,0)
+ D REPLACE^C0CXPATH("C0CRT","","//Results/Result/Test") ; DELETE TEST FROM REQ
+"RTN","C0CLABS",54,0)
+ D QUERY^C0CXPATH(C0CT,"//Results/Result/Test","C0CTT") ; MAKE TEST TEMPLATE
+"RTN","C0CLABS",55,0)
+ I '$D(C0CQT) S C0CQT=0 ; DEFAULT NOT SILENT
+"RTN","C0CLABS",56,0)
+ I 'C0CQT D  ; WE ARE DEBUGGING
+"RTN","C0CLABS",57,0)
+ . W "I MAPPED",!
+"RTN","C0CLABS",58,0)
+ . W "VARS:",C0CV,!
+"RTN","C0CLABS",59,0)
+ . W "DFN:",DFN,!
+"RTN","C0CLABS",60,0)
+ . ;D PARY^C0CXPATH("C0CT") ; SECTION TEMPLATE
+"RTN","C0CLABS",61,0)
+ . ;D PARY^C0CXPATH("C0CRT") ;REQUEST TEMPLATE (OCR)
+"RTN","C0CLABS",62,0)
+ . ;D PARY^C0CXPATH("C0CTT") ;TEST TEMPLATE (OCX)
+"RTN","C0CLABS",63,0)
+ D EXTRACT("C0CT",DFN,) ; FIRST CALL EXTRACT
+"RTN","C0CLABS",64,0)
+ I '$D(@C0CV@(0)) D  Q  ; NO VARS THERE
+"RTN","C0CLABS",65,0)
+ . S RTN(0)=0 ; PASS BACK NO RESULTS INDICATOR
+"RTN","C0CLABS",66,0)
+ I @C0CV@(0)=0 S RTN(0)=0 Q ; NO RESULTS
+"RTN","C0CLABS",67,0)
+ S RIMVARS=$NA(^TMP("C0CRIM","VARS",DFN,"RESULTS"))
+"RTN","C0CLABS",68,0)
+ K @RIMVARS
+"RTN","C0CLABS",69,0)
+ M @RIMVARS=@C0CV ; UPDATE RIMVARS SO THEY STAY IN SYNCH
+"RTN","C0CLABS",70,0)
+ N C0CI,C0CJ,C0CMAP,C0CTMAP,C0CTMP
+"RTN","C0CLABS",71,0)
+ S C0CIN=@C0CV@(0) ; COUNT OF RESULTS (OBR)
+"RTN","C0CLABS",72,0)
+ N C0CRTMP ; AREA TO BUILD ONE RESULT REQUEST AND ALL TESTS FOR IT
+"RTN","C0CLABS",73,0)
+ N C0CRBASE S C0CRBASE=$NA(^TMP($J,"TESTTMP")) ;WORK AREA
+"RTN","C0CLABS",74,0)
+ N C0CRBLD ; BUILD LIST FOR XML - THE BUILD IS DELAYED UNTIL THE END
+"RTN","C0CLABS",75,0)
+ ; TO IMPROVE PERFORMANCE
+"RTN","C0CLABS",76,0)
+ D QUEUE^C0CXPATH("C0CRBLD","C0CRT",1,1) ;<Results>
+"RTN","C0CLABS",77,0)
+ F C0CI=1:1:C0CIN D  ; LOOP THROUGH VARIABLES
+"RTN","C0CLABS",78,0)
+ . K C0CMAP,C0CTMP ;EMPTY OUT LAST BATCH OF VARIABLES
+"RTN","C0CLABS",79,0)
+ . S C0CRTMP=$NA(@C0CRBASE@(C0CI)) ;PARTITION OF WORK AREA FOR EACH TEST
+"RTN","C0CLABS",80,0)
+ . S C0CMAP=$NA(@C0CV@(C0CI)) ;
+"RTN","C0CLABS",81,0)
+ . I 'C0CQT W "MAPOBR:",C0CMAP,!
+"RTN","C0CLABS",82,0)
+ . ;MAPPING FOR TEST REQUEST GOES HERE
+"RTN","C0CLABS",83,0)
+ . D MAP^C0CXPATH("C0CRT",C0CMAP,C0CRTMP) ; MAP OBR DATA
+"RTN","C0CLABS",84,0)
+ . ;D QOPEN^C0CXPATH("C0CRBLD",C0CRTMP,C0CIS) ;1ST PART OF XML
+"RTN","C0CLABS",85,0)
+ . D QUEUE^C0CXPATH("C0CRBLD",C0CRTMP,2,@C0CRTMP@(0)-4) ;UP TO <Test>
+"RTN","C0CLABS",86,0)
+ . I $D(@C0CMAP@("M","TEST",0)) D  ; TESTS EXIST
+"RTN","C0CLABS",87,0)
+ . . S C0CJN=@C0CMAP@("M","TEST",0) ; NUMBER OF TESTS
+"RTN","C0CLABS",88,0)
+ . . K C0CTO ; CLEAR OUTPUT VARIABLE
+"RTN","C0CLABS",89,0)
+ . . F C0CJ=1:1:C0CJN D   ;FOR EACH TEST RESULT
+"RTN","C0CLABS",90,0)
+ . . . K C0CTMAP ; EMPTY MAPS FOR TEST RESULTS
+"RTN","C0CLABS",91,0)
+ . . . S C0CTMP=$NA(@C0CRBASE@(C0CI,C0CJ)) ;WORK AREA FOR TEST RESULTS
+"RTN","C0CLABS",92,0)
+ . . . S C0CTMAP=$NA(@C0CMAP@("M","TEST",C0CJ)) ;
+"RTN","C0CLABS",93,0)
+ . . . I 'C0CQT W "MAPOBX:",C0CTMAP,!
+"RTN","C0CLABS",94,0)
+ . . . D MAP^C0CXPATH("C0CTT",C0CTMAP,C0CTMP) ; MAP TO TMP
+"RTN","C0CLABS",95,0)
+ . . . I C0CJ=1 S C0CJS=2 E  S C0CJS=1 ;FIRST TIME,SKIP THE <Test>
+"RTN","C0CLABS",96,0)
+ . . . I C0CJ=C0CJN S C0CJE=@C0CTMP@(0)-1 E  S C0CJE=@C0CTMP@(0) ;</Test>
+"RTN","C0CLABS",97,0)
+ . . . S C0CJS=1 S C0CJE=@C0CTMP@(0) ; INSERT ALL OF THE TEXT XML
+"RTN","C0CLABS",98,0)
+ . . . D QUEUE^C0CXPATH("C0CRBLD",C0CTMP,C0CJS,C0CJE) ; ADD TO BUILD LIST
+"RTN","C0CLABS",99,0)
+ . . . ;I C0CJ=1 D  ; FIRST TIME, JUST COPY
+"RTN","C0CLABS",100,0)
+ . . . ;. D CP^C0CXPATH("C0CTMP","C0CTO") ; START BUILDING TEST XML
+"RTN","C0CLABS",101,0)
+ . . . ;E  D INSINNER^C0CXPATH("C0CTO","C0CTMP")
+"RTN","C0CLABS",102,0)
+ . . . ;
+"RTN","C0CLABS",103,0)
+ . . . ;D PUSHA^C0CXPATH("C0CTO",C0CTMP) ;ADD THE TEST TO BUFFER
+"RTN","C0CLABS",104,0)
+ . . ; I 'C0CQT D PARY^C0CXPATH("C0CTO")
+"RTN","C0CLABS",105,0)
+ . . ;D INSINNER^C0CXPATH(C0CRTMP,"C0CTO","//Results/Result/Test") ;INSERT TST
+"RTN","C0CLABS",106,0)
+ . ;D QCLOSE^C0CXPATH("C0CRBLD",C0CRTMP,"//Results/Result/Test") ;END OF XML
+"RTN","C0CLABS",107,0)
+ . D QUEUE^C0CXPATH("C0CRBLD","C0CRT",C0CRT(0)-1,C0CRT(0)-1) ;</Result>
+"RTN","C0CLABS",108,0)
+ . ;I C0CI=1 D  ; FIRST TIME, COPY INSTEAD OF INSERT
+"RTN","C0CLABS",109,0)
+ . . ;D CP^C0CXPATH(C0CRTMP,"RTN") ;
+"RTN","C0CLABS",110,0)
+ . ;E  D INSINNER^C0CXPATH("RTN",C0CRTMP) ; INSERT THIS TEST REQUEST
+"RTN","C0CLABS",111,0)
+ D QUEUE^C0CXPATH("C0CRBLD","C0CRT",C0CRT(0),C0CRT(0)) ;</Results>
+"RTN","C0CLABS",112,0)
+ D BUILD^C0CXPATH("C0CRBLD","RTN") ;RENDER THE XML
+"RTN","C0CLABS",113,0)
+ K @C0CRBASE ; CLEAR OUT TEMPORARY STURCTURE
+"RTN","C0CLABS",114,0)
+ Q
+"RTN","C0CLABS",115,0)
+ ;
+"RTN","C0CLABS",116,0)
+EXTRACT(ILXML,DFN,OLXML) ; EXTRACT LABS INTO THE C0CLVAR GLOBAL
+"RTN","C0CLABS",117,0)
+ ;
+"RTN","C0CLABS",118,0)
+ ; LABXML AND LABOUTXML ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CLABS",119,0)
+ ;
+"RTN","C0CLABS",120,0)
+ ;
+"RTN","C0CLABS",121,0)
+ ;
+"RTN","C0CLABS",122,0)
+ N C0CNSSN ; IS THERE AN SSN FLAG
+"RTN","C0CLABS",123,0)
+ S C0CNSSN=0
+"RTN","C0CLABS",124,0)
+ S C0CLB=$NA(^TMP("C0CCCR",$J,"RESULTS")) ; BASE GLB FOR LABS VARS
+"RTN","C0CLABS",125,0)
+ D GHL7 ; GET HL7 MESSAGE FOR THIS PATIENT
+"RTN","C0CLABS",126,0)
+ I C0CNSSN=1 D  Q  ; NO SSN, CAN'T GET HL7 FOR THIS PATIENT
+"RTN","C0CLABS",127,0)
+ . S @C0CLB@(0)=0
+"RTN","C0CLABS",128,0)
+ K @C0CLB ; CLEAR OUT OLD VARS IF ANY
+"RTN","C0CLABS",129,0)
+ N QTSAV S QTSAV=C0CQT ;SAVE QUIET FLAG
+"RTN","C0CLABS",130,0)
+ S C0CQT=1 ; SURPRESS LISTING
+"RTN","C0CLABS",131,0)
+ D LIST ; EXTRACT THE VARIABLES
+"RTN","C0CLABS",132,0)
+ ; FOR CERTIFICATION, SEE IF THERE ARE OTHER RESULTS TO ADD
+"RTN","C0CLABS",133,0)
+ D EN^C0CORSLT(C0CLB,DFN) ; LOOKS FOR ECG TESTS
+"RTN","C0CLABS",134,0)
+ S C0CQT=QTSAV ; RESET SILENT FLAG
+"RTN","C0CLABS",135,0)
+ K ^TMP("HLS",$J) ; KILL HL7 MESSAGE OUTPUT
+"RTN","C0CLABS",136,0)
+ I $D(OLXML) S @OLXML@(0)=0 ; EXTRACT DOES NOT PRODUCE XML... SEE MAP^C0CLABS
+"RTN","C0CLABS",137,0)
+ Q
+"RTN","C0CLABS",138,0)
+     ;
+"RTN","C0CLABS",139,0)
+GHL7 ; GET HL7 MESSAGE FOR LABS FOR THIS PATIENT
+"RTN","C0CLABS",140,0)
+ ; N C0CPTID,C0CSPC,C0CSDT,C0CEDT,C0CR
+"RTN","C0CLABS",141,0)
+ ; SET UP FOR LAB API CALL
+"RTN","C0CLABS",142,0)
+ S C0CPTID=$$SSN^C0CDPT(DFN) ; GET THE SSN FOR THIS PATIENT
+"RTN","C0CLABS",143,0)
+ I C0CPTID="" D  Q  ; NO SSN, COMPLAIN AND QUIT
+"RTN","C0CLABS",144,0)
+ . W "LAB LOOKUP FAILED, NO SSN",!
+"RTN","C0CLABS",145,0)
+ . S C0CNSSN=1 ; SET NO SSN FLAG
+"RTN","C0CLABS",146,0)
+ S C0CSPC="*" ; LOOKING FOR ALL LABS
+"RTN","C0CLABS",147,0)
+ ;I $D(^TMP("C0CCCR","RPMS")) D  ; RUNNING RPMS
+"RTN","C0CLABS",148,0)
+ ;. D DT^DILF(,"T-365",.C0CSDT) ; START DATE ONE YEAR AGO TO LIMIT VOLUME
+"RTN","C0CLABS",149,0)
+ ;E  D DT^DILF(,"T-5000",.C0CSDT) ; START DATE LONG AGO TO GET EVERYTHING
+"RTN","C0CLABS",150,0)
+ ;D DT^DILF(,"T",.C0CEDT) ; END DATE TODAY
+"RTN","C0CLABS",151,0)
+ S C0CLLMT=$$GET^C0CPARMS("LABLIMIT") ; GET THE LIMIT PARM
+"RTN","C0CLABS",152,0)
+ S C0CLSTRT=$$GET^C0CPARMS("LABSTART") ; GET START PARM
+"RTN","C0CLABS",153,0)
+ D DT^DILF(,C0CLLMT,.C0CSDT) ;
+"RTN","C0CLABS",154,0)
+ W "LAB LIMIT: ",C0CLLMT,!
+"RTN","C0CLABS",155,0)
+ D DT^DILF(,C0CLSTRT,.C0CEDT) ; END DATE TODAY - IMPLEMENT END DATE PARM
+"RTN","C0CLABS",156,0)
+ S C0CEDT=$$NOW^XLFDT ; PULL LABS STARTING NOW
+"RTN","C0CLABS",157,0)
+ S C0CR=$$LAB^C0CLA7Q(C0CPTID,C0CSDT,C0CEDT,C0CSPC,C0CSPC) ; CALL LAB LOOKUP
+"RTN","C0CLABS",158,0)
+ Q
+"RTN","C0CLABS",159,0)
+ ;
+"RTN","C0CLABS",160,0)
+LIST ; LIST THE HL7 MESSAGE; ALSO, EXTRACT THE RESULT VARIABLES TO C0CLB
+"RTN","C0CLABS",161,0)
+ ;
+"RTN","C0CLABS",162,0)
+ ; N C0CI,C0CJ,C0COBT,C0CHB,C0CVAR
+"RTN","C0CLABS",163,0)
+ I '$D(C0CLB) S C0CLB=$NA(^TMP("C0CCCR",$J,"RESULTS")) ; BASE GLB FOR LABS VARS
+"RTN","C0CLABS",164,0)
+ I '$D(C0CQT) S C0CQT=0
+"RTN","C0CLABS",165,0)
+ I '$D(DFN) S DFN=1 ; DEFAULT TEST PATIENT
+"RTN","C0CLABS",166,0)
+ I '$D(^TMP("C0CCCR","LABTBL",0)) D SETTBL ;INITIALIZE LAB TABLE
+"RTN","C0CLABS",167,0)
+ I ^TMP("C0CCCR","LABTBL",0)'="V3" D SETTBL ;NEED NEWEST VERSION
+"RTN","C0CLABS",168,0)
+ I '$D(^TMP("HLS",$J,1)) D GHL7 ; GET HL7 MGS IF NOT ALREADY DONE
+"RTN","C0CLABS",169,0)
+ S C0CTAB=$NA(^TMP("C0CCCR","LABTBL")) ; BASE OF OBX TABLE
+"RTN","C0CLABS",170,0)
+ S C0CHB=$NA(^TMP("HLS",$J))
+"RTN","C0CLABS",171,0)
+ S C0CI=""
+"RTN","C0CLABS",172,0)
+ S @C0CLB@(0)=0 ; INITALIZE RESULTS VARS COUNT
+"RTN","C0CLABS",173,0)
+ F  S C0CI=$O(@C0CHB@(C0CI)) Q:C0CI=""  D  ; FOR ALL RECORDS IN HL7 MSG
+"RTN","C0CLABS",174,0)
+ . K C0CVAR,XV ; CLEAR OUT VARIABLE VALUES
+"RTN","C0CLABS",175,0)
+ . S C0CTYP=$P(@C0CHB@(C0CI),"|",1)
+"RTN","C0CLABS",176,0)
+ . D LTYP(@C0CHB@(C0CI),C0CTYP,.C0CVAR,C0CQT)
+"RTN","C0CLABS",177,0)
+ . I $G(C0CVAR("RESULTCODINGSYSTEM"))="LN" D  ; gpl - for certification
+"RTN","C0CLABS",178,0)
+ . . S C0CVAR("RESULTCODINGSYSTEM")="LOINC" ; NEED TO SPELL IT OUT
+"RTN","C0CLABS",179,0)
+ . . N C0CRDT S C0CRDT=C0CVAR("RESULTDESCRIPTIONTEXT") ; THE DESCRIPTION
+"RTN","C0CLABS",180,0)
+ . . N C0CRCD S C0CRCD=C0CVAR("RESULTCODE") ; THE LOINC CODE
+"RTN","C0CLABS",181,0)
+ . . S C0CVAR("RESULTDESCRIPTIONTEXT")=C0CRDT_" LOINC: "_C0CRCD
+"RTN","C0CLABS",182,0)
+ . M XV=C0CVAR ;
+"RTN","C0CLABS",183,0)
+ . I C0CTYP="OBR" D  ; BEGINNING OF NEW SECTION
+"RTN","C0CLABS",184,0)
+ . . S @C0CLB@(0)=@C0CLB@(0)+1 ; INCREMENT COUNT
+"RTN","C0CLABS",185,0)
+ . . S C0CLI=@C0CLB@(0) ; INDEX FOR THIS RESULT
+"RTN","C0CLABS",186,0)
+ . . ;M @C0CLB@(C0CLI)=C0CVAR ; PERSIST THE OBR VARS
+"RTN","C0CLABS",187,0)
+ . . S XV("RESULTOBJECTID")="RESULT_"_C0CLI
+"RTN","C0CLABS",188,0)
+ . . S C0CX1=XV("RESULTSOURCEACTORID") ; SOURCE FROM OBR
+"RTN","C0CLABS",189,0)
+ . . S XV("RESULTSOURCEACTORID")="ACTORPROVIDER_"_$P($P(C0CX1,"^",1),"-",1)
+"RTN","C0CLABS",190,0)
+ . . S C0CX1=XV("RESULTASSESSMENTDATETIME") ;DATE TIME IN HL7 FORMAT
+"RTN","C0CLABS",191,0)
+ . . S C0CX2=$$HL7TFM^XLFDT(C0CX1,"L") ;FM DT LOCAL
+"RTN","C0CLABS",192,0)
+ . . S XV("RESULTASSESSMENTDATETIME")=$$FMDTOUTC^C0CUTIL(C0CX2,"DT") ;UTC TIME
+"RTN","C0CLABS",193,0)
+ . . M @C0CLB@(C0CLI)=XV ; PERSIST THE OBR VARS
+"RTN","C0CLABS",194,0)
+ . . S C0CLOBX=0 ; MARK THE BEGINNING OF A NEW SECTION
+"RTN","C0CLABS",195,0)
+ . I C0CTYP="OBX" D  ; SPECIAL CASE FOR OBX3
+"RTN","C0CLABS",196,0)
+ . . ; RESULTTESTCODEVALUE
+"RTN","C0CLABS",197,0)
+ . . ; RESULTTESTDESCRIPTIONTEXT
+"RTN","C0CLABS",198,0)
+ . . I C0CVAR("C3")="LN" D  ; PRIMARY CODE IS LOINC
+"RTN","C0CLABS",199,0)
+ . . . S XV("RESULTTESTCODEVALUE")=C0CVAR("C1") ; THE LOINC CODE VALUE
+"RTN","C0CLABS",200,0)
+ . . . S XV("RESULTTESTCODINGSYSTEM")="LOINC" ; DISPLAY NAME FOR LOINC
+"RTN","C0CLABS",201,0)
+ . . . ;S XV("RESULTTESTDESCRIPTIONTEXT")=C0CVAR("C2") ; DESC TXT
+"RTN","C0CLABS",202,0)
+ . . . S XV("RESULTTESTDESCRIPTIONTEXT")=C0CVAR("C2")_" LOINC: "_C0CVAR("C1")
+"RTN","C0CLABS",203,0)
+ . . E  I C0CVAR("C6")="LN" D  ; SECONDARY CODE IS LOINC
+"RTN","C0CLABS",204,0)
+ . . . S XV("RESULTTESTCODEVALUE")=C0CVAR("C4") ; THE LOINC CODE VALUE
+"RTN","C0CLABS",205,0)
+ . . . S XV("RESULTTESTCODINGSYSTEM")="LOINC" ; DISPLAY NAME FOR LOINC
+"RTN","C0CLABS",206,0)
+ . . . S XV("RESULTTESTDESCRIPTIONTEXT")=C0CVAR("C5") ; DESCRIPTION TEXT
+"RTN","C0CLABS",207,0)
+ . . E  I C0CVAR("C6")'="" D  ; NO LOINC CODES, USE SECONDARY IF PRESENT
+"RTN","C0CLABS",208,0)
+ . . . S XV("RESULTTESTCODEVALUE")=C0CVAR("C4") ; SECONDARY CODE VALUE
+"RTN","C0CLABS",209,0)
+ . . . S XV("RESULTTESTCODINGSYSTEM")=C0CVAR("C6") ; SECONDARY CODE NAME
+"RTN","C0CLABS",210,0)
+ . . . S XV("RESULTTESTDESCRIPTIONTEXT")=C0CVAR("C5") ; SECONDARY TEXT
+"RTN","C0CLABS",211,0)
+ . . E  D  ; NO SECONDARY, USE PRIMARY
+"RTN","C0CLABS",212,0)
+ . . . S XV("RESULTTESTCODEVALUE")=C0CVAR("C1") ; PRIMARY CODE VALUE
+"RTN","C0CLABS",213,0)
+ . . . S XV("RESULTTESTCODINGSYSTEM")=C0CVAR("C3") ; PRIMARY DISPLAY NAME
+"RTN","C0CLABS",214,0)
+ . . . S XV("RESULTTESTDESCRIPTIONTEXT")=C0CVAR("C2") ; USE PRIMARY TEXT
+"RTN","C0CLABS",215,0)
+ . . N C0CZG S C0CZG=XV("RESULTTESTNORMALDESCTEXT") ;
+"RTN","C0CLABS",216,0)
+ . . ; mod to remove local XML escaping rely upon MAP^C0CXPATH
+"RTN","C0CLABS",217,0)
+ . . ;S XV("RESULTTESTNORMALDESCTEXT")=$$SYMENC^MXMLUTL(C0CZG) ;ESCAPE
+"RTN","C0CLABS",218,0)
+ . . S XV("RESULTTESTNORMALDESCTEXT")=C0CZG
+"RTN","C0CLABS",219,0)
+ . . S C0CZG=XV("RESULTTESTVALUE")
+"RTN","C0CLABS",220,0)
+  . . ; mod to remove local XML escaping rely upon MAP^C0CXPATH
+"RTN","C0CLABS",221,0)
+ . . ;S XV("RESULTTESTVALUE")=$$SYMENC^MXMLUTL(C0CZG) ;ESCAPE
+"RTN","C0CLABS",222,0)
+ . . S XV("RESULTTESTVALUE")=C0CZG
+"RTN","C0CLABS",223,0)
+ . I C0CTYP="OBX" D  ; PROCESS TEST RESULTS
+"RTN","C0CLABS",224,0)
+ . . I C0CLOBX=0 D  ; FIRST TEST RESULT FOR THIS SECTION
+"RTN","C0CLABS",225,0)
+ . . . S C0CLB2=$NA(@C0CLB@(C0CLI,"M","TEST")) ; INDENT FOR TEST RESULTS
+"RTN","C0CLABS",226,0)
+ . . S C0CLOBX=C0CLOBX+1 ; INCREMENT TEST COUNT
+"RTN","C0CLABS",227,0)
+ . . S @C0CLB2@(0)=C0CLOBX ; STORE THE TEST COUNT
+"RTN","C0CLABS",228,0)
+ . . S XV("RESULTTESTOBJECTID")="RESULTTEST_"_C0CLI_"_"_C0CLOBX
+"RTN","C0CLABS",229,0)
+ . . S C0CX1=XV("RESULTTESTSOURCEACTORID") ; TEST SOURCE
+"RTN","C0CLABS",230,0)
+ . . S C0CX2=$P($P(C0CX1,"^",1),"-",1) ; PULL OUT STATION NUMBER
+"RTN","C0CLABS",231,0)
+ . . S XV("RESULTTESTSOURCEACTORID")="ACTORORGANIZATION_"_C0CX2
+"RTN","C0CLABS",232,0)
+ . . S XV("RESULTTESTNORMALSOURCEACTORID")=XV("RESULTTESTSOURCEACTORID")
+"RTN","C0CLABS",233,0)
+ . . S C0CX1=XV("RESULTTESTDATETIME") ;DATE TIME IN HL7 FORMAT
+"RTN","C0CLABS",234,0)
+ . . S C0CX2=$$HL7TFM^XLFDT(C0CX1,"L") ;FM DT LOCAL
+"RTN","C0CLABS",235,0)
+ . . S XV("RESULTTESTDATETIME")=$$FMDTOUTC^C0CUTIL(C0CX2,"DT") ;UTC TIME
+"RTN","C0CLABS",236,0)
+ . . ; I 'C0CQT ZWR XV
+"RTN","C0CLABS",237,0)
+ . . M @C0CLB2@(C0CLOBX)=XV ; PERSIST THE TEST RESULT VARIABLES
+"RTN","C0CLABS",238,0)
+ . I 'C0CQT D  ;
+"RTN","C0CLABS",239,0)
+ . . W C0CI," ",C0CTYP,!
+"RTN","C0CLABS",240,0)
+ . ; S C0CI=$O(@C0CHB@(C0CI))
+"RTN","C0CLABS",241,0)
+ ;K ^TMP("C0CRIM","VARS",DFN,"RESULTS")
+"RTN","C0CLABS",242,0)
+ ;M ^TMP("C0CRIM","VARS",DFN,"RESULTS")=@C0CLB
+"RTN","C0CLABS",243,0)
+ Q
+"RTN","C0CLABS",244,0)
+LTYP(OSEG,OTYP,OVARA,OC0CQT) ;
+"RTN","C0CLABS",245,0)
+ S OTAB=$NA(@C0CTAB@(OTYP)) ; TABLE FOR SEGMENT TYPE
+"RTN","C0CLABS",246,0)
+ I '$D(OC0CQT) S C0CQT=0 ; NOT C0CQT IS DEFAULT
+"RTN","C0CLABS",247,0)
+ E  S C0CQT=OC0CQT ; ACCEPT C0CQT FLAG
+"RTN","C0CLABS",248,0)
+ I 1 D  ; FOR HL7 SEGMENT TYPE
+"RTN","C0CLABS",249,0)
+ . S OI="" ; INDEX INTO FIELDS IN SEG
+"RTN","C0CLABS",250,0)
+ . F  S OI=$O(@OTAB@(OI)) Q:OI=""  D  ; FOR EACH FIELD OF THE SEGMENT
+"RTN","C0CLABS",251,0)
+ . . S OTI=$P(@OTAB@(OI),"^",1) ; TABLE INDEX
+"RTN","C0CLABS",252,0)
+ . . S OVAR=$P(@OTAB@(OI),"^",4) ; CCR VARIABLE IF DEFINED
+"RTN","C0CLABS",253,0)
+ . . S OV=$P(OSEG,"|",OTI+1) ; PULL OUT VALUE
+"RTN","C0CLABS",254,0)
+ . . I $P(OI,";",2)'="" D  ; THIS IS DEFINING A SUB-VALUE
+"RTN","C0CLABS",255,0)
+ . . . S OI2=$P(OTI,";",2) ; THE SUB-INDEX
+"RTN","C0CLABS",256,0)
+ . . . S OV=$P(OV,"^",OI2) ; PULL OUT SUB-VALUE
+"RTN","C0CLABS",257,0)
+ . . I OVAR'="" S OVARA(OVAR)=OV ; PASS BACK VARIABLE AND VALUE
+"RTN","C0CLABS",258,0)
+ . . I 'C0CQT D  ; PRINT OUTPUT IF C0CQT IS FALSE
+"RTN","C0CLABS",259,0)
+ . . . I OV'="" W OI_": "_$P(@OTAB@(OI),"^",3),": ",OVAR,": ",OV,!
+"RTN","C0CLABS",260,0)
+ Q
+"RTN","C0CLABS",261,0)
+LOBX ;
+"RTN","C0CLABS",262,0)
+ Q
+"RTN","C0CLABS",263,0)
+ ;
+"RTN","C0CLABS",264,0)
+OUT(DFN) ; WRITE OUT A CCR THAT HAS JUST BEEN PROCESSED (FOR TESTING)
+"RTN","C0CLABS",265,0)
+ N GA,GF,GD
+"RTN","C0CLABS",266,0)
+ S GA=$NA(^TMP("C0CCCR",$J,DFN,"CCR",1))
+"RTN","C0CLABS",267,0)
+ S GF="RPMS_CCR_"_DFN_"_"_DT_".xml"
+"RTN","C0CLABS",268,0)
+ S GD=^TMP("C0CCCR","ODIR")
+"RTN","C0CLABS",269,0)
+ W $$OUTPUT^C0CXPATH(GA,GF,GD)
+"RTN","C0CLABS",270,0)
+ Q
+"RTN","C0CLABS",271,0)
+ ;
+"RTN","C0CLABS",272,0)
+SETTBL ;
+"RTN","C0CLABS",273,0)
+ K X ; CLEAR X
+"RTN","C0CLABS",274,0)
+ S X("PID","PID1")="1^00104^Set ID - Patient ID"
+"RTN","C0CLABS",275,0)
+ S X("PID","PID2")="2^00105^Patient ID (External ID)"
+"RTN","C0CLABS",276,0)
+ S X("PID","PID3")="3^00106^Patient ID (Internal ID)"
+"RTN","C0CLABS",277,0)
+ S X("PID","PID4")="4^00107^Alternate Patient ID"
+"RTN","C0CLABS",278,0)
+ S X("PID","PID5")="5^00108^Patient's Name"
+"RTN","C0CLABS",279,0)
+ S X("PID","PID6")="6^00109^Mother's Maiden Name"
+"RTN","C0CLABS",280,0)
+ S X("PID","PID7")="7^00110^Date of Birth"
+"RTN","C0CLABS",281,0)
+ S X("PID","PID8")="8^00111^Sex"
+"RTN","C0CLABS",282,0)
+ S X("PID","PID9")="9^00112^Patient Alias"
+"RTN","C0CLABS",283,0)
+ S X("PID","PID10")="10^00113^Race"
+"RTN","C0CLABS",284,0)
+ S X("PID","PID11")="11^00114^Patient Address"
+"RTN","C0CLABS",285,0)
+ S X("PID","PID12")="12^00115^County Code"
+"RTN","C0CLABS",286,0)
+ S X("PID","PID13")="13^00116^Phone Number - Home"
+"RTN","C0CLABS",287,0)
+ S X("PID","PID14")="14^00117^Phone Number - Business"
+"RTN","C0CLABS",288,0)
+ S X("PID","PID15")="15^00118^Language - Patient"
+"RTN","C0CLABS",289,0)
+ S X("PID","PID16")="16^00119^Marital Status"
+"RTN","C0CLABS",290,0)
+ S X("PID","PID17")="17^00120^Religion"
+"RTN","C0CLABS",291,0)
+ S X("PID","PID18")="18^00121^Patient Account Number"
+"RTN","C0CLABS",292,0)
+ S X("PID","PID19")="19^00122^SSN Number - Patient"
+"RTN","C0CLABS",293,0)
+ S X("PID","PID20")="20^00123^Drivers License - Patient"
+"RTN","C0CLABS",294,0)
+ S X("PID","PID21")="21^00124^Mother's Identifier"
+"RTN","C0CLABS",295,0)
+ S X("PID","PID22")="22^00125^Ethnic Group"
+"RTN","C0CLABS",296,0)
+ S X("PID","PID23")="23^00126^Birth Place"
+"RTN","C0CLABS",297,0)
+ S X("PID","PID24")="24^00127^Multiple Birth Indicator"
+"RTN","C0CLABS",298,0)
+ S X("PID","PID25")="25^00128^Birth Order"
+"RTN","C0CLABS",299,0)
+ S X("PID","PID26")="26^00129^Citizenship"
+"RTN","C0CLABS",300,0)
+ S X("PID","PID27")="27^00130^Veteran.s Military Status"
+"RTN","C0CLABS",301,0)
+ S X("PID","PID28")="28^00739^Nationality"
+"RTN","C0CLABS",302,0)
+ S X("PID","PID29")="29^00740^Patient Death Date/Time"
+"RTN","C0CLABS",303,0)
+ S X("PID","PID30")="30^00741^Patient Death Indicator"
+"RTN","C0CLABS",304,0)
+ S X("NTE","NTE1")="1^00573^Set ID - NTE"
+"RTN","C0CLABS",305,0)
+ S X("NTE","NTE2")="2^00574^Source of Comment"
+"RTN","C0CLABS",306,0)
+ S X("NTE","NTE3")="3^00575^Comment"
+"RTN","C0CLABS",307,0)
+ S X("ORC","ORC1")="1^00215^Order Control"
+"RTN","C0CLABS",308,0)
+ S X("ORC","ORC2")="2^00216^Placer Order Number"
+"RTN","C0CLABS",309,0)
+ S X("ORC","ORC3")="3^00217^Filler Order Number"
+"RTN","C0CLABS",310,0)
+ S X("ORC","ORC4")="4^00218^Placer Order Number"
+"RTN","C0CLABS",311,0)
+ S X("ORC","ORC5")="5^00219^Order Status"
+"RTN","C0CLABS",312,0)
+ S X("ORC","ORC6")="6^00220^Response Flag"
+"RTN","C0CLABS",313,0)
+ S X("ORC","ORC7")="7^00221^Quantity/Timing"
+"RTN","C0CLABS",314,0)
+ S X("ORC","ORC8")="8^00222^Parent"
+"RTN","C0CLABS",315,0)
+ S X("ORC","ORC9")="9^00223^Date/Time of Transaction"
+"RTN","C0CLABS",316,0)
+ S X("ORC","ORC10")="10^00224^Entered By"
+"RTN","C0CLABS",317,0)
+ S X("ORC","ORC11")="11^00225^Verified By"
+"RTN","C0CLABS",318,0)
+ S X("ORC","ORC12")="12^00226^Ordering Provider"
+"RTN","C0CLABS",319,0)
+ S X("ORC","ORC13")="13^00227^Enterer's Location"
+"RTN","C0CLABS",320,0)
+ S X("ORC","ORC14")="14^00228^Call Back Phone Number"
+"RTN","C0CLABS",321,0)
+ S X("ORC","ORC15")="15^00229^Order Effective Date/Time"
+"RTN","C0CLABS",322,0)
+ S X("ORC","ORC16")="16^00230^Order Control Code Reason"
+"RTN","C0CLABS",323,0)
+ S X("ORC","ORC17")="17^00231^Entering Organization"
+"RTN","C0CLABS",324,0)
+ S X("ORC","ORC18")="18^00232^Entering Device"
+"RTN","C0CLABS",325,0)
+ S X("ORC","ORC19")="19^00233^Action By"
+"RTN","C0CLABS",326,0)
+ S X("OBR","OBR1")="1^00237^Set ID - Observation Request"
+"RTN","C0CLABS",327,0)
+ S X("OBR","OBR2")="2^00216^Placer Order Number"
+"RTN","C0CLABS",328,0)
+ S X("OBR","OBR3")="3^00217^Filler Order Number"
+"RTN","C0CLABS",329,0)
+ S X("OBR","OBR4")="4^00238^Universal Service ID"
+"RTN","C0CLABS",330,0)
+ S X("OBR","OBR4;LOINC")="4;1^00238^Universal Service ID - LOINC^RESULTCODE"
+"RTN","C0CLABS",331,0)
+ S X("OBR","OBR4;DESC")="4;2^00238^Universal Service ID - DESC^RESULTDESCRIPTIONTEXT"
+"RTN","C0CLABS",332,0)
+ S X("OBR","OBR4;VACODE")="4;3^00238^Universal Service ID - VACODE^RESULTCODINGSYSTEM"
+"RTN","C0CLABS",333,0)
+ S X("OBR","OBR5")="5^00239^Priority"
+"RTN","C0CLABS",334,0)
+ S X("OBR","OBR6")="6^00240^Requested Date/Time"
+"RTN","C0CLABS",335,0)
+ S X("OBR","OBR7")="7^00241^Observation Date/Time^RESULTASSESSMENTDATETIME"
+"RTN","C0CLABS",336,0)
+ S X("OBR","OBR8")="8^00242^Observation End Date/Time"
+"RTN","C0CLABS",337,0)
+ S X("OBR","OBR9")="9^00243^Collection Volume"
+"RTN","C0CLABS",338,0)
+ S X("OBR","OBR10")="10^00244^Collector Identifier"
+"RTN","C0CLABS",339,0)
+ S X("OBR","OBR11")="11^00245^Specimen Action Code"
+"RTN","C0CLABS",340,0)
+ S X("OBR","OBR12")="12^00246^Danger Code"
+"RTN","C0CLABS",341,0)
+ S X("OBR","OBR13")="13^00247^Relevant Clinical Info."
+"RTN","C0CLABS",342,0)
+ S X("OBR","OBR14")="14^00248^Specimen Rcv'd. Date/Time"
+"RTN","C0CLABS",343,0)
+ S X("OBR","OBR15")="15^00249^Specimen Source"
+"RTN","C0CLABS",344,0)
+ S X("OBR","OBR16")="16^00226^Ordering Provider XCN^RESULTSOURCEACTORID"
+"RTN","C0CLABS",345,0)
+ S X("OBR","OBR17")="17^00250^Order Callback Phone Number"
+"RTN","C0CLABS",346,0)
+ S X("OBR","OBR18")="18^00251^Placers Field 1"
+"RTN","C0CLABS",347,0)
+ S X("OBR","OBR19")="19^00252^Placers Field 2"
+"RTN","C0CLABS",348,0)
+ S X("OBR","OBR20")="20^00253^Filler Field 1"
+"RTN","C0CLABS",349,0)
+ S X("OBR","OBR21")="21^00254^Filler Field 2"
+"RTN","C0CLABS",350,0)
+ S X("OBR","OBR22")="22^00255^Results Rpt./Status Change"
+"RTN","C0CLABS",351,0)
+ S X("OBR","OBR23")="23^00256^Charge to Practice"
+"RTN","C0CLABS",352,0)
+ S X("OBR","OBR24")="24^00257^Diagnostic Service Sect"
+"RTN","C0CLABS",353,0)
+ S X("OBR","OBR25")="25^00258^Result Status^RESULTSTATUS"
+"RTN","C0CLABS",354,0)
+ S X("OBR","OBR26")="26^00259^Parent Result"
+"RTN","C0CLABS",355,0)
+ S X("OBR","OBR27")="27^00221^Quantity/Timing"
+"RTN","C0CLABS",356,0)
+ S X("OBR","OBR28")="28^00260^Result Copies to"
+"RTN","C0CLABS",357,0)
+ S X("OBR","OBR29")="29^00261^Parent Number"
+"RTN","C0CLABS",358,0)
+ S X("OBR","OBR30")="30^00262^Transportation Mode"
+"RTN","C0CLABS",359,0)
+ S X("OBR","OBR31")="31^00263^Reason for Study"
+"RTN","C0CLABS",360,0)
+ S X("OBR","OBR32")="32^00264^Principal Result Interpreter"
+"RTN","C0CLABS",361,0)
+ S X("OBR","OBR33")="33^00265^Assistant Result Interpreter"
+"RTN","C0CLABS",362,0)
+ S X("OBR","OBR34")="34^00266^Technician"
+"RTN","C0CLABS",363,0)
+ S X("OBR","OBR35")="35^00267^Transcriptionist"
+"RTN","C0CLABS",364,0)
+ S X("OBR","OBR36")="36^00268^Scheduled Date/Time"
+"RTN","C0CLABS",365,0)
+ S X("OBR","OBR37")="37^01028^Number of Sample Containers"
+"RTN","C0CLABS",366,0)
+ S X("OBR","OBR38")="38^38^01029 Transport Logistics of Collected Sample"
+"RTN","C0CLABS",367,0)
+ S X("OBR","OBR39")="39^01030^Collector.s Comment"
+"RTN","C0CLABS",368,0)
+ S X("OBR","OBR40")="40^01031^Transport Arrangement Responsibility"
+"RTN","C0CLABS",369,0)
+ S X("OBR","OBR41")="41^01032^Transport Arranged"
+"RTN","C0CLABS",370,0)
+ S X("OBR","OBR42")="42^01033^Escort Required"
+"RTN","C0CLABS",371,0)
+ S X("OBR","OBR43")="43^01034^Planned Patient Transport Comment"
+"RTN","C0CLABS",372,0)
+ S X("OBX","OBX1")="1^00559^Set ID - OBX"
+"RTN","C0CLABS",373,0)
+ S X("OBX","OBX2")="2^00676^Value Type"
+"RTN","C0CLABS",374,0)
+ S X("OBX","OBX3")="3^00560^Observation Identifier"
+"RTN","C0CLABS",375,0)
+ S X("OBX","OBX3;C1")="3;1^00560^Observation Identifier^C1"
+"RTN","C0CLABS",376,0)
+ S X("OBX","OBX3;C2")="3;2^00560^Observation Identifier^C2"
+"RTN","C0CLABS",377,0)
+ S X("OBX","OBX3;C3")="3;3^00560^Observation Identifier^C3"
+"RTN","C0CLABS",378,0)
+ S X("OBX","OBX3;C4")="3;4^00560^Observation Identifier^C4"
+"RTN","C0CLABS",379,0)
+ S X("OBX","OBX3;C5")="3;5^00560^Observation Identifier^C5"
+"RTN","C0CLABS",380,0)
+ S X("OBX","OBX3;C6")="3;6^00560^Observation Identifier^C6"
+"RTN","C0CLABS",381,0)
+ S X("OBX","OBX4")="4^00769^Observation Sub-Id"
+"RTN","C0CLABS",382,0)
+ S X("OBX","OBX5")="5^00561^Observation Results^RESULTTESTVALUE"
+"RTN","C0CLABS",383,0)
+ S X("OBX","OBX6")="6^00562^Units^RESULTTESTUNITS"
+"RTN","C0CLABS",384,0)
+ S X("OBX","OBX7")="7^00563^Reference Range^RESULTTESTNORMALDESCTEXT"
+"RTN","C0CLABS",385,0)
+ S X("OBX","OBX8")="8^00564^Abnormal Flags^RESULTTESTFLAG"
+"RTN","C0CLABS",386,0)
+ S X("OBX","OBX9")="9^00639^Probability"
+"RTN","C0CLABS",387,0)
+ S X("OBX","OBX10")="10^00565^Nature of Abnormal Test"
+"RTN","C0CLABS",388,0)
+ S X("OBX","OBX11")="11^00566^Observ. Result Status^RESULTTESTSTATUSTEXT"
+"RTN","C0CLABS",389,0)
+ S X("OBX","OBX12")="12^00567^Date Last Normal Value"
+"RTN","C0CLABS",390,0)
+ S X("OBX","OBX13")="13^00581^User Defined Access Checks"
+"RTN","C0CLABS",391,0)
+ S X("OBX","OBX14")="14^00582^Date/Time of Observation^RESULTTESTDATETIME"
+"RTN","C0CLABS",392,0)
+ S X("OBX","OBX15")="15^00583^Producer.s ID^RESULTTESTSOURCEACTORID"
+"RTN","C0CLABS",393,0)
+ S X("OBX","OBX16")="16^00584^Responsible Observer"
+"RTN","C0CLABS",394,0)
+ S X("OBX","OBX17")="17^00936^Observation Method"
+"RTN","C0CLABS",395,0)
+ K ^TMP("C0CCCR","LABTBL")
+"RTN","C0CLABS",396,0)
+ M ^TMP("C0CCCR","LABTBL")=X ; SET VALUES IN LAB TBL
+"RTN","C0CLABS",397,0)
+ S ^TMP("C0CCCR","LABTBL",0)="V3"
+"RTN","C0CLABS",398,0)
+ Q
+"RTN","C0CLABS",399,0)
+ ;
+"RTN","C0CMAIL")
+0^81^B92791623
+"RTN","C0CMAIL",1,0)
+C0CMAIL ; Communications for MIME Documents and MultiMIME ; 3110420 ; rcr/rcr
+"RTN","C0CMAIL",2,0)
+V ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMAIL",3,0)
+ ;Copyright 2011 Chris Richardson, Richardson Computer Research
+"RTN","C0CMAIL",4,0)
+ ; Modified 3110516@1818
+"RTN","C0CMAIL",5,0)
+ ;   rcr@rcresearch.us
+"RTN","C0CMAIL",6,0)
+ ;  Licensed under the terms of the GNU
+"RTN","C0CMAIL",7,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CMAIL",8,0)
+ ;
+"RTN","C0CMAIL",9,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CMAIL",10,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CMAIL",11,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMAIL",12,0)
+ ;(at your option) any later version.
+"RTN","C0CMAIL",13,0)
+ ;
+"RTN","C0CMAIL",14,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CMAIL",15,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMAIL",16,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMAIL",17,0)
+ ;GNU General Public License for more details.
+"RTN","C0CMAIL",18,0)
+ ;
+"RTN","C0CMAIL",19,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CMAIL",20,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMAIL",21,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMAIL",22,0)
+ ;
+"RTN","C0CMAIL",23,0)
+ ;  ------------------
+"RTN","C0CMAIL",24,0)
+ ;Entry Points
+"RTN","C0CMAIL",25,0)
+ ; GETMSG^C0CMAIL(.C0CDATA,.C0CINPUT)
+"RTN","C0CMAIL",26,0)
+ ;  Input:
+"RTN","C0CMAIL",27,0)
+ ;    C0CINPUT = "DUZ;MAILBOX_Name[or IEN for box (comma Separated);MALL
+"RTN","C0CMAIL",28,0)
+ ;                      or "*" for all boxes, default is "IN" if missing]"
+"RTN","C0CMAIL",29,0)
+ ;                $P(C0CINPUT,";",3)=MALL, default=NUL means "New only",
+"RTN","C0CMAIL",30,0)
+ ;                                     "*" for All or 9,999 maximum
+"RTN","C0CMAIL",31,0)
+ ;                    MALL?1.n = that number of the n most recent
+"RTN","C0CMAIL",32,0)
+ ;  Internally:
+"RTN","C0CMAIL",33,0)
+ ;    BNAM = Box Name
+"RTN","C0CMAIL",34,0)
+ ;  Output:
+"RTN","C0CMAIL",35,0)
+ ;    C0CDATA
+"RTN","C0CMAIL",36,0)
+ ;      = (BNAM,"NUMBER") = Number of NEW Emails in Basket
+"RTN","C0CMAIL",37,0)
+ ;        (BNAM,"MSG",C0CIEN,"FROM")=Name
+"RTN","C0CMAIL",38,0)
+ ;        (BNAM,"MSG",C0CIEN,"TO",n)=DUZ, or EMAIL Address
+"RTN","C0CMAIL",39,0)
+ ;        (BNAM,"MSG",C0CIEN,"TO NAME",n)=Names or EMAIL Address
+"RTN","C0CMAIL",40,0)
+ ;        (BNAM,"MSG",C0CIEN,"TITLE")=EMAIL Title
+"RTN","C0CMAIL",41,0)
+ ;        (BNAM,"MSG",C0CIEN[for File 3.9])=Number of Attachments
+"RTN","C0CMAIL",42,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"CONT") = Free Text
+"RTN","C0CMAIL",43,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"LINES") = Number of Lines of Text
+"RTN","C0CMAIL",44,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"SIZE") = Size of the Message in Bytes
+"RTN","C0CMAIL",45,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"TXT",LINE#) = Message Data (No Attachment)
+"RTN","C0CMAIL",46,0)
+ ;   (BNAM,"MSG",C0CIEN,"SEG",NUM) = First Line^Last Line
+"RTN","C0CMAIL",47,0)
+ ;   (BNAM,"MSG",C0CIEN,"SEG",NUM,"CONT",type) = Message Details
+"RTN","C0CMAIL",48,0)
+ ;   (BNAM,"MSG",C0CIEN,"SEG",NUM,LINE#) = Message Data
+"RTN","C0CMAIL",49,0)
+ ; 
+"RTN","C0CMAIL",50,0)
+ ; DO DETAIL^C0CMAIL(.OUTBF,D0) ; For each Email Message and Attachments
+"RTN","C0CMAIL",51,0)
+ ;   Input;
+"RTN","C0CMAIL",52,0)
+ ;     D0     - The IEN for the message in file 3.9, MESSAGE global
+"RTN","C0CMAIL",53,0)
+ ;   Output
+"RTN","C0CMAIL",54,0)
+ ;     OUTBF  - The array of your choice to save the expanded and decoded message.
+"RTN","C0CMAIL",55,0)
+ ; 
+"RTN","C0CMAIL",56,0)
+GETMSG(C0CDATA,C0CINPUT) ; Common Entry Point for Mailbox Data
+"RTN","C0CMAIL",57,0)
+ K:'$G(C0CDATA("KEEP")) C0CDATA
+"RTN","C0CMAIL",58,0)
+ N U
+"RTN","C0CMAIL",59,0)
+ S U="^"
+"RTN","C0CMAIL",60,0)
+ D:$G(C0CINPUT)
+"RTN","C0CMAIL",61,0)
+ . N BF,DUZ,I,INPUT,J,L,LST,MBLST,MALL
+"RTN","C0CMAIL",62,0)
+ . S INPUT=C0CINPUT
+"RTN","C0CMAIL",63,0)
+ . S DUZ=+INPUT
+"RTN","C0CMAIL",64,0)
+ . D:$D(^XMB(3.7,DUZ,0))#2
+"RTN","C0CMAIL",65,0)
+ . . S MBLST=$P(INPUT,";",2)
+"RTN","C0CMAIL",66,0)
+ . . S MALL=$P(INPUT,";",3) ; New or All Mail Flag
+"RTN","C0CMAIL",67,0)
+ . . S:MALL["*" MALL=99999
+"RTN","C0CMAIL",68,0)
+ . . ; Only one of these can be correct
+"RTN","C0CMAIL",69,0)
+ . . D
+"RTN","C0CMAIL",70,0)
+ . . . ;  If nul, make it "IN" only
+"RTN","C0CMAIL",71,0)
+ . . . I MBLST="" D  QUIT
+"RTN","C0CMAIL",72,0)
+ . . . . S MBLST("IN")=0,I=0
+"RTN","C0CMAIL",73,0)
+ . . . . D GATHER(DUZ,"IN",.LST)
+"RTN","C0CMAIL",74,0)
+ . . . .QUIT
+"RTN","C0CMAIL",75,0)
+ . . . ;
+"RTN","C0CMAIL",76,0)
+ . . . ;  If "*", Get all Mailboxes and look for New Messages
+"RTN","C0CMAIL",77,0)
+ . . . I MBLST["*" D  QUIT
+"RTN","C0CMAIL",78,0)
+ . . . . N NAM,NUM
+"RTN","C0CMAIL",79,0)
+ . . . . S NUM=0
+"RTN","C0CMAIL",80,0)
+ . . . . F  S NUM=$O(^XMB(3.7,DUZ,2,NUM)) Q:'NUM  D
+"RTN","C0CMAIL",81,0)
+ . . . . . S NAM=$P(^XMB(3.7,DUZ,2,NUM,0),U)
+"RTN","C0CMAIL",82,0)
+ . . . . . D GATHER(DUZ,NAM,.LST)
+"RTN","C0CMAIL",83,0)
+ . . . . .QUIT
+"RTN","C0CMAIL",84,0)
+ . . . .QUIT
+"RTN","C0CMAIL",85,0)
+ . . . ;
+"RTN","C0CMAIL",86,0)
+ . . . ;  If comma separated, look for mailboxes with new messages
+"RTN","C0CMAIL",87,0)
+ . . . I $L(MBLST,",")>1 D  QUIT
+"RTN","C0CMAIL",88,0)
+ . . . . S NAM=""
+"RTN","C0CMAIL",89,0)
+ . . . . N T,V
+"RTN","C0CMAIL",90,0)
+ . . . . F T=1:1:$L(MBLST,",")  S V=$P(MBLST,",",T)  I $L(V) D
+"RTN","C0CMAIL",91,0)
+ . . . . . I V S NAM=$P($G(^XMB(3.7,DUZ,2,V,0)),U)
+"RTN","C0CMAIL",92,0)
+ . . . . . S:NAM="" NAM=V
+"RTN","C0CMAIL",93,0)
+ . . . . . D GATHER(DUZ,NAM,.LST)
+"RTN","C0CMAIL",94,0)
+ . . . . .QUIT
+"RTN","C0CMAIL",95,0)
+ . . . .QUIT
+"RTN","C0CMAIL",96,0)
+ . . . ;
+"RTN","C0CMAIL",97,0)
+ . . . ;  If only 1 mailbox named, go get it
+"RTN","C0CMAIL",98,0)
+ . . . I $L(MBLST) D GATHER(DUZ,MBLST,.LST) QUIT
+"RTN","C0CMAIL",99,0)
+ . . .QUIT
+"RTN","C0CMAIL",100,0)
+ . . MERGE C0CDATA=LST
+"RTN","C0CMAIL",101,0)
+ . .QUIT
+"RTN","C0CMAIL",102,0)
+ .QUIT
+"RTN","C0CMAIL",103,0)
+ QUIT
+"RTN","C0CMAIL",104,0)
+ ;  ===================
+"RTN","C0CMAIL",105,0)
+GATHER(DUZ,NAM,LST) ; Gather Data about the Baskets and their mail
+"RTN","C0CMAIL",106,0)
+ N I,J,K,L
+"RTN","C0CMAIL",107,0)
+ S (I,K)=0
+"RTN","C0CMAIL",108,0)
+ S J=$O(^XMB(3.7,DUZ,2,"B",NAM,""))
+"RTN","C0CMAIL",109,0)
+ F  S I=$O(^XMB(3.7,DUZ,2,J,1,I)) Q:'I  D
+"RTN","C0CMAIL",110,0)
+ . S L=$P(^XMB(3.7,DUZ,2,J,1,I,0),U,3)
+"RTN","C0CMAIL",111,0)
+ . D   ; :L
+"RTN","C0CMAIL",112,0)
+ . . S:L K=K+1,LST(NAM,"MSG",I,"NEW")=""  ; Flag NEW emails
+"RTN","C0CMAIL",113,0)
+ . . S LST(NAM,"MSG",I)=L
+"RTN","C0CMAIL",114,0)
+ . . D GETTYP(I)
+"RTN","C0CMAIL",115,0)
+ . .QUIT
+"RTN","C0CMAIL",116,0)
+ .QUIT
+"RTN","C0CMAIL",117,0)
+ S LST(NAM,"NUMBER")=K
+"RTN","C0CMAIL",118,0)
+ QUIT
+"RTN","C0CMAIL",119,0)
+ ;  ===================
+"RTN","C0CMAIL",120,0)
+ ; D0 is the IEN into the Message Global ^XMB(3.9,D0)
+"RTN","C0CMAIL",121,0)
+ ; The products of these emails are scanned to identify
+"RTN","C0CMAIL",122,0)
+ ;  the number of documents stored in the MIME package.
+"RTN","C0CMAIL",123,0)
+ ;  The protocol runs like this;
+"RTN","C0CMAIL",124,0)
+ ; Line 1 is the --separator
+"RTN","C0CMAIL",125,0)
+ ; Line 2 thru n >Look for Content-[detail type:]Description ; Next CMD
+"RTN","C0CMAIL",126,0)
+ ; Line n+2 thru t-1 where t does NOT have "Content-"
+"RTN","C0CMAIL",127,0)
+ ; Line t   is Next Section Terminator, or Message Terminator, --separator
+"RTN","C0CMAIL",128,0)
+ ; Line t+1 should not exist in the data set if Message Terminator
+"RTN","C0CMAIL",129,0)
+ ; CON = "Content-"
+"RTN","C0CMAIL",130,0)
+ ; FLG = "--"
+"RTN","C0CMAIL",131,0)
+ ; SEP = FLG+7 or more characters  ; Separator
+"RTN","C0CMAIL",132,0)
+ ; END = SEP+FLG
+"RTN","C0CMAIL",133,0)
+ ; SGC = Segment Count
+"RTN","C0CMAIL",134,0)
+ ; Note: separator is a string of specific characters of
+"RTN","C0CMAIL",135,0)
+ ;        indeterminate length  
+"RTN","C0CMAIL",136,0)
+ ; LST() the transfer array
+"RTN","C0CMAIL",137,0)
+ ; LST(NAM,"MSG",C0CIEN,"SEG",SGN)=Starting Line^Ending Line
+"RTN","C0CMAIL",138,0)
+ ; LST(NAM,"MSG",C0CIEN,"SEG",SGN,1:n)=Decoded Message Data
+"RTN","C0CMAIL",139,0)
+ ;
+"RTN","C0CMAIL",140,0)
+GETTYP(D0) ; Look for the goodies in the Mail
+"RTN","C0CMAIL",141,0)
+ N I,J,N,BCN,CON,CNT,D1,END,FLG,SEP,SGC,XX,XXNM
+"RTN","C0CMAIL",142,0)
+ S CON="Content-"
+"RTN","C0CMAIL",143,0)
+ S FLG="--"
+"RTN","C0CMAIL",144,0)
+ S SEP=""  ; Start SEP as null, so we can use this to help identify the type
+"RTN","C0CMAIL",145,0)
+ S (BCN,CNT,D1,END,SGC)=0
+"RTN","C0CMAIL",146,0)
+ S XX=$G(^XMB(3.9,D0,0))
+"RTN","C0CMAIL",147,0)
+ S LST(NAM,"MSG",D0,"TITLE")=$P($G(^XMB(3.9,D0,0)),U,1)
+"RTN","C0CMAIL",148,0)
+ S LST(NAM,"MSG",D0,"CREATED")=$G(^XMB(3.9,D0,.6))
+"RTN","C0CMAIL",149,0)
+ F I=4,2 S XXNM=$P(XX,U,I)  Q:$L(XXNM)
+"RTN","C0CMAIL",150,0)
+ S LST(NAM,"MSG",D0,"FROM")=$$NAME(XXNM)
+"RTN","C0CMAIL",151,0)
+ S LST(NAM,"MSG",D0,"SENT")=$$TIME($P(XX,U,3))
+"RTN","C0CMAIL",152,0)
+ ; Get the folks the email is sent to.
+"RTN","C0CMAIL",153,0)
+ S D1=0
+"RTN","C0CMAIL",154,0)
+ F  S D1=$O(^XMB(3.9,D0,1,D1)) Q:'D1  D
+"RTN","C0CMAIL",155,0)
+ . N T
+"RTN","C0CMAIL",156,0)
+ . S T=+$G(^XMB(3.9,D0,1,D1,0))
+"RTN","C0CMAIL",157,0)
+ . S:T T=$P($G(^VA(200,+T,0)),"^")
+"RTN","C0CMAIL",158,0)
+ . S LST("TO",D1)=T
+"RTN","C0CMAIL",159,0)
+ . S T=$G(^XMB(3.9,D0,6,D1,0))
+"RTN","C0CMAIL",160,0)
+ . S:T T=$P($G(^VA(200,+T,0)),"^")
+"RTN","C0CMAIL",161,0)
+ . S:T="" T="<Unknown>"
+"RTN","C0CMAIL",162,0)
+ . S LST("TO NAME",D1)=T
+"RTN","C0CMAIL",163,0)
+ .QUIT
+"RTN","C0CMAIL",164,0)
+ ; Preload first Segment (0) with beginning on Line 1
+"RTN","C0CMAIL",165,0)
+ ;  if not a 64bit
+"RTN","C0CMAIL",166,0)
+ S LST(NAM,"MSG",D0,"SEG",0)=1
+"RTN","C0CMAIL",167,0)
+ S D1=.9999,SEP="--"
+"RTN","C0CMAIL",168,0)
+ F  S D1=$O(^XMB(3.9,D0,2,D1)) Q:'D1  D
+"RTN","C0CMAIL",169,0)
+ . ; Clear any control characters (cr/lf/ff) off
+"RTN","C0CMAIL",170,0)
+ . S X=$TR($G(^XMB(3.9,D0,2,D1,0)),$C(10,12,13))
+"RTN","C0CMAIL",171,0)
+ . ; Enter once to set the SEP to capture the separator
+"RTN","C0CMAIL",172,0)
+ . I SEP=FLG&($E(X,1,2)=FLG)&($L(X,FLG)=2)&($L($P(X,FLG,2)>5))   D   Q
+"RTN","C0CMAIL",173,0)
+ . . S SEP=X,END=X_FLG
+"RTN","C0CMAIL",174,0)
+ . . S (CNT,SGC)=1,BCN=0
+"RTN","C0CMAIL",175,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC)=D1
+"RTN","C0CMAIL",176,0)
+ . .QUIT
+"RTN","C0CMAIL",177,0)
+ . ;
+"RTN","C0CMAIL",178,0)
+ . ; A new separator is set, process original 
+"RTN","C0CMAIL",179,0)
+ . I X=SEP  D  QUIT
+"RTN","C0CMAIL",180,0)
+ . . S LST(NAM,"MSG",D0,SGC,"SIZE")=BCN
+"RTN","C0CMAIL",181,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC)=$G(LST(NAM,"MSG",D0,"SEG",SGC))_"^"_(D1-1)
+"RTN","C0CMAIL",182,0)
+ . . S SGC=SGC+1,BCN=0
+"RTN","C0CMAIL",183,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC)=D1
+"RTN","C0CMAIL",184,0)
+ . .QUIT
+"RTN","C0CMAIL",185,0)
+ . ;
+"RTN","C0CMAIL",186,0)
+ . S BCN=BCN+$L(X)
+"RTN","C0CMAIL",187,0)
+ . I X[CON D  Q
+"RTN","C0CMAIL",188,0)
+ . . S J=$P($P(X,";"),CON,2)
+"RTN","C0CMAIL",189,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC,"CONT",CNT,$P(J,":"))=$P(J,":",2)
+"RTN","C0CMAIL",190,0)
+ . .QUIT
+"RTN","C0CMAIL",191,0)
+ . ;
+"RTN","C0CMAIL",192,0)
+ . ; S LST(NAM,"MSG",D0,"SEG",D1)=X
+"RTN","C0CMAIL",193,0)
+ .QUIT
+"RTN","C0CMAIL",194,0)
+ QUIT
+"RTN","C0CMAIL",195,0)
+ ;  ===================
+"RTN","C0CMAIL",196,0)
+NAME(NM) ; Return the name of the Sender
+"RTN","C0CMAIL",197,0)
+ N NAME
+"RTN","C0CMAIL",198,0)
+ S NAME="<Unknown Sender>"
+"RTN","C0CMAIL",199,0)
+ D
+"RTN","C0CMAIL",200,0)
+ . ; Look first for a value to use with the NEW PERSON file
+"RTN","C0CMAIL",201,0)
+ . ;
+"RTN","C0CMAIL",202,0)
+ . I NM=+NM S NAME=$P(^VA(200,NM,0),U,1) Q
+"RTN","C0CMAIL",203,0)
+ . ;
+"RTN","C0CMAIL",204,0)
+ . I $L(NM) S NAME=NM                    Q
+"RTN","C0CMAIL",205,0)
+ . ;
+"RTN","C0CMAIL",206,0)
+ . ; Else, pull the data from the message and display the foreign source
+"RTN","C0CMAIL",207,0)
+ . ;   of the message.
+"RTN","C0CMAIL",208,0)
+ . N T
+"RTN","C0CMAIL",209,0)
+ . S VAL=$G(^XMB(3.9,D0,.7))
+"RTN","C0CMAIL",210,0)
+ . S:VAL T=$P(^VA(200,VAL,0),U)
+"RTN","C0CMAIL",211,0)
+ . I $L($G(T)) S NAME=T                  Q
+"RTN","C0CMAIL",212,0)
+ . ;
+"RTN","C0CMAIL",213,0)
+ .QUIT
+"RTN","C0CMAIL",214,0)
+ QUIT NAME
+"RTN","C0CMAIL",215,0)
+ ;  ===================
+"RTN","C0CMAIL",216,0)
+TIME(Y) ; The time and date of the sending
+"RTN","C0CMAIL",217,0)
+ X ^DD("DD")
+"RTN","C0CMAIL",218,0)
+ QUIT Y
+"RTN","C0CMAIL",219,0)
+ ;  ===================
+"RTN","C0CMAIL",220,0)
+ ;  Segments in Message need to be identified and decoded properly
+"RTN","C0CMAIL",221,0)
+ ; D DETAIL^C0CMAIL(.ARRAY,D0) ;  Call One for each message
+"RTN","C0CMAIL",222,0)
+ ;   ARRAY will have the details of this one call
+"RTN","C0CMAIL",223,0)
+ ;    
+"RTN","C0CMAIL",224,0)
+ ; Inputs;
+"RTN","C0CMAIL",225,0)
+ ;   C0CINPUT    - The IEN of the message to expand
+"RTN","C0CMAIL",226,0)
+ ; Outputs;
+"RTN","C0CMAIL",227,0)
+ ;   C0CDATA     - Carrier for the returned structure of the Message
+"RTN","C0CMAIL",228,0)
+ ;  C0CDATA(D0,"SEG")=number of SEGMENTS
+"RTN","C0CMAIL",229,0)
+ ;  C0CDATA(D0,"SEG",0:n)=SEGMENT n details
+"RTN","C0CMAIL",230,0)
+ ;  C0CDATA(D0,"SEG",0:n,"CONTENT",type)=Content details
+"RTN","C0CMAIL",231,0)
+ ;  C0CDATA(D0,"SEG",0:n,"MSG",D3)=Content details
+"RTN","C0CMAIL",232,0)
+ ;  C0CDATA(D0,"SEG",0:n,"HTML",D3)=Content details
+"RTN","C0CMAIL",233,0)
+ ;
+"RTN","C0CMAIL",234,0)
+DETAIL(C0CDATA,C0CINPUT) ; Message Detail Delivery
+"RTN","C0CMAIL",235,0)
+ N LST,D0,D1,U
+"RTN","C0CMAIL",236,0)
+ S U="^"
+"RTN","C0CMAIL",237,0)
+ S D0=+$G(C0CINPUT)
+"RTN","C0CMAIL",238,0)
+ I D0   D    QUIT
+"RTN","C0CMAIL",239,0)
+ . D GETTYP2(D0)
+"RTN","C0CMAIL",240,0)
+ . I $D(LST)   M C0CDATA(D0)=LST
+"RTN","C0CMAIL",241,0)
+ .QUIT
+"RTN","C0CMAIL",242,0)
+ QUIT
+"RTN","C0CMAIL",243,0)
+ ;  ===================
+"RTN","C0CMAIL",244,0)
+ ;  End note if needed
+"RTN","C0CMAIL",245,0)
+ ; MSK   - Set of characters that do not exist in 64 bit encoding
+"RTN","C0CMAIL",246,0)
+GETTYP2(D0) ; Try to get the types and MSK for the 
+"RTN","C0CMAIL",247,0)
+ N I,J,K,N,BCN,BF,CON,CNT,D1,END,FLG,MSK,SEP,SGC,U,XX,ZN,XXNM
+"RTN","C0CMAIL",248,0)
+ S CON="Content-",U="^"
+"RTN","C0CMAIL",249,0)
+ S FLG="--"
+"RTN","C0CMAIL",250,0)
+ S MSK=" !""#$%&'()*,-.:;<>?@[\]^_`{|}~"
+"RTN","C0CMAIL",251,0)
+ S (BF,SEP)=""  ; Start SEP as null, so we can use this to help identify the type
+"RTN","C0CMAIL",252,0)
+ S (BCN,CNT,D1,END,SGC)=0
+"RTN","C0CMAIL",253,0)
+ S XX=$G(^XMB(3.9,D0,0))
+"RTN","C0CMAIL",254,0)
+ ; S K=$P(^XMB(3.9,D0,2,0),U,3)
+"RTN","C0CMAIL",255,0)
+ S LST("TITLE")=$P($G(^XMB(3.9,D0,0)),U,1)
+"RTN","C0CMAIL",256,0)
+ S LST("CREATED")=$$TIME($P(XX,U,3))
+"RTN","C0CMAIL",257,0)
+ F I=4,2 S XXNM=$P(XX,U,I)  Q:$L(XXNM)
+"RTN","C0CMAIL",258,0)
+ S LST("FROM")=$$NAME(XXNM)
+"RTN","C0CMAIL",259,0)
+ ; Get the folks the email is sent to.
+"RTN","C0CMAIL",260,0)
+ S D1=0
+"RTN","C0CMAIL",261,0)
+ F  S D1=$O(^XMB(3.9,D0,1,D1)) Q:'D1  D   Q:D1=""
+"RTN","C0CMAIL",262,0)
+ . N I,T
+"RTN","C0CMAIL",263,0)
+ . S T=$P($G(^XMB(3.9,D0,1,D1,0)),U)
+"RTN","C0CMAIL",264,0)
+ . S:T T=$P($G(^VA(200,T,0)),"^")
+"RTN","C0CMAIL",265,0)
+ . S LST("TO",+D1)=T
+"RTN","C0CMAIL",266,0)
+ . S T=$G(^XMB(3.9,D0,6,+D1,0))
+"RTN","C0CMAIL",267,0)
+ . S:T="" T=$P($G(^VA(200,+T,0)),"^")
+"RTN","C0CMAIL",268,0)
+ . S:T="" T="<Unknown>"
+"RTN","C0CMAIL",269,0)
+ . S LST("TO NAME",D1)=T
+"RTN","C0CMAIL",270,0)
+ .QUIT
+"RTN","C0CMAIL",271,0)
+ ; Get the Header for the message
+"RTN","C0CMAIL",272,0)
+ S D1=0
+"RTN","C0CMAIL",273,0)
+ F I=1:1 S D1=$O(^XMB(3.9,D0,2,D1)) Q:D1=""  Q:(D1>.99999)   D
+"RTN","C0CMAIL",274,0)
+ . S LST("HDR",I)=$G(^XMB(3.9,D0,2,D1,0))
+"RTN","C0CMAIL",275,0)
+ .QUIT
+"RTN","C0CMAIL",276,0)
+ ; Start walking the different sections
+"RTN","C0CMAIL",277,0)
+ S D1=.99999,SEP="--"
+"RTN","C0CMAIL",278,0)
+ F  S D1=$O(^XMB(3.9,D0,2,D1)) Q:'D1  D
+"RTN","C0CMAIL",279,0)
+ . ; Clear any control characters (cr/lf/ff) off
+"RTN","C0CMAIL",280,0)
+ . S X=$TR($G(^XMB(3.9,D0,2,D1,0)),$C(10,12,13))
+"RTN","C0CMAIL",281,0)
+ . ; Enter once to set the SEP to capture the separator
+"RTN","C0CMAIL",282,0)
+ . I (SEP="--")&($E(X,1,2)=FLG)&($L(X,FLG)=2)  D   Q
+"RTN","C0CMAIL",283,0)
+ . . S SEP=X,END=X_FLG
+"RTN","C0CMAIL",284,0)
+ . . S (CNT,SGC)=1,BCN=0
+"RTN","C0CMAIL",285,0)
+ . . S LST("SEG",SGC)=D1
+"RTN","C0CMAIL",286,0)
+ . .QUIT
+"RTN","C0CMAIL",287,0)
+ . ;
+"RTN","C0CMAIL",288,0)
+ . ; A new SEGMENT separator is set, process original 
+"RTN","C0CMAIL",289,0)
+ . I X=SEP  D  QUIT
+"RTN","C0CMAIL",290,0)
+ . . ; Save Current Values
+"RTN","C0CMAIL",291,0)
+ . . S LST("SEG",SGC,"SIZE")=BCN
+"RTN","C0CMAIL",292,0)
+ . . ;  Close this Segment and prepare to start a New Segment
+"RTN","C0CMAIL",293,0)
+ . . S LST("SEG",SGC)=$G(LST("SEG",SGC))_"^"_(D1-1)
+"RTN","C0CMAIL",294,0)
+ . . ;  Put the result in LST("SEG",SGC,"XML")
+"RTN","C0CMAIL",295,0)
+ . . I $L(BF) D
+"RTN","C0CMAIL",296,0)
+ . . . S ZN=1
+"RTN","C0CMAIL",297,0)
+ . . . N I,T,TBF
+"RTN","C0CMAIL",298,0)
+ . . . S TBF=BF
+"RTN","C0CMAIL",299,0)
+ . . . F I=1:1:($L(TBF,"="))  D
+"RTN","C0CMAIL",300,0)
+ . . . . S BF=$P(TBF,"=",I)_"="
+"RTN","C0CMAIL",301,0)
+ . . . . I BF'="="  D DECODER
+"RTN","C0CMAIL",302,0)
+ . . . .QUIT
+"RTN","C0CMAIL",303,0)
+ . . . S BF=""
+"RTN","C0CMAIL",304,0)
+ . . .QUIT
+"RTN","C0CMAIL",305,0)
+ . . S SGC=SGC+1,BCN=0
+"RTN","C0CMAIL",306,0)
+ . . ; Incriment SGC to start a new Segment
+"RTN","C0CMAIL",307,0)
+ . . S LST("SEG",SGC)=D1
+"RTN","C0CMAIL",308,0)
+ . .QUIT
+"RTN","C0CMAIL",309,0)
+ . ;
+"RTN","C0CMAIL",310,0)
+ . ; Accumulate the 64 bit encoding
+"RTN","C0CMAIL",311,0)
+ . I X=$TR(X,MSK)&$L(X) D   Q
+"RTN","C0CMAIL",312,0)
+ . . S BF=BF_X
+"RTN","C0CMAIL",313,0)
+ . . S BCN=BCN+$L(X)
+"RTN","C0CMAIL",314,0)
+ . .QUIT 
+"RTN","C0CMAIL",315,0)
+ . ;
+"RTN","C0CMAIL",316,0)
+ . ; Ending Condition, close out the Segment
+"RTN","C0CMAIL",317,0)
+ . I X=END D  QUIT
+"RTN","C0CMAIL",318,0)
+ . . S LST("SEG",SGC)=$G(LST("SEG",SGC))_"^"_(D1-1)
+"RTN","C0CMAIL",319,0)
+ . . I $L(BF) S ZN=1 D DECODER  S BF="" Q
+"RTN","C0CMAIL",320,0)
+ . .QUIT
+"RTN","C0CMAIL",321,0)
+ . ;
+"RTN","C0CMAIL",322,0)
+ . S BCN=BCN+$L(X)
+"RTN","C0CMAIL",323,0)
+ . ; Split out the Content Info
+"RTN","C0CMAIL",324,0)
+ . I X[CON D  Q
+"RTN","C0CMAIL",325,0)
+ . . S J=$P(X,CON,2)
+"RTN","C0CMAIL",326,0)
+ . . S LST("SEG",SGC,"CONTENT",$P(J,":"))=$P(J,":",2,9)
+"RTN","C0CMAIL",327,0)
+ . .QUIT
+"RTN","C0CMAIL",328,0)
+ . ;
+"RTN","C0CMAIL",329,0)
+ . ; Everything else is Text
+"RTN","C0CMAIL",330,0)
+ . S LST("SEG",SGC,"TXT",D1)=X
+"RTN","C0CMAIL",331,0)
+ .QUIT
+"RTN","C0CMAIL",332,0)
+ QUIT
+"RTN","C0CMAIL",333,0)
+ ;  ===================
+"RTN","C0CMAIL",334,0)
+ ; Break down the Buffer Array so it can be saved.
+"RTN","C0CMAIL",335,0)
+ ;  BF is passed in.
+"RTN","C0CMAIL",336,0)
+DECODER ; 
+"RTN","C0CMAIL",337,0)
+ N RCNT,TBF,ZBF,ZI,ZJ,ZK,ZSIZE
+"RTN","C0CMAIL",338,0)
+ S ZBF=BF
+"RTN","C0CMAIL",339,0)
+ ;  Full Buffer, BF, now check for Encryption and Unpack
+"RTN","C0CMAIL",340,0)
+ F RCNT=1:1:$L(ZBF,"=")   D
+"RTN","C0CMAIL",341,0)
+ . N BF
+"RTN","C0CMAIL",342,0)
+ . S BF=$P(ZBF,"=",RCNT)
+"RTN","C0CMAIL",343,0)
+ . ;  Unpacking the 64 bit encoding
+"RTN","C0CMAIL",344,0)
+ . S TBF=$TR($$DECODE^RGUTUU(BF),$C(10,12,13))
+"RTN","C0CMAIL",345,0)
+ . D:$L(TBF)
+"RTN","C0CMAIL",346,0)
+ . . N XBF
+"RTN","C0CMAIL",347,0)
+ . . S BF=BF_"="
+"RTN","C0CMAIL",348,0)
+ . . D NORMAL(.XBF,.TBF)
+"RTN","C0CMAIL",349,0)
+ . . M LST("SEG",SGC,"XML",RCNT)=XBF
+"RTN","C0CMAIL",350,0)
+ . .QUIT
+"RTN","C0CMAIL",351,0)
+ .QUIT
+"RTN","C0CMAIL",352,0)
+ QUIT
+"RTN","C0CMAIL",353,0)
+ ;  ===================
+"RTN","C0CMAIL",354,0)
+ ;  OUTXML = OUTBF  = OUT   = OUTPUT ARRAY TO BE BUILT
+"RTN","C0CMAIL",355,0)
+ ;  BF     = INXML = INPUT ARRAY TO PROVIDE INPUT
+"RTN","C0CMAIL",356,0)
+ ;   >D NORMAL^C0CMAIL(.OUT,BF)
+"RTN","C0CMAIL",357,0)
+NORMAL(OUTXML,INXML)    ;NORMALIZES AN XML STRING PASSED BY NAME IN INXML
+"RTN","C0CMAIL",358,0)
+ ; INTO AN XML ARRAY RETURNED IN OUTXML, ALSO PASSED BY NAME
+"RTN","C0CMAIL",359,0)
+ ;
+"RTN","C0CMAIL",360,0)
+ N ZN,OUTBF
+"RTN","C0CMAIL",361,0)
+ S ZN=1
+"RTN","C0CMAIL",362,0)
+ S OUTBF(ZN)=$P(INXML,"><",ZN)_">"
+"RTN","C0CMAIL",363,0)
+ F ZN=ZN+1:1 S OUTBF(ZN)="<"_$P(INXML,"><",ZN) Q:$P(INXML,"><",ZN+1)=""  D  ;
+"RTN","C0CMAIL",364,0)
+ . S OUTBF(ZN)=OUTBF(ZN)_">"
+"RTN","C0CMAIL",365,0)
+ .QUIT
+"RTN","C0CMAIL",366,0)
+ M OUTXML=OUTBF
+"RTN","C0CMAIL",367,0)
+ QUIT
+"RTN","C0CMAIL",368,0)
+ ;  ===================
+"RTN","C0CMAIL",369,0)
+ ;  vvvvvvvvvvvvvvv  Not Needed  vvvvvvvvvvvvvvvvvvvvvvvvvv
+"RTN","C0CMAIL",370,0)
+ ;  End note if needed
+"RTN","C0CMAIL",371,0)
+ QUIT
+"RTN","C0CMAIL",372,0)
+ ;  ===================
+"RTN","C0CMAIL2")
+0^82^B166788518
+"RTN","C0CMAIL2",1,0)
+C0CMAIL2 ; Communications for MIME Documents and MultiMIME ; 3110420 ; rcr/rcr  ; 5/10/12 2:50pm
+"RTN","C0CMAIL2",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMAIL2",3,0)
+ ;Copyright 2011 Chris Richardson, Richardson Computer Research
+"RTN","C0CMAIL2",4,0)
+ ; Modified 3110615@1040
+"RTN","C0CMAIL2",5,0)
+ ;   rcr@rcresearch.us
+"RTN","C0CMAIL2",6,0)
+ ;  Licensed under the terms of the GNU
+"RTN","C0CMAIL2",7,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CMAIL2",8,0)
+ ;
+"RTN","C0CMAIL2",9,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CMAIL2",10,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CMAIL2",11,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMAIL2",12,0)
+ ;(at your option) any later version.
+"RTN","C0CMAIL2",13,0)
+ ;
+"RTN","C0CMAIL2",14,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CMAIL2",15,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMAIL2",16,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMAIL2",17,0)
+ ;GNU General Public License for more details.
+"RTN","C0CMAIL2",18,0)
+ ;
+"RTN","C0CMAIL2",19,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CMAIL2",20,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMAIL2",21,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMAIL2",22,0)
+ ;
+"RTN","C0CMAIL2",23,0)
+ ;  ------------------
+"RTN","C0CMAIL2",24,0)
+ ;Entry Points
+"RTN","C0CMAIL2",25,0)
+ ; DETAIL^C0CMAIL(.C0CDATA,IEN) --> Get details of the Mail Message and Attachments
+"RTN","C0CMAIL2",26,0)
+ ; GETMSG^C0CMAIL(.C0CDATA,.C0CINPUT)
+"RTN","C0CMAIL2",27,0)
+ ;  Input:
+"RTN","C0CMAIL2",28,0)
+ ;    C0CINPUT = "DUZ;MAILBOX_Name[or IEN for box (comma Separated);MALL
+"RTN","C0CMAIL2",29,0)
+ ;                      or "*" for all boxes, default is "IN" if missing]"
+"RTN","C0CMAIL2",30,0)
+ ;                $P(C0CINPUT,";",3)=MALL, default=NUL means "New only",
+"RTN","C0CMAIL2",31,0)
+ ;                                     "*" for All or 9,999 maximum
+"RTN","C0CMAIL2",32,0)
+ ;                    MALL?1.n = that number of the n most recent
+"RTN","C0CMAIL2",33,0)
+ ;  Internally:
+"RTN","C0CMAIL2",34,0)
+ ;    BNAM = Box Name
+"RTN","C0CMAIL2",35,0)
+ ;  Output:
+"RTN","C0CMAIL2",36,0)
+ ;    C0CDATA
+"RTN","C0CMAIL2",37,0)
+ ;      = (BNAM,"NUMBER") = Number of NEW Emails in Basket
+"RTN","C0CMAIL2",38,0)
+ ;        (BNAM,"MSG",C0CIEN,"FROM")=Name
+"RTN","C0CMAIL2",39,0)
+ ;        (BNAM,"MSG",C0CIEN,"TO",n)=DUZ, or EMAIL Address
+"RTN","C0CMAIL2",40,0)
+ ;        (BNAM,"MSG",C0CIEN,"TO NAME",n)=Names or EMAIL Address
+"RTN","C0CMAIL2",41,0)
+ ;        (BNAM,"MSG",C0CIEN,"TITLE")=EMAIL Title
+"RTN","C0CMAIL2",42,0)
+ ;        (BNAM,"MSG",C0CIEN[for File 3.9])=Number of Attachments
+"RTN","C0CMAIL2",43,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"CONT") = Free Text
+"RTN","C0CMAIL2",44,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"LINES") = Number of Lines of Text
+"RTN","C0CMAIL2",45,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"SIZE") = Size of the Message in Bytes
+"RTN","C0CMAIL2",46,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"TXT",LINE#) = Message Data (No Attachment)
+"RTN","C0CMAIL2",47,0)
+ ;   (BNAM,"MSG",C0CIEN,"SEG",NUM) = First Line^Last Line
+"RTN","C0CMAIL2",48,0)
+ ;   (BNAM,"MSG",C0CIEN,"SEG",NUM,"CONT",type) = Message Details
+"RTN","C0CMAIL2",49,0)
+ ;   (BNAM,"MSG",C0CIEN,"SEG",NUM,LINE#) = Message Data
+"RTN","C0CMAIL2",50,0)
+ ; 
+"RTN","C0CMAIL2",51,0)
+ ; DO DETAIL^C0CMAIL(.OUTBF,D0) ; For each Email Message and Attachments
+"RTN","C0CMAIL2",52,0)
+ ;   Input;
+"RTN","C0CMAIL2",53,0)
+ ;     D0     - The IEN for the message in file 3.9, MESSAGE global
+"RTN","C0CMAIL2",54,0)
+ ;   Output
+"RTN","C0CMAIL2",55,0)
+ ;     OUTBF  - The array of your choice to save the expanded and decoded message.
+"RTN","C0CMAIL2",56,0)
+ ; 
+"RTN","C0CMAIL2",57,0)
+GETMSG(C0CDATA,C0CINPUT) ; Common Entry Point for Mailbox Data
+"RTN","C0CMAIL2",58,0)
+ K:'$G(C0CDATA("KEEP")) C0CDATA
+"RTN","C0CMAIL2",59,0)
+ N U
+"RTN","C0CMAIL2",60,0)
+ S U="^"
+"RTN","C0CMAIL2",61,0)
+ D:$G(C0CINPUT)
+"RTN","C0CMAIL2",62,0)
+ . N BF,DUZ,I,INPUT,J,L,LST,MBLST,MALL
+"RTN","C0CMAIL2",63,0)
+ . S INPUT=C0CINPUT
+"RTN","C0CMAIL2",64,0)
+ . S DUZ=+INPUT
+"RTN","C0CMAIL2",65,0)
+ . I $D(^VA(200,DUZ))=0!('$D(^VA(200,DUZ,0)))  D ERROR("ER06")  Q
+"RTN","C0CMAIL2",66,0)
+ . ;
+"RTN","C0CMAIL2",67,0)
+ . D:$D(^XMB(3.7,DUZ,0))#2
+"RTN","C0CMAIL2",68,0)
+ . . S MBLST=$P(INPUT,";",2)
+"RTN","C0CMAIL2",69,0)
+ . . S MALL=$P(INPUT,";",3) ; New or All Mail Flag
+"RTN","C0CMAIL2",70,0)
+ . . S:MALL["*" MALL=99999
+"RTN","C0CMAIL2",71,0)
+ . . ; Only one of these can be correct
+"RTN","C0CMAIL2",72,0)
+ . . D
+"RTN","C0CMAIL2",73,0)
+ . . . ;  If nul, make it "IN" only
+"RTN","C0CMAIL2",74,0)
+ . . . I MBLST="" D  QUIT
+"RTN","C0CMAIL2",75,0)
+ . . . . S MBLST("IN")=0,I=0
+"RTN","C0CMAIL2",76,0)
+ . . . . D GATHER(DUZ,"IN",.LST)
+"RTN","C0CMAIL2",77,0)
+ . . . .QUIT
+"RTN","C0CMAIL2",78,0)
+ . . . ;
+"RTN","C0CMAIL2",79,0)
+ . . . ;  If "*", Get all Mailboxes and look for New Messages
+"RTN","C0CMAIL2",80,0)
+ . . . I MBLST["*" D  QUIT
+"RTN","C0CMAIL2",81,0)
+ . . . . N NAM,NUM
+"RTN","C0CMAIL2",82,0)
+ . . . . S NUM=0
+"RTN","C0CMAIL2",83,0)
+ . . . . F  S NUM=$O(^XMB(3.7,DUZ,2,NUM)) Q:'NUM  D
+"RTN","C0CMAIL2",84,0)
+ . . . . . S NAM=$P(^XMB(3.7,DUZ,2,NUM,0),U)
+"RTN","C0CMAIL2",85,0)
+ . . . . . D GATHER(DUZ,NAM,.LST)
+"RTN","C0CMAIL2",86,0)
+ . . . . .QUIT
+"RTN","C0CMAIL2",87,0)
+ . . . .QUIT
+"RTN","C0CMAIL2",88,0)
+ . . . ;
+"RTN","C0CMAIL2",89,0)
+ . . . ;  If comma separated, look for mailboxes with new messages
+"RTN","C0CMAIL2",90,0)
+ . . . I $L(MBLST,",")>1 D  QUIT
+"RTN","C0CMAIL2",91,0)
+ . . . . S NAM=""
+"RTN","C0CMAIL2",92,0)
+ . . . . N TN,V
+"RTN","C0CMAIL2",93,0)
+ . . . . F TN=1:1:$L(MBLST,",")  S V=$P(MBLST,",",TN)  D
+"RTN","C0CMAIL2",94,0)
+ . . . . . I $L(V) D   QUIT
+"RTN","C0CMAIL2",95,0)
+ . . . . . . I V S NAM=$P($G(^XMB(3.7,DUZ,2,V,0)),U)
+"RTN","C0CMAIL2",96,0)
+ . . . . . . S:NAM="" NAM=V
+"RTN","C0CMAIL2",97,0)
+ . . . . . . D GATHER(DUZ,NAM,.LST)
+"RTN","C0CMAIL2",98,0)
+ . . . . . .QUIT
+"RTN","C0CMAIL2",99,0)
+ . . . . . ;
+"RTN","C0CMAIL2",100,0)
+ . . . . . D ERROR("ER08")
+"RTN","C0CMAIL2",101,0)
+ . . . . .QUIT
+"RTN","C0CMAIL2",102,0)
+ . . . .QUIT
+"RTN","C0CMAIL2",103,0)
+ . . . ;
+"RTN","C0CMAIL2",104,0)
+ . . . ;  If only 1 mailbox named, go get it
+"RTN","C0CMAIL2",105,0)
+ . . . I $L(MBLST)  D   QUIT
+"RTN","C0CMAIL2",106,0)
+ . . . . I $D(^XMB(3.7,DUZ,2,"B",MBLST))    D GATHER(DUZ,MBLST,.LST) QUIT
+"RTN","C0CMAIL2",107,0)
+ . . . . ;
+"RTN","C0CMAIL2",108,0)
+ . . . . D ERROR("ER07")
+"RTN","C0CMAIL2",109,0)
+ . . .QUIT
+"RTN","C0CMAIL2",110,0)
+ . . MERGE C0CDATA=LST
+"RTN","C0CMAIL2",111,0)
+ . .QUIT
+"RTN","C0CMAIL2",112,0)
+ .QUIT
+"RTN","C0CMAIL2",113,0)
+ QUIT
+"RTN","C0CMAIL2",114,0)
+ ;  ===================
+"RTN","C0CMAIL2",115,0)
+GATHER(DUZ,NAM,LST) ; Gather Data about the Baskets and their mail
+"RTN","C0CMAIL2",116,0)
+ N I,J,K,L
+"RTN","C0CMAIL2",117,0)
+ S (I,K)=0
+"RTN","C0CMAIL2",118,0)
+ S J=$O(^XMB(3.7,DUZ,2,"B",NAM,""))
+"RTN","C0CMAIL2",119,0)
+ F  S I=$O(^XMB(3.7,DUZ,2,J,1,I)) Q:'I  D
+"RTN","C0CMAIL2",120,0)
+ . S L=$P(^XMB(3.7,DUZ,2,J,1,I,0),U,3)
+"RTN","C0CMAIL2",121,0)
+ . D   ; :L
+"RTN","C0CMAIL2",122,0)
+ . . S:L K=K+1,LST(NAM,"MSG",I,"NEW")=""  ; Flag NEW emails
+"RTN","C0CMAIL2",123,0)
+ . . S LST(NAM,"MSG",I)=L
+"RTN","C0CMAIL2",124,0)
+ . . D GETTYP(I)
+"RTN","C0CMAIL2",125,0)
+ . .QUIT
+"RTN","C0CMAIL2",126,0)
+ .QUIT
+"RTN","C0CMAIL2",127,0)
+ S LST(NAM,"NUMBER")=K
+"RTN","C0CMAIL2",128,0)
+ QUIT
+"RTN","C0CMAIL2",129,0)
+ ;  ===================
+"RTN","C0CMAIL2",130,0)
+ ; D0 is the IEN into the Message Global ^XMB(3.9,D0)
+"RTN","C0CMAIL2",131,0)
+ ; The products of these emails are scanned to identify
+"RTN","C0CMAIL2",132,0)
+ ;  the number of documents stored in the MIME package.
+"RTN","C0CMAIL2",133,0)
+ ;  The protocol runs like this;
+"RTN","C0CMAIL2",134,0)
+ ; Line 1 is the --separator
+"RTN","C0CMAIL2",135,0)
+ ; Line 2 thru n >Look for Content-[detail type:]Description ; Next CMD
+"RTN","C0CMAIL2",136,0)
+ ; Line n+2 thru t-1 where t does NOT have "Content-"
+"RTN","C0CMAIL2",137,0)
+ ; Line t   is Next Section Terminator, or Message Terminator, --separator
+"RTN","C0CMAIL2",138,0)
+ ; Line t+1 should not exist in the data set if Message Terminator
+"RTN","C0CMAIL2",139,0)
+ ; CON = "Content-"
+"RTN","C0CMAIL2",140,0)
+ ; FLG = "--"
+"RTN","C0CMAIL2",141,0)
+ ; SEP = FLG+7 or more characters  ; Separator
+"RTN","C0CMAIL2",142,0)
+ ; END = SEP+FLG
+"RTN","C0CMAIL2",143,0)
+ ; SGC = Segment Count
+"RTN","C0CMAIL2",144,0)
+ ; Note: separator is a string of specific characters of
+"RTN","C0CMAIL2",145,0)
+ ;        indeterminate length  
+"RTN","C0CMAIL2",146,0)
+ ; LST() the transfer array
+"RTN","C0CMAIL2",147,0)
+ ; LST(NAM,"MSG",C0CIEN,"SEG",SGN)=Starting Line^Ending Line
+"RTN","C0CMAIL2",148,0)
+ ; LST(NAM,"MSG",C0CIEN,"SEG",SGN,1:n)=Decoded Message Data
+"RTN","C0CMAIL2",149,0)
+ ;
+"RTN","C0CMAIL2",150,0)
+GETTYP(D0) ; Look for the goodies in the Mail
+"RTN","C0CMAIL2",151,0)
+ N I,J,N,BCN,CON,CNT,D1,END,FLG,SEP,SGC,XX,XXNM
+"RTN","C0CMAIL2",152,0)
+ S CON="Content-"
+"RTN","C0CMAIL2",153,0)
+ S FLG="--"
+"RTN","C0CMAIL2",154,0)
+ S SEP=""  ; Start SEP as null, so we can use this to help identify the type
+"RTN","C0CMAIL2",155,0)
+ S (BCN,CNT,D1,END,SGC)=0
+"RTN","C0CMAIL2",156,0)
+ S XX=$G(^XMB(3.9,D0,0))
+"RTN","C0CMAIL2",157,0)
+ S LST(NAM,"MSG",D0,"TITLE")=$P($G(^XMB(3.9,D0,0)),U,1)
+"RTN","C0CMAIL2",158,0)
+ S LST(NAM,"MSG",D0,"CREATED")=$G(^XMB(3.9,D0,.6))
+"RTN","C0CMAIL2",159,0)
+ F I=4,2 S XXNM=$P(XX,U,I)  Q:$L(XXNM)
+"RTN","C0CMAIL2",160,0)
+ S LST(NAM,"MSG",D0,"FROM")=$$NAME(XXNM)
+"RTN","C0CMAIL2",161,0)
+ S LST(NAM,"MSG",D0,"SENT")=$$TIME($P(XX,U,3))
+"RTN","C0CMAIL2",162,0)
+ ; Get the folks the email is sent to.
+"RTN","C0CMAIL2",163,0)
+ S D1=0
+"RTN","C0CMAIL2",164,0)
+ F  S D1=$O(^XMB(3.9,D0,1,D1)) Q:'D1  D
+"RTN","C0CMAIL2",165,0)
+ . N T
+"RTN","C0CMAIL2",166,0)
+ . S T=+$G(^XMB(3.9,D0,1,D1,0))
+"RTN","C0CMAIL2",167,0)
+ . S:T T=$P($G(^VA(200,+T,0)),"^")
+"RTN","C0CMAIL2",168,0)
+ . S LST("TO",D1)=T
+"RTN","C0CMAIL2",169,0)
+ . S T=$G(^XMB(3.9,D0,6,D1,0))
+"RTN","C0CMAIL2",170,0)
+ . S:T T=$P($G(^VA(200,+T,0)),"^")
+"RTN","C0CMAIL2",171,0)
+ . S:T="" T="<Unknown>"
+"RTN","C0CMAIL2",172,0)
+ . S LST("TO NAME",D1)=T
+"RTN","C0CMAIL2",173,0)
+ .QUIT
+"RTN","C0CMAIL2",174,0)
+ ; Preload first Segment (0) with beginning on Line 1
+"RTN","C0CMAIL2",175,0)
+ ;  if not a 64bit
+"RTN","C0CMAIL2",176,0)
+ S LST(NAM,"MSG",D0,"SEG",0)=1
+"RTN","C0CMAIL2",177,0)
+ S D1=.9999,SEP="@@"
+"RTN","C0CMAIL2",178,0)
+ F  S D1=$O(^XMB(3.9,D0,2,D1)) Q:'D1  D
+"RTN","C0CMAIL2",179,0)
+ . ; Clear any control characters (cr/lf/ff) off
+"RTN","C0CMAIL2",180,0)
+ . S X=$TR($G(^XMB(3.9,D0,2,D1,0)),$C(10,12,13))
+"RTN","C0CMAIL2",181,0)
+ . ; Enter once to set the SEP to capture the separator
+"RTN","C0CMAIL2",182,0)
+ . I SEP=FLG&($E(X,1,2)=FLG)&($L(X,FLG)=2)&($L($P(X,FLG,2)>5))   D   Q
+"RTN","C0CMAIL2",183,0)
+ . . S SEP=X,END=X_FLG
+"RTN","C0CMAIL2",184,0)
+ . . S (CNT,SGC)=1,BCN=0
+"RTN","C0CMAIL2",185,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC)=D1
+"RTN","C0CMAIL2",186,0)
+ . .QUIT
+"RTN","C0CMAIL2",187,0)
+ . ;
+"RTN","C0CMAIL2",188,0)
+ . ; A new separator is set, process original 
+"RTN","C0CMAIL2",189,0)
+ . I X=SEP  D  QUIT
+"RTN","C0CMAIL2",190,0)
+ . . S LST(NAM,"MSG",D0,SGC,"SIZE")=BCN+$L(BF)
+"RTN","C0CMAIL2",191,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC)=$G(LST(NAM,"MSG",D0,"SEG",SGC))_"^"_(D1-1)
+"RTN","C0CMAIL2",192,0)
+ . . S SGC=SGC+1,BCN=0
+"RTN","C0CMAIL2",193,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC)=D1
+"RTN","C0CMAIL2",194,0)
+ . .QUIT
+"RTN","C0CMAIL2",195,0)
+ . ;
+"RTN","C0CMAIL2",196,0)
+ . S BCN=BCN+$L(X)
+"RTN","C0CMAIL2",197,0)
+ . I X[CON D  Q
+"RTN","C0CMAIL2",198,0)
+ . . S J=$P($P(X,";"),CON,2)
+"RTN","C0CMAIL2",199,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC,"CONT",CNT,$P(J,":"))=$P(J,":",2)
+"RTN","C0CMAIL2",200,0)
+ . .QUIT
+"RTN","C0CMAIL2",201,0)
+ . ;
+"RTN","C0CMAIL2",202,0)
+ . ; S LST(NAM,"MSG",D0,"SEG",D1)=X
+"RTN","C0CMAIL2",203,0)
+ .QUIT
+"RTN","C0CMAIL2",204,0)
+ QUIT
+"RTN","C0CMAIL2",205,0)
+ ;  ===================
+"RTN","C0CMAIL2",206,0)
+NAME(NM) ; Return the name of the Sender
+"RTN","C0CMAIL2",207,0)
+ N NAME
+"RTN","C0CMAIL2",208,0)
+ S NAME="<Unknown Sender>"
+"RTN","C0CMAIL2",209,0)
+ D
+"RTN","C0CMAIL2",210,0)
+ . ; Look first for a value to use with the NEW PERSON file
+"RTN","C0CMAIL2",211,0)
+ . ;
+"RTN","C0CMAIL2",212,0)
+ . I NM=+NM S NAME=$P(^VA(200,NM,0),U,1) Q
+"RTN","C0CMAIL2",213,0)
+ . ;
+"RTN","C0CMAIL2",214,0)
+ . I $L(NM) S NAME=NM                    Q
+"RTN","C0CMAIL2",215,0)
+ . ;
+"RTN","C0CMAIL2",216,0)
+ . ; Else, pull the data from the message and display the foreign source
+"RTN","C0CMAIL2",217,0)
+ . ;   of the message.
+"RTN","C0CMAIL2",218,0)
+ . N T
+"RTN","C0CMAIL2",219,0)
+ . S VAL=$G(^XMB(3.9,D0,.7))
+"RTN","C0CMAIL2",220,0)
+ . S:VAL T=$P(^VA(200,VAL,0),U)
+"RTN","C0CMAIL2",221,0)
+ . I $L($G(T)) S NAME=T                  Q
+"RTN","C0CMAIL2",222,0)
+ . ;
+"RTN","C0CMAIL2",223,0)
+ .QUIT
+"RTN","C0CMAIL2",224,0)
+ QUIT NAME
+"RTN","C0CMAIL2",225,0)
+ ;  ===================
+"RTN","C0CMAIL2",226,0)
+TIME(Y) ; The time and date of the sending
+"RTN","C0CMAIL2",227,0)
+ X ^DD("DD")
+"RTN","C0CMAIL2",228,0)
+ QUIT Y
+"RTN","C0CMAIL2",229,0)
+ ;  ===================
+"RTN","C0CMAIL2",230,0)
+ ;  Segments in Message need to be identified and decoded properly
+"RTN","C0CMAIL2",231,0)
+ ; D DETAIL^C0CMAIL(.ARRAY,D0) ;  Call One for each message
+"RTN","C0CMAIL2",232,0)
+ ;   ARRAY will have the details of this one call
+"RTN","C0CMAIL2",233,0)
+ ;    
+"RTN","C0CMAIL2",234,0)
+ ; Inputs;
+"RTN","C0CMAIL2",235,0)
+ ;   C0CINPUT    - The IEN of the message to expand
+"RTN","C0CMAIL2",236,0)
+ ; Outputs;
+"RTN","C0CMAIL2",237,0)
+ ;   C0CDATA     - Carrier for the returned structure of the Message
+"RTN","C0CMAIL2",238,0)
+ ;  C0CDATA(D0,"SEG")=number of SEGMENTS
+"RTN","C0CMAIL2",239,0)
+ ;  C0CDATA(D0,"SEG",0:n)=SEGMENT n details; First;Last;Type
+"RTN","C0CMAIL2",240,0)
+ ;  C0CDATA(D0,"SEG",0:n,"CONTENT",type)=Content details
+"RTN","C0CMAIL2",241,0)
+ ;  C0CDATA(D0,"SEG",0:n,"MSG",D3)=Content details
+"RTN","C0CMAIL2",242,0)
+ ;  C0CDATA(D0,"SEG",0:n,"HTML",D3)=Content details
+"RTN","C0CMAIL2",243,0)
+ ;
+"RTN","C0CMAIL2",244,0)
+DETAIL(C0CDATA,C0CINPUT) ; Message Detail Delivery
+"RTN","C0CMAIL2",245,0)
+ N LST,D0,D1,U
+"RTN","C0CMAIL2",246,0)
+ S U="^"
+"RTN","C0CMAIL2",247,0)
+ S D0=+$G(C0CINPUT)
+"RTN","C0CMAIL2",248,0)
+ I D0   D    QUIT
+"RTN","C0CMAIL2",249,0)
+ . I $D(^XMB(3.9,D0))<10 D ERROR("ER01")  QUIT
+"RTN","C0CMAIL2",250,0)
+ . ;
+"RTN","C0CMAIL2",251,0)
+ . D GETTYP2(D0)
+"RTN","C0CMAIL2",252,0)
+ . I $D(LST)   M C0CDATA(D0)=LST  Q
+"RTN","C0CMAIL2",253,0)
+ . ;
+"RTN","C0CMAIL2",254,0)
+ . D ERROR("ER02")
+"RTN","C0CMAIL2",255,0)
+ .QUIT
+"RTN","C0CMAIL2",256,0)
+ QUIT
+"RTN","C0CMAIL2",257,0)
+ ;  ===================
+"RTN","C0CMAIL2",258,0)
+ ;  End note if needed
+"RTN","C0CMAIL2",259,0)
+ ; MSK   - Set of characters that do not exist in 64 bit encoding
+"RTN","C0CMAIL2",260,0)
+GETTYP2(D0) ; Try to get the types and MSK for the 
+"RTN","C0CMAIL2",261,0)
+ N I,J,K,N,BCN,BF,CON,CNT,D1,END,FLG,MSK,SEP,SGC,U,XX,ZN,XXNM
+"RTN","C0CMAIL2",262,0)
+ S CON="Content-",U="^"
+"RTN","C0CMAIL2",263,0)
+ S FLG="--"
+"RTN","C0CMAIL2",264,0)
+ S MSK=" !""#$%&'()*,-.:;<>?@[\]^_`{|}~"
+"RTN","C0CMAIL2",265,0)
+ S (BF,SEP)=""  ; Start SEP as null, so we can use this to help identify the type
+"RTN","C0CMAIL2",266,0)
+ S (BCN,CNT,D1,END,SGC)=0
+"RTN","C0CMAIL2",267,0)
+ S XX=$G(^XMB(3.9,D0,0))
+"RTN","C0CMAIL2",268,0)
+ ; S K=$P(^XMB(3.9,D0,2,0),U,3)
+"RTN","C0CMAIL2",269,0)
+ S LST("TITLE")=$P($G(^XMB(3.9,D0,0)),U,1)
+"RTN","C0CMAIL2",270,0)
+ S LST("CREATED")=$$TIME($P(XX,U,3))
+"RTN","C0CMAIL2",271,0)
+ F I=4,2 S XXNM=$P(XX,U,I)  Q:$L(XXNM)
+"RTN","C0CMAIL2",272,0)
+ S LST("FROM")=$$NAME(XXNM)
+"RTN","C0CMAIL2",273,0)
+ ; Get the folks the email is sent to.
+"RTN","C0CMAIL2",274,0)
+ S D1=0
+"RTN","C0CMAIL2",275,0)
+ F  S D1=$O(^XMB(3.9,D0,1,D1)) Q:'D1  D   Q:D1=""
+"RTN","C0CMAIL2",276,0)
+ . N I,T
+"RTN","C0CMAIL2",277,0)
+ . S T=$P($G(^XMB(3.9,D0,1,D1,0)),U)
+"RTN","C0CMAIL2",278,0)
+ . S:T T=$P($G(^VA(200,T,0)),"^")
+"RTN","C0CMAIL2",279,0)
+ . S LST("TO",+D1)=T
+"RTN","C0CMAIL2",280,0)
+ . S T=$G(^XMB(3.9,D0,6,+D1,0))
+"RTN","C0CMAIL2",281,0)
+ . S:T="" T=$P($G(^VA(200,+T,0)),"^")
+"RTN","C0CMAIL2",282,0)
+ . S:T="" T="<Unknown>"
+"RTN","C0CMAIL2",283,0)
+ . S LST("TO NAME",D1)=T
+"RTN","C0CMAIL2",284,0)
+ .QUIT
+"RTN","C0CMAIL2",285,0)
+ ; Get the Header for the message
+"RTN","C0CMAIL2",286,0)
+ S D1=0
+"RTN","C0CMAIL2",287,0)
+ F I=1:1 S D1=$O(^XMB(3.9,D0,2,D1)) Q:D1=""  Q:(D1>.99999)   D
+"RTN","C0CMAIL2",288,0)
+ . S LST("HDR",I)=$G(^XMB(3.9,D0,2,D1,0))
+"RTN","C0CMAIL2",289,0)
+ .QUIT
+"RTN","C0CMAIL2",290,0)
+ ; Start walking the different sections
+"RTN","C0CMAIL2",291,0)
+ S D1=.99999,SEP="@@",SGC=0
+"RTN","C0CMAIL2",292,0)
+ F  S D1=$O(^XMB(3.9,D0,2,D1)) Q:'D1  D
+"RTN","C0CMAIL2",293,0)
+ . ; Clear any control characters (cr/lf/ff) off
+"RTN","C0CMAIL2",294,0)
+ . S X=$TR($G(^XMB(3.9,D0,2,D1,0)),$C(10,12,13))
+"RTN","C0CMAIL2",295,0)
+ . ; Enter once to set the SEP to capture the separator
+"RTN","C0CMAIL2",296,0)
+ . I (SEP="@@")&(X?2."--"5.AN.E)  D   Q
+"RTN","C0CMAIL2",297,0)
+ . . I $L(X,FLG)>2 D ERROR("ER10")
+"RTN","C0CMAIL2",298,0)
+ . . S SEP=X,END=X_FLG
+"RTN","C0CMAIL2",299,0)
+ . . S (CNT,SGC)=1,BCN=0
+"RTN","C0CMAIL2",300,0)
+ . . S LST("SEG",SGC)=D1
+"RTN","C0CMAIL2",301,0)
+ . .QUIT
+"RTN","C0CMAIL2",302,0)
+ . ;
+"RTN","C0CMAIL2",303,0)
+ . ; A new SEGMENT separator is set, process original 
+"RTN","C0CMAIL2",304,0)
+ . I X=SEP  D  QUIT
+"RTN","C0CMAIL2",305,0)
+ . . ; Save Current Values
+"RTN","C0CMAIL2",306,0)
+ . . S LST("SEG",SGC,"SIZE")=BCN+$L(BF)
+"RTN","C0CMAIL2",307,0)
+ . . ;  Close this Segment and prepare to start a New Segment
+"RTN","C0CMAIL2",308,0)
+ . . S $P(LST("SEG",SGC),"^",1,2)=$P($G(LST("SEG",SGC)),"^",1)_"^"_(D1-1)
+"RTN","C0CMAIL2",309,0)
+ . . ;  Put the result in LST("SEG",SGC,"XML")
+"RTN","C0CMAIL2",310,0)
+ . . I $L(BF) D
+"RTN","C0CMAIL2",311,0)
+ . . . S ZN=1
+"RTN","C0CMAIL2",312,0)
+ . . . N I,T,TBF
+"RTN","C0CMAIL2",313,0)
+ . . . S TBF=BF
+"RTN","C0CMAIL2",314,0)
+ . . . F I=1:1:($L(TBF,"="))  D
+"RTN","C0CMAIL2",315,0)
+ . . . . S BF=$P(TBF,"=",I)_"="
+"RTN","C0CMAIL2",316,0)
+ . . . . I BF'="="  D DECODER
+"RTN","C0CMAIL2",317,0)
+ . . . .QUIT
+"RTN","C0CMAIL2",318,0)
+ . . . S BF=""
+"RTN","C0CMAIL2",319,0)
+ . . .QUIT
+"RTN","C0CMAIL2",320,0)
+ . . S SGC=SGC+1,BCN=0
+"RTN","C0CMAIL2",321,0)
+ . . ; Incriment SGC to start a new Segment
+"RTN","C0CMAIL2",322,0)
+ . . S LST("SEG",SGC)=D1
+"RTN","C0CMAIL2",323,0)
+ . .QUIT
+"RTN","C0CMAIL2",324,0)
+ . ;
+"RTN","C0CMAIL2",325,0)
+ . ; Accumulate the 64 bit encoding
+"RTN","C0CMAIL2",326,0)
+ . I X=$TR(X,MSK)&$L(X)  S BF=BF_X  QUIT
+"RTN","C0CMAIL2",327,0)
+ . ;
+"RTN","C0CMAIL2",328,0)
+ . ; Ending Condition, close out the Segment
+"RTN","C0CMAIL2",329,0)
+ . I X=END D  QUIT
+"RTN","C0CMAIL2",330,0)
+ . . S LST("SEG",SGC)=$G(LST("SEG",SGC))_"^"_(D1-1)
+"RTN","C0CMAIL2",331,0)
+ . . I $L(BF) S ZN=1 D DECODER  S BF="" Q
+"RTN","C0CMAIL2",332,0)
+ . .QUIT
+"RTN","C0CMAIL2",333,0)
+ . ;
+"RTN","C0CMAIL2",334,0)
+ . ; Accumulate the lengths of other lines of the message
+"RTN","C0CMAIL2",335,0)
+ . S BCN=BCN+$L(X)
+"RTN","C0CMAIL2",336,0)
+ . ; Split out the Content Info
+"RTN","C0CMAIL2",337,0)
+ . I X[CON D  Q
+"RTN","C0CMAIL2",338,0)
+ . . S J=$P(X,CON,2)
+"RTN","C0CMAIL2",339,0)
+ . . I J[" boundary=" D
+"RTN","C0CMAIL2",340,0)
+ . . . S SEP=$P($P(J," boundary=",2),"""",2),END=SEP_FLG
+"RTN","C0CMAIL2",341,0)
+ . . . Q:SEP?2"-"5.ANP
+"RTN","C0CMAIL2",342,0)
+ . . . ;
+"RTN","C0CMAIL2",343,0)
+ . . . D ERROR("ER11")
+"RTN","C0CMAIL2",344,0)
+ . . . Q:SEP'[" "
+"RTN","C0CMAIL2",345,0)
+ . . . ;
+"RTN","C0CMAIL2",346,0)
+ . . . D ERROR("ER12")
+"RTN","C0CMAIL2",347,0)
+ . . .QUIT
+"RTN","C0CMAIL2",348,0)
+ . . S LST("SEG",SGC,"CONTENT",$P(J,":"))=$P(J,":",2,9)
+"RTN","C0CMAIL2",349,0)
+ . .QUIT
+"RTN","C0CMAIL2",350,0)
+ . ;
+"RTN","C0CMAIL2",351,0)
+ . ; Everything else is Text, Check for CCR/CCD.
+"RTN","C0CMAIL2",352,0)
+ . N KK,UBF
+"RTN","C0CMAIL2",353,0)
+ . D
+"RTN","C0CMAIL2",354,0)
+ . . S UBF=$$UPPER(X)
+"RTN","C0CMAIL2",355,0)
+ . . I UBF["<CONTINUITYOFCARERECORD"   S $P(LST("SEG",SGC),U,3)="CCR" Q
+"RTN","C0CMAIL2",356,0)
+ . . ;
+"RTN","C0CMAIL2",357,0)
+ . . I UBF["<CLINICALDOCUMENT"         S $P(LST("SEG",SGC),U,3)="CCD" Q
+"RTN","C0CMAIL2",358,0)
+ . .QUIT
+"RTN","C0CMAIL2",359,0)
+ . ; Look for directives in the text before it gets published
+"RTN","C0CMAIL2",360,0)
+ . ;  Look for "=3D" and replace it with a single "=".  I can do more parsing
+"RTN","C0CMAIL2",361,0)
+ . ;  but there may be situations where the line has been wrapped.
+"RTN","C0CMAIL2",362,0)
+ . D:X["=3D"
+"RTN","C0CMAIL2",363,0)
+ . . F KK=1:1 S X=$P(X,"=3D",1)_"="_$P(X,"=3D",2,999) Q:X'["=3D"
+"RTN","C0CMAIL2",364,0)
+ . .QUIT
+"RTN","C0CMAIL2",365,0)
+ . S LST("SEG",SGC,"TXT",D1)=X
+"RTN","C0CMAIL2",366,0)
+ .QUIT
+"RTN","C0CMAIL2",367,0)
+ QUIT
+"RTN","C0CMAIL2",368,0)
+ ;  ===================
+"RTN","C0CMAIL2",369,0)
+ ; Break down the Buffer Array so it can be saved.
+"RTN","C0CMAIL2",370,0)
+ ;  BF is passed in.
+"RTN","C0CMAIL2",371,0)
+DECODER ; 
+"RTN","C0CMAIL2",372,0)
+ N RCNT,TBF,UBF,ZBF,ZI,ZJ,ZK,ZSIZE
+"RTN","C0CMAIL2",373,0)
+ S ZBF=BF
+"RTN","C0CMAIL2",374,0)
+ ;  Full Buffer, BF, now check for Encryption and Unpack
+"RTN","C0CMAIL2",375,0)
+ F RCNT=1:1:$L(ZBF,"=")   D
+"RTN","C0CMAIL2",376,0)
+ . N BF
+"RTN","C0CMAIL2",377,0)
+ . S BF=$P(ZBF,"=",RCNT)
+"RTN","C0CMAIL2",378,0)
+ . ;  Unpacking the 64 bit encoding
+"RTN","C0CMAIL2",379,0)
+ . S TBF=$TR($$DECODE^RGUTUU(BF),$C(10,12,13))
+"RTN","C0CMAIL2",380,0)
+ . D:$L(TBF)
+"RTN","C0CMAIL2",381,0)
+ . . N C,OK,OKCNT,KK,XBF,UBF
+"RTN","C0CMAIL2",382,0)
+ . . D
+"RTN","C0CMAIL2",383,0)
+ . . . S UBF=$$UPPER(TBF)
+"RTN","C0CMAIL2",384,0)
+ . . . I UBF["<CONTINUITYOFCARERECORD XMLNS=" S $P(LST("SEG",SGC),U,3)="CCR" Q
+"RTN","C0CMAIL2",385,0)
+ . . . ;
+"RTN","C0CMAIL2",386,0)
+ . . . I UBF["<CLINICALDOCUMENT XMLNS="       S $P(LST("SEG",SGC),U,3)="CCD" Q
+"RTN","C0CMAIL2",387,0)
+ . . .QUIT
+"RTN","C0CMAIL2",388,0)
+ . . ; Check for Bad Signature Decoding, after 100 bad characters
+"RTN","C0CMAIL2",389,0)
+ . . S OK=1,OKCNT=0
+"RTN","C0CMAIL2",390,0)
+ . . F KK=1:1:$L(UBF) S C=$A(UBF,KK) S:C>126 OKCNT=OKCNT+1 I OKCNT>100 S OK=0 Q
+"RTN","C0CMAIL2",391,0)
+ . . ;
+"RTN","C0CMAIL2",392,0)
+ . . D
+"RTN","C0CMAIL2",393,0)
+ . . . I 'OK S (BF,UBF,TBF,XBF)="<Crypto-Signature redacted>" Q
+"RTN","C0CMAIL2",394,0)
+ . . . ;
+"RTN","C0CMAIL2",395,0)
+ . . . S BF=BF_"="
+"RTN","C0CMAIL2",396,0)
+ . . . D NORMAL(.XBF,.TBF)
+"RTN","C0CMAIL2",397,0)
+ . . .QUIT
+"RTN","C0CMAIL2",398,0)
+ . . M LST("SEG",SGC,"XML",RCNT)=XBF
+"RTN","C0CMAIL2",399,0)
+ . .QUIT
+"RTN","C0CMAIL2",400,0)
+ .QUIT
+"RTN","C0CMAIL2",401,0)
+ QUIT
+"RTN","C0CMAIL2",402,0)
+ ;  ===================
+"RTN","C0CMAIL2",403,0)
+ ;  OUTXML = OUTBF  = OUT   = OUTPUT ARRAY TO BE BUILT
+"RTN","C0CMAIL2",404,0)
+ ;  BF     = INXML = INPUT ARRAY TO PROVIDE INPUT
+"RTN","C0CMAIL2",405,0)
+ ;   >D NORMAL^C0CMAIL(.OUT,BF)
+"RTN","C0CMAIL2",406,0)
+NORMAL(OUTXML,INXML)    ;NORMALIZES AN XML STRING PASSED BY NAME IN INXML
+"RTN","C0CMAIL2",407,0)
+ ; INTO AN XML ARRAY RETURNED IN OUTXML, ALSO PASSED BY NAME
+"RTN","C0CMAIL2",408,0)
+ ;
+"RTN","C0CMAIL2",409,0)
+ N ZN,OUTBF,XX,ZSEP
+"RTN","C0CMAIL2",410,0)
+ S INXML=$TR(INXML,$C(10,12,13))
+"RTN","C0CMAIL2",411,0)
+ S ZN=1,ZSEP=">"
+"RTN","C0CMAIL2",412,0)
+ S OUTBF(1)=$P(INXML,"><",1)_ZSEP,XX="<"_$P(INXML,"><",2)_ZSEP,ZN=2,ZL=1
+"RTN","C0CMAIL2",413,0)
+ F ZN=ZN+1:1:$L(INXML,"><")  D   Q:XX=""
+"RTN","C0CMAIL2",414,0)
+ . S XX=$P(INXML,"><",ZN)
+"RTN","C0CMAIL2",415,0)
+ . S:$E($RE(XX))=">" ZSEP=""
+"RTN","C0CMAIL2",416,0)
+ . Q:XX=""
+"RTN","C0CMAIL2",417,0)
+ . ;
+"RTN","C0CMAIL2",418,0)
+ . S XX="<"_XX_ZSEP
+"RTN","C0CMAIL2",419,0)
+ . D
+"RTN","C0CMAIL2",420,0)
+ . . I $L(XX)<4000 S OUTBF(ZL)=XX,XX=$P(INXML,"><",ZN),ZL=ZL+1   Q
+"RTN","C0CMAIL2",421,0)
+ . . ;
+"RTN","C0CMAIL2",422,0)
+ . . D ERROR("ER05")
+"RTN","C0CMAIL2",423,0)
+ . . F ZL=ZL+1:1 D   Q:XX=""
+"RTN","C0CMAIL2",424,0)
+ . . .  N XL
+"RTN","C0CMAIL2",425,0)
+ . . .  S XL=$E(XX,1,4000)
+"RTN","C0CMAIL2",426,0)
+ . . .  S $E(XX,1,4000)=""   ; S XX=$E(XX,4001,999999) ; Remove 4K characters
+"RTN","C0CMAIL2",427,0)
+ . . .  S OUTBF(ZL)=XL
+"RTN","C0CMAIL2",428,0)
+ . . .QUIT
+"RTN","C0CMAIL2",429,0)
+ . .QUIT
+"RTN","C0CMAIL2",430,0)
+ .QUIT
+"RTN","C0CMAIL2",431,0)
+ M OUTXML=OUTBF
+"RTN","C0CMAIL2",432,0)
+ QUIT
+"RTN","C0CMAIL2",433,0)
+ ;  ===================
+"RTN","C0CMAIL2",434,0)
+UPPER(X) ; Convert any lowercase letters to Uppercase letters
+"RTN","C0CMAIL2",435,0)
+ QUIT $TR(X,"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ")
+"RTN","C0CMAIL2",436,0)
+ ;  ===================
+"RTN","C0CMAIL2",437,0)
+ ; EN is a counter that remains between error events
+"RTN","C0CMAIL2",438,0)
+ERROR(ER) ; Error Handler
+"RTN","C0CMAIL2",439,0)
+ N TXXQ,XXXQ
+"RTN","C0CMAIL2",440,0)
+ S XXXQ="Unknown Error Encountered = "_ER
+"RTN","C0CMAIL2",441,0)
+ S TXXQ=$P($T(@(ER_"^"_$T(+0))),";;",2,99)
+"RTN","C0CMAIL2",442,0)
+ I TXXQ'=""  D
+"RTN","C0CMAIL2",443,0)
+ . I TXXQ["_" X "S TXXQ="_TXXQ
+"RTN","C0CMAIL2",444,0)
+ . S XXXQ=TXXQ
+"RTN","C0CMAIL2",445,0)
+ .QUIT
+"RTN","C0CMAIL2",446,0)
+ S EN(ER)=$G(EN(ER))+1
+"RTN","C0CMAIL2",447,0)
+ S LST("ERR",ER,EN(ER))=XXXQ
+"RTN","C0CMAIL2",448,0)
+ QUIT
+"RTN","C0CMAIL2",449,0)
+ ;  ===================
+"RTN","C0CMAIL2",450,0)
+ER01 ;;Message Missing
+"RTN","C0CMAIL2",451,0)
+ER02 ;;Message Text Missing
+"RTN","C0CMAIL2",452,0)
+ER03 ;;Message Not Identifiable
+"RTN","C0CMAIL2",453,0)
+ER04 ;;Segment is too large
+"RTN","C0CMAIL2",454,0)
+ER05 ;;Mailbox Missing
+"RTN","C0CMAIL2",455,0)
+ER06 ;;"User Missing = "_$G(DUZ)
+"RTN","C0CMAIL2",456,0)
+ER07 ;;"Bad DUZ = "_DUZ
+"RTN","C0CMAIL2",457,0)
+ER08 ;;"Bad Basket ID = "_MBLST_" >> "_$G(TN)
+"RTN","C0CMAIL2",458,0)
+ER10 ;;"Bad Separator found = "_X
+"RTN","C0CMAIL2",459,0)
+ER11 ;;"Non-Standard Separator Found:>"_$G(J)
+"RTN","C0CMAIL2",460,0)
+ER12 ;;"Spaces are not allowed in Separators:>"_$G(J)
+"RTN","C0CMAIL2",461,0)
+ ;  vvvvvvvvvvvvvvv  Not Needed  vvvvvvvvvvvvvvvvvvvvvvvvvv
+"RTN","C0CMAIL2",462,0)
+ ;  End note if needed
+"RTN","C0CMAIL2",463,0)
+ QUIT
+"RTN","C0CMAIL2",464,0)
+ ;  ===================
+"RTN","C0CMAIL3")
+0^83^B224733815
+"RTN","C0CMAIL3",1,0)
+C0CMAIL3 ; Communications for MIME Documents and MultiMIME ; 3110420 ; rcr/rcr   ; 5/10/12 2:51pm
+"RTN","C0CMAIL3",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMAIL3",3,0)
+ ;Copyright 2011 Chris Richardson, Richardson Computer Research
+"RTN","C0CMAIL3",4,0)
+ ; Modified 3110619@2038
+"RTN","C0CMAIL3",5,0)
+ ;   rcr@rcresearch.us
+"RTN","C0CMAIL3",6,0)
+ ;  Licensed under the terms of the GNU
+"RTN","C0CMAIL3",7,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CMAIL3",8,0)
+ ;
+"RTN","C0CMAIL3",9,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CMAIL3",10,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CMAIL3",11,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMAIL3",12,0)
+ ;(at your option) any later version.
+"RTN","C0CMAIL3",13,0)
+ ;
+"RTN","C0CMAIL3",14,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CMAIL3",15,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMAIL3",16,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMAIL3",17,0)
+ ;GNU General Public License for more details.
+"RTN","C0CMAIL3",18,0)
+ ;
+"RTN","C0CMAIL3",19,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CMAIL3",20,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMAIL3",21,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMAIL3",22,0)
+ ;
+"RTN","C0CMAIL3",23,0)
+ ;  ------------------
+"RTN","C0CMAIL3",24,0)
+ ;Entry Points
+"RTN","C0CMAIL3",25,0)
+ ; DETAIL^C0CMAIL(.C0CDATA,IEN) --> Get details of the Mail Message and Attachments
+"RTN","C0CMAIL3",26,0)
+ ; GETMSG^C0CMAIL(.C0CDATA,.C0CINPUT)
+"RTN","C0CMAIL3",27,0)
+ ;  Input:
+"RTN","C0CMAIL3",28,0)
+ ;    C0CINPUT = "DUZ;MAILBOX_Name[or IEN for box (comma Separated);MALL
+"RTN","C0CMAIL3",29,0)
+ ;                      or "*" for all boxes, default is "IN" if missing]"
+"RTN","C0CMAIL3",30,0)
+ ;                $P(C0CINPUT,";",3)=MALL, default=NUL means "New only",
+"RTN","C0CMAIL3",31,0)
+ ;                                     "*" for All or 9,999 maximum
+"RTN","C0CMAIL3",32,0)
+ ;                    MALL?1.n = that number of the n most recent
+"RTN","C0CMAIL3",33,0)
+ ;  Internally:
+"RTN","C0CMAIL3",34,0)
+ ;    BNAM = Box Name
+"RTN","C0CMAIL3",35,0)
+ ;  Output:
+"RTN","C0CMAIL3",36,0)
+ ;    C0CDATA
+"RTN","C0CMAIL3",37,0)
+ ;      = (BNAM,"NUMBER") = Number of NEW Emails in Basket
+"RTN","C0CMAIL3",38,0)
+ ;        (BNAM,"MSG",C0CIEN,"FROM")=Name
+"RTN","C0CMAIL3",39,0)
+ ;        (BNAM,"MSG",C0CIEN,"TO",n)=DUZ, or EMAIL Address
+"RTN","C0CMAIL3",40,0)
+ ;        (BNAM,"MSG",C0CIEN,"TO NAME",n)=Names or EMAIL Address
+"RTN","C0CMAIL3",41,0)
+ ;        (BNAM,"MSG",C0CIEN,"TITLE")=EMAIL Title
+"RTN","C0CMAIL3",42,0)
+ ;        (BNAM,"MSG",C0CIEN[for File 3.9])=Number of Attachments
+"RTN","C0CMAIL3",43,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"CONT") = Free Text
+"RTN","C0CMAIL3",44,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"LINES") = Number of Lines of Text
+"RTN","C0CMAIL3",45,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"SIZE") = Size of the Message in Bytes
+"RTN","C0CMAIL3",46,0)
+ ;        (BNAM,"MSG",C0CIEN,num,"TXT",LINE#) = Message Data (No Attachment)
+"RTN","C0CMAIL3",47,0)
+ ;   (BNAM,"MSG",C0CIEN,"SEG",NUM) = First Line^Last Line
+"RTN","C0CMAIL3",48,0)
+ ;   (BNAM,"MSG",C0CIEN,"SEG",NUM,"CONT",type) = Message Details
+"RTN","C0CMAIL3",49,0)
+ ;   (BNAM,"MSG",C0CIEN,"SEG",NUM,LINE#) = Message Data
+"RTN","C0CMAIL3",50,0)
+ ; 
+"RTN","C0CMAIL3",51,0)
+ ; DO DETAIL^C0CMAIL(.OUTBF,D0) ; For each Email Message and Attachments
+"RTN","C0CMAIL3",52,0)
+ ;   Input;
+"RTN","C0CMAIL3",53,0)
+ ;     D0     - The IEN for the message in file 3.9, MESSAGE global
+"RTN","C0CMAIL3",54,0)
+ ;   Output
+"RTN","C0CMAIL3",55,0)
+ ;     OUTBF  - The array of your choice to save the expanded and decoded message.
+"RTN","C0CMAIL3",56,0)
+ ; 
+"RTN","C0CMAIL3",57,0)
+GETMSG(C0CDATA,C0CINPUT) ; Common Entry Point for Mailbox Data
+"RTN","C0CMAIL3",58,0)
+ K:'$G(C0CDATA("KEEP")) C0CDATA
+"RTN","C0CMAIL3",59,0)
+ N U
+"RTN","C0CMAIL3",60,0)
+ S U="^"
+"RTN","C0CMAIL3",61,0)
+ D:$G(C0CINPUT)
+"RTN","C0CMAIL3",62,0)
+ . N BF,DUZ,I,INPUT,J,L,LST,MBLST,MALL
+"RTN","C0CMAIL3",63,0)
+ . S INPUT=C0CINPUT
+"RTN","C0CMAIL3",64,0)
+ . S DUZ=+INPUT
+"RTN","C0CMAIL3",65,0)
+ . I $D(^VA(200,DUZ))=0!('$D(^VA(200,DUZ,0)))  D ERROR("ER06")  Q
+"RTN","C0CMAIL3",66,0)
+ . ;
+"RTN","C0CMAIL3",67,0)
+ . D:$D(^XMB(3.7,DUZ,0))#2
+"RTN","C0CMAIL3",68,0)
+ . . S MBLST=$P(INPUT,";",2)
+"RTN","C0CMAIL3",69,0)
+ . . S MALL=$P(INPUT,";",3) ; New or All Mail Flag
+"RTN","C0CMAIL3",70,0)
+ . . S:MALL["*" MALL=99999
+"RTN","C0CMAIL3",71,0)
+ . . ; Only one of these can be correct
+"RTN","C0CMAIL3",72,0)
+ . . D
+"RTN","C0CMAIL3",73,0)
+ . . . ;  If nul, make it "IN" only
+"RTN","C0CMAIL3",74,0)
+ . . . I MBLST="" D  QUIT
+"RTN","C0CMAIL3",75,0)
+ . . . . S MBLST("IN")=0,I=0
+"RTN","C0CMAIL3",76,0)
+ . . . . D GATHER(DUZ,"IN",.LST)
+"RTN","C0CMAIL3",77,0)
+ . . . .QUIT
+"RTN","C0CMAIL3",78,0)
+ . . . ;
+"RTN","C0CMAIL3",79,0)
+ . . . ;  If "*", Get all Mailboxes and look for New Messages
+"RTN","C0CMAIL3",80,0)
+ . . . I MBLST["*" D  QUIT
+"RTN","C0CMAIL3",81,0)
+ . . . . N NAM,NUM
+"RTN","C0CMAIL3",82,0)
+ . . . . S NUM=0
+"RTN","C0CMAIL3",83,0)
+ . . . . F  S NUM=$O(^XMB(3.7,DUZ,2,NUM)) Q:'NUM  D
+"RTN","C0CMAIL3",84,0)
+ . . . . . S NAM=$P(^XMB(3.7,DUZ,2,NUM,0),U)
+"RTN","C0CMAIL3",85,0)
+ . . . . . D GATHER(DUZ,NAM,.LST)
+"RTN","C0CMAIL3",86,0)
+ . . . . .QUIT
+"RTN","C0CMAIL3",87,0)
+ . . . .QUIT
+"RTN","C0CMAIL3",88,0)
+ . . . ;
+"RTN","C0CMAIL3",89,0)
+ . . . ;  If comma separated, look for mailboxes with new messages
+"RTN","C0CMAIL3",90,0)
+ . . . I $L(MBLST,",")>1 D  QUIT
+"RTN","C0CMAIL3",91,0)
+ . . . . S NAM=""
+"RTN","C0CMAIL3",92,0)
+ . . . . N TN,V
+"RTN","C0CMAIL3",93,0)
+ . . . . F TN=1:1:$L(MBLST,",")  S V=$P(MBLST,",",TN)  D
+"RTN","C0CMAIL3",94,0)
+ . . . . . I $L(V) D   QUIT
+"RTN","C0CMAIL3",95,0)
+ . . . . . . I V S NAM=$P($G(^XMB(3.7,DUZ,2,V,0)),U)
+"RTN","C0CMAIL3",96,0)
+ . . . . . . S:NAM="" NAM=V
+"RTN","C0CMAIL3",97,0)
+ . . . . . . D GATHER(DUZ,NAM,.LST)
+"RTN","C0CMAIL3",98,0)
+ . . . . . .QUIT
+"RTN","C0CMAIL3",99,0)
+ . . . . . ;
+"RTN","C0CMAIL3",100,0)
+ . . . . . D ERROR("ER08")
+"RTN","C0CMAIL3",101,0)
+ . . . . .QUIT
+"RTN","C0CMAIL3",102,0)
+ . . . .QUIT
+"RTN","C0CMAIL3",103,0)
+ . . . ;
+"RTN","C0CMAIL3",104,0)
+ . . . ;  If only 1 mailbox named, go get it
+"RTN","C0CMAIL3",105,0)
+ . . . I $L(MBLST)  D   QUIT
+"RTN","C0CMAIL3",106,0)
+ . . . . I $D(^XMB(3.7,DUZ,2,"B",MBLST))    D GATHER(DUZ,MBLST,.LST) QUIT
+"RTN","C0CMAIL3",107,0)
+ . . . . ;
+"RTN","C0CMAIL3",108,0)
+ . . . . D ERROR("ER07")
+"RTN","C0CMAIL3",109,0)
+ . . .QUIT
+"RTN","C0CMAIL3",110,0)
+ . . MERGE C0CDATA=LST
+"RTN","C0CMAIL3",111,0)
+ . .QUIT
+"RTN","C0CMAIL3",112,0)
+ .QUIT
+"RTN","C0CMAIL3",113,0)
+ QUIT
+"RTN","C0CMAIL3",114,0)
+ ;  ===================
+"RTN","C0CMAIL3",115,0)
+GATHER(DUZ,NAM,LST) ; Gather Data about the Baskets and their mail
+"RTN","C0CMAIL3",116,0)
+ N I,J,K,L
+"RTN","C0CMAIL3",117,0)
+ S (I,K)=0
+"RTN","C0CMAIL3",118,0)
+ S J=$O(^XMB(3.7,DUZ,2,"B",NAM,""))
+"RTN","C0CMAIL3",119,0)
+ F  S I=$O(^XMB(3.7,DUZ,2,J,1,I)) Q:'I  D
+"RTN","C0CMAIL3",120,0)
+ . S L=$P(^XMB(3.7,DUZ,2,J,1,I,0),U,3)
+"RTN","C0CMAIL3",121,0)
+ . D   ; :L
+"RTN","C0CMAIL3",122,0)
+ . . S:L K=K+1,LST(NAM,"MSG",I,"NEW")=""  ; Flag NEW emails
+"RTN","C0CMAIL3",123,0)
+ . . S LST(NAM,"MSG",I)=L
+"RTN","C0CMAIL3",124,0)
+ . . D GETTYP(I)
+"RTN","C0CMAIL3",125,0)
+ . .QUIT
+"RTN","C0CMAIL3",126,0)
+ .QUIT
+"RTN","C0CMAIL3",127,0)
+ S LST(NAM,"NUMBER")=K
+"RTN","C0CMAIL3",128,0)
+ QUIT
+"RTN","C0CMAIL3",129,0)
+ ;  ===================
+"RTN","C0CMAIL3",130,0)
+ ; D0 is the IEN into the Message Global ^XMB(3.9,D0)
+"RTN","C0CMAIL3",131,0)
+ ; The products of these emails are scanned to identify
+"RTN","C0CMAIL3",132,0)
+ ;  the number of documents stored in the MIME package.
+"RTN","C0CMAIL3",133,0)
+ ;  The protocol runs like this;
+"RTN","C0CMAIL3",134,0)
+ ; Line 1 is the --separator
+"RTN","C0CMAIL3",135,0)
+ ; Line 2 thru n >Look for Content-[detail type:]Description ; Next CMD
+"RTN","C0CMAIL3",136,0)
+ ; Line n+2 thru t-1 where t does NOT have "Content-"
+"RTN","C0CMAIL3",137,0)
+ ; Line t   is Next Section Terminator, or Message Terminator, --separator
+"RTN","C0CMAIL3",138,0)
+ ; Line t+1 should not exist in the data set if Message Terminator
+"RTN","C0CMAIL3",139,0)
+ ; CON = "Content-"
+"RTN","C0CMAIL3",140,0)
+ ; FLG = "--"
+"RTN","C0CMAIL3",141,0)
+ ; SEP = FLG+7 or more characters  ; Separator
+"RTN","C0CMAIL3",142,0)
+ ; END = SEP+FLG
+"RTN","C0CMAIL3",143,0)
+ ; SGC = Segment Count
+"RTN","C0CMAIL3",144,0)
+ ; Note: separator is a string of specific characters of
+"RTN","C0CMAIL3",145,0)
+ ;        indeterminate length  
+"RTN","C0CMAIL3",146,0)
+ ; LST() the transfer array
+"RTN","C0CMAIL3",147,0)
+ ; LST(NAM,"MSG",C0CIEN,"SEG",SGN)=Starting Line^Ending Line
+"RTN","C0CMAIL3",148,0)
+ ; LST(NAM,"MSG",C0CIEN,"SEG",SGN,1:n)=Decoded Message Data
+"RTN","C0CMAIL3",149,0)
+ ;
+"RTN","C0CMAIL3",150,0)
+GETTYP(D0) ; Look for the goodies in the Mail
+"RTN","C0CMAIL3",151,0)
+ N I,J,N,BCN,CON,CNT,D1,END,FLG,SEP,SGC,XX,XXNM
+"RTN","C0CMAIL3",152,0)
+ S CON="Content-"
+"RTN","C0CMAIL3",153,0)
+ S FLG="--"
+"RTN","C0CMAIL3",154,0)
+ S SEP=""  ; Start SEP as null, so we can use this to help identify the type
+"RTN","C0CMAIL3",155,0)
+ S (BCN,CNT,D1,END,SGC)=0
+"RTN","C0CMAIL3",156,0)
+ S XX=$G(^XMB(3.9,D0,0))
+"RTN","C0CMAIL3",157,0)
+ S LST(NAM,"MSG",D0,"TITLE")=$P($G(^XMB(3.9,D0,0)),U,1)
+"RTN","C0CMAIL3",158,0)
+ S LST(NAM,"MSG",D0,"CREATED")=$G(^XMB(3.9,D0,.6))
+"RTN","C0CMAIL3",159,0)
+ F I=4,2 S XXNM=$P(XX,U,I)  Q:$L(XXNM)
+"RTN","C0CMAIL3",160,0)
+ S LST(NAM,"MSG",D0,"FROM")=$$NAME(XXNM)
+"RTN","C0CMAIL3",161,0)
+ S LST(NAM,"MSG",D0,"SENT")=$$TIME($P(XX,U,3))
+"RTN","C0CMAIL3",162,0)
+ ; Get the folks the email is sent to.
+"RTN","C0CMAIL3",163,0)
+ S D1=0
+"RTN","C0CMAIL3",164,0)
+ F  S D1=$O(^XMB(3.9,D0,1,D1)) Q:'D1  D
+"RTN","C0CMAIL3",165,0)
+ . N T
+"RTN","C0CMAIL3",166,0)
+ . S T=+$G(^XMB(3.9,D0,1,D1,0))
+"RTN","C0CMAIL3",167,0)
+ . S:T T=$P($G(^VA(200,+T,0)),"^")
+"RTN","C0CMAIL3",168,0)
+ . S LST("TO",D1)=T
+"RTN","C0CMAIL3",169,0)
+ . S T=$G(^XMB(3.9,D0,6,D1,0))
+"RTN","C0CMAIL3",170,0)
+ . S:T T=$P($G(^VA(200,+T,0)),"^")
+"RTN","C0CMAIL3",171,0)
+ . S:T="" T="<Unknown>"
+"RTN","C0CMAIL3",172,0)
+ . S LST("TO NAME",D1)=T
+"RTN","C0CMAIL3",173,0)
+ .QUIT
+"RTN","C0CMAIL3",174,0)
+ ; Preload first Segment (0) with beginning on Line 1
+"RTN","C0CMAIL3",175,0)
+ ;  if not a 64bit
+"RTN","C0CMAIL3",176,0)
+ S LST(NAM,"MSG",D0,"SEG",0)=1
+"RTN","C0CMAIL3",177,0)
+ S D1=.9999,SEP="@@"
+"RTN","C0CMAIL3",178,0)
+ F  S D1=$O(^XMB(3.9,D0,2,D1)) Q:'D1  D
+"RTN","C0CMAIL3",179,0)
+ . ; Clear any control characters (cr/lf/ff) off
+"RTN","C0CMAIL3",180,0)
+ . S X=$TR($G(^XMB(3.9,D0,2,D1,0)),$C(10,12,13))
+"RTN","C0CMAIL3",181,0)
+ . ; Enter once to set the SEP to capture the separator
+"RTN","C0CMAIL3",182,0)
+ . I SEP=FLG&($E(X,1,2)=FLG)&($L(X,FLG)=2)&($L($P(X,FLG,2)>5))   D   Q
+"RTN","C0CMAIL3",183,0)
+ . . S SEP=X,END=X_FLG
+"RTN","C0CMAIL3",184,0)
+ . . S (CNT,SGC)=1,BCN=0
+"RTN","C0CMAIL3",185,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC)=D1
+"RTN","C0CMAIL3",186,0)
+ . .QUIT
+"RTN","C0CMAIL3",187,0)
+ . ;
+"RTN","C0CMAIL3",188,0)
+ . ; A new separator is set, process original 
+"RTN","C0CMAIL3",189,0)
+ . I X=SEP  D  QUIT
+"RTN","C0CMAIL3",190,0)
+ . . S LST(NAM,"MSG",D0,SGC,"SIZE")=BCN+$L(BF)
+"RTN","C0CMAIL3",191,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC)=$G(LST(NAM,"MSG",D0,"SEG",SGC))_"^"_(D1-1)
+"RTN","C0CMAIL3",192,0)
+ . . S SGC=SGC+1,BCN=0
+"RTN","C0CMAIL3",193,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC)=D1
+"RTN","C0CMAIL3",194,0)
+ . .QUIT
+"RTN","C0CMAIL3",195,0)
+ . ;
+"RTN","C0CMAIL3",196,0)
+ . S BCN=BCN+$L(X)
+"RTN","C0CMAIL3",197,0)
+ . I X[CON D  Q
+"RTN","C0CMAIL3",198,0)
+ . . S J=$P($P(X,";"),CON,2)
+"RTN","C0CMAIL3",199,0)
+ . . S LST(NAM,"MSG",D0,"SEG",SGC,"CONT",CNT,$P(J,":"))=$P(J,":",2)
+"RTN","C0CMAIL3",200,0)
+ . .QUIT
+"RTN","C0CMAIL3",201,0)
+ . ;
+"RTN","C0CMAIL3",202,0)
+ . ; S LST(NAM,"MSG",D0,"SEG",D1)=X
+"RTN","C0CMAIL3",203,0)
+ .QUIT
+"RTN","C0CMAIL3",204,0)
+ QUIT
+"RTN","C0CMAIL3",205,0)
+ ;  ===================
+"RTN","C0CMAIL3",206,0)
+NAME(NM) ; Return the name of the Sender
+"RTN","C0CMAIL3",207,0)
+ N NAME
+"RTN","C0CMAIL3",208,0)
+ S NAME="<Unknown Sender>"
+"RTN","C0CMAIL3",209,0)
+ D
+"RTN","C0CMAIL3",210,0)
+ . ; Look first for a value to use with the NEW PERSON file
+"RTN","C0CMAIL3",211,0)
+ . ;
+"RTN","C0CMAIL3",212,0)
+ . I NM=+NM S NAME=$P(^VA(200,NM,0),U,1) Q
+"RTN","C0CMAIL3",213,0)
+ . ;
+"RTN","C0CMAIL3",214,0)
+ . I $L(NM) S NAME=NM                    Q
+"RTN","C0CMAIL3",215,0)
+ . ;
+"RTN","C0CMAIL3",216,0)
+ . ; Else, pull the data from the message and display the foreign source
+"RTN","C0CMAIL3",217,0)
+ . ;   of the message.
+"RTN","C0CMAIL3",218,0)
+ . N T
+"RTN","C0CMAIL3",219,0)
+ . S VAL=$G(^XMB(3.9,D0,.7))
+"RTN","C0CMAIL3",220,0)
+ . S:VAL T=$P(^VA(200,VAL,0),U)
+"RTN","C0CMAIL3",221,0)
+ . I $L($G(T)) S NAME=T                  Q
+"RTN","C0CMAIL3",222,0)
+ . ;
+"RTN","C0CMAIL3",223,0)
+ .QUIT
+"RTN","C0CMAIL3",224,0)
+ QUIT NAME
+"RTN","C0CMAIL3",225,0)
+ ;  ===================
+"RTN","C0CMAIL3",226,0)
+TIME(Y) ; The time and date of the sending
+"RTN","C0CMAIL3",227,0)
+ X ^DD("DD")
+"RTN","C0CMAIL3",228,0)
+ QUIT Y
+"RTN","C0CMAIL3",229,0)
+ ;  ===================
+"RTN","C0CMAIL3",230,0)
+ ;  Segments in Message need to be identified and decoded properly
+"RTN","C0CMAIL3",231,0)
+ ; D DETAIL^C0CMAIL(.ARRAY,D0) ;  Call One for each message
+"RTN","C0CMAIL3",232,0)
+ ;   ARRAY will have the details of this one call
+"RTN","C0CMAIL3",233,0)
+ ;    
+"RTN","C0CMAIL3",234,0)
+ ; Inputs;
+"RTN","C0CMAIL3",235,0)
+ ;   C0CINPUT    - The IEN of the message to expand
+"RTN","C0CMAIL3",236,0)
+ ; Outputs;
+"RTN","C0CMAIL3",237,0)
+ ;   C0CDATA     - Carrier for the returned structure of the Message
+"RTN","C0CMAIL3",238,0)
+ ;  C0CDATA(D0,"SEG")=number of SEGMENTS
+"RTN","C0CMAIL3",239,0)
+ ;  C0CDATA(D0,"SEG",0:n)=SEGMENT n details; First;Last;Type
+"RTN","C0CMAIL3",240,0)
+ ;  C0CDATA(D0,"SEG",0:n,"CONTENT",type)=Content details
+"RTN","C0CMAIL3",241,0)
+ ;  C0CDATA(D0,"SEG",0:n,"MSG",D3)=Content details
+"RTN","C0CMAIL3",242,0)
+ ;  C0CDATA(D0,"SEG",0:n,"HTML",D3)=Content details
+"RTN","C0CMAIL3",243,0)
+ ;
+"RTN","C0CMAIL3",244,0)
+DETAIL(C0CDATA,C0CINPUT) ; Message Detail Delivery
+"RTN","C0CMAIL3",245,0)
+ N LST,D0,D1,U
+"RTN","C0CMAIL3",246,0)
+ S U="^"
+"RTN","C0CMAIL3",247,0)
+ S D0=+$G(C0CINPUT)
+"RTN","C0CMAIL3",248,0)
+ I D0   D    QUIT
+"RTN","C0CMAIL3",249,0)
+ . I $D(^XMB(3.9,D0))<10 D ERROR("ER01")  QUIT
+"RTN","C0CMAIL3",250,0)
+ . ;
+"RTN","C0CMAIL3",251,0)
+ . D GETTYP2(D0)
+"RTN","C0CMAIL3",252,0)
+ . I $D(LST)   M C0CDATA(D0)=LST  Q
+"RTN","C0CMAIL3",253,0)
+ . ;
+"RTN","C0CMAIL3",254,0)
+ . D ERROR("ER02")
+"RTN","C0CMAIL3",255,0)
+ .QUIT
+"RTN","C0CMAIL3",256,0)
+ QUIT
+"RTN","C0CMAIL3",257,0)
+ ;  ===================
+"RTN","C0CMAIL3",258,0)
+ ;  End note if needed
+"RTN","C0CMAIL3",259,0)
+ ; MSK   - Set of characters that do not exist in 64 bit encoding
+"RTN","C0CMAIL3",260,0)
+GETTYP2(D0) ; Try to get the types and MSK for the 
+"RTN","C0CMAIL3",261,0)
+ N I,J,K,N,BCN,BF,CON,CNT,D1,END,FLG,MSK,SEP,SGC,U,XX,ZN,XXNM
+"RTN","C0CMAIL3",262,0)
+ S CON="Content-",U="^"
+"RTN","C0CMAIL3",263,0)
+ S FLG="--",MSK=" !""#$%&'()*,-.:;<>?@[\]^_`{|}~"
+"RTN","C0CMAIL3",264,0)
+ S (BF,SEP)=""  ; Start SEP as null, so we can use this to help identify the type
+"RTN","C0CMAIL3",265,0)
+ S (BCN,CNT,D1,END,SGC)=0
+"RTN","C0CMAIL3",266,0)
+ S XX=$G(^XMB(3.9,D0,0))
+"RTN","C0CMAIL3",267,0)
+ ; S K=$P(^XMB(3.9,D0,2,0),U,3)
+"RTN","C0CMAIL3",268,0)
+ S LST("TITLE")=$P($G(^XMB(3.9,D0,0)),U,1)
+"RTN","C0CMAIL3",269,0)
+ S LST("CREATED")=$$TIME($P(XX,U,3))
+"RTN","C0CMAIL3",270,0)
+ F I=4,2 S XXNM=$P(XX,U,I)  Q:$L(XXNM)
+"RTN","C0CMAIL3",271,0)
+ S LST("FROM")=$$NAME(XXNM)
+"RTN","C0CMAIL3",272,0)
+ ; Get the folks the email is sent to.
+"RTN","C0CMAIL3",273,0)
+ S D1=0
+"RTN","C0CMAIL3",274,0)
+ F  S D1=$O(^XMB(3.9,D0,1,D1)) Q:'D1  D   Q:D1=""
+"RTN","C0CMAIL3",275,0)
+ . N I,T
+"RTN","C0CMAIL3",276,0)
+ . S T=$P($G(^XMB(3.9,D0,1,D1,0)),U)
+"RTN","C0CMAIL3",277,0)
+ . S:T T=$P($G(^VA(200,T,0)),"^")
+"RTN","C0CMAIL3",278,0)
+ . S LST("TO",+D1)=T
+"RTN","C0CMAIL3",279,0)
+ . S T=$G(^XMB(3.9,D0,6,+D1,0))
+"RTN","C0CMAIL3",280,0)
+ . S:T="" T=$P($G(^VA(200,+T,0)),"^")
+"RTN","C0CMAIL3",281,0)
+ . S:T="" T="<Unknown>"
+"RTN","C0CMAIL3",282,0)
+ . S LST("TO NAME",D1)=T
+"RTN","C0CMAIL3",283,0)
+ .QUIT
+"RTN","C0CMAIL3",284,0)
+ ; Get the Header for the message and store as "HDR"
+"RTN","C0CMAIL3",285,0)
+ S D1=0,SGC=0
+"RTN","C0CMAIL3",286,0)
+ F I=1:1 S D1=$O(^XMB(3.9,D0,2,D1)) Q:D1=""  Q:(D1>.99999)   D
+"RTN","C0CMAIL3",287,0)
+ . S LST("HDR",I)=$G(^XMB(3.9,D0,2,D1,0))
+"RTN","C0CMAIL3",288,0)
+ .QUIT
+"RTN","C0CMAIL3",289,0)
+ N BNDRY,STKL,SEG
+"RTN","C0CMAIL3",290,0)
+ S STKL=0,SEG=0
+"RTN","C0CMAIL3",291,0)
+ ; Find boundaries and map them
+"RTN","C0CMAIL3",292,0)
+ S D1=0
+"RTN","C0CMAIL3",293,0)
+ F  S D1=$O(^XMB(3.9,D0,2,D1)) Q:'D1  D
+"RTN","C0CMAIL3",294,0)
+ . ; Clear any control characters (cr/lf/ff) off
+"RTN","C0CMAIL3",295,0)
+ . S X=$TR($G(^XMB(3.9,D0,2,D1,0)),$C(10,12,13))
+"RTN","C0CMAIL3",296,0)
+ . ; Look for " boundary=" in the various parts.  Map the establishment and the 
+"RTN","C0CMAIL3",297,0)
+ . ;  terminator markers and the actual boundary markers.
+"RTN","C0CMAIL3",298,0)
+ . I X[" boundary=" D  Q
+"RTN","C0CMAIL3",299,0)
+ . . S SEP=$P(X," boundary=",2)
+"RTN","C0CMAIL3",300,0)
+ . . S:$E(SEP)="""" SEP=$TR(SEP,"""")
+"RTN","C0CMAIL3",301,0)
+ . . S STKL=STKL+1
+"RTN","C0CMAIL3",302,0)
+ . . S END=SEP_FLG
+"RTN","C0CMAIL3",303,0)
+ . . S BNDRY(STKL,SEP)=0
+"RTN","C0CMAIL3",304,0)
+ . . S BNDRX(SEP)=STKL,BNDRZ(END)=0
+"RTN","C0CMAIL3",305,0)
+ . .QUIT
+"RTN","C0CMAIL3",306,0)
+ . ;
+"RTN","C0CMAIL3",307,0)
+ . ; Look for information as to how amy boudaries are present and where
+"RTN","C0CMAIL3",308,0)
+ . ;   they terminate
+"RTN","C0CMAIL3",309,0)
+ . D:X'=""&($E(X,1,2)="--")&($E(X,$L(X)-1,9999)'="--")
+"RTN","C0CMAIL3",310,0)
+ . . ; Boundary Found
+"RTN","C0CMAIL3",311,0)
+ . . I $D(BNDRX(X)) D  Q
+"RTN","C0CMAIL3",312,0)
+ . . . S SEG=SEG+1
+"RTN","C0CMAIL3",313,0)
+ . . . S BNDRE(X)=$G(BNDRE(X))_D1_";"
+"RTN","C0CMAIL3",314,0)
+ . . . S BND1(D1)=STKL_";B;"_SEG_";"_X
+"RTN","C0CMAIL3",315,0)
+ . . . S BNDR(X,D1,"B")=STKL
+"RTN","C0CMAIL3",316,0)
+ . . . I BNDRX(X)=X  D ERROR("ER13")
+"RTN","C0CMAIL3",317,0)
+ . . .QUIT
+"RTN","C0CMAIL3",318,0)
+ . . ;
+"RTN","C0CMAIL3",319,0)
+ . . ; Boundary Terminator
+"RTN","C0CMAIL3",320,0)
+ . . I $D(BNDRZ(X)) D  Q
+"RTN","C0CMAIL3",321,0)
+ . . . S BNDR(X,D1,"E")=STKL
+"RTN","C0CMAIL3",322,0)
+ . . . S BNDRZ(X)=BNDRZ(X)+1
+"RTN","C0CMAIL3",323,0)
+ . . . S BND1(D1)=STKL_";E;"_SEG_";"_X
+"RTN","C0CMAIL3",324,0)
+ . . . S SEG=SEG+1
+"RTN","C0CMAIL3",325,0)
+ . . . I BNDRX(X)=X  D ERROR("ER14")
+"RTN","C0CMAIL3",326,0)
+ . . . S STKL=STKL-1
+"RTN","C0CMAIL3",327,0)
+ . . .QUIT
+"RTN","C0CMAIL3",328,0)
+ . .QUIT
+"RTN","C0CMAIL3",329,0)
+ .QUIT
+"RTN","C0CMAIL3",330,0)
+ ; Start walking the TEXT/XML/64-BIT ENCODING sections of the message
+"RTN","C0CMAIL3",331,0)
+ N A,B,C,STACK,STYP,SEG,AX
+"RTN","C0CMAIL3",332,0)
+ S D1=.99999,SGC=0
+"RTN","C0CMAIL3",333,0)
+ F  S D1=$O(^XMB(3.9,D0,2,D1)) Q:'D1  D
+"RTN","C0CMAIL3",334,0)
+ . ; Clear any control characters (cr/lf/ff) off
+"RTN","C0CMAIL3",335,0)
+ . S X=$TR($G(^XMB(3.9,D0,2,D1,0)),$C(10,12,13))
+"RTN","C0CMAIL3",336,0)
+ . ;
+"RTN","C0CMAIL3",337,0)
+ . D
+"RTN","C0CMAIL3",338,0)
+ . . I $D(BND1(D1)) D BOUNDARY(X)    QUIT
+"RTN","C0CMAIL3",339,0)
+ . . ;
+"RTN","C0CMAIL3",340,0)
+ . . S DX=$O(BND1(D1))
+"RTN","C0CMAIL3",341,0)
+ . . I DX=""  D ERROR("ER15")   Q
+"RTN","C0CMAIL3",342,0)
+ . . ;
+"RTN","C0CMAIL3",343,0)
+ . . ; Good situation, extract the parts for the section
+"RTN","C0CMAIL3",344,0)
+ . . S A=$G(BND1(DX))
+"RTN","C0CMAIL3",345,0)
+ . . S STACK=+A,STYP=$P(A,";",2),SGC=$P(A,";",3),AX=$P(A,";",4,999)
+"RTN","C0CMAIL3",346,0)
+ . .QUIT
+"RTN","C0CMAIL3",347,0)
+ . ; Enter once to set the SEP to capture the separator
+"RTN","C0CMAIL3",348,0)
+ . ;
+"RTN","C0CMAIL3",349,0)
+ . ; A new SEGMENT separator is set, process original 
+"RTN","C0CMAIL3",350,0)
+ . I $D(BND1(X))  D  QUIT
+"RTN","C0CMAIL3",351,0)
+ . . ; Save Current Values
+"RTN","C0CMAIL3",352,0)
+ . . S LST("SEG",SGC,"SIZE")=BCN+$L(BF)
+"RTN","C0CMAIL3",353,0)
+ . . ;  Close this Segment and prepare to start a New Segment
+"RTN","C0CMAIL3",354,0)
+ . . S $P(LST("SEG",SGC),"^",1,2)=$P($G(LST("SEG",SGC)),"^",1)_"^"_(D1-1)
+"RTN","C0CMAIL3",355,0)
+ . . ;  Put the result in LST("SEG",SGC,"XML")
+"RTN","C0CMAIL3",356,0)
+ . . I $L(BF) D
+"RTN","C0CMAIL3",357,0)
+ . . . S ZN=1
+"RTN","C0CMAIL3",358,0)
+ . . . N I,T,TBF
+"RTN","C0CMAIL3",359,0)
+ . . . S TBF=BF
+"RTN","C0CMAIL3",360,0)
+ . . . F I=1:1:($L(TBF,"="))  D
+"RTN","C0CMAIL3",361,0)
+ . . . . S BF=$P(TBF,"=",I)_"="
+"RTN","C0CMAIL3",362,0)
+ . . . . I "="'[BF  D DECODER(.BF,.TYP)
+"RTN","C0CMAIL3",363,0)
+ . . . .QUIT
+"RTN","C0CMAIL3",364,0)
+ . . . S BF=""
+"RTN","C0CMAIL3",365,0)
+ . . .QUIT
+"RTN","C0CMAIL3",366,0)
+ . . S SGC=SGC+1,BCN=0
+"RTN","C0CMAIL3",367,0)
+ . . ; Incriment SGC to start a new Segment
+"RTN","C0CMAIL3",368,0)
+ . . S LST("SEG",SGC)=D1
+"RTN","C0CMAIL3",369,0)
+ . .QUIT
+"RTN","C0CMAIL3",370,0)
+ . ;
+"RTN","C0CMAIL3",371,0)
+ . ; Accumulate the 64 bit encoding, no spaces, or other non-64bit characters
+"RTN","C0CMAIL3",372,0)
+ . I X=$TR(X,MSK)&$L(X)  S BF=BF_X  QUIT
+"RTN","C0CMAIL3",373,0)
+ . ;
+"RTN","C0CMAIL3",374,0)
+ . ; Ending Condition, close out the Segment
+"RTN","C0CMAIL3",375,0)
+ . I $D(BNDRZ(X)) D  QUIT
+"RTN","C0CMAIL3",376,0)
+ . . S $P(LST("SEG",SGC),"^",2)=D1-1
+"RTN","C0CMAIL3",377,0)
+ . . I $L(BF) S ZN=1 D DECODER(.BF,.TYP)  S BF="" Q
+"RTN","C0CMAIL3",378,0)
+ . .QUIT
+"RTN","C0CMAIL3",379,0)
+ . ;
+"RTN","C0CMAIL3",380,0)
+ . ; Accumulate the content lines of the message
+"RTN","C0CMAIL3",381,0)
+ . S BCN=BCN+$L(X)
+"RTN","C0CMAIL3",382,0)
+ . ; Split out the Content Info
+"RTN","C0CMAIL3",383,0)
+ . I X[CON D  Q
+"RTN","C0CMAIL3",384,0)
+ . . S J=$P(X,CON,2)
+"RTN","C0CMAIL3",385,0)
+ . . S TYP="CONTENT"
+"RTN","C0CMAIL3",386,0)
+ . . S LST("SEG",SGC,TYP,$P(J,":"))=$P(J,":",2,9)
+"RTN","C0CMAIL3",387,0)
+ . . D CONTENT(D1)
+"RTN","C0CMAIL3",388,0)
+ . .QUIT
+"RTN","C0CMAIL3",389,0)
+ . ;
+"RTN","C0CMAIL3",390,0)
+ . ; Everything else is Text, Check for CCR/CCD.
+"RTN","C0CMAIL3",391,0)
+ . N KK,UBF
+"RTN","C0CMAIL3",392,0)
+ . D
+"RTN","C0CMAIL3",393,0)
+ . . S UBF=$$UPPER(X)
+"RTN","C0CMAIL3",394,0)
+ . . I UBF["<CONTINUITYOFCARERECORD"   S $P(LST("SEG",SGC),U,3)="CCR" Q
+"RTN","C0CMAIL3",395,0)
+ . . ;
+"RTN","C0CMAIL3",396,0)
+ . . I UBF["<CLINICALDOCUMENT"         S $P(LST("SEG",SGC),U,3)="CCD" Q
+"RTN","C0CMAIL3",397,0)
+ . .QUIT
+"RTN","C0CMAIL3",398,0)
+ . ; Look for directives in the text before it gets published
+"RTN","C0CMAIL3",399,0)
+ . ;  Look for "=3D" and replace it with a single "=".  I can do more parsing
+"RTN","C0CMAIL3",400,0)
+ . ;  but there may be situations where the line has been wrapped.
+"RTN","C0CMAIL3",401,0)
+ . D:X["=3D"
+"RTN","C0CMAIL3",402,0)
+ . . F KK=1:1 S X=$P(X,"=3D",1)_"="_$P(X,"=3D",2,999) Q:X'["=3D"
+"RTN","C0CMAIL3",403,0)
+ . .QUIT
+"RTN","C0CMAIL3",404,0)
+ . S LST("SEG",SGC,TYP,D1)=X
+"RTN","C0CMAIL3",405,0)
+ .QUIT
+"RTN","C0CMAIL3",406,0)
+ QUIT
+"RTN","C0CMAIL3",407,0)
+ ;  ===================
+"RTN","C0CMAIL3",408,0)
+CONTENT(D1) ; Try pulling Content Statements
+"RTN","C0CMAIL3",409,0)
+ N J,UP,X
+"RTN","C0CMAIL3",410,0)
+ S X=$G(^XMB(3.9,D0,2,D1,0))
+"RTN","C0CMAIL3",411,0)
+ S J=$P(X,CON,2)
+"RTN","C0CMAIL3",412,0)
+ S UP=$TR($$UPPER(X),"""")
+"RTN","C0CMAIL3",413,0)
+ S:$G(TYP)="" TYP="TXT"
+"RTN","C0CMAIL3",414,0)
+ D
+"RTN","C0CMAIL3",415,0)
+ . I UP["NAME=",($L(UP,".")>1) S TYP=$P(UP,".",2) Q
+"RTN","C0CMAIL3",416,0)
+ . I UP["XML" S TYP="XML"                         Q
+"RTN","C0CMAIL3",417,0)
+ . I UP["P7S" S TYP="P7S"                         Q
+"RTN","C0CMAIL3",418,0)
+ . I J[" boundary=" D BOUNDARY(J)
+"RTN","C0CMAIL3",419,0)
+ .QUIT
+"RTN","C0CMAIL3",420,0)
+ S LIS("CON",SGC,D1)=X
+"RTN","C0CMAIL3",421,0)
+ S LIS("CON",SGC,D1,"TYP")=TYP
+"RTN","C0CMAIL3",422,0)
+ ; If there is a follow-on, look for another line after this.
+"RTN","C0CMAIL3",423,0)
+ I $E($RE(X),1)=";"   D CONTENT(D1+1)
+"RTN","C0CMAIL3",424,0)
+ QUIT
+"RTN","C0CMAIL3",425,0)
+ ;  ===================
+"RTN","C0CMAIL3",426,0)
+BOUNDARY(X) ; Set an additional BOUNDARY, and activate another stack level
+"RTN","C0CMAIL3",427,0)
+ S SEP=$P($P(X," boundary=",2),"""",2),END=SEP_FLG
+"RTN","C0CMAIL3",428,0)
+ Q:SEP?2"-".ANP
+"RTN","C0CMAIL3",429,0)
+ ;
+"RTN","C0CMAIL3",430,0)
+ D ERROR("ER11")
+"RTN","C0CMAIL3",431,0)
+ Q:SEP'[" "
+"RTN","C0CMAIL3",432,0)
+ ;
+"RTN","C0CMAIL3",433,0)
+ D ERROR("ER12")
+"RTN","C0CMAIL3",434,0)
+ QUIT
+"RTN","C0CMAIL3",435,0)
+ ;  ===================
+"RTN","C0CMAIL3",436,0)
+ ; Break down the Buffer Array so it can be saved.
+"RTN","C0CMAIL3",437,0)
+ ;  BF is passed in.
+"RTN","C0CMAIL3",438,0)
+ ;  TYP is the type of 
+"RTN","C0CMAIL3",439,0)
+DECODER(BF,TYP) ; 
+"RTN","C0CMAIL3",440,0)
+ N RCNT,TBF,UBF,ZBF,ZI,ZJ,ZK,ZSIZE
+"RTN","C0CMAIL3",441,0)
+ S:$G(TYP)="" TYP="XML"
+"RTN","C0CMAIL3",442,0)
+ S ZBF=BF
+"RTN","C0CMAIL3",443,0)
+ ;  Full Buffer, BF, now check for Encryption and Unpack
+"RTN","C0CMAIL3",444,0)
+ F RCNT=1:1:$L(ZBF,"=")   D
+"RTN","C0CMAIL3",445,0)
+ . N BF
+"RTN","C0CMAIL3",446,0)
+ . S BF=$P(ZBF,"=",RCNT)
+"RTN","C0CMAIL3",447,0)
+ . ;  Unpacking the 64 bit encoding
+"RTN","C0CMAIL3",448,0)
+ . S TBF=$TR($$DECODE^RGUTUU(BF),$C(10,12,13))
+"RTN","C0CMAIL3",449,0)
+ . D:$L(TBF)
+"RTN","C0CMAIL3",450,0)
+ . . N C,OK,OKCNT,KK,XBF,UBF
+"RTN","C0CMAIL3",451,0)
+ . . D
+"RTN","C0CMAIL3",452,0)
+ . . . S UBF=$$UPPER(TBF)
+"RTN","C0CMAIL3",453,0)
+ . . . I UBF["<CONTINUITYOFCARERECORD XMLNS=" S $P(LST("SEG",SGC),U,3)="CCR" Q
+"RTN","C0CMAIL3",454,0)
+ . . . ;
+"RTN","C0CMAIL3",455,0)
+ . . . I UBF["<CLINICALDOCUMENT XMLNS="       S $P(LST("SEG",SGC),U,3)="CCD" Q
+"RTN","C0CMAIL3",456,0)
+ . . .QUIT
+"RTN","C0CMAIL3",457,0)
+ . . ; Check for Bad Signature Decoding, after 100 bad characters
+"RTN","C0CMAIL3",458,0)
+ . . S OK=1,OKCNT=0
+"RTN","C0CMAIL3",459,0)
+ . . F KK=1:1:$L(UBF) S C=$A(UBF,KK) S:C>126 OKCNT=OKCNT+1 I OKCNT>100 S OK=0 Q
+"RTN","C0CMAIL3",460,0)
+ . . ;
+"RTN","C0CMAIL3",461,0)
+ . . D
+"RTN","C0CMAIL3",462,0)
+ . . . I 'OK S (BF,UBF,TBF,XBF)="<Crypto-Signature redacted>" Q
+"RTN","C0CMAIL3",463,0)
+ . . . ;
+"RTN","C0CMAIL3",464,0)
+ . . . S BF=BF_"="
+"RTN","C0CMAIL3",465,0)
+ . . . D NORMAL(.XBF,.TBF)
+"RTN","C0CMAIL3",466,0)
+ . . .QUIT
+"RTN","C0CMAIL3",467,0)
+ . . M LST("SEG",SGC,TYP,RCNT)=XBF
+"RTN","C0CMAIL3",468,0)
+ . .QUIT
+"RTN","C0CMAIL3",469,0)
+ .QUIT
+"RTN","C0CMAIL3",470,0)
+ QUIT
+"RTN","C0CMAIL3",471,0)
+ ;  ===================
+"RTN","C0CMAIL3",472,0)
+ ;  OUTXML = OUTBF  = OUT   = OUTPUT ARRAY TO BE BUILT
+"RTN","C0CMAIL3",473,0)
+ ;  BF     = INXML = INPUT ARRAY TO PROVIDE INPUT
+"RTN","C0CMAIL3",474,0)
+ ;   >D NORMAL^C0CMAIL(.OUT,BF)
+"RTN","C0CMAIL3",475,0)
+NORMAL(OUTXML,INXML)    ;NORMALIZES AN XML STRING PASSED BY NAME IN INXML
+"RTN","C0CMAIL3",476,0)
+ ; INTO AN XML ARRAY RETURNED IN OUTXML, ALSO PASSED BY NAME
+"RTN","C0CMAIL3",477,0)
+ ;
+"RTN","C0CMAIL3",478,0)
+ N ZN,OUTBF,XX,ZSEP
+"RTN","C0CMAIL3",479,0)
+ S INXML=$TR(INXML,$C(10,12,13))
+"RTN","C0CMAIL3",480,0)
+ S ZN=1,ZSEP=">"
+"RTN","C0CMAIL3",481,0)
+ S OUTBF(1)=$P(INXML,"><",1)_ZSEP,XX="<"_$P(INXML,"><",2)_ZSEP,ZN=2,ZL=1
+"RTN","C0CMAIL3",482,0)
+ F ZN=ZN+1:1:$L(INXML,"><")  D   Q:XX=""
+"RTN","C0CMAIL3",483,0)
+ . S XX=$P(INXML,"><",ZN)
+"RTN","C0CMAIL3",484,0)
+ . S:$E($RE(XX))=">" ZSEP=""
+"RTN","C0CMAIL3",485,0)
+ . Q:XX=""
+"RTN","C0CMAIL3",486,0)
+ . ;
+"RTN","C0CMAIL3",487,0)
+ . S XX="<"_XX_ZSEP
+"RTN","C0CMAIL3",488,0)
+ . D
+"RTN","C0CMAIL3",489,0)
+ . . I $L(XX)<4000 S OUTBF(ZL)=XX,XX=$P(INXML,"><",ZN),ZL=ZL+1   Q
+"RTN","C0CMAIL3",490,0)
+ . . ;
+"RTN","C0CMAIL3",491,0)
+ . . D ERROR("ER05")
+"RTN","C0CMAIL3",492,0)
+ . . F ZL=ZL+1:1 D   Q:XX=""
+"RTN","C0CMAIL3",493,0)
+ . . .  N XL
+"RTN","C0CMAIL3",494,0)
+ . . .  S XL=$E(XX,1,4000)
+"RTN","C0CMAIL3",495,0)
+ . . .  S $E(XX,1,4000)=""   ; S XX=$E(XX,4001,999999) ; Remove 4K characters
+"RTN","C0CMAIL3",496,0)
+ . . .  S OUTBF(ZL)=XL
+"RTN","C0CMAIL3",497,0)
+ . . .QUIT
+"RTN","C0CMAIL3",498,0)
+ . .QUIT
+"RTN","C0CMAIL3",499,0)
+ .QUIT
+"RTN","C0CMAIL3",500,0)
+ M OUTXML=OUTBF
+"RTN","C0CMAIL3",501,0)
+ QUIT
+"RTN","C0CMAIL3",502,0)
+ ;  ===================
+"RTN","C0CMAIL3",503,0)
+UPPER(X) ; Convert any lowercase letters to Uppercase letters
+"RTN","C0CMAIL3",504,0)
+ QUIT $TR(X,"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ")
+"RTN","C0CMAIL3",505,0)
+ ;  ===================
+"RTN","C0CMAIL3",506,0)
+ ; EN is a counter that remains between error events
+"RTN","C0CMAIL3",507,0)
+ERROR(ER) ; Error Handler
+"RTN","C0CMAIL3",508,0)
+ N TXXQ,XXXQ
+"RTN","C0CMAIL3",509,0)
+ S XXXQ="Unknown Error Encountered = "_ER
+"RTN","C0CMAIL3",510,0)
+ S TXXQ=$P($T(@(ER_"^"_$T(+0))),";;",2,99)
+"RTN","C0CMAIL3",511,0)
+ I TXXQ'=""  D
+"RTN","C0CMAIL3",512,0)
+ . I TXXQ["_" X "S TXXQ="_TXXQ
+"RTN","C0CMAIL3",513,0)
+ . S XXXQ=TXXQ
+"RTN","C0CMAIL3",514,0)
+ .QUIT
+"RTN","C0CMAIL3",515,0)
+ S EN(ER)=$G(EN(ER))+1
+"RTN","C0CMAIL3",516,0)
+ S LST("ERR",ER,EN(ER))=XXXQ
+"RTN","C0CMAIL3",517,0)
+ QUIT
+"RTN","C0CMAIL3",518,0)
+ ;  ===================
+"RTN","C0CMAIL3",519,0)
+ER01 ;;Message Missing
+"RTN","C0CMAIL3",520,0)
+ER02 ;;Message Text Missing
+"RTN","C0CMAIL3",521,0)
+ER03 ;;Message Not Identifiable
+"RTN","C0CMAIL3",522,0)
+ER04 ;;Segment is too large
+"RTN","C0CMAIL3",523,0)
+ER05 ;;Mailbox Missing
+"RTN","C0CMAIL3",524,0)
+ER06 ;;"User Missing = "_$G(DUZ)
+"RTN","C0CMAIL3",525,0)
+ER07 ;;"Bad DUZ = "_DUZ
+"RTN","C0CMAIL3",526,0)
+ER08 ;;"Bad Basket ID = "_MBLST_" >> "_$G(TN)
+"RTN","C0CMAIL3",527,0)
+ER10 ;;"Bad Separator found = "_X
+"RTN","C0CMAIL3",528,0)
+ER11 ;;"Non-Standard Separator Found:>"_$G(J)
+"RTN","C0CMAIL3",529,0)
+ER12 ;;"Spaces are not allowed in Separators:>"_$G(J)
+"RTN","C0CMAIL3",530,0)
+ER13 ;;"Bad Stack Level Detected >"_STKL_":"_BNDRY(X)_":"_X
+"RTN","C0CMAIL3",531,0)
+ ;  vvvvvvvvvvvvvvv  Not Needed  vvvvvvvvvvvvvvvvvvvvvvvvvv
+"RTN","C0CMAIL3",532,0)
+ ;  End note if needed
+"RTN","C0CMAIL3",533,0)
+ QUIT
+"RTN","C0CMAIL3",534,0)
+ ;  ===================
+"RTN","C0CMCCD")
+0^84^B73168233
+"RTN","C0CMCCD",1,0)
+C0CMCCD   ; GPL - MXML based CCD utilities;12/04/09  17:05
+"RTN","C0CMCCD",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMCCD",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CMCCD",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CMCCD",5,0)
+ ;
+"RTN","C0CMCCD",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CMCCD",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CMCCD",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMCCD",9,0)
+ ;(at your option) any later version.
+"RTN","C0CMCCD",10,0)
+ ;
+"RTN","C0CMCCD",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CMCCD",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMCCD",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMCCD",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CMCCD",15,0)
+ ;
+"RTN","C0CMCCD",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CMCCD",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMCCD",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMCCD",19,0)
+ ;
+"RTN","C0CMCCD",20,0)
+ Q
+"RTN","C0CMCCD",21,0)
+ ;
+"RTN","C0CMCCD",22,0)
+PARSCCD(DOC,OPTION) ; THIS WAS COPIED FROM EN^MXMLDOM TO CUSTIMIZE FOR 
+"RTN","C0CMCCD",23,0)
+ ; PROCESSING CCDS 
+"RTN","C0CMCCD",24,0)
+ N CBK,SUCCESS,LEVEL,NODE,HANDLE
+"RTN","C0CMCCD",25,0)
+ K ^TMP("MXMLERR",$J)
+"RTN","C0CMCCD",26,0)
+ L +^TMP("MXMLDOM",$J):5
+"RTN","C0CMCCD",27,0)
+ E  Q 0
+"RTN","C0CMCCD",28,0)
+ S HANDLE=$O(^TMP("MXMLDOM",$J,""),-1)+1,^(HANDLE)=""
+"RTN","C0CMCCD",29,0)
+ L -^TMP("MXMLDOM",$J)
+"RTN","C0CMCCD",30,0)
+ S CBK("STARTELEMENT")="STARTELE^C0CMCCD" ; ONLY THIS ONE IS CHANGED ;GPL
+"RTN","C0CMCCD",31,0)
+ S CBK("ENDELEMENT")="ENDELE^MXMLDOM"
+"RTN","C0CMCCD",32,0)
+ S CBK("COMMENT")="COMMENT^MXMLDOM"
+"RTN","C0CMCCD",33,0)
+ S CBK("CHARACTERS")="CHAR^MXMLDOM"
+"RTN","C0CMCCD",34,0)
+ S CBK("ENDDOCUMENT")="ENDDOC^MXMLDOM"
+"RTN","C0CMCCD",35,0)
+ S CBK("ERROR")="ERROR^MXMLDOM"
+"RTN","C0CMCCD",36,0)
+ S (SUCCESS,LEVEL,LEVEL(0),NODE)=0,OPTION=$G(OPTION,"V1")
+"RTN","C0CMCCD",37,0)
+ D EN^MXMLPRSE(DOC,.CBK,OPTION)
+"RTN","C0CMCCD",38,0)
+ D:'SUCCESS DELETE^MXMLDOM(HANDLE)
+"RTN","C0CMCCD",39,0)
+ Q $S(SUCCESS:HANDLE,1:0)
+"RTN","C0CMCCD",40,0)
+ ; Start element
+"RTN","C0CMCCD",41,0)
+ ; Create new child node and push info on stack
+"RTN","C0CMCCD",42,0)
+STARTELE(ELE,ATTR) ; COPIED FROM STARTELE^MXMLDOM AND MODIFIED TO TREAT
+"RTN","C0CMCCD",43,0)
+ ; ATTRIBUTES AS SUBELEMENTS TO MAKE CCD XPATH PROCESSING EASIER
+"RTN","C0CMCCD",44,0)
+ N PARENT
+"RTN","C0CMCCD",45,0)
+ S PARENT=LEVEL(LEVEL),NODE=NODE+1
+"RTN","C0CMCCD",46,0)
+ S:PARENT ^TMP("MXMLDOM",$J,HANDLE,PARENT,"C",NODE)=ELE
+"RTN","C0CMCCD",47,0)
+ S LEVEL=LEVEL+1,LEVEL(LEVEL)=NODE,LEVEL(LEVEL,0)=ELE
+"RTN","C0CMCCD",48,0)
+ S ^TMP("MXMLDOM",$J,HANDLE,NODE)=ELE,^(NODE,"P")=PARENT
+"RTN","C0CMCCD",49,0)
+ ;M ^("A")=ATTR
+"RTN","C0CMCCD",50,0)
+ N ZI S ZI="" ; INDEX FOR ATTR
+"RTN","C0CMCCD",51,0)
+ F  S ZI=$O(ATTR(ZI)) Q:ZI=""  D  ; FOR EACH ATTRIBUTE
+"RTN","C0CMCCD",52,0)
+ . N ELE,TXT ; ABOUT TO RECURSE
+"RTN","C0CMCCD",53,0)
+ . S ELE=ZI ; TAG
+"RTN","C0CMCCD",54,0)
+ . S TXT=ATTR(ZI) ; DATA
+"RTN","C0CMCCD",55,0)
+ . D STARTELE(ELE,"") ; CREATE A NEW SUBNODE
+"RTN","C0CMCCD",56,0)
+ . D TXT^MXMLDOM("T") ; INSERT DATA TO TAG
+"RTN","C0CMCCD",57,0)
+ . D ENDELE^MXMLDOM(ELE) ; POP BACK UP A LEVEL
+"RTN","C0CMCCD",58,0)
+ Q
+"RTN","C0CMCCD",59,0)
+ ;
+"RTN","C0CMCCD",60,0)
+ISMULT(ZOID) ; RETURN TRUE IF ZOID IS ONE OF A MULTIPLE
+"RTN","C0CMCCD",61,0)
+ N ZN
+"RTN","C0CMCCD",62,0)
+ ;I $$TAG(ZOID)["entry" B
+"RTN","C0CMCCD",63,0)
+ S ZN=$$NXTSIB(ZOID)
+"RTN","C0CMCCD",64,0)
+ I ZN'="" Q $$TAG(ZOID)=$$TAG(ZN) ; IF TAG IS THE SAME AS NEXT SIB TAG
+"RTN","C0CMCCD",65,0)
+ Q 0
+"RTN","C0CMCCD",66,0)
+ ;
+"RTN","C0CMCCD",67,0)
+FIRST(ZOID) ;RETURNS THE OID OF THE FIRST CHILD OF ZOID
+"RTN","C0CMCCD",68,0)
+ Q $$CHILD^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CMCCD",69,0)
+ ;
+"RTN","C0CMCCD",70,0)
+PARENT(ZOID) ;RETURNS THE OID OF THE PARENT OF ZOID
+"RTN","C0CMCCD",71,0)
+ Q $$PARENT^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CMCCD",72,0)
+ ;
+"RTN","C0CMCCD",73,0)
+ATT(RTN,NODE) ;GET ATTRIBUTES FOR ZOID
+"RTN","C0CMCCD",74,0)
+ S HANDLE=C0CDOCID
+"RTN","C0CMCCD",75,0)
+ K @RTN
+"RTN","C0CMCCD",76,0)
+ D GETTXT^MXMLDOM("A")
+"RTN","C0CMCCD",77,0)
+ Q
+"RTN","C0CMCCD",78,0)
+ ;
+"RTN","C0CMCCD",79,0)
+TAG(ZOID) ; RETURNS THE XML TAG FOR THE NODE
+"RTN","C0CMCCD",80,0)
+ ;I ZOID=149 B ;GPLTEST
+"RTN","C0CMCCD",81,0)
+ N X,Y
+"RTN","C0CMCCD",82,0)
+ S Y=""
+"RTN","C0CMCCD",83,0)
+ S X=$G(C0CCBK("TAG")) ;IS THERE A CALLBACK FOR THIS ROUTINE
+"RTN","C0CMCCD",84,0)
+ I X'="" X X ; EXECUTE THE CALLBACK, SHOULD SET Y
+"RTN","C0CMCCD",85,0)
+ I Y="" S Y=$$NAME^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CMCCD",86,0)
+ Q Y
+"RTN","C0CMCCD",87,0)
+ ;
+"RTN","C0CMCCD",88,0)
+NXTSIB(ZOID) ; RETURNS THE NEXT SIBLING
+"RTN","C0CMCCD",89,0)
+ Q $$SIBLING^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CMCCD",90,0)
+ ;
+"RTN","C0CMCCD",91,0)
+DATA(ZT,ZOID) ; RETURNS DATA FOR THE NODE
+"RTN","C0CMCCD",92,0)
+ ;N ZT,ZN S ZT=""
+"RTN","C0CMCCD",93,0)
+ ;S C0CDOM=$NA(^TMP("MXMLDOM",$J,C0CDOCID))
+"RTN","C0CMCCD",94,0)
+ ;Q $G(@C0CDOM@(ZOID,"T",1))
+"RTN","C0CMCCD",95,0)
+ S ZN=$$TEXT^MXMLDOM(C0CDOCID,ZOID,ZT)
+"RTN","C0CMCCD",96,0)
+ Q
+"RTN","C0CMCCD",97,0)
+ ;
+"RTN","C0CMCCD",98,0)
+CLEANARY(OUTARY,INARY) ; GOES THROUGH AN ARRAY AND CALLS CLEAN ON EACH NODE
+"RTN","C0CMCCD",99,0)
+ ; INARY AND OUTARY PASSED BY NAME
+"RTN","C0CMCCD",100,0)
+ N ZI S ZI=""
+"RTN","C0CMCCD",101,0)
+ F  S ZI=$O(@INARY@(ZI)) Q:ZI=""  D  ; FOR EACH NODE
+"RTN","C0CMCCD",102,0)
+ . S @OUTARY@(ZI)=$$CLEAN(@INARY@(ZI)) ; CLEAN THE NODE
+"RTN","C0CMCCD",103,0)
+ Q
+"RTN","C0CMCCD",104,0)
+ ;
+"RTN","C0CMCCD",105,0)
+CLEAN(STR) ; extrinsic function; returns string
+"RTN","C0CMCCD",106,0)
+ ;; Removes all non printable characters from a string.
+"RTN","C0CMCCD",107,0)
+ ;; STR by Value
+"RTN","C0CMCCD",108,0)
+ N TR,I
+"RTN","C0CMCCD",109,0)
+ F I=0:1:31 S TR=$G(TR)_$C(I)
+"RTN","C0CMCCD",110,0)
+ S TR=TR_$C(127)
+"RTN","C0CMCCD",111,0)
+ QUIT $TR(STR,TR)
+"RTN","C0CMCCD",112,0)
+ ;
+"RTN","C0CMCCD",113,0)
+STRIPTXT(OUTARY,ZARY) ; STRIPS THE "TEXT" PORTION OUT OF AN XML FILE
+"RTN","C0CMCCD",114,0)
+ ; THIS IS USED TO DELETE THE NARATIVE HTML OUT OF THE CCD XML FILES BECAUSE
+"RTN","C0CMCCD",115,0)
+ ; THEY DO NOT WORK RIGHT WITH THE PARSER
+"RTN","C0CMCCD",116,0)
+ ;N ZWRK,ZBLD,ZI ; WORK ARRAY,BUILD ARRAY, AND COUNTER
+"RTN","C0CMCCD",117,0)
+ S ZI=$O(@ZARY@("")) ; GET FIRST LINE NUMBER
+"RTN","C0CMCCD",118,0)
+ D C0CBEGIN("ZWRK",ZI) ; INSERT FIRST LINE IN WORK ARRAY
+"RTN","C0CMCCD",119,0)
+ F  S ZI=$O(@ZARY@(ZI)) Q:ZI=""  D  ; FOR EACH LINE OF THE ARRAY
+"RTN","C0CMCCD",120,0)
+ . I $O(@ZARY@(ZI))="" D  Q  ; AT THE END 
+"RTN","C0CMCCD",121,0)
+ . . D C0CEND("ZWRK",ZI) ; INCLUDE LAST LINE IN WORK ARRAY
+"RTN","C0CMCCD",122,0)
+ . I ZI=1 D C0CBEGIN("ZWRK",ZI) ; START WITH FIRST LINE
+"RTN","C0CMCCD",123,0)
+ . I @ZARY@(ZI)["<text" D C0CEND("ZWRK",ZI-1) ;PREV LINE IS AN END
+"RTN","C0CMCCD",124,0)
+ . I @ZARY@(ZI)["</text>" D C0CBEGIN("ZWRK",ZI+1) ;NEXT LINE IS A BEGIN
+"RTN","C0CMCCD",125,0)
+ S ZI=""
+"RTN","C0CMCCD",126,0)
+ F  S ZI=$O(ZWRK(ZI)) Q:ZI=""  D  ; MAKE A BUILD LIST FROM THE WORK ARRAY
+"RTN","C0CMCCD",127,0)
+ . D QUEUE^C0CXPATH("ZBLD",ZARY,$P(ZWRK(ZI),"^",1),$P(ZWRK(ZI),"^",2))
+"RTN","C0CMCCD",128,0)
+ D BUILD^C0CXPATH("ZBLD",OUTARY) ; BUILD NEW ARRAY WITHOUT TEXT SECTIONS
+"RTN","C0CMCCD",129,0)
+ K @OUTARY@(0) ; GET RID OF THE LINE COUNT
+"RTN","C0CMCCD",130,0)
+ Q
+"RTN","C0CMCCD",131,0)
+ ;
+"RTN","C0CMCCD",132,0)
+C0CBEGIN(ZA,LN) ; INSERTS A BEGIN LINE LN INTO ARRAY ZWRK, PASSED BY NAME
+"RTN","C0CMCCD",133,0)
+ N ZI
+"RTN","C0CMCCD",134,0)
+ S ZI=$O(@ZA@(""),-1)
+"RTN","C0CMCCD",135,0)
+ I ZI="" S ZI=1
+"RTN","C0CMCCD",136,0)
+ E  S ZI=ZI+1 ; INCREMENT COUNT IN WORK ARRAY
+"RTN","C0CMCCD",137,0)
+ S $P(@ZA@(ZI),"^",1)=LN
+"RTN","C0CMCCD",138,0)
+ Q
+"RTN","C0CMCCD",139,0)
+ ;
+"RTN","C0CMCCD",140,0)
+C0CEND(ZB,LN) ; INSERTS AN END LINE LN INTO ARRAY ZWRK, PASSED BY NAME
+"RTN","C0CMCCD",141,0)
+ N ZI
+"RTN","C0CMCCD",142,0)
+ S ZI=$O(@ZB@(""),-1)
+"RTN","C0CMCCD",143,0)
+ I ZI="" S ZI=1
+"RTN","C0CMCCD",144,0)
+ S $P(@ZB@(ZI),"^",2)=LN
+"RTN","C0CMCCD",145,0)
+ Q
+"RTN","C0CMCCD",146,0)
+ ;
+"RTN","C0CMCCD",147,0)
+SEPARATE(OUTARY,INARY) ; SEPARATES XPATH VARIABLES ACCORDING TO THEIR
+"RTN","C0CMCCD",148,0)
+ ; ROOT ; /Problems/etc/etc goes to @OUTARY@("Problems","/Problems/etc/etc")
+"RTN","C0CMCCD",149,0)
+ S ZI=""
+"RTN","C0CMCCD",150,0)
+ F  S ZI=$O(@INARY@(ZI)) Q:ZI=""  D  ; FOR EACH ELEMENT OF THE ARRAY
+"RTN","C0CMCCD",151,0)
+ . I $P(ZI,"//",2)'="" D  ; FOR NON-BODY ENTRIES
+"RTN","C0CMCCD",152,0)
+ . . S ZJ=$P(ZI,"/",4) ; things like From Patient Actor
+"RTN","C0CMCCD",153,0)
+ . E  D  ; FOR BODY PARTS
+"RTN","C0CMCCD",154,0)
+ . . S ZJ=$P(ZI,"/",2) ;
+"RTN","C0CMCCD",155,0)
+ . . I ZJ="" S ZJ=$P(ZI,"/",3) ;
+"RTN","C0CMCCD",156,0)
+ . S @OUTARY@(ZJ,ZI)=$G(@INARY@(ZI)) ;FIX THIS FOR MULTILINE COMMENTS
+"RTN","C0CMCCD",157,0)
+ Q
+"RTN","C0CMCCD",158,0)
+ ;
+"RTN","C0CMCCD",159,0)
+FINDTID ; FIND TEMPLATE IDS IN DOM 1
+"RTN","C0CMCCD",160,0)
+ S C0CDOCID=1
+"RTN","C0CMCCD",161,0)
+ S ZD=$NA(^TMP("MXMLDOM",$J,C0CDOCID))
+"RTN","C0CMCCD",162,0)
+ S ZN=""
+"RTN","C0CMCCD",163,0)
+ S CURSEC=""
+"RTN","C0CMCCD",164,0)
+ S TID=""
+"RTN","C0CMCCD",165,0)
+ F  S ZN=$O(@ZD@(ZN)) Q:ZN=""  D  ;
+"RTN","C0CMCCD",166,0)
+ . I $$TAG(ZN)="root" D  ;
+"RTN","C0CMCCD",167,0)
+ . . I $$TAG($$PARENT(ZN))="templateId" D  ; ONLY LOOKING FOR TEMPLATES
+"RTN","C0CMCCD",168,0)
+ . . . S ZG=$$PARENT($$PARENT(ZN))
+"RTN","C0CMCCD",169,0)
+ . . . S ZG2=$$PARENT(ZG) ;COMPONENT THAT HOLDS THIS SECTION
+"RTN","C0CMCCD",170,0)
+ . . . S CMT=$G(@ZD@(ZG,"X",1))
+"RTN","C0CMCCD",171,0)
+ . . . I CMT="" S CMT="?"
+"RTN","C0CMCCD",172,0)
+ . . . I $$TAG(ZG)="section" D  ;START OF A SECTION
+"RTN","C0CMCCD",173,0)
+ . . . . S CURSEC=$$PARENT(ZG)
+"RTN","C0CMCCD",174,0)
+ . . . . S SECCMT=$G(@ZD@(CURSEC,"X",1))
+"RTN","C0CMCCD",175,0)
+ . . . . I SECCMT="" S SECCMT="?"
+"RTN","C0CMCCD",176,0)
+ . . . . S SECTID=$G(@ZD@(ZN,"T",1)) ;SECTION TEMPLATE ID
+"RTN","C0CMCCD",177,0)
+ . . . S TID=$G(@ZD@(ZN,"T",1)) ;TEMPLATE ID
+"RTN","C0CMCCD",178,0)
+ . . . I CURSEC'="" D  ; IF WE ARE IN A SECTION
+"RTN","C0CMCCD",179,0)
+ . . . . S CCDDIR(ZG2,CURSEC,$$TAG(ZG2),CMT,SECCMT)=TID
+"RTN","C0CMCCD",180,0)
+ . . . . S DOMMAP(ZG2)=CURSEC_U_$$TAG(ZG2)_U_TID_U_SECTID
+"RTN","C0CMCCD",181,0)
+ . . . W !,$$TAG(ZG2)," ",$G(@ZD@(ZG,"X",1))
+"RTN","C0CMCCD",182,0)
+ . . . W " root ",ZN," ",@ZD@(ZN,"T",1)
+"RTN","C0CMCCD",183,0)
+ Q
+"RTN","C0CMCCD",184,0)
+ ;
+"RTN","C0CMCCD",185,0)
+FINDALT ; PROCESS THE DOMMAP AND FIND THE ALT TAGS FOR COMPONENTS
+"RTN","C0CMCCD",186,0)
+ ;
+"RTN","C0CMCCD",187,0)
+ S ZI=""
+"RTN","C0CMCCD",188,0)
+ F  S ZI=$O(DOMMAP(ZI)) Q:ZI=""  D  ; FOR EACH NODE IN THE MAP
+"RTN","C0CMCCD",189,0)
+ . S ZJ=DOMMAP(ZI) ;
+"RTN","C0CMCCD",190,0)
+ . S PARNODE=$P(ZJ,U,1) ;PARENT NODE
+"RTN","C0CMCCD",191,0)
+ . S TAG=$P(ZJ,U,2) ;THIS TAG
+"RTN","C0CMCCD",192,0)
+ . S TID=$P(ZJ,U,3) ;THIS TEMPLATE ID
+"RTN","C0CMCCD",193,0)
+ . S PARTID=$P(ZJ,U,4) ;PARENT TEMPLATE ID
+"RTN","C0CMCCD",194,0)
+ . S ZIEN=$O(^C0CXDS(178.101,"TID",TID,"")) ;THIS NODE IEN
+"RTN","C0CMCCD",195,0)
+ . S PARIEN=$O(^C0CXDS(178.101,"TID",PARTID,"")) ;PARENT NODE IEN
+"RTN","C0CMCCD",196,0)
+ . I ZI=PARNODE D  ; IF THIS IS A SECTION NODE
+"RTN","C0CMCCD",197,0)
+ . . S ALTTAG=$$GET1^DIQ(178.101,PARIEN_",",.03) ;ALT TAG FIELD FOR PARENT
+"RTN","C0CMCCD",198,0)
+ . . S NAME=$$GET1^DIQ(178.101,ZIEN_",",.01) ;NAME OF THIS NODE'S TEMPLATE
+"RTN","C0CMCCD",199,0)
+ . . W ZI," ",TAG," ",ALTTAG," ",NAME,!
+"RTN","C0CMCCD",200,0)
+ . . S C0CTAGS(ZI)=ALTTAG
+"RTN","C0CMCCD",201,0)
+ . E  D  ; NOT A SECTION NODE
+"RTN","C0CMCCD",202,0)
+ . . N ZJ S ZJ=""
+"RTN","C0CMCCD",203,0)
+ . . S ZJ=$O(^C0CXDS(178.101,"D",PARIEN,ZIEN,"")) ;A WHEREUSED POINTER?
+"RTN","C0CMCCD",204,0)
+ . . I ZJ'="" D  ; THERE IS A NEW LABEL FOR THIS NODE
+"RTN","C0CMCCD",205,0)
+ . . . N ZK
+"RTN","C0CMCCD",206,0)
+ . . . S ZK=$$GET1^DIQ(178.111,ZJ_","_ZIEN_",",2)
+"RTN","C0CMCCD",207,0)
+ . . . I ZK'="" D  ;
+"RTN","C0CMCCD",208,0)
+ . . . . W "FOUND ",ZK,!
+"RTN","C0CMCCD",209,0)
+ . . . . S C0CTAGS(ZI)=ZK ; NEW TAG FOR INTERSECTION
+"RTN","C0CMCCD",210,0)
+ Q
+"RTN","C0CMCCD",211,0)
+ ;
+"RTN","C0CMCCD",212,0)
+ALTTAG(NODE) ; SET Y EQUAL TO THE ALT TAG FOUND IN C0CTAGS IF NODE IF FOUND
+"RTN","C0CMCCD",213,0)
+ ;
+"RTN","C0CMCCD",214,0)
+ S Y=$G(C0CTAGS(NODE))
+"RTN","C0CMCCD",215,0)
+ Q
+"RTN","C0CMCCD",216,0)
+ ;
+"RTN","C0CMCCD",217,0)
+SETCBK ; SET THE TAG CALLBACK FOR XPATH PROCESSSING OF THE CCD
+"RTN","C0CMCCD",218,0)
+ S C0CCBK("TAG")="D ALTTAG^C0CMCCD(ZOID)"
+"RTN","C0CMCCD",219,0)
+ Q
+"RTN","C0CMCCD",220,0)
+ ;
+"RTN","C0CMCCD",221,0)
+OUTCCD(GARYIN) ; OUTPUT THE PARSED CCD TO A TEXT FILE
+"RTN","C0CMCCD",222,0)
+ ;D TEST3^C0CMXML
+"RTN","C0CMCCD",223,0)
+ N ZT S ZT=$NA(^TMP("CCDOUT",$J))
+"RTN","C0CMCCD",224,0)
+ N ZI,ZJ
+"RTN","C0CMCCD",225,0)
+ S ZI=1 S ZJ=""
+"RTN","C0CMCCD",226,0)
+ K @ZT
+"RTN","C0CMCCD",227,0)
+ F  S ZJ=$O(GARYIN(ZJ)) Q:ZJ=""  D  ;
+"RTN","C0CMCCD",228,0)
+ . S @ZT@(ZI)=ZJ_"^"_GARYIN(ZJ)
+"RTN","C0CMCCD",229,0)
+ . S ZI=ZI+1
+"RTN","C0CMCCD",230,0)
+ S ONAME=$NA(@ZT@(1))
+"RTN","C0CMCCD",231,0)
+ W $$OUTPUT^C0CXPATH(ONAME,"CCDOUT.txt","/home/vademo2/CCR")
+"RTN","C0CMCCD",232,0)
+ K @ZT
+"RTN","C0CMCCD",233,0)
+ Q
+"RTN","C0CMCCD",234,0)
+ ;
+"RTN","C0CMCCD",235,0)
+GENXDS(ZD) ; GENERATE THE XDS PROTOTYPE RECORDS FROM A CCDDIR ARRAY
+"RTN","C0CMCCD",236,0)
+ ; ARRAY ELEMENTS LOOK LIKE:
+"RTN","C0CMCCD",237,0)
+ ; CCDDIR(1659,1634,"observation"," Result observaion template "," Vital signs section template ")="2.16.840.1.113883.10.20.1.31"
+"RTN","C0CMCCD",238,0)
+ ;or CCDDIR(cur node,section node,cur tag,cur name,sec name)=templateId
+"RTN","C0CMCCD",239,0)
+ S ZF=178.101 ; FILE NUMBER FOR THE C0C XDS PROTOTYPE FILE
+"RTN","C0CMCCD",240,0)
+ S ZI=$Q(@ZD@("")) ;FIRST ARRAY ELEMENT
+"RTN","C0CMCCD",241,0)
+ S DONE=0
+"RTN","C0CMCCD",242,0)
+ F  Q:DONE  D  ;
+"RTN","C0CMCCD",243,0)
+ . W @ZI,!
+"RTN","C0CMCCD",244,0)
+ . S ZJ=$QS(ZI,5)
+"RTN","C0CMCCD",245,0)
+ . S ZJ=$E(ZJ,2,$L(ZJ)) ;STRIP THE LEADING SPACE
+"RTN","C0CMCCD",246,0)
+ . S C0CFDA(ZF,"?+1,",.01)=ZJ
+"RTN","C0CMCCD",247,0)
+ . S C0CFDA(ZF,"?+1,",.02)=$QS(ZI,4) ; TAG FOR THIS TEMPLATE
+"RTN","C0CMCCD",248,0)
+ . S C0CFDA(ZF,"?+1,",1)=@ZI
+"RTN","C0CMCCD",249,0)
+ . D UPDIE
+"RTN","C0CMCCD",250,0)
+ . S ZI=$Q(@ZI)
+"RTN","C0CMCCD",251,0)
+ . I ZI="" S DONE=1
+"RTN","C0CMCCD",252,0)
+ Q
+"RTN","C0CMCCD",253,0)
+ ;
+"RTN","C0CMCCD",254,0)
+WHRUSD(ZD) ; UPDATE THE C0C XDS FILE WITH WHERE USED DATA FROM
+"RTN","C0CMCCD",255,0)
+ ; CCDDIR PASS BY NAME
+"RTN","C0CMCCD",256,0)
+ ; ARRAY ELEMENTS LOOK LIKE:
+"RTN","C0CMCCD",257,0)
+ ; CCDDIR(1634," Vital signs section template ",1659,"observation"," Result observaion template ")="2.16.840.1.113883.10.20.1.31"
+"RTN","C0CMCCD",258,0)
+ ;or CCDDIR(section node,sec name, cur node,cur tag,cur name)=templateId
+"RTN","C0CMCCD",259,0)
+ S ZF=178.101 ; FILE NUMBER FOR THE C0C XDS PROTOTYPE FILE
+"RTN","C0CMCCD",260,0)
+ S ZSF=178.111 ; WHERE USED SUBFILE OF C0C XDS PROTOTYPE FILE
+"RTN","C0CMCCD",261,0)
+ S ZI=$Q(@ZD@("")) ;FIRST ARRAY ELEMENT
+"RTN","C0CMCCD",262,0)
+ S DONE=0
+"RTN","C0CMCCD",263,0)
+ F  Q:DONE  D  ;
+"RTN","C0CMCCD",264,0)
+ . W @ZI
+"RTN","C0CMCCD",265,0)
+ . S ZIEN=$O(^C0CXDS(178.101,"TID",@ZI,"")) ; IEN FOR THIS NODE'S TEMPLATE
+"RTN","C0CMCCD",266,0)
+ . W " IEN:",ZIEN
+"RTN","C0CMCCD",267,0)
+ . S ZJ=$QS(ZI,2)
+"RTN","C0CMCCD",268,0)
+ . S ZJ=$E(ZJ,2,$L(ZJ)) ;STRIP THE LEADING SPACE
+"RTN","C0CMCCD",269,0)
+ . S ZPIEN=$O(^C0CXDS(178.101,"B",ZJ,"")) ; PARENT IEN
+"RTN","C0CMCCD",270,0)
+ . W " PARENT IEN:",ZPIEN
+"RTN","C0CMCCD",271,0)
+ . S ZTAG=$QS(ZI,4) ; TAG FOR THIS TEMPLATE
+"RTN","C0CMCCD",272,0)
+ . W " TAG:",ZTAG,!
+"RTN","C0CMCCD",273,0)
+ . I ZIEN'=ZPIEN D  ; ONLY FOR CHILD TEMPLATES
+"RTN","C0CMCCD",274,0)
+ . . S C0CFDA(ZSF,"?+1,"_ZIEN_",",.01)=ZPIEN ; NEW SUBFILE ENTRY WITH PAR PTR
+"RTN","C0CMCCD",275,0)
+ . . S C0CFDA(ZSF,"?+1,"_ZIEN_",",1)=ZTAG ; TAG FOR NEW ENTRY
+"RTN","C0CMCCD",276,0)
+ . . D UPDIE
+"RTN","C0CMCCD",277,0)
+ . ;S C0CFDA(ZF,"?+1,",1)=@ZI
+"RTN","C0CMCCD",278,0)
+ . ;D UPDIE
+"RTN","C0CMCCD",279,0)
+ . S ZI=$Q(@ZI)
+"RTN","C0CMCCD",280,0)
+ . I ZI="" S DONE=1
+"RTN","C0CMCCD",281,0)
+ Q
+"RTN","C0CMCCD",282,0)
+ ; 
+"RTN","C0CMCCD",283,0)
+UPDIE ; INTERNAL ROUTINE TO CALL UPDATE^DIE AND CHECK FOR ERRORS
+"RTN","C0CMCCD",284,0)
+ K ZERR
+"RTN","C0CMCCD",285,0)
+ D CLEAN^DILF
+"RTN","C0CMCCD",286,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR")
+"RTN","C0CMCCD",287,0)
+ I $D(ZERR) D  ;
+"RTN","C0CMCCD",288,0)
+ . W "ERROR",!
+"RTN","C0CMCCD",289,0)
+ . ZWR ZERR
+"RTN","C0CMCCD",290,0)
+ . B
+"RTN","C0CMCCD",291,0)
+ K C0CFDA
+"RTN","C0CMCCD",292,0)
+ Q
+"RTN","C0CMCCD",293,0)
+ ;
+"RTN","C0CMED")
+0^48^B18939705
+"RTN","C0CMED",1,0)
+C0CMED ; WV/CCDCCR/GPL/SMH - CCR/CCD Medications Driver; Mar 23 2009
+"RTN","C0CMED",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMED",3,0)
+ ; Copyright 2008,2009 George Lilly, University of Minnesota and Sam Habiel.
+"RTN","C0CMED",4,0)
+ ; Licensed under the terms of the GNU General Public License.
+"RTN","C0CMED",5,0)
+ ; See attached copy of the License.
+"RTN","C0CMED",6,0)
+ ; 
+"RTN","C0CMED",7,0)
+ ; This program is free software; you can redistribute it and/or modify
+"RTN","C0CMED",8,0)
+ ; it under the terms of the GNU General Public License as published by
+"RTN","C0CMED",9,0)
+ ; the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMED",10,0)
+ ; (at your option) any later version.
+"RTN","C0CMED",11,0)
+ ; 
+"RTN","C0CMED",12,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CMED",13,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMED",14,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMED",15,0)
+ ; GNU General Public License for more details.
+"RTN","C0CMED",16,0)
+ ; 
+"RTN","C0CMED",17,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CMED",18,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMED",19,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMED",20,0)
+ ;
+"RTN","C0CMED",21,0)
+ ; --Revision History
+"RTN","C0CMED",22,0)
+ ; July 2008 - Initial Version/GPL
+"RTN","C0CMED",23,0)
+ ; July 2008 - March 2009 various revisions
+"RTN","C0CMED",24,0)
+ ; March 2009 - Reconstruction of routine as driver for other med routines/SMH
+"RTN","C0CMED",25,0)
+ ;
+"RTN","C0CMED",26,0)
+ Q
+"RTN","C0CMED",27,0)
+EXTRACT(MEDXML,DFN,MEDOUTXML) ; Private; Extract medications into provided XML template
+"RTN","C0CMED",28,0)
+ ; DFN passed by reference
+"RTN","C0CMED",29,0)
+ ; MEDXML and MEDOUTXML are passed by Name
+"RTN","C0CMED",30,0)
+ ; MEDXML is the input template
+"RTN","C0CMED",31,0)
+ ; MEDOUTXML is the output template
+"RTN","C0CMED",32,0)
+ ; Both of them refer to ^TMP globals where the XML documents are stored
+"RTN","C0CMED",33,0)
+ ; 
+"RTN","C0CMED",34,0)
+ ; -- This ep is the driver for extracting medications into the provided XML template
+"RTN","C0CMED",35,0)
+ ; 1. VA Outpatient Meds are in C0CMED1
+"RTN","C0CMED",36,0)
+ ; 2. VA Pending Meds are in C0CMED2
+"RTN","C0CMED",37,0)
+ ; 3. VA non-VA Meds are in C0CMED3
+"RTN","C0CMED",38,0)
+ ; 4. VA Inpatient IV Meds are in C0CMED4 (not functional)
+"RTN","C0CMED",39,0)
+ ; 5. VA Inpatient UD Meds are in C0CMED5 (doesn't exist yet)--March 2009
+"RTN","C0CMED",40,0)
+ ; 6. RPMS Meds are in C0CMED6. Need to create other routines for subdivisions of RPMS Meds is not known at this time.
+"RTN","C0CMED",41,0)
+ ;
+"RTN","C0CMED",42,0)
+ ; --Get parameters for meds
+"RTN","C0CMED",43,0)
+ S @MEDOUTXML@(0)=0 ; By default, empty.
+"RTN","C0CMED",44,0)
+ N C0CMFLAG
+"RTN","C0CMED",45,0)
+ S C0CMFLAG=$$GET^C0CPARMS("MEDALL")_"^"_$$GET^C0CPARMS("MEDLIMIT")_"^"_$$GET^C0CPARMS("MEDACTIVE")_"^"_$$GET^C0CPARMS("MEDPENDING")
+"RTN","C0CMED",46,0)
+ W:$G(DEBUG) "Med Parameters: ",!
+"RTN","C0CMED",47,0)
+ W:$G(DEBUG) "ALL: ",+C0CMFLAG,!
+"RTN","C0CMED",48,0)
+ W:$G(DEBUG) "LIMIT: ",$P(C0CMFLAG,U,2),!
+"RTN","C0CMED",49,0)
+ W:$G(DEBUG) "ACTIVE: ",$P(C0CMFLAG,U,3),!
+"RTN","C0CMED",50,0)
+ W:$G(DEBUG) "PEND: ",$P(C0CMFLAG,U,4),!
+"RTN","C0CMED",51,0)
+ ; --Find out what system we are on and branch out...
+"RTN","C0CMED",52,0)
+ W:$G(DEBUG) "Agenecy: ",$G(DUZ("AG"))
+"RTN","C0CMED",53,0)
+ I $$RPMS^C0CUTIL() D RPMS QUIT
+"RTN","C0CMED",54,0)
+ I ($$VISTA^C0CUTIL())!($$WV^C0CUTIL())!($$OV^C0CUTIL()) D VISTA QUIT
+"RTN","C0CMED",55,0)
+RPMS 
+"RTN","C0CMED",56,0)
+ ;D EXTRACT^C0CMED6(MEDXML,DFN,MEDOUTXML,C0CMFLAG) QUIT
+"RTN","C0CMED",57,0)
+ N MEDCOUNT S MEDCOUNT=0
+"RTN","C0CMED",58,0)
+ K ^TMP($J,"MED")
+"RTN","C0CMED",59,0)
+ N HIST S HIST=$NA(^TMP($J,"MED","HIST")) ; Meds already dispensed
+"RTN","C0CMED",60,0)
+ N NVA S NVA=$NA(^TMP($J,"MED","NVA")) ; non-VA Meds
+"RTN","C0CMED",61,0)
+ S @HIST@(0)=0,@NVA@(0)=0 ; At first, they are all empty... (prevent undefined errors)
+"RTN","C0CMED",62,0)
+ D EXTRACT^C0CMED6(MEDXML,DFN,HIST,.MEDCOUNT,C0CMFLAG) ; Historical OP Meds
+"RTN","C0CMED",63,0)
+ D:+C0CMFLAG EXTRACT^C0CMED3(MEDXML,DFN,NVA,.MEDCOUNT) ; non-VA Meds 
+"RTN","C0CMED",64,0)
+ I @HIST@(0)>0 D  
+"RTN","C0CMED",65,0)
+ . D CP^C0CXPATH(HIST,MEDOUTXML)
+"RTN","C0CMED",66,0)
+ . W:$G(DEBUG) "HAS ACTIVE OP MEDS",!
+"RTN","C0CMED",67,0)
+ I @NVA@(0)>0 D 
+"RTN","C0CMED",68,0)
+ . I @HIST@(0)>0 D INSINNER^C0CXPATH(MEDOUTXML,NVA) 
+"RTN","C0CMED",69,0)
+ . ;E  D CP^C0CXPATH(NVA,MEDOUTXML) 
+"RTN","C0CMED",70,0)
+ . W:$G(DEBUG) "HAS NON-VA MEDS",!
+"RTN","C0CMED",71,0)
+ Q
+"RTN","C0CMED",72,0)
+VISTA 
+"RTN","C0CMED",73,0)
+ N MEDCOUNT S MEDCOUNT=0
+"RTN","C0CMED",74,0)
+ K ^TMP($J,"MED")
+"RTN","C0CMED",75,0)
+ N HIST S HIST=$NA(^TMP($J,"MED","HIST")) ; Meds already dispensed
+"RTN","C0CMED",76,0)
+ N PEND S PEND=$NA(^TMP($J,"MED","PEND")) ; Pending Meds
+"RTN","C0CMED",77,0)
+ N NVA S NVA=$NA(^TMP($J,"MED","NVA")) ; non-VA Meds
+"RTN","C0CMED",78,0)
+ K @HIST K @PEND K @NVA ; MAKE SURE THEY ARE EMPTY
+"RTN","C0CMED",79,0)
+ S @HIST@(0)=0,@PEND@(0)=0,@NVA@(0)=0 ; At first, they are all empty... (prevent undefined errors)
+"RTN","C0CMED",80,0)
+ ; N IPIV ; Inpatient IV Meds
+"RTN","C0CMED",81,0)
+ N IPUD S IPUD=$NA(^TMP($J,"MED","IPUD")) ; Inpatient UD Meds
+"RTN","C0CMED",82,0)
+ K @IPUD
+"RTN","C0CMED",83,0)
+ S @IPUD@(0)=0
+"RTN","C0CMED",84,0)
+ ;
+"RTN","C0CMED",85,0)
+ D EXTRACT^C0CMED1(MEDXML,DFN,HIST,.MEDCOUNT,C0CMFLAG) ; Historical OP Meds
+"RTN","C0CMED",86,0)
+ D:$P(C0CMFLAG,U,4) EXTRACT^C0CMED2(MEDXML,DFN,PEND,.MEDCOUNT) ; Pending Meds
+"RTN","C0CMED",87,0)
+ ;D:+C0CMFLAG EXTRACT^C0CMED3(MEDXML,DFN,NVA,.MEDCOUNT) ; non-VA Meds 
+"RTN","C0CMED",88,0)
+ D EXTRACT^C0CMED3(MEDXML,DFN,NVA,.MEDCOUNT) ; non-VA Meds GPL
+"RTN","C0CMED",89,0)
+ D EXTRACT^C0CNMED4(MEDXML,DFN,IPUD,.MEDCOUNT) ; inpatient gpl
+"RTN","C0CMED",90,0)
+ I @HIST@(0)>0 D  
+"RTN","C0CMED",91,0)
+ . D CP^C0CXPATH(HIST,MEDOUTXML)
+"RTN","C0CMED",92,0)
+ . W:$G(DEBUG) "HAS ACTIVE OP MEDS",!
+"RTN","C0CMED",93,0)
+ I @PEND@(0)>0 D  
+"RTN","C0CMED",94,0)
+ . I @HIST@(0)>0 D INSINNER^C0CXPATH(MEDOUTXML,PEND) ;Add Pending to Historical
+"RTN","C0CMED",95,0)
+ . E  D CP^C0CXPATH(PEND,MEDOUTXML) ; No historical, just copy
+"RTN","C0CMED",96,0)
+ . W:$G(DEBUG) "HAS OP PENDING MEDS",!
+"RTN","C0CMED",97,0)
+ I @NVA@(0)>0 D 
+"RTN","C0CMED",98,0)
+ . I @HIST@(0)>0!(@PEND@(0)>0) D INSINNER^C0CXPATH(MEDOUTXML,NVA) 
+"RTN","C0CMED",99,0)
+ . E  D CP^C0CXPATH(NVA,MEDOUTXML) 
+"RTN","C0CMED",100,0)
+ . W:$G(DEBUG) "HAS NON-VA MEDS",!
+"RTN","C0CMED",101,0)
+ I @IPUD@(0)>0 D 
+"RTN","C0CMED",102,0)
+ . I @HIST@(0)>0!(@PEND@(0)>0)!(@NVA@(0)>0) D INSINNER^C0CXPATH(MEDOUTXML,IPUD) 
+"RTN","C0CMED",103,0)
+ . E  D CP^C0CXPATH(IPUD,MEDOUTXML) 
+"RTN","C0CMED",104,0)
+ . W:$G(DEBUG) "HAS INPATIENT MEDS",!
+"RTN","C0CMED",105,0)
+ N ZI
+"RTN","C0CMED",106,0)
+ S ZI=$NA(^TMP("C0CCCR",$J,"MEDMAP"))
+"RTN","C0CMED",107,0)
+ M ^TMP("C0CRIM","VARS",DFN,"MEDS")=@ZI ; PERSIST MEDS VARIABLES
+"RTN","C0CMED",108,0)
+ K @ZI ; CLEAN UP MED MAP AFTER - GPL 10/10
+"RTN","C0CMED",109,0)
+ K @PEND
+"RTN","C0CMED",110,0)
+ K @HIST
+"RTN","C0CMED",111,0)
+ K @NVA
+"RTN","C0CMED",112,0)
+ K @IPUD
+"RTN","C0CMED",113,0)
+ Q
+"RTN","C0CMED",114,0)
+ 
+"RTN","C0CMED1")
+0^49^B110909428
+"RTN","C0CMED1",1,0)
+C0CMED1 ; WV/CCDCCR/SMH - CCR/CCD PROCESSING FOR MEDICATIONS ;01/10/09
+"RTN","C0CMED1",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMED1",3,0)
+ ;;Last modified Sat Jan 10 21:42:27 PST 2009
+"RTN","C0CMED1",4,0)
+ ; Copyright 2009 WorldVistA.  Licensed under the terms of the GNU
+"RTN","C0CMED1",5,0)
+ ; General Public License See attached copy of the License.
+"RTN","C0CMED1",6,0)
+ ;
+"RTN","C0CMED1",7,0)
+ ; This program is free software; you can redistribute it and/or modify
+"RTN","C0CMED1",8,0)
+ ; it under the terms of the GNU General Public License as published by
+"RTN","C0CMED1",9,0)
+ ; the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMED1",10,0)
+ ; (at your option) any later version.
+"RTN","C0CMED1",11,0)
+ ;
+"RTN","C0CMED1",12,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CMED1",13,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMED1",14,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMED1",15,0)
+ ; GNU General Public License for more details.
+"RTN","C0CMED1",16,0)
+ ;
+"RTN","C0CMED1",17,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CMED1",18,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMED1",19,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMED1",20,0)
+ ;
+"RTN","C0CMED1",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CMED1",22,0)
+ Q
+"RTN","C0CMED1",23,0)
+ ;
+"RTN","C0CMED1",24,0)
+EXTRACT(MINXML,DFN,OUTXML,MEDCOUNT,FLAGS) ; EXTRACT MEDICATIONS INTO PROVIDED XML TEMPLATE
+"RTN","C0CMED1",25,0)
+ ;
+"RTN","C0CMED1",26,0)
+ ; INXML AND OUTXML ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CMED1",27,0)
+ ; INXML WILL CONTAIN ONLY THE MEDICATIONS SECTION OF THE OVERALL TEMPLATE
+"RTN","C0CMED1",28,0)
+ ;
+"RTN","C0CMED1",29,0)
+ ; MEDS is return array from RPC.
+"RTN","C0CMED1",30,0)
+ ; MAP is a mapping variable map (store result) for each med
+"RTN","C0CMED1",31,0)
+ ; MED is holds each array element from MEDS(J), one medicine
+"RTN","C0CMED1",32,0)
+ ; MEDCOUNT is a counter passed by Reference.
+"RTN","C0CMED1",33,0)
+ ; FLAGS are: MEDALL(bool)^MEDLIMIT(int)^MEDACTIVE(bool)^MEDPENDING(bool)
+"RTN","C0CMED1",34,0)
+ ; FLAGS are set-up in C0CMED.
+"RTN","C0CMED1",35,0)
+ ;
+"RTN","C0CMED1",36,0)
+ ; RX^PSO52API is a Pharmacy Re-Enginnering (PRE) API to get all
+"RTN","C0CMED1",37,0)
+ ; med data available.
+"RTN","C0CMED1",38,0)
+ ; http://www.va.gov/vdl/documents/Clinical/Pharm-Outpatient_Pharmacy/phar_1_api_r0807.pdf
+"RTN","C0CMED1",39,0)
+ ; Output of API is ^TMP($J,"SUBSCRIPT",DFN,RXIENS).
+"RTN","C0CMED1",40,0)
+ ; D PARY^C0CXPATH(MINXML)
+"RTN","C0CMED1",41,0)
+ N MEDS,MAP
+"RTN","C0CMED1",42,0)
+ K ^TMP($J,"CCDCCR") ; PLEASE DON'T KILL ALL OF ^TMP($J) HERE!!!!
+"RTN","C0CMED1",43,0)
+ N ALL S ALL=+FLAGS
+"RTN","C0CMED1",44,0)
+ N ACTIVE S ACTIVE=$P(FLAGS,U,3)
+"RTN","C0CMED1",45,0)
+ ; Below, X1 is today; X2 is the number of days we want to go back
+"RTN","C0CMED1",46,0)
+ ; X is the result of this calculation using C^%DTC.
+"RTN","C0CMED1",47,0)
+ N X,X1,X2
+"RTN","C0CMED1",48,0)
+ S X1=DT
+"RTN","C0CMED1",49,0)
+ S X2=-$P($P(FLAGS,U,2),"-",2)
+"RTN","C0CMED1",50,0)
+ D C^%DTC
+"RTN","C0CMED1",51,0)
+ ; I discovered that I shouldn't put an ending date (last parameter)
+"RTN","C0CMED1",52,0)
+ ; because it seems that it will get meds whose beginning is after X but
+"RTN","C0CMED1",53,0)
+ ; whose exipriation is before the ending date.
+"RTN","C0CMED1",54,0)
+ D RX^PSO52API(DFN,"CCDCCR","","","",X,"")
+"RTN","C0CMED1",55,0)
+ M MEDS=^TMP($J,"CCDCCR",DFN)
+"RTN","C0CMED1",56,0)
+ ; @(0) contains the number of meds or -1^NO DATA FOUND
+"RTN","C0CMED1",57,0)
+ ; If it is -1, we quit.
+"RTN","C0CMED1",58,0)
+ I $P(MEDS(0),U)=-1 S @OUTXML@(0)=0 Q
+"RTN","C0CMED1",59,0)
+ ZWRITE:$G(DEBUG) MEDS
+"RTN","C0CMED1",60,0)
+ N RXIEN S RXIEN=0
+"RTN","C0CMED1",61,0)
+ F  S RXIEN=$O(MEDS(RXIEN)) Q:$G(RXIEN)=""  D  ; FOR EACH MEDICATION IN THE LIST
+"RTN","C0CMED1",62,0)
+ . N MED M MED=MEDS(RXIEN)
+"RTN","C0CMED1",63,0)
+ . I 'ALL,ACTIVE,$P(MED(100),U,2)'="ACTIVE" QUIT
+"RTN","C0CMED1",64,0)
+ . S MEDCOUNT=MEDCOUNT+1
+"RTN","C0CMED1",65,0)
+ . W:$G(DEBUG) "RXIEN IS ",RXIEN,!
+"RTN","C0CMED1",66,0)
+ . S MAP=$NA(^TMP("C0CCCR",$J,"MEDMAP",MEDCOUNT))
+"RTN","C0CMED1",67,0)
+ . ; K @MAP DO NOT KILL HERE, WAS CLEARED IN C0CMED
+"RTN","C0CMED1",68,0)
+ . W:$G(DEBUG) "MAP= ",MAP,!
+"RTN","C0CMED1",69,0)
+ . S @MAP@("MEDOBJECTID")="MED"_MEDCOUNT ; MEDCOUNT FOR ID
+"RTN","C0CMED1",70,0)
+ . ; S @MAP@("MEDOBJECTID")="MED"_MED(.01) ;Rx Number
+"RTN","C0CMED1",71,0)
+ . S @MAP@("MEDISSUEDATETXT")="Issue Date"
+"RTN","C0CMED1",72,0)
+ . S @MAP@("MEDISSUEDATE")=$$FMDTOUTC^C0CUTIL($P(MED(1),U))
+"RTN","C0CMED1",73,0)
+ . S @MAP@("MEDLASTFILLDATETXT")="Last Fill Date"
+"RTN","C0CMED1",74,0)
+ . S @MAP@("MEDLASTFILLDATE")=$$FMDTOUTC^C0CUTIL($P($G(MED(101)),U))
+"RTN","C0CMED1",75,0)
+ . S @MAP@("MEDRXNOTXT")="Prescription Number"
+"RTN","C0CMED1",76,0)
+ . S @MAP@("MEDRXNO")=MED(.01)
+"RTN","C0CMED1",77,0)
+ . S @MAP@("MEDTYPETEXT")="Medication"
+"RTN","C0CMED1",78,0)
+ . S @MAP@("MEDDETAILUNADORNED")=""  ; Leave blank, field has its uses
+"RTN","C0CMED1",79,0)
+ . S @MAP@("MEDSTATUSTEXT")=$P(MED(100),U,2)
+"RTN","C0CMED1",80,0)
+ . S @MAP@("MEDSOURCEACTORID")="ACTORPROVIDER_"_$P(MED(4),U)
+"RTN","C0CMED1",81,0)
+ . S @MAP@("MEDPRODUCTNAMETEXT")=$P(MED(6),U,2)
+"RTN","C0CMED1",82,0)
+ . ; 12/30/08: I will be using RxNorm for coding...
+"RTN","C0CMED1",83,0)
+ . ; 176.001 is the file for Concepts; 176.003 is the file for
+"RTN","C0CMED1",84,0)
+ . ; sources (i.e. for RxNorm Version)
+"RTN","C0CMED1",85,0)
+ . ;
+"RTN","C0CMED1",86,0)
+ . ; We need the VUID first for the National Drug File entry first
+"RTN","C0CMED1",87,0)
+ . ; We get the VUID of the drug, by looking up the VA Product entry
+"RTN","C0CMED1",88,0)
+ . ; (file 50.68) using the call NDF^PSS50, returned in node 22.
+"RTN","C0CMED1",89,0)
+ . ; Field 99.99 is the VUID.
+"RTN","C0CMED1",90,0)
+ . ;
+"RTN","C0CMED1",91,0)
+ . ; We use the VUID to look up the RxNorm in file 176.001; same idea.
+"RTN","C0CMED1",92,0)
+ . ; Get IEN first using $$FIND1^DIC, then get the RxNorm number by
+"RTN","C0CMED1",93,0)
+ . ; $$GET1^DIQ.
+"RTN","C0CMED1",94,0)
+ . ;
+"RTN","C0CMED1",95,0)
+ . ; I get the RxNorm name and version from the RxNorm Sources (file
+"RTN","C0CMED1",96,0)
+ . ; 176.003), by searching for "RXNORM", then get the data.
+"RTN","C0CMED1",97,0)
+ . N MEDIEN S MEDIEN=$P(MED(6),U)
+"RTN","C0CMED1",98,0)
+ . D NDF^PSS50(MEDIEN,,,,,"NDF")
+"RTN","C0CMED1",99,0)
+ . N NDFDATA M NDFDATA=^TMP($J,"NDF",MEDIEN)
+"RTN","C0CMED1",100,0)
+ . N NDFIEN S NDFIEN=$P(NDFDATA(20),U)
+"RTN","C0CMED1",101,0)
+ . N VAPROD S VAPROD=$P(NDFDATA(22),U)
+"RTN","C0CMED1",102,0)
+ . ;
+"RTN","C0CMED1",103,0)
+ . ; NDFIEN is not necessarily defined; it won't be if the drug
+"RTN","C0CMED1",104,0)
+ . ; is not matched to the national drug file (e.g. if the drug is
+"RTN","C0CMED1",105,0)
+ . ; new on the market, compounded, or is a fake drug [blue pill].
+"RTN","C0CMED1",106,0)
+ . ; To protect against failure, I will put an if/else block
+"RTN","C0CMED1",107,0)
+ . ;
+"RTN","C0CMED1",108,0)
+ . N VUID,RXNIEN,RXNORM,SRCIEN,RXNNAME,RXNVER
+"RTN","C0CMED1",109,0)
+ . I NDFIEN,$D(^C0CRXN) D  ; $Data is for Systems that don't have our RxNorm file yet.
+"RTN","C0CMED1",110,0)
+ . . S VUID=$$GET1^DIQ(50.68,VAPROD,99.99)
+"RTN","C0CMED1",111,0)
+ . . S RXNIEN=$$FIND1^DIC(176.001,,,VUID,"VUID")
+"RTN","C0CMED1",112,0)
+ . . S RXNORM=$$GET1^DIQ(176.001,RXNIEN,.01)
+"RTN","C0CMED1",113,0)
+ . . S SRCIEN=$$FIND1^DIC(176.003,,"B","RXNORM")
+"RTN","C0CMED1",114,0)
+ . . S RXNNAME=$$GET1^DIQ(176.003,SRCIEN,6)
+"RTN","C0CMED1",115,0)
+ . . S RXNVER=$$GET1^DIQ(176.003,SRCIEN,7)
+"RTN","C0CMED1",116,0)
+ . ;
+"RTN","C0CMED1",117,0)
+ . E  S (RXNORM,RXNNAME,RXNVER)=""
+"RTN","C0CMED1",118,0)
+ . ; End if/else block
+"RTN","C0CMED1",119,0)
+ . S @MAP@("MEDPRODUCTNAMECODEVALUE")=RXNORM
+"RTN","C0CMED1",120,0)
+ . S @MAP@("MEDPRODUCTNAMECODINGINGSYSTEM")=RXNNAME
+"RTN","C0CMED1",121,0)
+ . S @MAP@("MEDPRODUCTNAMECODEVERSION")=RXNVER
+"RTN","C0CMED1",122,0)
+ . ;
+"RTN","C0CMED1",123,0)
+ . S @MAP@("MEDBRANDNAMETEXT")=MED(6.5)
+"RTN","C0CMED1",124,0)
+ . D DOSE^PSS50(MEDIEN,,,,,"DOSE")
+"RTN","C0CMED1",125,0)
+ . N DOSEDATA M DOSEDATA=^TMP($J,"DOSE",MEDIEN)
+"RTN","C0CMED1",126,0)
+ . S @MAP@("MEDSTRENGTHVALUE")=DOSEDATA(901)
+"RTN","C0CMED1",127,0)
+ . S @MAP@("MEDSTRENGTHUNIT")=$P(DOSEDATA(902),U,2)
+"RTN","C0CMED1",128,0)
+ . ; Units, concentration, etc, come from another call
+"RTN","C0CMED1",129,0)
+ . ; $$CPRS^PSNAPIS which returns dosage-form^va class^strengh^unit
+"RTN","C0CMED1",130,0)
+ . ; This call takes nodes 1 and 3 of ^PSDRUG(D0,"ND") as parameters
+"RTN","C0CMED1",131,0)
+ . ; NDF Entry IEN, and VA Product IEN
+"RTN","C0CMED1",132,0)
+ . ; These can be obtained using NDF^PSS50 (IEN,,,,,"SUBSCRIPT")
+"RTN","C0CMED1",133,0)
+ . ; These have been collected above.
+"RTN","C0CMED1",134,0)
+ . N CONCDATA
+"RTN","C0CMED1",135,0)
+ . ; If a drug was not matched to NDF, then the NDFIEN is gonna be ""
+"RTN","C0CMED1",136,0)
+ . ; and this will crash the call. So...
+"RTN","C0CMED1",137,0)
+ . I NDFIEN="" S CONCDATA=""
+"RTN","C0CMED1",138,0)
+ . E  S CONCDATA=$$CPRS^PSNAPIS(NDFIEN,VAPROD)
+"RTN","C0CMED1",139,0)
+ . S @MAP@("MEDFORMTEXT")=$P(CONCDATA,U,1)
+"RTN","C0CMED1",140,0)
+ . S @MAP@("MEDCONCVALUE")=$P(CONCDATA,U,3)
+"RTN","C0CMED1",141,0)
+ . S @MAP@("MEDCONCUNIT")=$P(CONCDATA,U,4)
+"RTN","C0CMED1",142,0)
+ . S @MAP@("MEDQUANTITYVALUE")=MED(7)
+"RTN","C0CMED1",143,0)
+ . ; Oddly, there is no easy place to find the dispense unit.
+"RTN","C0CMED1",144,0)
+ . ; It's not included in the original call, so we have to go to the drug file.
+"RTN","C0CMED1",145,0)
+ . ; That would be DATA^PSS50(IEN,,,,,"SUBSCRIPT")
+"RTN","C0CMED1",146,0)
+ . ; Node 14.5 is the Dispense Unit
+"RTN","C0CMED1",147,0)
+ . D DATA^PSS50(MEDIEN,,,,,"QTY")
+"RTN","C0CMED1",148,0)
+ . N QTYDATA M QTYDATA=^TMP($J,"QTY",MEDIEN)
+"RTN","C0CMED1",149,0)
+ . S @MAP@("MEDQUANTITYUNIT")=QTYDATA(14.5)
+"RTN","C0CMED1",150,0)
+ . ;
+"RTN","C0CMED1",151,0)
+ . ; --- START OF DIRECTIONS ---
+"RTN","C0CMED1",152,0)
+ . ; Sig data not in any API :-(  Oh yes, you can get the whole thing, but...
+"RTN","C0CMED1",153,0)
+ . ; we want the compoenents.
+"RTN","C0CMED1",154,0)
+ . ; It's in node 6 of ^PSRX(IEN)
+"RTN","C0CMED1",155,0)
+ . ; So, here we go again
+"RTN","C0CMED1",156,0)
+ . ; ^PSRX(D0,6,D1,0)= (#.01) DOSAGE ORDERED [1F] ^ (#1) DISPENSE UNITS PER DOSE
+"RTN","C0CMED1",157,0)
+ . ; ==>[2N] ^ (#2) UNITS [3P:50.607] ^ (#3) NOUN [4F] ^ (#4)
+"RTN","C0CMED1",158,0)
+ . ; ==>DURATION [5F] ^ (#5) CONJUNCTION [6S] ^ (#6) ROUTE
+"RTN","C0CMED1",159,0)
+ . ; ==>[7P:51.2] ^ (#7) SCHEDULE [8F] ^ (#8) VERB [9F] ^
+"RTN","C0CMED1",160,0)
+ . ;
+"RTN","C0CMED1",161,0)
+ . N DIRNUM S DIRNUM=0 ; Sigline number
+"RTN","C0CMED1",162,0)
+ . S DIRCNT=0 ; COUNT OF MULTIPLE DIRECTIONS
+"RTN","C0CMED1",163,0)
+ . F  S DIRNUM=$O(^PSRX(RXIEN,6,DIRNUM)) Q:DIRNUM=""  D
+"RTN","C0CMED1",164,0)
+ . . S DIRCNT=DIRCNT+1 ; INCREMENT DIRECTIONS COUNT
+"RTN","C0CMED1",165,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDIRECTIONDESCRIPTIONTEXT")=""  ; This is reserved for systems not able to generate the sig in components.
+"RTN","C0CMED1",166,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDOSEINDICATOR")="1"  ; means that we are specifying it. See E2369-05.
+"RTN","C0CMED1",167,0)
+ . . N SIGDATA S SIGDATA=^PSRX(RXIEN,6,DIRNUM,0)
+"RTN","C0CMED1",168,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDELIVERYMETHOD")=$P(SIGDATA,U,9)
+"RTN","C0CMED1",169,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDOSEVALUE")=$P(SIGDATA,U,1)
+"RTN","C0CMED1",170,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDOSEUNIT")=@MAP@("MEDCONCUNIT")
+"RTN","C0CMED1",171,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDRATEVALUE")=""  ; For inpatient
+"RTN","C0CMED1",172,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDRATEUNIT")=""  ; For inpatient
+"RTN","C0CMED1",173,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDVEHICLETEXT")=""  ; For inpatient
+"RTN","C0CMED1",174,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDIRECTIONROUTETEXT")=$$GET1^DIQ(51.2,$P(SIGDATA,U,7),.01)
+"RTN","C0CMED1",175,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDFREQUENCYVALUE")=$P(SIGDATA,U,8)
+"RTN","C0CMED1",176,0)
+ . . ; Invervals... again another call.
+"RTN","C0CMED1",177,0)
+ . . ; In the wisdom of the original programmers, the schedule is a free text field
+"RTN","C0CMED1",178,0)
+ . . ; However, it gets translated by a call to the administration schedule file
+"RTN","C0CMED1",179,0)
+ . . ; to see if that schedule exists.
+"RTN","C0CMED1",180,0)
+ . . ; That's the same thing I am going to do.
+"RTN","C0CMED1",181,0)
+ . . ; The call is AP^PSS51P1(PSSPP,PSSFT,PSSWDIEN,PSSSTPY,LIST,PSSFREQ).
+"RTN","C0CMED1",182,0)
+ . . ; PSSPP is "PSJ" (for some reason, schedules are stored as PSJ, not PSO--
+"RTN","C0CMED1",183,0)
+ . . ; I looked), PSSFT is the name, and list is the ^TMP name to store the data in.
+"RTN","C0CMED1",184,0)
+ . . ; So...
+"RTN","C0CMED1",185,0)
+ . . D AP^PSS51P1("PSJ",$P(SIGDATA,U,8),,,"SCHEDULE")
+"RTN","C0CMED1",186,0)
+ . . N SCHEDATA M SCHEDATA=^TMP($J,"SCHEDULE")
+"RTN","C0CMED1",187,0)
+ . . N INTERVAL
+"RTN","C0CMED1",188,0)
+ . . I $P(SCHEDATA(0),U)=-1 S INTERVAL=""
+"RTN","C0CMED1",189,0)
+ . . E  D
+"RTN","C0CMED1",190,0)
+ . . . N SUB S SUB=$O(SCHEDATA(0))
+"RTN","C0CMED1",191,0)
+ . . . S INTERVAL=SCHEDATA(SUB,2)
+"RTN","C0CMED1",192,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDINTERVALVALUE")=INTERVAL
+"RTN","C0CMED1",193,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDINTERVALUNIT")="Minute"
+"RTN","C0CMED1",194,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDURATIONVALUE")=$P(SIGDATA,U,5)
+"RTN","C0CMED1",195,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDURATIONUNIT")=""
+"RTN","C0CMED1",196,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPRNFLAG")=$P(SIGDATA,U,8)["PRN"
+"RTN","C0CMED1",197,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMOBJECTID")=""
+"RTN","C0CMED1",198,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMTYPETXT")=""
+"RTN","C0CMED1",199,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMDESCRIPTION")=""
+"RTN","C0CMED1",200,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMCODEVALUE")=""
+"RTN","C0CMED1",201,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMCODINGSYSTEM")=""
+"RTN","C0CMED1",202,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMCODINGVERSION")=""
+"RTN","C0CMED1",203,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMSOURCEACTORID")=""
+"RTN","C0CMED1",204,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDSTOPINDICATOR")=""
+"RTN","C0CMED1",205,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDIRSEQ")=DIRNUM
+"RTN","C0CMED1",206,0)
+ . . N DIRMOD S DIRMOD=$P(SIGDATA,U,6)
+"RTN","C0CMED1",207,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDMULDIRMOD")=$S(DIRMOD="T":"THEN",DIRMOD="A":"AND",DIRMOD="X":"EXCEPT",1:"")
+"RTN","C0CMED1",208,0)
+ . ;
+"RTN","C0CMED1",209,0)
+ . ; --- END OF DIRECTIONS ---
+"RTN","C0CMED1",210,0)
+ . ;
+"RTN","C0CMED1",211,0)
+ . ; ^PSRX(22,"INS1",1,0)="FOR BLOOD PRESSURE"
+"RTN","C0CMED1",212,0)
+ . S @MAP@("MEDPTINSTRUCTIONS")=$G(^PSRX(RXIEN,"INS1",1,0))
+"RTN","C0CMED1",213,0)
+ . ; ^PSRX(22,"PRC",1,0)="Pharmacist: you must obey my command"
+"RTN","C0CMED1",214,0)
+ . S @MAP@("MEDFULLFILLMENTINSTRUCTIONS")=$G(^PSRX(RXIEN,"PRC",1,0))
+"RTN","C0CMED1",215,0)
+ . S @MAP@("MEDRFNO")=MED(9)
+"RTN","C0CMED1",216,0)
+ . N RESULT S RESULT=$NA(^TMP("C0CCCR",$J,"MAPPED"))
+"RTN","C0CMED1",217,0)
+ . K @RESULT
+"RTN","C0CMED1",218,0)
+ . D MAP^C0CXPATH(MINXML,MAP,RESULT)
+"RTN","C0CMED1",219,0)
+ . ; MAPPING DIRECTIONS
+"RTN","C0CMED1",220,0)
+ . N DIRXML1 S DIRXML1="MEDDIR1" ; VARIABLE AND NAME VARIABLE TEMPLATE
+"RTN","C0CMED1",221,0)
+ . N DIRXML2 S DIRXML2="MEDDIR2" ; VARIABLE AND NAME VARIABLE RESULT
+"RTN","C0CMED1",222,0)
+ . D QUERY^C0CXPATH(MINXML,"//Medications/Medication/Directions",DIRXML1)
+"RTN","C0CMED1",223,0)
+ . D REPLACE^C0CXPATH(RESULT,"","//Medications/Medication/Directions")
+"RTN","C0CMED1",224,0)
+ . ; N MDZ1,MDZNA
+"RTN","C0CMED1",225,0)
+ . I DIRCNT>0 D  ; IF THERE ARE DIRCTIONS
+"RTN","C0CMED1",226,0)
+ . . F MDZ1=1:1:DIRCNT  D  ; FOR EACH DIRECTION
+"RTN","C0CMED1",227,0)
+ . . . S MDZNA=$NA(@MAP@("M","DIRECTIONS",MDZ1))
+"RTN","C0CMED1",228,0)
+ . . . D MAP^C0CXPATH(DIRXML1,MDZNA,DIRXML2)
+"RTN","C0CMED1",229,0)
+ . . . D INSERT^C0CXPATH(RESULT,DIRXML2,"//Medications/Medication")
+"RTN","C0CMED1",230,0)
+ . I MEDCOUNT=1 D CP^C0CXPATH(RESULT,OUTXML) ; First one is a copy
+"RTN","C0CMED1",231,0)
+ . E  D INSINNER^C0CXPATH(OUTXML,RESULT) ; AFTER FIRST, INSERT INNER XML
+"RTN","C0CMED1",232,0)
+ N MEDTMP,MEDI
+"RTN","C0CMED1",233,0)
+ D MISSING^C0CXPATH(OUTXML,"MEDTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CMED1",234,0)
+ I MEDTMP(0)>0 D  ; IF THERE ARE MISSING VARS - MARKED AS @@X@@
+"RTN","C0CMED1",235,0)
+ . W "MEDICATION MISSING ",!
+"RTN","C0CMED1",236,0)
+ . F MEDI=1:1:MEDTMP(0) W MEDTMP(MEDI),!
+"RTN","C0CMED1",237,0)
+ Q
+"RTN","C0CMED1",238,0)
+ ;
+"RTN","C0CMED2")
+0^50^B144699326
+"RTN","C0CMED2",1,0)
+C0CMED2 ; WV/CCDCCR/SMH - CCR/CCD Meds - Pending for Vista
+"RTN","C0CMED2",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMED2",3,0)
+ ;;Last Modified Sat Jan 10 21:41:14 PST 2009
+"RTN","C0CMED2",4,0)
+ ; Copyright 2008 WorldVistA.  Licensed under the terms of the GNU
+"RTN","C0CMED2",5,0)
+ ; General Public License See attached copy of the License.
+"RTN","C0CMED2",6,0)
+ ;
+"RTN","C0CMED2",7,0)
+ ; This program is free software; you can redistribute it and/or modify
+"RTN","C0CMED2",8,0)
+ ; it under the terms of the GNU General Public License as published by
+"RTN","C0CMED2",9,0)
+ ; the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMED2",10,0)
+ ; (at your option) any later version.
+"RTN","C0CMED2",11,0)
+ ;
+"RTN","C0CMED2",12,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CMED2",13,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMED2",14,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMED2",15,0)
+ ; GNU General Public License for more details.
+"RTN","C0CMED2",16,0)
+ ;
+"RTN","C0CMED2",17,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CMED2",18,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMED2",19,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMED2",20,0)
+ ;
+"RTN","C0CMED2",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CMED2",22,0)
+ Q
+"RTN","C0CMED2",23,0)
+ ;
+"RTN","C0CMED2",24,0)
+EXTRACT(MINXML,DFN,OUTXML,MEDCOUNT)           ; EXTRACT MEDICATIONS INTO PROVIDED XML TEMPLATE
+"RTN","C0CMED2",25,0)
+ ;
+"RTN","C0CMED2",26,0)
+ ; MINXML is the Input XML Template, passed by name
+"RTN","C0CMED2",27,0)
+ ; DFN is Patient IEN (by Value)
+"RTN","C0CMED2",28,0)
+ ; OUTXML is the resultant XML (by Name)
+"RTN","C0CMED2",29,0)
+ ; MEDCOUNT is the current count of extracted meds, passed by Reference
+"RTN","C0CMED2",30,0)
+ ;
+"RTN","C0CMED2",31,0)
+ ; MEDS is return array from RPC.
+"RTN","C0CMED2",32,0)
+ ; MAP is a mapping variable map (store result) for each med
+"RTN","C0CMED2",33,0)
+ ; MED is holds each array element from MEDS, one medicine
+"RTN","C0CMED2",34,0)
+ ;
+"RTN","C0CMED2",35,0)
+ ; PEN^PSO5241 is a Pharmacy Re-Enginnering (PRE) API to get Pending
+"RTN","C0CMED2",36,0)
+ ; meds data available.
+"RTN","C0CMED2",37,0)
+ ; http://www.va.gov/vdl/documents/Clinical/Pharm-Outpatient_Pharmacy/phar_1_api_r0807.pdf
+"RTN","C0CMED2",38,0)
+ ; Output of API is ^TMP($J,"SUBSCRIPT",DFN,RXIENS).
+"RTN","C0CMED2",39,0)
+ ; File for pending meds is 52.41
+"RTN","C0CMED2",40,0)
+ ; Unfortuantely, API does not supply us with any useful info beyond
+"RTN","C0CMED2",41,0)
+ ; the IEN in 52.41, and the Med Name, and route.
+"RTN","C0CMED2",42,0)
+ ; So, most of the info is going to get pulled from 52.41.
+"RTN","C0CMED2",43,0)
+ N MEDS,MAP
+"RTN","C0CMED2",44,0)
+ K ^TMP($J,"CCDCCR") ; PLEASE DON'T KILL ALL OF ^TMP($J) HERE!!!!
+"RTN","C0CMED2",45,0)
+ D PEN^PSO5241(DFN,"CCDCCR")
+"RTN","C0CMED2",46,0)
+ M MEDS=^TMP($J,"CCDCCR",DFN)
+"RTN","C0CMED2",47,0)
+ ; @(0) contains the number of meds or -1^NO DATA FOUND
+"RTN","C0CMED2",48,0)
+ ; If it is -1, we quit.
+"RTN","C0CMED2",49,0)
+ I $P(MEDS(0),U)=-1 S @OUTXML@(0)=0 QUIT
+"RTN","C0CMED2",50,0)
+ ZWRITE:$G(DEBUG) MEDS
+"RTN","C0CMED2",51,0)
+ N RXIEN S RXIEN=0
+"RTN","C0CMED2",52,0)
+ N MEDFIRST S MEDFIRST=1 ; FLAG FOR FIRST MED IN THIS SECTION FOR MERGING
+"RTN","C0CMED2",53,0)
+ F  S RXIEN=$O(MEDS(RXIEN)) Q:RXIEN="B"  D  ; FOR EACH MEDICATION IN THE LIST
+"RTN","C0CMED2",54,0)
+ . I $$GET1^DIQ(52.41,RXIEN,2,"I")="RF" QUIT  ; Dont' want refill request as a "pending" order
+"RTN","C0CMED2",55,0)
+ . S MEDCOUNT=MEDCOUNT+1
+"RTN","C0CMED2",56,0)
+ . I DEBUG W "RXIEN IS ",RXIEN,!
+"RTN","C0CMED2",57,0)
+ . S MAP=$NA(^TMP("C0CCCR",$J,"MEDMAP",MEDCOUNT))
+"RTN","C0CMED2",58,0)
+ . ; K @MAP DON'T KILL MAP HERE, IT IS DONE IN C0CMED
+"RTN","C0CMED2",59,0)
+ . I DEBUG W "MAP= ",MAP,!
+"RTN","C0CMED2",60,0)
+ . N MED M MED=MEDS(RXIEN) ; PULL OUT MEDICATION FROM
+"RTN","C0CMED2",61,0)
+ . S @MAP@("MEDOBJECTID")="MED_PENDING"_MEDCOUNT ; MEDCOUNT FOR ID
+"RTN","C0CMED2",62,0)
+ . ; S @MAP@("MEDOBJECTID")="MED_PENDING"_MED(.01) ;Pending IEN
+"RTN","C0CMED2",63,0)
+ . S @MAP@("MEDISSUEDATETXT")="Issue Date"
+"RTN","C0CMED2",64,0)
+ . ; Field 6 is "Effective date", and we pull it in timson format w/ I
+"RTN","C0CMED2",65,0)
+ . S @MAP@("MEDISSUEDATE")=$$FMDTOUTC^C0CUTIL($$GET1^DIQ(52.41,RXIEN,6,"I"),"DT")
+"RTN","C0CMED2",66,0)
+ . ; Med never filled; next 4 fields are not applicable.
+"RTN","C0CMED2",67,0)
+ . S @MAP@("MEDLASTFILLDATETXT")=""
+"RTN","C0CMED2",68,0)
+ . S @MAP@("MEDLASTFILLDATE")=""
+"RTN","C0CMED2",69,0)
+ . S @MAP@("MEDRXNOTXT")=""
+"RTN","C0CMED2",70,0)
+ . S @MAP@("MEDRXNO")=""
+"RTN","C0CMED2",71,0)
+ . S @MAP@("MEDTYPETEXT")="Medication"
+"RTN","C0CMED2",72,0)
+ . S @MAP@("MEDDETAILUNADORNED")=""  ; Leave blank, field has its uses
+"RTN","C0CMED2",73,0)
+ . S @MAP@("MEDSTATUSTEXT")="On Hold" ; nearest status for pending meds
+"RTN","C0CMED2",74,0)
+ . S @MAP@("MEDSOURCEACTORID")="ACTORPROVIDER_"_$$GET1^DIQ(52.41,RXIEN,5,"I")
+"RTN","C0CMED2",75,0)
+ . S @MAP@("MEDPRODUCTNAMETEXT")=$P(MED(11),U,2)
+"RTN","C0CMED2",76,0)
+ . ; NDC not supplied in API, but is rather trivial to obtain
+"RTN","C0CMED2",77,0)
+ . ; MED(11) piece 1 has the IEN of the drug (file 50)
+"RTN","C0CMED2",78,0)
+ . ; IEN is field 31 in the drug file.
+"RTN","C0CMED2",79,0)
+ . ;
+"RTN","C0CMED2",80,0)
+ . ; MEDIEN (node 11 in the returned output) might not necessarily be defined
+"RTN","C0CMED2",81,0)
+ . ; It is not defined when a dose in not chosen in CPRS. There is a long
+"RTN","C0CMED2",82,0)
+ . ; series of fields that depend on it. We will use If and Else to deal
+"RTN","C0CMED2",83,0)
+ . ; with that
+"RTN","C0CMED2",84,0)
+ . N MEDIEN S MEDIEN=$P(MED(11),U)
+"RTN","C0CMED2",85,0)
+ . I +MEDIEN>0 D  ; start of if/else block
+"RTN","C0CMED2",86,0)
+ . . ; 12/30/08: I will be using RxNorm for coding...
+"RTN","C0CMED2",87,0)
+ . . ; 176.001 is the file for Concepts; 176.003 is the file for
+"RTN","C0CMED2",88,0)
+ . . ; sources (i.e. for RxNorm Version)
+"RTN","C0CMED2",89,0)
+ . . ;
+"RTN","C0CMED2",90,0)
+ . . ; We need the VUID first for the National Drug File entry first
+"RTN","C0CMED2",91,0)
+ . . ; We get the VUID of the drug, by looking up the VA Product entry
+"RTN","C0CMED2",92,0)
+ . . ; (file 50.68) using the call NDF^PSS50, returned in node 22.
+"RTN","C0CMED2",93,0)
+ . . ; Field 99.99 is the VUID.
+"RTN","C0CMED2",94,0)
+ . . ;
+"RTN","C0CMED2",95,0)
+ . . ; We use the VUID to look up the RxNorm in file 176.001; same idea.
+"RTN","C0CMED2",96,0)
+ . . ; Get IEN first using $$FIND1^DIC, then get the RxNorm number by
+"RTN","C0CMED2",97,0)
+ . . ; $$GET1^DIQ.
+"RTN","C0CMED2",98,0)
+ . . ;
+"RTN","C0CMED2",99,0)
+ . . ; I get the RxNorm name and version from the RxNorm Sources (file
+"RTN","C0CMED2",100,0)
+ . . ; 176.003), by searching for "RXNORM", then get the data.
+"RTN","C0CMED2",101,0)
+ . . D NDF^PSS50(MEDIEN,,,,,"NDF")
+"RTN","C0CMED2",102,0)
+ . . N NDFDATA M NDFDATA=^TMP($J,"NDF",MEDIEN)
+"RTN","C0CMED2",103,0)
+ . . N NDFIEN S NDFIEN=$P(NDFDATA(20),U)
+"RTN","C0CMED2",104,0)
+ . . N VAPROD S VAPROD=$P(NDFDATA(22),U)
+"RTN","C0CMED2",105,0)
+ . . ;
+"RTN","C0CMED2",106,0)
+ . . ; NDFIEN is not necessarily defined; it won't be if the drug
+"RTN","C0CMED2",107,0)
+ . . ; is not matched to the national drug file (e.g. if the drug is
+"RTN","C0CMED2",108,0)
+ . . ; new on the market, compounded, or is a fake drug [blue pill].
+"RTN","C0CMED2",109,0)
+ . . ; To protect against failure, I will put an if/else block
+"RTN","C0CMED2",110,0)
+ . . N VUID,RXNIEN,RXNORM,SRCIEN,RXNNAME,RXNVER
+"RTN","C0CMED2",111,0)
+ . . I NDFIEN,$D(^C0CRXN) D  ; $Data is for Systems that don't have our RxNorm file yet.
+"RTN","C0CMED2",112,0)
+ . . . S VUID=$$GET1^DIQ(50.68,VAPROD,99.99)
+"RTN","C0CMED2",113,0)
+ . . . S RXNIEN=$$FIND1^DIC(176.001,,,VUID,"VUID")
+"RTN","C0CMED2",114,0)
+ . . . S RXNORM=$$GET1^DIQ(176.001,RXNIEN,.01)
+"RTN","C0CMED2",115,0)
+ . . . S SRCIEN=$$FIND1^DIC(176.003,,"B","RXNORM")
+"RTN","C0CMED2",116,0)
+ . . . S RXNNAME=$$GET1^DIQ(176.003,SRCIEN,6)
+"RTN","C0CMED2",117,0)
+ . . . S RXNVER=$$GET1^DIQ(176.003,SRCIEN,7)
+"RTN","C0CMED2",118,0)
+ . . ;
+"RTN","C0CMED2",119,0)
+ . . E  S (RXNORM,RXNNAME,RXNVER)=""
+"RTN","C0CMED2",120,0)
+ . . ; End if/else block
+"RTN","C0CMED2",121,0)
+ . . S @MAP@("MEDPRODUCTNAMECODEVALUE")=RXNORM
+"RTN","C0CMED2",122,0)
+ . . S @MAP@("MEDPRODUCTNAMECODINGINGSYSTEM")=RXNNAME
+"RTN","C0CMED2",123,0)
+ . . S @MAP@("MEDPRODUCTNAMECODEVERSION")=RXNVER
+"RTN","C0CMED2",124,0)
+ . . ;
+"RTN","C0CMED2",125,0)
+ . . S @MAP@("MEDBRANDNAMETEXT")=""
+"RTN","C0CMED2",126,0)
+ . . D DOSE^PSS50(MEDIEN,,,,,"DOSE")
+"RTN","C0CMED2",127,0)
+ . . N DOSEDATA M DOSEDATA=^TMP($J,"DOSE",MEDIEN)
+"RTN","C0CMED2",128,0)
+ . . S @MAP@("MEDSTRENGTHVALUE")=DOSEDATA(901)
+"RTN","C0CMED2",129,0)
+ . . S @MAP@("MEDSTRENGTHUNIT")=$P(DOSEDATA(902),U,2)
+"RTN","C0CMED2",130,0)
+ . . ; Units, concentration, etc, come from another call
+"RTN","C0CMED2",131,0)
+ . . ; $$CPRS^PSNAPIS which returns dosage-form^va class^strengh^unit
+"RTN","C0CMED2",132,0)
+ . . ; This call takes nodes 1 and 3 of ^PSDRUG(D0,"ND") as parameters
+"RTN","C0CMED2",133,0)
+ . . ; NDF Entry IEN, and VA Product Name
+"RTN","C0CMED2",134,0)
+ . . ; These can be obtained using NDF^PSS50 (IEN,,,,,"SUBSCRIPT")
+"RTN","C0CMED2",135,0)
+ . . ; Documented in the same manual; executed above.
+"RTN","C0CMED2",136,0)
+ . . N CONCDATA
+"RTN","C0CMED2",137,0)
+ . . ; If a drug was not matched to NDF, then the NDFIEN is gonna be ""
+"RTN","C0CMED2",138,0)
+ . . ; and this will crash the call. So...
+"RTN","C0CMED2",139,0)
+ . . I NDFIEN="" S CONCDATA=""
+"RTN","C0CMED2",140,0)
+ . . E  S CONCDATA=$$CPRS^PSNAPIS(NDFIEN,VAPROD)
+"RTN","C0CMED2",141,0)
+ . . S @MAP@("MEDFORMTEXT")=$P(CONCDATA,U,1)
+"RTN","C0CMED2",142,0)
+ . . S @MAP@("MEDCONCVALUE")=$P(CONCDATA,U,3)
+"RTN","C0CMED2",143,0)
+ . . S @MAP@("MEDCONCUNIT")=$P(CONCDATA,U,4)
+"RTN","C0CMED2",144,0)
+ . . S @MAP@("MEDQUANTITYVALUE")=$$GET1^DIQ(52.41,RXIEN,12)
+"RTN","C0CMED2",145,0)
+ . . ; Oddly, there is no easy place to find the dispense unit.
+"RTN","C0CMED2",146,0)
+ . . ; It's not included in the original call, so we have to go to the drug file.
+"RTN","C0CMED2",147,0)
+ . . ; That would be DATA^PSS50(IEN,,,,,"SUBSCRIPT")
+"RTN","C0CMED2",148,0)
+ . . ; Node 14.5 is the Dispense Unit
+"RTN","C0CMED2",149,0)
+ . . D DATA^PSS50(MEDIEN,,,,,"QTY")
+"RTN","C0CMED2",150,0)
+ . . N QTYDATA M QTYDATA=^TMP($J,"QTY",MEDIEN)
+"RTN","C0CMED2",151,0)
+ . . S @MAP@("MEDQUANTITYUNIT")=QTYDATA(14.5)
+"RTN","C0CMED2",152,0)
+ . E  D
+"RTN","C0CMED2",153,0)
+ . . S @MAP@("MEDPRODUCTNAMECODEVALUE")=""
+"RTN","C0CMED2",154,0)
+ . . S @MAP@("MEDPRODUCTNAMECODINGINGSYSTEM")=""
+"RTN","C0CMED2",155,0)
+ . . S @MAP@("MEDPRODUCTNAMECODEVERSION")=""
+"RTN","C0CMED2",156,0)
+ . . S @MAP@("MEDBRANDNAMETEXT")=""
+"RTN","C0CMED2",157,0)
+ . . S @MAP@("MEDSTRENGTHVALUE")=""
+"RTN","C0CMED2",158,0)
+ . . S @MAP@("MEDSTRENGTHUNIT")=""
+"RTN","C0CMED2",159,0)
+ . . S @MAP@("MEDFORMTEXT")=""
+"RTN","C0CMED2",160,0)
+ . . S @MAP@("MEDCONCVALUE")=""
+"RTN","C0CMED2",161,0)
+ . . S @MAP@("MEDCONCUNIT")=""
+"RTN","C0CMED2",162,0)
+ . . S @MAP@("MEDSIZETEXT")=""
+"RTN","C0CMED2",163,0)
+ . . S @MAP@("MEDQUANTITYVALUE")=""
+"RTN","C0CMED2",164,0)
+ . . S @MAP@("MEDQUANTITYUNIT")=""
+"RTN","C0CMED2",165,0)
+ . ; end of if/else block
+"RTN","C0CMED2",166,0)
+ . ;
+"RTN","C0CMED2",167,0)
+ . ; --- START OF DIRECTIONS ---
+"RTN","C0CMED2",168,0)
+ . ; Sig data is not in any API. We obtain it using the IEN from
+"RTN","C0CMED2",169,0)
+ . ; the PEN API to file 52.41. It's in field 3, which is a multiple.
+"RTN","C0CMED2",170,0)
+ . ; I will be using FM call GETS^DIQ(FILE,IENS,FIELD,FLAGS,TARGET_ROOT)
+"RTN","C0CMED2",171,0)
+ . K FMSIG ; it's passed via the symbol table, so remove any leftovers from last call
+"RTN","C0CMED2",172,0)
+ . D GETS^DIQ(52.41,RXIEN,"3*",,"FMSIG")
+"RTN","C0CMED2",173,0)
+ . N FMSIGNUM S FMSIGNUM=0 ; Sigline number in fileman.
+"RTN","C0CMED2",174,0)
+ . ; FMSIGNUM gets outputted as "IEN,RXIEN,".
+"RTN","C0CMED2",175,0)
+ . ; DIRNUM will be first piece for IEN.
+"RTN","C0CMED2",176,0)
+ . ; DIRNUM is the proper Sigline numer.
+"RTN","C0CMED2",177,0)
+ . ; SIGDATA is the simplfied array. Subscripts are really field numbers
+"RTN","C0CMED2",178,0)
+ . ; in subfile 52.413.
+"RTN","C0CMED2",179,0)
+ . N DIRCNT S DIRCNT=0 ; COUNT OF DIRECTIONS
+"RTN","C0CMED2",180,0)
+ . F  S FMSIGNUM=$O(FMSIG(52.413,FMSIGNUM)) Q:FMSIGNUM=""  D
+"RTN","C0CMED2",181,0)
+ . . N DIRNUM S DIRNUM=$P(FMSIGNUM,",")
+"RTN","C0CMED2",182,0)
+ . . S DIRCNT=DIRCNT+1 ; INCREMENT DIRECTIONS COUNT
+"RTN","C0CMED2",183,0)
+ . . N SIGDATA M SIGDATA=FMSIG(52.413,FMSIGNUM)
+"RTN","C0CMED2",184,0)
+ . . ; If this is an order for a refill; it's not really a new order; move on to next
+"RTN","C0CMED2",185,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDIRECTIONDESCRIPTIONTEXT")=""  ; This is reserved for systems not able to generate the sig in components.
+"RTN","C0CMED2",186,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDOSEINDICATOR")="1"  ; means that we are specifying it. See E2369-05.
+"RTN","C0CMED2",187,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDELIVERYMETHOD")=SIGDATA(13)
+"RTN","C0CMED2",188,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDOSEVALUE")=SIGDATA(8)
+"RTN","C0CMED2",189,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDOSEUNIT")=@MAP@("MEDCONCUNIT")
+"RTN","C0CMED2",190,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDRATEVALUE")=""  ; For inpatient
+"RTN","C0CMED2",191,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDRATEUNIT")=""  ; For inpatient
+"RTN","C0CMED2",192,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDVEHICLETEXT")=""  ; For inpatient
+"RTN","C0CMED2",193,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDIRECTIONROUTETEXT")=SIGDATA(10)
+"RTN","C0CMED2",194,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDFREQUENCYVALUE")=SIGDATA(1)
+"RTN","C0CMED2",195,0)
+ . . ; Invervals... again another call.
+"RTN","C0CMED2",196,0)
+ . . ; The schedule is a free text field
+"RTN","C0CMED2",197,0)
+ . . ; However, it gets translated by a call to the administration
+"RTN","C0CMED2",198,0)
+ . . ; schedule file to see if that schedule exists.
+"RTN","C0CMED2",199,0)
+ . . ; That's the same thing I am going to do.
+"RTN","C0CMED2",200,0)
+ . . ; The call is AP^PSS51P1(PSSPP,PSSFT,PSSWDIEN,PSSSTPY,LIST,PSSFREQ).
+"RTN","C0CMED2",201,0)
+ . . ; PSSPP is "PSJ" (for some reason, schedules are stored as PSJ, not PSO--
+"RTN","C0CMED2",202,0)
+ . . ; I looked), PSSFT is the name,
+"RTN","C0CMED2",203,0)
+ . . ; and list is the ^TMP name to store the data in.
+"RTN","C0CMED2",204,0)
+ . . ; Also, freqency may have "PRN" in it, so strip that out
+"RTN","C0CMED2",205,0)
+ . . N FREQ S FREQ=SIGDATA(1)
+"RTN","C0CMED2",206,0)
+ . . I FREQ["PRN" S FREQ=$E(FREQ,1,$F(FREQ,"PRN")-5) ; 5 for $L("PRN") + 1 + sp
+"RTN","C0CMED2",207,0)
+ . . D AP^PSS51P1("PSJ",FREQ,,,"SCHEDULE")
+"RTN","C0CMED2",208,0)
+ . . N SCHEDATA M SCHEDATA=^TMP($J,"SCHEDULE")
+"RTN","C0CMED2",209,0)
+ . . N INTERVAL
+"RTN","C0CMED2",210,0)
+ . . I $P(SCHEDATA(0),U)=-1 S INTERVAL=""
+"RTN","C0CMED2",211,0)
+ . . E  D
+"RTN","C0CMED2",212,0)
+ . . . N SUB S SUB=$O(SCHEDATA(0))
+"RTN","C0CMED2",213,0)
+ . . . S INTERVAL=SCHEDATA(SUB,2)
+"RTN","C0CMED2",214,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDINTERVALVALUE")=INTERVAL
+"RTN","C0CMED2",215,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDINTERVALUNIT")="Minute"
+"RTN","C0CMED2",216,0)
+ . . ; Duration comes as M2,H2,D2,W2,L2 for 2 minutes,hours,days,weeks,months
+"RTN","C0CMED2",217,0)
+ . . N DUR S DUR=SIGDATA(2)
+"RTN","C0CMED2",218,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDURATIONVALUE")=$E(DUR,2,$L(DUR))
+"RTN","C0CMED2",219,0)
+ . . N DURUNIT S DURUNIT=$E(DUR)
+"RTN","C0CMED2",220,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDURATIONUNIT")=$S(DURUNIT="M":"Minutes",DURUNIT="H":"Hours",DURUNIT="D":"Days",DURUNIT="W":"Weeks",DURUNIT="L":"Months",1:"")
+"RTN","C0CMED2",221,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPRNFLAG")=SIGDATA(1)["PRN"
+"RTN","C0CMED2",222,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMOBJECTID")=""
+"RTN","C0CMED2",223,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMTYPETXT")=""
+"RTN","C0CMED2",224,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMDESCRIPTION")=""
+"RTN","C0CMED2",225,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMCODEVALUE")=""
+"RTN","C0CMED2",226,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMCODINGSYSTEM")=""
+"RTN","C0CMED2",227,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMCODINGVERSION")=""
+"RTN","C0CMED2",228,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMSOURCEACTORID")=""
+"RTN","C0CMED2",229,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDSTOPINDICATOR")="" ; Vista doesn't have that field
+"RTN","C0CMED2",230,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDIRSEQ")=DIRNUM
+"RTN","C0CMED2",231,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDMULDIRMOD")=SIGDATA(6)
+"RTN","C0CMED2",232,0)
+ . ;
+"RTN","C0CMED2",233,0)
+ . ; --- END OF DIRECTIONS ---
+"RTN","C0CMED2",234,0)
+ . ;
+"RTN","C0CMED2",235,0)
+ . ; S @MAP@("MEDPTINSTRUCTIONS","F")="52.41^105"
+"RTN","C0CMED2",236,0)
+ . S @MAP@("MEDPTINSTRUCTIONS")=$G(^PSRX(RXIEN,"PI",1,0)) ;GPL
+"RTN","C0CMED2",237,0)
+ . ; W @MAP@("MEDPTINSTRUCTIONS"),!
+"RTN","C0CMED2",238,0)
+ . ; S @MAP@("MEDFULLFILLMENTINSTRUCTIONS","F")="52.41^9"
+"RTN","C0CMED2",239,0)
+ . S @MAP@("MEDFULLFILLMENTINSTRUCTIONS")=$G(^PSRX(RXIEN,"SIG1",1,0)) ;GPL
+"RTN","C0CMED2",240,0)
+ . ; W @MAP@("MEDFULLFILLMENTINSTRUCTIONS"),!
+"RTN","C0CMED2",241,0)
+ . S @MAP@("MEDRFNO")=$$GET1^DIQ(52.41,RXIEN,13)
+"RTN","C0CMED2",242,0)
+ . N RESULT S RESULT=$NA(^TMP("C0CCCR",$J,"MAPPED"))
+"RTN","C0CMED2",243,0)
+ . K @RESULT
+"RTN","C0CMED2",244,0)
+ . D MAP^C0CXPATH(MINXML,MAP,RESULT)
+"RTN","C0CMED2",245,0)
+ . ; D PARY^C0CXPATH(RESULT)
+"RTN","C0CMED2",246,0)
+ . ; MAPPING DIRECTIONS
+"RTN","C0CMED2",247,0)
+ . N MEDDIR1,DIRXML1 S DIRXML1="MEDDIR1" ; VARIABLE AND NAME VARIABLE TEMPLATE
+"RTN","C0CMED2",248,0)
+ . N MEDDIR2,DIRXML2 S DIRXML2="MEDDIR2" ; VARIABLE AND NAME VARIABLE RESULT
+"RTN","C0CMED2",249,0)
+ . D QUERY^C0CXPATH(MINXML,"//Medications/Medication/Directions",DIRXML1)
+"RTN","C0CMED2",250,0)
+ . D REPLACE^C0CXPATH(RESULT,"","//Medications/Medication/Directions")
+"RTN","C0CMED2",251,0)
+ . ; N MDZ1,MDZNA
+"RTN","C0CMED2",252,0)
+ . I DIRCNT>0 D  ; IF THERE ARE DIRCTIONS
+"RTN","C0CMED2",253,0)
+ . . F MDZ1=1:1:DIRCNT  D  ; FOR EACH DIRECTION
+"RTN","C0CMED2",254,0)
+ . . . S MDZNA=$NA(@MAP@("M","DIRECTIONS",MDZ1))
+"RTN","C0CMED2",255,0)
+ . . . D MAP^C0CXPATH(DIRXML1,MDZNA,DIRXML2)
+"RTN","C0CMED2",256,0)
+ . . . D INSERT^C0CXPATH(RESULT,DIRXML2,"//Medications/Medication")
+"RTN","C0CMED2",257,0)
+ . I MEDFIRST D  ;
+"RTN","C0CMED2",258,0)
+ . . S MEDFIRST=0 ; RESET FIRST FLAG
+"RTN","C0CMED2",259,0)
+ . . D CP^C0CXPATH(RESULT,OUTXML) ; First one is a copy
+"RTN","C0CMED2",260,0)
+ . D:'MEDFIRST INSINNER^C0CXPATH(OUTXML,RESULT) ; AFTER FIRST, INSERT INNER
+"RTN","C0CMED2",261,0)
+ N MEDTMP,MEDI
+"RTN","C0CMED2",262,0)
+ D MISSING^C0CXPATH(OUTXML,"MEDTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CMED2",263,0)
+ I MEDTMP(0)>0 D  ; IF THERE ARE MISSING VARS - MARKED AS @@X@@
+"RTN","C0CMED2",264,0)
+ . W "Pending Medication MISSING ",!
+"RTN","C0CMED2",265,0)
+ . F MEDI=1:1:MEDTMP(0) W MEDTMP(MEDI),!
+"RTN","C0CMED2",266,0)
+ Q
+"RTN","C0CMED2",267,0)
+ ;
+"RTN","C0CMED3")
+0^51^B172422279
+"RTN","C0CMED3",1,0)
+C0CMED3 ; WV/CCDCCR/SMH - Meds: Non-VA/Outside Meds for Vista
+"RTN","C0CMED3",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMED3",3,0)
+ ;;Last Modified: Sun Jan 11 05:45:03 UTC 2009
+"RTN","C0CMED3",4,0)
+ ; Copyright 2009 WorldVistA.  Licensed under the terms of the GNU
+"RTN","C0CMED3",5,0)
+ ; General Public License See attached copy of the License.
+"RTN","C0CMED3",6,0)
+ ;
+"RTN","C0CMED3",7,0)
+ ; This program is free software; you can redistribute it and/or modify
+"RTN","C0CMED3",8,0)
+ ; it under the terms of the GNU General Public License as published by
+"RTN","C0CMED3",9,0)
+ ; the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMED3",10,0)
+ ; (at your option) any later version.
+"RTN","C0CMED3",11,0)
+ ;
+"RTN","C0CMED3",12,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CMED3",13,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMED3",14,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMED3",15,0)
+ ; GNU General Public License for more details.
+"RTN","C0CMED3",16,0)
+ ;
+"RTN","C0CMED3",17,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CMED3",18,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMED3",19,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMED3",20,0)
+ ;
+"RTN","C0CMED3",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CMED3",22,0)
+ Q
+"RTN","C0CMED3",23,0)
+ ;
+"RTN","C0CMED3",24,0)
+EXTRACT(MINXML,DFN,OUTXML,MEDCOUNT) ; Extract medications into provided xml template
+"RTN","C0CMED3",25,0)
+ ;
+"RTN","C0CMED3",26,0)
+ ; MINXML is the Input XML Template, (passed by name)
+"RTN","C0CMED3",27,0)
+ ; DFN is Patient IEN (passed by value)
+"RTN","C0CMED3",28,0)
+ ; OUTXML is the resultant XML (passed by name)
+"RTN","C0CMED3",29,0)
+ ; MEDCOUNT is the number of Meds extracted so far (passed by reference)
+"RTN","C0CMED3",30,0)
+ ;
+"RTN","C0CMED3",31,0)
+ ; MEDS is return array from RPC.
+"RTN","C0CMED3",32,0)
+ ; MAP is a mapping variable map (store result) for each med
+"RTN","C0CMED3",33,0)
+ ; MED is holds each array element from MEDS, one medicine
+"RTN","C0CMED3",34,0)
+ ;
+"RTN","C0CMED3",35,0)
+ ; Non-VA meds don't have an API. They are stored in file 55, subfile 52.2
+"RTN","C0CMED3",36,0)
+ ; Discontinued meds are indicated by the presence of a value in fields
+"RTN","C0CMED3",37,0)
+ ; 5 or 6 (STATUS 1 or 2, and DISCONTINUED DATE)
+"RTN","C0CMED3",38,0)
+ ; Will use Fileman API GETS^DIQ
+"RTN","C0CMED3",39,0)
+ ;
+"RTN","C0CMED3",40,0)
+ N MEDS,MAP
+"RTN","C0CMED3",41,0)
+ K ^TMP($J,"CCDCCR") ; PLEASE DON'T KILL ALL OF ^TMP($J) HERE!!!!
+"RTN","C0CMED3",42,0)
+ N NVA
+"RTN","C0CMED3",43,0)
+ D GETS^DIQ(55,DFN,"52.2*","IE","NVA") ; Output in NVA in FDA array format.
+"RTN","C0CMED3",44,0)
+ ; If NVA does not exist, then patient has no non-VA meds
+"RTN","C0CMED3",45,0)
+ I $D(NVA)=0 S @OUTXML@(0)=0 QUIT
+"RTN","C0CMED3",46,0)
+ ; Otherwise, we go on...
+"RTN","C0CMED3",47,0)
+ M MEDS=NVA(55.05)
+"RTN","C0CMED3",48,0)
+ ; We are done with NVA
+"RTN","C0CMED3",49,0)
+ K NVA
+"RTN","C0CMED3",50,0)
+ ;
+"RTN","C0CMED3",51,0)
+ I DEBUG ZWRITE MEDS
+"RTN","C0CMED3",52,0)
+ N FDAIEN S FDAIEN=0 ; For use in $Order in the MEDS array.
+"RTN","C0CMED3",53,0)
+ N MEDFIRST S MEDFIRST=1 ; FLAG FOR FIRST MED PROCESSED HERE
+"RTN","C0CMED3",54,0)
+ F  S FDAIEN=$O(MEDS(FDAIEN)) Q:FDAIEN=""  D  ; FOR EACH MEDICATION IN THE LIST
+"RTN","C0CMED3",55,0)
+ . N MED M MED=MEDS(FDAIEN)
+"RTN","C0CMED3",56,0)
+ . I MED(5,"I")!MED(6,"I") QUIT  ; If disconinued, we don't want to pull it.
+"RTN","C0CMED3",57,0)
+ . S MEDCOUNT=MEDCOUNT+1
+"RTN","C0CMED3",58,0)
+ . S MAP=$NA(^TMP("C0CCCR",$J,"MEDMAP",MEDCOUNT))
+"RTN","C0CMED3",59,0)
+ . N RXIEN S RXIEN=$P(FDAIEN,",") ; First piece of FDAIEN is the number of the med for this patient
+"RTN","C0CMED3",60,0)
+ . I DEBUG W "RXIEN IS ",RXIEN,!
+"RTN","C0CMED3",61,0)
+ . I DEBUG W "MAP= ",MAP,!
+"RTN","C0CMED3",62,0)
+ . S @MAP@("MEDOBJECTID")="MED_OUTSIDE"_MEDCOUNT ; MEDCOUNT FOR ID
+"RTN","C0CMED3",63,0)
+ . S @MAP@("MEDISSUEDATETXT")="Documented Date"
+"RTN","C0CMED3",64,0)
+ . ; Field 6 is "Effective date", and we pull it in timson format w/ I
+"RTN","C0CMED3",65,0)
+ . S @MAP@("MEDISSUEDATE")=$$FMDTOUTC^C0CUTIL(MED(11,"I"),"DT")
+"RTN","C0CMED3",66,0)
+ . ; Med never filled; next 4 fields are not applicable.
+"RTN","C0CMED3",67,0)
+ . S @MAP@("MEDLASTFILLDATETXT")=""
+"RTN","C0CMED3",68,0)
+ . S @MAP@("MEDLASTFILLDATE")=""
+"RTN","C0CMED3",69,0)
+ . S @MAP@("MEDRXNOTXT")=""
+"RTN","C0CMED3",70,0)
+ . S @MAP@("MEDRXNO")=""
+"RTN","C0CMED3",71,0)
+ . S @MAP@("MEDTYPETEXT")="Medication"
+"RTN","C0CMED3",72,0)
+ . S @MAP@("MEDDETAILUNADORNED")=""  ; Leave blank, field has its uses
+"RTN","C0CMED3",73,0)
+ . S @MAP@("MEDSTATUSTEXT")="Active" ; nearest status for pending meds
+"RTN","C0CMED3",74,0)
+ . S @MAP@("MEDSOURCEACTORID")="ACTORPROVIDER_"_MED(12,"I")
+"RTN","C0CMED3",75,0)
+ . S @MAP@("MEDPRODUCTNAMETEXT")=MED(.01,"E")
+"RTN","C0CMED3",76,0)
+ . ; NDC is field 31 in the drug file.
+"RTN","C0CMED3",77,0)
+ . ; The actual drug entry in the drug file (MEDIEN) is not necessarily supplied.
+"RTN","C0CMED3",78,0)
+ . ; It' node 1, internal form.
+"RTN","C0CMED3",79,0)
+ . N MEDIEN S MEDIEN=MED(1,"I")
+"RTN","C0CMED3",80,0)
+ . I +MEDIEN D  ; start of if/else block
+"RTN","C0CMED3",81,0)
+ . . ; 12/30/08: I will be using RxNorm for coding...
+"RTN","C0CMED3",82,0)
+ . . ; 176.001 is the file for Concepts; 176.003 is the file for
+"RTN","C0CMED3",83,0)
+ . . ; sources (i.e. for RxNorm Version)
+"RTN","C0CMED3",84,0)
+ . . ;
+"RTN","C0CMED3",85,0)
+ . . ; We need the VUID first for the National Drug File entry first
+"RTN","C0CMED3",86,0)
+ . . ; We get the VUID of the drug, by looking up the VA Product entry
+"RTN","C0CMED3",87,0)
+ . . ; (file 50.68) using the call NDF^PSS50, returned in node 22.
+"RTN","C0CMED3",88,0)
+ . . ; Field 99.99 is the VUID.
+"RTN","C0CMED3",89,0)
+ . . ;
+"RTN","C0CMED3",90,0)
+ . . ; We use the VUID to look up the RxNorm in file 176.001; same idea.
+"RTN","C0CMED3",91,0)
+ . . ; Get IEN first using $$FIND1^DIC, then get the RxNorm number by
+"RTN","C0CMED3",92,0)
+ . . ; $$GET1^DIQ.
+"RTN","C0CMED3",93,0)
+ . . ;
+"RTN","C0CMED3",94,0)
+ . . ; I get the RxNorm name and version from the RxNorm Sources (file
+"RTN","C0CMED3",95,0)
+ . . ; 176.003), by searching for "RXNORM", then get the data.
+"RTN","C0CMED3",96,0)
+ . . ; NDF^PSS50 ONLY EXISTS ON VISTA
+"RTN","C0CMED3",97,0)
+ . . N NDFDATA,NDFIEN,VAPROD
+"RTN","C0CMED3",98,0)
+ . . S NDFIEN=""
+"RTN","C0CMED3",99,0)
+ . . I '$$RPMS^C0CUTIL() D
+"RTN","C0CMED3",100,0)
+ . . . D NDF^PSS50(MEDIEN,,,,,"NDF")
+"RTN","C0CMED3",101,0)
+ . . . ;N NDFDATA M NDFDATA=^TMP($J,"NDF",MEDIEN)
+"RTN","C0CMED3",102,0)
+ . . . ;N NDFIEN S NDFIEN=$P(NDFDATA(20),U)
+"RTN","C0CMED3",103,0)
+ . . . ;N VAPROD S VAPROD=$P(NDFDATA(22),U)
+"RTN","C0CMED3",104,0)
+ . . . M NDFDATA=^TMP($J,"NDF",MEDIEN)
+"RTN","C0CMED3",105,0)
+ . . . S NDFIEN=$P(NDFDATA(20),U)
+"RTN","C0CMED3",106,0)
+ . . . S VAPROD=$P(NDFDATA(22),U)
+"RTN","C0CMED3",107,0)
+ . . . S @MAP@("MEDPRODUCTNAMETEXT")=$$GET1^DIQ(50.68,VAPROD,.01) ;
+"RTN","C0CMED3",108,0)
+ . . ; GPL - RESET THE NAME TO THE REAL NAME OF THE DRUG NOW THAT WE
+"RTN","C0CMED3",109,0)
+ . . ;   HAVE IT. 
+"RTN","C0CMED3",110,0)
+ . . ;
+"RTN","C0CMED3",111,0)
+ . . ; NDFIEN is not necessarily defined; it won't be if the drug
+"RTN","C0CMED3",112,0)
+ . . ; is not matched to the national drug file (e.g. if the drug is
+"RTN","C0CMED3",113,0)
+ . . ; new on the market, compounded, or is a fake drug [blue pill].
+"RTN","C0CMED3",114,0)
+ . . ; To protect against failure, I will put an if/else block
+"RTN","C0CMED3",115,0)
+ . . N VUID,RXNIEN,RXNORM,SRCIEN,RXNNAME,RXNVER
+"RTN","C0CMED3",116,0)
+ . . ; 
+"RTN","C0CMED3",117,0)
+ . . ; begin changes for systems that have eRx installed
+"RTN","C0CMED3",118,0)
+ . . ; RxNorm is found in the ^C0P("RXN") global - gpl
+"RTN","C0CMED3",119,0)
+ . . ;
+"RTN","C0CMED3",120,0)
+ . . N ZC,ZCD,ZCDS,ZCDSV ; CODE,CODE SYSTEM,CODE VERSION
+"RTN","C0CMED3",121,0)
+ . . S (ZC,ZCD,ZCDS,ZCDSV)="" ; INITIALIZE
+"RTN","C0CMED3",122,0)
+ . . S (RXNORM,RXNNAME,RXNVER)="" ;INITIALIZE
+"RTN","C0CMED3",123,0)
+ . . I NDFIEN,$D(^C0P("RXN")) D  ; 
+"RTN","C0CMED3",124,0)
+ . . . S VUID=$$GET1^DIQ(50.68,VAPROD,99.99)
+"RTN","C0CMED3",125,0)
+ . . . S ZC=$$CODE^C0CUTIL(VUID)
+"RTN","C0CMED3",126,0)
+ . . . S ZCD=$P(ZC,"^",1) ; CODE TO USE
+"RTN","C0CMED3",127,0)
+ . . . S ZCDS=$P(ZC,"^",2) ; CODING SYSTEM - RXNORM OR VUID
+"RTN","C0CMED3",128,0)
+ . . . S ZCDSV=$P(ZC,"^",3) ; CODING SYSTEM VERSION
+"RTN","C0CMED3",129,0)
+ . . . S RXNORM=ZCD ; THE CODE
+"RTN","C0CMED3",130,0)
+ . . . S RXNNAME=ZCDS ; THE CODING SYSTEM
+"RTN","C0CMED3",131,0)
+ . . . S RXNVER=ZCDSV ; THE CODING SYSTEM VERSION
+"RTN","C0CMED3",132,0)
+ . . . N ZGMED S ZGMED=@MAP@("MEDPRODUCTNAMETEXT")
+"RTN","C0CMED3",133,0)
+ . . . S @MAP@("MEDPRODUCTNAMETEXT")=ZGMED_" "_ZCDS_": "_ZCD
+"RTN","C0CMED3",134,0)
+ . . E  I NDFIEN,$D(^C0CRXN) D  ; $Data is for Systems that don't have our RxNorm file yet.
+"RTN","C0CMED3",135,0)
+ . . . S VUID=$$GET1^DIQ(50.68,VAPROD,99.99)
+"RTN","C0CMED3",136,0)
+ . . . S RXNIEN=$$FIND1^DIC(176.001,,,VUID,"VUID")
+"RTN","C0CMED3",137,0)
+ . . . S RXNORM=$$GET1^DIQ(176.001,RXNIEN,.01)
+"RTN","C0CMED3",138,0)
+ . . . S SRCIEN=$$FIND1^DIC(176.003,,"B","RXNORM")
+"RTN","C0CMED3",139,0)
+ . . . S RXNNAME=$$GET1^DIQ(176.003,SRCIEN,6)
+"RTN","C0CMED3",140,0)
+ . . . S RXNVER=$$GET1^DIQ(176.003,SRCIEN,7)
+"RTN","C0CMED3",141,0)
+ . . ;
+"RTN","C0CMED3",142,0)
+ . . ;E  S (RXNORM,RXNNAME,RXNVER)=""
+"RTN","C0CMED3",143,0)
+ . . ; End if/else block
+"RTN","C0CMED3",144,0)
+ . . S @MAP@("MEDPRODUCTNAMECODEVALUE")=RXNORM
+"RTN","C0CMED3",145,0)
+ . . S @MAP@("MEDPRODUCTNAMECODINGINGSYSTEM")=RXNNAME
+"RTN","C0CMED3",146,0)
+ . . S @MAP@("MEDPRODUCTNAMECODEVERSION")=RXNVER
+"RTN","C0CMED3",147,0)
+ . . ;
+"RTN","C0CMED3",148,0)
+ . . S @MAP@("MEDBRANDNAMETEXT")=""
+"RTN","C0CMED3",149,0)
+ . . ; DOSE^PSS50 ONLY ESISTS ON VISTA
+"RTN","C0CMED3",150,0)
+ . . I '$$RPMS^C0CUTIL() D
+"RTN","C0CMED3",151,0)
+ . . . D DOSE^PSS50(MEDIEN,,,,,"DOSE")
+"RTN","C0CMED3",152,0)
+ . . . N DOSEDATA M DOSEDATA=^TMP($J,"DOSE",MEDIEN)
+"RTN","C0CMED3",153,0)
+ . . . S @MAP@("MEDSTRENGTHVALUE")=DOSEDATA(901)
+"RTN","C0CMED3",154,0)
+ . . . S @MAP@("MEDSTRENGTHUNIT")=$P(DOSEDATA(902),U,2)
+"RTN","C0CMED3",155,0)
+ . . E  S @MAP@("MEDSTRENGTHVALUE")="" S @MAP@("MEDSTRENGTHUNIT")=""
+"RTN","C0CMED3",156,0)
+ . . ; Units, concentration, etc, come from another call
+"RTN","C0CMED3",157,0)
+ . . ; $$CPRS^PSNAPIS which returns dosage-form^va class^strengh^unit
+"RTN","C0CMED3",158,0)
+ . . ; This call takes nodes 1 and 3 of ^PSDRUG(D0,"ND") as parameters
+"RTN","C0CMED3",159,0)
+ . . ; NDF Entry IEN, and VA Product Name
+"RTN","C0CMED3",160,0)
+ . . ; These can be obtained using NDF^PSS50 (IEN,,,,,"SUBSCRIPT")
+"RTN","C0CMED3",161,0)
+ . . ; Documented in the same manual; executed above.
+"RTN","C0CMED3",162,0)
+ . . ;
+"RTN","C0CMED3",163,0)
+ . . ; If a drug was not matched to NDF, then the NDFIEN is gonna be ""
+"RTN","C0CMED3",164,0)
+ . . ; and this will crash the call. So...
+"RTN","C0CMED3",165,0)
+ . . I NDFIEN="" S CONCDATA=""
+"RTN","C0CMED3",166,0)
+ . . E  S CONCDATA=$$CPRS^PSNAPIS(NDFIEN,VAPROD)
+"RTN","C0CMED3",167,0)
+ . . S @MAP@("MEDFORMTEXT")=$P(CONCDATA,U,1)
+"RTN","C0CMED3",168,0)
+ . . S @MAP@("MEDCONCVALUE")=$P(CONCDATA,U,3)
+"RTN","C0CMED3",169,0)
+ . . S @MAP@("MEDCONCUNIT")=$P(CONCDATA,U,4)
+"RTN","C0CMED3",170,0)
+ . . S @MAP@("MEDQUANTITYVALUE")=""  ; not provided for in Non-VA meds.
+"RTN","C0CMED3",171,0)
+ . . ; Oddly, there is no easy place to find the dispense unit.
+"RTN","C0CMED3",172,0)
+ . . ; It's not included in the original call, so we have to go to the drug file.
+"RTN","C0CMED3",173,0)
+ . . ; That would be DATA^PSS50(IEN,,,,,"SUBSCRIPT")
+"RTN","C0CMED3",174,0)
+ . . ; Node 14.5 is the Dispense Unit
+"RTN","C0CMED3",175,0)
+ . . ; PSS50 ONLY EXISTS ON VISTA
+"RTN","C0CMED3",176,0)
+ . . I '$$RPMS^C0CUTIL() D
+"RTN","C0CMED3",177,0)
+ . . . D DATA^PSS50(MEDIEN,,,,,"QTY")
+"RTN","C0CMED3",178,0)
+ . . . N QTYDATA M QTYDATA=^TMP($J,"QTY",MEDIEN)
+"RTN","C0CMED3",179,0)
+ . . . S @MAP@("MEDQUANTITYUNIT")=QTYDATA(14.5)
+"RTN","C0CMED3",180,0)
+ . . E  S @MAP@("MEDQUANTITYUNIT")=""
+"RTN","C0CMED3",181,0)
+ . . S @MAP@("MEDQUANTITYUNIT")="" ; don't show these
+"RTN","C0CMED3",182,0)
+ . E  D
+"RTN","C0CMED3",183,0)
+ . . S @MAP@("MEDPRODUCTNAMECODEVALUE")=""
+"RTN","C0CMED3",184,0)
+ . . S @MAP@("MEDPRODUCTNAMECODINGINGSYSTEM")=""
+"RTN","C0CMED3",185,0)
+ . . S @MAP@("MEDPRODUCTNAMECODEVERSION")=""
+"RTN","C0CMED3",186,0)
+ . . S @MAP@("MEDBRANDNAMETEXT")=""
+"RTN","C0CMED3",187,0)
+ . . S @MAP@("MEDSTRENGTHVALUE")=""
+"RTN","C0CMED3",188,0)
+ . . S @MAP@("MEDSTRENGTHUNIT")=""
+"RTN","C0CMED3",189,0)
+ . . S @MAP@("MEDFORMTEXT")=""
+"RTN","C0CMED3",190,0)
+ . . S @MAP@("MEDCONCVALUE")=""
+"RTN","C0CMED3",191,0)
+ . . S @MAP@("MEDCONCUNIT")=""
+"RTN","C0CMED3",192,0)
+ . . S @MAP@("MEDSIZETEXT")=""
+"RTN","C0CMED3",193,0)
+ . . S @MAP@("MEDQUANTITYVALUE")=""
+"RTN","C0CMED3",194,0)
+ . . S @MAP@("MEDQUANTITYUNIT")=""
+"RTN","C0CMED3",195,0)
+ . ; End If/Else
+"RTN","C0CMED3",196,0)
+ . ; --- START OF DIRECTIONS ---
+"RTN","C0CMED3",197,0)
+ . ; Dosage is field 2, route is 3, schedule is 4
+"RTN","C0CMED3",198,0)
+ . ; These are all free text fields, and don't point to any files
+"RTN","C0CMED3",199,0)
+ . ; For that reason, I will use the field I never used before:
+"RTN","C0CMED3",200,0)
+ . ; MEDDIRECTIONDESCRIPTIONTEXT
+"RTN","C0CMED3",201,0)
+ . S DIRCNT=1 ; THERE IS ONLY ONE DIRECTION FOR OUTSIDE MEDS
+"RTN","C0CMED3",202,0)
+ . ;
+"RTN","C0CMED3",203,0)
+ . ; change for eRx meds - gpl 6/25/2011
+"RTN","C0CMED3",204,0)
+ . ;
+"RTN","C0CMED3",205,0)
+ . N ZERX S ZERX=MED(2,"E")_" "_MED(3,"E")_" "_MED(4,"E")
+"RTN","C0CMED3",206,0)
+ . I ZERX["|" S ZERX=$P(ZERX,"|",2) ; GET RID OF MED NAME
+"RTN","C0CMED3",207,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDIRECTIONDESCRIPTIONTEXT")=ZERX
+"RTN","C0CMED3",208,0)
+ . N ZERX2 S ZERX2=$P(MED(2,"E"),"|",2) ; sig for quantity
+"RTN","C0CMED3",209,0)
+ . N ZFDBDRUG S ZFDBDRUG=$P(MED(2,"E"),"|",1) ; FDB DRUG NAME
+"RTN","C0CMED3",210,0)
+ . I @MAP@("MEDPRODUCTNAMETEXT")["FREE TXT" D  ; FIX THE DRUG NAME
+"RTN","C0CMED3",211,0)
+ . . S @MAP@("MEDPRODUCTNAMETEXT")=ZFDBDRUG ; USE FDB NAME
+"RTN","C0CMED3",212,0)
+ . . S RXNORM=$P($P($G(MED(14,7)),"RXNORM:",2)," ",1) ; THE RXNORM
+"RTN","C0CMED3",213,0)
+ . . S RXNORM=$$NISTMAP^C0CUTIL(RXNORM) ; CHANGE IF NECESSARY
+"RTN","C0CMED3",214,0)
+ . . I RXNORM'="" D  ;
+"RTN","C0CMED3",215,0)
+ . . . W !,"FOUND FREE TEXT RXNORM:",RXNORM
+"RTN","C0CMED3",216,0)
+ . . . S RXNNAME="RXNORM" ; THE CODING SYSTEM
+"RTN","C0CMED3",217,0)
+ . . . S RXNVER="" ; THE CODING SYSTEM VERSION
+"RTN","C0CMED3",218,0)
+ . . . N ZGMED S ZGMED=@MAP@("MEDPRODUCTNAMETEXT")
+"RTN","C0CMED3",219,0)
+ . . . S @MAP@("MEDPRODUCTNAMETEXT")=ZGMED_" "_RXNNAME_": "_RXNORM
+"RTN","C0CMED3",220,0)
+ . . . S @MAP@("MEDPRODUCTNAMECODEVALUE")=RXNORM
+"RTN","C0CMED3",221,0)
+ . . . S @MAP@("MEDPRODUCTNAMECODINGINGSYSTEM")=RXNNAME
+"RTN","C0CMED3",222,0)
+ . . . S @MAP@("MEDPRODUCTNAMECODEVERSION")=RXNVER
+"RTN","C0CMED3",223,0)
+ . . . I RXNORM["979334" D  ; PATCH FOR CERTIFICATION
+"RTN","C0CMED3",224,0)
+ . . . . S @MAP@("MEDSTRENGTHVALUE")=650
+"RTN","C0CMED3",225,0)
+ . . . . S @MAP@("MEDSTRENGTHUNIT")="mcg"
+"RTN","C0CMED3",226,0)
+ . . . . S @MAP@("MEDFORMTEXT")="INHALER"
+"RTN","C0CMED3",227,0)
+ . S @MAP@("MEDQUANTITYUNIT")=$P(ZERX2," ",3) ; THE UNITS
+"RTN","C0CMED3",228,0)
+ . S @MAP@("MEDQUANTITYVALUE")=$P(ZERX2," ",2) ; THE QUANTITY
+"RTN","C0CMED3",229,0)
+ . I @MAP@("MEDFORMTEXT")="" S @MAP@("MEDFORMTEXT")=$P(ZERX2," ",3) ;
+"RTN","C0CMED3",230,0)
+ . ;S @MAP@("M","DIRECTIONS",1,"MEDDIRECTIONDESCRIPTIONTEXT")=MED(2,"E")_" "_MED(3,"E")_" "_MED(4,"E")
+"RTN","C0CMED3",231,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDOSEINDICATOR")="4"  ; means look in description text. See E2369-05.
+"RTN","C0CMED3",232,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDELIVERYMETHOD")=""
+"RTN","C0CMED3",233,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDOSEVALUE")=""
+"RTN","C0CMED3",234,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDOSEUNIT")=""
+"RTN","C0CMED3",235,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDRATEVALUE")=""
+"RTN","C0CMED3",236,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDRATEUNIT")=""
+"RTN","C0CMED3",237,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDVEHICLETEXT")=""
+"RTN","C0CMED3",238,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDIRECTIONROUTETEXT")=""
+"RTN","C0CMED3",239,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDFREQUENCYVALUE")=""
+"RTN","C0CMED3",240,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDINTERVALVALUE")=""
+"RTN","C0CMED3",241,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDINTERVALUNIT")=""
+"RTN","C0CMED3",242,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDURATIONVALUE")=""
+"RTN","C0CMED3",243,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDURATIONUNIT")=""
+"RTN","C0CMED3",244,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPRNFLAG")=""
+"RTN","C0CMED3",245,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMOBJECTID")=""
+"RTN","C0CMED3",246,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMTYPETXT")=""
+"RTN","C0CMED3",247,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMDESCRIPTION")=""
+"RTN","C0CMED3",248,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMCODEVALUE")=""
+"RTN","C0CMED3",249,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMCODINGSYSTEM")=""
+"RTN","C0CMED3",250,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMCODINGVERSION")=""
+"RTN","C0CMED3",251,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMSOURCEACTORID")=""
+"RTN","C0CMED3",252,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDSTOPINDICATOR")=""
+"RTN","C0CMED3",253,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDIRSEQ")=""
+"RTN","C0CMED3",254,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDMULDIRMOD")=""
+"RTN","C0CMED3",255,0)
+ . ;
+"RTN","C0CMED3",256,0)
+ . ; --- END OF DIRECTIONS ---
+"RTN","C0CMED3",257,0)
+ . ;
+"RTN","C0CMED3",258,0)
+ . S @MAP@("MEDRFNO")=""
+"RTN","C0CMED3",259,0)
+ . I $D(MED(14,1)) D  ;
+"RTN","C0CMED3",260,0)
+ . . S @MAP@("MEDFULLFILLMENTINSTRUCTIONS")=MED(14,1) ; WP Field
+"RTN","C0CMED3",261,0)
+ . E  S @MAP@("MEDFULLFILLMENTINSTRUCTIONS")=""
+"RTN","C0CMED3",262,0)
+ . S @MAP@("MEDFULLFILLMENTINSTRUCTIONS")="" ; don't put in these - gpl
+"RTN","C0CMED3",263,0)
+ . N RESULT S RESULT=$NA(^TMP("C0CCCR",$J,"MAPPED"))
+"RTN","C0CMED3",264,0)
+ . K @RESULT
+"RTN","C0CMED3",265,0)
+ . D MAP^C0CXPATH(MINXML,MAP,RESULT)
+"RTN","C0CMED3",266,0)
+ . ; D PARY^C0CXPATH(RESULT)
+"RTN","C0CMED3",267,0)
+ . ; MAPPING DIRECTIONS
+"RTN","C0CMED3",268,0)
+ . N MEDDIR1,DIRXML1 S DIRXML1="MEDDIR1" ; VARIABLE AND NAME VARIABLE TEMPLATE
+"RTN","C0CMED3",269,0)
+ . N MEDDIR2,DIRXML2 S DIRXML2="MEDDIR2" ; VARIABLE AND NAME VARIABLE RESULT
+"RTN","C0CMED3",270,0)
+ . D QUERY^C0CXPATH(MINXML,"//Medications/Medication/Directions",DIRXML1)
+"RTN","C0CMED3",271,0)
+ . D REPLACE^C0CXPATH(RESULT,"","//Medications/Medication/Directions")
+"RTN","C0CMED3",272,0)
+ . N MDZ1,MDZNA
+"RTN","C0CMED3",273,0)
+ . I DIRCNT>0 D  ; IF THERE ARE DIRCTIONS
+"RTN","C0CMED3",274,0)
+ . . F MDZ1=1:1:DIRCNT  D  ; FOR EACH DIRECTION
+"RTN","C0CMED3",275,0)
+ . . . S MDZNA=$NA(@MAP@("M","DIRECTIONS",MDZ1))
+"RTN","C0CMED3",276,0)
+ . . . D MAP^C0CXPATH(DIRXML1,MDZNA,DIRXML2)
+"RTN","C0CMED3",277,0)
+ . . . D INSERT^C0CXPATH(RESULT,DIRXML2,"//Medications/Medication")
+"RTN","C0CMED3",278,0)
+ . ;
+"RTN","C0CMED3",279,0)
+ . ; MAP PATIENT INSTRUCTIONS - HAVE TO DO THIS AFTER MAPPING DIRECTIONS DUE TO XML SCHEMA VALIDATION
+"RTN","C0CMED3",280,0)
+ . N MEDINT1,INTXML1 S INTXML1="MENINT1" ; VARIABLE AND NAME VARIABLE TEMPLATE
+"RTN","C0CMED3",281,0)
+ . N MEDINT2,INTXML2 S INTXML2="MEDINT2" ; VARIABLE AND NAME VARIABLE RESULT
+"RTN","C0CMED3",282,0)
+ . D QUERY^C0CXPATH(MINXML,"//Medications/Medication/PatientInstructions",INTXML1)
+"RTN","C0CMED3",283,0)
+ . D REPLACE^C0CXPATH(RESULT,"","//Medications/Medication/PatientInstructions")
+"RTN","C0CMED3",284,0)
+ . ;N MDI1 ; removing the "I" which is not in the protocol gpl 1/2010
+"RTN","C0CMED3",285,0)
+ . ;S MDI1=$NA(@MAP@("I"))
+"RTN","C0CMED3",286,0)
+ . ; S @MAP@("MEDPTINSTRUCTIONS","F")="52.41^105"
+"RTN","C0CMED3",287,0)
+ . I $D(MED(10,1)) D  ;
+"RTN","C0CMED3",288,0)
+ . . ;S @MAP@("I","MEDPTINSTRUCTIONS")=$P(MED(10,1),"  ",1) ; WP Field
+"RTN","C0CMED3",289,0)
+ . . S @MAP@("MEDPTINSTRUCTIONS")=$P(MED(10,1),"  ",1) ; WP Field
+"RTN","C0CMED3",290,0)
+ . E  S @MAP@("MEDPTINSTRUCTIONS")=""
+"RTN","C0CMED3",291,0)
+ . ;E  S @MAP@("I","MEDPTINSTRUCTIONS")=""
+"RTN","C0CMED3",292,0)
+ . ;D MAP^C0CXPATH(INTXML1,MDI1,INTXML2)
+"RTN","C0CMED3",293,0)
+ . D MAP^C0CXPATH(INTXML1,MAP,INTXML2) ; JUST MAP WORKS.. GPL
+"RTN","C0CMED3",294,0)
+ . D INSERT^C0CXPATH(RESULT,INTXML2,"//Medications/Medication")
+"RTN","C0CMED3",295,0)
+ . ;
+"RTN","C0CMED3",296,0)
+ . ; FLAG HAS TO BE RESET OUTSIDE THE IF STATMENT.
+"RTN","C0CMED3",297,0)
+ . ;I MEDFIRST D  ;
+"RTN","C0CMED3",298,0)
+ . ;. S MEDFIRST=0 ; RESET FIRST FLAG
+"RTN","C0CMED3",299,0)
+ . ;. D CP^C0CXPATH(RESULT,OUTXML) ; First one is a copy
+"RTN","C0CMED3",300,0)
+ . ;D:'MEDFIRST INSINNER^C0CXPATH(OUTXML,RESULT) ; AFTER FIRST, INSERT INNER XML
+"RTN","C0CMED3",301,0)
+ . D:MEDFIRST CP^C0CXPATH(RESULT,OUTXML) ; First one is a copy
+"RTN","C0CMED3",302,0)
+ . D:'MEDFIRST INSINNER^C0CXPATH(OUTXML,RESULT) ; AFTER THE FIRST, INSERT INNER XML
+"RTN","C0CMED3",303,0)
+ . I MEDFIRST S MEDFIRST=0
+"RTN","C0CMED3",304,0)
+ N MEDTMP,MEDI
+"RTN","C0CMED3",305,0)
+ D MISSING^C0CXPATH(OUTXML,"MEDTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CMED3",306,0)
+ I MEDTMP(0)>0 D  ; IF THERE ARE MISSING VARS - MARKED AS @@X@@
+"RTN","C0CMED3",307,0)
+ . W "MEDICATION MISSING ",!
+"RTN","C0CMED3",308,0)
+ . F MEDI=1:1:MEDTMP(0) W MEDTMP(MEDI),!
+"RTN","C0CMED3",309,0)
+ Q
+"RTN","C0CMED3",310,0)
+ ;
+"RTN","C0CMED4")
+0^85^B61058927
+"RTN","C0CMED4",1,0)
+C0CMED4         ; WV/CCDCCR/SMH - CCR/CCD PROCESSING FOR MEDICATIONS - Inpatient Meds/Unit Dose ;10/13/08 ; 5/10/12 2:38pm
+"RTN","C0CMED4",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMED4",3,0)
+ ; Copyright 2008 WorldVistA.  Licensed under the terms of the GNU
+"RTN","C0CMED4",4,0)
+ ; General Public License See attached copy of the License.
+"RTN","C0CMED4",5,0)
+ ;
+"RTN","C0CMED4",6,0)
+ ; This program is free software; you can redistribute it and/or modify
+"RTN","C0CMED4",7,0)
+ ; it under the terms of the GNU General Public License as published by
+"RTN","C0CMED4",8,0)
+ ; the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMED4",9,0)
+ ; (at your option) any later version.
+"RTN","C0CMED4",10,0)
+ ;
+"RTN","C0CMED4",11,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CMED4",12,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMED4",13,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMED4",14,0)
+ ; GNU General Public License for more details.
+"RTN","C0CMED4",15,0)
+ ;
+"RTN","C0CMED4",16,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CMED4",17,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMED4",18,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMED4",19,0)
+ ;
+"RTN","C0CMED4",20,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CMED4",21,0)
+ Q
+"RTN","C0CMED4",22,0)
+ ;
+"RTN","C0CMED4",23,0)
+EXTRACT(MINXML,DFN,OUTXML)           ; EXTRACT MEDICATIONS INTO PROVIDED XML TEMPLATE
+"RTN","C0CMED4",24,0)
+ ;
+"RTN","C0CMED4",25,0)
+ ; MINXML is the Input XML Template, passed by name
+"RTN","C0CMED4",26,0)
+ ; DFN is Patient IEN
+"RTN","C0CMED4",27,0)
+ ; OUTXML is the resultant XML.
+"RTN","C0CMED4",28,0)
+ ;
+"RTN","C0CMED4",29,0)
+ ; MEDS is return array from API.
+"RTN","C0CMED4",30,0)
+ ; MED is holds each array element from MEDS, one medicine
+"RTN","C0CMED4",31,0)
+ ; MAP is a mapping variable map (store result) for each med
+"RTN","C0CMED4",32,0)
+ ;
+"RTN","C0CMED4",33,0)
+ ; Inpatient Meds will be extracted using this routine and and the one following.
+"RTN","C0CMED4",34,0)
+ ; Inpatient Meds Unit Dose is going to be C0CMED4
+"RTN","C0CMED4",35,0)
+ ; Inpatient Meds IVs is going to be C0CMED5
+"RTN","C0CMED4",36,0)
+ ;
+"RTN","C0CMED4",37,0)
+ ; We will use two Pharmacy ReEnginnering API's:
+"RTN","C0CMED4",38,0)
+ ; PSS431^PSS55(DFN,PO,PSDATE,PEDATE,LIST) - provides most info
+"RTN","C0CMED4",39,0)
+ ; PSS432^PSS55(DFN,PO,LIST) - provides schedule info
+"RTN","C0CMED4",40,0)
+ ; For more information, see the PRE documentation at:
+"RTN","C0CMED4",41,0)
+ ; http://www.va.gov/vdl/documents/Clinical/Pharm-Inpatient_Med/phar_1_api_r0807.pdf
+"RTN","C0CMED4",42,0)
+ ; 
+"RTN","C0CMED4",43,0)
+ ; Med data is stored in Unit Dose multiple of file 55, pharmacy patient
+"RTN","C0CMED4",44,0)
+ ;
+"RTN","C0CMED4",45,0)
+ N MEDS,MAP
+"RTN","C0CMED4",46,0)
+ K ^TMP($J)
+"RTN","C0CMED4",47,0)
+ D PSS431^PSS55(DFN,,,,"UD") ; Output is in ^TMP($J,"UD",*)
+"RTN","C0CMED4",48,0)
+ I ^TMP($J,"UD",0)'>0 S @OUTXML@(0)=0 QUIT  ; No Meds - Quit
+"RTN","C0CMED4",49,0)
+ ; Otherwise, we go on...
+"RTN","C0CMED4",50,0)
+ M MEDS=^TMP($J,"UD")
+"RTN","C0CMED4",51,0)
+ I DEBUG ZWR MEDS
+"RTN","C0CMED4",52,0)
+ S MEDMAP=$NA(^TMP("GPLCCR",$J,"MEDMAP")) 
+"RTN","C0CMED4",53,0)
+ N MEDCOUNT S MEDCOUNT=@MEDMAP@(0) ; We already have meds in the array
+"RTN","C0CMED4",54,0)
+ N I S I=0 
+"RTN","C0CMED4",55,0)
+ F  S I=$O(MEDS("B",I)) Q:'I  D  ; For each medication in B index
+"RTN","C0CMED4",56,0)
+ . N MED M MED=MEDS(I)
+"RTN","C0CMED4",57,0)
+ . S MEDCOUNT=MEDCOUNT+1
+"RTN","C0CMED4",58,0)
+ . S @MEDMAP@(0)=MEDCOUNT ; Update MedMap array counter
+"RTN","C0CMED4",59,0)
+ . S MAP=$NA(^TMP("GPLCCR",$J,"MEDMAP",MEDCOUNT))
+"RTN","C0CMED4",60,0)
+ . N RXIEN S RXIEN=MED(.01) ; Order Number
+"RTN","C0CMED4",61,0)
+ . I DEBUG W "RXIEN IS ",RXIEN,!
+"RTN","C0CMED4",62,0)
+ . I DEBUG W "MAP= ",MAP,!
+"RTN","C0CMED4",63,0)
+ . S @MAP@("MEDOBJECTID")="MED_INPATIENT_UD"_RXIEN 
+"RTN","C0CMED4",64,0)
+ . S @MAP@("MEDISSUEDATETXT")="Order Date"
+"RTN","C0CMED4",65,0)
+ . S @MAP@("MEDISSUEDATE")=$$FMDTOUTC^C0CUTIL($P(MED(27),U),"DT")
+"RTN","C0CMED4",66,0)
+ . S @MAP@("MEDLASTFILLDATETXT")="" ; For Outpatient
+"RTN","C0CMED4",67,0)
+ . S @MAP@("MEDLASTFILLDATE")="" ; For Outpatient
+"RTN","C0CMED4",68,0)
+ . S @MAP@("MEDRXNOTXT")="" ; For Outpatient
+"RTN","C0CMED4",69,0)
+ . S @MAP@("MEDRXNO")="" ; For Outpatient
+"RTN","C0CMED4",70,0)
+ . S @MAP@("MEDTYPETEXT")="Medication"
+"RTN","C0CMED4",71,0)
+ . S @MAP@("MEDDETAILUNADORNED")=""  ; Leave blank, field has its uses
+"RTN","C0CMED4",72,0)
+ . S @MAP@("MEDSTATUSTEXT")="ACTIVE" 
+"RTN","C0CMED4",73,0)
+ . S @MAP@("MEDSOURCEACTORID")="ACTORPROVIDER_"_$P(MED(1),U)
+"RTN","C0CMED4",74,0)
+ . S @MAP@("MEDPRODUCTNAMETEXT")=MED("DDRUG",1,.01)
+"RTN","C0CMED4",75,0)
+ . ; NDC is field 31 in the drug file.
+"RTN","C0CMED4",76,0)
+ . ; The actual drug entry in the drug file is not necessarily supplied.
+"RTN","C0CMED4",77,0)
+ . ; It' node 1, internal form.
+"RTN","C0CMED4",78,0)
+ . N MEDIEN S MEDIEN=MED(1,"I")
+"RTN","C0CMED4",79,0)
+ . S @MAP@("MEDPRODUCTNAMECODEVALUE")=$S($L(MEDIEN):$$GET1^DIQ(50,MEDIEN,31,"E"),1:"")
+"RTN","C0CMED4",80,0)
+ . S @MAP@("MEDPRODUCTNAMECODINGINGSYSTEM")=$S($L(MEDIEN):"NDC",1:"")
+"RTN","C0CMED4",81,0)
+ . S @MAP@("MEDPRODUCTNAMECODEVERSION")=$S($L(MEDIEN):"none",1:"")
+"RTN","C0CMED4",82,0)
+ . S @MAP@("MEDBRANDNAMETEXT")=""
+"RTN","C0CMED4",83,0)
+ . I $L(MEDIEN) D DOSE^PSS50(MEDIEN,,,,,"DOSE")
+"RTN","C0CMED4",84,0)
+ . I $L(MEDIEN) N DOSEDATA M DOSEDATA=^TMP($J,"DOSE",MEDIEN)
+"RTN","C0CMED4",85,0)
+ . S @MAP@("MEDSTRENGTHVALUE")=$S($L(MEDIEN):DOSEDATA(901),1:"")
+"RTN","C0CMED4",86,0)
+ . S @MAP@("MEDSTRENGTHUNIT")=$S($L(MEDIEN):$P(DOSEDATA(902),U,2),1:"")
+"RTN","C0CMED4",87,0)
+ . ; Units, concentration, etc, come from another call
+"RTN","C0CMED4",88,0)
+ . ; $$CPRS^PSNAPIS which returns dosage-form^va class^strengh^unit
+"RTN","C0CMED4",89,0)
+ . ; This call takes nodes 1 and 3 of ^PSDRUG(D0,"ND") as parameters
+"RTN","C0CMED4",90,0)
+ . ; NDF Entry IEN, and VA Product Name
+"RTN","C0CMED4",91,0)
+ . ; These can be obtained using NDF^PSS50 (IEN,,,,,"SUBSCRIPT")
+"RTN","C0CMED4",92,0)
+ . ; Documented in the same manual.
+"RTN","C0CMED4",93,0)
+ . N NDFDATA,CONCDATA
+"RTN","C0CMED4",94,0)
+ . I $L(MEDIEN) D
+"RTN","C0CMED4",95,0)
+ . . D NDF^PSS50(MEDIEN,,,,,"CONC")
+"RTN","C0CMED4",96,0)
+ . . M NDFDATA=^TMP($J,"CONC",MEDIEN)
+"RTN","C0CMED4",97,0)
+ . . N NDFIEN S NDFIEN=$P(NDFDATA(20),U)
+"RTN","C0CMED4",98,0)
+ . . N VAPROD S VAPROD=$P(NDFDATA(22),U)
+"RTN","C0CMED4",99,0)
+ . . ; If a drug was not matched to NDF, then the NDFIEN is gonna be ""
+"RTN","C0CMED4",100,0)
+ . . ; and this will crash the call. So...
+"RTN","C0CMED4",101,0)
+ . . I NDFIEN="" S CONCDATA=""
+"RTN","C0CMED4",102,0)
+ . . E  S CONCDATA=$$CPRS^PSNAPIS(NDFIEN,VAPROD)
+"RTN","C0CMED4",103,0)
+ . E  S (NDFDATA,CONCDATA)="" ; This line is defensive programming to prevent undef errors.
+"RTN","C0CMED4",104,0)
+ . S @MAP@("MEDFORMTEXT")=$S($L(MEDIEN):$P(CONCDATA,U,1),1:"")
+"RTN","C0CMED4",105,0)
+ . S @MAP@("MEDCONCVALUE")=$S($L(MEDIEN):$P(CONCDATA,U,3),1:"")
+"RTN","C0CMED4",106,0)
+ . S @MAP@("MEDCONCUNIT")=$S($L(MEDIEN):$P(CONCDATA,U,4),1:"")
+"RTN","C0CMED4",107,0)
+ . S @MAP@("MEDQUANTITYVALUE")=""  ; not provided for in Non-VA meds.
+"RTN","C0CMED4",108,0)
+ . ; Oddly, there is no easy place to find the dispense unit.
+"RTN","C0CMED4",109,0)
+ . ; It's not included in the original call, so we have to go to the drug file.
+"RTN","C0CMED4",110,0)
+ . ; That would be DATA^PSS50(IEN,,,,,"SUBSCRIPT")
+"RTN","C0CMED4",111,0)
+ . ; Node 14.5 is the Dispense Unit
+"RTN","C0CMED4",112,0)
+ . I $L(MEDIEN) D
+"RTN","C0CMED4",113,0)
+ . . D DATA^PSS50(MEDIEN,,,,,"QTY")
+"RTN","C0CMED4",114,0)
+ . . N QTYDATA M QTYDATA=^TMP($J,"QTY",MEDIEN)
+"RTN","C0CMED4",115,0)
+ . . S @MAP@("MEDQUANTITYUNIT")=QTYDATA(14.5)
+"RTN","C0CMED4",116,0)
+   E  S @MAP@("MEDQUANTITYUNIT")=""
+"RTN","C0CMED4",117,0)
+ . ;
+"RTN","C0CMED4",118,0)
+ . ; --- START OF DIRECTIONS ---
+"RTN","C0CMED4",119,0)
+ . ; Dosage is field 2, route is 3, schedule is 4
+"RTN","C0CMED4",120,0)
+ . ; These are all free text fields, and don't point to any files
+"RTN","C0CMED4",121,0)
+ . ; For that reason, I will use the field I never used before:
+"RTN","C0CMED4",122,0)
+ . ; MEDDIRECTIONDESCRIPTIONTEXT
+"RTN","C0CMED4",123,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDIRECTIONDESCRIPTIONTEXT")=MED(2,"E")_" "_MED(3,"E")_" "_MED(4,"E")
+"RTN","C0CMED4",124,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDOSEINDICATOR")="4"  ; means look in description text. See E2369-05.
+"RTN","C0CMED4",125,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDELIVERYMETHOD")=""
+"RTN","C0CMED4",126,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDOSEVALUE")=""
+"RTN","C0CMED4",127,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDOSEUNIT")=""
+"RTN","C0CMED4",128,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDRATEVALUE")=""  
+"RTN","C0CMED4",129,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDRATEUNIT")=""  
+"RTN","C0CMED4",130,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDVEHICLETEXT")=""  
+"RTN","C0CMED4",131,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDIRECTIONROUTETEXT")=""
+"RTN","C0CMED4",132,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDFREQUENCYVALUE")=""
+"RTN","C0CMED4",133,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDINTERVALVALUE")=""
+"RTN","C0CMED4",134,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDINTERVALUNIT")=""
+"RTN","C0CMED4",135,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDURATIONVALUE")=""
+"RTN","C0CMED4",136,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDURATIONUNIT")=""
+"RTN","C0CMED4",137,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPRNFLAG")=""
+"RTN","C0CMED4",138,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMOBJECTID")=""
+"RTN","C0CMED4",139,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMTYPETXT")=""
+"RTN","C0CMED4",140,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMDESCRIPTION")=""
+"RTN","C0CMED4",141,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMCODEVALUE")=""
+"RTN","C0CMED4",142,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMCODINGSYSTEM")=""
+"RTN","C0CMED4",143,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMCODINGVERSION")=""
+"RTN","C0CMED4",144,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMSOURCEACTORID")=""
+"RTN","C0CMED4",145,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDSTOPINDICATOR")="" 
+"RTN","C0CMED4",146,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDIRSEQ")=""
+"RTN","C0CMED4",147,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDMULDIRMOD")=""
+"RTN","C0CMED4",148,0)
+ . ;
+"RTN","C0CMED4",149,0)
+ . ; --- END OF DIRECTIONS ---
+"RTN","C0CMED4",150,0)
+ . ;
+"RTN","C0CMED4",151,0)
+ . ; S @MAP@("MEDPTINSTRUCTIONS","F")="52.41^105"
+"RTN","C0CMED4",152,0)
+ . S @MAP@("MEDPTINSTRUCTIONS")=MED(10,1) ; WP Field
+"RTN","C0CMED4",153,0)
+ . S @MAP@("MEDFULLFILLMENTINSTRUCTIONS")=MED(14,1) ; WP Field
+"RTN","C0CMED4",154,0)
+ . S @MAP@("MEDRFNO")=""
+"RTN","C0CMED4",155,0)
+ . N RESULT S RESULT=$NA(^TMP("GPLCCR",$J,"MAPPED"))
+"RTN","C0CMED4",156,0)
+ . K @RESULT
+"RTN","C0CMED4",157,0)
+ . D MAP^GPLXPATH(MINXML,MAP,RESULT)
+"RTN","C0CMED4",158,0)
+ . ; D PARY^GPLXPATH(RESULT)
+"RTN","C0CMED4",159,0)
+ . ; MAPPING DIRECTIONS
+"RTN","C0CMED4",160,0)
+ . N MEDDIR1,DIRXML1 S DIRXML1="MEDDIR1" ; VARIABLE AND NAME VARIABLE TEMPLATE
+"RTN","C0CMED4",161,0)
+ . N MEDDIR2,DIRXML2 S DIRXML2="MEDDIR2" ; VARIABLE AND NAME VARIABLE RESULT
+"RTN","C0CMED4",162,0)
+ . D QUERY^GPLXPATH(MINXML,"//Medications/Medication/Directions",DIRXML1)
+"RTN","C0CMED4",163,0)
+ . D REPLACE^GPLXPATH(RESULT,"","//Medications/Medication/Directions")
+"RTN","C0CMED4",164,0)
+ . ; N MDZ1,MDZNA
+"RTN","C0CMED4",165,0)
+ . I DIRCNT>0 D  ; IF THERE ARE DIRCTIONS
+"RTN","C0CMED4",166,0)
+ . . F MDZ1=1:1:DIRCNT  D  ; FOR EACH DIRECTION
+"RTN","C0CMED4",167,0)
+ . . . S MDZNA=$NA(@MAP@("M","DIRECTIONS",MDZ1))
+"RTN","C0CMED4",168,0)
+ . . . D MAP^GPLXPATH(DIRXML1,MDZNA,DIRXML2)
+"RTN","C0CMED4",169,0)
+ . . . D INSERT^GPLXPATH(RESULT,DIRXML2,"//Medications/Medication")
+"RTN","C0CMED4",170,0)
+ . D:MEDCOUNT=1 CP^GPLXPATH(RESULT,OUTXML) ; First one is a copy
+"RTN","C0CMED4",171,0)
+ . D:MEDCOUNT>1 INSINNER^GPLXPATH(OUTXML,RESULT) ; AFTER THE FIRST, INSERT INNER XML
+"RTN","C0CMED4",172,0)
+ N MEDTMP,MEDI
+"RTN","C0CMED4",173,0)
+ D MISSING^GPLXPATH(OUTXML,"MEDTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CMED4",174,0)
+ I MEDTMP(0)>0 D  ; IF THERE ARE MISSING VARS - MARKED AS @@X@@
+"RTN","C0CMED4",175,0)
+ . W "MEDICATION MISSING ",!
+"RTN","C0CMED4",176,0)
+ . F MEDI=1:1:MEDTMP(0) W MEDTMP(MEDI),!
+"RTN","C0CMED4",177,0)
+ Q
+"RTN","C0CMED4",178,0)
+ ;
+"RTN","C0CMED6")
+0^52^B194349409
+"RTN","C0CMED6",1,0)
+C0CMED6 ; WV/CCDCCR/SMH - Meds from RPMS: Outpatient Meds;01/10/09
+"RTN","C0CMED6",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMED6",3,0)
+ ; Copyright 2008 WorldVistA.  Licensed under the terms of the GNU
+"RTN","C0CMED6",4,0)
+ ; General Public License See attached copy of the License.
+"RTN","C0CMED6",5,0)
+ ;
+"RTN","C0CMED6",6,0)
+ ; This program is free software; you can redistribute it and/or modify
+"RTN","C0CMED6",7,0)
+ ; it under the terms of the GNU General Public License as published by
+"RTN","C0CMED6",8,0)
+ ; the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMED6",9,0)
+ ; (at your option) any later version.
+"RTN","C0CMED6",10,0)
+ ;
+"RTN","C0CMED6",11,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CMED6",12,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMED6",13,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMED6",14,0)
+ ; GNU General Public License for more details.
+"RTN","C0CMED6",15,0)
+ ;
+"RTN","C0CMED6",16,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CMED6",17,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMED6",18,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMED6",19,0)
+ ;
+"RTN","C0CMED6",20,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CMED6",21,0)
+ Q
+"RTN","C0CMED6",22,0)
+ ;
+"RTN","C0CMED6",23,0)
+EXTRACT(MINXML,DFN,OUTXML,MEDCOUNT,FLAGS)  ; EXTRACT MEDICATIONS INTO PROVIDED XML TEMPLATE
+"RTN","C0CMED6",24,0)
+ ;
+"RTN","C0CMED6",25,0)
+ ; MINXML and OUTXML are passed by name so globals can be used
+"RTN","C0CMED6",26,0)
+ ; MINXML will contain only the medications skeleton of the overall template
+"RTN","C0CMED6",27,0)
+ ; MEDCOUNT is a counter passed by Reference.
+"RTN","C0CMED6",28,0)
+ ; FLAGS are: MEDALL(bool)^MEDLIMIT(int)^MEDACTIVE(bool)^MEDPENDING(bool)
+"RTN","C0CMED6",29,0)
+ ; FLAGS are set-up in C0CMED.
+"RTN","C0CMED6",30,0)
+ ;
+"RTN","C0CMED6",31,0)
+ ; MEDS is return array from RPC.
+"RTN","C0CMED6",32,0)
+ ; MAP is a mapping variable map (store result) for each med
+"RTN","C0CMED6",33,0)
+ ; MED is holds each array element from MEDS(J), one medicine
+"RTN","C0CMED6",34,0)
+ ; J is a counter.
+"RTN","C0CMED6",35,0)
+ ;
+"RTN","C0CMED6",36,0)
+ ; GETRXS^BEHORXFN(ARRAYNAME,DFN,DAYS) will be the the API used.
+"RTN","C0CMED6",37,0)
+ ; This API has been developed by Medsphere for IHS for getting
+"RTN","C0CMED6",38,0)
+ ; Medications from RPMS. It has most of what we need.
+"RTN","C0CMED6",39,0)
+ ; API written by Doug Martin when he worked for Medsphere (thanks Doug!)
+"RTN","C0CMED6",40,0)
+ ; -- ARRAYNAME is passed by name (required)
+"RTN","C0CMED6",41,0)
+ ; -- DFN is passed by value (required)
+"RTN","C0CMED6",42,0)
+ ; -- DAYS is passed by value (optional; if not passed defaults to 365)
+"RTN","C0CMED6",43,0)
+ ; 
+"RTN","C0CMED6",44,0)
+ ; Return:
+"RTN","C0CMED6",45,0)
+ ; ~Type^PharmID^Drug^InfRate^StopDt^RefRem^TotDose^UnitDose^OrderID 
+"RTN","C0CMED6",46,0)
+ ; ^Status^LastFill^Chronic^Issued^Rx #^Provider^ 
+"RTN","C0CMED6",47,0)
+ ; Status Reason^DEA Handling
+"RTN","C0CMED6",48,0)
+ ; 
+"RTN","C0CMED6",49,0)
+ N MEDS,MEDS1,MAP
+"RTN","C0CMED6",50,0)
+ D GETRXS^BEHORXFN("MEDS1",DFN,$P($P(FLAGS,U,2),"-",2)) ; 2nd piece of FLAGS is # of days to retrieve, which comes in the form "T-360"
+"RTN","C0CMED6",51,0)
+ N ALL S ALL=+FLAGS
+"RTN","C0CMED6",52,0)
+ N ACTIVE S ACTIVE=$P(FLAGS,U,3)
+"RTN","C0CMED6",53,0)
+ N PENDING S PENDING=$P(FLAGS,U,4)
+"RTN","C0CMED6",54,0)
+ S @OUTXML@(0)=0  ;By default, no meds
+"RTN","C0CMED6",55,0)
+ ; If MEDS1 is not defined, then no meds
+"RTN","C0CMED6",56,0)
+ I '$D(MEDS1) QUIT
+"RTN","C0CMED6",57,0)
+ I DEBUG ZWR MEDS1,MINXML
+"RTN","C0CMED6",58,0)
+ N MEDCNT S MEDCNT=0 ; Med Count
+"RTN","C0CMED6",59,0)
+ ; The next line is a super line. It goes through the array return
+"RTN","C0CMED6",60,0)
+ ; and if the first characters are ~OP, it grabs the line.
+"RTN","C0CMED6",61,0)
+ ; This means that line is for a dispensed Outpatient Med.
+"RTN","C0CMED6",62,0)
+ ; That line has the metadata about the med that I need.
+"RTN","C0CMED6",63,0)
+ ; The next lines, however many, are the med and the sig.
+"RTN","C0CMED6",64,0)
+ ; I won't be using those because I have to get the sig parsed exactly.
+"RTN","C0CMED6",65,0)
+ N J S J="" F  S J=$O(MEDS1(J)) Q:J=""  I $E(MEDS1(J),1,3)="~OP" S MEDCNT=MEDCNT+1 S MEDS(MEDCNT)=MEDS1(J)
+"RTN","C0CMED6",66,0)
+ K MEDS1
+"RTN","C0CMED6",67,0)
+ S MEDCNT="" ; Initialize for $Order
+"RTN","C0CMED6",68,0)
+ F  S MEDCNT=$O(MEDS(MEDCNT)) Q:MEDCNT=""  D  ; for each medication in the list
+"RTN","C0CMED6",69,0)
+ . I 'ALL,ACTIVE,$P(MEDS(MEDCNT),U,10)'="ACTIVE" QUIT
+"RTN","C0CMED6",70,0)
+ . I 'ALL,PENDING,$P(MEDS(MEDCNT),U,10)'="PENDING" QUIT
+"RTN","C0CMED6",71,0)
+ . I DEBUG W "MEDCNT IS ",MEDCNT,!
+"RTN","C0CMED6",72,0)
+ . S MAP=$NA(^TMP("C0CCCR",$J,"MEDMAP",MEDCNT))
+"RTN","C0CMED6",73,0)
+ . ; K @MAP DO NOT KILL HERE, WAS CLEARED IN C0CMED
+"RTN","C0CMED6",74,0)
+ . I DEBUG W "MAP= ",MAP,!
+"RTN","C0CMED6",75,0)
+ . S @MAP@("MEDOBJECTID")="MED"_MEDCNT ; MEDCNT FOR ID
+"RTN","C0CMED6",76,0)
+ . S @MAP@("MEDISSUEDATETXT")="Issue Date"
+"RTN","C0CMED6",77,0)
+ . S @MAP@("MEDISSUEDATE")=$$FMDTOUTC^C0CUTIL($P(MEDS(MEDCNT),U,15),"DT")
+"RTN","C0CMED6",78,0)
+ . S @MAP@("MEDLASTFILLDATETXT")="Last Fill Date"
+"RTN","C0CMED6",79,0)
+ . S @MAP@("MEDLASTFILLDATE")=$$FMDTOUTC^C0CUTIL($P(MEDS(MEDCNT),U,11),"DT")
+"RTN","C0CMED6",80,0)
+ . S @MAP@("MEDRXNOTXT")="Prescription Number"
+"RTN","C0CMED6",81,0)
+ . S @MAP@("MEDRXNO")=$P(MEDS(MEDCNT),U,14)
+"RTN","C0CMED6",82,0)
+ . S @MAP@("MEDTYPETEXT")="Medication"
+"RTN","C0CMED6",83,0)
+ . S @MAP@("MEDDETAILUNADORNED")=""  ; Leave blank, field has its uses
+"RTN","C0CMED6",84,0)
+ . S @MAP@("MEDSTATUSTEXT")=$P(MEDS(MEDCNT),U,10)
+"RTN","C0CMED6",85,0)
+ . ; Provider only provided in API as text, not DUZ.
+"RTN","C0CMED6",86,0)
+ . ; We need to get DUZ from filman file 52 (Prescription)
+"RTN","C0CMED6",87,0)
+ . ; Field 4; IEN is Piece 2 of Meds stripped of trailing characters.
+"RTN","C0CMED6",88,0)
+ . ; Note that I will use RXIEN several times later
+"RTN","C0CMED6",89,0)
+ . N RXIEN S RXIEN=+$P(MEDS(MEDCNT),U,2)
+"RTN","C0CMED6",90,0)
+ . S @MAP@("MEDSOURCEACTORID")="ACTORPROVIDER_"_$$GET1^DIQ(52,RXIEN,4,"I")
+"RTN","C0CMED6",91,0)
+ . S @MAP@("MEDPRODUCTNAMETEXT")=$P(MEDS(MEDCNT),U,3)
+"RTN","C0CMED6",92,0)
+ . ; --- RxNorm Stuff 
+"RTN","C0CMED6",93,0)
+ . ; 176.001 is the file for Concepts; 176.003 is the file for
+"RTN","C0CMED6",94,0)
+ . ; sources (i.e. for RxNorm Version)
+"RTN","C0CMED6",95,0)
+ . ; 
+"RTN","C0CMED6",96,0)
+ . ; I use 176.001 for the Vista version of this routine (files 1-3)
+"RTN","C0CMED6",97,0)
+ . ; Since IHS does not have VUID's, I will be getting RxNorm codes
+"RTN","C0CMED6",98,0)
+ . ; using NDCs. My specially crafted index (sounds evil) named "NDC"
+"RTN","C0CMED6",99,0)
+ . ; is in file 176.002. The file is called RxNorm NDC to VUID.
+"RTN","C0CMED6",100,0)
+ . ; Except that I don't need the VUID, but it's there if I need it.
+"RTN","C0CMED6",101,0)
+ . ; 
+"RTN","C0CMED6",102,0)
+ . ; We obviously need the NDC. That is easily obtained from the prescription.
+"RTN","C0CMED6",103,0)
+ . ; Field 27 in file 52
+"RTN","C0CMED6",104,0)
+ . N NDC S NDC=$$GET1^DIQ(52,RXIEN,27,"I")
+"RTN","C0CMED6",105,0)
+ . ; I discovered that file 176.002 might give you two codes for the NDC
+"RTN","C0CMED6",106,0)
+ . ; One for the Clinical Drug, and one for the ingredient.
+"RTN","C0CMED6",107,0)
+ . ; So the plan is to get the two RxNorm codes, and then find from
+"RTN","C0CMED6",108,0)
+ . ; file 176.001 which one is the Clinical Drug.
+"RTN","C0CMED6",109,0)
+ . ; ... I refactored this into GETRXN
+"RTN","C0CMED6",110,0)
+ . N RXNORM,SRCIEN,RXNNAME,RXNVER
+"RTN","C0CMED6",111,0)
+ . I +NDC,$D(^C0CRXN) D  ; $Data is for Systems that don't have our RxNorm file yet.
+"RTN","C0CMED6",112,0)
+ . . S RXNORM=$$GETRXN(NDC)
+"RTN","C0CMED6",113,0)
+ . . S SRCIEN=$$FIND1^DIC(176.003,,,"RXNORM","B")
+"RTN","C0CMED6",114,0)
+ . . S RXNNAME=$$GET1^DIQ(176.003,SRCIEN,6)
+"RTN","C0CMED6",115,0)
+ . . S RXNVER=$$GET1^DIQ(176.003,SRCIEN,7)
+"RTN","C0CMED6",116,0)
+ . ;
+"RTN","C0CMED6",117,0)
+ . E  S (RXNORM,RXNNAME,RXNVER)=""
+"RTN","C0CMED6",118,0)
+ . ; End if/else block
+"RTN","C0CMED6",119,0)
+ . S @MAP@("MEDPRODUCTNAMECODEVALUE")=RXNORM
+"RTN","C0CMED6",120,0)
+ . S @MAP@("MEDPRODUCTNAMECODINGINGSYSTEM")=RXNNAME
+"RTN","C0CMED6",121,0)
+ . S @MAP@("MEDPRODUCTNAMECODEVERSION")=RXNVER
+"RTN","C0CMED6",122,0)
+ . ; --- End RxNorm section
+"RTN","C0CMED6",123,0)
+ . ;
+"RTN","C0CMED6",124,0)
+ . ; Brand name is 52 field 6.5
+"RTN","C0CMED6",125,0)
+ . S @MAP@("MEDBRANDNAMETEXT")=$$GET1^DIQ(52,RXIEN,6.5)
+"RTN","C0CMED6",126,0)
+ . ;
+"RTN","C0CMED6",127,0)
+ . ; Next I need Med Form (tab, cap etc), strength (250mg)
+"RTN","C0CMED6",128,0)
+ . ; concentration for liquids (250mg/mL)
+"RTN","C0CMED6",129,0)
+ . ; Since IHS does not have any of the new calls that 
+"RTN","C0CMED6",130,0)
+ . ; Vista has, I will be doing a crosswalk:
+"RTN","C0CMED6",131,0)
+ . ; File 52, field 6 is Drug IEN in file 50
+"RTN","C0CMED6",132,0)
+ . ; File 50, field 22 is VA Product IEN in file 50.68
+"RTN","C0CMED6",133,0)
+ . ; In file 50.68, I will get the following:
+"RTN","C0CMED6",134,0)
+ . ; -- 1: Dosage Form
+"RTN","C0CMED6",135,0)
+ . ; -- 2: Strength
+"RTN","C0CMED6",136,0)
+ . ; -- 3: Units
+"RTN","C0CMED6",137,0)
+ . ; -- 8: Dispense Units
+"RTN","C0CMED6",138,0)
+ . ; -- Conc is 2 concatenated with 3
+"RTN","C0CMED6",139,0)
+ . ; 
+"RTN","C0CMED6",140,0)
+ . ; *** If Drug is not matched to NDF, then VA Product will be "" ***
+"RTN","C0CMED6",141,0)
+ . ;
+"RTN","C0CMED6",142,0)
+ . N MEDIEN S MEDIEN=$$GET1^DIQ(52,RXIEN,6,"I") ; Drug IEN in 50
+"RTN","C0CMED6",143,0)
+ . N VAPROD S VAPROD=$$GET1^DIQ(50,MEDIEN,22,"I") ; VA Product in file 50.68
+"RTN","C0CMED6",144,0)
+ . I +VAPROD D
+"RTN","C0CMED6",145,0)
+ . . S @MAP@("MEDSTRENGTHVALUE")=$$GET1^DIQ(50.68,VAPROD,2)
+"RTN","C0CMED6",146,0)
+ . . S @MAP@("MEDSTRENGTHUNIT")=$$GET1^DIQ(50.68,VAPROD,3)
+"RTN","C0CMED6",147,0)
+ . . S @MAP@("MEDFORMTEXT")=$$GET1^DIQ(50.68,VAPROD,1)
+"RTN","C0CMED6",148,0)
+ . . S @MAP@("MEDCONCVALUE")=@MAP@("MEDSTRENGTHVALUE")
+"RTN","C0CMED6",149,0)
+ . . S @MAP@("MEDCONCUNIT")=@MAP@("MEDSTRENGTHUNIT")
+"RTN","C0CMED6",150,0)
+ . E  D
+"RTN","C0CMED6",151,0)
+ . . S @MAP@("MEDSTRENGTHVALUE")=""
+"RTN","C0CMED6",152,0)
+ . . S @MAP@("MEDSTRENGTHUNIT")=""
+"RTN","C0CMED6",153,0)
+ . . S @MAP@("MEDFORMTEXT")=""
+"RTN","C0CMED6",154,0)
+ . . S @MAP@("MEDCONCVALUE")=""
+"RTN","C0CMED6",155,0)
+ . . S @MAP@("MEDCONCUNIT")=""
+"RTN","C0CMED6",156,0)
+ . ; End Strengh/Conc stuff
+"RTN","C0CMED6",157,0)
+ . ;
+"RTN","C0CMED6",158,0)
+ . ; Quantity is in the prescription, field 7
+"RTN","C0CMED6",159,0)
+ . S @MAP@("MEDQUANTITYVALUE")=$$GET1^DIQ(52,RXIEN,7)
+"RTN","C0CMED6",160,0)
+ . ; Dispense unit is in the drug file, field 14.5
+"RTN","C0CMED6",161,0)
+ . S @MAP@("MEDQUANTITYUNIT")=$$GET1^DIQ(50,MEDIEN,14.5)
+"RTN","C0CMED6",162,0)
+ . ;
+"RTN","C0CMED6",163,0)
+ . ; --- START OF DIRECTIONS ---
+"RTN","C0CMED6",164,0)
+ . ; Sig data not in any API :-(  Oh yes, you can get the whole thing, but...
+"RTN","C0CMED6",165,0)
+ . ; we want the components.
+"RTN","C0CMED6",166,0)
+ . ; It's in multiple 113 in the Prescription File (52)
+"RTN","C0CMED6",167,0)
+ . ; #.01 DOSAGE ORDERED [1F]    "20"
+"RTN","C0CMED6",168,0)
+ . ; #1 DISPENSE UNITS PER DOSE [2N]  "1"
+"RTN","C0CMED6",169,0)
+ . ; #2 UNITS [3P:50.607]     "MG"
+"RTN","C0CMED6",170,0)
+ . ; #3 NOUN [4F]      "TABLET"
+"RTN","C0CMED6",171,0)
+ . ; #4 DURATION [5F]      "10D"
+"RTN","C0CMED6",172,0)
+ . ; #5 CONJUNCTION [6S]     "AND"
+"RTN","C0CMED6",173,0)
+ . ; #6 ROUTE [7P:51.2]     "ORAL"
+"RTN","C0CMED6",174,0)
+ . ; #7 SCHEDULE [8F]      "BID"
+"RTN","C0CMED6",175,0)
+ . ; #8 VERB [9F]       "TAKE"
+"RTN","C0CMED6",176,0)
+ . ;
+"RTN","C0CMED6",177,0)
+ . ; Will use GETS^DIQ to get fields.
+"RTN","C0CMED6",178,0)
+ . ; Data comes out like this:
+"RTN","C0CMED6",179,0)
+ . ; SAMINS(52.0113,"1,23,",.01)=20
+"RTN","C0CMED6",180,0)
+ . ; SAMINS(52.0113,"1,23,",1)=1
+"RTN","C0CMED6",181,0)
+ . ; SAMINS(52.0113,"1,23,",2)="MG"
+"RTN","C0CMED6",182,0)
+ . ; SAMINS(52.0113,"1,23,",3)="TABLET"
+"RTN","C0CMED6",183,0)
+ . ; SAMINS(52.0113,"1,23,",4)="5D"
+"RTN","C0CMED6",184,0)
+ . ; SAMINS(52.0113,"1,23,",5)="THEN"
+"RTN","C0CMED6",185,0)
+ . ;
+"RTN","C0CMED6",186,0)
+ . N RAWDATA
+"RTN","C0CMED6",187,0)
+ . D GETS^DIQ(52,RXIEN,"113*",,"RAWDATA","DIERR")
+"RTN","C0CMED6",188,0)
+ . D:$D(DIERR) ^%ZTER  ; Log if there's an error in retrieving sig field
+"RTN","C0CMED6",189,0)
+ . ; none the less, continue; some parts are retrievable.
+"RTN","C0CMED6",190,0)
+ . N FMSIG M FMSIG=RAWDATA(52.0113) ; Merge into subfile...
+"RTN","C0CMED6",191,0)
+ . K RAWDATA
+"RTN","C0CMED6",192,0)
+ . N FMSIGNUM S FMSIGNUM="" ; Sigline number in fileman.
+"RTN","C0CMED6",193,0)
+ . ; FMSIGNUM gets outputted as "IEN,RXIEN,".
+"RTN","C0CMED6",194,0)
+ . ; DIRCNT is the proper Sigline numer.
+"RTN","C0CMED6",195,0)
+ . ; SIGDATA is the simplfied array. 
+"RTN","C0CMED6",196,0)
+ . F  S FMSIGNUM=$O(FMSIG(FMSIGNUM)) Q:FMSIGNUM=""  D
+"RTN","C0CMED6",197,0)
+ . . N DIRCNT S DIRCNT=$P(FMSIGNUM,",")
+"RTN","C0CMED6",198,0)
+ . . N SIGDATA M SIGDATA=FMSIG(FMSIGNUM)
+"RTN","C0CMED6",199,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDIRECTIONDESCRIPTIONTEXT")=""  ; This is reserved for systems not able to generate the sig in components.
+"RTN","C0CMED6",200,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDOSEINDICATOR")="1"  ; means that we are specifying it. See E2369-05.
+"RTN","C0CMED6",201,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDELIVERYMETHOD")=$G(SIGDATA(8))
+"RTN","C0CMED6",202,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDOSEVALUE")=$G(SIGDATA(.01))
+"RTN","C0CMED6",203,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDOSEUNIT")=$G(SIGDATA(2))
+"RTN","C0CMED6",204,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDRATEVALUE")=""  ; For inpatient
+"RTN","C0CMED6",205,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDRATEUNIT")=""  ; For inpatient
+"RTN","C0CMED6",206,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDVEHICLETEXT")=""  ; For inpatient
+"RTN","C0CMED6",207,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDIRECTIONROUTETEXT")=$G(SIGDATA(6))
+"RTN","C0CMED6",208,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDFREQUENCYVALUE")=$G(SIGDATA(7))
+"RTN","C0CMED6",209,0)
+ . . ; Invervals... again another call.
+"RTN","C0CMED6",210,0)
+ . . ; In the wisdom of the original programmers, the schedule is a free text field
+"RTN","C0CMED6",211,0)
+ . . ; However, it gets translated by a call to the administration schedule file
+"RTN","C0CMED6",212,0)
+ . . ; to see if that schedule exists.
+"RTN","C0CMED6",213,0)
+ . . ; That's the same thing I am going to do.
+"RTN","C0CMED6",214,0)
+ . . ; Search B index of 51.1 (Admin Schedule) with schedule
+"RTN","C0CMED6",215,0)
+ . . ; First, remove "PRN" if it exists (don't ask, that's how the file
+"RTN","C0CMED6",216,0)
+ . . ; works; I wouldn't do it that way).
+"RTN","C0CMED6",217,0)
+ . . N SCHNOPRN S SCHNOPRN=$G(SIGDATA(7))
+"RTN","C0CMED6",218,0)
+ . . I SCHNOPRN["PRN" S SCHNOPRN=$E(SCHNOPRN,1,$F(SCHNOPRN,"PRN")-5)
+"RTN","C0CMED6",219,0)
+ . . ; Super call below:
+"RTN","C0CMED6",220,0)
+ . . ; 1=File 51.1 3=Field 2 (Frequency in Minutes)
+"RTN","C0CMED6",221,0)
+ . . ; 4=Packed format, Exact Match 5=Lookup Value
+"RTN","C0CMED6",222,0)
+ . . ; 6=# of entries to return 7=Index 10=Return Array
+"RTN","C0CMED6",223,0)
+ . . ; 
+"RTN","C0CMED6",224,0)
+ . . ; I do not account for the fact that two schedules can be
+"RTN","C0CMED6",225,0)
+ . . ; spelled identically (ie duplicate entry). In that case,
+"RTN","C0CMED6",226,0)
+ . . ; I get the first. That's just a bad pharmacy pkg maintainer.
+"RTN","C0CMED6",227,0)
+ . . N C0C515
+"RTN","C0CMED6",228,0)
+ . . D FIND^DIC(51.1,,"@;2","PX",SCHNOPRN,1,"B",,,"C0C515")
+"RTN","C0CMED6",229,0)
+ . . N INTERVAL S INTERVAL="" ; Default
+"RTN","C0CMED6",230,0)
+ . . ; If there are entries found, get it
+"RTN","C0CMED6",231,0)
+ . . I +$G(C0C515("DILIST",0)) S INTERVAL=$P(C0C515("DILIST",1,0),U,2) 
+"RTN","C0CMED6",232,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDINTERVALVALUE")=INTERVAL
+"RTN","C0CMED6",233,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDINTERVALUNIT")="Minute"
+"RTN","C0CMED6",234,0)
+ . . ; Duration is 10M minutes, 10H hours, 10D for Days
+"RTN","C0CMED6",235,0)
+ . . ; 10W for weeks, 10L for months. I smell $Select
+"RTN","C0CMED6",236,0)
+ . . ; But we don't need to do that if there isn't a duration
+"RTN","C0CMED6",237,0)
+ . . I +$G(SIGDATA(4)) D
+"RTN","C0CMED6",238,0)
+ . . . N DURUNIT S DURUNIT=$E(SIGDATA(4),$L(SIGDATA(4))) ; get last char
+"RTN","C0CMED6",239,0)
+ . . . N DURTXT S DURTXT=$S(DURUNIT="M":"Minutes",DURUNIT="H":"Hours",DURUNIT="D":"Days",DURUNIT="W":"Weeks",DURUNIT="L":"Months",1:"Days")
+"RTN","C0CMED6",240,0)
+ . . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDURATIONVALUE")=+SIGDATA(4)
+"RTN","C0CMED6",241,0)
+ . . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDURATIONUNIT")=DURTXT
+"RTN","C0CMED6",242,0)
+ . . E  D
+"RTN","C0CMED6",243,0)
+ . . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDURATIONVALUE")=""
+"RTN","C0CMED6",244,0)
+ . . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDURATIONUNIT")=""
+"RTN","C0CMED6",245,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPRNFLAG")=$G(SIGDATA(4))["PRN"
+"RTN","C0CMED6",246,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMOBJECTID")="" ; when avail
+"RTN","C0CMED6",247,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMTYPETXT")=""
+"RTN","C0CMED6",248,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMDESCRIPTION")=""
+"RTN","C0CMED6",249,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMCODEVALUE")=""
+"RTN","C0CMED6",250,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMCODINGSYSTEM")=""
+"RTN","C0CMED6",251,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMCODINGVERSION")=""
+"RTN","C0CMED6",252,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDPROBLEMSOURCEACTORID")=""
+"RTN","C0CMED6",253,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDSTOPINDICATOR")="" ; not stored
+"RTN","C0CMED6",254,0)
+ . . ; Another confusing line; I am pretty bad:
+"RTN","C0CMED6",255,0)
+ . . ; If there is another entry in the FMSIG array (i.e. another line
+"RTN","C0CMED6",256,0)
+ . . ; in the sig), set the direction count indicator.
+"RTN","C0CMED6",257,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDDIRSEQ")=""  ; Default
+"RTN","C0CMED6",258,0)
+ . . S:+$O(FMSIG(FMSIGNUM)) @MAP@("M","DIRECTIONS",DIRCNT,"MEDDIRSEQ")=DIRCNT
+"RTN","C0CMED6",259,0)
+ . . S @MAP@("M","DIRECTIONS",DIRCNT,"MEDMULDIRMOD")=$G(SIGDATA(5))
+"RTN","C0CMED6",260,0)
+ . ;
+"RTN","C0CMED6",261,0)
+ . ; --- END OF DIRECTIONS ---
+"RTN","C0CMED6",262,0)
+ . ;
+"RTN","C0CMED6",263,0)
+ . ; Med instructions is a WP field, thus the acrobatics
+"RTN","C0CMED6",264,0)
+ . ; Notice buffer overflow protection set at 10,000 chars
+"RTN","C0CMED6",265,0)
+ . ; -- 1. Med Patient Instructions
+"RTN","C0CMED6",266,0)
+ . N MEDPTIN1 S MEDPTIN1=$$GET1^DIQ(52,RXIEN,115,,"MEDPTIN1")
+"RTN","C0CMED6",267,0)
+ . N MEDPTIN2,J  S (MEDPTIN2,J)="" 
+"RTN","C0CMED6",268,0)
+ . I $L(MEDPTIN1) F  S J=$O(@MEDPTIN1@(J)) Q:J=""  Q:$L(MEDPTIN2)>10000  S MEDPTIN2=MEDPTIN2_@MEDPTIN1@(J)_" "
+"RTN","C0CMED6",269,0)
+ . S @MAP@("MEDPTINSTRUCTIONS")=MEDPTIN2
+"RTN","C0CMED6",270,0)
+ . K J
+"RTN","C0CMED6",271,0)
+ . ; -- 2. Med Provider Instructions
+"RTN","C0CMED6",272,0)
+ . N MEDPVIN1 S MEDPVIN1=$$GET1^DIQ(52,RXIEN,39,,"MEDPVIN1")
+"RTN","C0CMED6",273,0)
+ . N MEDPVIN2,J S (MEDPVIN2,J)=""
+"RTN","C0CMED6",274,0)
+ . I $L(MEDPVIN1) F  S J=$O(@MEDPVIN1@(J)) Q:J=""  Q:$L(MEDPVIN2)>10000  S MEDPVIN2=MEDPVIN2_@MEDPVIN1@(J)_" "
+"RTN","C0CMED6",275,0)
+ . S @MAP@("MEDFULLFILLMENTINSTRUCTIONS")=MEDPVIN2
+"RTN","C0CMED6",276,0)
+ . ;
+"RTN","C0CMED6",277,0)
+ . ; Remaining refills
+"RTN","C0CMED6",278,0)
+ . S @MAP@("MEDRFNO")=$P(MEDS(MEDCNT),U,6)
+"RTN","C0CMED6",279,0)
+ . ; ------ END OF MAPPING
+"RTN","C0CMED6",280,0)
+ . ;
+"RTN","C0CMED6",281,0)
+ . ; ------ BEGIN XML INSERTION
+"RTN","C0CMED6",282,0)
+ . N RESULT S RESULT=$NA(^TMP("C0CCCR",$J,"MAPPED"))
+"RTN","C0CMED6",283,0)
+ . K @RESULT
+"RTN","C0CMED6",284,0)
+ . D MAP^C0CXPATH(MINXML,MAP,RESULT)
+"RTN","C0CMED6",285,0)
+ . ; D PARY^C0CXPATH(RESULT)
+"RTN","C0CMED6",286,0)
+ . ; MAPPING DIRECTIONS
+"RTN","C0CMED6",287,0)
+ . N MEDDIR1,DIRXML1 S DIRXML1="MEDDIR1" ; VARIABLE AND NAME VARIABLE TEMPLATE
+"RTN","C0CMED6",288,0)
+ . N MEDDIR2,DIRXML2 S DIRXML2="MEDDIR2" ; VARIABLE AND NAME VARIABLE RESULT
+"RTN","C0CMED6",289,0)
+ . D QUERY^C0CXPATH(MINXML,"//Medications/Medication/Directions",DIRXML1)
+"RTN","C0CMED6",290,0)
+ . D REPLACE^C0CXPATH(RESULT,"","//Medications/Medication/Directions")
+"RTN","C0CMED6",291,0)
+ . ; N MDZ1,MDZNA
+"RTN","C0CMED6",292,0)
+ . N DIRCNT S DIRCNT=""
+"RTN","C0CMED6",293,0)
+ . I +$O(@MAP@("M","DIRECTIONS",DIRCNT)) D  ; IF THERE ARE DIRCTIONS
+"RTN","C0CMED6",294,0)
+ . . F DIRCNT=$O(@MAP@("M","DIRECTIONS",DIRCNT)) D  ; FOR EACH DIRECTION
+"RTN","C0CMED6",295,0)
+ . . . S MDZNA=$NA(@MAP@("M","DIRECTIONS",DIRCNT))
+"RTN","C0CMED6",296,0)
+ . . . D MAP^C0CXPATH(DIRXML1,MDZNA,DIRXML2)
+"RTN","C0CMED6",297,0)
+ . . . D INSERT^C0CXPATH(RESULT,DIRXML2,"//Medications/Medication")
+"RTN","C0CMED6",298,0)
+ . D:MEDCNT=1 CP^C0CXPATH(RESULT,OUTXML) ; First one is a copy
+"RTN","C0CMED6",299,0)
+ . D:MEDCNT>1 INSINNER^C0CXPATH(OUTXML,RESULT) ; AFTER THE FIRST, INSERT INNER XML
+"RTN","C0CMED6",300,0)
+ . S MEDCOUNT=MEDCNT
+"RTN","C0CMED6",301,0)
+ N MEDTMP,MEDI
+"RTN","C0CMED6",302,0)
+ D MISSING^C0CXPATH(OUTXML,"MEDTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CMED6",303,0)
+ I MEDTMP(0)>0 D  ; IF THERE ARE MISSING VARS - MARKED AS @@X@@
+"RTN","C0CMED6",304,0)
+ . W "MEDICATION MISSING ",!
+"RTN","C0CMED6",305,0)
+ . F MEDI=1:1:MEDTMP(0) W MEDTMP(MEDI),!
+"RTN","C0CMED6",306,0)
+ Q
+"RTN","C0CMED6",307,0)
+ ;
+"RTN","C0CMED6",308,0)
+GETRXN(NDC) ; Extrinsic Function; PUBLIC; NDC to RxNorm
+"RTN","C0CMED6",309,0)
+ ;; Get RxNorm Concept Number for a Given NDC
+"RTN","C0CMED6",310,0)
+ ;
+"RTN","C0CMED6",311,0)
+ S NDC=$TR(NDC,"-")  ; Remove dashes
+"RTN","C0CMED6",312,0)
+ N RXNORM,C0CZRXN,DIERR
+"RTN","C0CMED6",313,0)
+ D FIND^DIC(176.002,,"@;.01","PX",NDC,"*","NDC",,,"C0CZRXN","DIERR")
+"RTN","C0CMED6",314,0)
+ I $D(DIERR) D ^%ZTER BREAK
+"RTN","C0CMED6",315,0)
+ S RXNORM(0)=+C0CZRXN("DILIST",0) ; RxNorm(0) will be # of entries
+"RTN","C0CMED6",316,0)
+ N I S I=0
+"RTN","C0CMED6",317,0)
+ F  S I=$O(C0CZRXN("DILIST",I)) Q:I=""  S RXNORM(I)=$P(C0CZRXN("DILIST",I,0),U,2)
+"RTN","C0CMED6",318,0)
+ ; At this point, RxNorm(0) is # of entries; RxNorm(1...) are the entries
+"RTN","C0CMED6",319,0)
+ ; If RxNorm(0) is 1, then we only have one entry, and that's it.
+"RTN","C0CMED6",320,0)
+ I RXNORM(0)=1 QUIT RXNORM(1)  ; RETURN RXNORM(1)
+"RTN","C0CMED6",321,0)
+ ; Otherwise, we need to find out which one is the semantic
+"RTN","C0CMED6",322,0)
+ ; clinical drug. I built an index on 176.001 (RxNorm Concepts)
+"RTN","C0CMED6",323,0)
+ ; for that purpose.
+"RTN","C0CMED6",324,0)
+ I RXNORM(0)>1 D
+"RTN","C0CMED6",325,0)
+ . S I=0
+"RTN","C0CMED6",326,0)
+ . F  S I=$O(RXNORM(I)) Q:I=""  D  Q:$G(RXNORM)
+"RTN","C0CMED6",327,0)
+ . . N RXNIEN S RXNIEN=$$FIND1^DIC(176.001,,,RXNORM(I),"SCD")
+"RTN","C0CMED6",328,0)
+ . . I +$G(RXNIEN)=0 QUIT  ; try the next entry... 
+"RTN","C0CMED6",329,0)
+ . . E  S RXNORM=RXNORM(I) QUIT  ; We found the right code
+"RTN","C0CMED6",330,0)
+ QUIT +$G(RXNORM)  ; RETURN RXNORM; if we couldn't find a clnical drug, return with 0
+"RTN","C0CMED6",331,0)
+ 
+"RTN","C0CMIME")
+0^86^B99031395
+"RTN","C0CMIME",1,0)
+C0CMIME ; CCDCCR/GPL - MIME manipulation utilities; 3/8/11 ; 5/16/11 2:32pm
+"RTN","C0CMIME",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMIME",3,0)
+ ;Copyright 2008 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CMIME",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CMIME",5,0)
+ ;
+"RTN","C0CMIME",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CMIME",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CMIME",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMIME",9,0)
+ ;(at your option) any later version.
+"RTN","C0CMIME",10,0)
+ ;
+"RTN","C0CMIME",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CMIME",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMIME",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMIME",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CMIME",15,0)
+ ;
+"RTN","C0CMIME",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CMIME",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMIME",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMIME",19,0)
+ ;
+"RTN","C0CMIME",20,0)
+ Q
+"RTN","C0CMIME",21,0)
+ ;
+"RTN","C0CMIME",22,0)
+TEST(ZDFN) ;
+"RTN","C0CMIME",23,0)
+ D CCRRPC^C0CCCR(.ZCCR,ZDFN) ; GET A CCR TO WORK WITH
+"RTN","C0CMIME",24,0)
+ ;M ZCOPY=ZCCR
+"RTN","C0CMIME",25,0)
+ S ZCOPY(1)=""
+"RTN","C0CMIME",26,0)
+ N ZI S ZI=0
+"RTN","C0CMIME",27,0)
+ F  S ZI=$O(ZCCR(ZI)) Q:ZI=""  D  ; FOR EACH LINE
+"RTN","C0CMIME",28,0)
+ . S ZCOPY(1)=ZCOPY(1)_ZCCR(ZI)
+"RTN","C0CMIME",29,0)
+ ;D ENCODE("ZCOPY",1,ZCOPY(1))
+"RTN","C0CMIME",30,0)
+ S G(1)=$$ENCODE^RGUTUU(ZCOPY(1))
+"RTN","C0CMIME",31,0)
+ D CHUNK("G2","G",45)
+"RTN","C0CMIME",32,0)
+ Q
+"RTN","C0CMIME",33,0)
+ENCODE(ZRTN,ZARY) ;
+"RTN","C0CMIME",34,0)
+ ; ROUTINE TO ENCODE AN XML DOCUMENT FOR SENDING
+"RTN","C0CMIME",35,0)
+ ; ZARY IS PASSED BY NAME
+"RTN","C0CMIME",36,0)
+ ; ZRTN IS PASSED BY REFERENCE AND IS THE RETURN
+"RTN","C0CMIME",37,0)
+ ;
+"RTN","C0CMIME",38,0)
+ S ZCOPY(1)=""
+"RTN","C0CMIME",39,0)
+ N ZI S ZI=0
+"RTN","C0CMIME",40,0)
+ F  S ZI=$O(@ZARY@(ZI)) Q:ZI=""  D  ; FOR EACH LINE
+"RTN","C0CMIME",41,0)
+ . S ZCOPY(1)=ZCOPY(1)_@ZARY@(ZI)
+"RTN","C0CMIME",42,0)
+ N G
+"RTN","C0CMIME",43,0)
+ S G(1)=$$ENCODE^RGUTUU(ZCOPY(1))
+"RTN","C0CMIME",44,0)
+ D CHUNK(ZRTN,"G",45)
+"RTN","C0CMIME",45,0)
+ Q
+"RTN","C0CMIME",46,0)
+ ; THIS ROUTINE WAS COPIED FROM LRSRVR4 AND THEN MODIFIED . THANKS JOHN
+"RTN","C0CMIME",47,0)
+ENCODEOLD(IARY,LRNODE,LRSTR) ; Encode a string, keep remainder for next line
+"RTN","C0CMIME",48,0)
+ ; Call with LRSTR by reference, Remainder returned in LRSTR
+"RTN","C0CMIME",49,0)
+ ; IARY IS PASSED BY NAME
+"RTN","C0CMIME",50,0)
+ S LRQUIT=0,LRLEN=$L(LRSTR)
+"RTN","C0CMIME",51,0)
+ F  D  Q:LRQUIT
+"RTN","C0CMIME",52,0)
+ . I $L(LRSTR)<45 S LRQUIT=1 Q
+"RTN","C0CMIME",53,0)
+ . S LRX=$E(LRSTR,1,45)
+"RTN","C0CMIME",54,0)
+ . S LRNODE=LRNODE+1,@IARY@(LRNODE)=$$UUEN^LRSRVR4(LRX)
+"RTN","C0CMIME",55,0)
+ . S LRSTR=$E(LRSTR,46,LRLEN)
+"RTN","C0CMIME",56,0)
+ Q
+"RTN","C0CMIME",57,0)
+ ;
+"RTN","C0CMIME",58,0)
+TESTMAIL ;
+"RTN","C0CMIME",59,0)
+ ; TEST OF MAILSEND
+"RTN","C0CMIME",60,0)
+ ;S ZTO("glilly@glilly.net")=""
+"RTN","C0CMIME",61,0)
+ S ZTO("mish@nhin.openforum.opensourcevista.net")=""
+"RTN","C0CMIME",62,0)
+ ;S ZTO("martijn@djigzo.com")=""
+"RTN","C0CMIME",63,0)
+ ;S ZTO("profmish@gmail.com")=""
+"RTN","C0CMIME",64,0)
+ ;S ZTO("nanthracite@earthlink.net")=""
+"RTN","C0CMIME",65,0)
+ S ZFROM="ANTHRACITE.NANCY"
+"RTN","C0CMIME",66,0)
+ S ZATTACH=$NA(^GPL("CCR"))
+"RTN","C0CMIME",67,0)
+ I $G(@ZATTACH@(1))="" D  ; NO CCR THERE
+"RTN","C0CMIME",68,0)
+ . D CCRRPC^C0CCCR(.GPL,2) ; GET ONE FROM PATIENT 2
+"RTN","C0CMIME",69,0)
+ . M @ZATTACH=GPL ; PUT IT IN THERE FOR NEXT TIME
+"RTN","C0CMIME",70,0)
+ S ZSUBJECT="TEST OF THE NEW MAILSEND ROUTINE"
+"RTN","C0CMIME",71,0)
+ D MAILSEND(.GR,ZFROM,"ZTO",,ZSUBJECT,,ZATTACH)
+"RTN","C0CMIME",72,0)
+ ZWR GR
+"RTN","C0CMIME",73,0)
+ Q
+"RTN","C0CMIME",74,0)
+ ;
+"RTN","C0CMIME",75,0)
+TESTMAIL2 ;
+"RTN","C0CMIME",76,0)
+ ; TEST OF MAILSEND TO gpl.mdc-crew.net
+"RTN","C0CMIME",77,0)
+ N C0CGM
+"RTN","C0CMIME",78,0)
+ S C0CGM(1)="This is a test message."
+"RTN","C0CMIME",79,0)
+ S C0CGM(2)="A Continuity of Care record is attached"
+"RTN","C0CMIME",80,0)
+ S C0CGM(3)="It contains no Protected Health Information (PHI)"
+"RTN","C0CMIME",81,0)
+ S C0CGM(4)="It is purely test data used for software development"
+"RTN","C0CMIME",82,0)
+ S C0CGM(5)="It does not represent information about any person living or dead"
+"RTN","C0CMIME",83,0)
+ ;S ZTO("glilly@glilly.net")=""
+"RTN","C0CMIME",84,0)
+ ;S ZTO("george.lilly@pobox.com")=""
+"RTN","C0CMIME",85,0)
+ ;S ZTO("george@nhin.openforum.opensourcevista.net")=""
+"RTN","C0CMIME",86,0)
+ ;S ZTO("mish@nhin.openforum.opensourcevista.net")="" 
+"RTN","C0CMIME",87,0)
+ S ZTO("brooks.richard@securemail.opensourcevista.net")="" 
+"RTN","C0CMIME",88,0)
+ ;S ZTO("LILLY.GEORGE@mdc-crew.net")=""
+"RTN","C0CMIME",89,0)
+ ;S ZTO("ncoal@live.com")=""
+"RTN","C0CMIME",90,0)
+ ;S ZTO("martijn@djigzo.com")=""
+"RTN","C0CMIME",91,0)
+ ;S ZTO("profmish@gmail.com")=""
+"RTN","C0CMIME",92,0)
+ ;S ZTO("nanthracite@earthlink.net")=""
+"RTN","C0CMIME",93,0)
+ S ZTO("gpl.doctortest@gmail.com")=""
+"RTN","C0CMIME",94,0)
+ S ZFROM="LILLY.GEORGE"
+"RTN","C0CMIME",95,0)
+ S ZATTACH=$NA(^GPL("CCR"))
+"RTN","C0CMIME",96,0)
+ I $G(@ZATTACH@(1))="" D  ; NO CCR THERE
+"RTN","C0CMIME",97,0)
+ . D CCRRPC^C0CCCR(.GPL,2) ; GET ONE FROM PATIENT 2
+"RTN","C0CMIME",98,0)
+ . M @ZATTACH=GPL ; PUT IT IN THERE FOR NEXT TIME
+"RTN","C0CMIME",99,0)
+ S ZSUBJECT="TEST OF THE NEW MAILSEND ROUTINE"
+"RTN","C0CMIME",100,0)
+ D MAILSEND(.GR,ZFROM,"ZTO",,ZSUBJECT,"C0CGM",ZATTACH,"CCR.xml")
+"RTN","C0CMIME",101,0)
+ ZWR GR
+"RTN","C0CMIME",102,0)
+ Q
+"RTN","C0CMIME",103,0)
+ ;
+"RTN","C0CMIME",104,0)
+LINE(C0CFILE,C0CTO) ; read a file name passed in C0CFILE and send it to
+"RTN","C0CMIME",105,0)
+ ; the email address in C0CTO 
+"RTN","C0CMIME",106,0)
+ ; the directory and the "from" are all hard coded
+"RTN","C0CMIME",107,0)
+ ;
+"RTN","C0CMIME",108,0)
+ N ZZFROM S ZZFROM="LILLY.GEORGE"
+"RTN","C0CMIME",109,0)
+ N GN S GN=$NA(^TMP("C0CMIME2",$J))
+"RTN","C0CMIME",110,0)
+ N GN1 S GN1=$NA(@GN@(1))
+"RTN","C0CMIME",111,0)
+ K @GN
+"RTN","C0CMIME",112,0)
+ I '$D(C0CFILE) Q  ; NO FILENAME PASSED
+"RTN","C0CMIME",113,0)
+ I '$D(C0CTO) S C0CTO="brooks.richard@securemail.opensourcevista.net"
+"RTN","C0CMIME",114,0)
+ S ZZTO(C0CTO)=""
+"RTN","C0CMIME",115,0)
+ N ZMESS S ZMESS(1)="file transmission from wvehr3-09"
+"RTN","C0CMIME",116,0)
+ N GD S GD="/home/wvehr3-09/EHR/" ; directory
+"RTN","C0CMIME",117,0)
+ I '$$FTG^%ZISH(GD,C0CFILE,GN1,3) Q  D  ;
+"RTN","C0CMIME",118,0)
+ . W !,"error reading file",C0CFILE
+"RTN","C0CMIME",119,0)
+ D MAILSEND(.ZRTN,ZZFROM,"ZZTO",,"file transmission","ZMESS",GN,C0CFILE)
+"RTN","C0CMIME",120,0)
+ K @GN ; CLEAN UP
+"RTN","C0CMIME",121,0)
+ ;ZWR ZRTN
+"RTN","C0CMIME",122,0)
+ W !,$G(ZRTN(1))
+"RTN","C0CMIME",123,0)
+ Q
+"RTN","C0CMIME",124,0)
+ ;
+"RTN","C0CMIME",125,0)
+MAILSEND(RTN,FROM,TO,CC,SUBJECT,MESSAGE,ATTACH,FNAME,FLAGS) ; MAIL SENDING INTERFACE
+"RTN","C0CMIME",126,0)
+ ; RTN IS THE RETURN ARRAY PASSED BY REFERENCE
+"RTN","C0CMIME",127,0)
+ ; FROM IS PASSED BY VALUE AND IS THE EMAIL ADDRESS OF THE SENDER
+"RTN","C0CMIME",128,0)
+ ;  IF NULL, WILL SEND FROM THE CURRENT DUZ
+"RTN","C0CMIME",129,0)
+ ; TO AND CC ARE RECIEPIENT EMAIL ADDRESSES PASSED BY NAME
+"RTN","C0CMIME",130,0)
+ ;  @TO@("addr1@domain1.net") 
+"RTN","C0CMIME",131,0)
+ ;  @CC@("addr2@domain2.com")  both can be multiples
+"RTN","C0CMIME",132,0)
+ ; SUBJECT IS PASSED BY VALUE AND WILL GO IN THE SUBJECT LINE
+"RTN","C0CMIME",133,0)
+ ; MESSAGE IS PASSED BY NAME AND IS AN ARRAY OF TEXT
+"RTN","C0CMIME",134,0)
+ ; ATTACH IS PASSED BY NAME AND IS AN XML OR HTML FILE TO BE ATTACHED
+"RTN","C0CMIME",135,0)
+ ; FNAME IS THE FILENAME OF THE ATTACHMENT, DEFAULT IS ccr.xml
+"RTN","C0CMIME",136,0)
+ ;
+"RTN","C0CMIME",137,0)
+ I '$D(FNAME) S FNAME="ccr.xml" ; default filename
+"RTN","C0CMIME",138,0)
+ N GN
+"RTN","C0CMIME",139,0)
+ S GN=$NA(^TMP($J,"C0CMIME"))
+"RTN","C0CMIME",140,0)
+ K @GN
+"RTN","C0CMIME",141,0)
+ S GM(1)="MIME-Version: 1.0"
+"RTN","C0CMIME",142,0)
+ S GM(2)="Content-Type: multipart/mixed; boudary=""1234567"""
+"RTN","C0CMIME",143,0)
+ S GM(3)=""
+"RTN","C0CMIME",144,0)
+ S GM(4)=""
+"RTN","C0CMIME",145,0)
+ ;S GM(5)="--123456788888"
+"RTN","C0CMIME",146,0)
+ ;S GM(5)=$$REPEAT^XLFSTR("-",$L(X))
+"RTN","C0CMIME",147,0)
+ S GM(5)="--123456899999"
+"RTN","C0CMIME",148,0)
+ S GM(6)="Content-Type: text/xml; name="_FNAME
+"RTN","C0CMIME",149,0)
+ S GM(7)="Content-Transfer-Encoding: base64"
+"RTN","C0CMIME",150,0)
+ S GM(8)="Content-Disposition: attachment; filename="_FNAME
+"RTN","C0CMIME",151,0)
+ S GM(9)=""
+"RTN","C0CMIME",152,0)
+ S GM(10)="" ; FOR THE END
+"RTN","C0CMIME",153,0)
+ ;S GM(11)="--123456788888--"
+"RTN","C0CMIME",154,0)
+ S GM(11)="--123456899999--"
+"RTN","C0CMIME",155,0)
+ S GM(12)=""
+"RTN","C0CMIME",156,0)
+ S GM(13)=""
+"RTN","C0CMIME",157,0)
+ S GG(1)="--123456899999"
+"RTN","C0CMIME",158,0)
+ S GG(2)="Content-Type: text/plain; charset=ISO-8859-1; format=flowed"
+"RTN","C0CMIME",159,0)
+ S GG(3)="Content-Transfer-Encoding: 7bit"
+"RTN","C0CMIME",160,0)
+ S GG(4)=""
+"RTN","C0CMIME",161,0)
+ S GG(5)="This is a test message."
+"RTN","C0CMIME",162,0)
+ S GG(6)="A Continuity of Care record is attached"
+"RTN","C0CMIME",163,0)
+ S GG(7)="It contains no Protected Health Information (PHI)"
+"RTN","C0CMIME",164,0)
+ S GG(8)="It is purely test data used for software development"
+"RTN","C0CMIME",165,0)
+ S GG(9)="It does not represent information about any person living or dead"
+"RTN","C0CMIME",166,0)
+ S GG(10)=""
+"RTN","C0CMIME",167,0)
+ S GG(11)="--123456899999--"
+"RTN","C0CMIME",168,0)
+ ;S GG(11)="Content-Type: text/plain; charset=""us-ascii"""
+"RTN","C0CMIME",169,0)
+ S GG(12)=""
+"RTN","C0CMIME",170,0)
+ ;S GG(13)="This is a test message."
+"RTN","C0CMIME",171,0)
+ S GG(14)="A Continuity of Care record is attached"
+"RTN","C0CMIME",172,0)
+ S GG(15)="It contains no Protected Health Information (PHI)"
+"RTN","C0CMIME",173,0)
+ S GG(16)="It is purely test data used for software development"
+"RTN","C0CMIME",174,0)
+ S GG(17)="It does not represent information about any person living or dead"
+"RTN","C0CMIME",175,0)
+ S GG(18)=""
+"RTN","C0CMIME",176,0)
+ S GG(19)="--123456899999"
+"RTN","C0CMIME",177,0)
+ S GG(20)="--987654321--"
+"RTN","C0CMIME",178,0)
+ K GBLD
+"RTN","C0CMIME",179,0)
+ ;D QUEUE^C0CXPATH("GBLD","GGG",1,3) ; THE MESSAGE
+"RTN","C0CMIME",180,0)
+ ;D QUEUE^C0CXPATH("GBLD","GG",1,10) ; THE MESSAGE
+"RTN","C0CMIME",181,0)
+ I $D(MESSAGE)'="" D  ; THERE IS A MESSAGE
+"RTN","C0CMIME",182,0)
+ . D QUEUE^C0CXPATH("GBLD","GG",1,4) ; THE MIME BOUNDARY
+"RTN","C0CMIME",183,0)
+ . D QUEUE^C0CXPATH("GBLD",MESSAGE,1,$O(@MESSAGE@(""),-1)) ;THE MESSAGE
+"RTN","C0CMIME",184,0)
+ . D QUEUE^C0CXPATH("GBLD","GG",10,10) ;A BLANK LINE
+"RTN","C0CMIME",185,0)
+ D QUEUE^C0CXPATH("GBLD","GM",5,9)
+"RTN","C0CMIME",186,0)
+ I $D(ATTACH)'="" D  ; IF WE HAVE AN ATTACHMENT
+"RTN","C0CMIME",187,0)
+ . D ENCODE("G2",ATTACH) ; ENCODE FOR SENDING
+"RTN","C0CMIME",188,0)
+ . D QUEUE^C0CXPATH("GBLD","G2",1,$O(G2(""),-1))
+"RTN","C0CMIME",189,0)
+ D QUEUE^C0CXPATH("GBLD","GM",11,12)
+"RTN","C0CMIME",190,0)
+ D BUILD^C0CXPATH("GBLD",GN)
+"RTN","C0CMIME",191,0)
+ ;S GGG=$NA(^GPL("MIME2"))
+"RTN","C0CMIME",192,0)
+ K @GN@(0) ; KILL THE LINE COUNT
+"RTN","C0CMIME",193,0)
+ K LRINSTR,LRTASK,LRTO,XMERR,XMZ
+"RTN","C0CMIME",194,0)
+ M LRTO=@TO
+"RTN","C0CMIME",195,0)
+ I $D(CC) M LRTO=@CC
+"RTN","C0CMIME",196,0)
+ S LRINSTR("ADDR FLAGS")="R"
+"RTN","C0CMIME",197,0)
+ S LRINSTR("FROM")=$G(FROM)
+"RTN","C0CMIME",198,0)
+ S LRMSUBJ=$G(SUBJECT)
+"RTN","C0CMIME",199,0)
+ S LRMSUBJ=$E(LRMSUBJ,1,65)
+"RTN","C0CMIME",200,0)
+ D SENDMSG^XMXAPI(DUZ,LRMSUBJ,GN,.LRTO,.LRINSTR,.LRTASK)
+"RTN","C0CMIME",201,0)
+ I $G(XMERR)=1 S RTN(1)="ERROR SENDING MESSAGE" Q  ;
+"RTN","C0CMIME",202,0)
+ S RTN(1)="OK"
+"RTN","C0CMIME",203,0)
+ Q
+"RTN","C0CMIME",204,0)
+ ;
+"RTN","C0CMIME",205,0)
+MAILSEND0(LRMSUBJ) ; Send extract back to requestor.
+"RTN","C0CMIME",206,0)
+ ;
+"RTN","C0CMIME",207,0)
+ ;D TEST
+"RTN","C0CMIME",208,0)
+ S GN=$NA(^TMP($J,"C0CMIME"))
+"RTN","C0CMIME",209,0)
+ K @GN
+"RTN","C0CMIME",210,0)
+ ;M @GN=G2
+"RTN","C0CMIME",211,0)
+ S GM(1)="MIME-Version: 1.0"
+"RTN","C0CMIME",212,0)
+ S GM(2)="Content-Type: multipart/mixed; boudary=""1234567"""
+"RTN","C0CMIME",213,0)
+ S GM(3)=""
+"RTN","C0CMIME",214,0)
+ S GM(4)=""
+"RTN","C0CMIME",215,0)
+ S GM(5)="--1234567"
+"RTN","C0CMIME",216,0)
+ ;S GM(5)=$$REPEAT^XLFSTR("-",$L(X))
+"RTN","C0CMIME",217,0)
+ S GM(6)="Content-Type: text/xml; name=""ccr.xml"""
+"RTN","C0CMIME",218,0)
+ S GM(7)="Content-Transfer-Encoding: base64"
+"RTN","C0CMIME",219,0)
+ S GM(8)="Content-Disposition: attachment; filename=""ccr.xml"""
+"RTN","C0CMIME",220,0)
+ ;S GM(6)=$$UUBEGFN^LRSRVR2A("CCR.xml")
+"RTN","C0CMIME",221,0)
+ S GM(9)=""
+"RTN","C0CMIME",222,0)
+ S GM(10)="" ; FOR THE END
+"RTN","C0CMIME",223,0)
+ S GM(11)="--frontier--"
+"RTN","C0CMIME",224,0)
+ S GM(12)="."
+"RTN","C0CMIME",225,0)
+ S GM(13)=""
+"RTN","C0CMIME",226,0)
+ K GBLD
+"RTN","C0CMIME",227,0)
+ ;D QUEUE^C0CXPATH("GBLD","GM",1,9)
+"RTN","C0CMIME",228,0)
+ ;D QUEUE^C0CXPATH("GBLD","G2",1,$O(G2(""),-1))
+"RTN","C0CMIME",229,0)
+ ;D QUEUE^C0CXPATH("GBLD","GM",10,13)
+"RTN","C0CMIME",230,0)
+ ;D BUILD^C0CXPATH("GBLD",GN)
+"RTN","C0CMIME",231,0)
+ S GGG=$NA(^GPL("MIME2"))
+"RTN","C0CMIME",232,0)
+ ;D QUEUE^C0CXPATH("GBLD","GM",1,1)
+"RTN","C0CMIME",233,0)
+ D QUEUE^C0CXPATH("GBLD",GGG,21,159)
+"RTN","C0CMIME",234,0)
+ D BUILD^C0CXPATH("GBLD",GN)
+"RTN","C0CMIME",235,0)
+ K @GN@(0) ; KILL THE LINE COUNT
+"RTN","C0CMIME",236,0)
+ K LRINSTR,LRTASK,LRTO,XMERR,XMZ
+"RTN","C0CMIME",237,0)
+ S XQSND="glilly@glilly.net"
+"RTN","C0CMIME",238,0)
+ ;S XQSND="nanthracite@earthlink.net"
+"RTN","C0CMIME",239,0)
+ ;S XQSND="dlefevre@orohosp.com"
+"RTN","C0CMIME",240,0)
+ ;S XQSND="gregwoodhouse@me.com"
+"RTN","C0CMIME",241,0)
+ ;S XQSND="rick.marshall@vistaexpertise.net"
+"RTN","C0CMIME",242,0)
+ S LRTO(XQSND)=""
+"RTN","C0CMIME",243,0)
+ S LRINSTR("ADDR FLAGS")="R"
+"RTN","C0CMIME",244,0)
+ S LRINSTR("FROM")="CCR_PACKAGE"
+"RTN","C0CMIME",245,0)
+ S LRMSUBJ="A SAMPLE CCR"
+"RTN","C0CMIME",246,0)
+ S LRMSUBJ=$E(LRMSUBJ,1,65)
+"RTN","C0CMIME",247,0)
+ D SENDMSG^XMXAPI(9,LRMSUBJ,GN,.LRTO,.LRINSTR,.LRTASK)
+"RTN","C0CMIME",248,0)
+ I $G(XMERR)=1 W !,"ERROR SENDING MESSAGE" Q  ;
+"RTN","C0CMIME",249,0)
+ ;S ^XMB(3.9,LRTASK,1,.1130590,0)="MIME-Version: 1.0"
+"RTN","C0CMIME",250,0)
+ ;S ^XMB(3.9,LRTASK,1,.1130591,0)="Content-type: multipart/mixed; boundary=000e0cd6ae026c3d4b049e7befe9"
+"RTN","C0CMIME",251,0)
+ Q
+"RTN","C0CMIME",252,0)
+ ;
+"RTN","C0CMIME",253,0)
+MAILSEND2(UDFN,ADDR) ; Send extract back to requestor.
+"RTN","C0CMIME",254,0)
+ ;
+"RTN","C0CMIME",255,0)
+ I +$G(UDFN)=0 S UDFN=2 ;
+"RTN","C0CMIME",256,0)
+ D TEST(UDFN)
+"RTN","C0CMIME",257,0)
+ S GN=$NA(^TMP($J,"C0CMIME"))
+"RTN","C0CMIME",258,0)
+ K @GN
+"RTN","C0CMIME",259,0)
+ ;M @GN=G2
+"RTN","C0CMIME",260,0)
+ S GM(1)="MIME-Version: 1.0"
+"RTN","C0CMIME",261,0)
+ S GM(2)="Content-Type: multipart/mixed; boudary=""1234567"""
+"RTN","C0CMIME",262,0)
+ S GM(3)=""
+"RTN","C0CMIME",263,0)
+ S GM(4)=""
+"RTN","C0CMIME",264,0)
+ S GM(5)="--1234567"
+"RTN","C0CMIME",265,0)
+ ;S GM(5)=$$REPEAT^XLFSTR("-",$L(X))
+"RTN","C0CMIME",266,0)
+ S GM(6)="Content-Type: text/xml; name=""ccr.xml"""
+"RTN","C0CMIME",267,0)
+ S GM(7)="Content-Transfer-Encoding: base64"
+"RTN","C0CMIME",268,0)
+ S GM(8)="Content-Disposition: attachment; filename=""ccr.xml"""
+"RTN","C0CMIME",269,0)
+ ;S GM(6)=$$UUBEGFN^LRSRVR2A("CCR.xml")
+"RTN","C0CMIME",270,0)
+ S GM(9)=""
+"RTN","C0CMIME",271,0)
+ S GM(10)="" ; FOR THE END
+"RTN","C0CMIME",272,0)
+ S GM(11)="--1234567--"
+"RTN","C0CMIME",273,0)
+ S GM(12)=""
+"RTN","C0CMIME",274,0)
+ S GM(13)=""
+"RTN","C0CMIME",275,0)
+ K GBLD
+"RTN","C0CMIME",276,0)
+ D QUEUE^C0CXPATH("GBLD","GM",5,9)
+"RTN","C0CMIME",277,0)
+ D QUEUE^C0CXPATH("GBLD","G2",1,$O(G2(""),-1))
+"RTN","C0CMIME",278,0)
+ D QUEUE^C0CXPATH("GBLD","GM",10,12)
+"RTN","C0CMIME",279,0)
+ D BUILD^C0CXPATH("GBLD",GN)
+"RTN","C0CMIME",280,0)
+ S GGG=$NA(^GPL("MIME2"))
+"RTN","C0CMIME",281,0)
+ ;D QUEUE^C0CXPATH("GBLD","GM",1,1)
+"RTN","C0CMIME",282,0)
+ ;D QUEUE^C0CXPATH("GBLD",GGG,21,159)
+"RTN","C0CMIME",283,0)
+ ;D BUILD^C0CXPATH("GBLD",GN)
+"RTN","C0CMIME",284,0)
+ K @GN@(0) ; KILL THE LINE COUNT
+"RTN","C0CMIME",285,0)
+ K LRINSTR,LRTASK,LRTO,XMERR,XMZ
+"RTN","C0CMIME",286,0)
+ I $G(ADDR)'="" S XQSND=ADDR
+"RTN","C0CMIME",287,0)
+ E  S XQSND="glilly@glilly.net"
+"RTN","C0CMIME",288,0)
+ ;S XQSND="nanthracite@earthlink.net"
+"RTN","C0CMIME",289,0)
+ ;S XQSND="dlefevre@orohosp.com"
+"RTN","C0CMIME",290,0)
+ ;S XQSND="gregwoodhouse@me.com"
+"RTN","C0CMIME",291,0)
+ ;S XQSND="rick.marshall@vistaexpertise.net"
+"RTN","C0CMIME",292,0)
+ S LRTO(XQSND)=""
+"RTN","C0CMIME",293,0)
+ ;S LRTO("glilly@glilly.net")=""
+"RTN","C0CMIME",294,0)
+ S LRINSTR("ADDR FLAGS")="R"
+"RTN","C0CMIME",295,0)
+ S LRINSTR("FROM")="ANTHRACITE.NANCY"
+"RTN","C0CMIME",296,0)
+ S LRMSUBJ="Sending a CCR with Mailman"
+"RTN","C0CMIME",297,0)
+ S LRMSUBJ=$E(LRMSUBJ,1,65)
+"RTN","C0CMIME",298,0)
+ D SENDMSG^XMXAPI(9,LRMSUBJ,GN,.LRTO,.LRINSTR,.LRTASK)
+"RTN","C0CMIME",299,0)
+ I $G(XMERR)=1 W !,"ERROR SENDING MESSAGE" Q  ;
+"RTN","C0CMIME",300,0)
+ ;S ^XMB(3.9,LRTASK,1,.1130590,0)="MIME-Version: 1.0"
+"RTN","C0CMIME",301,0)
+ ;S ^XMB(3.9,LRTASK,1,.1130591,0)="Content-type: multipart/mixed; boundary=000e0cd6ae026c3d4b049e7befe9"
+"RTN","C0CMIME",302,0)
+ Q
+"RTN","C0CMIME",303,0)
+ ;
+"RTN","C0CMIME",304,0)
+SIMPLE ;
+"RTN","C0CMIME",305,0)
+ S GN(1)="SIMPLE TEST MESSAGE"
+"RTN","C0CMIME",306,0)
+ K LRINSTR,LRTASK,LRTO,XMERR,XMZ
+"RTN","C0CMIME",307,0)
+ S XQSND="glilly@glilly.net"
+"RTN","C0CMIME",308,0)
+ S LRTO(XQSND)=""
+"RTN","C0CMIME",309,0)
+ S LRINSTR("ADDR FLAGS")="R"
+"RTN","C0CMIME",310,0)
+ S LRINSTR("FROM")="CCR_PACKAGE"
+"RTN","C0CMIME",311,0)
+ S LRMSUBJ="A SAMPLE CCR"
+"RTN","C0CMIME",312,0)
+ S LRMSUBJ=$E(LRMSUBJ,1,65)
+"RTN","C0CMIME",313,0)
+ D SENDMSG^XMXAPI(9,LRMSUBJ,"GN",.LRTO,.LRINSTR,.LRTASK)
+"RTN","C0CMIME",314,0)
+ Q
+"RTN","C0CMIME",315,0)
+CHUNK(OUTXML,INXML,ZSIZE) ; BREAKS INXML INTO ZSIZE BLOCKS
+"RTN","C0CMIME",316,0)
+ ; INXML IS AN ARRAY PASSED BY NAME OF STRINGS
+"RTN","C0CMIME",317,0)
+ ; OUTXML IS ALSO PASSED BY NAME
+"RTN","C0CMIME",318,0)
+ ; IF ZSIZE IS NOT PASSED, 1000 IS USED
+"RTN","C0CMIME",319,0)
+ I '$D(ZSIZE) S ZSIZE=1000 ; DEFAULT BLOCK SIZE
+"RTN","C0CMIME",320,0)
+ N ZB,ZI,ZJ,ZK,ZL,ZN
+"RTN","C0CMIME",321,0)
+ S ZB=ZSIZE-1
+"RTN","C0CMIME",322,0)
+ S ZN=1
+"RTN","C0CMIME",323,0)
+ S ZI=0 ; BEGINNING OF INDEX TO INXML
+"RTN","C0CMIME",324,0)
+ F  S ZI=$O(@INXML@(ZI)) Q:+ZI=0  D  ; FOR EACH STRING IN INXML
+"RTN","C0CMIME",325,0)
+ . S ZL=$L(@INXML@(ZI)) ; LENGTH OF THE STRING
+"RTN","C0CMIME",326,0)
+ . F ZJ=1:ZSIZE:ZL D  ;
+"RTN","C0CMIME",327,0)
+ . . S ZK=$S(ZJ+ZB<ZL:ZJ+ZB,1:ZL) ; END FOR EXTRACT
+"RTN","C0CMIME",328,0)
+ . . S @OUTXML@(ZN)=$E(@INXML@(ZI),ZJ,ZK) ; PULL OUT THE PIECE
+"RTN","C0CMIME",329,0)
+ . . S ZN=ZN+1 ; INCREMENT OUT ARRAY INDEX
+"RTN","C0CMIME",330,0)
+ Q
+"RTN","C0CMIME",331,0)
+ ;
+"RTN","C0CMIME",332,0)
+CLEAN(IARY) ; RUNS THROUGH AN ARRAY PASSED BY NAME AND STRIPS OUT $C(13)
+"RTN","C0CMIME",333,0)
+ ;
+"RTN","C0CMIME",334,0)
+ N ZI S ZI=0
+"RTN","C0CMIME",335,0)
+ F  S ZI=$O(@IARY@(ZI)) Q:+ZI=0  D  ;
+"RTN","C0CMIME",336,0)
+ . S @IARY@(ZI)=$TR(@IARY@(ZI),$C(13)) ;
+"RTN","C0CMIME",337,0)
+ . I $F(@IARY@(ZI)," <") S @IARY@(ZI)="<"_$P(@IARY@(ZI)," <",2) ; RM BLNKS
+"RTN","C0CMIME",338,0)
+ Q
+"RTN","C0CMIME",339,0)
+ ;
+"RTN","C0CMXML")
+0^65^B56456416
+"RTN","C0CMXML",1,0)
+C0CMXML   ; GPL - MXML based XPath utilities;10/13/09  17:05
+"RTN","C0CMXML",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMXML",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CMXML",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CMXML",5,0)
+ ;
+"RTN","C0CMXML",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CMXML",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CMXML",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMXML",9,0)
+ ;(at your option) any later version.
+"RTN","C0CMXML",10,0)
+ ;
+"RTN","C0CMXML",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CMXML",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMXML",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMXML",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CMXML",15,0)
+ ;
+"RTN","C0CMXML",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CMXML",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMXML",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMXML",19,0)
+ ;
+"RTN","C0CMXML",20,0)
+ Q
+"RTN","C0CMXML",21,0)
+ ; THIS FILE CONTAINS THE XPATH CREATOR, THE PARSE CALL TO THE MXML PARSER
+"RTN","C0CMXML",22,0)
+ ; AND THE OUTXML XML GENERATOR THAT OUTPUTS XML FROM AN MXML DOM
+"RTN","C0CMXML",23,0)
+ ; FOR CCD SPECIFIC ROUTINES, SEE C0CMCCD
+"RTN","C0CMXML",24,0)
+ ; FOR TEMPLATE FILE RELATED ROUTINES, SEE C0CMXP
+"RTN","C0CMXML",25,0)
+ ;
+"RTN","C0CMXML",26,0)
+TEST ;
+"RTN","C0CMXML",27,0)
+ S C0CXMLIN=$NA(^TMP("C0CMXML",$J))
+"RTN","C0CMXML",28,0)
+ K GARY
+"RTN","C0CMXML",29,0)
+ W $$FTG^%ZISH("/home/vademo2/EHR/p/","mxml-test.xml",$NA(@C0CXMLIN@(1)),3)
+"RTN","C0CMXML",30,0)
+ S C0CDOCID=$$PARSE(C0CXMLIN) W !,"DocID: ",C0CDOCID
+"RTN","C0CMXML",31,0)
+ S REDUX="//ContinuityOfCareRecord/Body"
+"RTN","C0CMXML",32,0)
+ D XPATH(1,"/","GIDX","GARY",,REDUX)
+"RTN","C0CMXML",33,0)
+ D SEPARATE^C0CMCCD("GARY2","GARY")
+"RTN","C0CMXML",34,0)
+ S ZI=""
+"RTN","C0CMXML",35,0)
+ F  S ZI=$O(GARY2(ZI)) Q:ZI=""  D  ;
+"RTN","C0CMXML",36,0)
+ . N GTMP,G2
+"RTN","C0CMXML",37,0)
+ . M G2=GARY2(ZI)
+"RTN","C0CMXML",38,0)
+ . D DEMUX2^C0CMXP("GTMP","G2",2)
+"RTN","C0CMXML",39,0)
+ . M GARY3(ZI)=GTMP
+"RTN","C0CMXML",40,0)
+ Q
+"RTN","C0CMXML",41,0)
+ ;
+"RTN","C0CMXML",42,0)
+TEST2 ;
+"RTN","C0CMXML",43,0)
+ S REDUX="//soap:Envelope/soap:Body/GetPatientFullMedicationHistory5Response/GetPatientFullMedicationHistory5Result/patientDrugDetail"
+"RTN","C0CMXML",44,0)
+ D XPATH(1,"/","GIDX","GARY","",REDUX)
+"RTN","C0CMXML",45,0)
+ Q
+"RTN","C0CMXML",46,0)
+ ;
+"RTN","C0CMXML",47,0)
+TEST3 
+"RTN","C0CMXML",48,0)
+ S C0CXMLIN=$NA(^TMP("C0CMXML",$J))
+"RTN","C0CMXML",49,0)
+ K GARY,GTMP,GIDX
+"RTN","C0CMXML",50,0)
+ K @C0CXMLIN
+"RTN","C0CMXML",51,0)
+ W $$FTG^%ZISH("/home/vademo2/CCR/","SampleCCDDocument.xml",$NA(@C0CXMLIN@(1)),3)
+"RTN","C0CMXML",52,0)
+ D CLEANARY^C0CMCCD("GTMP",C0CXMLIN) ; REMOVE CONTROL CHARACTERS
+"RTN","C0CMXML",53,0)
+ K @C0CXMLIN
+"RTN","C0CMXML",54,0)
+ M @C0CXMLIN=GTMP
+"RTN","C0CMXML",55,0)
+ K GTMP
+"RTN","C0CMXML",56,0)
+ D STRIPTXT^C0CMCCD("GTMP",C0CXMLIN)
+"RTN","C0CMXML",57,0)
+ K @C0CXMLIN
+"RTN","C0CMXML",58,0)
+ M @C0CXMLIN=GTMP
+"RTN","C0CMXML",59,0)
+ K GTMP
+"RTN","C0CMXML",60,0)
+ S C0CDOCID=$$PARSCCD^C0CMCCD(C0CXMLIN,"W") W !,"DocID: ",C0CDOCID
+"RTN","C0CMXML",61,0)
+ S REDUX="//ClinicalDocument/component/structuredBody"
+"RTN","C0CMXML",62,0)
+ D FINDTID^C0CMCCD ; FIND THE TEMPLATE IDS
+"RTN","C0CMXML",63,0)
+ D FINDALT^C0CMCCD ; FIND ALTERNATE TAGS
+"RTN","C0CMXML",64,0)
+ D SETCBK^C0CMCCD ; SET THE CALLBACK ROUTINE FOR TAGS
+"RTN","C0CMXML",65,0)
+ D XPATH(1,"/","GIDX","GARY",,REDUX)
+"RTN","C0CMXML",66,0)
+ K C0CCBK("TAG")
+"RTN","C0CMXML",67,0)
+ D SEPARATE^C0CMCCD("GARY2","GARY") ; SEPARATE FOR EASIER BROWSING
+"RTN","C0CMXML",68,0)
+ D TEST3A
+"RTN","C0CMXML",69,0)
+ Q
+"RTN","C0CMXML",70,0)
+ ;
+"RTN","C0CMXML",71,0)
+TEST3A ; INTERNAL ROUTINE
+"RTN","C0CMXML",72,0)
+ S ZI=""
+"RTN","C0CMXML",73,0)
+ F  S ZI=$O(GARY2(ZI)) Q:ZI=""  D  ;
+"RTN","C0CMXML",74,0)
+ . N GTMP,G2
+"RTN","C0CMXML",75,0)
+ . M G2=GARY2(ZI)
+"RTN","C0CMXML",76,0)
+ . D DEMUX2^C0CMXP("GTMP","G2",2)
+"RTN","C0CMXML",77,0)
+ . M GARY4(ZI)=GTMP
+"RTN","C0CMXML",78,0)
+ Q
+"RTN","C0CMXML",79,0)
+ ;
+"RTN","C0CMXML",80,0)
+TESTQ ; TEST OF THE QRDA TEMPLATE GPL 7/8/2010
+"RTN","C0CMXML",81,0)
+ S C0CXMLIN=$NA(^TMP("C0CMXML",$J))
+"RTN","C0CMXML",82,0)
+ K GARY,GTMP,GIDX
+"RTN","C0CMXML",83,0)
+ K @C0CXMLIN
+"RTN","C0CMXML",84,0)
+ W $$FTG^%ZISH("/home/vademo2/","QRDA_CategoryI_WorldVistA1.xml",$NA(@C0CXMLIN@(1)),3)
+"RTN","C0CMXML",85,0)
+ D CLEANARY^C0CMCCD("GTMP",C0CXMLIN) ; REMOVE CONTROL CHARACTERS
+"RTN","C0CMXML",86,0)
+ K @C0CXMLIN
+"RTN","C0CMXML",87,0)
+ S GTMP(1)="<"_$P(GTMP(1),"<",2)
+"RTN","C0CMXML",88,0)
+ M @C0CXMLIN=GTMP
+"RTN","C0CMXML",89,0)
+ K GTMP
+"RTN","C0CMXML",90,0)
+ D TESTQ2
+"RTN","C0CMXML",91,0)
+ Q
+"RTN","C0CMXML",92,0)
+ ;
+"RTN","C0CMXML",93,0)
+TESTQ2 ; SECOND PART OF TESTQ
+"RTN","C0CMXML",94,0)
+ D STRIPTXT^C0CMCCD("GTMP",C0CXMLIN)
+"RTN","C0CMXML",95,0)
+ K @C0CXMLIN
+"RTN","C0CMXML",96,0)
+ M @C0CXMLIN=GTMP
+"RTN","C0CMXML",97,0)
+ K GTMP
+"RTN","C0CMXML",98,0)
+ S C0CDOCID=$$PARSCCD^C0CMCCD(C0CXMLIN,"W") W !,"DocID: ",C0CDOCID
+"RTN","C0CMXML",99,0)
+ S REDUX="//ClinicalDocument/component/structuredBody"
+"RTN","C0CMXML",100,0)
+ D FINDTID^C0CMCCD ; FIND THE TEMPLATE IDS
+"RTN","C0CMXML",101,0)
+ D FINDALT^C0CMCCD ; FIND ALTERNATE TAGS
+"RTN","C0CMXML",102,0)
+ D SETCBK^C0CMCCD ; SET THE CALLBACK ROUTINE FOR TAGS
+"RTN","C0CMXML",103,0)
+ D XPATH(1,"/","GIDX","GARY",,REDUX)
+"RTN","C0CMXML",104,0)
+ K C0CCBK("TAG")
+"RTN","C0CMXML",105,0)
+ D SEPARATE^C0CMCCD("GARY2","GARY") ; SEPARATE FOR EASIER BROWSING
+"RTN","C0CMXML",106,0)
+ D TEST3A
+"RTN","C0CMXML",107,0)
+ Q
+"RTN","C0CMXML",108,0)
+ ;
+"RTN","C0CMXML",109,0)
+TEST4 ; TEST OF OUTPUTING AN XML FILE FROM THE DOM .. this one is the CCR
+"RTN","C0CMXML",110,0)
+ ;
+"RTN","C0CMXML",111,0)
+ D TEST ; SET UP THE DOM
+"RTN","C0CMXML",112,0)
+ D START^C0CMXMLB($$TAG(1),,"G")
+"RTN","C0CMXML",113,0)
+ D NDOUT($$FIRST(1))
+"RTN","C0CMXML",114,0)
+ D END^C0CMXMLB ;END THE DOCUMENT
+"RTN","C0CMXML",115,0)
+ M ZCCR=^TMP("MXMLBLD",$J)
+"RTN","C0CMXML",116,0)
+ ZWR ZCCR
+"RTN","C0CMXML",117,0)
+ Q
+"RTN","C0CMXML",118,0)
+ ;
+"RTN","C0CMXML",119,0)
+TEST5 ; SAME AS TEST4, BUT THIS TIME THE CCD
+"RTN","C0CMXML",120,0)
+ S C0CXMLIN=$NA(^TMP("C0CMXML",$J))
+"RTN","C0CMXML",121,0)
+ K GARY,GTMP,GIDX
+"RTN","C0CMXML",122,0)
+ K @C0CXMLIN
+"RTN","C0CMXML",123,0)
+ W $$FTG^%ZISH("/home/vademo2/CCR/","SampleCCDDocument.xml",$NA(@C0CXMLIN@(1)),3)
+"RTN","C0CMXML",124,0)
+ D CLEANARY^C0CMCCD("GTMP",C0CXMLIN) ; REMOVE CONTROL CHARACTERS
+"RTN","C0CMXML",125,0)
+ K @C0CXMLIN
+"RTN","C0CMXML",126,0)
+ M @C0CXMLIN=GTMP
+"RTN","C0CMXML",127,0)
+ K GTMP
+"RTN","C0CMXML",128,0)
+ D STRIPTXT^C0CMCCD("GTMP",C0CXMLIN)
+"RTN","C0CMXML",129,0)
+ K @C0CXMLIN
+"RTN","C0CMXML",130,0)
+ M @C0CXMLIN=GTMP
+"RTN","C0CMXML",131,0)
+ K GTMP
+"RTN","C0CMXML",132,0)
+ S C0CDOCID=$$PARSE(C0CXMLIN) W !,"DOCID: ",C0CDOCID  ;CALL REGULAR PARSER
+"RTN","C0CMXML",133,0)
+ ;D XPATH(1,"/","GIDX2","GARY2",,REDUX)
+"RTN","C0CMXML",134,0)
+ D OUTXML("ZCCD",C0CDOCID)
+"RTN","C0CMXML",135,0)
+ ;D START^C0CMXMLB($$TAG(1),,"G")
+"RTN","C0CMXML",136,0)
+ ;D NDOUT($$FIRST(1))
+"RTN","C0CMXML",137,0)
+ ;D END^C0CMXMLB ;EOND THE DOCUMENT
+"RTN","C0CMXML",138,0)
+ ;M ZCCD=^TMP("MXMLBLD",$J)
+"RTN","C0CMXML",139,0)
+ ZWR ZCCD(1:30)
+"RTN","C0CMXML",140,0)
+ Q
+"RTN","C0CMXML",141,0)
+ ; 
+"RTN","C0CMXML",142,0)
+XPATH(ZOID,ZPATH,ZXIDX,ZXPARY,ZNUM,ZREDUX) ; RECURSIVE ROUTINE TO POPULATE
+"RTN","C0CMXML",143,0)
+ ; THE XPATH INDEX ZXIDX, PASSED BY NAME
+"RTN","C0CMXML",144,0)
+ ; THE XPATH ARRAY XPARY, PASSED BY NAME
+"RTN","C0CMXML",145,0)
+ ; ZOID IS THE STARTING OID
+"RTN","C0CMXML",146,0)
+ ; ZPATH IS THE STARTING XPATH, USUALLY "/"
+"RTN","C0CMXML",147,0)
+ ; ZNUM IS THE MULTIPLE NUMBER [x], USUALLY NULL WHEN ON THE TOP NODE
+"RTN","C0CMXML",148,0)
+ ; ZREDUX IS THE XPATH REDUCTION STRING, TAKEN OUT OF EACH XPATH IF PRESENT
+"RTN","C0CMXML",149,0)
+ I $G(ZREDUX)="" S ZREDUX=""
+"RTN","C0CMXML",150,0)
+ N NEWPATH
+"RTN","C0CMXML",151,0)
+ N NEWNUM S NEWNUM=""
+"RTN","C0CMXML",152,0)
+ I $G(ZNUM)>0 S NEWNUM="["_ZNUM_"]"
+"RTN","C0CMXML",153,0)
+ S NEWPATH=ZPATH_"/"_$$TAG(ZOID)_NEWNUM ; CREATE THE XPATH FOR THIS NODE
+"RTN","C0CMXML",154,0)
+ I $G(ZREDUX)'="" D  ; REDUX PROVIDED?
+"RTN","C0CMXML",155,0)
+ . N GT S GT=$P(NEWPATH,ZREDUX,2)
+"RTN","C0CMXML",156,0)
+ . I GT'="" S NEWPATH=GT
+"RTN","C0CMXML",157,0)
+ S @ZXIDX@(NEWPATH)=ZOID ; ADD THE XPATH FOR THIS NODE TO THE XPATH INDEX
+"RTN","C0CMXML",158,0)
+ N GD D DATA("GD",ZOID) ; SEE IF THERE IS DATA FOR THIS NODE
+"RTN","C0CMXML",159,0)
+ I $D(GD(2)) M @ZXPARY@(NEWPATH)=GD ; IF MULITPLE DATA MERGE TO THE ARRAY
+"RTN","C0CMXML",160,0)
+ E  I $D(GD(1)) S @ZXPARY@(NEWPATH)=GD(1) ; IF SINGLE VALUE, ADD TO ARRAY
+"RTN","C0CMXML",161,0)
+ N ZFRST S ZFRST=$$FIRST(ZOID) ; SET FIRST CHILD
+"RTN","C0CMXML",162,0)
+ I ZFRST'=0 D  ; THERE IS A CHILD
+"RTN","C0CMXML",163,0)
+ . N ZNUM
+"RTN","C0CMXML",164,0)
+ . N ZMULT S ZMULT=$$ISMULT(ZFRST) ; IS FIRST CHILD A MULTIPLE
+"RTN","C0CMXML",165,0)
+ . D XPATH(ZFRST,NEWPATH,ZXIDX,ZXPARY,$S(ZMULT:1,1:""),ZREDUX) ; DO THE CHILD
+"RTN","C0CMXML",166,0)
+ N GNXT S GNXT=$$NXTSIB(ZOID)
+"RTN","C0CMXML",167,0)
+ I $$TAG(GNXT)'=$$TAG(ZOID) S ZNUM="" ; RESET COUNTING AFTER MULTIPLES
+"RTN","C0CMXML",168,0)
+ I GNXT'=0 D  ;
+"RTN","C0CMXML",169,0)
+ . N ZMULT S ZMULT=$$ISMULT(GNXT) ; IS THE SIBLING A MULTIPLE?
+"RTN","C0CMXML",170,0)
+ . I (ZNUM="")&(ZMULT) D  ; SIBLING IS FIRST OF MULTIPLES
+"RTN","C0CMXML",171,0)
+ . . N ZNUM S ZNUM=1 ;
+"RTN","C0CMXML",172,0)
+ . . D XPATH(GNXT,ZPATH,ZXIDX,ZXPARY,ZNUM,ZREDUX) ; DO NEXT SIB
+"RTN","C0CMXML",173,0)
+ . E  D XPATH(GNXT,ZPATH,ZXIDX,ZXPARY,$S(ZNUM>0:ZNUM+1,1:""),ZREDUX) ; DO NEXT SIB
+"RTN","C0CMXML",174,0)
+ Q
+"RTN","C0CMXML",175,0)
+ ;
+"RTN","C0CMXML",176,0)
+PARSE(INXML,INDOC) ;CALL THE MXML PARSER ON INXML, PASSED BY NAME
+"RTN","C0CMXML",177,0)
+ ; INDOC IS PASSED AS THE DOCUMENT NAME - DON'T KNOW WHERE TO STORE THIS NOW
+"RTN","C0CMXML",178,0)
+ ; EXTRINSIC WHICH RETURNS THE DOCID ASSIGNED BY MXML
+"RTN","C0CMXML",179,0)
+ ;Q $$EN^MXMLDOM(INXML)
+"RTN","C0CMXML",180,0)
+ Q $$EN^MXMLDOM(INXML,"W")
+"RTN","C0CMXML",181,0)
+ ;
+"RTN","C0CMXML",182,0)
+ISMULT(ZOID) ; RETURN TRUE IF ZOID IS ONE OF A MULTIPLE
+"RTN","C0CMXML",183,0)
+ N ZN
+"RTN","C0CMXML",184,0)
+ ;I $$TAG(ZOID)["entry" B
+"RTN","C0CMXML",185,0)
+ S ZN=$$NXTSIB(ZOID)
+"RTN","C0CMXML",186,0)
+ I ZN'="" Q $$TAG(ZOID)=$$TAG(ZN) ; IF TAG IS THE SAME AS NEXT SIB TAG
+"RTN","C0CMXML",187,0)
+ Q 0
+"RTN","C0CMXML",188,0)
+ ;
+"RTN","C0CMXML",189,0)
+FIRST(ZOID) ;RETURNS THE OID OF THE FIRST CHILD OF ZOID
+"RTN","C0CMXML",190,0)
+ Q $$CHILD^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CMXML",191,0)
+ ;
+"RTN","C0CMXML",192,0)
+PARENT(ZOID) ;RETURNS THE OID OF THE PARENT OF ZOID
+"RTN","C0CMXML",193,0)
+ Q $$PARENT^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CMXML",194,0)
+ ;
+"RTN","C0CMXML",195,0)
+ATT(RTN,NODE) ;GET ATTRIBUTES FOR ZOID
+"RTN","C0CMXML",196,0)
+ S HANDLE=C0CDOCID
+"RTN","C0CMXML",197,0)
+ K @RTN
+"RTN","C0CMXML",198,0)
+ D GETTXT^MXMLDOM("A")
+"RTN","C0CMXML",199,0)
+ Q
+"RTN","C0CMXML",200,0)
+ ;
+"RTN","C0CMXML",201,0)
+TAG(ZOID) ; RETURNS THE XML TAG FOR THE NODE
+"RTN","C0CMXML",202,0)
+ ;I ZOID=149 B ;GPLTEST
+"RTN","C0CMXML",203,0)
+ N X,Y
+"RTN","C0CMXML",204,0)
+ S Y=""
+"RTN","C0CMXML",205,0)
+ S X=$G(C0CCBK("TAG")) ;IS THERE A CALLBACK FOR THIS ROUTINE
+"RTN","C0CMXML",206,0)
+ I X'="" X X ; EXECUTE THE CALLBACK, SHOULD SET Y
+"RTN","C0CMXML",207,0)
+ I Y="" S Y=$$NAME^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CMXML",208,0)
+ Q Y
+"RTN","C0CMXML",209,0)
+ ;
+"RTN","C0CMXML",210,0)
+NXTSIB(ZOID) ; RETURNS THE NEXT SIBLING
+"RTN","C0CMXML",211,0)
+ Q $$SIBLING^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CMXML",212,0)
+ ;
+"RTN","C0CMXML",213,0)
+DATA(ZT,ZOID) ; RETURNS DATA FOR THE NODE
+"RTN","C0CMXML",214,0)
+ ;N ZT,ZN S ZT=""
+"RTN","C0CMXML",215,0)
+ ;S C0CDOM=$NA(^TMP("MXMLDOM",$J,C0CDOCID))
+"RTN","C0CMXML",216,0)
+ ;Q $G(@C0CDOM@(ZOID,"T",1))
+"RTN","C0CMXML",217,0)
+ S ZN=$$TEXT^MXMLDOM(C0CDOCID,ZOID,ZT)
+"RTN","C0CMXML",218,0)
+ Q
+"RTN","C0CMXML",219,0)
+ ;
+"RTN","C0CMXML",220,0)
+OUTXML(ZRTN,INID) ; USES C0CMXMLB (MXMLBLD) TO OUTPUT XML FROM AN MXMLDOM
+"RTN","C0CMXML",221,0)
+ ;
+"RTN","C0CMXML",222,0)
+ S C0CDOCID=INID
+"RTN","C0CMXML",223,0)
+ D START^C0CMXMLB($$TAG(1),,"G")
+"RTN","C0CMXML",224,0)
+ D NDOUT($$FIRST(1))
+"RTN","C0CMXML",225,0)
+ D END^C0CMXMLB ;END THE DOCUMENT
+"RTN","C0CMXML",226,0)
+ M @ZRTN=^TMP("MXMLBLD",$J)
+"RTN","C0CMXML",227,0)
+ K ^TMP("MXMLBLD",$J)
+"RTN","C0CMXML",228,0)
+ Q
+"RTN","C0CMXML",229,0)
+ ;
+"RTN","C0CMXML",230,0)
+NDOUT(ZOID) ;CALLBACK ROUTINE - IT IS RECURSIVE
+"RTN","C0CMXML",231,0)
+ N ZI S ZI=$$FIRST(ZOID)
+"RTN","C0CMXML",232,0)
+ I ZI'=0 D  ; THERE IS A CHILD
+"RTN","C0CMXML",233,0)
+ . N ZATT D ATT("ZATT",ZOID) ; THESE ARE THE ATTRIBUTES MOVED TO ZATT
+"RTN","C0CMXML",234,0)
+ . D MULTI^C0CMXMLB("",$$TAG(ZOID),.ZATT,"NDOUT^C0CMXML(ZI)") ;HAVE CHILDREN
+"RTN","C0CMXML",235,0)
+ E  D  ; NO CHILD - IF NO CHILDREN, A NODE HAS DATA, IS AN ENDPOINT
+"RTN","C0CMXML",236,0)
+ . ;W "DOING",ZOID,!
+"RTN","C0CMXML",237,0)
+ . N ZD D DATA("ZD",ZOID) ;NODES WITHOUT CHILDREN HAVE DATA
+"RTN","C0CMXML",238,0)
+ . N ZATT D ATT("ZATT",ZOID) ;ATTRIBUTES
+"RTN","C0CMXML",239,0)
+ . D ITEM^C0CMXMLB("",$$TAG(ZOID),.ZATT,$G(ZD(1))) ;NO CHILDREN
+"RTN","C0CMXML",240,0)
+ I $$NXTSIB(ZOID)'=0 D  ; THERE IS A SIBLING
+"RTN","C0CMXML",241,0)
+ . D NDOUT($$NXTSIB(ZOID)) ;RECURSE FOR SIBLINGS
+"RTN","C0CMXML",242,0)
+ Q
+"RTN","C0CMXML",243,0)
+ ;
+"RTN","C0CMXML",244,0)
+UPDIE ; INTERNAL ROUTINE TO CALL UPDATE^DIE AND CHECK FOR ERRORS
+"RTN","C0CMXML",245,0)
+ K ZERR
+"RTN","C0CMXML",246,0)
+ D CLEAN^DILF
+"RTN","C0CMXML",247,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR")
+"RTN","C0CMXML",248,0)
+ I $D(ZERR) D  ;
+"RTN","C0CMXML",249,0)
+ . W "ERROR",!
+"RTN","C0CMXML",250,0)
+ . ZWR ZERR
+"RTN","C0CMXML",251,0)
+ . B
+"RTN","C0CMXML",252,0)
+ K C0CFDA
+"RTN","C0CMXML",253,0)
+ Q
+"RTN","C0CMXML",254,0)
+ ;
+"RTN","C0CMXMLB")
+0^87^B12065941
+"RTN","C0CMXMLB",1,0)
+C0CMXMLB ;;ISF/RWF - Tool to build XML ; 5/10/12 2:51pm
+"RTN","C0CMXMLB",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMXMLB",3,0)
+ QUIT
+"RTN","C0CMXMLB",4,0)
+ ;
+"RTN","C0CMXMLB",5,0)
+ ;DOC - The top level tag
+"RTN","C0CMXMLB",6,0)
+ ;DOCTYPE - Want to include a DOCTYPE node
+"RTN","C0CMXMLB",7,0)
+ ;FLAG - Set to 'G' to store the output in the global ^TMP("MXMLBLD",$J,
+"RTN","C0CMXMLB",8,0)
+START(DOC,DOCTYPE,FLAG,NO1ST) ;Call this once at the begining.
+"RTN","C0CMXMLB",9,0)
+ K ^TMP("MXMLBLD",$J)
+"RTN","C0CMXMLB",10,0)
+ S ^TMP("MXMLBLD",$J,"DOC")=DOC,^TMP("MXMLBLD",$J,"STK")=0
+"RTN","C0CMXMLB",11,0)
+ I $G(FLAG)["G" S ^TMP("MXMLBLD",$J,"CNT")=1
+"RTN","C0CMXMLB",12,0)
+ I $G(NO1ST)'=1 D OUTPUT($$XMLHDR) 
+"RTN","C0CMXMLB",13,0)
+ D:$L($G(DOCTYPE)) OUTPUT("<!DOCTYPE "_DOCTYPE_">") D OUTPUT("<"_DOC_">")
+"RTN","C0CMXMLB",14,0)
+ Q
+"RTN","C0CMXMLB",15,0)
+ ;
+"RTN","C0CMXMLB",16,0)
+END ;Call this once to close out the document
+"RTN","C0CMXMLB",17,0)
+ D OUTPUT("</"_$G(^TMP("MXMLBLD",$J,"DOC"))_">")
+"RTN","C0CMXMLB",18,0)
+ I '$G(^TMP("MXMLBLD",$J,"CNT")) K ^TMP("MXMLBLD",$J)
+"RTN","C0CMXMLB",19,0)
+ K ^TMP("MXMLBLD",$J,"DOC"),^("CNT"),^("STK")
+"RTN","C0CMXMLB",20,0)
+ Q
+"RTN","C0CMXMLB",21,0)
+ ;
+"RTN","C0CMXMLB",22,0)
+ITEM(INDENT,TAG,ATT,VALUE) ;Output a Item
+"RTN","C0CMXMLB",23,0)
+ N I,X
+"RTN","C0CMXMLB",24,0)
+ S ATT=$G(ATT)
+"RTN","C0CMXMLB",25,0)
+ I '$D(VALUE) D OUTPUT($$BLS($G(INDENT))_"<"_TAG_$$ATT(.ATT)_" />") Q
+"RTN","C0CMXMLB",26,0)
+ D OUTPUT($$BLS($G(INDENT))_"<"_TAG_$$ATT(.ATT)_">"_$$CHARCHK(VALUE)_"</"_TAG_">")
+"RTN","C0CMXMLB",27,0)
+ Q
+"RTN","C0CMXMLB",28,0)
+ ;DOITEM is a callback to output the lower level.
+"RTN","C0CMXMLB",29,0)
+MULTI(INDENT,TAG,ATT,DOITEM) ;Output a Multipule
+"RTN","C0CMXMLB",30,0)
+ N I,X,S
+"RTN","C0CMXMLB",31,0)
+ S ATT=$G(ATT)
+"RTN","C0CMXMLB",32,0)
+ D PUSH($G(INDENT),TAG,.ATT)
+"RTN","C0CMXMLB",33,0)
+ D @DOITEM
+"RTN","C0CMXMLB",34,0)
+ D POP
+"RTN","C0CMXMLB",35,0)
+ Q
+"RTN","C0CMXMLB",36,0)
+ ;
+"RTN","C0CMXMLB",37,0)
+ATT(ATT) ;Output a string of attributes
+"RTN","C0CMXMLB",38,0)
+ I $D(ATT)<9 Q ""
+"RTN","C0CMXMLB",39,0)
+ N I,S,V
+"RTN","C0CMXMLB",40,0)
+ S S="",I=""
+"RTN","C0CMXMLB",41,0)
+ F  S I=$O(ATT(I)) Q:I=""  S S=S_" "_I_"="_$$Q(ATT(I))
+"RTN","C0CMXMLB",42,0)
+ Q S
+"RTN","C0CMXMLB",43,0)
+ ;
+"RTN","C0CMXMLB",44,0)
+Q(X) ;Add Quotes - Changed by gpl to use single instead of double quotes 6/11
+"RTN","C0CMXMLB",45,0)
+ ;I X'[$C(34) Q $C(34)_X_$C(34)
+"RTN","C0CMXMLB",46,0)
+ I X'[$C(39) Q $C(39)_X_$C(39)
+"RTN","C0CMXMLB",47,0)
+ ;N Q,Y,I,Z S Q=$C(34),(Y,Z)=""
+"RTN","C0CMXMLB",48,0)
+ N Q,Y,I,Z S Q=$C(39),(Y,Z)=""
+"RTN","C0CMXMLB",49,0)
+ F I=1:1:$L(X,Q)-1 S Y=Y_$P(X,Q,I)_Q_Q
+"RTN","C0CMXMLB",50,0)
+ S Y=Y_$P(X,Q,$L(X,Q))
+"RTN","C0CMXMLB",51,0)
+ ;Q $C(34)_Y_$C(34)
+"RTN","C0CMXMLB",52,0)
+ Q $C(39)_Y_$C(39)
+"RTN","C0CMXMLB",53,0)
+ ;
+"RTN","C0CMXMLB",54,0)
+XMLHDR() ; -- provides current XML standard header
+"RTN","C0CMXMLB",55,0)
+ Q "<?xml version=""1.0"" encoding=""utf-8"" ?>"
+"RTN","C0CMXMLB",56,0)
+ ;
+"RTN","C0CMXMLB",57,0)
+OUTPUT(S) ;Output
+"RTN","C0CMXMLB",58,0)
+ N C S C=$G(^TMP("MXMLBLD",$J,"CNT"))
+"RTN","C0CMXMLB",59,0)
+ I C S ^TMP("MXMLBLD",$J,C)=S,^TMP("MXMLBLD",$J,"CNT")=C+1 Q
+"RTN","C0CMXMLB",60,0)
+ W S,!
+"RTN","C0CMXMLB",61,0)
+ Q
+"RTN","C0CMXMLB",62,0)
+ ;
+"RTN","C0CMXMLB",63,0)
+CHARCHK(STR) ; -- replace xml character limits with entities
+"RTN","C0CMXMLB",64,0)
+ N A,I,X,Y,Z,NEWSTR
+"RTN","C0CMXMLB",65,0)
+ S (Y,Z)=""
+"RTN","C0CMXMLB",66,0)
+ ;IF STR["&" SET NEWSTR=STR DO  SET STR=Y_Z
+"RTN","C0CMXMLB",67,0)
+ ;. FOR X=1:1  SET Y=Y_$PIECE(NEWSTR,"&",X)_"&amp;",Z=$PIECE(STR,"&",X+1,999) QUIT:Z'["&"
+"RTN","C0CMXMLB",68,0)
+ I STR["&" F I=1:1:$L(STR,"&")-1 S STR=$P(STR,"&",1,I)_"&amp;"_$P(STR,"&",I+1,999)
+"RTN","C0CMXMLB",69,0)
+ I STR["<" F  S STR=$PIECE(STR,"<",1)_"&lt;"_$PIECE(STR,"<",2,99) Q:STR'["<"
+"RTN","C0CMXMLB",70,0)
+ I STR[">" F  S STR=$PIECE(STR,">",1)_"&gt;"_$PIECE(STR,">",2,99) Q:STR'[">"
+"RTN","C0CMXMLB",71,0)
+ I STR["'" F  S STR=$PIECE(STR,"'",1)_"&apos;"_$PIECE(STR,"'",2,99) Q:STR'["'"
+"RTN","C0CMXMLB",72,0)
+ I STR["""" F  S STR=$PIECE(STR,"""",1)_"&quot;"_$PIECE(STR,"""",2,99) Q:STR'[""""
+"RTN","C0CMXMLB",73,0)
+ ;
+"RTN","C0CMXMLB",74,0)
+ S STR=$TR(STR,$C(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31))
+"RTN","C0CMXMLB",75,0)
+ QUIT STR
+"RTN","C0CMXMLB",76,0)
+ ;
+"RTN","C0CMXMLB",77,0)
+COMMENT(VAL) ;Add Comments
+"RTN","C0CMXMLB",78,0)
+ N I,L
+"RTN","C0CMXMLB",79,0)
+ ;I $D($G(VAL))=1 D OUTPUT("<!-- "_ATT_" -->") Q
+"RTN","C0CMXMLB",80,0)
+ I $D(VAL) D OUTPUT("<!-- "_ATT_" -->") Q  ;CHANGED BY GPL FOR GTM
+"RTN","C0CMXMLB",81,0)
+ S I="",L="<!--"
+"RTN","C0CMXMLB",82,0)
+ F  S I=$O(ATT(I)) Q:I=""  D OUTPUT(L_ATT(I)) S L=""
+"RTN","C0CMXMLB",83,0)
+ D OUTPUT("-->")
+"RTN","C0CMXMLB",84,0)
+ Q
+"RTN","C0CMXMLB",85,0)
+ ;
+"RTN","C0CMXMLB",86,0)
+PUSH(INDENT,TAG,ATT) ;Write a TAG and save.
+"RTN","C0CMXMLB",87,0)
+ N CNT
+"RTN","C0CMXMLB",88,0)
+ S ATT=$G(ATT)
+"RTN","C0CMXMLB",89,0)
+ D OUTPUT($$BLS($G(INDENT))_"<"_TAG_$$ATT(.ATT)_">")
+"RTN","C0CMXMLB",90,0)
+ S CNT=$G(^TMP("MXMLBLD",$J,"STK"))+1,^TMP("MXMLBLD",$J,"STK")=CNT,^TMP("MXMLBLD",$J,"STK",CNT)=INDENT_"^"_TAG
+"RTN","C0CMXMLB",91,0)
+ Q
+"RTN","C0CMXMLB",92,0)
+ ;
+"RTN","C0CMXMLB",93,0)
+POP ;Write last pushed tag and pop
+"RTN","C0CMXMLB",94,0)
+ N CNT,TAG,INDENT,X
+"RTN","C0CMXMLB",95,0)
+ S CNT=$G(^TMP("MXMLBLD",$J,"STK")),X=^TMP("MXMLBLD",$J,"STK",CNT),^TMP("MXMLBLD",$J,"STK")=CNT-1
+"RTN","C0CMXMLB",96,0)
+ S INDENT=+X,TAG=$P(X,"^",2)
+"RTN","C0CMXMLB",97,0)
+ D OUTPUT($$BLS(INDENT)_"</"_TAG_">")
+"RTN","C0CMXMLB",98,0)
+ Q
+"RTN","C0CMXMLB",99,0)
+ ;
+"RTN","C0CMXMLB",100,0)
+BLS(I) ;Return INDENT string
+"RTN","C0CMXMLB",101,0)
+ N S
+"RTN","C0CMXMLB",102,0)
+ S S="",I=$G(I) S:I>0 $P(S," ",I)=" "
+"RTN","C0CMXMLB",103,0)
+ Q S
+"RTN","C0CMXMLB",104,0)
+ ;
+"RTN","C0CMXMLB",105,0)
+INDENT() ;Renturn indent level
+"RTN","C0CMXMLB",106,0)
+ Q +$G(^TMP("MXMLBLD",$J,"STK"))
+"RTN","C0CMXP")
+0^64^B77680190
+"RTN","C0CMXP",1,0)
+C0CMXP   ; GPL - MXML based XPath utilities;12/04/09  17:05
+"RTN","C0CMXP",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CMXP",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CMXP",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CMXP",5,0)
+ ;
+"RTN","C0CMXP",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CMXP",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CMXP",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CMXP",9,0)
+ ;(at your option) any later version.
+"RTN","C0CMXP",10,0)
+ ;
+"RTN","C0CMXP",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CMXP",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CMXP",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CMXP",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CMXP",15,0)
+ ;
+"RTN","C0CMXP",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CMXP",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CMXP",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CMXP",19,0)
+ ;
+"RTN","C0CMXP",20,0)
+ Q
+"RTN","C0CMXP",21,0)
+ ;
+"RTN","C0CMXP",22,0)
+INITXPF(ARY) ;INITIAL XML/XPATH FILE ARRAY
+"RTN","C0CMXP",23,0)
+ ; DON'T USE THIS ONE ... USE INITFARY^C0CSOAP("FARY") INSTEAD
+"RTN","C0CMXP",24,0)
+ D INITFARY^C0CSOAP(ARY) ;
+"RTN","C0CMXP",25,0)
+ Q
+"RTN","C0CMXP",26,0)
+ S @ARY@("XML FILE NUMBER")=178.101
+"RTN","C0CMXP",27,0)
+ S @ARY@("XML SOURCE FIELD")=2.1
+"RTN","C0CMXP",28,0)
+ S @ARY@("XML TEMPLATE FIELD")=3
+"RTN","C0CMXP",29,0)
+ S @ARY@("XPATH BINDING SUBFILE")=178.1014
+"RTN","C0CMXP",30,0)
+ S @ARY@("REDUX FIELD")=2.5
+"RTN","C0CMXP",31,0)
+ Q
+"RTN","C0CMXP",32,0)
+ ;
+"RTN","C0CMXP",33,0)
+SETXPF(ARY) ; SET FILE AND FIELD VARIABLES FROM XPF ARRAY
+"RTN","C0CMXP",34,0)
+ ;
+"RTN","C0CMXP",35,0)
+ S C0CXPF=@ARY@("XML FILE NUMBER")
+"RTN","C0CMXP",36,0)
+ S C0CXFLD=@ARY@("XML")
+"RTN","C0CMXP",37,0)
+ S C0CXTFLD=@ARY@("TEMPLATE XML")
+"RTN","C0CMXP",38,0)
+ S C0CXPBF=@ARY@("BINDING SUBFILE NUMBER")
+"RTN","C0CMXP",39,0)
+ S C0CRDUXF=@ARY@("XPATH REDUCTION STRING")
+"RTN","C0CMXP",40,0)
+ Q
+"RTN","C0CMXP",41,0)
+ ;
+"RTN","C0CMXP",42,0)
+ADDXP(INARY,TID,FARY) ;ADD XPATH .01 FIELD TO BINDING SUBFILE OF TEMPLATE TID
+"RTN","C0CMXP",43,0)
+ I '$D(FARY) D  ;
+"RTN","C0CMXP",44,0)
+ . S FARY="FARY" ; FILE ARRAY
+"RTN","C0CMXP",45,0)
+ . D INITXPF("FARY") ;IF FILE ARRAY NOT PASSED, INITIALIZE
+"RTN","C0CMXP",46,0)
+ D SETXPF(FARY) ;SET FILE VARIABLES
+"RTN","C0CMXP",47,0)
+ N C0CA,C0CB
+"RTN","C0CMXP",48,0)
+ S C0CA="" S C0CB=0
+"RTN","C0CMXP",49,0)
+ F  S C0CA=$O(@INARY@(C0CA)) Q:C0CA=""  D  ; FOR EACH XPATH
+"RTN","C0CMXP",50,0)
+ . S C0CB=C0CB+1 ; COUNT OF XPATHS
+"RTN","C0CMXP",51,0)
+ . S C0CFDA(C0CXPBF,"?+"_C0CB_","_TID_",",.01)=C0CA
+"RTN","C0CMXP",52,0)
+ . D UPDIE ; CREATE THE BINDING SUBFILE FOR THIS XPATH
+"RTN","C0CMXP",53,0)
+ Q
+"RTN","C0CMXP",54,0)
+ ;
+"RTN","C0CMXP",55,0)
+FIXICD9 ; FIX THE ICD9RESULT XML 
+"RTN","C0CMXP",56,0)
+ D GETXML("GPL","ICD9RESULT") ; GET SOME BAD XML OUT OF THE FILE
+"RTN","C0CMXP",57,0)
+ S ZI=""
+"RTN","C0CMXP",58,0)
+ S G=""
+"RTN","C0CMXP",59,0)
+ F  S ZI=$O(GPL(ZI)) Q:ZI=""  D  ; FOR EACH LINE
+"RTN","C0CMXP",60,0)
+ . S G=G_GPL(ZI) ; MAKE ONE BIG STRING OF XML
+"RTN","C0CMXP",61,0)
+ D NORMAL^C0CSOAP("G2","G") ;NO NORMALIZE IT BACK INTO AN ARRAY
+"RTN","C0CMXP",62,0)
+ D ADDXML("G2","ICD9RESULT") ; AND PUT IT BACK
+"RTN","C0CMXP",63,0)
+ Q
+"RTN","C0CMXP",64,0)
+ADDXML(INXML,TEMPID,INFARY) ;ADD XML TO A TEMPLATE ID TEMPID
+"RTN","C0CMXP",65,0)
+ ; INXML IS PASSED BY NAME
+"RTN","C0CMXP",66,0)
+ I '$D(INFARY) D  ;
+"RTN","C0CMXP",67,0)
+ . S INFARY="FARY" ; FILE ARRAY
+"RTN","C0CMXP",68,0)
+ . D INITXPF("FARY") ;IF FILE ARRAY NOT PASSED, INITIALIZE
+"RTN","C0CMXP",69,0)
+ I +TEMPID=0 S TEMPID=$$RESTID^C0CSOAP(TEMPID,INFARY) ;RESOLVE TEMPLATE NAME
+"RTN","C0CMXP",70,0)
+ D SETXPF(INFARY) ;SET FILE VARIABLES
+"RTN","C0CMXP",71,0)
+ D WP^DIE(C0CXPF,TEMPID_",",C0CXFLD,,INXML)
+"RTN","C0CMXP",72,0)
+ Q
+"RTN","C0CMXP",73,0)
+ ;
+"RTN","C0CMXP",74,0)
+ADDTEMP(INXML,TEMPID,INFARY) ;ADD XML TEMPLATE TO TEMPLATE RECORD TEMPID
+"RTN","C0CMXP",75,0)
+ ;
+"RTN","C0CMXP",76,0)
+ I '$D(INFARY) D  ;
+"RTN","C0CMXP",77,0)
+ . S INFARY="FARY" ; FILE ARRAY
+"RTN","C0CMXP",78,0)
+ . D INITXPF("FARY") ;IF FILE ARRAY NOT PASSED, INITIALIZE
+"RTN","C0CMXP",79,0)
+ I +TEMPID=0 S TEMPID=$$RESTID^C0CSOAP(TEMPID,INFARY) ;RESOLVE TEMPLATE NAME
+"RTN","C0CMXP",80,0)
+ D SETXPF(INFARY) ;SET FILE VARIABLES
+"RTN","C0CMXP",81,0)
+ D WP^DIE(C0CXPF,TEMPID_",",C0CXTFLD,,INXML)
+"RTN","C0CMXP",82,0)
+ Q
+"RTN","C0CMXP",83,0)
+ ;
+"RTN","C0CMXP",84,0)
+GETXML(OUTXML,TEMPID,INFARY) ;GET THE XML FROM TEMPLATE TEMPID
+"RTN","C0CMXP",85,0)
+ ;
+"RTN","C0CMXP",86,0)
+ I '$D(INFARY) D  ;
+"RTN","C0CMXP",87,0)
+ . S INFARY="FARY" ; FILE ARRAY
+"RTN","C0CMXP",88,0)
+ . D INITXPF("FARY") ;IF FILE ARRAY NOT PASSED, INITIALIZE
+"RTN","C0CMXP",89,0)
+ D SETXPF(INFARY) ;SET FILE VARIABLES
+"RTN","C0CMXP",90,0)
+ I +TEMPID=0 S TEMPID=$$RESTID^C0CSOAP(TEMPID,INFARY) ;RESOLVE TEMPLATE NAME
+"RTN","C0CMXP",91,0)
+ I $$GET1^DIQ(C0CXPF,TEMPID_",",C0CXFLD,,OUTXML)'=OUTXML D  Q  ;
+"RTN","C0CMXP",92,0)
+ . W "ERROR RETRIEVING TEMPLATE",!
+"RTN","C0CMXP",93,0)
+ Q
+"RTN","C0CMXP",94,0)
+ ;
+"RTN","C0CMXP",95,0)
+GETTEMP(OUTXML,TEMPID,FARY) ;GET THE TEMPLATE XML FROM TEMPLATE TEMPID
+"RTN","C0CMXP",96,0)
+ ;
+"RTN","C0CMXP",97,0)
+ I '$D(FARY) D  ;
+"RTN","C0CMXP",98,0)
+ . S FARY="FARY" ; FILE ARRAY
+"RTN","C0CMXP",99,0)
+ . D INITXPF("FARY") ;IF FILE ARRAY NOT PASSED, INITIALIZE
+"RTN","C0CMXP",100,0)
+ D SETXPF(FARY) ;SET FILE VARIABLES
+"RTN","C0CMXP",101,0)
+ I +TEMPID=0 S TEMPID=$$RESTID^C0CSOAP(TEMPID,FARY) ;RESOLVE TEMPLATE NAME
+"RTN","C0CMXP",102,0)
+ I $$GET1^DIQ(C0CXPF,TEMPID_",",C0CXTFLD,,OUTXML)'=OUTXML D  Q  ;
+"RTN","C0CMXP",103,0)
+ . W "ERROR RETRIEVING TEMPLATE",!
+"RTN","C0CMXP",104,0)
+ Q
+"RTN","C0CMXP",105,0)
+ ;
+"RTN","C0CMXP",106,0)
+COPYWP(ZFLD,ZSRCREC,ZDESTREC,ZSRCF,ZDESTF) ; COPIES A WORD PROCESSING FIELD
+"RTN","C0CMXP",107,0)
+ ; FROM ONE RECORD TO ANOTHER RECORD 
+"RTN","C0CMXP",108,0)
+ ; ZFLD IS EITHER A NUMBERIC FIELD OR A NAME IN ZSRCF
+"RTN","C0CMXP",109,0)
+ ; ZSRCF IS THE SOURCE FILE, IN FILE REDIRECT FORMAT
+"RTN","C0CMXP",110,0)
+ ; IF ZSRCF IS OMMITED, THE DEFAULT C0C XML MISC FILE WILL BE ASSUMED
+"RTN","C0CMXP",111,0)
+ ; ZDESTF IS DESTINATION FILE. IF OMMITED, IS ASSUMED TO BE THE SAME
+"RTN","C0CMXP",112,0)
+ ; A ZSRCF
+"RTN","C0CMXP",113,0)
+ I '$D(ZSRCF) D  ;
+"RTN","C0CMXP",114,0)
+ . S ZSRCF="ZSRCF"
+"RTN","C0CMXP",115,0)
+ . D INITFARY^C0CSOAP(ZSRCF)
+"RTN","C0CMXP",116,0)
+ I '$D(ZDESTF) D  ;
+"RTN","C0CMXP",117,0)
+ . S ZDESTF="ZDESTF"
+"RTN","C0CMXP",118,0)
+ . M @ZDESTF=@ZSRCF
+"RTN","C0CMXP",119,0)
+ N ZSF,ZDF,ZSFREF,ZDFREF
+"RTN","C0CMXP",120,0)
+ S ZSF=@ZSRCF@("XML FILE NUMBER")
+"RTN","C0CMXP",121,0)
+ S ZSFREF=$$FILEREF^C0CRNF(ZSF)
+"RTN","C0CMXP",122,0)
+ S ZDF=@ZDESTF@("XML FILE NUMBER")
+"RTN","C0CMXP",123,0)
+ S ZDFREF=$$FILEREF^C0CRNF(ZDF)
+"RTN","C0CMXP",124,0)
+ N ZSIEN,ZDIEN
+"RTN","C0CMXP",125,0)
+ S ZSIEN=$O(@ZSFREF@("B",ZSRCREC,""))
+"RTN","C0CMXP",126,0)
+ I ZSIEN="" W !,"ERROR SOURCE RECORD NOT FOUND" Q  ;
+"RTN","C0CMXP",127,0)
+ S ZDIEN=$O(@ZDFREF@("B",ZDESTREC,""))
+"RTN","C0CMXP",128,0)
+ I ZDIEN="" W !,"ERROR DESTINATION RECORD NOT FOUND" Q  ;
+"RTN","C0CMXP",129,0)
+ N ZFLDNUM
+"RTN","C0CMXP",130,0)
+ I +ZFLD=0 S ZFLDNUM=@ZSRCF@(ZFLD) ; IF FIELD IS PASSED BY NAME
+"RTN","C0CMXP",131,0)
+ E  S ZFLDNUM=ZFLD ; IF FIELD IS PASSED BY NUMBER
+"RTN","C0CMXP",132,0)
+ N ZWP,ZWPN
+"RTN","C0CMXP",133,0)
+ S ZWPN=$$GET1^DIQ(ZSF,ZSIEN_",",ZFLDNUM,,"ZWP") ; GET WP FROM SOURCE
+"RTN","C0CMXP",134,0)
+ I ZWPN'="ZWP" W !,"ERROR SOURCE FIELD EMPTY" Q  ;
+"RTN","C0CMXP",135,0)
+ D WP^DIE(ZDF,ZDIEN_",",ZFLDNUM,,"ZWP") ; PUT WP FIELD TO DEST
+"RTN","C0CMXP",136,0)
+ Q
+"RTN","C0CMXP",137,0)
+ ;
+"RTN","C0CMXP",138,0)
+COMPILE(TID,UFARY) ; COMPILES AN XML TEMPLATE AND GENERATES XPATH BINDINGS
+"RTN","C0CMXP",139,0)
+ ; UFARY IF SPECIFIED WILL REDIRECT THE XML FILE TO USE
+"RTN","C0CMXP",140,0)
+ ; INTID IS THE IEN OF THE RECORD TO USE IN THE XML FILE
+"RTN","C0CMXP",141,0)
+ ; XML IS PULLED FROM THE "XML" FIELD AND THE COMPILED RESULT PUT
+"RTN","C0CMXP",142,0)
+ ; IN THE "XML TEMPLATE" FIELD. ALL XPATHS USED IN THE TEMPLATE
+"RTN","C0CMXP",143,0)
+ ; WILL BE POPULATED TO THE XPATH BINDINGS SUBFILE AS .01
+"RTN","C0CMXP",144,0)
+ I '$D(UFARY) D  ;
+"RTN","C0CMXP",145,0)
+ . S UFARY="DEFFARY" ; FILE ARRAY
+"RTN","C0CMXP",146,0)
+ . ;D INITXPF("UFARY") ;IF FILE ARRAY NOT PASSED, INITIALIZE
+"RTN","C0CMXP",147,0)
+ . D INITFARY^C0CSOAP(UFARY)
+"RTN","C0CMXP",148,0)
+ D SETXPF(UFARY) ;SET FILE VARIABLES
+"RTN","C0CMXP",149,0)
+ I +TID=0 S INTID=$$RESTID^C0CSOAP(TID,UFARY)
+"RTN","C0CMXP",150,0)
+ E  S INTID=TID
+"RTN","C0CMXP",151,0)
+ ;B
+"RTN","C0CMXP",152,0)
+ ;N C0CXML,C0CREDUX,C0CTEMP,C0CIDX
+"RTN","C0CMXP",153,0)
+ D GETXML("C0CXML",INTID,UFARY)
+"RTN","C0CMXP",154,0)
+ S C0CREDUX=$$GET1^DIQ(C0CXPF,INTID_",",C0CRDUXF,"E") ;XPATH REDUCTION STRING
+"RTN","C0CMXP",155,0)
+ D MKTPLATE("C0CTEMP","C0CIDX","C0CXML",C0CREDUX) ; CREATE TEMPLATE AND IDX
+"RTN","C0CMXP",156,0)
+ D ADDTEMP("C0CTEMP",INTID,UFARY) ; WRITE THE TEMPLATE TO FILE
+"RTN","C0CMXP",157,0)
+ D ADDXP("C0CIDX",INTID,UFARY) ;CREATE XPATH SUBFILE ENTRIES FOR EVERY XPATH
+"RTN","C0CMXP",158,0)
+ Q
+"RTN","C0CMXP",159,0)
+ ;
+"RTN","C0CMXP",160,0)
+MKTPLATE(OUTT,OUTIDX,INXML,REDUX) ;MAKE A TEMPLATE FROM INXML, RETURNED IN OUTT
+"RTN","C0CMXP",161,0)
+ ; BOTH PASSED BY NAME. THE REDUX XPATH REDUCTION STRING IS USED IF PASSED
+"RTN","C0CMXP",162,0)
+ ; OUTIDX IS AN ARRAY OF THE XPATHS USED IN MAKING THE TEMPLATE
+"RTN","C0CMXP",163,0)
+ ;
+"RTN","C0CMXP",164,0)
+ S C0CXLOC=$NA(^TMP("C0CXML",$J))
+"RTN","C0CMXP",165,0)
+ K @C0CXLOC
+"RTN","C0CMXP",166,0)
+ M @C0CXLOC=@INXML
+"RTN","C0CMXP",167,0)
+ S C0CDOCID=$$PARSE^C0CMXML(C0CXLOC,"C0CMKT")
+"RTN","C0CMXP",168,0)
+ K @C0CXLOC
+"RTN","C0CMXP",169,0)
+ S C0CDOM=$NA(^TMP("MXMLDOM",$J,C0CDOCID)) 
+"RTN","C0CMXP",170,0)
+ ;N GIDX,GIDX2,GARY,GARY2
+"RTN","C0CMXP",171,0)
+ I '$D(REDUX) S REDUX=""
+"RTN","C0CMXP",172,0)
+ D XPATH^C0CMXML(1,"/","GIDX","GARY",,REDUX)
+"RTN","C0CMXP",173,0)
+ D INVERT("GIDX2","GIDX") ;MAKE ARRAY TO LOOK UP XPATH BY NODE
+"RTN","C0CMXP",174,0)
+ N ZI,ZD S ZI=""
+"RTN","C0CMXP",175,0)
+ F  S ZI=$O(@C0CDOM@(ZI)) Q:ZI=""  D  ; FOR EACH NODE IN THE DOM
+"RTN","C0CMXP",176,0)
+ . K ZD ;FOR DATA
+"RTN","C0CMXP",177,0)
+ . D DATA^C0CMXML("ZD",ZI) ;SEE IF THERE IS DATA FOR THIS NODE
+"RTN","C0CMXP",178,0)
+ . ;I $D(ZD(1)) D  ; IF YES
+"RTN","C0CMXP",179,0)
+ . I $$FIRST^C0CMXML(ZI)=0 D  ; IF THERE ARE NO CHILDREN TO THIS NODE
+"RTN","C0CMXP",180,0)
+ . . ;I ZI<3 B  ;W !,ZD(1)
+"RTN","C0CMXP",181,0)
+ . . K @C0CDOM@(ZI,"T") ; KILL THE DATA
+"RTN","C0CMXP",182,0)
+ . . N ZXPATH
+"RTN","C0CMXP",183,0)
+ . . S ZXPATH=$G(GIDX2(ZI)) ;FIND AN XPATH FOR THIS NODE
+"RTN","C0CMXP",184,0)
+ . . S @C0CDOM@(ZI,"T",1)="@@"_ZXPATH_"@@"
+"RTN","C0CMXP",185,0)
+ . . I ZXPATH'="" S @OUTIDX@(ZXPATH)="" ; PASS BACK XPATH USED IN IDX
+"RTN","C0CMXP",186,0)
+ D OUTXML^C0CMXML(OUTT,C0CDOCID)
+"RTN","C0CMXP",187,0)
+ Q
+"RTN","C0CMXP",188,0)
+ ;
+"RTN","C0CMXP",189,0)
+INVERT(OUTX,INX) ;INVERTS AN XPATH INDEX RETURNING @OUTX@(x)=XPath from
+"RTN","C0CMXP",190,0)
+ ; @INX@(XPath)=x
+"RTN","C0CMXP",191,0)
+ N ZI S ZI=""
+"RTN","C0CMXP",192,0)
+ F  S ZI=$O(@INX@(ZI)) Q:ZI=""  D  ;FOR EACH XPATH IN THE INPUT
+"RTN","C0CMXP",193,0)
+ . S @OUTX@(@INX@(ZI))=ZI ; SET INVERTED ENTRY
+"RTN","C0CMXP",194,0)
+ Q
+"RTN","C0CMXP",195,0)
+ ;
+"RTN","C0CMXP",196,0)
+DEMUX(OUTX,INX) ;PARSES XPATH PASSED BY VALUE IN INX TO REMOVE [x] MULTIPLES
+"RTN","C0CMXP",197,0)
+ ; RETURNS OUTX: MULTIPLE^SUBMULTIPLE^XPATH 
+"RTN","C0CMXP",198,0)
+ N ZX,ZY,ZZ,ZZ1,ZMULT,ZSUB
+"RTN","C0CMXP",199,0)
+ S (ZMULT,ZSUB)=""
+"RTN","C0CMXP",200,0)
+ S ZX=$P(INX,"[",2)
+"RTN","C0CMXP",201,0)
+ I ZX'="" D  ; THERE IS A [x] MULTIPLE
+"RTN","C0CMXP",202,0)
+ . S ZY=$P(INX,"[",1) ;FIRST PART OF XPATH
+"RTN","C0CMXP",203,0)
+ . S ZMULT=$P(ZX,"]",1) ; NUMBER OF THE MULTIPLE
+"RTN","C0CMXP",204,0)
+ . S ZX=ZY_$P(ZX,"]",2) ; REST OF THE XPATH
+"RTN","C0CMXP",205,0)
+ . I $P(ZX,"[",2)'="" D  ; A SUB MULTIPLE EXISTS
+"RTN","C0CMXP",206,0)
+ . . S ZZ=$P(ZX,"[",1) ; FIRST PART OF XPATH
+"RTN","C0CMXP",207,0)
+ . . S ZX=$P(ZX,"[",2) ; DELETE THE [
+"RTN","C0CMXP",208,0)
+ . . S ZSUB=$P(ZX,"]",1) ; NUMBER OF THE SUBMULTIPLE
+"RTN","C0CMXP",209,0)
+ . . S ZX=ZZ_$P(ZX,"]",2) ; REST OF THE XPATH
+"RTN","C0CMXP",210,0)
+ E  S ZX=INX ;NO MULTIPLE HERE
+"RTN","C0CMXP",211,0)
+ S @OUTX=ZMULT_"^"_ZSUB_"^"_ZX ;RETURN MULTIPLE^SUBMULTIPLE^XPATH
+"RTN","C0CMXP",212,0)
+ Q
+"RTN","C0CMXP",213,0)
+ ;
+"RTN","C0CMXP",214,0)
+DEMUXARY(OARY,IARY,DEPTH) ;CONVERT AN XPATH ARRAY PASSED AS IARY TO
+"RTN","C0CMXP",215,0)
+ ; FORMAT @OARY@(x,variablename) where x is the first multiple
+"RTN","C0CMXP",216,0)
+ ; IF DEPTH=2, THE LAST 2 PARTS OF THE XPATH WILL BE USED
+"RTN","C0CMXP",217,0)
+ N ZI,ZJ,ZK,ZL,ZM S ZI=""
+"RTN","C0CMXP",218,0)
+ F  S ZI=$O(@IARY@(ZI)) Q:ZI=""  D  ;
+"RTN","C0CMXP",219,0)
+ . D DEMUX^C0CMXP("ZJ",ZI)
+"RTN","C0CMXP",220,0)
+ . S ZK=$P(ZJ,"^",3)
+"RTN","C0CMXP",221,0)
+ . S ZM=$RE($P($RE(ZK),"/",1))
+"RTN","C0CMXP",222,0)
+ . I $G(DEPTH)=2 D  ;LAST TWO PARTS OF XPATH USED FOR THE VARIABLE NAME
+"RTN","C0CMXP",223,0)
+ . . S ZM=$RE($P($RE(ZK),"/",2))_ZM
+"RTN","C0CMXP",224,0)
+ . S ZL=$P(ZJ,"^",1)
+"RTN","C0CMXP",225,0)
+ . I ZL="" S ZL=1
+"RTN","C0CMXP",226,0)
+ . I $D(@OARY@(ZL,ZM)) D  ;IT'S A DUP
+"RTN","C0CMXP",227,0)
+ . . S @OARY@(ZL,ZM_"[2]")=@IARY@(ZI)
+"RTN","C0CMXP",228,0)
+ . E  S @OARY@(ZL,ZM)=@IARY@(ZI)
+"RTN","C0CMXP",229,0)
+ Q
+"RTN","C0CMXP",230,0)
+ ;
+"RTN","C0CMXP",231,0)
+DEMUX2(OARY,IARY,DEPTH) ;CONVERT AN XPATH ARRAY PASSED AS IARY TO
+"RTN","C0CMXP",232,0)
+ ; FORMAT @OARY@(x,variablename) where x is the first multiple
+"RTN","C0CMXP",233,0)
+ ; IF DEPTH=2, THE LAST 2 PARTS OF THE XPATH WILL BE USED
+"RTN","C0CMXP",234,0)
+ N ZI,ZJ,ZK,ZL,ZM S ZI=""
+"RTN","C0CMXP",235,0)
+ F  S ZI=$O(@IARY@(ZI)) Q:ZI=""  D  ;
+"RTN","C0CMXP",236,0)
+ . D DEMUX^C0CMXP("ZJ",ZI)
+"RTN","C0CMXP",237,0)
+ . S ZK=$P(ZJ,"^",3)
+"RTN","C0CMXP",238,0)
+ . S ZM=$RE($P($RE(ZK),"/",1))
+"RTN","C0CMXP",239,0)
+ . I $G(DEPTH)=2 D  ;LAST TWO PARTS OF XPATH USED FOR THE VARIABLE NAME
+"RTN","C0CMXP",240,0)
+ . . S ZM=$RE($P($RE(ZK),"/",2))_"."_ZM
+"RTN","C0CMXP",241,0)
+ . S ZL=$P(ZJ,"^",1)
+"RTN","C0CMXP",242,0)
+ . I ZL="" S ZL=1
+"RTN","C0CMXP",243,0)
+ . I $D(@OARY@(ZL,ZM)) D  ;IT'S A DUP
+"RTN","C0CMXP",244,0)
+ . . S @OARY@(ZL,ZM_"[2]")=@IARY@(ZI)
+"RTN","C0CMXP",245,0)
+ . E  S @OARY@(ZL,ZM)=@IARY@(ZI)
+"RTN","C0CMXP",246,0)
+ Q
+"RTN","C0CMXP",247,0)
+ ;
+"RTN","C0CMXP",248,0)
+DEMUXXP1(OARY,IARY) ;IARY IS INCOMING XPATH ARRAY
+"RTN","C0CMXP",249,0)
+ ; BOTH IARY AND OARY ARE PASSED BY NAME
+"RTN","C0CMXP",250,0)
+ ; RETURNS A SIMPLE XPATH ARRAY WITHOUT MULTIPLES. DUPLICATES ARE REMOVED
+"RTN","C0CMXP",251,0)
+ N ZI,ZJ,ZK
+"RTN","C0CMXP",252,0)
+ S ZI=""
+"RTN","C0CMXP",253,0)
+ F  S ZI=$O(@IARY@(ZI)) Q:ZI=""  D  ; FOR EACH XPATH IN IARY
+"RTN","C0CMXP",254,0)
+ . D DEMUX^C0CMXP("ZJ",ZI)
+"RTN","C0CMXP",255,0)
+ . S ZK=$P(ZJ,"^",3) ;THE XPATH
+"RTN","C0CMXP",256,0)
+ . S @OARY@(ZK)=@IARY@(ZI) ;THE RESULT. DUPLICATES WILL NOT SHOW
+"RTN","C0CMXP",257,0)
+ . ; CAUTION, IF THERE ARE MULTIPLES, ONLY THE DATA FOR THE LAST
+"RTN","C0CMXP",258,0)
+ . ; MULTIPLE WILL BE INCLUDED IN THE OUTPUT ARRAY, ASSIGNED TO THE
+"RTN","C0CMXP",259,0)
+ . ; COMMON XPATH
+"RTN","C0CMXP",260,0)
+ Q
+"RTN","C0CMXP",261,0)
+ ;
+"RTN","C0CMXP",262,0)
+DEMUXXP2(OARY,IARY) ; IARY AND OARY ARE PASSED BY NAME
+"RTN","C0CMXP",263,0)
+ ; IARY IS AN XPATH ARRAY THAT MAY CONTAIN MULTIPLES
+"RTN","C0CMXP",264,0)
+ ; OARY IS THE OUTPUT ARRAY WHERE MULTIPLES ARE RETURNED IN THE FORM
+"RTN","C0CMXP",265,0)
+ ; @OARY@(x,Xpath)=data or @OARY@(x,y,Xpath)=data WHERE x AND y ARE
+"RTN","C0CMXP",266,0)
+ ; THE MULTIPLES AND Xpath IS THE BASE XPATH WITHOUT [x] AND [y]
+"RTN","C0CMXP",267,0)
+ ; 
+"RTN","C0CMXP",268,0)
+ N ZI,ZJ,ZK,ZX,ZY,ZP
+"RTN","C0CMXP",269,0)
+ S ZI=""
+"RTN","C0CMXP",270,0)
+ F  S ZI=$O(@IARY@(ZI)) Q:ZI=""  D  ; FOR EACH INPUT XPATH
+"RTN","C0CMXP",271,0)
+ . D DEMUX("ZJ",ZI) ; PULL OUT THE MULTIPLES
+"RTN","C0CMXP",272,0)
+ . S ZX=$P(ZJ,"^",1) ;x
+"RTN","C0CMXP",273,0)
+ . S ZY=$P(ZJ,"^",2) ;y
+"RTN","C0CMXP",274,0)
+ . S ZP=$P(ZJ,"^",3) ;Xpath
+"RTN","C0CMXP",275,0)
+ . I ZX="" S ZX=1 ; NO MULTIPLE WILL STORE IN x=1
+"RTN","C0CMXP",276,0)
+ . I ZY'="" D  ;IS THERE A y?
+"RTN","C0CMXP",277,0)
+ . . S @OARY@(ZX,ZY,ZP)=@IARY@(ZI)
+"RTN","C0CMXP",278,0)
+ . E  D  ;NO y
+"RTN","C0CMXP",279,0)
+ . . S @OARY@(ZX,ZP)=@IARY@(ZI)
+"RTN","C0CMXP",280,0)
+ Q
+"RTN","C0CMXP",281,0)
+ ;
+"RTN","C0CMXP",282,0)
+UPDIE ; INTERNAL ROUTINE TO CALL UPDATE^DIE AND CHECK FOR ERRORS
+"RTN","C0CMXP",283,0)
+ K ZERR
+"RTN","C0CMXP",284,0)
+ D CLEAN^DILF
+"RTN","C0CMXP",285,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR")
+"RTN","C0CMXP",286,0)
+ I $D(ZERR) D  ;
+"RTN","C0CMXP",287,0)
+ . W "ERROR",!
+"RTN","C0CMXP",288,0)
+ . ZWR ZERR
+"RTN","C0CMXP",289,0)
+ . B
+"RTN","C0CMXP",290,0)
+ K C0CFDA
+"RTN","C0CMXP",291,0)
+ Q
+"RTN","C0CMXP",292,0)
+ ;
+"RTN","C0CNHIN")
+0^88^B87973392
+"RTN","C0CNHIN",1,0)
+C0CNHIN   ; GPL - PROCESSING FOR OUTPUT OF NHINV ROUTINES;6/3/11  17:05
+"RTN","C0CNHIN",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CNHIN",3,0)
+ ;Copyright 2011 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CNHIN",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CNHIN",5,0)
+ ;
+"RTN","C0CNHIN",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CNHIN",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CNHIN",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CNHIN",9,0)
+ ;(at your option) any later version.
+"RTN","C0CNHIN",10,0)
+ ;
+"RTN","C0CNHIN",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CNHIN",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CNHIN",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CNHIN",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CNHIN",15,0)
+ ;
+"RTN","C0CNHIN",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CNHIN",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CNHIN",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CNHIN",19,0)
+ ;
+"RTN","C0CNHIN",20,0)
+ Q
+"RTN","C0CNHIN",21,0)
+EN(ZRTN,ZDFN,ZPART,KEEP) ; GENERATE AN NHIN ARRAY FOR A PATIENT
+"RTN","C0CNHIN",22,0)
+ ;
+"RTN","C0CNHIN",23,0)
+ K GARY,GNARY,GIDX,C0CDOCID
+"RTN","C0CNHIN",24,0)
+ N GN
+"RTN","C0CNHIN",25,0)
+ K ^TMP("NHINV",$J) ; CLEAN UP FROM LAST CALL
+"RTN","C0CNHIN",26,0)
+ K ^TMP("MXMLDOM",$J) ; CLEAN UP DOM
+"RTN","C0CNHIN",27,0)
+ K ^TMP("MXMLERR",$J) ; CLEAN UP MXML ERRORS
+"RTN","C0CNHIN",28,0)
+ D GET^NHINV(.GN,ZDFN,ZPART) ; CALL NHINV ROUTINES TO PULL XML
+"RTN","C0CNHIN",29,0)
+ S GN=$P(GN,")",1)_")" ; CUT OFF THE REST OF LINE PROTOCOL
+"RTN","C0CNHIN",30,0)
+ S C0CDOCID=$$PARSE(GN,"NHINARRAY") ; PARSE WITH MXML
+"RTN","C0CNHIN",31,0)
+ D DOMO^C0CDOM(C0CDOCID,"/","ZRTN","GIDX","GARY",,"/results/") ; BLD ARRAYS
+"RTN","C0CNHIN",32,0)
+ I '$G(KEEP) K GIDX,GARY ; GET RID OF THE ARRAYS UNLESS KEEP=1
+"RTN","C0CNHIN",33,0)
+ ;D PROCESS("ZRTN",GN,"/result/",$G(KEEP))
+"RTN","C0CNHIN",34,0)
+ Q
+"RTN","C0CNHIN",35,0)
+ ;
+"RTN","C0CNHIN",36,0)
+PQRI(ZOUT,KEEP) ; RETURN THE NHIN ARRAY FOR THE PQRI XML TEMPLATE
+"RTN","C0CNHIN",37,0)
+ ;
+"RTN","C0CNHIN",38,0)
+ N ZG
+"RTN","C0CNHIN",39,0)
+ S ZG=$NA(^TMP("PQRIXML",$J))
+"RTN","C0CNHIN",40,0)
+ K @ZG
+"RTN","C0CNHIN",41,0)
+ D GETXML^C0CMXP(ZG,"PQRIXML") ; GET THE XML FROM C0C MISC XML
+"RTN","C0CNHIN",42,0)
+ N C0CDOCID
+"RTN","C0CNHIN",43,0)
+ S C0CDOCID=$$PARSE^C0CDOM(ZG,"PQRIXML") ; PARSE THE XML
+"RTN","C0CNHIN",44,0)
+ D DOMO^C0CDOM(C0CDOCID,"/","ZOUT","GIDX","GARY",,"//submission") ; BLD ARRAYS
+"RTN","C0CNHIN",45,0)
+ I '$G(KEEP) K GIDX,GARY ; GET RID OF THE ARRAYS UNLESS KEEP=1
+"RTN","C0CNHIN",46,0)
+ Q
+"RTN","C0CNHIN",47,0)
+ ;
+"RTN","C0CNHIN",48,0)
+PQRI2(ZRTN) ; RETURN THE NHIN ARRAY FOR PQRI ONE MEASURE
+"RTN","C0CNHIN",49,0)
+ ;
+"RTN","C0CNHIN",50,0)
+ ;N GG
+"RTN","C0CNHIN",51,0)
+ D GETXML^C0CMXP("GG","PQRI ONE MEASURE")
+"RTN","C0CNHIN",52,0)
+ D PROCESS(ZRTN,"GG","root",1)
+"RTN","C0CNHIN",53,0)
+ Q
+"RTN","C0CNHIN",54,0)
+ ;
+"RTN","C0CNHIN",55,0)
+PROCESS(ZRSLT,ZXML,ZREDUCE,KEEP) ; PARSE AND RUN DOMO ON XML
+"RTN","C0CNHIN",56,0)
+ ; ZRTN IS PASSED BY REFERENCE
+"RTN","C0CNHIN",57,0)
+ ; ZXML IS PASSED BY NAME
+"RTN","C0CNHIN",58,0)
+ ; IF KEEP IS 1, GARY AND GIDX ARE NOT KILLED
+"RTN","C0CNHIN",59,0)
+ ;
+"RTN","C0CNHIN",60,0)
+ N GN
+"RTN","C0CNHIN",61,0)
+ S GN=$NA(^TMP("C0CPROCESS",$J))
+"RTN","C0CNHIN",62,0)
+ K @GN
+"RTN","C0CNHIN",63,0)
+ M @GN=@ZXML
+"RTN","C0CNHIN",64,0)
+ S C0CDOCID=$$PARSE(GN,"NHINARRAY") ; PARSE WITH MXML
+"RTN","C0CNHIN",65,0)
+ K @GN
+"RTN","C0CNHIN",66,0)
+ D DOMO^C0CDOM(C0CDOCID,"/","ZRSLT","GIDX","GARY",,$G(ZREDUCE)) ; BLD ARRAYS
+"RTN","C0CNHIN",67,0)
+ I '$G(KEEP) K GIDX,GARY ; GET RID OF THE ARRAYS UNLESS KEEP=1
+"RTN","C0CNHIN",68,0)
+ Q
+"RTN","C0CNHIN",69,0)
+ ;
+"RTN","C0CNHIN",70,0)
+LOADSMRT ; 
+"RTN","C0CNHIN",71,0)
+ ;
+"RTN","C0CNHIN",72,0)
+ K ^GPL("SMART")
+"RTN","C0CNHIN",73,0)
+ S GN=$NA(^GPL("SMART",1))
+"RTN","C0CNHIN",74,0)
+ I $$FTG^%ZISH("/home/george/","alex-lewis2.xml",GN,2) W !,"SMART FILE LOADED"
+"RTN","C0CNHIN",75,0)
+ Q
+"RTN","C0CNHIN",76,0)
+ ;
+"RTN","C0CNHIN",77,0)
+SMART ; TRY IT WITH SMART
+"RTN","C0CNHIN",78,0)
+ ;
+"RTN","C0CNHIN",79,0)
+ S GN=$NA(^GPL("SMART"))
+"RTN","C0CNHIN",80,0)
+ ;K ^TMP("MXMLDOM",$J)
+"RTN","C0CNHIN",81,0)
+ K ^TMP("MXMLERR",$J)
+"RTN","C0CNHIN",82,0)
+ S C0CDOCID=$$PARSE(GN,"SMART")
+"RTN","C0CNHIN",83,0)
+ D DOMO^C0CDOM(C0CDOCID,"/","GNARY","GIDX","GARY",,"//rdf:RDF/")
+"RTN","C0CNHIN",84,0)
+ ;K ^TMP("MXMLDOM",$J) ;CLEAN UP... IT'S BIG
+"RTN","C0CNHIN",85,0)
+ Q
+"RTN","C0CNHIN",86,0)
+ ;
+"RTN","C0CNHIN",87,0)
+CCR ; TRY IT WITH A CCR
+"RTN","C0CNHIN",88,0)
+ ;
+"RTN","C0CNHIN",89,0)
+ S GN=$NA(^GPL("CCR"))
+"RTN","C0CNHIN",90,0)
+ ;K ^TMP("MXMLDOM",$J)
+"RTN","C0CNHIN",91,0)
+ K ^TMP("MXMLERR",$J)
+"RTN","C0CNHIN",92,0)
+ S C0CDOCID=$$PARSE(GN,"CCR")
+"RTN","C0CNHIN",93,0)
+ D DOMO^C0CDOM(C0CDOCID,"/","GNARY","GIDX","GARY",,"//ContinuityOfCareRecord/Body/")
+"RTN","C0CNHIN",94,0)
+ ;K ^TMP("MXMLDOM",$J) ;CLEAN UP... IT'S BIG
+"RTN","C0CNHIN",95,0)
+ Q
+"RTN","C0CNHIN",96,0)
+ ;
+"RTN","C0CNHIN",97,0)
+MED ; TRY IT WITH A CCR MED SECTION
+"RTN","C0CNHIN",98,0)
+ ;
+"RTN","C0CNHIN",99,0)
+ S GN=$NA(^GPL("MED"))
+"RTN","C0CNHIN",100,0)
+ K ^TMP("MXMLDOM",$J)
+"RTN","C0CNHIN",101,0)
+ K ^TMP("MXMLERR",$J)
+"RTN","C0CNHIN",102,0)
+ S C0CDOCID=$$PARSE(GN,"MED")
+"RTN","C0CNHIN",103,0)
+ D DOMO^C0CDOM(C0CDOCID,"/","GNARY","GIDX","GARY",,"//Medications/")
+"RTN","C0CNHIN",104,0)
+ ;K ^TMP("MXMLDOM",$J) ;CLEAN UP... IT'S BIG
+"RTN","C0CNHIN",105,0)
+ Q
+"RTN","C0CNHIN",106,0)
+ ;
+"RTN","C0CNHIN",107,0)
+CCD ; TRY IT WITH A CCD
+"RTN","C0CNHIN",108,0)
+ ;
+"RTN","C0CNHIN",109,0)
+ S GN=$NA(^GPL("CCD"))
+"RTN","C0CNHIN",110,0)
+ ;K ^TMP("MXMLDOM",$J)
+"RTN","C0CNHIN",111,0)
+ K ^TMP("MXMLERR",$J)
+"RTN","C0CNHIN",112,0)
+ S C0CDOCID=$$PARSE(GN,"CCD")
+"RTN","C0CNHIN",113,0)
+ D DOMO^C0CDOM(C0CDOCID,"/","GNARY","GIDX","GARY",,"//ClinicalDocument/component/structuredBody/")
+"RTN","C0CNHIN",114,0)
+ ;K ^TMP("MXMLDOM",$J) ;CLEAN UP... IT'S BIG
+"RTN","C0CNHIN",115,0)
+ Q
+"RTN","C0CNHIN",116,0)
+ ;
+"RTN","C0CNHIN",117,0)
+TEST1 ; TEST NHINV OUTPUT IN ^GPL("NIHIN") 
+"RTN","C0CNHIN",118,0)
+ ; PARSED WITH MXML
+"RTN","C0CNHIN",119,0)
+ ; RUN THROUGH XPATH
+"RTN","C0CNHIN",120,0)
+ K GARY,GIDX,C0CDOCID
+"RTN","C0CNHIN",121,0)
+ S GN=$NA(^GPL("NHIN"))
+"RTN","C0CNHIN",122,0)
+ ;S GN=$NA(^GPL("DOMI"))
+"RTN","C0CNHIN",123,0)
+ S C0CDOCID=$$PARSE(GN,"GPLTEST")
+"RTN","C0CNHIN",124,0)
+ D DOMO^C0CDOM(C0CDOCID,"/","GNARY","GIDX","GARY",,"/results/")
+"RTN","C0CNHIN",125,0)
+ K ^GPL("GNARY")
+"RTN","C0CNHIN",126,0)
+ M ^GPL("GNARY")=GNARY
+"RTN","C0CNHIN",127,0)
+ Q
+"RTN","C0CNHIN",128,0)
+ ;
+"RTN","C0CNHIN",129,0)
+TEST2 ; PUT GNARY THROUGH DOMI AND STORE XML IN ^GPL("DOMI")
+"RTN","C0CNHIN",130,0)
+ ;
+"RTN","C0CNHIN",131,0)
+ S GN=$NA(^GPL("GNARY"))
+"RTN","C0CNHIN",132,0)
+ S C0CDOCID=$$DOMI^C0CDOM(GN,,"results")
+"RTN","C0CNHIN",133,0)
+ D OUTXML^C0CDOM("G",C0CDOCID)
+"RTN","C0CNHIN",134,0)
+ K ^GPL("DOMI")
+"RTN","C0CNHIN",135,0)
+ M ^GPL("DOMI")=G
+"RTN","C0CNHIN",136,0)
+ Q
+"RTN","C0CNHIN",137,0)
+ ;
+"RTN","C0CNHIN",138,0)
+TEST3 ; TEST NHINV OUTPUT IN ^GPL("NIHIN") 
+"RTN","C0CNHIN",139,0)
+ ; PARSED WITH MXML
+"RTN","C0CNHIN",140,0)
+ ; RUN THROUGH XPATH
+"RTN","C0CNHIN",141,0)
+ K GARY,GIDX,C0CDOCID
+"RTN","C0CNHIN",142,0)
+ ;S GN=$NA(^GPL("NHIN"))
+"RTN","C0CNHIN",143,0)
+ S GN=$NA(^GPL("DOMI"))
+"RTN","C0CNHIN",144,0)
+ S C0CDOCID=$$PARSE(GN,"GPLTEST")
+"RTN","C0CNHIN",145,0)
+ D DOMO^C0CDOM(C0CDOCID,"/","GNARY","GIDX","GARY",,"/results/")
+"RTN","C0CNHIN",146,0)
+ Q
+"RTN","C0CNHIN",147,0)
+ ;
+"RTN","C0CNHIN",148,0)
+DOMO(ZOID,ZPATH,ZNARY,ZXIDX,ZXPARY,ZNUM,ZREDUX) ; RECURSIVE ROUTINE TO POPULATE
+"RTN","C0CNHIN",149,0)
+ ; THE XPATH INDEX ZXIDX, PASSED BY NAME
+"RTN","C0CNHIN",150,0)
+ ; THE XPATH ARRAY XPARY, PASSED BY NAME
+"RTN","C0CNHIN",151,0)
+ ; ZOID IS THE STARTING OID
+"RTN","C0CNHIN",152,0)
+ ; ZPATH IS THE STARTING XPATH, USUALLY "/"
+"RTN","C0CNHIN",153,0)
+ ; ZNUM IS THE MULTIPLE NUMBER [x], USUALLY NULL WHEN ON THE TOP NODE
+"RTN","C0CNHIN",154,0)
+ ; ZREDUX IS THE XPATH REDUCTION STRING, TAKEN OUT OF EACH XPATH IF PRESENT
+"RTN","C0CNHIN",155,0)
+ I $G(ZREDUX)="" S ZREDUX=""
+"RTN","C0CNHIN",156,0)
+ N NEWPATH,NARY ; NEWPATH IS AN XPATH NARY IS AN NHIN MUMPS ARRAY
+"RTN","C0CNHIN",157,0)
+ N NEWNUM S NEWNUM=""
+"RTN","C0CNHIN",158,0)
+ I $G(ZNUM)>0 S NEWNUM="["_ZNUM_"]"
+"RTN","C0CNHIN",159,0)
+ S NEWPATH=ZPATH_"/"_$$TAG(ZOID)_NEWNUM ; CREATE THE XPATH FOR THIS NODE
+"RTN","C0CNHIN",160,0)
+ I $G(ZREDUX)'="" D  ; REDUX PROVIDED?
+"RTN","C0CNHIN",161,0)
+ . N GT S GT=$P(NEWPATH,ZREDUX,2)
+"RTN","C0CNHIN",162,0)
+ . I GT'="" S NEWPATH=GT
+"RTN","C0CNHIN",163,0)
+ S @ZXIDX@(NEWPATH)=ZOID ; ADD THE XPATH FOR THIS NODE TO THE XPATH INDEX
+"RTN","C0CNHIN",164,0)
+ N GA D ATT("GA",ZOID) ; GET ATTRIBUTES FOR THIS NODE
+"RTN","C0CNHIN",165,0)
+ I $D(GA) D  ; PROCESS THE ATTRIBUTES
+"RTN","C0CNHIN",166,0)
+ . N ZI S ZI=""
+"RTN","C0CNHIN",167,0)
+ . F  S ZI=$O(GA(ZI)) Q:ZI=""  D  ; FOR EACH ATTRIBUTE
+"RTN","C0CNHIN",168,0)
+ . . N ZP S ZP=NEWPATH_"/"_ZI ; PATH FOR ATTRIBUTE
+"RTN","C0CNHIN",169,0)
+ . . S @ZXPARY@(ZP)=GA(ZI) ; ADD THE ATTRIBUTE XPATH TO THE XP ARRAY
+"RTN","C0CNHIN",170,0)
+ . . I GA(ZI)'="" D ADDNARY(ZP,GA(ZI)) ; ADD THE NHIN ARRAY VALUE
+"RTN","C0CNHIN",171,0)
+ N GD D DATA("GD",ZOID) ; SEE IF THERE IS DATA FOR THIS NODE
+"RTN","C0CNHIN",172,0)
+ I $D(GD(2)) D  ;
+"RTN","C0CNHIN",173,0)
+ . M @ZXPARY@(NEWPATH)=GD ; IF MULITPLE DATA MERGE TO THE ARRAY
+"RTN","C0CNHIN",174,0)
+ E  I $D(GD(1)) D  ;
+"RTN","C0CNHIN",175,0)
+ . S @ZXPARY@(NEWPATH)=GD(1) ; IF SINGLE VALUE, ADD TO ARRAY
+"RTN","C0CNHIN",176,0)
+ . I GD(1)'="" D ADDNARY(NEWPATH,GD(1)) ; ADD TO NHIN ARRAY
+"RTN","C0CNHIN",177,0)
+ N ZFRST S ZFRST=$$FIRST(ZOID) ; SET FIRST CHILD
+"RTN","C0CNHIN",178,0)
+ I ZFRST'=0 D  ; THERE IS A CHILD
+"RTN","C0CNHIN",179,0)
+ . N ZNUM
+"RTN","C0CNHIN",180,0)
+ . N ZMULT S ZMULT=$$ISMULT(ZFRST) ; IS FIRST CHILD A MULTIPLE
+"RTN","C0CNHIN",181,0)
+ . D DOMO(ZFRST,NEWPATH,ZNARY,ZXIDX,ZXPARY,$S(ZMULT:1,1:""),ZREDUX) ; THE CHILD
+"RTN","C0CNHIN",182,0)
+ N GNXT S GNXT=$$NXTSIB(ZOID)
+"RTN","C0CNHIN",183,0)
+ I $$TAG(GNXT)'=$$TAG(ZOID) S ZNUM="" ; RESET COUNTING AFTER MULTIPLES
+"RTN","C0CNHIN",184,0)
+ I GNXT'=0 D  ;
+"RTN","C0CNHIN",185,0)
+ . N ZMULT S ZMULT=$$ISMULT(GNXT) ; IS THE SIBLING A MULTIPLE?
+"RTN","C0CNHIN",186,0)
+ . I (ZNUM="")&(ZMULT) D  ; SIBLING IS FIRST OF MULTIPLES
+"RTN","C0CNHIN",187,0)
+ . . N ZNUM S ZNUM=1 ;
+"RTN","C0CNHIN",188,0)
+ . . D DOMO(GNXT,ZPATH,ZNARY,ZXIDX,ZXPARY,ZNUM,ZREDUX) ; DO NEXT SIB
+"RTN","C0CNHIN",189,0)
+ . E  D DOMO(GNXT,ZPATH,ZNARY,ZXIDX,ZXPARY,$S(ZNUM>0:ZNUM+1,1:""),ZREDUX) ; SIB
+"RTN","C0CNHIN",190,0)
+ Q
+"RTN","C0CNHIN",191,0)
+ ;
+"RTN","C0CNHIN",192,0)
+ADDNARY(ZXP,ZVALUE) ; ADD AN NHIN ARRAY VALUE TO ZNARY
+"RTN","C0CNHIN",193,0)
+ ;
+"RTN","C0CNHIN",194,0)
+ N ZZI,ZZJ,ZZN
+"RTN","C0CNHIN",195,0)
+ S ZZI=$P(ZXP,"/",1) ; FIRST PIECE OF XPATH ARRAY
+"RTN","C0CNHIN",196,0)
+ I ZZI="" Q  ; DON'T ADD THIS ONE .. PROBABLY THE //results NODE
+"RTN","C0CNHIN",197,0)
+ S ZZJ=$P(ZXP,ZZI_"/",2) ; REST OF XPATH ARRAY
+"RTN","C0CNHIN",198,0)
+ S ZZJ=$TR(ZZJ,"/",".") ; REPLACE / WITH .
+"RTN","C0CNHIN",199,0)
+ I ZZI'["]" D  ; A SINGLETON
+"RTN","C0CNHIN",200,0)
+ . S ZZN=1
+"RTN","C0CNHIN",201,0)
+ E  D  ; THERE IS AN [x] OCCURANCE
+"RTN","C0CNHIN",202,0)
+ . S ZZN=$P($P(ZZI,"[",2),"]",1) ; PULL OUT THE OCCURANCE
+"RTN","C0CNHIN",203,0)
+ . S ZZI=$P(ZZI,"[",1) ; TAKE OUT THE [X]
+"RTN","C0CNHIN",204,0)
+ I ZZJ'="" S @ZNARY@(ZZI,ZZN,ZZJ)=ZVALUE
+"RTN","C0CNHIN",205,0)
+ Q
+"RTN","C0CNHIN",206,0)
+ ;
+"RTN","C0CNHIN",207,0)
+PARSE(INXML,INDOC) ;CALL THE MXML PARSER ON INXML, PASSED BY NAME
+"RTN","C0CNHIN",208,0)
+ ; INDOC IS PASSED AS THE DOCUMENT NAME - DON'T KNOW WHERE TO STORE THIS NOW
+"RTN","C0CNHIN",209,0)
+ ; EXTRINSIC WHICH RETURNS THE DOCID ASSIGNED BY MXML
+"RTN","C0CNHIN",210,0)
+ ;Q $$EN^MXMLDOM(INXML)
+"RTN","C0CNHIN",211,0)
+ Q $$EN^MXMLDOM(INXML,"W")
+"RTN","C0CNHIN",212,0)
+ ;
+"RTN","C0CNHIN",213,0)
+ISMULT(ZOID) ; RETURN TRUE IF ZOID IS ONE OF A MULTIPLE
+"RTN","C0CNHIN",214,0)
+ N ZN
+"RTN","C0CNHIN",215,0)
+ ;I $$TAG(ZOID)["entry" B
+"RTN","C0CNHIN",216,0)
+ S ZN=$$NXTSIB(ZOID)
+"RTN","C0CNHIN",217,0)
+ I ZN'="" Q $$TAG(ZOID)=$$TAG(ZN) ; IF TAG IS THE SAME AS NEXT SIB TAG
+"RTN","C0CNHIN",218,0)
+ Q 0
+"RTN","C0CNHIN",219,0)
+ ;
+"RTN","C0CNHIN",220,0)
+FIRST(ZOID) ;RETURNS THE OID OF THE FIRST CHILD OF ZOID
+"RTN","C0CNHIN",221,0)
+ Q $$CHILD^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CNHIN",222,0)
+ ;
+"RTN","C0CNHIN",223,0)
+PARENT(ZOID) ;RETURNS THE OID OF THE PARENT OF ZOID
+"RTN","C0CNHIN",224,0)
+ Q $$PARENT^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CNHIN",225,0)
+ ;
+"RTN","C0CNHIN",226,0)
+ATT(RTN,NODE) ;GET ATTRIBUTES FOR ZOID
+"RTN","C0CNHIN",227,0)
+ S HANDLE=C0CDOCID
+"RTN","C0CNHIN",228,0)
+ K @RTN
+"RTN","C0CNHIN",229,0)
+ D GETTXT^MXMLDOM("A")
+"RTN","C0CNHIN",230,0)
+ Q
+"RTN","C0CNHIN",231,0)
+ ;
+"RTN","C0CNHIN",232,0)
+TAG(ZOID) ; RETURNS THE XML TAG FOR THE NODE
+"RTN","C0CNHIN",233,0)
+ ;I ZOID=149 B ;GPLTEST
+"RTN","C0CNHIN",234,0)
+ N X,Y
+"RTN","C0CNHIN",235,0)
+ S Y=""
+"RTN","C0CNHIN",236,0)
+ S X=$G(C0CCBK("TAG")) ;IS THERE A CALLBACK FOR THIS ROUTINE
+"RTN","C0CNHIN",237,0)
+ I X'="" X X ; EXECUTE THE CALLBACK, SHOULD SET Y
+"RTN","C0CNHIN",238,0)
+ I Y="" S Y=$$NAME^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CNHIN",239,0)
+ Q Y
+"RTN","C0CNHIN",240,0)
+ ;
+"RTN","C0CNHIN",241,0)
+NXTSIB(ZOID) ; RETURNS THE NEXT SIBLING
+"RTN","C0CNHIN",242,0)
+ Q $$SIBLING^MXMLDOM(C0CDOCID,ZOID)
+"RTN","C0CNHIN",243,0)
+ ;
+"RTN","C0CNHIN",244,0)
+DATA(ZT,ZOID) ; RETURNS DATA FOR THE NODE
+"RTN","C0CNHIN",245,0)
+ ;N ZT,ZN S ZT=""
+"RTN","C0CNHIN",246,0)
+ ;S C0CDOM=$NA(^TMP("MXMLDOM",$J,C0CDOCID))
+"RTN","C0CNHIN",247,0)
+ ;Q $G(@C0CDOM@(ZOID,"T",1))
+"RTN","C0CNHIN",248,0)
+ S ZN=$$TEXT^MXMLDOM(C0CDOCID,ZOID,ZT)
+"RTN","C0CNHIN",249,0)
+ Q
+"RTN","C0CNHIN",250,0)
+ ;
+"RTN","C0CNHIN",251,0)
+OUTXML(ZRTN,INID) ; USES C0CMXMLB (MXMLBLD) TO OUTPUT XML FROM AN MXMLDOM
+"RTN","C0CNHIN",252,0)
+ ;
+"RTN","C0CNHIN",253,0)
+ S C0CDOCID=INID
+"RTN","C0CNHIN",254,0)
+ D START^C0CMXMLB($$TAG(1),,"G")
+"RTN","C0CNHIN",255,0)
+ D NDOUT($$FIRST(1))
+"RTN","C0CNHIN",256,0)
+ D END^C0CMXMLB ;END THE DOCUMENT
+"RTN","C0CNHIN",257,0)
+ M @ZRTN=^TMP("MXMLBLD",$J)
+"RTN","C0CNHIN",258,0)
+ K ^TMP("MXMLBLD",$J)
+"RTN","C0CNHIN",259,0)
+ Q
+"RTN","C0CNHIN",260,0)
+ ;
+"RTN","C0CNHIN",261,0)
+NDOUT(ZOID) ;CALLBACK ROUTINE - IT IS RECURSIVE
+"RTN","C0CNHIN",262,0)
+ N ZI S ZI=$$FIRST(ZOID)
+"RTN","C0CNHIN",263,0)
+ I ZI'=0 D  ; THERE IS A CHILD
+"RTN","C0CNHIN",264,0)
+ . N ZATT D ATT("ZATT",ZOID) ; THESE ARE THE ATTRIBUTES MOVED TO ZATT
+"RTN","C0CNHIN",265,0)
+ . D MULTI^C0CMXMLB("",$$TAG(ZOID),.ZATT,"NDOUT^C0CMXML(ZI)") ;HAVE CHILDREN
+"RTN","C0CNHIN",266,0)
+ E  D  ; NO CHILD - IF NO CHILDREN, A NODE HAS DATA, IS AN ENDPOINT
+"RTN","C0CNHIN",267,0)
+ . ;W "DOING",ZOID,!
+"RTN","C0CNHIN",268,0)
+ . N ZD D DATA("ZD",ZOID) ;NODES WITHOUT CHILDREN HAVE DATA
+"RTN","C0CNHIN",269,0)
+ . N ZATT D ATT("ZATT",ZOID) ;ATTRIBUTES
+"RTN","C0CNHIN",270,0)
+ . D ITEM^C0CMXMLB("",$$TAG(ZOID),.ZATT,$G(ZD(1))) ;NO CHILDREN
+"RTN","C0CNHIN",271,0)
+ I $$NXTSIB(ZOID)'=0 D  ; THERE IS A SIBLING
+"RTN","C0CNHIN",272,0)
+ . D NDOUT($$NXTSIB(ZOID)) ;RECURSE FOR SIBLINGS
+"RTN","C0CNHIN",273,0)
+ Q
+"RTN","C0CNHIN",274,0)
+ ;
+"RTN","C0CNHIN",275,0)
+WNHIN(ZDFN) ; WRITES THE XML OUTPUT OF GET^NHINV TO AN XML FILE
+"RTN","C0CNHIN",276,0)
+ ;
+"RTN","C0CNHIN",277,0)
+ N GN,GN2
+"RTN","C0CNHIN",278,0)
+ D GET^NHINV(.GN,ZDFN) ; EXTRACT THE XML
+"RTN","C0CNHIN",279,0)
+ S GN2=$NA(@GN@(1))
+"RTN","C0CNHIN",280,0)
+ W $$OUTPUT^C0CXPATH(GN2,"nhin_"_ZDFN_".xml","/home/wvehr3-09/")
+"RTN","C0CNHIN",281,0)
+ Q
+"RTN","C0CNHIN",282,0)
+ ;
+"RTN","C0CNHIN",283,0)
+TESTNARY ; TEST MAKING A NHIN ARRAY
+"RTN","C0CNHIN",284,0)
+ N ZI S ZI=""
+"RTN","C0CNHIN",285,0)
+ N ZH ; DOM HANDLE
+"RTN","C0CNHIN",286,0)
+ D TEST1 ; PARSE AN NHIN RESULT INTO THE DOM
+"RTN","C0CNHIN",287,0)
+ S ZH=C0CDOCID ; SET THE HANDLE
+"RTN","C0CNHIN",288,0)
+ N ZD S ZD=$NA(^TMP("MXMLDOM",$J,ZH))
+"RTN","C0CNHIN",289,0)
+ F  S ZI=$O(@ZD@(ZI)) Q:ZI=""  D  ; FOR EACH NODE
+"RTN","C0CNHIN",290,0)
+ . N ZATT
+"RTN","C0CNHIN",291,0)
+ . D MNARY(.ZATT,ZH,ZI)
+"RTN","C0CNHIN",292,0)
+ . N ZPRE,ZN
+"RTN","C0CNHIN",293,0)
+ . S ZPRE=$$PRE(ZI)
+"RTN","C0CNHIN",294,0)
+ . S ZN=$P(ZPRE,",",2)
+"RTN","C0CNHIN",295,0)
+ . S ZPRE=$P(ZPRE,",",1)
+"RTN","C0CNHIN",296,0)
+ . ;I $D(ZATT) ZWR ZATT
+"RTN","C0CNHIN",297,0)
+ . N ZJ S ZJ=""
+"RTN","C0CNHIN",298,0)
+ . F  S ZJ=$O(ZATT(ZJ)) Q:ZJ=""  D  ; FOR EACH ATTRIBUTE
+"RTN","C0CNHIN",299,0)
+ . . W ZPRE_"["_ZN_"]"_$$TAG(ZI)_"."_ZJ_"="_ZATT(ZJ),!
+"RTN","C0CNHIN",300,0)
+ . . S GOUT(ZPRE,ZN,$$TAG(ZI)_"."_ZJ)=ZATT(ZJ)
+"RTN","C0CNHIN",301,0)
+ Q
+"RTN","C0CNHIN",302,0)
+ ;
+"RTN","C0CNHIN",303,0)
+PRE(ZNODE) ; EXTRINSIC WHICH RETURNS THE PREFIX FOR A NODE
+"RTN","C0CNHIN",304,0)
+ ;
+"RTN","C0CNHIN",305,0)
+ N GI,GI2,GPT,GJ,GN
+"RTN","C0CNHIN",306,0)
+ S GI=$$PARENT(ZNODE) ; PARENT NODE
+"RTN","C0CNHIN",307,0)
+ I GI=0 Q ""  ; NO PARENT
+"RTN","C0CNHIN",308,0)
+ S GPT=$$TAG(GI) ; TAG OF PARENT
+"RTN","C0CNHIN",309,0)
+ S GI2=$$PARENT(GI) ; PARENT OF PARENT
+"RTN","C0CNHIN",310,0)
+ I (GI2'=0)&($$TAG(GI2)'="results") S GPT=$$TAG(GI2)_"."_GPT
+"RTN","C0CNHIN",311,0)
+ S GJ=$$FIRST(GI) ; NODE OF FIRST SIB
+"RTN","C0CNHIN",312,0)
+ I GJ=ZNODE Q:$$TAG(GI)_",1"
+"RTN","C0CNHIN",313,0)
+ F GN=2:1 Q:GJ=ZNODE  D  ;
+"RTN","C0CNHIN",314,0)
+ . S GJ=$$NXTSIB(GJ) ; NEXT SIBLING 
+"RTN","C0CNHIN",315,0)
+ Q GPT_","_GN
+"RTN","C0CNHIN",316,0)
+ ;
+"RTN","C0CNHIN",317,0)
+MNARY(ZRTN,ZHANDLE,ZOID) ; MAKE A NHIN ARRAY FROM A DOM NODE
+"RTN","C0CNHIN",318,0)
+ ; RETURNED IN ZRTN, PASSED BY REFERENCE
+"RTN","C0CNHIN",319,0)
+ ; ZHANDLE IS THE DOM DOCUMENT ID
+"RTN","C0CNHIN",320,0)
+ ; ZOID IS THE DOM NODE
+"RTN","C0CNHIN",321,0)
+ D ATT("ZRTN",ZOID)
+"RTN","C0CNHIN",322,0)
+ Q
+"RTN","C0CNHIN",323,0)
+ ;
+"RTN","C0CNMED2")
+0^89^B33217786
+"RTN","C0CNMED2",1,0)
+C0CNMED2 ; WV/CCDCCR/GPL/SMH - CCR/CCD Medications Driver; Mar 23 2009 ; 5/10/12 2:53pm
+"RTN","C0CNMED2",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CNMED2",3,0)
+ ; Copyright 2008,2009 George Lilly, University of Minnesota and Sam Habiel.
+"RTN","C0CNMED2",4,0)
+ ; Licensed under the terms of the GNU General Public License.
+"RTN","C0CNMED2",5,0)
+ ; See attached copy of the License.
+"RTN","C0CNMED2",6,0)
+ ; 
+"RTN","C0CNMED2",7,0)
+ ; This program is free software; you can redistribute it and/or modify
+"RTN","C0CNMED2",8,0)
+ ; it under the terms of the GNU General Public License as published by
+"RTN","C0CNMED2",9,0)
+ ; the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CNMED2",10,0)
+ ; (at your option) any later version.
+"RTN","C0CNMED2",11,0)
+ ; 
+"RTN","C0CNMED2",12,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CNMED2",13,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CNMED2",14,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CNMED2",15,0)
+ ; GNU General Public License for more details.
+"RTN","C0CNMED2",16,0)
+ ; 
+"RTN","C0CNMED2",17,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CNMED2",18,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CNMED2",19,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CNMED2",20,0)
+ ;
+"RTN","C0CNMED2",21,0)
+ ; --Revision History
+"RTN","C0CNMED2",22,0)
+ ; July 2008 - Initial Version/GPL
+"RTN","C0CNMED2",23,0)
+ ; July 2008 - March 2009 various revisions
+"RTN","C0CNMED2",24,0)
+ ; March 2009 - Reconstruction of routine as driver for other med routines/SMH
+"RTN","C0CNMED2",25,0)
+ ; June 2011 - Redone to support all meds using the FOIA NHIN routines/gpl
+"RTN","C0CNMED2",26,0)
+ ;
+"RTN","C0CNMED2",27,0)
+ Q
+"RTN","C0CNMED2",28,0)
+ ;
+"RTN","C0CNMED2",29,0)
+ ; THIS VERSION IS DEPRECATED BECAUSE IT DOES NOT GENEREATE XML IN
+"RTN","C0CNMED2",30,0)
+ ; THE RIGHT ORDER... AND IT HAS TO BE IN THE RIGHT ORDER... :(
+"RTN","C0CNMED2",31,0)
+ ; GPL
+"RTN","C0CNMED2",32,0)
+ ;
+"RTN","C0CNMED2",33,0)
+EXTRACT(MEDXML,DFN,MEDOUTXML) ; Private; Extract medications into provided XML template
+"RTN","C0CNMED2",34,0)
+ ; DFN passed by reference
+"RTN","C0CNMED2",35,0)
+ ; MEDXML and MEDOUTXML are passed by Name
+"RTN","C0CNMED2",36,0)
+ ; MEDXML is the input template
+"RTN","C0CNMED2",37,0)
+ ; MEDOUTXML is the output template
+"RTN","C0CNMED2",38,0)
+ ; Both of them refer to ^TMP globals where the XML documents are stored
+"RTN","C0CNMED2",39,0)
+ ;
+"RTN","C0CNMED2",40,0)
+ N GN
+"RTN","C0CNMED2",41,0)
+ D EN^C0CNHIN(.GN,DFN,"MED;",1) ; RETRIEVE NHIN ARRAY OF MEDS
+"RTN","C0CNMED2",42,0)
+ ; this call uses GET^NHINV to retrieve xml of the meds and then
+"RTN","C0CNMED2",43,0)
+ ; parses with MXML and uses DOMO^C0CDOM to extract an NHIN array
+"RTN","C0CNMED2",44,0)
+ ;
+"RTN","C0CNMED2",45,0)
+ ; we now create an NHIN Array of the Meds section of the CCR
+"RTN","C0CNMED2",46,0)
+ ;
+"RTN","C0CNMED2",47,0)
+ N ZI S ZI=""
+"RTN","C0CNMED2",48,0)
+ F  S ZI=$O(GN("med",ZI)) Q:ZI=""  D  ; for each med
+"RTN","C0CNMED2",49,0)
+ . N GA S GA=$NA(GN("med",ZI))
+"RTN","C0CNMED2",50,0)
+ . N GM S GM="Medication" ; to keep the lines shorter
+"RTN","C0CNMED2",51,0)
+ . S GC(GM,ZI,"CCRDataObjectID")="MED_"_ZI
+"RTN","C0CNMED2",52,0)
+ . N ZD,ZD2 S ZD=$G(@GA@("ordered@value")) ; FILEMAN DATE
+"RTN","C0CNMED2",53,0)
+ . I ZD="" S ZD=$G(@GA@("start@value")) ; for inpatient meds
+"RTN","C0CNMED2",54,0)
+ . S ZD2=$$FMDTOUTC^C0CUTIL(ZD,"DT")
+"RTN","C0CNMED2",55,0)
+ . S GC(GM,ZI,"DateTime[1].ExactDateTime")=ZD2
+"RTN","C0CNMED2",56,0)
+ . S GC(GM,ZI,"DateTime[1].Type.Text")="Documented Date"
+"RTN","C0CNMED2",57,0)
+ . ;S GC(GM,ZI,"DateTime[2].ExactDateTime")=""
+"RTN","C0CNMED2",58,0)
+ . ;S GC(GM,ZI,"DateTime[2].Type.Text")=""
+"RTN","C0CNMED2",59,0)
+ . N GSIG S GSIG=$G(@GA@("sig"))
+"RTN","C0CNMED2",60,0)
+ . I GSIG["|" S GSIG=$P(GSIG,"|",2) ; eRx has name of drug separated by |
+"RTN","C0CNMED2",61,0)
+ . S GC(GM,ZI,"Description.Text")=GSIG
+"RTN","C0CNMED2",62,0)
+ . N GD S GD="Directions.Direction" ; MAKING THE STRINGS SHORTER
+"RTN","C0CNMED2",63,0)
+ . ;S GC(GM,ZI,GD_".DeliveryMethod.Text")="@@MEDDELIVERYMETHOD@@"
+"RTN","C0CNMED2",64,0)
+ . ;S GC(GM,ZI,GD_".Description.Text")=""
+"RTN","C0CNMED2",65,0)
+ . ;S GC(GM,ZI,GD_".DirectionSequenceModifier")="@@MEDDIRSEQ@@"
+"RTN","C0CNMED2",66,0)
+ . ;S GC(GM,ZI,GD_".Dose.Rate.Units.Unit")="@@MEDRATEUNIT@@"
+"RTN","C0CNMED2",67,0)
+ . ;S GC(GM,ZI,GD_".Dose.Rate.Value")="@@MEDRATEVALUE@@"
+"RTN","C0CNMED2",68,0)
+ . ;S GC(GM,ZI,GD_".Dose.Units.Unit")="@@MEDDOSEUNIT@@"
+"RTN","C0CNMED2",69,0)
+ . ;S GC(GM,ZI,GD_".Dose.Value")="@@MEDDOSEVALUE@@"
+"RTN","C0CNMED2",70,0)
+ . ;S GC(GM,ZI,GD_".DoseIndicator.Text")="@@MEDDOSEINDICATOR@@"
+"RTN","C0CNMED2",71,0)
+ . ;S GC(GM,ZI,GD_".Duration.Units.Unit")="@@MEDDURATIONUNIT@@"
+"RTN","C0CNMED2",72,0)
+ . ;S GC(GM,ZI,GD_".Duration.Value")="@@MEDDURATIONVALUE@@"
+"RTN","C0CNMED2",73,0)
+ . ;S GC(GM,ZI,GD_".Frequency.Value")="@@MEDFREQUENCYVALUE@@"
+"RTN","C0CNMED2",74,0)
+ . ;S GC(GM,ZI,GD_".Indication.PRNFlag.Text")="@@MEDPRNFLAG@@"
+"RTN","C0CNMED2",75,0)
+ . ;S GC(GM,ZI,GD_".Indication.Problem.CCRDataObjectID")=""
+"RTN","C0CNMED2",76,0)
+ . ;S GC(GM,ZI,GD_".Indication.Problem.Description.Code.CodingSystem")=""
+"RTN","C0CNMED2",77,0)
+ . ;S GC(GM,ZI,GD_".Indication.Problem.Description.Code.Value")=""
+"RTN","C0CNMED2",78,0)
+ . ;S GC(GM,ZI,GD_".Indication.Problem.Description.Code.Version")=""
+"RTN","C0CNMED2",79,0)
+ . ;S GC(GM,ZI,GD_".Indication.Problem.Description.Text")=""
+"RTN","C0CNMED2",80,0)
+ . ;S GC(GM,ZI,GD_".Indication.Problem.Source.Actor.ActorID")=""
+"RTN","C0CNMED2",81,0)
+ . ;S GC(GM,ZI,GD_".Indication.Problem.Type.Text")=""
+"RTN","C0CNMED2",82,0)
+ . ;S GC(GM,ZI,GD_".Interval.Units.Unit")="@@MEDINTERVALUNIT@@"
+"RTN","C0CNMED2",83,0)
+ . ;S GC(GM,ZI,GD_".Interval.Value")="@@MEDINTERVALVALUE@@"
+"RTN","C0CNMED2",84,0)
+ . ;S GC(GM,ZI,GD_".MultipleDirectionModifier.Text")="@@MEDMULDIRMOD@@"
+"RTN","C0CNMED2",85,0)
+ . S GC(GM,ZI,GD_".Route.Text")=$G(@GA@("doses.dose@route"))
+"RTN","C0CNMED2",86,0)
+ . ;S GC(GM,ZI,GD_".StopIndicator.Text")="@@MEDSTOPINDICATOR@@"
+"RTN","C0CNMED2",87,0)
+ . ;S GC(GM,ZI,GD_".Vehicle.Text")="@@MEDVEHICLETEXT@@"
+"RTN","C0CNMED2",88,0)
+ . ;S GC(GM,ZI,"FullfillmentInstructions.Text")=""
+"RTN","C0CNMED2",89,0)
+ . ;S GC(GM,ZI,"IDs.ID")="@@MEDRXNO@@"
+"RTN","C0CNMED2",90,0)
+ . ;S GC(GM,ZI,"IDs.Type.Text")="@@MEDRXNOTXT@@"
+"RTN","C0CNMED2",91,0)
+ . ;S GC(GM,ZI,"PatientInstructions.Instruction.Text")="@@MEDPTINSTRUCTIONS@@"
+"RTN","C0CNMED2",92,0)
+ . ;S GC(GM,ZI,"Product.BrandName.Text")="@@MEDBRANDNAMETEXT@@"
+"RTN","C0CNMED2",93,0)
+ . S GC(GM,ZI,"Product.Concentration.Units.Unit")=$G(@GA@("doses.dose@units"))
+"RTN","C0CNMED2",94,0)
+ . S GC(GM,ZI,"Product.Concentration.Value")=$G(@GA@("doses.dose@dose"))
+"RTN","C0CNMED2",95,0)
+ . S GC(GM,ZI,"Product.Form.Text")=$G(@GA@("form@value"))
+"RTN","C0CNMED2",96,0)
+ . N GV S GV=$G(@GA@("products.product.vaProduct@vuid"))
+"RTN","C0CNMED2",97,0)
+ . N GR S GR=$$RXNCUI3^C0PLKUP(GV)
+"RTN","C0CNMED2",98,0)
+ . S GC(GM,ZI,"Product.ProductName.Code.CodingSystem")=$S(GR:"RxNorm",1:"VUID")
+"RTN","C0CNMED2",99,0)
+ . S GC(GM,ZI,"Product.ProductName.Code.Value")=$S(GR:GR,1:GV)
+"RTN","C0CNMED2",100,0)
+ . S GC(GM,ZI,"Product.ProductName.Code.Version")="08AB_081201F"
+"RTN","C0CNMED2",101,0)
+ . S GC(GM,ZI,"Product.ProductName.Text")=$G(@GA@("name@value"))
+"RTN","C0CNMED2",102,0)
+ . S GC(GM,ZI,"Product.Strength.Units.Unit")=$G(@GA@("doses.dose@units"))
+"RTN","C0CNMED2",103,0)
+ . S GC(GM,ZI,"Product.Strength.Value")=$G(@GA@("doses.dose@dose"))
+"RTN","C0CNMED2",104,0)
+ . ;S GC(GM,ZI,"Quantity.Units.Unit")="@@MEDQUANTITYUNIT@@"
+"RTN","C0CNMED2",105,0)
+ . ;S GC(GM,ZI,"Quantity.Value")="@@MEDQUANTITYVALUE@@"
+"RTN","C0CNMED2",106,0)
+ . ;S GC(GM,ZI,"Refills.Refill.Number")="@@MEDRFNO@@"
+"RTN","C0CNMED2",107,0)
+ . N GDUZ S GDUZ=$G(@GA@("orderingProvider@code")) ;PROVIDER DUZ
+"RTN","C0CNMED2",108,0)
+ . S GC(GM,ZI,"Source.Actor.ActorID")="PROVIDER_"_GDUZ
+"RTN","C0CNMED2",109,0)
+ . S GC(GM,ZI,"Status.Text")=$G(@GA@("status@value"))
+"RTN","C0CNMED2",110,0)
+ . S GC(GM,ZI,"Type.Text")="Medication"
+"RTN","C0CNMED2",111,0)
+ N C0CDOCID
+"RTN","C0CNMED2",112,0)
+ S C0CDOCID=$$DOMI^C0CDOM("GC",,"Medications") ; insert to dom
+"RTN","C0CNMED2",113,0)
+ D OUTXML^C0CDOM(MEDOUTXML,C0CDOCID,1) ; render the xml
+"RTN","C0CNMED2",114,0)
+ N ZSIZE S ZSIZE=$O(@MEDOUTXML@(""),-1)
+"RTN","C0CNMED2",115,0)
+ S @MEDOUTXML@(0)=ZSIZE ; RETURN STATUS IS NUMBER OF LINES OF XML
+"RTN","C0CNMED2",116,0)
+ W !,MEDOUTXML
+"RTN","C0CNMED2",117,0)
+ ;ZWR GN
+"RTN","C0CNMED2",118,0)
+ ;ZWR GC
+"RTN","C0CNMED2",119,0)
+ ;B
+"RTN","C0CNMED2",120,0)
+ Q
+"RTN","C0CNMED2",121,0)
+ ;
+"RTN","C0CNMED4")
+0^90^B92238704
+"RTN","C0CNMED4",1,0)
+C0CNMED4 ; WV/CCDCCR/SMH/gpl - CCR/CCD PROCESSING FOR MEDICATIONS - Inpatient Meds/Unit Dose ;10/13/08 ; 5/10/12 2:54pm
+"RTN","C0CNMED4",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CNMED4",3,0)
+ ; Copyright 2008 WorldVistA.  Licensed under the terms of the GNU
+"RTN","C0CNMED4",4,0)
+ ; General Public License See attached copy of the License.
+"RTN","C0CNMED4",5,0)
+ ;
+"RTN","C0CNMED4",6,0)
+ ; This program is free software; you can redistribute it and/or modify
+"RTN","C0CNMED4",7,0)
+ ; it under the terms of the GNU General Public License as published by
+"RTN","C0CNMED4",8,0)
+ ; the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CNMED4",9,0)
+ ; (at your option) any later version.
+"RTN","C0CNMED4",10,0)
+ ;
+"RTN","C0CNMED4",11,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CNMED4",12,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CNMED4",13,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CNMED4",14,0)
+ ; GNU General Public License for more details.
+"RTN","C0CNMED4",15,0)
+ ;
+"RTN","C0CNMED4",16,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CNMED4",17,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CNMED4",18,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CNMED4",19,0)
+ ;
+"RTN","C0CNMED4",20,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CNMED4",21,0)
+ Q
+"RTN","C0CNMED4",22,0)
+ ;
+"RTN","C0CNMED4",23,0)
+EXTRACT(MINXML,DFN,OUTXML,MEDCOUNT) ; EXTRACT MEDICATIONS INTO PROVIDED XML TEMPLATE
+"RTN","C0CNMED4",24,0)
+ ;
+"RTN","C0CNMED4",25,0)
+ ; this routine has be adapted to retrieve meds from GET^NHINV by gpl 6/2011
+"RTN","C0CNMED4",26,0)
+ ;
+"RTN","C0CNMED4",27,0)
+ ; MINXML is the Input XML Template, passed by name
+"RTN","C0CNMED4",28,0)
+ ; DFN is Patient IEN
+"RTN","C0CNMED4",29,0)
+ ; OUTXML is the resultant XML.
+"RTN","C0CNMED4",30,0)
+ ;
+"RTN","C0CNMED4",31,0)
+ ; MEDS is return array from API.
+"RTN","C0CNMED4",32,0)
+ ; MED is holds each array element from MEDS, one medicine
+"RTN","C0CNMED4",33,0)
+ ; MAP is a mapping variable map (store result) for each med
+"RTN","C0CNMED4",34,0)
+ ;
+"RTN","C0CNMED4",35,0)
+ ; Inpatient Meds will be extracted using this routine and and the one following.
+"RTN","C0CNMED4",36,0)
+ ; Inpatient Meds Unit Dose is going to be C0CMED4
+"RTN","C0CNMED4",37,0)
+ ; Inpatient Meds IVs is going to be C0CMED5
+"RTN","C0CNMED4",38,0)
+ ;
+"RTN","C0CNMED4",39,0)
+ ; We will use two Pharmacy ReEnginnering API's:
+"RTN","C0CNMED4",40,0)
+ ; PSS431^PSS55(DFN,PO,PSDATE,PEDATE,LIST) - provides most info
+"RTN","C0CNMED4",41,0)
+ ; PSS432^PSS55(DFN,PO,LIST) - provides schedule info
+"RTN","C0CNMED4",42,0)
+ ; For more information, see the PRE documentation at:
+"RTN","C0CNMED4",43,0)
+ ; http://www.va.gov/vdl/documents/Clinical/Pharm-Inpatient_Med/phar_1_api_r0807.pdf
+"RTN","C0CNMED4",44,0)
+ ; 
+"RTN","C0CNMED4",45,0)
+ ; Med data is stored in Unit Dose multiple of file 55, pharmacy patient
+"RTN","C0CNMED4",46,0)
+ ;
+"RTN","C0CNMED4",47,0)
+ N MEDS,MAP
+"RTN","C0CNMED4",48,0)
+ ;K ^TMP($J)
+"RTN","C0CNMED4",49,0)
+ ;D PSS431^PSS55(DFN,,,,"UD") ; Output is in ^TMP($J,"UD",*)
+"RTN","C0CNMED4",50,0)
+ ;I ^TMP($J,"UD",0)'>0 S @OUTXML@(0)=0 QUIT  ; No Meds - Quit
+"RTN","C0CNMED4",51,0)
+ ;; Otherwise, we go on...
+"RTN","C0CNMED4",52,0)
+ D EN^C0CNHIN(.MEDS,DFN,"MED;") ; gpl get the NHIN Array of meds
+"RTN","C0CNMED4",53,0)
+ I '$D(MEDS) Q  ; no meds
+"RTN","C0CNMED4",54,0)
+ N ZI S ZI=""
+"RTN","C0CNMED4",55,0)
+ N ZCOUNT S ZCOUNT=0
+"RTN","C0CNMED4",56,0)
+ F  S ZI=$O(MEDS("med",ZI)) Q:ZI=""  D  ; for each returned med
+"RTN","C0CNMED4",57,0)
+ . I $G(MEDS("med",ZI,"vaType@value"))="I" S ZCOUNT=ZCOUNT+1
+"RTN","C0CNMED4",58,0)
+ IF ZCOUNT=0 Q  ; no inpatient meds
+"RTN","C0CNMED4",59,0)
+ ;M MEDS=^TMP($J,"UD")
+"RTN","C0CNMED4",60,0)
+ I DEBUG ZWR MEDS
+"RTN","C0CNMED4",61,0)
+ S MEDMAP=$NA(^TMP("C0CCCR",$J,"MEDMAP")) 
+"RTN","C0CNMED4",62,0)
+ ;N MEDCOUNT S MEDCOUNT=@MEDMAP@(0) ; We already have meds in the array
+"RTN","C0CNMED4",63,0)
+ N I S I=0 
+"RTN","C0CNMED4",64,0)
+ F  S I=$O(MEDS("med",I)) Q:'I  D  ; For each medication
+"RTN","C0CNMED4",65,0)
+ . N MED M MED=MEDS("med",I)
+"RTN","C0CNMED4",66,0)
+ . I $G(MED("vaType@value"))'="I" Q  ; not inpatient
+"RTN","C0CNMED4",67,0)
+ . S MEDCOUNT=MEDCOUNT+1
+"RTN","C0CNMED4",68,0)
+ . S @MEDMAP@(0)=MEDCOUNT ; Update MedMap array counter
+"RTN","C0CNMED4",69,0)
+ . S MAP=$NA(^TMP("C0CCCR",$J,"MEDMAP",MEDCOUNT))
+"RTN","C0CNMED4",70,0)
+ . ;N RXIEN S RXIEN=MED(.01) ; Order Number
+"RTN","C0CNMED4",71,0)
+ . N RXIEN S RXIEN=$G(MED("orderID@value")) ; ien of the med
+"RTN","C0CNMED4",72,0)
+ . I DEBUG W "RXIEN IS ",RXIEN,!
+"RTN","C0CNMED4",73,0)
+ . I DEBUG W "MAP= ",MAP,!
+"RTN","C0CNMED4",74,0)
+ . S @MAP@("MEDOBJECTID")="MED_INPATIENT_UD"_RXIEN 
+"RTN","C0CNMED4",75,0)
+ . S @MAP@("MEDISSUEDATETXT")="Order Date"
+"RTN","C0CNMED4",76,0)
+ . ;S @MAP@("MEDISSUEDATE")=$$FMDTOUTC^C0CUTIL($P(MED(27),U),"DT")
+"RTN","C0CNMED4",77,0)
+ . S @MAP@("MEDISSUEDATE")=$$FMDTOUTC^C0CUTIL($G(MED("start@value")),"DT")
+"RTN","C0CNMED4",78,0)
+ . S @MAP@("MEDLASTFILLDATETXT")="" ; For Outpatient
+"RTN","C0CNMED4",79,0)
+ . S @MAP@("MEDLASTFILLDATE")="" ; For Outpatient
+"RTN","C0CNMED4",80,0)
+ . S @MAP@("MEDRXNOTXT")="" ; For Outpatient
+"RTN","C0CNMED4",81,0)
+ . S @MAP@("MEDRXNO")="" ; For Outpatient
+"RTN","C0CNMED4",82,0)
+ . S @MAP@("MEDTYPETEXT")="Medication"
+"RTN","C0CNMED4",83,0)
+ . S @MAP@("MEDDETAILUNADORNED")=""  ; Leave blank, field has its uses
+"RTN","C0CNMED4",84,0)
+ . ;S @MAP@("MEDSTATUSTEXT")="ACTIVE" 
+"RTN","C0CNMED4",85,0)
+ . N C0CMST S C0CMST=$G(MED("vaStatus@value")) ; need to filter status
+"RTN","C0CNMED4",86,0)
+ . I C0CMST="EXPIRED" S C0CMST="Prior History No Longer Active"
+"RTN","C0CNMED4",87,0)
+ . I C0CMST="ACTIVE" S C0CMST="Active" ;
+"RTN","C0CNMED4",88,0)
+ . S @MAP@("MEDSTATUSTEXT")=C0CMST
+"RTN","C0CNMED4",89,0)
+ . ;S @MAP@("MEDSOURCEACTORID")="ACTORPROVIDER_"_$P(MED(1),U)
+"RTN","C0CNMED4",90,0)
+ . S @MAP@("MEDSOURCEACTORID")="ACTORPROVIDER_"_$G(MED("orderingProvider@code"))
+"RTN","C0CNMED4",91,0)
+ . ;S @MAP@("MEDPRODUCTNAMETEXT")=MED("DDRUG",1,.01)
+"RTN","C0CNMED4",92,0)
+ . S @MAP@("MEDPRODUCTNAMETEXT")=$G(MED("name@value"))
+"RTN","C0CNMED4",93,0)
+ . ; NDC is field 31 in the drug file.
+"RTN","C0CNMED4",94,0)
+ . ; The actual drug entry in the drug file is not necessarily supplied.
+"RTN","C0CNMED4",95,0)
+ . ; It' node 1, internal form.
+"RTN","C0CNMED4",96,0)
+ . ;N MEDIEN S MEDIEN=MED(1,"I")
+"RTN","C0CNMED4",97,0)
+ . ;S @MAP@("MEDPRODUCTNAMECODEVALUE")=$S($L(MEDIEN):$$GET1^DIQ(50,MEDIEN,31,"E"),1:"")
+"RTN","C0CNMED4",98,0)
+ . N ZVUID S ZVUID=$G(MED("products.product.vaProduct@vuid")) ; VUID
+"RTN","C0CNMED4",99,0)
+ . N ZC,ZCD,ZCDS,ZCDSV ; CODE,CODE SYSTEM,CODE VERSION
+"RTN","C0CNMED4",100,0)
+ . D  ;
+"RTN","C0CNMED4",101,0)
+ . . S ZC=$$CODE^C0CUTIL(ZVUID)
+"RTN","C0CNMED4",102,0)
+ . . S ZCD=$P(ZC,"^",1) ; CODE TO USE
+"RTN","C0CNMED4",103,0)
+ . . S ZCDS=$P(ZC,"^",2) ; CODING SYSTEM - RXNORM OR VUID
+"RTN","C0CNMED4",104,0)
+ . . S ZCDSV=$P(ZC,"^",3) ; CODING SYSTEM VERSION
+"RTN","C0CNMED4",105,0)
+ . ;N ZRXNORM S ZRXNORM=""
+"RTN","C0CNMED4",106,0)
+ . ;S ZRXNORM=$$RXNCUI3^C0PLKUP(ZVUID)
+"RTN","C0CNMED4",107,0)
+ . S @MAP@("MEDPRODUCTNAMECODEVALUE")=ZCD
+"RTN","C0CNMED4",108,0)
+ . ;S @MAP@("MEDPRODUCTNAMECODINGINGSYSTEM")=$S($L(MEDIEN):"NDC",1:"")
+"RTN","C0CNMED4",109,0)
+ . S @MAP@("MEDPRODUCTNAMECODINGINGSYSTEM")=ZCDS
+"RTN","C0CNMED4",110,0)
+ . ;S @MAP@("MEDPRODUCTNAMECODEVERSION")=$S($L(MEDIEN):"none",1:"")
+"RTN","C0CNMED4",111,0)
+ . S @MAP@("MEDPRODUCTNAMECODEVERSION")=ZCDSV
+"RTN","C0CNMED4",112,0)
+ . S @MAP@("MEDBRANDNAMETEXT")=""
+"RTN","C0CNMED4",113,0)
+ . S @MAP@("MEDPRODUCTNAMETEXT")=$G(MED("name@value"))_" "_ZCDS_": "_ZCD
+"RTN","C0CNMED4",114,0)
+ . ;I $L(MEDIEN) D DOSE^PSS50(MEDIEN,,,,,"DOSE")
+"RTN","C0CNMED4",115,0)
+ . ;I $L(MEDIEN) N DOSEDATA M DOSEDATA=^TMP($J,"DOSE",MEDIEN)
+"RTN","C0CNMED4",116,0)
+ . ;S @MAP@("MEDSTRENGTHVALUE")=$S($L(MEDIEN):DOSEDATA(901),1:"")
+"RTN","C0CNMED4",117,0)
+ . S @MAP@("MEDSTRENGTHVALUE")=$G(MED("doses.dose@dose"))
+"RTN","C0CNMED4",118,0)
+ . ;S @MAP@("MEDSTRENGTHUNIT")=$S($P(DOSEDATA(902),U,2),1:"")
+"RTN","C0CNMED4",119,0)
+ . S @MAP@("MEDSTRENGTHUNIT")=$G(MED("doses.dose@units"))
+"RTN","C0CNMED4",120,0)
+ . ; Units, concentration, etc, come from another call
+"RTN","C0CNMED4",121,0)
+ . ; $$CPRS^PSNAPIS which returns dosage-form^va class^strengh^unit
+"RTN","C0CNMED4",122,0)
+ . ; This call takes nodes 1 and 3 of ^PSDRUG(D0,"ND") as parameters
+"RTN","C0CNMED4",123,0)
+ . ; NDF Entry IEN, and VA Product Name
+"RTN","C0CNMED4",124,0)
+ . ; These can be obtained using NDF^PSS50 (IEN,,,,,"SUBSCRIPT")
+"RTN","C0CNMED4",125,0)
+ . ; Documented in the same manual.
+"RTN","C0CNMED4",126,0)
+ . ;N NDFDATA,CONCDATA
+"RTN","C0CNMED4",127,0)
+ . ;I $L(MEDIEN) D
+"RTN","C0CNMED4",128,0)
+ . ;. D NDF^PSS50(MEDIEN,,,,,"CONC")
+"RTN","C0CNMED4",129,0)
+ . ;. M NDFDATA=^TMP($J,"CONC",MEDIEN)
+"RTN","C0CNMED4",130,0)
+ . ;. N NDFIEN S NDFIEN=$P(NDFDATA(20),U)
+"RTN","C0CNMED4",131,0)
+ . ;. N VAPROD S VAPROD=$P(NDFDATA(22),U)
+"RTN","C0CNMED4",132,0)
+ . ;. ; If a drug was not matched to NDF, then the NDFIEN is gonna be ""
+"RTN","C0CNMED4",133,0)
+ . ;. ; and this will crash the call. So...
+"RTN","C0CNMED4",134,0)
+ . ;. I NDFIEN="" S CONCDATA=""
+"RTN","C0CNMED4",135,0)
+ . ;. E  S CONCDATA=$$CPRS^PSNAPIS(NDFIEN,VAPROD)
+"RTN","C0CNMED4",136,0)
+ . ;E  S (NDFDATA,CONCDATA)="" ; This line is defensive programming to prevent undef errors.
+"RTN","C0CNMED4",137,0)
+ . ;S @MAP@("MEDFORMTEXT")=$S($L(MEDIEN):$P(CONCDATA,U,1),1:"")
+"RTN","C0CNMED4",138,0)
+ . S @MAP@("MEDFORMTEXT")=$G(MED("form@value"))
+"RTN","C0CNMED4",139,0)
+ . ;S @MAP@("MEDCONCVALUE")=$S($L(MEDIEN):$P(CONCDATA,U,3),1:"")
+"RTN","C0CNMED4",140,0)
+ . S @MAP@("MEDCONCVALUE")=$G(MED("doses.dose@dose"))
+"RTN","C0CNMED4",141,0)
+ . ;S @MAP@("MEDCONCUNIT")=$S($L(MEDIEN):$P(CONCDATA,U,4),1:"")
+"RTN","C0CNMED4",142,0)
+ . S @MAP@("MEDCONCUNIT")=$G(MED("doses.does@units"))
+"RTN","C0CNMED4",143,0)
+ . ;S @MAP@("MEDQUANTITYVALUE")=""  ; not provided for in Non-VA meds.
+"RTN","C0CNMED4",144,0)
+ . S @MAP@("MEDQUANTITYVALUE")=$G(MED("doses.dose@unitsPerDose")) ;
+"RTN","C0CNMED4",145,0)
+ . ; Oddly, there is no easy place to find the dispense unit.
+"RTN","C0CNMED4",146,0)
+ . ; It's not included in the original call, so we have to go to the drug file.
+"RTN","C0CNMED4",147,0)
+ . ; That would be DATA^PSS50(IEN,,,,,"SUBSCRIPT")
+"RTN","C0CNMED4",148,0)
+ . ; Node 14.5 is the Dispense Unit
+"RTN","C0CNMED4",149,0)
+ . ;I $L(MEDIEN) D
+"RTN","C0CNMED4",150,0)
+ . ;. D DATA^PSS50(MEDIEN,,,,,"QTY")
+"RTN","C0CNMED4",151,0)
+ . ;. N QTYDATA M QTYDATA=^TMP($J,"QTY",MEDIEN)
+"RTN","C0CNMED4",152,0)
+ . ;. S @MAP@("MEDQUANTITYUNIT")=QTYDATA(14.5)
+"RTN","C0CNMED4",153,0)
+ . ;E  S @MAP@("MEDQUANTITYUNIT")=""
+"RTN","C0CNMED4",154,0)
+ . S @MAP@("MEDQUANTITYUNIT")=$G(MED("dose.dose@unitsPerDose"))
+"RTN","C0CNMED4",155,0)
+ . ;
+"RTN","C0CNMED4",156,0)
+ . ; --- START OF DIRECTIONS ---
+"RTN","C0CNMED4",157,0)
+ . ; Dosage is field 2, route is 3, schedule is 4
+"RTN","C0CNMED4",158,0)
+ . ; These are all free text fields, and don't point to any files
+"RTN","C0CNMED4",159,0)
+ . ; For that reason, I will use the field I never used before:
+"RTN","C0CNMED4",160,0)
+ . ; MEDDIRECTIONDESCRIPTIONTEXT
+"RTN","C0CNMED4",161,0)
+ . ;S @MAP@("M","DIRECTIONS",1,"MEDDIRECTIONDESCRIPTIONTEXT")=MED(2,"E")_" "_MED(3,"E")_" "_MED(4,"E")
+"RTN","C0CNMED4",162,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDIRECTIONDESCRIPTIONTEXT")=$G(MED("sig"))
+"RTN","C0CNMED4",163,0)
+ . ; $G(MED("products.product.vaProduct@name"))
+"RTN","C0CNMED4",164,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDOSEINDICATOR")="4"  ; means look in description text. See E2369-05.
+"RTN","C0CNMED4",165,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDELIVERYMETHOD")=""
+"RTN","C0CNMED4",166,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDOSEVALUE")=""
+"RTN","C0CNMED4",167,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDOSEUNIT")=""
+"RTN","C0CNMED4",168,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDRATEVALUE")=""  
+"RTN","C0CNMED4",169,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDRATEUNIT")=""  
+"RTN","C0CNMED4",170,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDVEHICLETEXT")=""  
+"RTN","C0CNMED4",171,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDIRECTIONROUTETEXT")=""
+"RTN","C0CNMED4",172,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDFREQUENCYVALUE")=""
+"RTN","C0CNMED4",173,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDINTERVALVALUE")=""
+"RTN","C0CNMED4",174,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDINTERVALUNIT")=""
+"RTN","C0CNMED4",175,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDURATIONVALUE")=""
+"RTN","C0CNMED4",176,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDURATIONUNIT")=""
+"RTN","C0CNMED4",177,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPRNFLAG")=""
+"RTN","C0CNMED4",178,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMOBJECTID")=""
+"RTN","C0CNMED4",179,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMTYPETXT")=""
+"RTN","C0CNMED4",180,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMDESCRIPTION")=""
+"RTN","C0CNMED4",181,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMCODEVALUE")=""
+"RTN","C0CNMED4",182,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMCODINGSYSTEM")=""
+"RTN","C0CNMED4",183,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMCODINGVERSION")=""
+"RTN","C0CNMED4",184,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDPROBLEMSOURCEACTORID")=""
+"RTN","C0CNMED4",185,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDSTOPINDICATOR")="" 
+"RTN","C0CNMED4",186,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDDIRSEQ")=""
+"RTN","C0CNMED4",187,0)
+ . S @MAP@("M","DIRECTIONS",1,"MEDMULDIRMOD")=""
+"RTN","C0CNMED4",188,0)
+ . ;
+"RTN","C0CNMED4",189,0)
+ . ; --- END OF DIRECTIONS ---
+"RTN","C0CNMED4",190,0)
+ . ;
+"RTN","C0CNMED4",191,0)
+ . ; S @MAP@("MEDPTINSTRUCTIONS","F")="52.41^105"
+"RTN","C0CNMED4",192,0)
+ . ;S @MAP@("MEDPTINSTRUCTIONS")=MED(10,1) ; WP Field
+"RTN","C0CNMED4",193,0)
+ . S @MAP@("MEDPTINSTRUCTIONS")=""
+"RTN","C0CNMED4",194,0)
+ . ;S @MAP@("MEDFULLFILLMENTINSTRUCTIONS")=MED(14,1) ; WP Field
+"RTN","C0CNMED4",195,0)
+ . S @MAP@("MEDFULLFILLMENTINSTRUCTIONS")=""
+"RTN","C0CNMED4",196,0)
+ . S @MAP@("MEDRFNO")=""
+"RTN","C0CNMED4",197,0)
+ . N RESULT S RESULT=$NA(^TMP("C0CCCR",$J,"MAPPED"))
+"RTN","C0CNMED4",198,0)
+ . K @RESULT
+"RTN","C0CNMED4",199,0)
+ . D MAP^C0CXPATH(MINXML,MAP,RESULT)
+"RTN","C0CNMED4",200,0)
+ . ; D PARY^C0CXPATH(RESULT)
+"RTN","C0CNMED4",201,0)
+ . ; MAPPING DIRECTIONS
+"RTN","C0CNMED4",202,0)
+ . N MEDDIR1,DIRXML1 S DIRXML1="MEDDIR1" ; VARIABLE AND NAME VARIABLE TEMPLATE
+"RTN","C0CNMED4",203,0)
+ . N MEDDIR2,DIRXML2 S DIRXML2="MEDDIR2" ; VARIABLE AND NAME VARIABLE RESULT
+"RTN","C0CNMED4",204,0)
+ . D QUERY^C0CXPATH(MINXML,"//Medications/Medication/Directions",DIRXML1)
+"RTN","C0CNMED4",205,0)
+ . D REPLACE^C0CXPATH(RESULT,"","//Medications/Medication/Directions")
+"RTN","C0CNMED4",206,0)
+ . ; N MDZ1,MDZNA
+"RTN","C0CNMED4",207,0)
+ . N DIRCNT S DIRCNT=1 ; THERE ARE ALWAYS DIRECTIONS
+"RTN","C0CNMED4",208,0)
+ . I DIRCNT>0 D  ; IF THERE ARE DIRCTIONS
+"RTN","C0CNMED4",209,0)
+ . . F MDZ1=1:1:DIRCNT  D  ; FOR EACH DIRECTION
+"RTN","C0CNMED4",210,0)
+ . . . S MDZNA=$NA(@MAP@("M","DIRECTIONS",MDZ1))
+"RTN","C0CNMED4",211,0)
+ . . . D MAP^C0CXPATH(DIRXML1,MDZNA,DIRXML2)
+"RTN","C0CNMED4",212,0)
+ . . . D INSERT^C0CXPATH(RESULT,DIRXML2,"//Medications/Medication")
+"RTN","C0CNMED4",213,0)
+ . D:MEDCOUNT=1 CP^C0CXPATH(RESULT,OUTXML) ; First one is a copy
+"RTN","C0CNMED4",214,0)
+ . D:MEDCOUNT>1 INSINNER^C0CXPATH(OUTXML,RESULT) ; AFTER THE FIRST, INSERT INNER XML
+"RTN","C0CNMED4",215,0)
+ N MEDTMP,MEDI
+"RTN","C0CNMED4",216,0)
+ D MISSING^C0CXPATH(OUTXML,"MEDTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CNMED4",217,0)
+ I MEDTMP(0)>0 D  ; IF THERE ARE MISSING VARS - MARKED AS @@X@@
+"RTN","C0CNMED4",218,0)
+ . W "MEDICATION MISSING ",!
+"RTN","C0CNMED4",219,0)
+ . F MEDI=1:1:MEDTMP(0) W MEDTMP(MEDI),!
+"RTN","C0CNMED4",220,0)
+ Q
+"RTN","C0CNMED4",221,0)
+ ;
+"RTN","C0CORSLT")
+0^91^B9647157
+"RTN","C0CORSLT",1,0)
+C0CORSLT ; CCDCCR/GPL - CCR/CCD PROCESSING ADDITIONAL RESULTS ; 06/27/11
+"RTN","C0CORSLT",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CORSLT",3,0)
+ ;Copyright 2011 George Lilly.
+"RTN","C0CORSLT",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CORSLT",5,0)
+ ;See attached copy of the License.
+"RTN","C0CORSLT",6,0)
+ ;
+"RTN","C0CORSLT",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CORSLT",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CORSLT",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CORSLT",10,0)
+ ;(at your option) any later version.
+"RTN","C0CORSLT",11,0)
+ ;
+"RTN","C0CORSLT",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CORSLT",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CORSLT",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CORSLT",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CORSLT",16,0)
+ ;
+"RTN","C0CORSLT",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CORSLT",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CORSLT",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CORSLT",20,0)
+ ;
+"RTN","C0CORSLT",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CORSLT",22,0)
+ Q
+"RTN","C0CORSLT",23,0)
+ ;
+"RTN","C0CORSLT",24,0)
+EN(ZVARS,DFN) ; LOOKS FOR CCR RESULTS THAT ARE NOT LAB RESULTS AND ADDS
+"RTN","C0CORSLT",25,0)
+ ; THEM TO THE LAB VARIABLES ZVARS IS PASSED BY REFERENCE
+"RTN","C0CORSLT",26,0)
+ ; AN EXAMPLE IS EKG RESULTS THAT ARE FOUND IN NOTES AND CONSULTS
+"RTN","C0CORSLT",27,0)
+ ; THIS IS CREATED FOR MU CERTIFICATION BY GPL
+"RTN","C0CORSLT",28,0)
+ D ENTRY^C0CCPT(DFN,,,1) ; RETURNS ALL RESULTS IN VISIT LOCAL VARIABLE
+"RTN","C0CORSLT",29,0)
+ N ZN ; RESULT NUMBER
+"RTN","C0CORSLT",30,0)
+ S ZN=$O(@ZVARS@(""),-1) ; NEXT RESULT
+"RTN","C0CORSLT",31,0)
+ N ZI S ZI=""
+"RTN","C0CORSLT",32,0)
+ F  S ZI=$O(VISIT(ZI)) Q:ZI=""  D  ; FOR EACH VISIT
+"RTN","C0CORSLT",33,0)
+ . I $G(VISIT(ZI,"TEXT",1))["ECG DONE" D  ; GOT AN ECG
+"RTN","C0CORSLT",34,0)
+ . . S ZN=ZN+1 ; INCREMENT RESULT COUNT
+"RTN","C0CORSLT",35,0)
+ . . N ZDATE,ZPRV,ZTXT
+"RTN","C0CORSLT",36,0)
+ . . S ZDATE=$G(VISIT(ZI,"DATE",0)) ; DATE OF PROCEDURE
+"RTN","C0CORSLT",37,0)
+ . . S ZPRV=$P($G(VISIT(ZI,"PRV",2)),"^",1) ;PROVIDER
+"RTN","C0CORSLT",38,0)
+ . . S ZTXT=$P($G(VISIT(ZI,"TEXT",4)),"ECG RESULTS: ",2)
+"RTN","C0CORSLT",39,0)
+ . . S @ZVARS@(ZN,"RESULTASSESSMENTDATETIME")=$$FMDTOUTC^C0CUTIL(ZDATE,"DT")
+"RTN","C0CORSLT",40,0)
+ . . S @ZVARS@(ZN,"RESULTCODE")="34534-8"
+"RTN","C0CORSLT",41,0)
+ . . S @ZVARS@(ZN,"RESULTCODINGSYSTEM")="LOINC"
+"RTN","C0CORSLT",42,0)
+ . . S @ZVARS@(ZN,"RESULTDESCRIPTIONTEXT")="Electrocardiogram LOINC:34534-8"
+"RTN","C0CORSLT",43,0)
+ . . S @ZVARS@(ZN,"RESULTOBJECTID")="RESULT"_ZN
+"RTN","C0CORSLT",44,0)
+ . . S @ZVARS@(ZN,"RESULTSOURCEACTORID")="ACTORPROVIDER_"_ZPRV
+"RTN","C0CORSLT",45,0)
+ . . S @ZVARS@(ZN,"RESULTSTATUS")=""
+"RTN","C0CORSLT",46,0)
+ . . S @ZVARS@(ZN,"M","TEST",0)=1
+"RTN","C0CORSLT",47,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTCODEVALUE")="34534-8"
+"RTN","C0CORSLT",48,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTCODINGSYSTEM")="LOINC"
+"RTN","C0CORSLT",49,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTDATETIME")=$$FMDTOUTC^C0CUTIL(ZDATE,"DT")
+"RTN","C0CORSLT",50,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTDESCRIPTIONTEXT")="Electrocardiogram LOINC:34534-8"
+"RTN","C0CORSLT",51,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTFLAG")=""
+"RTN","C0CORSLT",52,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTNORMALDESCTEXT")=""
+"RTN","C0CORSLT",53,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTNORMALSOURCEACTORID")="ACTORORGANIZATION_VASTANUM"
+"RTN","C0CORSLT",54,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTOBJECTID")="RESULTTEST_ECG_"_ZN
+"RTN","C0CORSLT",55,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTSOURCEACTORID")="ACTORPROVIDER"_ZPRV
+"RTN","C0CORSLT",56,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTSTATUSTEXT")="F"
+"RTN","C0CORSLT",57,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTUNITS")=""
+"RTN","C0CORSLT",58,0)
+ . . S @ZVARS@(ZN,"M","TEST",1,"RESULTTESTVALUE")=ZTXT
+"RTN","C0CORSLT",59,0)
+ . . S @ZVARS@(0)=ZN ; UPDATE RESULTS COUNT
+"RTN","C0CORSLT",60,0)
+ Q
+"RTN","C0CORSLT",61,0)
+ ;
+"RTN","C0CORSLT",62,0)
+OLD ; OLD CODE FOR OTHER WAYS OF DOING THE ECG
+"RTN","C0CORSLT",63,0)
+ ; FOR CERTIFICATION - SAVE EKG RESULTS gpl
+"RTN","C0CORSLT",64,0)
+ W !,"CPT=",ZCPT
+"RTN","C0CORSLT",65,0)
+ I ZCPT["93000" D  ; THIS IS AN EKG
+"RTN","C0CORSLT",66,0)
+ . D RNF1TO2^C0CRNF(C0CPRSLT,"ZRNF") ; SAVE FOR LABS
+"RTN","C0CORSLT",67,0)
+ . M ^GPL("RNF2")=@C0CPRSLT
+"RTN","C0CORSLT",68,0)
+ Q
+"RTN","C0CORSLT",69,0)
+ ;
+"RTN","C0CPARMS")
+0^29^B9463714
+"RTN","C0CPARMS",1,0)
+C0CPARMS ; CCDCCR/GPL - CCR/CCD PARAMETER PROCESSING ; 1/29/09
+"RTN","C0CPARMS",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CPARMS",3,0)
+ ;Copyright 2008 WorldVistA.  Licensed under the terms of the GNU
+"RTN","C0CPARMS",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CPARMS",5,0)
+ ;
+"RTN","C0CPARMS",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CPARMS",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CPARMS",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CPARMS",9,0)
+ ;(at your option) any later version.
+"RTN","C0CPARMS",10,0)
+ ;
+"RTN","C0CPARMS",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CPARMS",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CPARMS",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CPARMS",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CPARMS",15,0)
+ ;
+"RTN","C0CPARMS",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CPARMS",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CPARMS",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CPARMS",19,0)
+ ;
+"RTN","C0CPARMS",20,0)
+SET(INPARMS) ;INITIALIZE RUNTIME PARMS USING INPARMS TO OVERRIDE DEFAULTS
+"RTN","C0CPARMS",21,0)
+ ; PARAMETERS ARE PASSED AS A STRING: "PARM1:VALUE1^PARM2:VALUE2^ETC"
+"RTN","C0CPARMS",22,0)
+ ; THE SAME FORMAT IS USED BY RPC AND COMMAND LINE ENTRY POINTS
+"RTN","C0CPARMS",23,0)
+ ;
+"RTN","C0CPARMS",24,0)
+ N PTMP ;
+"RTN","C0CPARMS",25,0)
+ S C0CPARMS=$NA(^TMP("C0CPARMS",$J)) ;BASE FOR THIS RUN
+"RTN","C0CPARMS",26,0)
+ K @C0CPARMS ;START WITH EMPTY PARMS; MAY NOT WANT TO DO THIS KILL
+"RTN","C0CPARMS",27,0)
+ I $G(INPARMS)'="" D  ; OVERRIDES PROVIDED
+"RTN","C0CPARMS",28,0)
+ . N C0CI S C0CI=""
+"RTN","C0CPARMS",29,0)
+ . N C0CN S C0CN=1
+"RTN","C0CPARMS",30,0)
+ . F  S C0CI=$P(INPARMS,"^",C0CN) Q:C0CI=""  D  ;
+"RTN","C0CPARMS",31,0)
+ . . S C0CN=C0CN+1 ;NEXT PARM
+"RTN","C0CPARMS",32,0)
+ . . N C1,C2
+"RTN","C0CPARMS",33,0)
+ . . S C1=$P(C0CI,":",1) ; PARAMETER
+"RTN","C0CPARMS",34,0)
+ . . S C2=$P(C0CI,":",2) ; VALUE
+"RTN","C0CPARMS",35,0)
+ . . I C2="" S C2=1
+"RTN","C0CPARMS",36,0)
+ . . S @C0CPARMS@(C1)=C2
+"RTN","C0CPARMS",37,0)
+ . I C0CN=1 S @C0CPARMS@($P(INPARMS,":",1))=$P(C0CI,":",2) ; ONLY ONE
+"RTN","C0CPARMS",38,0)
+ ; THIS IS WHERE WE WILL INSERT CALLS TO THE PARAMETER FILE FOR DEFAULTS
+"RTN","C0CPARMS",39,0)
+ ; IF THEY FAIL, THE FOLLOWING WILL BE HARDCODED DEFAULTS
+"RTN","C0CPARMS",40,0)
+ ;OHUM/RUT commented the hardcoded limits
+"RTN","C0CPARMS",41,0)
+ ;I '$D(@C0CPARMS@("LABLIMIT")) S @C0CPARMS@("LABLIMIT")="T-360" ;ONE YR WORTH
+"RTN","C0CPARMS",42,0)
+ ;I '$D(@C0CPARMS@("LABSTART")) S @C0CPARMS@("LABSTART")="T" ;TODAY
+"RTN","C0CPARMS",43,0)
+ ;I '$D(@C0CPARMS@("VITLIMIT")) S @C0CPARMS@("VITLIMIT")="T-360" ;ONE YR VITALS
+"RTN","C0CPARMS",44,0)
+ ;I '$D(@C0CPARMS@("VITSTART")) S @C0CPARMS@("VITSTART")="T" ;TODAY
+"RTN","C0CPARMS",45,0)
+ ;I '$D(@C0CPARMS@("MEDSTART")) S @C0CPARMS@("MEDSTART")="T" ; TODAY
+"RTN","C0CPARMS",46,0)
+ ;I '$D(@C0CPARMS@("MEDSLIMIT")) S @C0CPARMS@("MEDLIMIT")="T-360" ; ONE YR MEDS
+"RTN","C0CPARMS",47,0)
+ ;I '$D(@C0CPARMS@("MEDACTIVE")) S @C0CPARMS@("MEDACTIVE")=1 ; YES
+"RTN","C0CPARMS",48,0)
+ ;I '$D(@C0CPARMS@("MEDPENDING")) S @C0CPARMS@("MEDPENDING")=0 ; NO
+"RTN","C0CPARMS",49,0)
+ ;I '$D(@C0CPARMS@("MEDALL")) S @C0CPARMS@("MEDALL")=0 ; NON-PENDING NON-ACTIVE
+"RTN","C0CPARMS",50,0)
+ ;OHUM/RUT 3120109 ; commented all limits
+"RTN","C0CPARMS",51,0)
+ ;S @C0CPARMS@("LABLIMIT")=^TMP("C0CCCR","LABLIMIT"),@C0CPARMS@("VITLIMIT")=^TMP("C0CCCR","VITLIMIT"),@C0CPARMS@("TIULIMIT")=^TMP("C0CCCR","TIULIMIT"),@C0CPARMS@("MEDLIMIT")=^TMP("C0CCCR","MEDLIMIT")
+"RTN","C0CPARMS",52,0)
+ ;I '$D(@C0CPARMS@("LABSTART")) S @C0CPARMS@("LABSTART")="T" ;TODAY
+"RTN","C0CPARMS",53,0)
+ ;I '$D(@C0CPARMS@("VITSTART")) S @C0CPARMS@("VITSTART")="T" ;TODAY
+"RTN","C0CPARMS",54,0)
+ ;I '$D(@C0CPARMS@("MEDSTART")) S @C0CPARMS@("MEDSTART")="T" ; TODAY
+"RTN","C0CPARMS",55,0)
+ ;I '$D(@C0CPARMS@("MEDACTIVE")) S @C0CPARMS@("MEDACTIVE")=1 ; YES
+"RTN","C0CPARMS",56,0)
+ ;I '$D(@C0CPARMS@("MEDPENDING")) S @C0CPARMS@("MEDPENDING")=0 ; NO
+"RTN","C0CPARMS",57,0)
+ ;I '$D(@C0CPARMS@("MEDALL")) S @C0CPARMS@("MEDALL")=1 ; NON-PENDING NON-ACTIVE
+"RTN","C0CPARMS",58,0)
+ ;;I '$D(@C0CPARMS@("RALIMIT")) S @C0CPARMS@("RALIMIT")="T-36500" ;ONE YR WORTH
+"RTN","C0CPARMS",59,0)
+ ;;I '$D(@C0CPARMS@("RASTART")) S @C0CPARMS@("RASTART")="T" ;TODAY
+"RTN","C0CPARMS",60,0)
+ ;I '$D(@C0CPARMS@("TIUSTART")) S @C0CPARMS@("TIUSTART")="T" ;TODAY
+"RTN","C0CPARMS",61,0)
+ ;;OHUM/RUT
+"RTN","C0CPARMS",62,0)
+ S @C0CPARMS@("LABLIMIT")=$P(^C0CPARM(1,0),"^",2),@C0CPARMS@("LABSTART")=$P(^C0CPARM(1,0),"^",3),@C0CPARMS@("VITLIMIT")=$P(^C0CPARM(1,0),"^",4),@C0CPARMS@("VITSTART")=$P(^C0CPARM(1,1),"^",1),@C0CPARMS@("MEDLIMIT")=$P(^C0CPARM(1,1),"^",2),@C0CPARMS@("MEDSTART")=$P(^C0CPARM(1,1),"^",3)
+"RTN","C0CPARMS",63,0)
+ I $P(^C0CPARM(1,1),"^",4)="ACT" S @C0CPARMS@("MEDACTIVE")=1
+"RTN","C0CPARMS",64,0)
+ I $P(^C0CPARM(1,1),"^",4)="PEN" S @C0CPARMS@("MEDPENDING")=1
+"RTN","C0CPARMS",65,0)
+ I $P(^C0CPARM(1,1),"^",4)="ALL" S @C0CPARMS@("MEDALL")=1
+"RTN","C0CPARMS",66,0)
+ ;S ^TMP("C0CCCR","TIULIMIT")="",^TMP("C0CCCR","TIUSTART")=""
+"RTN","C0CPARMS",67,0)
+ I $P(^C0CPARM(1,2),"^",3)=1 S @C0CPARMS@("TIULIMIT")=$P(^C0CPARM(1,2),"^",1),@C0CPARMS@("TIUSTART")=$P(^C0CPARM(1,2),"^",2)
+"RTN","C0CPARMS",68,0)
+ ;OHUM/RUT
+"RTN","C0CPARMS",69,0)
+ Q
+"RTN","C0CPARMS",70,0)
+ ;
+"RTN","C0CPARMS",71,0)
+CHECK ; CHECK TO SEE IF PARMS ARE PRESENT, ELSE RUN SET
+"RTN","C0CPARMS",72,0)
+ ;
+"RTN","C0CPARMS",73,0)
+ I '$D(C0CPARMS) S C0CPARMS=$NA(^TMP("C0CPARMS",$J)) ;SHOULDN'T HAPPEN
+"RTN","C0CPARMS",74,0)
+ I '$D(@C0CPARMS) D SET("SETWITHCHECK:1")
+"RTN","C0CPARMS",75,0)
+ Q
+"RTN","C0CPARMS",76,0)
+ ;
+"RTN","C0CPARMS",77,0)
+GET(WHICHP) ;EXTRINSIC TO RETURN THE VALUE OF PARAMETER WHICHP
+"RTN","C0CPARMS",78,0)
+ ;
+"RTN","C0CPARMS",79,0)
+ D CHECK ; SHOULDN'T HAPPEN BUT TO BE SAFE
+"RTN","C0CPARMS",80,0)
+ N GTMP
+"RTN","C0CPARMS",81,0)
+ Q $G(@C0CPARMS@(WHICHP)) ;PULL THE PARM FROM THE TABLE
+"RTN","C0CPARMS",82,0)
+ ;
+"RTN","C0CPROBS")
+0^39^B53281308
+"RTN","C0CPROBS",1,0)
+C0CPROBS ; CCDCCR/GPL/CJE - CCR/CCD PROCESSING FOR PROBLEMS ; 6/6/08
+"RTN","C0CPROBS",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CPROBS",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota.
+"RTN","C0CPROBS",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CPROBS",5,0)
+ ;See attached copy of the License.
+"RTN","C0CPROBS",6,0)
+ ;
+"RTN","C0CPROBS",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CPROBS",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CPROBS",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CPROBS",10,0)
+ ;(at your option) any later version.
+"RTN","C0CPROBS",11,0)
+ ;
+"RTN","C0CPROBS",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CPROBS",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CPROBS",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CPROBS",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CPROBS",16,0)
+ ;
+"RTN","C0CPROBS",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CPROBS",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CPROBS",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CPROBS",20,0)
+ ;
+"RTN","C0CPROBS",21,0)
+ ;
+"RTN","C0CPROBS",22,0)
+ ; PROCESS THE PROBLEMS SECTION OF THE CCR
+"RTN","C0CPROBS",23,0)
+ ;
+"RTN","C0CPROBS",24,0)
+EXTRACT(IPXML,DFN,OUTXML) ; EXTRACT PROBLEMS INTO PROVIDED XML TEMPLATE
+"RTN","C0CPROBS",25,0)
+ ;
+"RTN","C0CPROBS",26,0)
+ ; INXML AND OUTXML ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CPROBS",27,0)
+ ; INXML WILL CONTAIN ONLY THE PROBLEM SECTION OF THE OVERALL TEMPLATE
+"RTN","C0CPROBS",28,0)
+ ; ONLY THE XML FOR ONE PROBLEM WILL BE PASSED. THIS ROUTINE WILL MAKE
+"RTN","C0CPROBS",29,0)
+ ; COPIES AS NECESSARY TO REPRESENT MULTIPLE PROBLEMS
+"RTN","C0CPROBS",30,0)
+ ; INSERT^C0CXPATH IS USED TO APPEND THE PROBLEMS TO THE OUTPUT
+"RTN","C0CPROBS",31,0)
+ ;
+"RTN","C0CPROBS",32,0)
+ N RPCRSLT,J,K,PTMP,X,VMAP,TBU
+"RTN","C0CPROBS",33,0)
+ S TVMAP=$NA(^TMP("C0CCCR",$J,"PROBVALS"))
+"RTN","C0CPROBS",34,0)
+ S TARYTMP=$NA(^TMP("C0CCCR",$J,"PROBARYTMP"))
+"RTN","C0CPROBS",35,0)
+ K @TVMAP,@TARYTMP ; KILL OLD ARRAY VALUES
+"RTN","C0CPROBS",36,0)
+ I $$RPMS^C0CUTIL() D RPMS ; IF BGOPRB ROUTINE IS MISSING (IE RPMS)
+"RTN","C0CPROBS",37,0)
+ I ($$VISTA^C0CUTIL())!($$WV^C0CUTIL())!($$OV^C0CUTIL()) D VISTA QUIT
+"RTN","C0CPROBS",38,0)
+ Q
+"RTN","C0CPROBS",39,0)
+ ;
+"RTN","C0CPROBS",40,0)
+RPMS ; GETS THE PROBLEM LIST FOR RPMS
+"RTN","C0CPROBS",41,0)
+ S RPCGLO=$NA(^TMP("BGO",$J))
+"RTN","C0CPROBS",42,0)
+ D GET^BGOPROB(.RPCRSLT,DFN) ; CALL THE PROBLEM LIST RPC
+"RTN","C0CPROBS",43,0)
+ ; FORMAT OF RPC:
+"RTN","C0CPROBS",44,0)
+ ;   Number Code [1] ^ Patient IEN [2] ^ ICD Code [3] ^ Modify Date [4] ^ Class [5] ^ Provider Narrative [6] ^
+"RTN","C0CPROBS",45,0)
+ ;   Date Entered [7] ^ Status [8] ^ Date Onset [9] ^ Problem IEN [10] ^ Notes [11] ^ ICD9 IEN [12] ^
+"RTN","C0CPROBS",46,0)
+ ;   ICD9 Short Name [13] ^ Provider [14] ^ Facility IEN [15] ^ Priority [16]
+"RTN","C0CPROBS",47,0)
+ I '$D(@RPCGLO) W "NULL RESULT FROM GET^BGOPROB ",! S @OUTXML@(0)=0 Q
+"RTN","C0CPROBS",48,0)
+ S J=""
+"RTN","C0CPROBS",49,0)
+ F  S J=$O(@RPCGLO@(J)) Q:J=""  D  ; FOR EACH PROBLEM IN THE LIST
+"RTN","C0CPROBS",50,0)
+ . S VMAP=$NA(@TVMAP@(J))
+"RTN","C0CPROBS",51,0)
+ . K @VMAP
+"RTN","C0CPROBS",52,0)
+ . I DEBUG W "VMAP= ",VMAP,!
+"RTN","C0CPROBS",53,0)
+ . S PTMP=@RPCRSLT@(J) ; PULL OUT PROBLEM FROM RPC RETURN ARRAY
+"RTN","C0CPROBS",54,0)
+ . N C0CG1,C0CT ; ARRAY FOR VALUES FROM GLOBAL
+"RTN","C0CPROBS",55,0)
+ . D GETN1^C0CRNF("C0CG1",9000011,$P(PTMP,U,10),"") ;GET VALUES BY NAME
+"RTN","C0CPROBS",56,0)
+ . S @VMAP@("PROBLEMOBJECTID")="PROBLEM"_J ; UNIQUE OBJID FOR PROBLEM
+"RTN","C0CPROBS",57,0)
+ . S @VMAP@("PROBLEMIEN")=$P(PTMP,U,10)
+"RTN","C0CPROBS",58,0)
+ . S @VMAP@("PROBLEMSTATUS")=$S($P(PTMP,U,8)="A":"Active",$P(PTMP,U,8)="I":"Inactive",1:"")
+"RTN","C0CPROBS",59,0)
+ . S @VMAP@("PROBLEMDESCRIPTION")=$P(PTMP,U,6)
+"RTN","C0CPROBS",60,0)
+ . S @VMAP@("PROBLEMCODINGVERSION")=""
+"RTN","C0CPROBS",61,0)
+ . S @VMAP@("PROBLEMCODEVALUE")=$P(PTMP,U,3)
+"RTN","C0CPROBS",62,0)
+ . ; FOR CERTIFICATION - GPL
+"RTN","C0CPROBS",63,0)
+ . I @VMAP@("PROBLEMCODEVALUE")=493.90 S @VMAP@("PROBLEMCODEVALUE")=493
+"RTN","C0CPROBS",64,0)
+ . S @VMAP@("PROBLEMDATEOFONSET")=$$FMDTOUTC^C0CUTIL($$ZVALUEI^C0CRNF("DATE OF ONSET","C0CG1"),"DT")
+"RTN","C0CPROBS",65,0)
+ . S @VMAP@("PROBLEMDATEMOD")=$$FMDTOUTC^C0CUTIL($$ZVALUEI^C0CRNF("DATE LAST MODIFIED","C0CG1"),"DT")
+"RTN","C0CPROBS",66,0)
+ . ;S @VMAP@("PROBLEMSC")=$P(PTMP,U,7) ;UNKNOWN NOT MAPPED IN C0CCCR0
+"RTN","C0CPROBS",67,0)
+ . ;S @VMAP@("PROBLEMSE")=$P(PTMP,U,8) ;UNKNOWN NOT MAPPED IN C0CCCR0
+"RTN","C0CPROBS",68,0)
+ . ;S @VMAP@("PROBLEMCONDITION")=$P(PTMP,U,9) ;NOT MAPPED IN C0CCCR0
+"RTN","C0CPROBS",69,0)
+ . ;S @VMAP@("PROBLEMLOC")=$P(PTMP,U,10) ;NOT MAPPED IN C0CCCR0
+"RTN","C0CPROBS",70,0)
+ . ;S @VMAP@("PROBLEMLOCTYPE")=$P(PTMP,U,11) ;NOT MAPPED IN C0CCCR0
+"RTN","C0CPROBS",71,0)
+ . ;S @VMAP@("PROBLEMPROVIDER")=$P(PTMP,U,12) ;NOT MAPPED IN C0CCCR0
+"RTN","C0CPROBS",72,0)
+ . ;S X=@VMAP@("PROBLEMPROVIDER") ; FORMAT Y;NAME Y IS IEN OF PROVIDER
+"RTN","C0CPROBS",73,0)
+ . S @VMAP@("PROBLEMSOURCEACTORID")="ACTORPROVIDER_"_$$ZVALUEI^C0CRNF("RECORDING PROVIDER","C0CG1")
+"RTN","C0CPROBS",74,0)
+ . ;S @VMAP@("PROBLEMSERVICE")=$P(PTMP,U,13) ;NOT MAPPED IN C0CCCR0
+"RTN","C0CPROBS",75,0)
+ . ;S @VMAP@("PROBLEMHASCMT")=$P(PTMP,U,14) ;NOT MAPPED IN C0CCCR0
+"RTN","C0CPROBS",76,0)
+ . ;S @VMAP@("PROBLEMDTREC")=$$FMDTOUTC^C0CUTIL($P(PTMP,U,15),"DT") ;NOT MAPPED IN C0CCCR0
+"RTN","C0CPROBS",77,0)
+ . ;S @VMAP@("PROBLEMINACT")=$$FMDTOUTC^C0CUTIL($P(PTMP,U,16),"DT") ;NOT MAPPED IN C0CCCR0
+"RTN","C0CPROBS",78,0)
+ . S ARYTMP=$NA(@TARYTMP@(J))
+"RTN","C0CPROBS",79,0)
+ . ; W "ARYTMP= ",ARYTMP,!
+"RTN","C0CPROBS",80,0)
+ . K @ARYTMP
+"RTN","C0CPROBS",81,0)
+ . D MAP^C0CXPATH(IPXML,VMAP,ARYTMP) ;
+"RTN","C0CPROBS",82,0)
+ . I J=1 D  ; FIRST ONE IS JUST A COPY
+"RTN","C0CPROBS",83,0)
+ . . ; W "FIRST ONE",!
+"RTN","C0CPROBS",84,0)
+ . . D CP^C0CXPATH(ARYTMP,OUTXML)
+"RTN","C0CPROBS",85,0)
+ . . ; W "OUTXML ",OUTXML,!
+"RTN","C0CPROBS",86,0)
+ . I J>1 D  ; AFTER THE FIRST, INSERT INNER XML
+"RTN","C0CPROBS",87,0)
+ . . D INSINNER^C0CXPATH(OUTXML,ARYTMP)
+"RTN","C0CPROBS",88,0)
+ ; ZWR ^TMP("C0CCCR",$J,"PROBVALS",*)
+"RTN","C0CPROBS",89,0)
+ ; ZWR ^TMP("C0CCCR",$J,"PROBARYTMP",*) ; SHOW THE RESULTS
+"RTN","C0CPROBS",90,0)
+ ; ZWR @OUTXML
+"RTN","C0CPROBS",91,0)
+ ; $$HTML^DILF(
+"RTN","C0CPROBS",92,0)
+ ; GENERATE THE NARITIVE HTML FOR THE CCD
+"RTN","C0CPROBS",93,0)
+ I CCD D CCD ; IF THIS IS FOR A CCD
+"RTN","C0CPROBS",94,0)
+ D MISSINGVARS
+"RTN","C0CPROBS",95,0)
+ Q
+"RTN","C0CPROBS",96,0)
+ ;
+"RTN","C0CPROBS",97,0)
+VISTA ; GETS THE PROBLEM LIST FOR VISTA
+"RTN","C0CPROBS",98,0)
+ D LIST^ORQQPL3(.RPCRSLT,DFN,"") ; CALL THE PROBLEM LIST RPC
+"RTN","C0CPROBS",99,0)
+ I '$D(RPCRSLT(1)) D  Q  ; RPC RETURNS NULL
+"RTN","C0CPROBS",100,0)
+ . W "NULL RESULT FROM LIST^ORQQPL3 ",!
+"RTN","C0CPROBS",101,0)
+ . S @OUTXML@(0)=0
+"RTN","C0CPROBS",102,0)
+ . ; Q
+"RTN","C0CPROBS",103,0)
+ ; I DEBUG ZWR RPCRSLT
+"RTN","C0CPROBS",104,0)
+ S @TVMAP@(0)=RPCRSLT(0) ; SAVE NUMBER OF PROBLEMS
+"RTN","C0CPROBS",105,0)
+ F J=1:1:RPCRSLT(0)  D  ; FOR EACH PROBLEM IN THE LIST
+"RTN","C0CPROBS",106,0)
+ . S VMAP=$NA(@TVMAP@(J))
+"RTN","C0CPROBS",107,0)
+ . K @VMAP
+"RTN","C0CPROBS",108,0)
+ . I DEBUG W "VMAP= ",VMAP,!
+"RTN","C0CPROBS",109,0)
+ . S PTMP=RPCRSLT(J) ; PULL OUT PROBLEM FROM RPC RETURN ARRAY
+"RTN","C0CPROBS",110,0)
+ . S @VMAP@("PROBLEMOBJECTID")="PROBLEM"_J ; UNIQUE OBJID FOR PROBLEM
+"RTN","C0CPROBS",111,0)
+ . S @VMAP@("PROBLEMIEN")=$P(PTMP,U,1)
+"RTN","C0CPROBS",112,0)
+ . S @VMAP@("PROBLEMSTATUS")=$S($P(PTMP,U,2)="A":"Active",$P(PTMP,U,2)="I":"Inactive",1:"")
+"RTN","C0CPROBS",113,0)
+ . N ZPRIOR S ZPRIOR=$P(PTMP,U,14) ;PRIORITY FLAG
+"RTN","C0CPROBS",114,0)
+ . ; turn off acute/chronic for certification gpl
+"RTN","C0CPROBS",115,0)
+ . ;S @VMAP@("PROBLEMSTATUS")=@VMAP@("PROBLEMSTATUS")_$S(ZPRIOR="A":"/Acute",ZPRIOR="C":"/Chronic",1:"") ; append Chronic and Accute to Status
+"RTN","C0CPROBS",116,0)
+ . S @VMAP@("PROBLEMDESCRIPTION")=$P(PTMP,U,3)
+"RTN","C0CPROBS",117,0)
+ . S @VMAP@("PROBLEMCODINGVERSION")=""
+"RTN","C0CPROBS",118,0)
+ . S @VMAP@("PROBLEMCODEVALUE")=$P(PTMP,U,4)
+"RTN","C0CPROBS",119,0)
+ . ; FOR CERTIFICATION - GPL
+"RTN","C0CPROBS",120,0)
+ . I @VMAP@("PROBLEMCODEVALUE")["493.90" S @VMAP@("PROBLEMCODEVALUE")=493
+"RTN","C0CPROBS",121,0)
+ . S @VMAP@("PROBLEMDATEOFONSET")=$$FMDTOUTC^C0CUTIL($P(PTMP,U,5),"DT")
+"RTN","C0CPROBS",122,0)
+ . S @VMAP@("PROBLEMDATEMOD")=$$FMDTOUTC^C0CUTIL($P(PTMP,U,6),"DT")
+"RTN","C0CPROBS",123,0)
+ . S @VMAP@("PROBLEMSC")=$P(PTMP,U,7)
+"RTN","C0CPROBS",124,0)
+ . S @VMAP@("PROBLEMSE")=$P(PTMP,U,8)
+"RTN","C0CPROBS",125,0)
+ . S @VMAP@("PROBLEMCONDITION")=$P(PTMP,U,9)
+"RTN","C0CPROBS",126,0)
+ . S @VMAP@("PROBLEMLOC")=$P(PTMP,U,10)
+"RTN","C0CPROBS",127,0)
+ . S @VMAP@("PROBLEMLOCTYPE")=$P(PTMP,U,11)
+"RTN","C0CPROBS",128,0)
+ . S @VMAP@("PROBLEMPROVIDER")=$P(PTMP,U,12)
+"RTN","C0CPROBS",129,0)
+ . S X=@VMAP@("PROBLEMPROVIDER") ; FORMAT Y;NAME Y IS IEN OF PROVIDER
+"RTN","C0CPROBS",130,0)
+ . S @VMAP@("PROBLEMSOURCEACTORID")="ACTORPROVIDER_"_$P(X,";",1)
+"RTN","C0CPROBS",131,0)
+ . S @VMAP@("PROBLEMSERVICE")=$P(PTMP,U,13)
+"RTN","C0CPROBS",132,0)
+ . S @VMAP@("PROBLEMHASCMT")=$P(PTMP,U,14)
+"RTN","C0CPROBS",133,0)
+ . S @VMAP@("PROBLEMDTREC")=$$FMDTOUTC^C0CUTIL($P(PTMP,U,15),"DT")
+"RTN","C0CPROBS",134,0)
+ . S @VMAP@("PROBLEMINACT")=$$FMDTOUTC^C0CUTIL($P(PTMP,U,16),"DT")
+"RTN","C0CPROBS",135,0)
+ . S ARYTMP=$NA(@TARYTMP@(J))
+"RTN","C0CPROBS",136,0)
+ . ; W "ARYTMP= ",ARYTMP,!
+"RTN","C0CPROBS",137,0)
+ . K @ARYTMP
+"RTN","C0CPROBS",138,0)
+ . D MAP^C0CXPATH(IPXML,VMAP,ARYTMP) ;
+"RTN","C0CPROBS",139,0)
+ . I J=1 D  ; FIRST ONE IS JUST A COPY
+"RTN","C0CPROBS",140,0)
+ . . ; W "FIRST ONE",!
+"RTN","C0CPROBS",141,0)
+ . . D CP^C0CXPATH(ARYTMP,OUTXML)
+"RTN","C0CPROBS",142,0)
+ . . ; W "OUTXML ",OUTXML,!
+"RTN","C0CPROBS",143,0)
+ . I J>1 D  ; AFTER THE FIRST, INSERT INNER XML
+"RTN","C0CPROBS",144,0)
+ . . D INSINNER^C0CXPATH(OUTXML,ARYTMP)
+"RTN","C0CPROBS",145,0)
+ ; ZWR ^TMP("C0CCCR",$J,"PROBVALS",*)
+"RTN","C0CPROBS",146,0)
+ ; ZWR ^TMP("C0CCCR",$J,"PROBARYTMP",*) ; SHOW THE RESULTS
+"RTN","C0CPROBS",147,0)
+ ; ZWR @OUTXML
+"RTN","C0CPROBS",148,0)
+ ; $$HTML^DILF(
+"RTN","C0CPROBS",149,0)
+ ; GENERATE THE NARITIVE HTML FOR THE CCD
+"RTN","C0CPROBS",150,0)
+ I CCD D CCD ; IF THIS IS FOR A CCD
+"RTN","C0CPROBS",151,0)
+ D MISSINGVARS
+"RTN","C0CPROBS",152,0)
+ Q
+"RTN","C0CPROBS",153,0)
+CCD 
+"RTN","C0CPROBS",154,0)
+ N HTMP,HOUT,HTMLO,C0CPROBI,ZX
+"RTN","C0CPROBS",155,0)
+ F C0CPROBI=1:1:RPCRSLT(0) D  ; FOR EACH PROBLEM
+"RTN","C0CPROBS",156,0)
+ . S VMAP=$NA(@TVMAP@(C0CPROBI))
+"RTN","C0CPROBS",157,0)
+ . I DEBUG W "VMAP =",VMAP,!
+"RTN","C0CPROBS",158,0)
+ . D QUERY^C0CXPATH(TGLOBAL,"//ContinuityOfCareRecord/Body/PROBLEMS-HTML","HTMP") ; GET THE HTML FROM THE TEMPLATE
+"RTN","C0CPROBS",159,0)
+ . D UNMARK^C0CXPATH("HTMP") ; REMOVE <PROBLEMS-HTML> MARKUP
+"RTN","C0CPROBS",160,0)
+ . ; D PARY^C0CXPATH("HTMP") ; PRINT IT
+"RTN","C0CPROBS",161,0)
+ . D MAP^C0CXPATH("HTMP",VMAP,"HOUT") ; MAP THE VARIABLES
+"RTN","C0CPROBS",162,0)
+ . ; D PARY^C0CXPATH("HOUT") ; PRINT IT AGAIN
+"RTN","C0CPROBS",163,0)
+ . I C0CPROBI=1 D  ; FIRST ONE IS JUST A COPY
+"RTN","C0CPROBS",164,0)
+ . . D CP^C0CXPATH("HOUT","HTMLO")
+"RTN","C0CPROBS",165,0)
+ . I C0CPROBI>1 D  ; AFTER THE FIRST, INSERT INNER HTML
+"RTN","C0CPROBS",166,0)
+ . . I DEBUG W "DOING INNER",!
+"RTN","C0CPROBS",167,0)
+ . . N HTMLBLD,HTMLTMP
+"RTN","C0CPROBS",168,0)
+ . . D QUEUE^C0CXPATH("HTMLBLD","HTMLO",1,HTMLO(0)-1)
+"RTN","C0CPROBS",169,0)
+ . . D QUEUE^C0CXPATH("HTMLBLD","HOUT",2,HOUT(0)-1)
+"RTN","C0CPROBS",170,0)
+ . . D QUEUE^C0CXPATH("HTMLBLD","HTMLO",HTMLO(0),HTMLO(0))
+"RTN","C0CPROBS",171,0)
+ . . D BUILD^C0CXPATH("HTMLBLD","HTMLTMP")
+"RTN","C0CPROBS",172,0)
+ . . D CP^C0CXPATH("HTMLTMP","HTMLO")
+"RTN","C0CPROBS",173,0)
+ . . ; D INSINNER^C0CXPATH("HOUT","HTMLO","//")
+"RTN","C0CPROBS",174,0)
+ I DEBUG D PARY^C0CXPATH("HTMLO")
+"RTN","C0CPROBS",175,0)
+ D INSB4^C0CXPATH(OUTXML,"HTMLO") ; INSERT AT TOP OF SECTION
+"RTN","C0CPROBS",176,0)
+ Q
+"RTN","C0CPROBS",177,0)
+MISSINGVARS 
+"RTN","C0CPROBS",178,0)
+ N PROBSTMP,I
+"RTN","C0CPROBS",179,0)
+ D MISSING^C0CXPATH(ARYTMP,"PROBSTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CPROBS",180,0)
+ I PROBSTMP(0)>0  D  ; IF THERE ARE MISSING VARS -
+"RTN","C0CPROBS",181,0)
+ . ; STRINGS MARKED AS @@X@@
+"RTN","C0CPROBS",182,0)
+ . W !,"PROBLEMS Missing list: ",!
+"RTN","C0CPROBS",183,0)
+ . F I=1:1:PROBSTMP(0) W PROBSTMP(I),!
+"RTN","C0CPROBS",184,0)
+ Q
+"RTN","C0CPROBS",185,0)
+ ;
+"RTN","C0CPROC")
+0^63^B27869918
+"RTN","C0CPROC",1,0)
+C0CPROC  ; CCDCCR/GPL - CCR/CCD PROCESSING FOR PROCEDURES ; 01/21/10
+"RTN","C0CPROC",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CPROC",3,0)
+ ;Copyright 2010 George Lilly, University of Minnesota and others.
+"RTN","C0CPROC",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CPROC",5,0)
+ ;See attached copy of the License.
+"RTN","C0CPROC",6,0)
+ ;
+"RTN","C0CPROC",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CPROC",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CPROC",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CPROC",10,0)
+ ;(at your option) any later version.
+"RTN","C0CPROC",11,0)
+ ;
+"RTN","C0CPROC",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CPROC",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CPROC",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CPROC",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CPROC",16,0)
+ ;
+"RTN","C0CPROC",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CPROC",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CPROC",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CPROC",20,0)
+ ;
+"RTN","C0CPROC",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CPROC",22,0)
+ Q
+"RTN","C0CPROC",23,0)
+ ;
+"RTN","C0CPROC",24,0)
+SETVARS ; SET UP VARIABLES FOR PROCEDURES, ENCOUNTERS, AND NOTES
+"RTN","C0CPROC",25,0)
+ S C0CENC=$NA(^TMP("C0CCCR",$J,"C0CENC",DFN))
+"RTN","C0CPROC",26,0)
+ S C0CPRC=$NA(^TMP("C0CCCR",$J,"C0CPRC",DFN))
+"RTN","C0CPROC",27,0)
+ S C0CNTE=$NA(^TMP("C0CCCR",$J,"C0CNTE",DFN))
+"RTN","C0CPROC",28,0)
+ ; ADDITION FOR CERTIFICATION
+"RTN","C0CPROC",29,0)
+ S C0CPRSLT=$NA(^TMP("C0CCCR",$J,"C0CPRSLT",DFN))
+"RTN","C0CPROC",30,0)
+ Q
+"RTN","C0CPROC",31,0)
+ ;
+"RTN","C0CPROC",32,0)
+EXTRACT(PROCXML,DFN,PROCOUT) ; EXTRACT PROCEDURES INTO  XML TEMPLATE
+"RTN","C0CPROC",33,0)
+ ; PROCXML AND PROCOUT ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CPROC",34,0)
+ ;
+"RTN","C0CPROC",35,0)
+ D SETVARS ; SET UP VARIABLES
+"RTN","C0CPROC",36,0)
+ I '$D(@C0CPRC) D TIUGET(DFN,C0CENC,C0CPRC,C0CNTE) ; GET VARS IF NOT THERE
+"RTN","C0CPROC",37,0)
+ D MAP(PROCXML,C0CPRC,PROCOUT) ;MAP RESULTS FOR PROCEDURES
+"RTN","C0CPROC",38,0)
+ Q
+"RTN","C0CPROC",39,0)
+ ;
+"RTN","C0CPROC",40,0)
+TIUGET(DFN,C0CENC,C0CPRC,C0CNTE) ; CALLS ENTRY^C0CCPT TO GET PROCEDURES, 
+"RTN","C0CPROC",41,0)
+ ; ENCOUNTERS AND NOTES. RETURNS THEM IN RNF2 ARRAYS PASSED BY NAME
+"RTN","C0CPROC",42,0)
+ ; C0CENC: ENCOUNTERS, C0CPRC: PROCEDURES, C0CNTE: NOTES
+"RTN","C0CPROC",43,0)
+ ; READY TO BE MAPPED TO XML BY MAP^C0CENC, MAP^C0CPROC, AND MAP^C0CCMT
+"RTN","C0CPROC",44,0)
+ ; THESE RETURN ARRAYS ARE NOT INITIALIZED, BUT ARE ADDED TO IF THEY 
+"RTN","C0CPROC",45,0)
+ ; EXIST. THIS IS SO THAT ADDITIONAL PROCEDURES CAN BE OBTAINED FROM
+"RTN","C0CPROC",46,0)
+ ; THE SURGERY PACKGE AND ADDITIONAL COMMENTS FROM OTHER CCR SECTIONS
+"RTN","C0CPROC",47,0)
+ ;
+"RTN","C0CPROC",48,0)
+ K VISIT,LST,NOTE,C0CLPRC
+"RTN","C0CPROC",49,0)
+ ; C0CLPRC IS A LOOKUP TABLE FOR USE IN BUILDING ENCOUNTERS
+"RTN","C0CPROC",50,0)
+ ; FORMAT C0CLPRC(VISITIEN,CPT)=PROCOBJECTID FOR BUILDING LINKS TO PROCEDURES
+"RTN","C0CPROC",51,0)
+ D ENTRY^C0CCPT(DFN,,,1) ; RETURNS ALL RESULTS IN VISIT LOCAL VARIABLE
+"RTN","C0CPROC",52,0)
+ ; NEED TO ADD START AND END DATES FROM PARAMETERS
+"RTN","C0CPROC",53,0)
+ N ZI S ZI=""
+"RTN","C0CPROC",54,0)
+ N PREVCPT,PREVDT S (PREVCPT,PREVDT)=""
+"RTN","C0CPROC",55,0)
+ F  S ZI=$O(VISIT(ZI),-1) Q:ZI=""  D  ; REVERSE TIME ORDER - MOST RECENT FIRST
+"RTN","C0CPROC",56,0)
+ . N ZDATE
+"RTN","C0CPROC",57,0)
+ . S ZDATE=$$DATE(VISIT(ZI,"DATE",0))
+"RTN","C0CPROC",58,0)
+ . S ZPRVARY=$NA(VISIT(ZI,"PRV"))
+"RTN","C0CPROC",59,0)
+ . N ZPRV
+"RTN","C0CPROC",60,0)
+ . S ZPRV=$$PRV(ZPRVARY) ; THE PRIMARY PROVIDER OBJECT IN THE FORM
+"RTN","C0CPROC",61,0)
+ . ; ACTORPROVIDER_IEN WHERE IEN IS THE PROVIDER IEN IN NEW PERSON 
+"RTN","C0CPROC",62,0)
+ . N ZJ S ZJ=""
+"RTN","C0CPROC",63,0)
+ . F  S ZJ=$O(VISIT(ZI,"CPT",ZJ)) Q:ZJ=""  D  ;FOR EACH CPT SEG
+"RTN","C0CPROC",64,0)
+ . . N ZRNF
+"RTN","C0CPROC",65,0)
+ . . N ZCPT S ZCPT=$$CPT(VISIT(ZI,"CPT",ZJ)) ;GET CPT CODE AND TEXT
+"RTN","C0CPROC",66,0)
+ . . I ZCPT'="" D  ;IF CPT CODE IS PRESENT
+"RTN","C0CPROC",67,0)
+ . . . I (ZCPT=PREVCPT)&(ZDATE=PREVDT) Q  ; NO DUPS ALLOWED
+"RTN","C0CPROC",68,0)
+ . . . W !,ZCPT," ",ZDATE," ",ZPRV
+"RTN","C0CPROC",69,0)
+ . . . S ZRNF("PROCACTOROBJID")=ZPRV
+"RTN","C0CPROC",70,0)
+ . . . N PROCCODE S PROCCODE=$P(ZCPT,U,1)
+"RTN","C0CPROC",71,0)
+ . . . S ZRNF("PROCCODE")=PROCCODE
+"RTN","C0CPROC",72,0)
+ . . . S ZRNF("PROCCODESYS")="CPT-4"
+"RTN","C0CPROC",73,0)
+ . . . S ZRNF("PROCDATETEXT")="Procedure Date"
+"RTN","C0CPROC",74,0)
+ . . . S ZRNF("PROCDATETIME")=ZDATE
+"RTN","C0CPROC",75,0)
+ . . . S ZRNF("PROCDESCOBJATTRCODE")="" ;NO PROC ATTRIBUTES YET
+"RTN","C0CPROC",76,0)
+ . . . S ZRNF("PROCDESCOBJATTR")=""
+"RTN","C0CPROC",77,0)
+ . . . S ZRNF("PROCDESCOBJATTRCODESYS")="" ;WE DON'T HAVE PROC ATTRIBUTES
+"RTN","C0CPROC",78,0)
+ . . . S ZRNF("PROCDESCOBJATTRVAL")=""
+"RTN","C0CPROC",79,0)
+ . . . S ZRNF("PROCDESCTEXT")=$P(ZCPT,U,3)
+"RTN","C0CPROC",80,0)
+ . . . S ZRNF("PROCLINKID")="" ; NO LINKS YET
+"RTN","C0CPROC",81,0)
+ . . . S ZRNF("PROCLINKREL")="" ; NO LINKS YET
+"RTN","C0CPROC",82,0)
+ . . . ; additions for Certification - need to have EKG in Results
+"RTN","C0CPROC",83,0)
+ . . . S ZRNF("PROCTEXT")=$G(VISIT(ZI,"TEXT",1)) ; POTENTIAL RESULT
+"RTN","C0CPROC",84,0)
+ . . . S ZRNF("PROCOBJECTID")="PROCEDURE_"_ZI_"_"_ZJ
+"RTN","C0CPROC",85,0)
+ . . . S C0CLPRC(ZI,PROCCODE)=ZRNF("PROCOBJECTID") ; LOOKUP TABLE FOR ENCOUNTERS
+"RTN","C0CPROC",86,0)
+ . . . S ZRNF("PROCSTATUS")="Completed" ; Is this right?
+"RTN","C0CPROC",87,0)
+ . . . S ZRNF("PROCTYPE")=$P(ZCPT,U,2) ; NEED TO ADD THIS TO TEMPLATE
+"RTN","C0CPROC",88,0)
+ . . . D RNF1TO2^C0CRNF(C0CPRC,"ZRNF") ; ADD THIS ROW TO THE ARRAY
+"RTN","C0CPROC",89,0)
+ . . . ; FOR CERTIFICATION - SAVE EKG RESULTS gpl
+"RTN","C0CPROC",90,0)
+ . . . W !,"CPT=",ZCPT
+"RTN","C0CPROC",91,0)
+ . . . I ZCPT["93000" D  ; THIS IS AN EKG
+"RTN","C0CPROC",92,0)
+ . . . . D RNF1TO2^C0CRNF(C0CPRSLT,"ZRNF") ; SAVE FOR LABS
+"RTN","C0CPROC",93,0)
+ . . . . M ^GPL("RNF2")=@C0CPRSLT
+"RTN","C0CPROC",94,0)
+ . . . S PREVCPT=ZCPT
+"RTN","C0CPROC",95,0)
+ . . . S PREVDT=ZDATE
+"RTN","C0CPROC",96,0)
+ N ZRIM S ZRIM=$NA(^TMP("C0CRIM","VARS",DFN,"PROCEDURES"))
+"RTN","C0CPROC",97,0)
+ M @ZRIM=@C0CPRC@("V")
+"RTN","C0CPROC",98,0)
+ Q
+"RTN","C0CPROC",99,0)
+ ;
+"RTN","C0CPROC",100,0)
+PRV(IARY) ; RETURNS THE PRIMARY PROVIDER FROM THE "PRV" ARRAY PASSED BY NAME
+"RTN","C0CPROC",101,0)
+ N ZI,ZR,ZRTN S ZI="" S ZR="" S ZRTN=""
+"RTN","C0CPROC",102,0)
+ F  S ZI=$O(@IARY@(ZI)) Q:ZI=""  D  ; FOR EACH PRV SEG
+"RTN","C0CPROC",103,0)
+ . I ZR'="" Q  ;ONLY WANT THE FIRST PRIMARY PROVIDER
+"RTN","C0CPROC",104,0)
+ . I $P(@IARY@(ZI),U,5)=1 S ZR=$P(@IARY@(ZI),U,1)
+"RTN","C0CPROC",105,0)
+ I ZR'="" S ZRTN="ACTORPROVIDER_"_ZR
+"RTN","C0CPROC",106,0)
+ Q ZRTN
+"RTN","C0CPROC",107,0)
+ ;
+"RTN","C0CPROC",108,0)
+DATE(ISTR) ; EXTRINSIC TO RETURN THE DATE IN CCR FORMAT
+"RTN","C0CPROC",109,0)
+ Q $$FMDTOUTC^C0CUTIL(ISTR,"DT")
+"RTN","C0CPROC",110,0)
+ ;
+"RTN","C0CPROC",111,0)
+CPT(ISTR) ; EXTRINSIC THAT SEARCHES FOR CPT CODES AND RETURNS
+"RTN","C0CPROC",112,0)
+ ; CPT^CATEGORY^TEXT
+"RTN","C0CPROC",113,0)
+ N Z1,Z2,Z3,ZRTN
+"RTN","C0CPROC",114,0)
+ S Z1=$P(ISTR,U,1) 
+"RTN","C0CPROC",115,0)
+ I Z1="" D  ;
+"RTN","C0CPROC",116,0)
+ . I ISTR["(CPT-4 " S Z1=$P($P(ISTR,"(CPT-4 ",2),")",1)
+"RTN","C0CPROC",117,0)
+ I Z1'="" D  ; IF THERE IS A CPT CODE IN THERE
+"RTN","C0CPROC",118,0)
+ . ;S Z1=$P(ISTR,U,1)
+"RTN","C0CPROC",119,0)
+ . S Z2=$P(ISTR,U,2)
+"RTN","C0CPROC",120,0)
+ . S Z3=$P(ISTR,U,3)
+"RTN","C0CPROC",121,0)
+ . S ZRTN=Z1_U_Z2_U_Z3
+"RTN","C0CPROC",122,0)
+ E  S ZRTN=""
+"RTN","C0CPROC",123,0)
+ Q ZRTN
+"RTN","C0CPROC",124,0)
+ ;
+"RTN","C0CPROC",125,0)
+MAP(PROCXML,C0CPRC,PROCOUT) ; MAP PROCEDURES XML 
+"RTN","C0CPROC",126,0)
+ ;
+"RTN","C0CPROC",127,0)
+ N ZTEMP S ZTEMP=$NA(^TMP("C0CCCR",$J,DFN,"PROCTEMP")) ;WORK AREA FOR TEMPLATE
+"RTN","C0CPROC",128,0)
+ K @ZTEMP
+"RTN","C0CPROC",129,0)
+ N ZBLD
+"RTN","C0CPROC",130,0)
+ S ZBLD=$NA(^TMP("C0CCCR",$J,DFN,"PROCBLD")) ; BUILD LIST AREA
+"RTN","C0CPROC",131,0)
+ D QUEUE^C0CXPATH(ZBLD,PROCXML,1,1) ; FIRST LINE
+"RTN","C0CPROC",132,0)
+ N ZINNER
+"RTN","C0CPROC",133,0)
+ D QUERY^C0CXPATH(PROCXML,"//Procedures/Procedure","ZINNER") ;ONE PROC
+"RTN","C0CPROC",134,0)
+ N ZTMP,ZVAR,ZI
+"RTN","C0CPROC",135,0)
+ S ZI=""
+"RTN","C0CPROC",136,0)
+ F  S ZI=$O(@C0CPRC@("V",ZI)) Q:ZI=""  D  ;FOR EACH PROCEDURE
+"RTN","C0CPROC",137,0)
+ . S ZTMP=$NA(@ZTEMP@(ZI)) ;THIS PROCEDURE XML
+"RTN","C0CPROC",138,0)
+ . S ZVAR=$NA(@C0CPRC@("V",ZI)) ;THIS PROCEDURE VARIABLES
+"RTN","C0CPROC",139,0)
+ . D MAP^C0CXPATH("ZINNER",ZVAR,ZTMP) ; MAP THE PROCEDURE
+"RTN","C0CPROC",140,0)
+ . D QUEUE^C0CXPATH(ZBLD,ZTMP,1,@ZTMP@(0)) ;QUE FOR BUILD
+"RTN","C0CPROC",141,0)
+ D QUEUE^C0CXPATH(ZBLD,PROCXML,@PROCXML@(0),@PROCXML@(0))
+"RTN","C0CPROC",142,0)
+ N ZZTMP
+"RTN","C0CPROC",143,0)
+ D BUILD^C0CXPATH(ZBLD,PROCOUT) ;BUILD FINAL XML
+"RTN","C0CPROC",144,0)
+ K @ZTEMP,@ZBLD,@C0CPRC
+"RTN","C0CPROC",145,0)
+ Q
+"RTN","C0CPROC",146,0)
+ ;  
+"RTN","C0CPXRM")
+0^92^B14904056
+"RTN","C0CPXRM",1,0)
+C0CPXRM ; 
+"RTN","C0CPXRM",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CPXRM",3,0)
+DOIT ;
+"RTN","C0CPXRM",4,0)
+ S G="PXRMXSEPCLINIC3110302.224804" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",5,0)
+ S G="PXRMXSEPCLINIC3110302.223957" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",6,0)
+ S G="PXRMXSEPCLINIC3110302.223738" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",7,0)
+ S G="PXRMXSEPCLINIC3110302.223516" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",8,0)
+ S G="PXRMXSEPCLINIC3110302.222158" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",9,0)
+ S G="PXRMXSEPCLINIC3110302.213944" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",10,0)
+ S G="PXRMXSEPCLINIC3110302.212219" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",11,0)
+ S G="PXRMXSEPCLINIC3110302.211506" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",12,0)
+ S G="PXRMXSEPCLINIC3110302.002714" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",13,0)
+ S G="PXRMXSEPCLINIC3110302.001841" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",14,0)
+ S G="PXRMXSEPCLINIC3110302.000846" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",15,0)
+ S G="PXRMXSEPCLINIC3110115.141918" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",16,0)
+ S G="PXRMXSEPCLINIC3110115.132312" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",17,0)
+ S G="PXRMXSEPCLINIC3110115.131653" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",18,0)
+ S G="PXRMXSEPCLINIC3110115.131008" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",19,0)
+ S G="PXRM PXK EVENT988 3110224.210456" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",20,0)
+ S G="PXRM PXK EVENT986 3110224.210456" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",21,0)
+ S G="PXRM PXK EVENT932 3110224.210456" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",22,0)
+ S G="PXRM PXK EVENT932 3110224.210455" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",23,0)
+ S G="PXRM PXK EVENT8015 3110301.215142" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",24,0)
+ S G="PXRM PXK EVENT8015 3110301.215141" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",25,0)
+ S G="PXRM PXK EVENT5265 3110309.124047" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",26,0)
+ S G="PXRM PXK EVENT5265 3110309.124046" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",27,0)
+ S G="PXRM PXK EVENT4742 3101129.221201" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",28,0)
+ S G="PXRM PXK EVENT4742 3101129.215741" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",29,0)
+ S G="PXRM PXK EVENT4710 3101129.215701" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",30,0)
+ S G="PXRM PXK EVENT3297 3101127.123134" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",31,0)
+ S G="PXRM PXK EVENT32495 3110224.194246" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",32,0)
+ S G="PXRM PXK EVENT32493 3110224.194246" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",33,0)
+ S G="PXRM PXK EVENT32354 3110224.194246" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",34,0)
+ S G="PXRM PXK EVENT32354 3110224.194245" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",35,0)
+ S G="PXRM PXK EVENT31106 3110224.175105" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",36,0)
+ S G="PXRM PXK EVENT31090 3110224.175105" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",37,0)
+ S G="PXRM PXK EVENT30339 3110224.175105" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",38,0)
+ S G="PXRM PXK EVENT30339 3110224.175103" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",39,0)
+ S G="PXRM PXK EVENT2761 3110115.174109" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",40,0)
+ S G="PXRM PXK EVENT2761 3110115.174108" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",41,0)
+ S G="PXRM PXK EVENT27327 3110227.013658" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",42,0)
+ S G="PXRM PXK EVENT27327 3110227.013657" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",43,0)
+ S G="PXRM PXK EVENT27327 3110227.013523" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",44,0)
+ S G="PXRM PXK EVENT27327 3110227.013522" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",45,0)
+ S G="PXRM PXK EVENT27253 3110227.012747" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",46,0)
+ S G="PXRM PXK EVENT27253 3110227.012746" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",47,0)
+ S G="PXRM PXK EVENT2559 3110115.170835" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",48,0)
+ S G="PXRM PXK EVENT25549 3110228.231135" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",49,0)
+ S G="PXRM PXK EVENT25549 3110228.231134" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",50,0)
+ S G="PXRM PXK EVENT2205 3101129.215343" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",51,0)
+ S G="PXRM PXK EVENT21092 3110114.195621" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",52,0)
+ S G="PXRM PXK EVENT21092 3110114.193803" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",53,0)
+ S G="PXRM PXK EVENT19640 3110226.032943" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",54,0)
+ S G="PXRM PXK EVENT19640 3110226.032941" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",55,0)
+ S G="PXRM PXK EVENT19353 3101212.162833" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",56,0)
+ S G="PXRM PXK EVENT18780 3110221.215603" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",57,0)
+ S G="PXRM PXK EVENT18156 3101212.152654" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",58,0)
+ S G="PXRM PXK EVENT17800 3110315.202432" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",59,0)
+ S G="PXRM PXK EVENT1650 3110220.192925" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",60,0)
+ S G="PXRM PXK EVENT16110 3110313.224636" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",61,0)
+ S G="PXRM PXK EVENT16004 3110317.151215" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",62,0)
+ S G="PXRM PXK EVENT16004 3110317.150834" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",63,0)
+ S G="PXRM PXK EVENT14955 3110315.165018" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",64,0)
+ S G="PXRM PXK EVENT14816 3110315.164839" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",65,0)
+ S G="PXRM PXK EVENT14816 3110315.164512" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",66,0)
+ S G="PXRM PXK EVENT12415 3110315.135514" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",67,0)
+ S G="PXRM PXK EVENT11797 3110315.131141" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",68,0)
+ S G="PXRM PXK EVENT11573 3110315.131811" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",69,0)
+ S G="PXRM PXK EVENT10728 3110114.025022" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",70,0)
+ S G="PXRM PXK EVENT10578 3110114.021524" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",71,0)
+ S G="PXRM PXK EVENT10243 3110114.020338" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",72,0)
+ S G="PXRM PXK EVENT10105 3101204.230554" ZWR ^XTMP(G,*)
+"RTN","C0CPXRM",73,0)
+ Q
+"RTN","C0CPXRM",74,0)
+ ;
+"RTN","C0CQRY1")
+0^93^B18992765
+"RTN","C0CQRY1",1,0)
+LA7QRY1 ;DALOI/JMC - Lab HL7 Query Utility ; 5/10/12 5:16pm
+"RTN","C0CQRY1",2,0)
+        ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CQRY1",3,0)
+        ;
+"RTN","C0CQRY1",4,0)
+        Q
+"RTN","C0CQRY1",5,0)
+        ;
+"RTN","C0CQRY1",6,0)
+CHKSC   ; Check search NLT/LOINC codes
+"RTN","C0CQRY1",7,0)
+        ;
+"RTN","C0CQRY1",8,0)
+        N J
+"RTN","C0CQRY1",9,0)
+        ;
+"RTN","C0CQRY1",10,0)
+        S J=0
+"RTN","C0CQRY1",11,0)
+        F  S J=$O(LA7SC(J)) Q:'J  D
+"RTN","C0CQRY1",12,0)
+        . N X
+"RTN","C0CQRY1",13,0)
+        . S X=LA7SC(J)
+"RTN","C0CQRY1",14,0)
+        . I $P(X,"^",2)="NLT",$D(^LAM("E",$P(X,"^"))) D  Q
+"RTN","C0CQRY1",15,0)
+        . . S ^TMP("LA7-NLT",$J,$P(X,"^"))=""
+"RTN","C0CQRY1",16,0)
+        . I $P(X,"^",2)="LN",$D(^LAB(95.3,$P($P(X,"^"),"-"))) D  Q
+"RTN","C0CQRY1",17,0)
+        . . S ^TMP("LA7-LN",$J,$P($P(X,"^"),"-"))=""
+"RTN","C0CQRY1",18,0)
+        . S LA7ERR(6)="Unknown search code "_$P(X,"^")_" passed"
+"RTN","C0CQRY1",19,0)
+        . K LA7SC(J)
+"RTN","C0CQRY1",20,0)
+        Q
+"RTN","C0CQRY1",21,0)
+        ;
+"RTN","C0CQRY1",22,0)
+        ;
+"RTN","C0CQRY1",23,0)
+SPEC    ; Convert HL7 Specimen Codes to File #61, Topography codes
+"RTN","C0CQRY1",24,0)
+        ; Find all topographies that use this HL7 specimen code
+"RTN","C0CQRY1",25,0)
+        N J,K,L
+"RTN","C0CQRY1",26,0)
+        ;
+"RTN","C0CQRY1",27,0)
+        S J=0
+"RTN","C0CQRY1",28,0)
+        F  S J=$O(LA7SPEC(J)) Q:'J  D
+"RTN","C0CQRY1",29,0)
+        . S K=LA7SPEC(J),L=0
+"RTN","C0CQRY1",30,0)
+        . F  S L=$O(^LAB(61,"HL7",K,L)) Q:'L  S ^TMP("LA7-61",$J,L)=""
+"RTN","C0CQRY1",31,0)
+        Q
+"RTN","C0CQRY1",32,0)
+        ;
+"RTN","C0CQRY1",33,0)
+        ;
+"RTN","C0CQRY1",34,0)
+BUILDMSG        ; Build HL7 message with result of query
+"RTN","C0CQRY1",35,0)
+        ;
+"RTN","C0CQRY1",36,0)
+        N HL,HLECH,HLFS,HLQ,LA,LA763,LA7ECH,LA7FS,LA7MSH,LA7NOMSG,LA7NTESN,LA7NVAF,LA7OBRSN,LA7OBXSN,LA7PIDSN,LA7ROOT,LA7X,X
+"RTN","C0CQRY1",37,0)
+        ;
+"RTN","C0CQRY1",38,0)
+        I $L($G(LA7HL7))'=5 S LA7HL7="|^\~&"
+"RTN","C0CQRY1",39,0)
+        S (HL("FS"),HLFS,LA7FS)=$E(LA7HL7),(HL("ECH"),HLECH,LA7ECH)=$E(LA7HL7,2,5)
+"RTN","C0CQRY1",40,0)
+        S (HLQ,HL("Q"))=""""""
+"RTN","C0CQRY1",41,0)
+        ; Set flag to not send HL7 message
+"RTN","C0CQRY1",42,0)
+        S LA7NOMSG=1
+"RTN","C0CQRY1",43,0)
+        ; Create dummy MSH to pass HL7 delimiters
+"RTN","C0CQRY1",44,0)
+        S LA7MSH(0)="MSH"_LA7FS_LA7ECH_LA7FS
+"RTN","C0CQRY1",45,0)
+        D FILESEG^LA7VHLU(GBL,.LA7MSH)
+"RTN","C0CQRY1",46,0)
+        ;
+"RTN","C0CQRY1",47,0)
+        F X="AUTO-INST","LRDFN","LRIDT","SUB","HUID","NLT","RUID","SITE" S LA(X)=""
+"RTN","C0CQRY1",48,0)
+        ;
+"RTN","C0CQRY1",49,0)
+        ; Take search results and put in HL7 message structure
+"RTN","C0CQRY1",50,0)
+        S LA7ROOT="^TMP(""LA7-QRY"",$J)",(LA7QUIT,LA7PIDSN)=0
+"RTN","C0CQRY1",51,0)
+        ; F  S LA7ROOT=$Q(@LA7ROOT) Q:LA7QUIT  D ;change per John M
+"RTN","C0CQRY1",52,0)
+        F  S LA7ROOT=$Q(@LA7ROOT) Q:LA7ROOT=""  D  Q:LA7QUIT
+"RTN","C0CQRY1",53,0)
+        . I $QS(LA7ROOT,1)'="LA7-QRY"!($QS(LA7ROOT,2)'=$J) S LA7QUIT=1 Q
+"RTN","C0CQRY1",54,0)
+        . I LA("LRDFN")'=$QS(LA7ROOT,3) D PID S LA7OBRSN=0
+"RTN","C0CQRY1",55,0)
+        . I LA("LRIDT")'=$QS(LA7ROOT,4) D ORC,OBR
+"RTN","C0CQRY1",56,0)
+        . I LA("SUB")'=$QS(LA7ROOT,5) D ORC,OBR
+"RTN","C0CQRY1",57,0)
+        . I LA("NLT")'=$P($QS(LA7ROOT,6),"!") D ORC,OBR
+"RTN","C0CQRY1",58,0)
+        . D OBX
+"RTN","C0CQRY1",59,0)
+        ;
+"RTN","C0CQRY1",60,0)
+        Q
+"RTN","C0CQRY1",61,0)
+        ;
+"RTN","C0CQRY1",62,0)
+        ;
+"RTN","C0CQRY1",63,0)
+PID     ; Build PID segment
+"RTN","C0CQRY1",64,0)
+        ;
+"RTN","C0CQRY1",65,0)
+        N LA7PID
+"RTN","C0CQRY1",66,0)
+        ;
+"RTN","C0CQRY1",67,0)
+        S (LA("LRDFN"),LRDFN)=$QS(LA7ROOT,3)
+"RTN","C0CQRY1",68,0)
+        S LRDPF=$P(^LR(LRDFN,0),"^",2),DFN=$P(^(0),"^",3)
+"RTN","C0CQRY1",69,0)
+        D DEM^LRX
+"RTN","C0CQRY1",70,0)
+        D PID^LA7VPID(LA("LRDFN"),"",.LA7PID,.LA7PIDSN,.HL)
+"RTN","C0CQRY1",71,0)
+        D FILESEG^LA7VHLU(GBL,.LA7PID)
+"RTN","C0CQRY1",72,0)
+        S (LA("LRIDT"),LA("SUB"))=""
+"RTN","C0CQRY1",73,0)
+        Q
+"RTN","C0CQRY1",74,0)
+        ;
+"RTN","C0CQRY1",75,0)
+        ;
+"RTN","C0CQRY1",76,0)
+ORC     ; Build ORC segment
+"RTN","C0CQRY1",77,0)
+        ;
+"RTN","C0CQRY1",78,0)
+        N X
+"RTN","C0CQRY1",79,0)
+        ;
+"RTN","C0CQRY1",80,0)
+        S LA("LRIDT")=$QS(LA7ROOT,4),LA("SUB")=$QS(LA7ROOT,5)
+"RTN","C0CQRY1",81,0)
+        S LA763(0)=$G(^LR(LA("LRDFN"),LA("SUB"),LA("LRIDT"),0))
+"RTN","C0CQRY1",82,0)
+        S X=$G(^LR(LA("LRDFN"),LA("SUB"),LA("LRIDT"),"ORU"))
+"RTN","C0CQRY1",83,0)
+        S LA("HUID")=$P(X,"^"),LA("SITE")=$P(X,"^",2),LA("RUID")=$P(X,"^",4)
+"RTN","C0CQRY1",84,0)
+        I LA("HUID")="" S LA("HUID")=$P(LA763(0),"^",6)
+"RTN","C0CQRY1",85,0)
+        S LA7NVAF=$$NVAF^LA7VHLU2(0),LA7NTESN=0
+"RTN","C0CQRY1",86,0)
+        D ORC^LA7VORU
+"RTN","C0CQRY1",87,0)
+        S LA("NLT")=""
+"RTN","C0CQRY1",88,0)
+        ;
+"RTN","C0CQRY1",89,0)
+        Q
+"RTN","C0CQRY1",90,0)
+        ;
+"RTN","C0CQRY1",91,0)
+        ;
+"RTN","C0CQRY1",92,0)
+OBR     ; Build OBR segment
+"RTN","C0CQRY1",93,0)
+        ;
+"RTN","C0CQRY1",94,0)
+        N LA764,LA7NLT
+"RTN","C0CQRY1",95,0)
+        ;
+"RTN","C0CQRY1",96,0)
+        S (LA("NLT"),LA7NLT)=$P($QS(LA7ROOT,6),"!"),(LA764,LA("ORD"))=""
+"RTN","C0CQRY1",97,0)
+        I $L(LA7NLT) D
+"RTN","C0CQRY1",98,0)
+        . S LA764=+$O(^LAM("E",LA7NLT,0))
+"RTN","C0CQRY1",99,0)
+        . I LA764 S LA("ORD")=$$GET1^DIQ(64,LA764_",",.01)
+"RTN","C0CQRY1",100,0)
+        I LA("SUB")="CH" D
+"RTN","C0CQRY1",101,0)
+        . D OBR^LA7VORU
+"RTN","C0CQRY1",102,0)
+        . D NTE^LA7VORU
+"RTN","C0CQRY1",103,0)
+        . S LA7OBXSN=0
+"RTN","C0CQRY1",104,0)
+        ;
+"RTN","C0CQRY1",105,0)
+        Q
+"RTN","C0CQRY1",106,0)
+        ;
+"RTN","C0CQRY1",107,0)
+        ;
+"RTN","C0CQRY1",108,0)
+OBX     ; Build OBX segment
+"RTN","C0CQRY1",109,0)
+        ;
+"RTN","C0CQRY1",110,0)
+        N LA7DATA,LA7VT
+"RTN","C0CQRY1",111,0)
+        ;
+"RTN","C0CQRY1",112,0)
+        S LA7NTESN=0
+"RTN","C0CQRY1",113,0)
+        I LA("SUB")="MI" D MI^LA7VORU1 Q
+"RTN","C0CQRY1",114,0)
+        I "CYEMSP"[LA("SUB") D AP^LA7VORU2 Q
+"RTN","C0CQRY1",115,0)
+        ;
+"RTN","C0CQRY1",116,0)
+        S LA7VT=$QS(LA7ROOT,7)
+"RTN","C0CQRY1",117,0)
+        D OBX^LA7VOBX(LA("LRDFN"),LA("SUB"),LA("LRIDT"),LA7VT,.LA7DATA,.LA7OBXSN,LA7FS,LA7ECH)
+"RTN","C0CQRY1",118,0)
+        I '$D(LA7DATA) Q
+"RTN","C0CQRY1",119,0)
+        D FILESEG^LA7VHLU(GBL,.LA7DATA)
+"RTN","C0CQRY1",120,0)
+        ; Send any test interpretation from file #60
+"RTN","C0CQRY1",121,0)
+        D INTRP^LA7VORUA
+"RTN","C0CQRY1",122,0)
+        ;
+"RTN","C0CQRY1",123,0)
+        Q
+"RTN","C0CQRY2")
+0^94^B20465060
+"RTN","C0CQRY2",1,0)
+LA7QRY2 ;DALOI/JMC - Lab HL7 Query Utility ; 04/13/09 ; 5/10/12 5:16pm
+"RTN","C0CQRY2",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CQRY2",3,0)
+ ; JMC - mods to check for IHS V LAB file
+"RTN","C0CQRY2",4,0)
+ ;
+"RTN","C0CQRY2",5,0)
+ Q
+"RTN","C0CQRY2",6,0)
+ ;
+"RTN","C0CQRY2",7,0)
+PATID ; Resolve patient id and establish patient environment
+"RTN","C0CQRY2",8,0)
+ ;
+"RTN","C0CQRY2",9,0)
+ N LA7X
+"RTN","C0CQRY2",10,0)
+ ;
+"RTN","C0CQRY2",11,0)
+ S (DFN,LRDFN)="",LA7PTYP=0
+"RTN","C0CQRY2",12,0)
+ ;
+"RTN","C0CQRY2",13,0)
+ ; SSN passed as patient identifier
+"RTN","C0CQRY2",14,0)
+ I LA7PTID?9N.1A D
+"RTN","C0CQRY2",15,0)
+ . S LA7PTYP=1
+"RTN","C0CQRY2",16,0)
+ . S LA7X=$O(^DPT("SSN",LA7PTID,0))
+"RTN","C0CQRY2",17,0)
+ . I LA7X>0 D SETDFN(LA7X)
+"RTN","C0CQRY2",18,0)
+ ;
+"RTN","C0CQRY2",19,0)
+ ; MPI/ICN (integration control number) passed as patient identifier
+"RTN","C0CQRY2",20,0)
+ I LA7PTID?10N1"V"6N D
+"RTN","C0CQRY2",21,0)
+ . S LA7PTYP=2
+"RTN","C0CQRY2",22,0)
+ . S LA7X=$$GETDFN^MPIF001($P(LA7PTID,"V"))
+"RTN","C0CQRY2",23,0)
+ . I LA7X>0 D SETDFN(LA7X)
+"RTN","C0CQRY2",24,0)
+ ;
+"RTN","C0CQRY2",25,0)
+ ; If no patient identified/no laboratory record - return exception message
+"RTN","C0CQRY2",26,0)
+ I 'LA7PTYP S LA7ERR(1)="Invalid patient identifier passed"
+"RTN","C0CQRY2",27,0)
+ I 'DFN S LA7ERR(2)="No patient found with requested identifier"
+"RTN","C0CQRY2",28,0)
+ I DFN,'LRDFN S LA7ERR(3)="No laboratory record for requested patient"
+"RTN","C0CQRY2",29,0)
+ I LRDFN,'$D(^LR(LRDFN)) S LA7ERR(4)="Database error - missing laboratory record for requested patient"
+"RTN","C0CQRY2",30,0)
+ Q
+"RTN","C0CQRY2",31,0)
+ ;
+"RTN","C0CQRY2",32,0)
+ ;
+"RTN","C0CQRY2",33,0)
+BCD ; Search by specimen collection date.
+"RTN","C0CQRY2",34,0)
+ ;
+"RTN","C0CQRY2",35,0)
+ N LA763,LA7QUIT
+"RTN","C0CQRY2",36,0)
+ ;
+"RTN","C0CQRY2",37,0)
+ S (LA7SDT(0),LA7EDT(0))=0
+"RTN","C0CQRY2",38,0)
+ I LA7SDT S LA7SDT(0)=9999999-LA7SDT
+"RTN","C0CQRY2",39,0)
+ I LA7EDT S LA7EDT(0)=9999999-LA7EDT
+"RTN","C0CQRY2",40,0)
+ ;
+"RTN","C0CQRY2",41,0)
+ F LRSS="CH","MI","SP" D
+"RTN","C0CQRY2",42,0)
+ . S (LA7QUIT,LRIDT)=0
+"RTN","C0CQRY2",43,0)
+ . I LA7EDT(0) S LRIDT=$O(^LR(LRDFN,LRSS,LA7EDT(0)),-1)
+"RTN","C0CQRY2",44,0)
+ . F  S LRIDT=$O(^LR(LRDFN,LRSS,LRIDT)) Q:LA7QUIT  D
+"RTN","C0CQRY2",45,0)
+ . . ; Quit if reached end of data or outside date criteria
+"RTN","C0CQRY2",46,0)
+ . . I 'LRIDT!(LRIDT>LA7SDT(0)) S LA7QUIT=1 Q
+"RTN","C0CQRY2",47,0)
+ . . D SEARCH
+"RTN","C0CQRY2",48,0)
+ ;
+"RTN","C0CQRY2",49,0)
+ Q
+"RTN","C0CQRY2",50,0)
+ ;
+"RTN","C0CQRY2",51,0)
+ ;
+"RTN","C0CQRY2",52,0)
+BRAD ; Search by results available date (completion date).
+"RTN","C0CQRY2",53,0)
+ ; Assumes cross-references still exist for dates in LRO(69) global.
+"RTN","C0CQRY2",54,0)
+ ; Collects specimen date/time values for a given LRDFN and completion date.
+"RTN","C0CQRY2",55,0)
+ ; Cross-reference is by date only, time stripped from start date.
+"RTN","C0CQRY2",56,0)
+ ; Uses cross-reference ^LRO(69,DT,1,"AN",'LOCATION',LRDFN,LRIDT)=""
+"RTN","C0CQRY2",57,0)
+ ;
+"RTN","C0CQRY2",58,0)
+ N LA763,LA7DT,LA7ROOT,LA7SRC,X
+"RTN","C0CQRY2",59,0)
+ ;
+"RTN","C0CQRY2",60,0)
+ ; Check if orders still exist Iin file #69 for search range
+"RTN","C0CQRY2",61,0)
+ S LA7SDT(1)=(LA7SDT\1)-.0000000001,LA7EDT(1)=(LA7EDT\1)+.24,LA7SRC=0
+"RTN","C0CQRY2",62,0)
+ S X=$O(^LRO(69,LA7SDT(1)))
+"RTN","C0CQRY2",63,0)
+ I X,X<LA7EDT(1) S LA7SRC=1
+"RTN","C0CQRY2",64,0)
+ ;
+"RTN","C0CQRY2",65,0)
+ ; Search "AN" cross-reference in file #69.
+"RTN","C0CQRY2",66,0)
+ I LA7SRC D
+"RTN","C0CQRY2",67,0)
+ . S LA7DT=LA7SDT(1)
+"RTN","C0CQRY2",68,0)
+ . F  S LA7DT=$O(^LRO(69,LA7DT)) Q:'LA7DT!(LA7DT>LA7EDT(1))  D
+"RTN","C0CQRY2",69,0)
+ . . S LA7ROOT="^LRO(69,LA7DT,1,""AN"")"
+"RTN","C0CQRY2",70,0)
+ . . F  S LA7ROOT=$Q(@LA7ROOT) Q:LA7ROOT=""!($QS(LA7ROOT,2)'=LA7DT)!($QS(LA7ROOT,4)'="AN")  D
+"RTN","C0CQRY2",71,0)
+ . . . I $QS(LA7ROOT,6)'=LRDFN Q
+"RTN","C0CQRY2",72,0)
+ . . . S LRIDT=$QS(LA7ROOT,7)
+"RTN","C0CQRY2",73,0)
+ . . . F LRSS="CH","MI","SP" D SEARCH
+"RTN","C0CQRY2",74,0)
+ ;
+"RTN","C0CQRY2",75,0)
+ ; If no orders in #69 then do long search through file #63.
+"RTN","C0CQRY2",76,0)
+ I 'LA7SRC D
+"RTN","C0CQRY2",77,0)
+ . F LRSS="CH","MI","SP" D
+"RTN","C0CQRY2",78,0)
+ . . S LRIDT=0
+"RTN","C0CQRY2",79,0)
+ . . F  S LRIDT=$O(^LR(LRDFN,LRSS,LRIDT)) Q:'LRIDT  D
+"RTN","C0CQRY2",80,0)
+ . . . S LA763(0)=$G(^LR(LRDFN,LRSS,LRIDT,0))
+"RTN","C0CQRY2",81,0)
+ . . . I $P(LA763(0),"^",3)>LA7SDT(1),$P(LA763(0),"^",3)<LA7EDT(1) D SEARCH
+"RTN","C0CQRY2",82,0)
+ ;
+"RTN","C0CQRY2",83,0)
+ Q
+"RTN","C0CQRY2",84,0)
+ ;
+"RTN","C0CQRY2",85,0)
+ ;
+"RTN","C0CQRY2",86,0)
+SEARCH ; Search subscript for a specific collection date/time
+"RTN","C0CQRY2",87,0)
+ ;
+"RTN","C0CQRY2",88,0)
+ K LA763
+"RTN","C0CQRY2",89,0)
+ S LA763(0)=$G(^LR(LRDFN,LRSS,LRIDT,0))
+"RTN","C0CQRY2",90,0)
+ ;
+"RTN","C0CQRY2",91,0)
+ ; Only CH, MI, and BB subscripts store pointer to file #61 in 5th piece of zeroth node.
+"RTN","C0CQRY2",92,0)
+ ; Quit if specific specimen codes and they do not match
+"RTN","C0CQRY2",93,0)
+ I "CHMIBB"[LRSS S LA761=+$P(LA763(0),"^",5)
+"RTN","C0CQRY2",94,0)
+ E  S LA761=0
+"RTN","C0CQRY2",95,0)
+ I LA761,$D(^TMP("LA7-61",$J)),'$D(^TMP("LA7-61",$J,LA761)) Q
+"RTN","C0CQRY2",96,0)
+ ;
+"RTN","C0CQRY2",97,0)
+ ; --- Chemistry
+"RTN","C0CQRY2",98,0)
+ I LRSS="CH" D CHSS Q
+"RTN","C0CQRY2",99,0)
+ ; --- Microbiology
+"RTN","C0CQRY2",100,0)
+ I LRSS="MI" D MISS Q
+"RTN","C0CQRY2",101,0)
+ ; --- Surgical pathology
+"RTN","C0CQRY2",102,0)
+ I LRSS="SP" D APSS Q
+"RTN","C0CQRY2",103,0)
+ ; --- Cytology
+"RTN","C0CQRY2",104,0)
+ I LRSS="CY" D APSS Q
+"RTN","C0CQRY2",105,0)
+ ; --- Electron Micrscopsy
+"RTN","C0CQRY2",106,0)
+ I LRSS="EM" D APSS Q
+"RTN","C0CQRY2",107,0)
+ ; --- Autopsy
+"RTN","C0CQRY2",108,0)
+ I LRSS="AU" D APSS Q
+"RTN","C0CQRY2",109,0)
+ ; --- Blood Bank
+"RTN","C0CQRY2",110,0)
+ I LRSS="BB" D BBSS Q
+"RTN","C0CQRY2",111,0)
+ Q
+"RTN","C0CQRY2",112,0)
+ ;
+"RTN","C0CQRY2",113,0)
+ ;
+"RTN","C0CQRY2",114,0)
+CHSS ; Search "CH" datanames for matching codes
+"RTN","C0CQRY2",115,0)
+ ;
+"RTN","C0CQRY2",116,0)
+ N LA7X,LRSB
+"RTN","C0CQRY2",117,0)
+ ;
+"RTN","C0CQRY2",118,0)
+ S LRSB=1
+"RTN","C0CQRY2",119,0)
+ F  S LRSB=$O(^LR(LRDFN,LRSS,LRIDT,LRSB)) Q:'LRSB  D
+"RTN","C0CQRY2",120,0)
+ . S LA7X=$G(^LR(LRDFN,LRSS,LRIDT,LRSB))
+"RTN","C0CQRY2",121,0)
+ . I $D(^AUPNVLAB) D LNCHK^C0CLA7Q ; WV check for IHS.
+"RTN","C0CQRY2",122,0)
+ . S LA7CODE=$$DEFCODE^LA7VHLU5(LRSS,LRSB,$P(LA7X,"^",3),LA761)
+"RTN","C0CQRY2",123,0)
+ . D CHECK
+"RTN","C0CQRY2",124,0)
+ ;
+"RTN","C0CQRY2",125,0)
+ Q
+"RTN","C0CQRY2",126,0)
+ ;
+"RTN","C0CQRY2",127,0)
+ ;
+"RTN","C0CQRY2",128,0)
+MISS ; Search "MI" subscripts for matching codes
+"RTN","C0CQRY2",129,0)
+ ;
+"RTN","C0CQRY2",130,0)
+ N LA7ND,LRSB
+"RTN","C0CQRY2",131,0)
+ ;
+"RTN","C0CQRY2",132,0)
+ S LA7ND=0
+"RTN","C0CQRY2",133,0)
+ F LA7ND=1,5,8,11,16 I $D(^LR(LRDFN,LRSS,LRIDT,LA7ND)) D
+"RTN","C0CQRY2",134,0)
+ . S LRSB=$S(LA7ND=1:11,LA7ND=5:14,LA7ND=8:18,LA7ND=11:22,LA7ND=16:33,1:11)
+"RTN","C0CQRY2",135,0)
+ . S LA7CODE=$$DEFCODE^LA7VHLU5(LRSS,LRSB,"",LA761)
+"RTN","C0CQRY2",136,0)
+ . D CHECK
+"RTN","C0CQRY2",137,0)
+ Q
+"RTN","C0CQRY2",138,0)
+ ;
+"RTN","C0CQRY2",139,0)
+ ;
+"RTN","C0CQRY2",140,0)
+APSS ; Search AP subscripts for matching codes
+"RTN","C0CQRY2",141,0)
+ ; AP results are currently not coded - use defaults
+"RTN","C0CQRY2",142,0)
+ ;
+"RTN","C0CQRY2",143,0)
+ N LA7CODE,LRSB
+"RTN","C0CQRY2",144,0)
+ ;
+"RTN","C0CQRY2",145,0)
+ S LRSB=.012
+"RTN","C0CQRY2",146,0)
+ S LA7CODE=$$DEFCODE^LA7VHLU5(LRSS,LRSB,"","")
+"RTN","C0CQRY2",147,0)
+ D CHECK
+"RTN","C0CQRY2",148,0)
+ ;
+"RTN","C0CQRY2",149,0)
+ Q
+"RTN","C0CQRY2",150,0)
+ ;
+"RTN","C0CQRY2",151,0)
+ ;
+"RTN","C0CQRY2",152,0)
+BBSS ; Search BB subscript for matching codes
+"RTN","C0CQRY2",153,0)
+ ; *** This subscript currently not supported ***
+"RTN","C0CQRY2",154,0)
+ Q
+"RTN","C0CQRY2",155,0)
+ ;
+"RTN","C0CQRY2",156,0)
+ ;
+"RTN","C0CQRY2",157,0)
+CHECK ; Check NLT order/result and LOINC codes.
+"RTN","C0CQRY2",158,0)
+ ;
+"RTN","C0CQRY2",159,0)
+ N LA7QUIT
+"RTN","C0CQRY2",160,0)
+ ;
+"RTN","C0CQRY2",161,0)
+ ; If wildcard then store
+"RTN","C0CQRY2",162,0)
+ ; Otherwise check for specific NLT order/result and LOINC codes
+"RTN","C0CQRY2",163,0)
+ I LA7SC="*" D STORE Q
+"RTN","C0CQRY2",164,0)
+ S LA7QUIT=0
+"RTN","C0CQRY2",165,0)
+ F I=1:1:3 D  Q:LA7QUIT
+"RTN","C0CQRY2",166,0)
+ . ; If no test code then skip
+"RTN","C0CQRY2",167,0)
+ . I '$L($P(LA7CODE,"!",I)) Q
+"RTN","C0CQRY2",168,0)
+ . ; If test code does not match a search code then quit
+"RTN","C0CQRY2",169,0)
+ . I '$D(^TMP($S(I=3:"LA7-LN",1:"LA7-NLT"),$J,$P(LA7CODE,"!",I))) Q
+"RTN","C0CQRY2",170,0)
+ . D STORE S LA7QUIT=1
+"RTN","C0CQRY2",171,0)
+ ;
+"RTN","C0CQRY2",172,0)
+ Q
+"RTN","C0CQRY2",173,0)
+ ;
+"RTN","C0CQRY2",174,0)
+ ;
+"RTN","C0CQRY2",175,0)
+STORE ; Store entry for building in HL7 message
+"RTN","C0CQRY2",176,0)
+ ;
+"RTN","C0CQRY2",177,0)
+ S ^TMP("LA7-QRY",$J,LRDFN,LRIDT,LRSS,LA7CODE,LRSB)=""
+"RTN","C0CQRY2",178,0)
+ Q
+"RTN","C0CQRY2",179,0)
+ ;
+"RTN","C0CQRY2",180,0)
+ ;
+"RTN","C0CQRY2",181,0)
+SETDFN(LA7X) ; Setup DFN and other lab variables.
+"RTN","C0CQRY2",182,0)
+ ;
+"RTN","C0CQRY2",183,0)
+ S DFN=LA7X,LRDFN=$P($G(^DPT(DFN,"LR")),"^")
+"RTN","C0CQRY2",184,0)
+ Q
+"RTN","C0CRIMA")
+0^38^B331901748
+"RTN","C0CRIMA",1,0)
+C0CRIMA   ; CCDCCR/GPL - RIM REPORT ROUTINES; 6/6/08
+"RTN","C0CRIMA",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CRIMA",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota.
+"RTN","C0CRIMA",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CRIMA",5,0)
+ ;See attached copy of the License.
+"RTN","C0CRIMA",6,0)
+ ;
+"RTN","C0CRIMA",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CRIMA",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CRIMA",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CRIMA",10,0)
+ ;(at your option) any later version.
+"RTN","C0CRIMA",11,0)
+ ;
+"RTN","C0CRIMA",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CRIMA",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CRIMA",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CRIMA",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CRIMA",16,0)
+ ;
+"RTN","C0CRIMA",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CRIMA",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CRIMA",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CRIMA",20,0)
+ ;
+"RTN","C0CRIMA",21,0)
+ ; THESE ROUTINES EXAMINE ONE OR MORE, UP TO ALL, OF THE PATIENTS ON THE
+"RTN","C0CRIMA",22,0)
+ ; SYSTEM TO DETERMINE HOW COMPLETE THE RESULTING CCR OR CCD WOULD BE FOR
+"RTN","C0CRIMA",23,0)
+ ; THESE PATIENTS. IT BEGINS TO MEASURE "HL7 RIM COHERENCE" WHICH IS HOW USEFUL
+"RTN","C0CRIMA",24,0)
+ ; THE VARIABLES WILL BE TO A RIM-MODELED APPLICATION AFTER THEY ARE
+"RTN","C0CRIMA",25,0)
+ ; CONVEYED VIA THE CCR OR CCD.
+"RTN","C0CRIMA",26,0)
+ ; FACTORS THAT AFFECT RIM COHERENCE INCLUDE:
+"RTN","C0CRIMA",27,0)
+ ;    1. THE PRESENSE OF CLINICAL DATA IN A SECTION
+"RTN","C0CRIMA",28,0)
+ ;    2. ARE THE DATA ELEMENTS TIME-BOUND
+"RTN","C0CRIMA",29,0)
+ ;    3. ARE THE DATA ELEMENTS CODED WITH SNOMED OR LOINC ETC
+"RTN","C0CRIMA",30,0)
+ ;    4. ARE SOURCE ACTORS ASSOCIATED WITH THE DATA ELEMENTS
+"RTN","C0CRIMA",31,0)
+ ;    5. ARE ACTORS IDENTIFIED REGARDING THEIR ROLE
+"RTN","C0CRIMA",32,0)
+ ;    .. AND OTHER FACTORS YET TO BE DETERMINED
+"RTN","C0CRIMA",33,0)
+ ;
+"RTN","C0CRIMA",34,0)
+ ;    SINCE THESE MEASUREMENTS ARE DONE AT THE VARIABLE LEVEL, THEY
+"RTN","C0CRIMA",35,0)
+ ;    REFLECT ON RIM COHERENCE WHETHER THE CCR OR THE CCD IS USED FOR
+"RTN","C0CRIMA",36,0)
+ ;    CONVEYANCE TO THE RIM APPLICATION.
+"RTN","C0CRIMA",37,0)
+ ;
+"RTN","C0CRIMA",38,0)
+ ;
+"RTN","C0CRIMA",39,0)
+ANALYZE(BEGDFN,DFNCNT,APARMS) ; RIM COHERANCE ANALYSIS ROUTINE
+"RTN","C0CRIMA",40,0)
+    ; BEGINS AT BEGDFN AND GOES FOR DFNCNT PATIENTS
+"RTN","C0CRIMA",41,0)
+    ; TO RESUME AT NEXT PATIENT, USE BEGDFN=""
+"RTN","C0CRIMA",42,0)
+    ; USE RESET^C0CRIMA TO RESET TO TOP OF PATIENT LIST
+"RTN","C0CRIMA",43,0)
+    ; APARMS ARE PARAMETERS TO BE USED IN THE EXTRACTION
+"RTN","C0CRIMA",44,0)
+    ; SEE C0CPARMS FOR SUPPORTED PARAMTERS
+"RTN","C0CRIMA",45,0)
+    ;
+"RTN","C0CRIMA",46,0)
+    N RIMARY,RIMTMP,RIMI,RIMDFN,RATTR
+"RTN","C0CRIMA",47,0)
+    N CCRGLO
+"RTN","C0CRIMA",48,0)
+    S C0CCHK=0 ; CHECKSUM FLAG
+"RTN","C0CRIMA",49,0)
+    D ASETUP ; SET UP VARIABLES AND GLOBALS
+"RTN","C0CRIMA",50,0)
+    D AINIT ; INITIALIZE ATTRIBUTE VALUE TABLE
+"RTN","C0CRIMA",51,0)
+    I '$D(@RIMBASE@("RESUME")) S @RIMBASE@("RESUME")=$O(^DPT(0)) ; FIRST TIME
+"RTN","C0CRIMA",52,0)
+    S RESUME=@RIMBASE@("RESUME") ; WHERE WE LEFT OFF LAST RUN
+"RTN","C0CRIMA",53,0)
+    S RIMDFN=BEGDFN ; BEGIN WITH THE BEGDFN PATIENT
+"RTN","C0CRIMA",54,0)
+    I RIMDFN="" S RIMDFN=RESUME
+"RTN","C0CRIMA",55,0)
+    I +RIMDFN=0 D  Q  ; AT THE END OF THE PATIENTS
+"RTN","C0CRIMA",56,0)
+    . W "END OF PATIENT LIST, CALL RESET^C0CRIMA",!
+"RTN","C0CRIMA",57,0)
+    I '$D(APARMS) S APARMS="" ; DEFAULT NO OVERRIDE PARMS
+"RTN","C0CRIMA",58,0)
+    F RIMI=1:1:DFNCNT  D  Q:+RIMDFN=0  ; FOR DFNCNT NUMBER OF PATIENTS OR END
+"RTN","C0CRIMA",59,0)
+    . K @RIMBASE@("VARS",RIMDFN) ; CLEAR OUT OLD VARS
+"RTN","C0CRIMA",60,0)
+    . D CCRRPC^C0CCCR(.CCRGLO,RIMDFN,APARMS,"CCR") ;PROCESS THE CCR
+"RTN","C0CRIMA",61,0)
+    . W RIMDFN,!
+"RTN","C0CRIMA",62,0)
+    . ;
+"RTN","C0CRIMA",63,0)
+    . ; COPY ALL THE VARIABLES TO THE RIM MAP AREA INDEXED BY PATIENT
+"RTN","C0CRIMA",64,0)
+    . ;
+"RTN","C0CRIMA",65,0)
+    . I $D(^TMP("C0CCCR",$J,"PROBVALS",1)) D  ; PROBLEM VARS EXISTS
+"RTN","C0CRIMA",66,0)
+    . . M @RIMBASE@("VARS",RIMDFN,"PROBLEMS")=^TMP("C0CCCR",$J,"PROBVALS")
+"RTN","C0CRIMA",67,0)
+    . . S @RIMBASE@("VARS",RIMDFN,"PROBLEMS",0)=$O(^TMP("C0CCCR",$J,"PROBVALS",""),-1)
+"RTN","C0CRIMA",68,0)
+    . I $D(^TMP("C0CCCR",$J,"VITALS",1)) D  ; VITALS VARS EXISTS
+"RTN","C0CRIMA",69,0)
+    . . M @RIMBASE@("VARS",RIMDFN,"VITALS")=^TMP("C0CCCR",$J,"VITALS")
+"RTN","C0CRIMA",70,0)
+    . I $D(^TMP("C0CCCR",$J,"MEDMAP",1)) D  ; MEDS VARS EXISTS
+"RTN","C0CRIMA",71,0)
+    . . M @RIMBASE@("VARS",RIMDFN,"MEDS")=^TMP("C0CCCR",$J,"MEDMAP")
+"RTN","C0CRIMA",72,0)
+    . I $D(^TMP("C0CCCR",$J,"ALERTS",1,"ALERTOBJECTID")) D  ; ALERTS EXIST
+"RTN","C0CRIMA",73,0)
+    . . W "FOUND ALERT VARS",!
+"RTN","C0CRIMA",74,0)
+    . . M @RIMBASE@("VARS",RIMDFN,"ALERTS")=^TMP("C0CCCR",$J,"ALERTS")
+"RTN","C0CRIMA",75,0)
+    . I $D(^TMP("C0CCCR",$J,"RESULTS",0)) D  ; RESULTS EXIST
+"RTN","C0CRIMA",76,0)
+    . . W "FOUND RESULTS VARS",!
+"RTN","C0CRIMA",77,0)
+    . . M @RIMBASE@("VARS",RIMDFN,"RESULTS")=^TMP("C0CCCR",$J,"RESULTS")
+"RTN","C0CRIMA",78,0)
+    . S C0CCHK=0
+"RTN","C0CRIMA",79,0)
+    . I $$CHKSUM(RIMDFN) D  ; CHECKSUM HAS CHANGED
+"RTN","C0CRIMA",80,0)
+    . . W "CHECKSUM IS NEW OR HAS CHANGED",!
+"RTN","C0CRIMA",81,0)
+    . . ;ZWR ^TMP("C0CRIM","CHKSUM",RIMDFN,*)
+"RTN","C0CRIMA",82,0)
+    . . S C0CCHK=1
+"RTN","C0CRIMA",83,0)
+    . K ^TMP("C0CCCR",$J) ; KILL WORK AREA FOR CCR BUILDING
+"RTN","C0CRIMA",84,0)
+    . ;
+"RTN","C0CRIMA",85,0)
+    . ; EVALUATE THE VARIABLES AND CREATE AN ATTRIBUTE MAP
+"RTN","C0CRIMA",86,0)
+    . ;
+"RTN","C0CRIMA",87,0)
+    . S RATTR=$$SETATTR(RIMDFN) ; SET THE ATTRIBUTE STRING BASED ON THE VARS
+"RTN","C0CRIMA",88,0)
+    . S @RIMBASE@("ATTR",RIMDFN)=RATTR ; SAVE THE ATRIBUTES FOR THIS PAT
+"RTN","C0CRIMA",89,0)
+    . ;
+"RTN","C0CRIMA",90,0)
+    . ; INCREMENT THE COUNT OF PATIENTS WITH THESE ATTRIBUTES IN ATTRTBL
+"RTN","C0CRIMA",91,0)
+    . ;
+"RTN","C0CRIMA",92,0)
+    . ; I '$D(@RIMBASE@("ATTRTBL",RATTR)) D  ; IF FIRST PAT WITH THESE ATTRS
+"RTN","C0CRIMA",93,0)
+    . ; . S @RIMBASE@("ATTRTBL",RATTR)=0 ; DEFAULT VALUE TO BE INCREMENTED
+"RTN","C0CRIMA",94,0)
+    . ; S @RIMBASE@("ATTRTBL",RATTR)=@RIMBASE@("ATTRTBL",RATTR)+1 ; INCREMENT
+"RTN","C0CRIMA",95,0)
+    . ;
+"RTN","C0CRIMA",96,0)
+    . N CATNAME,CATTBL
+"RTN","C0CRIMA",97,0)
+    . ; S CATBASE=$NA(@RIMBASE@("ANALYSIS"))
+"RTN","C0CRIMA",98,0)
+    . S CATNAME=""
+"RTN","C0CRIMA",99,0)
+    . D CPUSH(.CATNAME,RIMBASE,"RIMTBL",RIMDFN,RATTR) ; ADD TO CATEGORY
+"RTN","C0CRIMA",100,0)
+    . W "CATEGORY NAME: ",CATNAME,!
+"RTN","C0CRIMA",101,0)
+    . ;
+"RTN","C0CRIMA",102,0)
+    . F  S RIMDFN=$O(^DPT(RIMDFN)) Q:'$$PTST^C0CSYS(RIMDFN) ; NEXT PATIENT
+"RTN","C0CRIMA",103,0)
+    . ; PTST TESTS TO SEE IF PATIENT WAS MERGED
+"RTN","C0CRIMA",104,0)
+    . ; IF CCRTEST=0, PTST WILL CHECK TO SEE IF THIS IS A TEST PATIENT
+"RTN","C0CRIMA",105,0)
+    . ; AND WE SKIP IT
+"RTN","C0CRIMA",106,0)
+    . S @RIMBASE@("RESUME")=RIMDFN ; WHERE WE ARE LEAVING OFF THIS RUN
+"RTN","C0CRIMA",107,0)
+    ; D PARY^C0CXPATH(@RIMBASE@("ATTRTBL"))
+"RTN","C0CRIMA",108,0)
+    Q
+"RTN","C0CRIMA",109,0)
+    ;
+"RTN","C0CRIMA",110,0)
+SETATTR(SDFN) ; SET ATTRIBUTES BASED ON VARS
+"RTN","C0CRIMA",111,0)
+    N SBASE,SATTR
+"RTN","C0CRIMA",112,0)
+    S SBASE=$NA(@RIMBASE@("VARS",SDFN))
+"RTN","C0CRIMA",113,0)
+    D APOST("SATTR","RIMTBL","HEADER")
+"RTN","C0CRIMA",114,0)
+    I $D(@SBASE@("PROBLEMS",1)) D  ;
+"RTN","C0CRIMA",115,0)
+    . D APOST("SATTR","RIMTBL","PROBLEMS")
+"RTN","C0CRIMA",116,0)
+    . ; W "POSTING PROBLEMS",!
+"RTN","C0CRIMA",117,0)
+    I $D(@SBASE@("VITALS",1)) D APOST("SATTR","RIMTBL","VITALS")
+"RTN","C0CRIMA",118,0)
+    I $D(@SBASE@("IMMUNE",1)) D  ;IMMUNIZATIONS PRESENT
+"RTN","C0CRIMA",119,0)
+    . D APOST("SATTR","RIMTBL","IMMUNE")
+"RTN","C0CRIMA",120,0)
+    . N ZR,ZI
+"RTN","C0CRIMA",121,0)
+    . D GETPA(.ZR,SDFN,"IMMUNE","IMMUNEPRODUCTCODE")
+"RTN","C0CRIMA",122,0)
+    . I ZR(0)>0 D APOST("SATTR","RIMTBL","IMMUNECODE") ;IMMUNIZATION CODES
+"RTN","C0CRIMA",123,0)
+    I $D(@SBASE@("MEDS",1)) D  ; IF THE PATIENT HAS MEDS VARIABLES
+"RTN","C0CRIMA",124,0)
+    . D APOST("SATTR","RIMTBL","MEDS")
+"RTN","C0CRIMA",125,0)
+    . N ZR,ZI
+"RTN","C0CRIMA",126,0)
+    . D GETPA(.ZR,SDFN,"MEDS","MEDPRODUCTNAMECODEVALUE") ;CHECK FOR MED CODES
+"RTN","C0CRIMA",127,0)
+    . I ZR(0)>0 D  ; VAR LOOKUP WAS GOOD, CHECK FOR NON=NULL RETURN
+"RTN","C0CRIMA",128,0)
+    . . F ZI=1:1:ZR(0) D  ; LOOP THROUGH RETURNED VAR^VALUE PAIRS
+"RTN","C0CRIMA",129,0)
+    . . . I $P(ZR(ZI),"^",2)'="" D APOST("SATTR","RIMTBL","MEDSCODE") ;CODES
+"RTN","C0CRIMA",130,0)
+    . ; D PATD^C0CRIMA(2,"MEDS","MEDPRODUCTNAMECODEVALUE") CHECK FOR MED CODES
+"RTN","C0CRIMA",131,0)
+    I $D(@SBASE@("ALERTS",1)) D  ; IF THE PATIENT HAS ALERTS
+"RTN","C0CRIMA",132,0)
+    . D APOST("SATTR","RIMTBL","ALERTS")
+"RTN","C0CRIMA",133,0)
+    . N ZR,ZI
+"RTN","C0CRIMA",134,0)
+    . D GETPA(.ZR,SDFN,"ALERTS","ALERTAGENTPRODUCTCODEVALUE") ;REACTANT CODES
+"RTN","C0CRIMA",135,0)
+    . I ZR(0)>0 D  ; VAR LOOKUP WAS GOOD, CHECK FOR NON=NULL RETURN
+"RTN","C0CRIMA",136,0)
+    . . F ZI=1:1:ZR(0) D  ; LOOP THROUGH RETURNED VAR^VALUE PAIRS
+"RTN","C0CRIMA",137,0)
+    . . . I $P(ZR(ZI),"^",2)'="" D APOST("SATTR","RIMTBL","ALERTSCODE") ;CODES
+"RTN","C0CRIMA",138,0)
+    I $D(@SBASE@("RESULTS",1)) D  ; IF THE PATIENT HAS LABS VARIABLES
+"RTN","C0CRIMA",139,0)
+    . D APOST("SATTR","RIMTBL","RESULTS")
+"RTN","C0CRIMA",140,0)
+    . N ZR,ZI
+"RTN","C0CRIMA",141,0)
+    . S ZR(0)=0 ; INITIALIZE TO NONE
+"RTN","C0CRIMA",142,0)
+    . D RPCGV(.ZR,SDFN,"RESULTS") ;CHECK FOR LABS CODES
+"RTN","C0CRIMA",143,0)
+    . ; D PARY^C0CXPATH("ZR") ;
+"RTN","C0CRIMA",144,0)
+    . I ZR(0)>0 D  ; VAR LOOKUP WAS GOOD, CHECK FOR NON=NULL RETURN
+"RTN","C0CRIMA",145,0)
+    . . F ZI=1:1:ZR(0) D  ; LOOP THROUGH RETURNED VAR^VALUE PAIRS
+"RTN","C0CRIMA",146,0)
+    . . . I $P(ZR(ZI),"^",2)="RESULTTESTCODINGSYSTEM" D  ; LOINC CODE CHECK
+"RTN","C0CRIMA",147,0)
+    . . . . I $P(ZR(ZI),"^",3)="LOINC" D APOST("SATTR","RIMTBL","RESULTSLN") ;
+"RTN","C0CRIMA",148,0)
+    ; D APOST("SATTR","RIMTBL","NOTEXTRACTED") ; OUTPUT NOT YET PRODUCED
+"RTN","C0CRIMA",149,0)
+    I $D(@SBASE@("PROCEDURES",1)) D  ;
+"RTN","C0CRIMA",150,0)
+    . D APOST("SATTR","RIMTBL","PROCEDURES")
+"RTN","C0CRIMA",151,0)
+    W "ATTRIBUTES: ",SATTR,!
+"RTN","C0CRIMA",152,0)
+    Q SATTR
+"RTN","C0CRIMA",153,0)
+    ;
+"RTN","C0CRIMA",154,0)
+RESET ; KILL RESUME INDICATOR TO START OVER. ALSO KILL RIM TMP VALUES
+"RTN","C0CRIMA",155,0)
+    K ^TMP("C0CRIM","RESUME")
+"RTN","C0CRIMA",156,0)
+    K ^TMP("C0CRIM")
+"RTN","C0CRIMA",157,0)
+    Q
+"RTN","C0CRIMA",158,0)
+    ;
+"RTN","C0CRIMA",159,0)
+CLIST ; LIST THE CATEGORIES
+"RTN","C0CRIMA",160,0)
+    ;
+"RTN","C0CRIMA",161,0)
+    I '$D(RIMBASE) D ASETUP ; FOR COMMAND LINE CALLS
+"RTN","C0CRIMA",162,0)
+    N CLBASE,CLNUM,ZI,CLIDX
+"RTN","C0CRIMA",163,0)
+    S CLBASE=$NA(@RIMBASE@("RIMTBL","CATS"))
+"RTN","C0CRIMA",164,0)
+    S CLNUM=@CLBASE@(0)
+"RTN","C0CRIMA",165,0)
+    F ZI=1:1:CLNUM D  ; LOOP THROUGH THE CATEGORIES
+"RTN","C0CRIMA",166,0)
+    . S CLIDX=@CLBASE@(ZI)
+"RTN","C0CRIMA",167,0)
+    . W "(",$P(@CLBASE@(CLIDX),"^",1)
+"RTN","C0CRIMA",168,0)
+    . W ":",$P(@CLBASE@(CLIDX),"^",2),") "
+"RTN","C0CRIMA",169,0)
+    . W CLIDX,!
+"RTN","C0CRIMA",170,0)
+    ; D PARY^C0CXPATH(CLBASE)
+"RTN","C0CRIMA",171,0)
+    Q
+"RTN","C0CRIMA",172,0)
+    ;
+"RTN","C0CRIMA",173,0)
+CPUSH(CATRTN,CBASE,CTBL,CDFN,CATTR) ; ADD PATIENTS TO CATEGORIES
+"RTN","C0CRIMA",174,0)
+    ; AND PASS BACK THE NAME OF THE CATEGORY TO WHICH THE PATIENT
+"RTN","C0CRIMA",175,0)
+    ; WAS ADDED IN CATRTN, WHICH IS PASSED BY REFERENCE
+"RTN","C0CRIMA",176,0)
+    ; CBASE IS WHERE TO PUT THE CATEGORIES PASSED BY NAME
+"RTN","C0CRIMA",177,0)
+    ; CTBL IS THE NAME OF THE TABLE USED TO CREATE THE ATTRIBUTES,
+"RTN","C0CRIMA",178,0)
+    ; PASSED BY NAME AND USED TO CREATE CATEGORY NAMES IE "@CTBL_X"
+"RTN","C0CRIMA",179,0)
+    ; WHERE X IS THE CATEGORY NUMBER. CTBL(0) IS THE NUMBER OF CATEGORIES
+"RTN","C0CRIMA",180,0)
+    ; CATBL(X)=CATTR STORES THE ATTRIBUTE IN THE CATEGORY
+"RTN","C0CRIMA",181,0)
+    ; CDFN IS THE PATIENT DFN, CATTR IS THE ATTRIBUTE STRING
+"RTN","C0CRIMA",182,0)
+    ; THE LIST OF PATIENTS IN A CATEGORY IS STORED INDEXED BY CATEGORY
+"RTN","C0CRIMA",183,0)
+    ; NUMBER IE CTBL_X(CDFN)=""
+"RTN","C0CRIMA",184,0)
+    ;
+"RTN","C0CRIMA",185,0)
+    ; N CCTBL,CENTRY,CNUM,CCOUNT,CPATLIST
+"RTN","C0CRIMA",186,0)
+    S CCTBL=$NA(@CBASE@(CTBL,"CATS"))
+"RTN","C0CRIMA",187,0)
+    W "CBASE: ",CCTBL,!
+"RTN","C0CRIMA",188,0)
+    ;
+"RTN","C0CRIMA",189,0)
+    I '$D(@CCTBL@(CATTR)) D  ; FIRST PATIENT IN THIS CATEGORY
+"RTN","C0CRIMA",190,0)
+    . D PUSH^C0CXPATH(CCTBL,CATTR) ; ADD THE CATEGORY TO THE ARRAY
+"RTN","C0CRIMA",191,0)
+    . S CNUM=@CCTBL@(0) ; ARRAY ENTRY NUMBER FOR THIS CATEGORY
+"RTN","C0CRIMA",192,0)
+    . S CENTRY=CTBL_"_"_CNUM_U_0 ; TABLE ENTRY DEFAULT
+"RTN","C0CRIMA",193,0)
+    . S @CCTBL@(CATTR)=CENTRY ; DEFAULT NON INCREMENTED TABLE ENTRY
+"RTN","C0CRIMA",194,0)
+    . ; NOTE THAT P1 IS THE CATEGORY NAME MADE UP OF THE TABLE NAME
+"RTN","C0CRIMA",195,0)
+    . ; AND CATGORY ARRAY NUMBER. P2 IS THE COUNT WHICH IS INITIALLY 0
+"RTN","C0CRIMA",196,0)
+    ;
+"RTN","C0CRIMA",197,0)
+    S CCOUNT=$P(@CCTBL@(CATTR),U,2) ; COUNT OF PATIENTS IN THIS CATEGORY
+"RTN","C0CRIMA",198,0)
+    S CCOUNT=CCOUNT+1 ; INCREMENT THE COUNT
+"RTN","C0CRIMA",199,0)
+    S $P(@CCTBL@(CATTR),U,2)=CCOUNT ; PUT IT BACK
+"RTN","C0CRIMA",200,0)
+    ;
+"RTN","C0CRIMA",201,0)
+    S CATRTN=$P(@CCTBL@(CATTR),U,1) ; THE CATEGORY NAME WHICH IS RETURNED
+"RTN","C0CRIMA",202,0)
+    ;
+"RTN","C0CRIMA",203,0)
+    S CPATLIST=$NA(@CBASE@(CTBL,"PATS",CATRTN)) ; BASE OF PAT LIST FOR THIS CAT
+"RTN","C0CRIMA",204,0)
+    W "PATS BASE: ",CPATLIST,!
+"RTN","C0CRIMA",205,0)
+    S @CPATLIST@(CDFN)="" ; ADD THIS PATIENT TO THE CAT PAT LIST
+"RTN","C0CRIMA",206,0)
+    ;
+"RTN","C0CRIMA",207,0)
+    Q
+"RTN","C0CRIMA",208,0)
+    ;
+"RTN","C0CRIMA",209,0)
+CHKSUM(CKDFN) ; DOES A CHECKSUM AND STORES IT IN MUMPS GLOBALS
+"RTN","C0CRIMA",210,0)
+ ; 
+"RTN","C0CRIMA",211,0)
+ S C0CCKB=$NA(^TMP("C0CRIM","CHKSUM")) ;CHECKSUM BASE
+"RTN","C0CRIMA",212,0)
+ S C0CGLB=$NA(^TMP("C0CRIM","VARS")) ;CCR VARIABLE BASE
+"RTN","C0CRIMA",213,0)
+ S C0CI=""
+"RTN","C0CRIMA",214,0)
+ F  S C0CI=$O(@C0CGLB@(CKDFN,C0CI)) Q:C0CI=""  D  ;FOR EACH DOMAIN
+"RTN","C0CRIMA",215,0)
+ . ;W "DFN:",CKDFN," DOMAIN:",C0CI,!
+"RTN","C0CRIMA",216,0)
+ . S C0CJ=$NA(@C0CGLB@(CKDFN,C0CI))
+"RTN","C0CRIMA",217,0)
+ . I C0CI="HEADER" D  ; HAVE TO TAKE OUT THE "DATE GENERATED"
+"RTN","C0CRIMA",218,0)
+ . . S C0CDT=@C0CGLB@(CKDFN,C0CI,1,"DATETIME")
+"RTN","C0CRIMA",219,0)
+ . . K @C0CGLB@(CKDFN,C0CI,1,"DATETIME")
+"RTN","C0CRIMA",220,0)
+ . S C0CCK(C0CI)=$$CHKSUM^XUSESIG1(C0CJ)
+"RTN","C0CRIMA",221,0)
+ . I C0CI="HEADER" D  ; PUT IT BACK
+"RTN","C0CRIMA",222,0)
+ . . S @C0CGLB@(CKDFN,C0CI,1,"DATETIME")=C0CDT
+"RTN","C0CRIMA",223,0)
+ S C0CK="C0CCK" ;
+"RTN","C0CRIMA",224,0)
+ S C0CALL=$$CHKSUM^XUSESIG1(C0CK) ;CHECKSUM OF ALL DOMAIN CHECKSUMS
+"RTN","C0CRIMA",225,0)
+ S CHKR=0 ; RESULT DEFAULT
+"RTN","C0CRIMA",226,0)
+ I $D(^TMP("C0CRIM","CHKSUM",CKDFN,"ALL")) D  ; OLD CHECKSUM EXISTS
+"RTN","C0CRIMA",227,0)
+ . I @C0CCKB@(CKDFN,"ALL")'=C0CALL S CHKR=1
+"RTN","C0CRIMA",228,0)
+ E  S CHKR=1 ;CHECKSUM IS NEW
+"RTN","C0CRIMA",229,0)
+ S @C0CCKB@(CKDFN,"ALL")=C0CALL
+"RTN","C0CRIMA",230,0)
+ M @C0CCKB@(CKDFN,"DOMAIN")=C0CCK
+"RTN","C0CRIMA",231,0)
+ ;ZWR ^TMP("C0CRIM","CHKSUM",CKDFN,*)
+"RTN","C0CRIMA",232,0)
+ Q CHKR
+"RTN","C0CRIMA",233,0)
+ ;
+"RTN","C0CRIMA",234,0)
+CCOUNT ; RECOUNT THE CATEGORIES.. USE IN CASE OF RESTART OF ANALYZE
+"RTN","C0CRIMA",235,0)
+    ;
+"RTN","C0CRIMA",236,0)
+    I '$D(RIMBASE) D ASETUP ; FOR COMMAND LINE CALLS
+"RTN","C0CRIMA",237,0)
+    N ZI,ZJ,ZCNT,ZIDX,ZCAT,ZATR,ZTOT
+"RTN","C0CRIMA",238,0)
+    S ZCBASE=$NA(@RIMBASE@("RIMTBL","CATS")) ; BASE OF CATEGORIES
+"RTN","C0CRIMA",239,0)
+    S ZPBASE=$NA(@RIMBASE@("RIMTBL","PATS")) ; BASE OF PATIENTS
+"RTN","C0CRIMA",240,0)
+    S ZTOT=0 ; INITIALIZE OVERALL TOTAL
+"RTN","C0CRIMA",241,0)
+    F ZI=1:1:@ZCBASE@(0) D  ; FOR ALL CATS
+"RTN","C0CRIMA",242,0)
+    . S ZCNT=0
+"RTN","C0CRIMA",243,0)
+    . S ZATR=@ZCBASE@(ZI) ; THE ATTRIBUTE OF THE CATEGORY
+"RTN","C0CRIMA",244,0)
+    . S ZCAT=$P(@ZCBASE@(ZATR),"^",1) ; USE IT TO LOOK UP THE CATEGORY NAME
+"RTN","C0CRIMA",245,0)
+    . ; S ZIDX=$O(@ZPBASE@(ZCAT,"")) ; FIRST PATIENT IN LIST
+"RTN","C0CRIMA",246,0)
+    . ; F ZJ=0:0 D  Q:$O(@ZPBASE@(ZCAT,ZIDX))="" ; ALL PATIENTS IN THE LISTS
+"RTN","C0CRIMA",247,0)
+    . ; . S ZCNT=ZCNT+1 ; INCREMENT THE COUNT
+"RTN","C0CRIMA",248,0)
+    . ; . W ZCAT," DFN:",ZIDX," COUNT:",ZCNT,!
+"RTN","C0CRIMA",249,0)
+    . ; . S ZIDX=$O(@ZPBASE@(ZCAT,ZIDX))
+"RTN","C0CRIMA",250,0)
+    . S ZCNT=$$CNTLST($NA(@ZPBASE@(ZCAT)))
+"RTN","C0CRIMA",251,0)
+    . S $P(@ZCBASE@(ZATR),"^",2)=ZCNT ; UPDATE THE COUNT IN THE CAT RECORD
+"RTN","C0CRIMA",252,0)
+    . S ZTOT=ZTOT+ZCNT
+"RTN","C0CRIMA",253,0)
+    W "TOTAL: ",ZTOT,!
+"RTN","C0CRIMA",254,0)
+    Q
+"RTN","C0CRIMA",255,0)
+    ;
+"RTN","C0CRIMA",256,0)
+CNTLST(INLST) ; RETURNS THE NUMBER OF ELEMENTS IN THE LIST
+"RTN","C0CRIMA",257,0)
+    ; INLST IS PASSED BY NAME
+"RTN","C0CRIMA",258,0)
+    N ZI,ZDX,ZCOUNT
+"RTN","C0CRIMA",259,0)
+    W INLST,!
+"RTN","C0CRIMA",260,0)
+    S ZCOUNT=0
+"RTN","C0CRIMA",261,0)
+    S ZDX=""
+"RTN","C0CRIMA",262,0)
+    F ZI=$O(@INLST@(ZDX)):0 D  Q:$O(@INLST@(ZDX))=""  ; LOOP UNTIL THE END
+"RTN","C0CRIMA",263,0)
+    . S ZCOUNT=ZCOUNT+1
+"RTN","C0CRIMA",264,0)
+    . S ZDX=$O(@INLST@(ZDX))
+"RTN","C0CRIMA",265,0)
+    . W "ZDX:",ZDX," ZCNT:",ZCOUNT,!
+"RTN","C0CRIMA",266,0)
+    Q ZCOUNT
+"RTN","C0CRIMA",267,0)
+    ;
+"RTN","C0CRIMA",268,0)
+XCPAT(CPATCAT,CPATPARM) ; EXPORT TO FILE ALL PATIENTS IN CATEGORY CPATCAT
+"RTN","C0CRIMA",269,0)
+    ;
+"RTN","C0CRIMA",270,0)
+    I '$D(CPATPARM) S CPATPARM=""
+"RTN","C0CRIMA",271,0)
+    I '$D(RIMBASE) D ASETUP ; FOR COMMAND LINE CALLS
+"RTN","C0CRIMA",272,0)
+    N ZI,ZJ,ZC,ZPATBASE
+"RTN","C0CRIMA",273,0)
+    S ZPATBASE=$NA(@RIMBASE@("RIMTBL","PATS",CPATCAT))
+"RTN","C0CRIMA",274,0)
+    S ZI=""
+"RTN","C0CRIMA",275,0)
+    F ZJ=0:0 D  Q:$O(@ZPATBASE@(ZI))=""  ; TIL END
+"RTN","C0CRIMA",276,0)
+    . S ZI=$O(@ZPATBASE@(ZI))
+"RTN","C0CRIMA",277,0)
+    . D XPAT^C0CCCR(ZI,CPATPARM) ; EXPORT THE PATIENT TO A FILE
+"RTN","C0CRIMA",278,0)
+    Q
+"RTN","C0CRIMA",279,0)
+    ;
+"RTN","C0CRIMA",280,0)
+CPAT(CPATCAT) ; SHOW PATIENT DFNS FOR A CATEGORY CPATCAT
+"RTN","C0CRIMA",281,0)
+    ;
+"RTN","C0CRIMA",282,0)
+    I '$D(RIMBASE) D ASETUP ; FOR COMMAND LINE CALLS
+"RTN","C0CRIMA",283,0)
+    N ZI,ZJ,ZC,ZPATBASE
+"RTN","C0CRIMA",284,0)
+    S ZC=0 ; COUNT FOR SPACING THE PRINTOUT
+"RTN","C0CRIMA",285,0)
+    S ZPATBASE=$NA(@RIMBASE@("RIMTBL","PATS",CPATCAT))
+"RTN","C0CRIMA",286,0)
+    S ZI=""
+"RTN","C0CRIMA",287,0)
+    F ZJ=0:0 D  Q:$O(@ZPATBASE@(ZI))=""  ; TIL END
+"RTN","C0CRIMA",288,0)
+    . S ZI=$O(@ZPATBASE@(ZI))
+"RTN","C0CRIMA",289,0)
+    . S ZC=ZC+1 ; INCREMENT OUTPUT PER LINE COUNT
+"RTN","C0CRIMA",290,0)
+    . W ZI," "
+"RTN","C0CRIMA",291,0)
+    . I ZC=10 D  ; NEW LINE
+"RTN","C0CRIMA",292,0)
+    . . S ZC=0
+"RTN","C0CRIMA",293,0)
+    . . W !
+"RTN","C0CRIMA",294,0)
+    Q
+"RTN","C0CRIMA",295,0)
+    ;
+"RTN","C0CRIMA",296,0)
+PATC(DFN) ; DISPLAY THE CATEGORY FOR THIS PATIENT
+"RTN","C0CRIMA",297,0)
+    ;
+"RTN","C0CRIMA",298,0)
+    N ATTR S ATTR=""
+"RTN","C0CRIMA",299,0)
+    I '$D(^TMP("C0CRIM","ATTR",DFN)) D  ; RIM VARS NOT PRESENT
+"RTN","C0CRIMA",300,0)
+    . D ANALYZE(DFN,1) ; EXTRACT THE RIM VARIABLE FOR THIS PATIENT
+"RTN","C0CRIMA",301,0)
+    S ATTR=^TMP("C0CRIM","ATTR",DFN)
+"RTN","C0CRIMA",302,0)
+    I ATTR="" W "THIS PATIENT NOT ANALYZED.",! Q  ;NO ATTRIBUTES FOUND
+"RTN","C0CRIMA",303,0)
+    I $D(^TMP("C0CRIM","RIMTBL","CATS",ATTR)) D  ; FOUND A CAT
+"RTN","C0CRIMA",304,0)
+    . N CAT
+"RTN","C0CRIMA",305,0)
+    . S CAT=$P(^TMP("C0CRIM","RIMTBL","CATS",ATTR),U,1) ; LOOK UP THE CAT
+"RTN","C0CRIMA",306,0)
+    . W CAT,": ",ATTR,!
+"RTN","C0CRIMA",307,0)
+    Q
+"RTN","C0CRIMA",308,0)
+    ;
+"RTN","C0CRIMA",309,0)
+APUSH(AMAP,AVAL) ; ADD AVAL TO ATTRIBUTE MAP AMAP (AMAP PASSED BY NAME)
+"RTN","C0CRIMA",310,0)
+    ; AMAP IS FORMED FOR ARRAY ACCESS: AMAP(0) IS THE COUNT
+"RTN","C0CRIMA",311,0)
+    ; AND AMAP(N)=AVAL IS THE NTH AVAL
+"RTN","C0CRIMA",312,0)
+    ; ALSO HASH ACCESS AMAP(AVAL)=N WHERE N IS THE ASSIGNED ORDER OF THE
+"RTN","C0CRIMA",313,0)
+    ; MAP VALUE. INSTANCES OF THE MAP WILL USE $P(X,U,N)=AVAL TO PLACE
+"RTN","C0CRIMA",314,0)
+    ; THE ATTRIBUTE IN ITS RIGHT PLACE. THE ATTRIBUTE VALUE IS STORED
+"RTN","C0CRIMA",315,0)
+    ; SO THAT DIFFERENT MAPS CAN BE AUTOMATICALLY CROSSWALKED
+"RTN","C0CRIMA",316,0)
+    ;
+"RTN","C0CRIMA",317,0)
+    I '$D(@AMAP) D  ; IF THE MAP DOES NOT EXIST
+"RTN","C0CRIMA",318,0)
+    . S @AMAP@(0)=0 ; HAS ZERO ELEMENTS
+"RTN","C0CRIMA",319,0)
+    S @AMAP@(0)=@AMAP@(0)+1 ;INCREMENT ELEMENT COUNT
+"RTN","C0CRIMA",320,0)
+    S @AMAP@(@AMAP@(0))=AVAL ; ADD THE VALUE TO THE ARRAY
+"RTN","C0CRIMA",321,0)
+    S @AMAP@(AVAL)=@AMAP@(0) ; ADD THE VALUE TO THE HASH WITH ARRAY REF
+"RTN","C0CRIMA",322,0)
+    Q
+"RTN","C0CRIMA",323,0)
+    ;
+"RTN","C0CRIMA",324,0)
+ASETUP ; SET UP GLOBALS AND VARS RIMBASE AND RIMTBL
+"RTN","C0CRIMA",325,0)
+      I '$D(RIMBASE) S RIMBASE=$NA(^TMP("C0CRIM"))
+"RTN","C0CRIMA",326,0)
+      I '$D(@RIMBASE) S @RIMBASE=""
+"RTN","C0CRIMA",327,0)
+      I '$D(RIMTBL) S RIMTBL=$NA(^TMP("C0CRIM","RIMTBL","TABLE")) ; ATTR TABLE
+"RTN","C0CRIMA",328,0)
+      S ^TMP("C0CRIM","TABLES","RIMTBL")=RIMTBL ; TABLE OF TABLES
+"RTN","C0CRIMA",329,0)
+      Q
+"RTN","C0CRIMA",330,0)
+      ;
+"RTN","C0CRIMA",331,0)
+AINIT ; INITIALIZE ATTRIBUTE TABLE
+"RTN","C0CRIMA",332,0)
+      I '$D(RIMBASE) D ASETUP ; FOR COMMAND LINE CALLS
+"RTN","C0CRIMA",333,0)
+      K @RIMTBL
+"RTN","C0CRIMA",334,0)
+      D APUSH(RIMTBL,"EXTRACTED")
+"RTN","C0CRIMA",335,0)
+      D APUSH(RIMTBL,"NOTEXTRACTED")
+"RTN","C0CRIMA",336,0)
+      D APUSH(RIMTBL,"HEADER")
+"RTN","C0CRIMA",337,0)
+      D APUSH(RIMTBL,"NOPCP")
+"RTN","C0CRIMA",338,0)
+      D APUSH(RIMTBL,"PCP")
+"RTN","C0CRIMA",339,0)
+      D APUSH(RIMTBL,"PROBLEMS")
+"RTN","C0CRIMA",340,0)
+      D APUSH(RIMTBL,"PROBCODE")
+"RTN","C0CRIMA",341,0)
+      D APUSH(RIMTBL,"PROBNOCODE")
+"RTN","C0CRIMA",342,0)
+      D APUSH(RIMTBL,"PROBDATE")
+"RTN","C0CRIMA",343,0)
+      D APUSH(RIMTBL,"PROBNODATE")
+"RTN","C0CRIMA",344,0)
+      D APUSH(RIMTBL,"VITALS")
+"RTN","C0CRIMA",345,0)
+      D APUSH(RIMTBL,"VITALSCODE")
+"RTN","C0CRIMA",346,0)
+      D APUSH(RIMTBL,"VITALSNOCODE")
+"RTN","C0CRIMA",347,0)
+      D APUSH(RIMTBL,"VITALSDATE")
+"RTN","C0CRIMA",348,0)
+      D APUSH(RIMTBL,"VITALSNODATE")
+"RTN","C0CRIMA",349,0)
+      D APUSH(RIMTBL,"IMMUNE")
+"RTN","C0CRIMA",350,0)
+      D APUSH(RIMTBL,"IMMUNECODE")
+"RTN","C0CRIMA",351,0)
+      D APUSH(RIMTBL,"MEDS")
+"RTN","C0CRIMA",352,0)
+      D APUSH(RIMTBL,"MEDSCODE")
+"RTN","C0CRIMA",353,0)
+      D APUSH(RIMTBL,"MEDSNOCODE")
+"RTN","C0CRIMA",354,0)
+      D APUSH(RIMTBL,"MEDSDATE")
+"RTN","C0CRIMA",355,0)
+      D APUSH(RIMTBL,"MEDSNODATE")
+"RTN","C0CRIMA",356,0)
+      D APUSH(RIMTBL,"ALERTS")
+"RTN","C0CRIMA",357,0)
+      D APUSH(RIMTBL,"ALERTSCODE")
+"RTN","C0CRIMA",358,0)
+      D APUSH(RIMTBL,"RESULTS")
+"RTN","C0CRIMA",359,0)
+      D APUSH(RIMTBL,"RESULTSLN")
+"RTN","C0CRIMA",360,0)
+      D APUSH(RIMTBL,"PROCEDURES")
+"RTN","C0CRIMA",361,0)
+      D APUSH(RIMTBL,"ENCOUNTERS")
+"RTN","C0CRIMA",362,0)
+      D APUSH(RIMTBL,"NOTES")
+"RTN","C0CRIMA",363,0)
+      Q
+"RTN","C0CRIMA",364,0)
+      ;
+"RTN","C0CRIMA",365,0)
+APOST(PRSLT,PTBL,PVAL) ; POST AN ATTRIBUTE PVAL TO PRSLT USING PTBL
+"RTN","C0CRIMA",366,0)
+    ; PSRLT AND PTBL ARE PASSED BY NAME. PVAL IS A STRING
+"RTN","C0CRIMA",367,0)
+    ; PTBL IS THE NAME OF A TABLE IN @RIMBASE@("TABLES") - "RIMTBL"=ALL VALUES
+"RTN","C0CRIMA",368,0)
+    ; PVAL WILL BE PLACED IN THE STRING PRSLT AT $P(X,U,@PTBL@(PVAL))
+"RTN","C0CRIMA",369,0)
+    I '$D(RIMBASE) D ASETUP ; FOR COMMANDLINE PROCESSING
+"RTN","C0CRIMA",370,0)
+    N USETBL
+"RTN","C0CRIMA",371,0)
+    I '$D(@RIMBASE@("TABLES",PTBL)) D  Q  ; NO TABLE
+"RTN","C0CRIMA",372,0)
+    . W "ERROR NO SUCH TABLE",!
+"RTN","C0CRIMA",373,0)
+    S USETBL=@RIMBASE@("TABLES",PTBL)
+"RTN","C0CRIMA",374,0)
+    S $P(@PRSLT,U,@USETBL@(PVAL))=PVAL
+"RTN","C0CRIMA",375,0)
+    Q
+"RTN","C0CRIMA",376,0)
+GETPA(RTN,DFN,ISEC,IVAR) ; RETURNS ARRAY OF RIM VARIABLES FOR PATIENT DFN
+"RTN","C0CRIMA",377,0)
+    ; EXAMPLE: D GETPA(.RT,2,"MEDS","MEDSSTATUSTEXT")
+"RTN","C0CRIMA",378,0)
+    ; RETURNS AN ARRAY RT OF VALUES OF MEDSTATUSTEXT FOR PATIENT 2 IN P2
+"RTN","C0CRIMA",379,0)
+    ; IN SECTION "MEDS"
+"RTN","C0CRIMA",380,0)
+    ; P1 IS THE IEN OF THE MED WITH THE VALUE IE 2^PENDING WOULD BE STATUS
+"RTN","C0CRIMA",381,0)
+    ; PENDING FOR MED 2 FOR PATIENT 2
+"RTN","C0CRIMA",382,0)
+    ; RT(0) IS THE COUNT OF HOW MANY IN THE ARRAY. NULL VALUES ARE
+"RTN","C0CRIMA",383,0)
+    ; RETURNED. RTN IS PASSED BY REFERENCE
+"RTN","C0CRIMA",384,0)
+    ;
+"RTN","C0CRIMA",385,0)
+    S RTN(0)=0 ; SET NULL DEFAULT RETURN VALUE
+"RTN","C0CRIMA",386,0)
+    I '$D(RIMBASE) D AINIT ; INITIALIZE GLOBAL NAMES AND TABLES
+"RTN","C0CRIMA",387,0)
+    S ZVBASE=$NA(@RIMBASE@("VARS")) ; BASE OF VARIABLES
+"RTN","C0CRIMA",388,0)
+    I '$D(@ZVBASE@(DFN,ISEC,0)) D  Q ; NO VARIABLES IN SECTION
+"RTN","C0CRIMA",389,0)
+    . W "NO VARIABLES IN THIS SECTION FOR PATIENT ",DFN,!
+"RTN","C0CRIMA",390,0)
+    N ZZI,ZZS
+"RTN","C0CRIMA",391,0)
+    S ZZS=$NA(@ZVBASE@(DFN,ISEC)) ; SECTION VARIABLE ARRAY FOR THIS PATIENT
+"RTN","C0CRIMA",392,0)
+    ; ZWR @ZZS@(1)
+"RTN","C0CRIMA",393,0)
+    S RTN(0)=@ZZS@(0)
+"RTN","C0CRIMA",394,0)
+    F ZZI=1:1:RTN(0) D  ; FOR ALL PARTS OF THIS SECTION ( IE FOR ALL MEDS)
+"RTN","C0CRIMA",395,0)
+    . S $P(RTN(ZZI),"^",1)=ZZI ; INDEX FOR VARIABLE
+"RTN","C0CRIMA",396,0)
+    . S $P(RTN(ZZI),"^",2)=@ZZS@(ZZI,IVAR) ; THE VALUE OF THE VARIABLE
+"RTN","C0CRIMA",397,0)
+    Q
+"RTN","C0CRIMA",398,0)
+    ;
+"RTN","C0CRIMA",399,0)
+PATD(DFN,ISEC,IVAR) ; DISPLAY FOR PATIENT DFN THE VARIABLE IVAR
+"RTN","C0CRIMA",400,0)
+    ;
+"RTN","C0CRIMA",401,0)
+    N ZR
+"RTN","C0CRIMA",402,0)
+    D GETPA(.ZR,DFN,ISEC,IVAR)
+"RTN","C0CRIMA",403,0)
+    I $D(ZR(0)) D PARY^C0CXPATH("ZR")
+"RTN","C0CRIMA",404,0)
+    E  W "NOTHING RETURNED",!
+"RTN","C0CRIMA",405,0)
+    Q
+"RTN","C0CRIMA",406,0)
+    ;
+"RTN","C0CRIMA",407,0)
+CAGET(RTN,IATTR) ;
+"RTN","C0CRIMA",408,0)
+    ; GETPA LOOKS AT RIMTBL TO FIND PATIENTS WITH ATTRIBUTE IATTR
+"RTN","C0CRIMA",409,0)
+    ; IT DOES NOT SEARCH ALL PATIENTS, ONLY THE ONES WITH THE ATTRIBUTE
+"RTN","C0CRIMA",410,0)
+    ; IT RETURNS AN ARRAY OF THE VALUES OF VARIABLE IVAR IN SECTION ISEC
+"RTN","C0CRIMA",411,0)
+    Q
+"RTN","C0CRIMA",412,0)
+    ;
+"RTN","C0CRIMA",413,0)
+PCLST(LSTRTN,IATTR) ; RETURNS ARRAY OF PATIENTS WITH ATTRIBUTE IATTR
+"RTN","C0CRIMA",414,0)
+    ;
+"RTN","C0CRIMA",415,0)
+    I '$D(RIMBASE) D AINIT ; INITIALIZE GLOBAL NAMES AND TABLES
+"RTN","C0CRIMA",416,0)
+    N ZLST
+"RTN","C0CRIMA",417,0)
+    S @LSTRTN@(0)=0 ; DEFAULT RETURN NONE
+"RTN","C0CRIMA",418,0)
+    S ZCBASE=$NA(@RIMBASE@("RIMTBL","CATS")) ; BASE OF CATEGORIES
+"RTN","C0CRIMA",419,0)
+    S ZPBASE=$NA(@RIMBASE@("RIMTBL","PATS")) ; BASE OF PATIENTS
+"RTN","C0CRIMA",420,0)
+    N ZNC  ; ZNC IS NUMBER OF CATEGORIES
+"RTN","C0CRIMA",421,0)
+    S ZNC=@ZCBASE@(0)
+"RTN","C0CRIMA",422,0)
+    I ZNC=0 Q ; NO CATEGORIES TO SEARCH
+"RTN","C0CRIMA",423,0)
+    N ZAP  ; ZAP IS THE PIECE INDEX OF THE ATTRIBUTE IN THE RIM ATTR TABLE
+"RTN","C0CRIMA",424,0)
+    S ZAP=@RIMBASE@("RIMTBL","TABLE",IATTR)
+"RTN","C0CRIMA",425,0)
+    N ZI,ZCATTBL,ZATBL,ZCNT,ZPAT
+"RTN","C0CRIMA",426,0)
+    F ZI=1:1:ZNC D  ; FOR ALL CATEGORIES
+"RTN","C0CRIMA",427,0)
+    . S ZATBL=@ZCBASE@(ZI) ; PULL OUT ATTR TBL FOR CAT
+"RTN","C0CRIMA",428,0)
+    . I $P(ZATBL,"^",ZAP)'="" D  ; CAT HAS ATTR
+"RTN","C0CRIMA",429,0)
+    . . S ZCATTBL=$P(@ZCBASE@(ZATBL),"^",1) ; NAME OF TBL
+"RTN","C0CRIMA",430,0)
+    . . M @LSTRTN=@ZPBASE@(ZCATTBL) ; MERGE PATS FROM CAT
+"RTN","C0CRIMA",431,0)
+    S ZCNT=0 ; INITIALIZE COUNT OF PATIENTS
+"RTN","C0CRIMA",432,0)
+    S ZPAT=0 ; START AT FIRST PATIENT IN LIST
+"RTN","C0CRIMA",433,0)
+    F  S ZPAT=$O(@LSTRTN@(ZPAT)) Q:ZPAT=""  D  ;
+"RTN","C0CRIMA",434,0)
+    . S ZCNT=ZCNT+1
+"RTN","C0CRIMA",435,0)
+    S @LSTRTN@(0)=ZCNT ; COUNT OF PATIENTS IN ARRAY
+"RTN","C0CRIMA",436,0)
+    Q
+"RTN","C0CRIMA",437,0)
+    ;
+"RTN","C0CRIMA",438,0)
+DCPAT(CATTR) ; DISPLAY LIST OF PATIENTS WITH ATTRIBUTE CATTR
+"RTN","C0CRIMA",439,0)
+    ;
+"RTN","C0CRIMA",440,0)
+    ;N ZR
+"RTN","C0CRIMA",441,0)
+    D PCLST("ZR",CATTR)
+"RTN","C0CRIMA",442,0)
+    I ZR(0)=0 D  Q  ;
+"RTN","C0CRIMA",443,0)
+    . W "NO PATIENTS RETURNED",!
+"RTN","C0CRIMA",444,0)
+    E  D  ;
+"RTN","C0CRIMA",445,0)
+    . N ZI S ZI=0
+"RTN","C0CRIMA",446,0)
+    . F  S ZI=$O(ZR(ZI)) Q:ZI=""  D  ;
+"RTN","C0CRIMA",447,0)
+    . . W !,ZI
+"RTN","C0CRIMA",448,0)
+    . ;D PARY^C0CXPATH("ZR") ; PRINT ARRAY
+"RTN","C0CRIMA",449,0)
+    . W !,"COUNT=",ZR(0)
+"RTN","C0CRIMA",450,0)
+    Q
+"RTN","C0CRIMA",451,0)
+    ;
+"RTN","C0CRIMA",452,0)
+RPCGV(RTN,DFN,WHICH) ; RPC GET VARS
+"RTN","C0CRIMA",453,0)
+ ; RETURNS IN RTN (PASSED BY REFERENCE) THE VARS AND VALUES
+"RTN","C0CRIMA",454,0)
+ ; FOUND AT INARY RTN(X)="VAR^VALUE" RTN(0) IS THE COUNT
+"RTN","C0CRIMA",455,0)
+ ; DFN IS THE PATIENT NUMBER.
+"RTN","C0CRIMA",456,0)
+ ; WHICH IS "ALL","MEDS","VITALS","PROBLEMS","ALERTS","RESULTS","IMMUNE"
+"RTN","C0CRIMA",457,0)
+ ; OR OTHER SECTIONS AS THEY ARE ADDED
+"RTN","C0CRIMA",458,0)
+ ; THIS IS MEANT TO BE AVAILABLE AS AN RPC
+"RTN","C0CRIMA",459,0)
+ I '$D(RIMBASE) D ASETUP ; FOR COMMAND LINE CALLS
+"RTN","C0CRIMA",460,0)
+ S ZVBASE=$NA(@RIMBASE@("VARS")) ; BASE OF VARIABLES
+"RTN","C0CRIMA",461,0)
+ S RTN(0)=0 ; DEFAULT NOTHING IS RETURNED
+"RTN","C0CRIMA",462,0)
+ N ZZGI
+"RTN","C0CRIMA",463,0)
+ I WHICH="ALL" D  ; VARIABLES FROM ALL SECTIONS
+"RTN","C0CRIMA",464,0)
+ . F ZZGI="HEADER","PROBLEMS","VITALS","MEDS","ALERTS","RESULTS","IMMUNE","PROCEDURES" D  ;
+"RTN","C0CRIMA",465,0)
+ . . D ZGVWRK(ZZGI) ; DO EACH SECTION
+"RTN","C0CRIMA",466,0)
+ . . I $G(DEBUG)'="" W "DID ",ZZGI,!
+"RTN","C0CRIMA",467,0)
+ E  D ZGVWRK(WHICH) ; ONLY ONE SECTION ASKED FOR
+"RTN","C0CRIMA",468,0)
+ Q
+"RTN","C0CRIMA",469,0)
+ ;
+"RTN","C0CRIMA",470,0)
+ZGVWRK(ZWHICH) ; DO ONE SECTION FOR RPCGV
+"RTN","C0CRIMA",471,0)
+    ;
+"RTN","C0CRIMA",472,0)
+    N ZZGN ; NAME FOR SECTION VARIABLES
+"RTN","C0CRIMA",473,0)
+    S ZZGN=$NA(@ZVBASE@(DFN,ZWHICH)) ; BASE OF VARS FOR SECTION
+"RTN","C0CRIMA",474,0)
+    ;I '$D(@ZZGN@(0)) Q ; NO VARS FOR THIS SECTION
+"RTN","C0CRIMA",475,0)
+    I $O(@ZZGN@(""),-1)=""  D  ;
+"RTN","C0CRIMA",476,0)
+    E  D  ; VARS EXIST
+"RTN","C0CRIMA",477,0)
+    . N ZGVI,ZGVN
+"RTN","C0CRIMA",478,0)
+    . S ZGVN=$O(@ZZGN@(""),-1) ;COUNT OF VARS
+"RTN","C0CRIMA",479,0)
+    . F ZGVI=1:1:ZGVN D  ; FOR EACH MULTIPLE IN SECTION
+"RTN","C0CRIMA",480,0)
+    . . K ZZGA N ZZGA ; TEMP ARRAY FOR SECTION VARS
+"RTN","C0CRIMA",481,0)
+    . . K ZZGN2 N ZZGN2 ; NAME FOR MULTIPLE
+"RTN","C0CRIMA",482,0)
+    . . S ZZGN2=$NA(@ZZGN@(ZGVI))
+"RTN","C0CRIMA",483,0)
+    . . I $G(DEBUG)'="" W ZZGN2,!,$O(@ZZGN2@("")),!
+"RTN","C0CRIMA",484,0)
+    . . D H2ARY^C0CXPATH("ZZGA",ZZGN2,ZGVI) ; CONVERT HASH TO ARRAY
+"RTN","C0CRIMA",485,0)
+    . . ; D PARY^C0CXPATH("ZZGA")
+"RTN","C0CRIMA",486,0)
+    . . D PUSHA^C0CXPATH("RTN","ZZGA") ; PUSH ARRAY INTO RETURN
+"RTN","C0CRIMA",487,0)
+    Q
+"RTN","C0CRIMA",488,0)
+    ;
+"RTN","C0CRIMA",489,0)
+DPATV(DFN,IWHICH) ; DISPLAY VARS FOR PATIENT DFN THAT ARE MAINTAINED IN C0CRIM
+"RTN","C0CRIMA",490,0)
+    ; ALONG WITH SAMPLE VALUES.
+"RTN","C0CRIMA",491,0)
+    ; IWHICH IS "ALL","MEDS","VITALS","PROBLEMS","ALERTS","RESULTS","HEADER"
+"RTN","C0CRIMA",492,0)
+    N GTMP
+"RTN","C0CRIMA",493,0)
+    I '$D(^TMP("C0CRIM","ATTR",DFN)) D  ; RIM VARS NOT PRESENT
+"RTN","C0CRIMA",494,0)
+    . D ANALYZE(DFN,1) ; REFRESH THE RIM VARIABLES
+"RTN","C0CRIMA",495,0)
+    I '$D(IWHICH) S IWHICH="ALL"
+"RTN","C0CRIMA",496,0)
+    D RPCGV(.GTMP,DFN,IWHICH)
+"RTN","C0CRIMA",497,0)
+    D PARY^C0CXPATH("GTMP")
+"RTN","C0CRIMA",498,0)
+    Q
+"RTN","C0CRIMA",499,0)
+    ;
+"RTN","C0CRIMA",500,0)
+RIM2RNF(R2RTN,DFN,RWHICH) ; CONVERTS RIM VARIABLES TO RNF2 FORMAT
+"RTN","C0CRIMA",501,0)
+ ; RETURN IN R2RTN, WHICH IS PASSED BY NAME
+"RTN","C0CRIMA",502,0)
+ ; RWHICH IS RIM SECTION TO RETURN, DEFAULTS TO "ALL"
+"RTN","C0CRIMA",503,0)
+ ;
+"RTN","C0CRIMA",504,0)
+ I '$D(RWHICH) S RWHICH="ALL"
+"RTN","C0CRIMA",505,0)
+ ;N R2TMP
+"RTN","C0CRIMA",506,0)
+ I '$D(^TMP("C0CRIM","ATTR",DFN)) D  ; RIM VARS NOT PRESENT
+"RTN","C0CRIMA",507,0)
+ . D ANALYZE(DFN,1) ; REFRESH THE RIM VARIABLES
+"RTN","C0CRIMA",508,0)
+ D RPCGV(.R2TMP,DFN,RWHICH) ; RETRIEVE ALL THE VARIABLES I AN ARRAY
+"RTN","C0CRIMA",509,0)
+ N R2I,R2J,R2X,R2X1,R2X2,R2Y,R2Z
+"RTN","C0CRIMA",510,0)
+ F R2I=1:1:R2TMP(0) D  ; FOR EVERY LINE OF THE ARRAY
+"RTN","C0CRIMA",511,0)
+ . S R2X=$P(R2TMP(R2I),"^",1) ; OCCURANCE
+"RTN","C0CRIMA",512,0)
+ . S R2Y=$P(R2TMP(R2I),"^",2) ; VARIABLE NAME
+"RTN","C0CRIMA",513,0)
+ . I $L(R2Y)<4 Q  ; SKIP SHORT VARIABLES (THEY ARE FOR DEBUGGING)
+"RTN","C0CRIMA",514,0)
+ . S R2Z=$P(R2TMP(R2I),"^",3) ; VALUE
+"RTN","C0CRIMA",515,0)
+ . I R2X[";" D  ; THERES MULTIPLES
+"RTN","C0CRIMA",516,0)
+ . . S R2X1=$P(R2X,";",1) ; FIRST INDEX
+"RTN","C0CRIMA",517,0)
+ . . S R2X2=$P(R2X,";",2) ; SECOND INDEX
+"RTN","C0CRIMA",518,0)
+ . . S R2J=R2Y_"["_R2X2_"]" ; BUILD THE VARIABLE NAME
+"RTN","C0CRIMA",519,0)
+ . . S @R2RTN@("F",R2J,1)="" ; PUT VARIABLE NAME IN FIELD MAP
+"RTN","C0CRIMA",520,0)
+ . . S @R2RTN@("V",R2X1,R2J,1)=R2Z ; PUT THE VALUE IN THE ARRAY
+"RTN","C0CRIMA",521,0)
+ . E  D  ; NO SUB-MULTIPLES
+"RTN","C0CRIMA",522,0)
+ . . S @R2RTN@("F",R2Y,1)="" ; PUT VARIABLE NAME IN FIELD MAP
+"RTN","C0CRIMA",523,0)
+ . . S @R2RTN@("V",R2X,R2Y,1)=R2Z ; PUT THE VALUE IN THE ARRAY
+"RTN","C0CRIMA",524,0)
+ Q
+"RTN","C0CRIMA",525,0)
+ ;
+"RTN","C0CRIMA",526,0)
+RIM2CSV(DFN) ; WRITE THE RIM VARIABLES FOR A PATIENT TO A CSV FILE
+"RTN","C0CRIMA",527,0)
+ ;
+"RTN","C0CRIMA",528,0)
+ N R2CTMP,R2CARY
+"RTN","C0CRIMA",529,0)
+ D RIM2RNF("R2CTMP",DFN) ; CONVERT VARIABLES TO RNF FORMAT
+"RTN","C0CRIMA",530,0)
+ D RNF2CSV^C0CRNF("R2CARY","R2CTMP","NV") ; CONVERT RNF TO CSV FORMAT
+"RTN","C0CRIMA",531,0)
+ D FILEOUT^C0CRNF("R2CARY","VARS-"_DFN_".csv")
+"RTN","C0CRIMA",532,0)
+ Q
+"RTN","C0CRIMA",533,0)
+ ;
+"RTN","C0CRNF")
+0^23^B195772222
+"RTN","C0CRNF",1,0)
+C0CRNF   ; CCDCCR/GPL - Reference Name Format (RNF) utilities; 12/6/08
+"RTN","C0CRNF",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CRNF",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CRNF",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CRNF",5,0)
+ ;
+"RTN","C0CRNF",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CRNF",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CRNF",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CRNF",9,0)
+ ;(at your option) any later version.
+"RTN","C0CRNF",10,0)
+ ;
+"RTN","C0CRNF",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CRNF",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CRNF",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CRNF",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CRNF",15,0)
+ ;
+"RTN","C0CRNF",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CRNF",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CRNF",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CRNF",19,0)
+ ;
+"RTN","C0CRNF",20,0)
+ W "This is the Reference Name Format (RNF) Utility Library ",!
+"RTN","C0CRNF",21,0)
+ W !
+"RTN","C0CRNF",22,0)
+ Q
+"RTN","C0CRNF",23,0)
+ ;
+"RTN","C0CRNF",24,0)
+FIELDS(C0CFRTN,C0CF) ; RETURNS AN ARRAY OF THE FIELDS IN FILE C0CF,
+"RTN","C0CRNF",25,0)
+ ; C0CFRTN IS PASSED BY NAME, C0CF IS PASSED BY VALUE
+"RTN","C0CRNF",26,0)
+ ;
+"RTN","C0CRNF",27,0)
+ N C0CFI,C0CFJ ;INNER LOOP, OUTER LOOP
+"RTN","C0CRNF",28,0)
+ N C0CFN ; FIELD NAME
+"RTN","C0CRNF",29,0)
+ S C0CFI=0 S C0CFJ=C0CF
+"RTN","C0CRNF",30,0)
+ K @C0CFRTN ; CLEAR THE RETURN ARRAY
+"RTN","C0CRNF",31,0)
+ F  Q:C0CFJ'[C0CF  D ; FOR THE C0CF FILE AND ALL SUBFILES INCLUSIVE
+"RTN","C0CRNF",32,0)
+ . ;W "1: "_C0CFJ," ",C0CFI,!
+"RTN","C0CRNF",33,0)
+ . F  S C0CFI=$O(^DD(C0CFJ,C0CFI)) Q:+C0CFI=0  D  ; EVERY FIELD
+"RTN","C0CRNF",34,0)
+ . . ;W "2: "_C0CFJ," ",C0CFI,!
+"RTN","C0CRNF",35,0)
+ . . S C0CFN=$P($G(^DD(C0CFJ,C0CFI,0)),"^",1) ;PULL FIELD NAME FROM ^DD
+"RTN","C0CRNF",36,0)
+ . . ;W "N: ",C0CFN,!
+"RTN","C0CRNF",37,0)
+ . . ;I C0CFN="STR" W C0CFN," ",C0CFJ,!
+"RTN","C0CRNF",38,0)
+ . . I $D(@C0CFRTN@(C0CFN)) D  ; IS THIS A DUPLICATE?
+"RTN","C0CRNF",39,0)
+ . . . I $G(DEBUG) D  ;
+"RTN","C0CRNF",40,0)
+ . . . . W "DUPLICATE FOUND! ",C0CFJ," ",C0CFI," ",C0CFN,!,@C0CFRTN@(C0CFN),!
+"RTN","C0CRNF",41,0)
+ . . . S @C0CFRTN@(C0CFN_"_"_C0CFJ)=C0CFJ_"^"_C0CFI
+"RTN","C0CRNF",42,0)
+ . . E  S @C0CFRTN@(C0CFN)=C0CFJ_"^"_C0CFI
+"RTN","C0CRNF",43,0)
+ . S C0CFJ=$O(^DD(C0CFJ)) ; NEXT SUBFILE
+"RTN","C0CRNF",44,0)
+ Q
+"RTN","C0CRNF",45,0)
+ ;
+"RTN","C0CRNF",46,0)
+TESTRNF ; TEST THE RNF1TO2 ROUTINE
+"RTN","C0CRNF",47,0)
+ S G1("ONE")=1
+"RTN","C0CRNF",48,0)
+ S G1("TWO")=2
+"RTN","C0CRNF",49,0)
+ S G1("THREE")=3
+"RTN","C0CRNF",50,0)
+ D RNF1TO2("GPL","G1")
+"RTN","C0CRNF",51,0)
+ S G1("ONE")="NOT1"
+"RTN","C0CRNF",52,0)
+ S G1("TWO")="STILL2"
+"RTN","C0CRNF",53,0)
+ S G1("THREE")=3
+"RTN","C0CRNF",54,0)
+ D RNF1TO2("GPL","G1")
+"RTN","C0CRNF",55,0)
+ ZWR GPL
+"RTN","C0CRNF",56,0)
+ Q
+"RTN","C0CRNF",57,0)
+ ;
+"RTN","C0CRNF",58,0)
+RNF1TO2(ZOUT,ZIN) ; ADDS AN RNF1 ARRAY (ZIN) TO THE END OF AN RNF2 ARRAY 
+"RTN","C0CRNF",59,0)
+ ; (ZOUT) BOTH ARE PASSED BY NAME
+"RTN","C0CRNF",60,0)
+ ; RNF1 IS OF THE FORM:
+"RTN","C0CRNF",61,0)
+ ; @ZIN@("VAR1")=VAL1 
+"RTN","C0CRNF",62,0)
+ ; @ZIN@("VAR2")=VAL2 
+"RTN","C0CRNF",63,0)
+ ; RNF2 IS OF THE FORM:
+"RTN","C0CRNF",64,0)
+ ; @ZOUT@("F","VAR1")=""
+"RTN","C0CRNF",65,0)
+ ; @ZOUT@("F","VAR2")=""
+"RTN","C0CRNF",66,0)
+ ; @ZOUT@("V",n,"VAR1")=VAL1
+"RTN","C0CRNF",67,0)
+ ; @ZOUT@("V",n,"VAR2")=VAL2
+"RTN","C0CRNF",68,0)
+ ; WHERE n IS THE "ROW" OF THE ARRAY
+"RTN","C0CRNF",69,0)
+ N ZI S ZI=""
+"RTN","C0CRNF",70,0)
+ N ZN
+"RTN","C0CRNF",71,0)
+ I '$D(@ZOUT@("V",1)) S ZN=1
+"RTN","C0CRNF",72,0)
+ E  S ZN=$O(@ZOUT@("V",""),-1)+1
+"RTN","C0CRNF",73,0)
+ F  S ZI=$O(@ZIN@(ZI)) Q:ZI=""  D  ;
+"RTN","C0CRNF",74,0)
+ . S @ZOUT@("F",ZI)=""
+"RTN","C0CRNF",75,0)
+ . S @ZOUT@("V",ZN,ZI)=@ZIN@(ZI)
+"RTN","C0CRNF",76,0)
+ Q
+"RTN","C0CRNF",77,0)
+ ;
+"RTN","C0CRNF",78,0)
+RNF1TO2B(ZOUT,ZIN) ; ADDS AN RNF1 ARRAY (ZIN) TO THE END OF AN RNF2 ARRAY 
+"RTN","C0CRNF",79,0)
+ ; THE "B" ROUTINE SUPPORTS WP FIELDS IN THE ARRAY
+"RTN","C0CRNF",80,0)
+ ; EVERY "V" VARIABLE IS FOLLOWED BY A "1"
+"RTN","C0CRNF",81,0)
+ ; FOR EXAMPLE @G@("V",n,"VAR1",1)="VALUE1"
+"RTN","C0CRNF",82,0)
+ ; USE THIS ROUTINE IF YOU WANT TO CONVERT THE RESULT TO A CSV 
+"RTN","C0CRNF",83,0)
+ ; WITH RNF2CSV 
+"RTN","C0CRNF",84,0)
+ ; (ZOUT) BOTH ARE PASSED BY NAME
+"RTN","C0CRNF",85,0)
+ ; RNF1 IS OF THE FORM:
+"RTN","C0CRNF",86,0)
+ ; @ZIN@("VAR1")=VAL1 
+"RTN","C0CRNF",87,0)
+ ; @ZIN@("VAR2")=VAL2 
+"RTN","C0CRNF",88,0)
+ ; RNF2 IS OF THE FORM:
+"RTN","C0CRNF",89,0)
+ ; @ZOUT@("F","VAR1")=""
+"RTN","C0CRNF",90,0)
+ ; @ZOUT@("F","VAR2")=""
+"RTN","C0CRNF",91,0)
+ ; @ZOUT@("V",n,"VAR1",1)=VAL1
+"RTN","C0CRNF",92,0)
+ ; @ZOUT@("V",n,"VAR2",1)=VAL2
+"RTN","C0CRNF",93,0)
+ ; WHERE n IS THE "ROW" OF THE ARRAY
+"RTN","C0CRNF",94,0)
+ N ZI S ZI=""
+"RTN","C0CRNF",95,0)
+ N ZN
+"RTN","C0CRNF",96,0)
+ I '$D(@ZOUT@("V",1)) S ZN=1
+"RTN","C0CRNF",97,0)
+ E  S ZN=$O(@ZOUT@("V",""),-1)+1
+"RTN","C0CRNF",98,0)
+ F  S ZI=$O(@ZIN@(ZI)) Q:ZI=""  D  ;
+"RTN","C0CRNF",99,0)
+ . S @ZOUT@("F",ZI)=""
+"RTN","C0CRNF",100,0)
+ . S @ZOUT@("V",ZN,ZI,1)=@ZIN@(ZI)
+"RTN","C0CRNF",101,0)
+ Q
+"RTN","C0CRNF",102,0)
+ ;
+"RTN","C0CRNF",103,0)
+GETNOLD(GRTN,GFILE,GIEN,GNN) ; GET FIELDS FOR ACCESS BY NAME
+"RTN","C0CRNF",104,0)
+ ; GRTN IS PASSED BY NAME
+"RTN","C0CRNF",105,0)
+ ;
+"RTN","C0CRNF",106,0)
+ N C0CTMP,C0CI,C0CJ,C0CREF,C0CNAME
+"RTN","C0CRNF",107,0)
+ I $D(GNN) I GNN="ALL" S C0CNN=0 ; NOT NON-NULL (ALL FIELDS TO BE RETURNED)
+"RTN","C0CRNF",108,0)
+ E  S C0CNN=1 ; NON-NULL IS TRUE (ONLY POPULATED FIELDS RETURNED)
+"RTN","C0CRNF",109,0)
+ S C0CREF=GIEN_"," ; OPEN ROOT REFERENCE INTO FILE
+"RTN","C0CRNF",110,0)
+ D CLEAN^DILF ; MAKE SURE WE ARE CLEANED UP
+"RTN","C0CRNF",111,0)
+ D GETS^DIQ(GFILE,C0CREF,"**","I","C0CTMP")
+"RTN","C0CRNF",112,0)
+ D FIELDS(GRTN,GFILE) ;GET ALL THE FIELD NAMES FOR THE FILE
+"RTN","C0CRNF",113,0)
+ S @GRTN@(0)=GFILE_"^RNF1^"_GIEN_"^"_DT_"^"_$J ; STRUCTURE SIGNATURE
+"RTN","C0CRNF",114,0)
+ S (C0CI,C0CJ)=""
+"RTN","C0CRNF",115,0)
+ F  S C0CJ=$O(C0CTMP(C0CJ)) Q:C0CJ=""  D  ; FOR ALL SUBFILES
+"RTN","C0CRNF",116,0)
+ . S C0CREF=$O(C0CTMP(C0CJ,"")) ; RECORD REFERENCE
+"RTN","C0CRNF",117,0)
+ . F  S C0CI=$O(C0CTMP(C0CJ,C0CREF,C0CI)) Q:C0CI=""  D  ; ARRAY OF FIELDS
+"RTN","C0CRNF",118,0)
+ . . ;W C0CJ," ",C0CI,!
+"RTN","C0CRNF",119,0)
+ . . S C0CNAME=$P(^DD(C0CJ,C0CI,0),"^",1) ;PULL THE FIELD NAME
+"RTN","C0CRNF",120,0)
+ . . S C0CVALUE=C0CTMP(C0CJ,C0CREF,C0CI) ;
+"RTN","C0CRNF",121,0)
+ . . I C0CVALUE["C0CTMP" S C0CVALUE=C0CTMP(C0CJ,C0CREF,C0CI,1) ;1ST LINE OF WP
+"RTN","C0CRNF",122,0)
+ . . S $P(@GRTN@(C0CNAME),"^",3)=C0CVALUE ;RETURN VALUE IN P3
+"RTN","C0CRNF",123,0)
+ I C0CNN D  ; IF ONLY NON-NULL VALUES ARE TO BE RETURNED
+"RTN","C0CRNF",124,0)
+ . S C0CI=""
+"RTN","C0CRNF",125,0)
+ . F  S C0CI=$O(@GRTN@(C0CI)) Q:C0CI=""  D  ; GO THROUGH THE WHOLE ARRAY
+"RTN","C0CRNF",126,0)
+ . . I $P(@GRTN@(C0CI),"^",3)="" K @GRTN@(C0CI) ; KILL THE NULL ENTRIES
+"RTN","C0CRNF",127,0)
+ Q
+"RTN","C0CRNF",128,0)
+ ;
+"RTN","C0CRNF",129,0)
+GETN(GRTN,GFILE,GREF,GNDX,GNN) ; GET BY NAME ; RETURN A FIELD VALUE MAP
+"RTN","C0CRNF",130,0)
+ ; THE FOLLOWING COMMENTS ARE WRONG.. THIS ROUTINE STILL RETURNS AN RNF1
+"RTN","C0CRNF",131,0)
+ ; FORMAT ARRAY @GRTN@("FIELD NAME")="FILE^FIELD#^VALUE" ;GPL
+"RTN","C0CRNF",132,0)
+ ; GETN IS AN EXTRINSIC WHICH RETURNS THE NEXT IEN AFTER THE CURRENT GIEN
+"RTN","C0CRNF",133,0)
+ ; GRTN, PASSED BY NAME, RETURNS A FIELD MAP AND A VALUE MAP
+"RTN","C0CRNF",134,0)
+ ; .. FIELD MAP @GRTN@("F","FIELDNAME^FILE^FIELD#")=""
+"RTN","C0CRNF",135,0)
+ ; ... ANY FIELD USED BY ANY RECORD PROCESSED IS IN THE FIELD MAP
+"RTN","C0CRNF",136,0)
+ ; .. VALUE MAP @GRTN@("V","IEN","FIELDNAME")=VALUE
+"RTN","C0CRNF",137,0)
+ ; .. GRTN IS NOT INITIALIZED, SO MULTIPLE CALLS ARE CUMULATIVE
+"RTN","C0CRNF",138,0)
+ ; .. IF GNN="ALL" THEN ALL FIELDS FOR THE FILE ARE IN THE FIELD MAP
+"RTN","C0CRNF",139,0)
+ ; .. EVEN IF GNN="ALL" ONLY POPULATED FIELDS ARE RETURNED IN THE VALUE MAP
+"RTN","C0CRNF",140,0)
+ ; .. NUL FIELDS CAN BE DETERMINED BY CHECKING FIELD MAP - THIS SAVES SPACE
+"RTN","C0CRNF",141,0)
+ ; IF GREF IS "" THE FIRST RECORD IS OBTAINED
+"RTN","C0CRNF",142,0)
+ ; IF GNDX IS NULL, GREF IS AN IEN FOR THE FILE
+"RTN","C0CRNF",143,0)
+ ; GNDX IS THE INDEX TO USE TO OBTAIN THE IEN
+"RTN","C0CRNF",144,0)
+ ; GREF IS THE VALUE FOR THE INDEX
+"RTN","C0CRNF",145,0)
+ ; GANN= NOT NULL - IF GANN IS "ALL" THEN EVEN NULL FIELDS WILL BE RETURNED
+"RTN","C0CRNF",146,0)
+ ; OTHERWISE, ONLY POPULATED FIELDS ARE RETURNED IN GRTN
+"RTN","C0CRNF",147,0)
+ ;
+"RTN","C0CRNF",148,0)
+ ;
+"RTN","C0CRNF",149,0)
+ N GIEN,GF
+"RTN","C0CRNF",150,0)
+ S GF=$$FILEREF(GFILE) ;CLOSED FILE REFERENCE FOR FILE NUMBER GFILE
+"RTN","C0CRNF",151,0)
+ I ('$D(GNDX))!($G(GNDX)="") S GIEN=GREF ; IF NO INDEX USED, GREF IS THE IEN
+"RTN","C0CRNF",152,0)
+ E  D  ; WE ARE USING AN INDEX
+"RTN","C0CRNF",153,0)
+ . ;N ZG
+"RTN","C0CRNF",154,0)
+ . S ZG=$Q(@GF@(GNDX,GREF)) ;ACCESS INDEX
+"RTN","C0CRNF",155,0)
+ . I ZG'="" D  ;
+"RTN","C0CRNF",156,0)
+ . . I $QS(ZG,3)=GREF D  ; IS GREF IN INDEX?
+"RTN","C0CRNF",157,0)
+ . . . S GIEN=$QS(ZG,4) ; PULL OUT THE IEN
+"RTN","C0CRNF",158,0)
+ . . E  S GIEN="" ; NOT FOUND IN INDEX
+"RTN","C0CRNF",159,0)
+ . E  S GIEN="" ;
+"RTN","C0CRNF",160,0)
+ ;W "IEN: ",GIEN,!
+"RTN","C0CRNF",161,0)
+ ;N C0CTMP,C0CI,C0CJ,C0CREF,C0CNAME
+"RTN","C0CRNF",162,0)
+ I $D(GNN) I GNN="ALL" S C0CNN=0 ; NOT NON-NULL (ALL FIELDS TO BE RETURNED)
+"RTN","C0CRNF",163,0)
+ E  S C0CNN=1 ; NON-NULL IS TRUE (ONLY POPULATED FIELDS RETURNED)
+"RTN","C0CRNF",164,0)
+ S C0CREF=GIEN_"," ; OPEN ROOT REFERENCE INTO FILE
+"RTN","C0CRNF",165,0)
+ D CLEAN^DILF ; MAKE SURE WE ARE CLEANED UP
+"RTN","C0CRNF",166,0)
+ K C0CTMP
+"RTN","C0CRNF",167,0)
+ D GETS^DIQ(GFILE,C0CREF,"**","IE","C0CTMP")
+"RTN","C0CRNF",168,0)
+ D FIELDS(GRTN,GFILE) ;GET ALL THE FIELD NAMES FOR THE FILE
+"RTN","C0CRNF",169,0)
+ S @GRTN@(0)=GFILE_"^RNF1^"_GIEN_"^"_DT_"^"_$J_"^"_DUZ ; STRUCTURE SIGNATURE
+"RTN","C0CRNF",170,0)
+ S (C0CI,C0CJ)=""
+"RTN","C0CRNF",171,0)
+ F  S C0CJ=$O(C0CTMP(C0CJ)) Q:C0CJ=""  D  ; FOR ALL SUBFILES
+"RTN","C0CRNF",172,0)
+ . S C0CREF=$O(C0CTMP(C0CJ,"")) ; RECORD REFERENCE
+"RTN","C0CRNF",173,0)
+ . F  S C0CI=$O(C0CTMP(C0CJ,C0CREF,C0CI)) Q:C0CI=""  D  ; ARRAY OF FIELDS
+"RTN","C0CRNF",174,0)
+ . . ;W C0CJ," ",C0CI,!
+"RTN","C0CRNF",175,0)
+ . . S C0CNAME=$P(^DD(C0CJ,C0CI,0),"^",1) ;PULL THE FIELD NAME
+"RTN","C0CRNF",176,0)
+ . . S C0CVALUE=C0CTMP(C0CJ,C0CREF,C0CI,"E") ;
+"RTN","C0CRNF",177,0)
+ . . I C0CVALUE["C0CTMP" D  ; WP FIELD
+"RTN","C0CRNF",178,0)
+ . . . N ZT,ZWP S ZWP=0 ;ITERATOR
+"RTN","C0CRNF",179,0)
+ . . . S ZWP=$O(C0CTMP(C0CJ,C0CREF,C0CI,ZWP)) ; INIT TO FIRST LINE
+"RTN","C0CRNF",180,0)
+ . . . S C0CVALUE=C0CTMP(C0CJ,C0CREF,C0CI,ZWP) ; INIT TO FIRST LINE
+"RTN","C0CRNF",181,0)
+ . . . F  S ZWP=$O(C0CTMP(C0CJ,C0CREF,C0CI,ZWP)) Q:'ZWP  D  ;
+"RTN","C0CRNF",182,0)
+ . . . . S ZT=" "_C0CTMP(C0CJ,C0CREF,C0CI,ZWP) ;LINE OF WP
+"RTN","C0CRNF",183,0)
+ . . . . S ZT=$TR(ZT,"^""","|'") ;HACK TO GET RID OF ^ AND " IN TEXT "
+"RTN","C0CRNF",184,0)
+ . . . . S C0CVALUE=C0CVALUE_ZT ;
+"RTN","C0CRNF",185,0)
+ . . S $P(@GRTN@(C0CNAME),"^",3)=C0CVALUE ;RETURN VALUE IN P3
+"RTN","C0CRNF",186,0)
+ . . S $P(@GRTN@(C0CNAME,"I"),"^",3)=$G(C0CTMP(C0CJ,C0CREF,C0CI,"I"))
+"RTN","C0CRNF",187,0)
+ I C0CNN D  ; IF ONLY NON-NULL VALUES ARE TO BE RETURNED
+"RTN","C0CRNF",188,0)
+ . S C0CI=""
+"RTN","C0CRNF",189,0)
+ . F  S C0CI=$O(@GRTN@(C0CI)) Q:C0CI=""  D  ; GO THROUGH THE WHOLE ARRAY
+"RTN","C0CRNF",190,0)
+ . . I $P(@GRTN@(C0CI),"^",3)="" K @GRTN@(C0CI) ; KILL THE NULL ENTRIES
+"RTN","C0CRNF",191,0)
+ Q
+"RTN","C0CRNF",192,0)
+ ;
+"RTN","C0CRNF",193,0)
+GETN1(GRTN,GFILE,GREF,GNDX,GNN) ; NEW GET ;GPL ; RETURN A FIELD VALUE MAP
+"RTN","C0CRNF",194,0)
+ ; THE FOLLOWING COMMENTS ARE WRONG.. THIS ROUTINE STILL RETURNS AN RNF1
+"RTN","C0CRNF",195,0)
+ ; FORMAT ARRAY @GRTN@("FIELD NAME")="FILE^FIELD#^VALUE" ;GPL
+"RTN","C0CRNF",196,0)
+ ; GETN IS AN EXTRINSIC WHICH RETURNS THE NEXT IEN AFTER THE CURRENT GIEN
+"RTN","C0CRNF",197,0)
+ ; GRTN, PASSED BY NAME, RETURNS A FIELD MAP AND A VALUE MAP
+"RTN","C0CRNF",198,0)
+ ; .. FIELD MAP @GRTN@("F","FIELDNAME^FILE^FIELD#")=""
+"RTN","C0CRNF",199,0)
+ ; ... ANY FIELD USED BY ANY RECORD PROCESSED IS IN THE FIELD MAP
+"RTN","C0CRNF",200,0)
+ ; .. VALUE MAP @GRTN@("V","IEN","FIELDNAME")=VALUE
+"RTN","C0CRNF",201,0)
+ ; .. GRTN IS NOT INITIALIZED, SO MULTIPLE CALLS ARE CUMULATIVE
+"RTN","C0CRNF",202,0)
+ ; .. IF GNN="ALL" THEN ALL FIELDS FOR THE FILE ARE IN THE FIELD MAP
+"RTN","C0CRNF",203,0)
+ ; .. EVEN IF GNN="ALL" ONLY POPULATED FIELDS ARE RETURNED IN THE VALUE MAP
+"RTN","C0CRNF",204,0)
+ ; .. NUL FIELDS CAN BE DETERMINED BY CHECKING FIELD MAP - THIS SAVES SPACE
+"RTN","C0CRNF",205,0)
+ ; IF GREF IS "" THE FIRST RECORD IS OBTAINED
+"RTN","C0CRNF",206,0)
+ ; IF GNDX IS NULL, GREF IS AN IEN FOR THE FILE
+"RTN","C0CRNF",207,0)
+ ; GNDX IS THE INDEX TO USE TO OBTAIN THE IEN
+"RTN","C0CRNF",208,0)
+ ; GREF IS THE VALUE FOR THE INDEX
+"RTN","C0CRNF",209,0)
+ ; GANN= NOT NULL - IF GANN IS "ALL" THEN EVEN NULL FIELDS WILL BE RETURNED
+"RTN","C0CRNF",210,0)
+ ; OTHERWISE, ONLY POPULATED FIELDS ARE RETURNED IN GRTN
+"RTN","C0CRNF",211,0)
+ ;
+"RTN","C0CRNF",212,0)
+ ;
+"RTN","C0CRNF",213,0)
+ N GIEN,GF
+"RTN","C0CRNF",214,0)
+ S GF=$$FILEREF(GFILE) ;CLOSED FILE REFERENCE FOR FILE NUMBER GFILE
+"RTN","C0CRNF",215,0)
+ I ('$D(GNDX))!(GNDX="") S GIEN=GREF ; IF NO INDEX USED, GREF IS THE IEN
+"RTN","C0CRNF",216,0)
+ E  D  ; WE ARE USING AN INDEX
+"RTN","C0CRNF",217,0)
+ . ;N ZG
+"RTN","C0CRNF",218,0)
+ . S ZG=$Q(@GF@(GNDX,GREF)) ;ACCESS INDEX
+"RTN","C0CRNF",219,0)
+ . I ZG'="" D  ;
+"RTN","C0CRNF",220,0)
+ . . I $QS(ZG,3)=GREF D  ; IS GREF IN INDEX?
+"RTN","C0CRNF",221,0)
+ . . . S GIEN=$QS(ZG,4) ; PULL OUT THE IEN
+"RTN","C0CRNF",222,0)
+ . . E  S GIEN="" ; NOT FOUND IN INDEX
+"RTN","C0CRNF",223,0)
+ . E  S GIEN="" ;
+"RTN","C0CRNF",224,0)
+ ;W "IEN: ",GIEN,!
+"RTN","C0CRNF",225,0)
+ ;N C0CTMP,C0CI,C0CJ,C0CREF,C0CNAME
+"RTN","C0CRNF",226,0)
+ I $D(GNN) I GNN="ALL" S C0CNN=0 ; NOT NON-NULL (ALL FIELDS TO BE RETURNED)
+"RTN","C0CRNF",227,0)
+ E  S C0CNN=1 ; NON-NULL IS TRUE (ONLY POPULATED FIELDS RETURNED)
+"RTN","C0CRNF",228,0)
+ S C0CREF=GIEN_"," ; OPEN ROOT REFERENCE INTO FILE
+"RTN","C0CRNF",229,0)
+ D CLEAN^DILF ; MAKE SURE WE ARE CLEANED UP
+"RTN","C0CRNF",230,0)
+ K C0CTMP
+"RTN","C0CRNF",231,0)
+ D GETS^DIQ(GFILE,C0CREF,"**","IE","C0CTMP")
+"RTN","C0CRNF",232,0)
+ D FIELDS(GRTN,GFILE) ;GET ALL THE FIELD NAMES FOR THE FILE
+"RTN","C0CRNF",233,0)
+ S @GRTN@(0)=GFILE_"^RNF1^"_GIEN_"^"_DT_"^"_$J_"^"_DUZ ; STRUCTURE SIGNATURE
+"RTN","C0CRNF",234,0)
+ S (C0CI,C0CJ)=""
+"RTN","C0CRNF",235,0)
+ F  S C0CJ=$O(C0CTMP(C0CJ)) Q:C0CJ=""  D  ; FOR ALL SUBFILES
+"RTN","C0CRNF",236,0)
+ . S C0CREF=$O(C0CTMP(C0CJ,"")) ; RECORD REFERENCE
+"RTN","C0CRNF",237,0)
+ . F  S C0CI=$O(C0CTMP(C0CJ,C0CREF,C0CI)) Q:C0CI=""  D  ; ARRAY OF FIELDS
+"RTN","C0CRNF",238,0)
+ . . ;W C0CJ," ",C0CI,!
+"RTN","C0CRNF",239,0)
+ . . S C0CNAME=$P(^DD(C0CJ,C0CI,0),"^",1) ;PULL THE FIELD NAME
+"RTN","C0CRNF",240,0)
+ . . S C0CVALUE=C0CTMP(C0CJ,C0CREF,C0CI,"E") ;
+"RTN","C0CRNF",241,0)
+ . . I C0CVALUE["C0CTMP" D  ; WP FIELD
+"RTN","C0CRNF",242,0)
+ . . . N ZT,ZWP S ZWP=0 ;ITERATOR
+"RTN","C0CRNF",243,0)
+ . . . S ZWP=$O(C0CTMP(C0CJ,C0CREF,C0CI,ZWP)) ; INIT TO FIRST LINE
+"RTN","C0CRNF",244,0)
+ . . . S C0CVALUE=C0CTMP(C0CJ,C0CREF,C0CI,ZWP) ; INIT TO FIRST LINE
+"RTN","C0CRNF",245,0)
+ . . . F  S ZWP=$O(C0CTMP(C0CJ,C0CREF,C0CI,ZWP)) Q:'ZWP  D  ;
+"RTN","C0CRNF",246,0)
+ . . . . S ZT=" "_C0CTMP(C0CJ,C0CREF,C0CI,ZWP) ;LINE OF WP
+"RTN","C0CRNF",247,0)
+ . . . . S ZT=$TR(ZT,"^""","|'") ;HACK TO GET RID OF ^ AND " IN TEXT "
+"RTN","C0CRNF",248,0)
+ . . . . S C0CVALUE=C0CVALUE_ZT ;
+"RTN","C0CRNF",249,0)
+ . . S $P(@GRTN@(C0CNAME),"^",3)=C0CVALUE ;RETURN VALUE IN P3
+"RTN","C0CRNF",250,0)
+ . . S $P(@GRTN@(C0CNAME,"I"),"^",3)=$G(C0CTMP(C0CJ,C0CREF,C0CI,"I"))
+"RTN","C0CRNF",251,0)
+ I C0CNN D  ; IF ONLY NON-NULL VALUES ARE TO BE RETURNED
+"RTN","C0CRNF",252,0)
+ . S C0CI=""
+"RTN","C0CRNF",253,0)
+ . F  S C0CI=$O(@GRTN@(C0CI)) Q:C0CI=""  D  ; GO THROUGH THE WHOLE ARRAY
+"RTN","C0CRNF",254,0)
+ . . I $P(@GRTN@(C0CI),"^",3)="" K @GRTN@(C0CI) ; KILL THE NULL ENTRIES
+"RTN","C0CRNF",255,0)
+ Q
+"RTN","C0CRNF",256,0)
+ ;
+"RTN","C0CRNF",257,0)
+GETN2(GARTN,GAFILE,GAIDX,GACNT,GASTRT,GANN) ; RETURN FIELD MAP AND VALUES
+"RTN","C0CRNF",258,0)
+ ; GARTN, PASSED BY NAME, RETURNS A FIELD MAP AND A VALUE MAP
+"RTN","C0CRNF",259,0)
+ ; .. FIELD MAP @GARTN@("F","FIELDNAME")="FILE;FIELD#"
+"RTN","C0CRNF",260,0)
+ ; ... ANY FIELD USED BY ANY RECORD PROCESSED IS IN THE FIELD MAP
+"RTN","C0CRNF",261,0)
+ ; .. VALUE MAP @GARTN@("V","IEN","FIELDNAME","N")=VALUE
+"RTN","C0CRNF",262,0)
+ ; .. WHERE N IS THE INDEX FOR MULTIPLES.. 1 FOR SINGLE VALUES
+"RTN","C0CRNF",263,0)
+ ; .. GARTN IS NOT INITIALIZED, SO MULTIPLE CALLS ARE CUMULATIVE
+"RTN","C0CRNF",264,0)
+ ; .. IF GANN="ALL" THEN ALL FIELDS FOR THE FILE ARE IN THE FIELD MAP
+"RTN","C0CRNF",265,0)
+ ; .. EVEN IF GANN="ALL" ONLY POPULATED FIELDS ARE RETURNED IN THE VALUE MAP
+"RTN","C0CRNF",266,0)
+ ; .. NUL FIELDS CAN BE DETERMINED BY CHECKING FIELD MAP - THIS SAVES SPACE
+"RTN","C0CRNF",267,0)
+ ; GAFILE IS THE FILE NUMBER TO BE PROCESSED. IT IS PASSED BY VALUE
+"RTN","C0CRNF",268,0)
+ ; GAIDX IS THE OPTIONAL INDEX TO USE IN THE FILE. IF GAIDX IS "" THE IEN
+"RTN","C0CRNF",269,0)
+ ; .. OF THE FILE WILL BE USED
+"RTN","C0CRNF",270,0)
+ ; GACNT IS THE NUMBER OF RECORDS TO PROCESS. IT IS PASSED BY VALUE
+"RTN","C0CRNF",271,0)
+ ; .. IF GARCNT IS NULL, ALL RECORDS ARE PROCESSED
+"RTN","C0CRNF",272,0)
+ ; GASTRT IS THE IEN OF THE FIRST RECORD TO PROCESS. IT IS PASSED BY VALUE
+"RTN","C0CRNF",273,0)
+ ; .. IF GARSTART IS NULL, PROCESSING STARTS AT THE FIRST RECORD
+"RTN","C0CRNF",274,0)
+ ; GANN= NOT NULL - IF GANN IS "ALL" THEN EVEN NULL FIELDS WILL BE RETURNED
+"RTN","C0CRNF",275,0)
+ ; OTHERWISE, ONLY POPULATED FIELDS ARE RETURNED IN GARFLD AND GARVAL
+"RTN","C0CRNF",276,0)
+ ;N GATMP,GAI,GAF
+"RTN","C0CRNF",277,0)
+ S GAF=$$FILEREF(GAFILE) ; GET CLOSED ROOT FOR THE FILE NUMBER GAFILE
+"RTN","C0CRNF",278,0)
+ I '$D(GAIDX) S GAIDX="" ;DEFAULT
+"RTN","C0CRNF",279,0)
+ I '$D(GANN) S GANN="" ;DEFAULT ONLY POPULATED FIELDS RETURNED
+"RTN","C0CRNF",280,0)
+ I GAIDX'="" S GAF=$NA(@GAF@(GAIDX)) ; IF WE ARE USING AN INDEX
+"RTN","C0CRNF",281,0)
+ W GAF,!
+"RTN","C0CRNF",282,0)
+ W $O(@GAF@(0)) ;
+"RTN","C0CRNF",283,0)
+ S GAI=0 ;ITERATOR
+"RTN","C0CRNF",284,0)
+ F  S GAI=$O(@GAF@(GAI)) Q:GAI=""  D  ;
+"RTN","C0CRNF",285,0)
+ . D GETN1("GATMP",GAFILE,GAI,GAIDX,GANN) ;GET ONE RECORD
+"RTN","C0CRNF",286,0)
+ . N GAX S GAX=0
+"RTN","C0CRNF",287,0)
+ . F  S GAX=$O(GATMP(GAX)) Q:GAX=""  D  ;PULL OUT THE FIELDS
+"RTN","C0CRNF",288,0)
+ . . D ADDNV(GARTN,GAI,GAX,GATMP(GAX)) ;INSERT THE NAME/VALUE INTO GARTN
+"RTN","C0CRNF",289,0)
+ Q
+"RTN","C0CRNF",290,0)
+ ;
+"RTN","C0CRNF",291,0)
+ADDNV(GNV,GNVN,GNVF,GNVV) ; CREATE AN ELEMENT OF THE MATRIX
+"RTN","C0CRNF",292,0)
+ ;
+"RTN","C0CRNF",293,0)
+ S @GNV@("F",GNVF)=$P(GNVV,"^",1)_"^"_$P(GNVV,"^",2) ;NAME=FILE^FIELD#
+"RTN","C0CRNF",294,0)
+ S @GNV@("V",GNVN,GNVF,1)=$P(GNVV,"^",3) ;SET THE VALUE
+"RTN","C0CRNF",295,0)
+ Q
+"RTN","C0CRNF",296,0)
+ ;
+"RTN","C0CRNF",297,0)
+RNF2CSV(RNRTN,RNIN,RNSTY) ;CONVERTS AN RFN2 GLOBAL TO A CSV FORMAT
+"RTN","C0CRNF",298,0)
+ ; READY TO WRITE FOR USE WITH EXCEL @RNRTN@(0) IS NUMBER OF LINES
+"RTN","C0CRNF",299,0)
+ ; RNSTY IS STYLE OF THE OUTPUT -
+"RTN","C0CRNF",300,0)
+ ; .. "NV"= ROWS ARE NAMES, COLUMNS ARE VALUES
+"RTN","C0CRNF",301,0)
+ ; .. "VN"= ROWS ARE VALUES, COLUMNS ARE NAMES
+"RTN","C0CRNF",302,0)
+ ; .. DEFAULT IS "NV" BECAUSE MANY MATRICES HAVE MORE FIELDS THAN VALUES
+"RTN","C0CRNF",303,0)
+ N RNR,RNC ;ROW ROOT,COL ROOT
+"RTN","C0CRNF",304,0)
+ N RNI,RNJ,RNX
+"RTN","C0CRNF",305,0)
+ I '$D(RNSTY) S RNSTY="NV" ;DEFAULT
+"RTN","C0CRNF",306,0)
+ I RNSTY="NV" D NV(RNRTN,RNIN)  ; INTERNAL SUBROUTINES DEPENDING ON ORIENTATION
+"RTN","C0CRNF",307,0)
+ E  D VN(RNRTN,RNIN) ;
+"RTN","C0CRNF",308,0)
+ Q
+"RTN","C0CRNF",309,0)
+ ;
+"RTN","C0CRNF",310,0)
+NV(RNRTN,RNIN) ;
+"RTN","C0CRNF",311,0)
+ S RNR=$NA(@RNIN@("F"))
+"RTN","C0CRNF",312,0)
+ S RNC=$NA(@RNIN@("V"))
+"RTN","C0CRNF",313,0)
+ ;S RNY=$P(@RNIN@(0),"^",1) ; FILE NUMBER
+"RTN","C0CRNF",314,0)
+ S RNX="""FILE"""_"," ; FIRST COLUMN NAME IS "FIELD"
+"RTN","C0CRNF",315,0)
+ S RNI=""
+"RTN","C0CRNF",316,0)
+ F  S RNI=$O(@RNC@(RNI)) Q:RNI=""  D  ; FOR EACH COLUMN
+"RTN","C0CRNF",317,0)
+ . S RNX=RNX_RNI_"," ;ADD THE COLUMM ELEMENT AND A COMMA
+"RTN","C0CRNF",318,0)
+ S RNX=$E(RNX,1,$L(RNX)-1) ; STRIP OFF THE LAST COMMA
+"RTN","C0CRNF",319,0)
+ D PUSH^C0CXPATH(RNRTN,RNX) ; FIRST LINE CONTAINS COLUMN HEADINGS
+"RTN","C0CRNF",320,0)
+ S RNI=""
+"RTN","C0CRNF",321,0)
+ F  S RNI=$O(@RNR@(RNI)) Q:RNI=""  D  ; FOR EACH ROW
+"RTN","C0CRNF",322,0)
+ . S RNX=""""_RNI_""""_"," ; FIRST ELEMENT ON ROW IS THE FIELD
+"RTN","C0CRNF",323,0)
+ . S RNJ=""
+"RTN","C0CRNF",324,0)
+ . F  S RNJ=$O(@RNC@(RNJ)) Q:RNJ=""  D  ; FOR EACH COL
+"RTN","C0CRNF",325,0)
+ . . I $D(@RNC@(RNJ,RNI,1)) D  ; THIS ROW HAS THIS COLUMN
+"RTN","C0CRNF",326,0)
+ . . . S RNX=RNX_""""_@RNC@(RNJ,RNI,1)_""""_"," ; ADD THE ELEMENT PLUS A COMMA
+"RTN","C0CRNF",327,0)
+ . . E  S RNX=RNX_"," ; NUL COLUMN
+"RTN","C0CRNF",328,0)
+ . S RNX=$E(RNX,1,$L(RNX)-1) ; STRIP OFF THE LAST COMMA
+"RTN","C0CRNF",329,0)
+ . D PUSH^C0CXPATH(RNRTN,RNX)
+"RTN","C0CRNF",330,0)
+ Q
+"RTN","C0CRNF",331,0)
+ ;
+"RTN","C0CRNF",332,0)
+VN(RNRTN,RNIN) ;
+"RTN","C0CRNF",333,0)
+ S RNR=$NA(@RNIN@("V"))
+"RTN","C0CRNF",334,0)
+ S RNC=$NA(@RNIN@("F"))
+"RTN","C0CRNF",335,0)
+ ;S RNY=$P(@RNIN@(0),"^",1) ; FILE NUMBER
+"RTN","C0CRNF",336,0)
+ S RNX="""ROW"""_"," ; FIRST COLUMN NAME IS "ROW"
+"RTN","C0CRNF",337,0)
+ S RNI=""
+"RTN","C0CRNF",338,0)
+ F  S RNI=$O(@RNC@(RNI)) Q:RNI=""  D  ; FOR EACH COLUMN
+"RTN","C0CRNF",339,0)
+ . S RNX=RNX_RNI_"," ;ADD THE COLUMM ELEMENT AND A COMMA
+"RTN","C0CRNF",340,0)
+ S RNX=$E(RNX,1,$L(RNX)-1) ; STRIP OFF THE LAST COMMA
+"RTN","C0CRNF",341,0)
+ D PUSH^C0CXPATH(RNRTN,RNX) ; FIRST LINE CONTAINS COLUMN HEADINGS
+"RTN","C0CRNF",342,0)
+ S RNI=""
+"RTN","C0CRNF",343,0)
+ F  S RNI=$O(@RNR@(RNI)) Q:RNI=""  D  ; FOR EACH ROW
+"RTN","C0CRNF",344,0)
+ . S RNX=""""_RNI_""""_"," ; FIRST ELEMENT ON ROW IS THE FIELD
+"RTN","C0CRNF",345,0)
+ . S RNJ=""
+"RTN","C0CRNF",346,0)
+ . F  S RNJ=$O(@RNC@(RNJ)) Q:RNJ=""  D  ; FOR EACH COL
+"RTN","C0CRNF",347,0)
+ . . I $D(@RNR@(RNI,RNJ,1)) D  ; THIS ROW HAS THIS COLUMN
+"RTN","C0CRNF",348,0)
+ . . . S RNV=$TR(@RNR@(RNI,RNJ,1),"""","")
+"RTN","C0CRNF",349,0)
+ . . . S RNV=$TR(RNV,",","")
+"RTN","C0CRNF",350,0)
+ . . . S RNX=RNX_""""_RNV_""""_"," ; ADD THE ELEMENT PLUS A COMMA
+"RTN","C0CRNF",351,0)
+ . . E  S RNX=RNX_"," ; NUL COLUMN
+"RTN","C0CRNF",352,0)
+ . S RNX=$E(RNX,1,$L(RNX)-1) ; STRIP OFF THE LAST COMMA
+"RTN","C0CRNF",353,0)
+ . D PUSH^C0CXPATH(RNRTN,RNX)
+"RTN","C0CRNF",354,0)
+ Q
+"RTN","C0CRNF",355,0)
+ ;
+"RTN","C0CRNF",356,0)
+READCSV(PATH,NAME,GLB) ; READ A CSV FILE IN FROM UNIX TO GLB, PASSED BY NAME
+"RTN","C0CRNF",357,0)
+ ;
+"RTN","C0CRNF",358,0)
+ Q $$FTG^%ZISH(PATH,NAME,GLB,1)
+"RTN","C0CRNF",359,0)
+ ;
+"RTN","C0CRNF",360,0)
+FILE2CSV(FNUM,FVN) ; WRITES OUT A FILEMAN FILE TO CSV
+"RTN","C0CRNF",361,0)
+ ;
+"RTN","C0CRNF",362,0)
+ ;N G1,G2
+"RTN","C0CRNF",363,0)
+ I '$D(FVN) S FVN="NV" ; DEFAULT ORIENTATION OF CVS FILE
+"RTN","C0CRNF",364,0)
+ S G1=$NA(^TMP($J,"C0CCSV",1))
+"RTN","C0CRNF",365,0)
+ S G2=$NA(^TMP($J,"C0CCSV",2))
+"RTN","C0CRNF",366,0)
+ D GETN2(G1,FNUM) ; GET THE MATRIX
+"RTN","C0CRNF",367,0)
+ D RNF2CSV(G2,G1,FVN) ; PREPARE THE CVS FILE
+"RTN","C0CRNF",368,0)
+ K @G1
+"RTN","C0CRNF",369,0)
+ D FILEOUT(G2,"FILE_"_FNUM_".csv")
+"RTN","C0CRNF",370,0)
+ K @G2
+"RTN","C0CRNF",371,0)
+ Q
+"RTN","C0CRNF",372,0)
+ ;
+"RTN","C0CRNF",373,0)
+FILEOUT(FOARY,FONAM) ; WRITE OUT A FILE
+"RTN","C0CRNF",374,0)
+ ;
+"RTN","C0CRNF",375,0)
+ W $$OUTPUT^C0CXPATH($NA(@FOARY@(1)),FONAM,^TMP("C0CCCR","ODIR"))
+"RTN","C0CRNF",376,0)
+ Q
+"RTN","C0CRNF",377,0)
+ ;
+"RTN","C0CRNF",378,0)
+FILEREF(FNUM) ; EXTRINSIC THAT RETURNS A CLOSED ROOT FOR FILE NUMBER FNUM
+"RTN","C0CRNF",379,0)
+ ;
+"RTN","C0CRNF",380,0)
+ N C0CF
+"RTN","C0CRNF",381,0)
+ S C0CF=^DIC(FNUM,0,"GL") ;OPEN ROOT TO FILE
+"RTN","C0CRNF",382,0)
+ S C0CF=$P(C0CF,",",1)_")" ; CLOSE THE ROOT
+"RTN","C0CRNF",383,0)
+ I C0CF["()" S C0CF=$P(C0CF,"()",1)
+"RTN","C0CRNF",384,0)
+ Q C0CF
+"RTN","C0CRNF",385,0)
+ ;
+"RTN","C0CRNF",386,0)
+SKIP ;
+"RTN","C0CRNF",387,0)
+ N TXT,DIERR
+"RTN","C0CRNF",388,0)
+ S TXT=$$GET1^DIQ(8925,TIUIEN,"2","","TXT")
+"RTN","C0CRNF",389,0)
+ I $D(DIERR) D CLEAN^DILF Q
+"RTN","C0CRNF",390,0)
+ W "  report_text:",!  ;Progress Note Text
+"RTN","C0CRNF",391,0)
+ N LN S LN=0
+"RTN","C0CRNF",392,0)
+ F  S LN=$O(TXT(LN)) Q:'LN  D
+"RTN","C0CRNF",393,0)
+ . W "    text"_LN_": "_TXT(LN),!
+"RTN","C0CRNF",394,0)
+ . Q
+"RTN","C0CRNF",395,0)
+ Q
+"RTN","C0CRNF",396,0)
+ ;
+"RTN","C0CRNF",397,0)
+RNF2HNV(ZOUT,ZIN) ;RETURN AN HTML TABLE IN ZOUT, PASSED BY NAME
+"RTN","C0CRNF",398,0)
+ ; OF ZIN, WHICH IS PASSED BY NAME AND IS IN RNF2 FORMAT
+"RTN","C0CRNF",399,0)
+ ; ZOUT IS NOT INITIALIZED, SO THE TABLE WILL GO AT THE END
+"RTN","C0CRNF",400,0)
+ ; THE TABLE WILL BE IN NV FORMAT, ROWS ARE NAMES COLUMNS ARE VALUES 
+"RTN","C0CRNF",401,0)
+ D PUSH^C0CXPATH(ZOUT,"<table border=""1"">")
+"RTN","C0CRNF",402,0)
+ N ZI,ZJ,ZV,ZN S ZI="" S ZJ=0
+"RTN","C0CRNF",403,0)
+ D PUSH^C0CXPATH(ZOUT,"<tr><td></td>") ;begin row and leave a blank col
+"RTN","C0CRNF",404,0)
+ F  S ZJ=$O(@ZIN@("V",ZJ)) Q:+ZJ=0  D  ; FOR EACH OCCURANCE
+"RTN","C0CRNF",405,0)
+ . S ZV="<td>"_ZJ_"</td>" ; OCCURANCE AS COLUMNS HEADER
+"RTN","C0CRNF",406,0)
+ . D PUSH^C0CXPATH(ZOUT,ZV)
+"RTN","C0CRNF",407,0)
+ D PUSH^C0CXPATH(ZOUT,"</tr>") ;end of first row
+"RTN","C0CRNF",408,0)
+ S ZI=""
+"RTN","C0CRNF",409,0)
+ F  S ZI=$O(@ZIN@("F",ZI)) Q:ZI=""  D  ; FOR EACH VARIABLE
+"RTN","C0CRNF",410,0)
+ . S ZN="<tr><td>"_ZI_"</td>" ; VARIABLE NAME IN FIRST COLUMN
+"RTN","C0CRNF",411,0)
+ . D PUSH^C0CXPATH(ZOUT,ZN)
+"RTN","C0CRNF",412,0)
+ . S ZJ=0 ;RESET TO DO IT AGAIN
+"RTN","C0CRNF",413,0)
+ . F  S ZJ=$O(@ZIN@("V",ZJ)) Q:+ZJ=0  D  ; FOR EACH OCCURANCE
+"RTN","C0CRNF",414,0)
+ . . S ZV="<td>"_$G(@ZIN@("V",ZJ,ZI,1))_"</td>"
+"RTN","C0CRNF",415,0)
+ . . D PUSH^C0CXPATH(ZOUT,ZV)
+"RTN","C0CRNF",416,0)
+ . D PUSH^C0CXPATH(ZOUT,"</tr>") ;END OF ROW
+"RTN","C0CRNF",417,0)
+ D PUSH^C0CXPATH(ZOUT,"</table>") ; end of table
+"RTN","C0CRNF",418,0)
+ Q
+"RTN","C0CRNF",419,0)
+ ;
+"RTN","C0CRNF",420,0)
+RNF2HVN(ZOUT,ZIN) ;RETURN AN HTML TABLE IN ZOUT, PASSED BY NAME
+"RTN","C0CRNF",421,0)
+ ; OF ZIN, WHICH IS PASSED BY NAME AND IS IN RNF2 FORMAT
+"RTN","C0CRNF",422,0)
+ ; ZOUT IS NOT INITIALIZED, SO THE TABLE WILL GO AT THE END
+"RTN","C0CRNF",423,0)
+ ; THE TABLE WILL BE IN VN FORMAT, ROWS ARE VALUES COLUMNS ARE NAMES 
+"RTN","C0CRNF",424,0)
+ D PUSH^C0CXPATH(ZOUT,"<table border=""1"">")
+"RTN","C0CRNF",425,0)
+ N ZI,ZJ S ZI="" S ZJ=0
+"RTN","C0CRNF",426,0)
+ D PUSH^C0CXPATH(ZOUT,"<tr>") ;new row for column headers
+"RTN","C0CRNF",427,0)
+ F  S ZI=$O(@ZIN@("F",ZI)) Q:ZI=""  D  ; FOR EACH VARIABLE
+"RTN","C0CRNF",428,0)
+ . S ZV="<td>"_ZI_"</td>"
+"RTN","C0CRNF",429,0)
+ . D PUSH^C0CXPATH(ZOUT,ZV) ; name
+"RTN","C0CRNF",430,0)
+ D PUSH^C0CXPATH(ZOUT,"</tr>") ; end header row
+"RTN","C0CRNF",431,0)
+ S ZI="" ;RESET TO DO AGAIN
+"RTN","C0CRNF",432,0)
+ F  S ZJ=$O(@ZIN@("V",ZJ)) Q:+ZJ=0  D  ; FOR EACH ROW OF VARIABLES
+"RTN","C0CRNF",433,0)
+ . D PUSH^C0CXPATH(ZOUT,"<tr>") ;begin row
+"RTN","C0CRNF",434,0)
+ . F  S ZI=$O(@ZIN@("F",ZI)) Q:ZI=""  D  ; FOR EACH VARIABLE
+"RTN","C0CRNF",435,0)
+ . . S ZV="<td>"_$G(@ZIN@("V",ZJ,ZI,1))_"</td>" ; value
+"RTN","C0CRNF",436,0)
+ . . D PUSH^C0CXPATH(ZOUT,ZV) ; value
+"RTN","C0CRNF",437,0)
+ . D PUSH^C0CXPATH(ZOUT,"</tr>") ; end header
+"RTN","C0CRNF",438,0)
+ D PUSH^C0CXPATH(ZOUT,"</table>") ;end of table
+"RTN","C0CRNF",439,0)
+ Q
+"RTN","C0CRNF",440,0)
+ ;
+"RTN","C0CRNF",441,0)
+ZFILE(ZFN,ZTAB) ; EXTRINSIC TO RETURN FILE NUMBER FOR FIELD NAME PASSED
+"RTN","C0CRNF",442,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 1 OF @ZTAB@(ZFN)
+"RTN","C0CRNF",443,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRNF",444,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRNF",445,0)
+ Q $P(@ZTAB@(ZFN),"^",1)
+"RTN","C0CRNF",446,0)
+ZFIELD(ZFN,ZTAB) ;EXTRINSIC TO RETURN FIELD NUMBER FOR FIELD NAME PASSED
+"RTN","C0CRNF",447,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 2 OF @ZTAB@(ZFN)
+"RTN","C0CRNF",448,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRNF",449,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRNF",450,0)
+ Q $P(@ZTAB@(ZFN),"^",2)
+"RTN","C0CRNF",451,0)
+ZVALUE(ZFN,ZTAB) ;EXTRINSIC TO RETURN VALUE FOR FIELD NAME PASSED
+"RTN","C0CRNF",452,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF @ZTAB@(ZFN)
+"RTN","C0CRNF",453,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRNF",454,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRNF",455,0)
+ Q $P($G(@ZTAB@(ZFN)),"^",3)
+"RTN","C0CRNF",456,0)
+ ;
+"RTN","C0CRNF",457,0)
+ZVALUEI(ZFN,ZTAB) ;EXTRINSIC TO RETURN INTERNAL VALUE FOR FIELD NAME PASSED
+"RTN","C0CRNF",458,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF @ZTAB@(ZFN)
+"RTN","C0CRNF",459,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRNF",460,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRNF",461,0)
+ Q $P($G(@ZTAB@(ZFN,"I")),"^",3)
+"RTN","C0CRNF",462,0)
+ ;
+"RTN","C0CRNFRP")
+0^95^B91701220
+"RTN","C0CRNFRP",1,0)
+C0CRNFRP ; CCDCCR/GPL - Reference Name Format (RNF) RPCs; 12/9/09 ; 5/10/12 2:56pm
+"RTN","C0CRNFRP",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CRNFRP",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CRNFRP",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CRNFRP",5,0)
+ ;
+"RTN","C0CRNFRP",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CRNFRP",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CRNFRP",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CRNFRP",9,0)
+ ;(at your option) any later version.
+"RTN","C0CRNFRP",10,0)
+ ;
+"RTN","C0CRNFRP",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CRNFRP",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CRNFRP",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CRNFRP",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CRNFRP",15,0)
+ ;
+"RTN","C0CRNFRP",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CRNFRP",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CRNFRP",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CRNFRP",19,0)
+ ;
+"RTN","C0CRNFRP",20,0)
+ W "This is the Reference Name Format (RNF) RPC Library ",!
+"RTN","C0CRNFRP",21,0)
+ W !
+"RTN","C0CRNFRP",22,0)
+ Q
+"RTN","C0CRNFRP",23,0)
+ ;
+"RTN","C0CRNFRP",24,0)
+ ;This routine will be mirroring C0CRNF and transform the output
+"RTN","C0CRNFRP",25,0)
+ ;of the tags into an RPC friendly format
+"RTN","C0CRNFRP",26,0)
+ ;The tags will be exactly as they are in C0CRNF
+"RTN","C0CRNFRP",27,0)
+FIELDS(C0CFRTN,C0CFILE) ; RETURNS AN ARRAY OF THE FIELDS IN FILE C0CF,
+"RTN","C0CRNFRP",28,0)
+ ;C0CFRTN IS PASSED BY REFERENCE, C0CF IS PASSED BY VALUE
+"RTN","C0CRNFRP",29,0)
+ ;RETURN FORMAT:
+"RTN","C0CRNFRP",30,0)
+ ;^TMP("C0CRNF",$J,0)="NUMBER_OF_RESULTS
+"RTN","C0CRNFRP",31,0)
+ ;^TMP("C0CRNF",$J,I)="FIELD_NAME^FILE_NUMBER^FIELD_NUMBER"
+"RTN","C0CRNFRP",32,0)
+ ;
+"RTN","C0CRNFRP",33,0)
+ ;SAMPLE OUTPUT FROM FIELDS^C0CRNF:
+"RTN","C0CRNFRP",34,0)
+ ;C0CRNFFIELDS("*AMOUNT OF MILITARY RETIREMENT")="2^.3625"
+"RTN","C0CRNFRP",35,0)
+ ;
+"RTN","C0CRNFRP",36,0)
+ ;FORMAT APPEARS TO BE:
+"RTN","C0CRNFRP",37,0)
+ ;VARIABLENAME("FIELD_NAME")="FILE_NUMBER^FIELD_NUMBER"
+"RTN","C0CRNFRP",38,0)
+ ;
+"RTN","C0CRNFRP",39,0)
+ ;SET DEBUG VALUE - REQUIRED - 0=OFF 1=ON
+"RTN","C0CRNFRP",40,0)
+ S DEBUG=0
+"RTN","C0CRNFRP",41,0)
+ ;SET RETURN VALUE
+"RTN","C0CRNFRP",42,0)
+ S C0CFRTN=$NA(^TMP("C0CRNF",$J))
+"RTN","C0CRNFRP",43,0)
+ K @C0CFRTN
+"RTN","C0CRNFRP",44,0)
+ ;RUN WRAPPED CALL
+"RTN","C0CRNFRP",45,0)
+ D FIELDS^C0CRNF("C0CRTN",C0CFILE)
+"RTN","C0CRNFRP",46,0)
+ S J=""
+"RTN","C0CRNFRP",47,0)
+ S I=1
+"RTN","C0CRNFRP",48,0)
+ ;FORMAT RETURN
+"RTN","C0CRNFRP",49,0)
+ F  S J=$O(C0CRTN(J)) Q:J=""  D  ; FOR EACH FIELD IN THE ARRAY
+"RTN","C0CRNFRP",50,0)
+ . S @C0CFRTN@(I)=J_"^"_C0CRTN(J)
+"RTN","C0CRNFRP",51,0)
+ . S I=I+1
+"RTN","C0CRNFRP",52,0)
+ S @C0CFRTN@(0)=I-1
+"RTN","C0CRNFRP",53,0)
+ ;CLEAN UP
+"RTN","C0CRNFRP",54,0)
+ K J,I
+"RTN","C0CRNFRP",55,0)
+ Q
+"RTN","C0CRNFRP",56,0)
+ ;
+"RTN","C0CRNFRP",57,0)
+GETNOLD(GRTN,GFILE,GIEN,GNN) ; GET FIELDS FOR ACCESS BY NAME
+"RTN","C0CRNFRP",58,0)
+ ; GRTN IS PASSED BY NAME
+"RTN","C0CRNFRP",59,0)
+ ;
+"RTN","C0CRNFRP",60,0)
+ ; OLD TAG DO NOT USE!
+"RTN","C0CRNFRP",61,0)
+ Q
+"RTN","C0CRNFRP",62,0)
+ ;
+"RTN","C0CRNFRP",63,0)
+GETN(C0CGRTN,GFILE,GREF,GNDX,GNN) ; GET BY NAME ; RETURN A FIELD VALUE MAP
+"RTN","C0CRNFRP",64,0)
+ ; FORMAT ARRAY @GRTN@("FIELD NAME")="FILE^FIELD#^VALUE" ;GPL
+"RTN","C0CRNFRP",65,0)
+ ; GRTN, PASSED BY NAME, RETURNS A FIELD MAP AND A VALUE MAP
+"RTN","C0CRNFRP",66,0)
+ ; .. FIELD MAP @GRTN@("F","FIELDNAME^FILE^FIELD#")=""
+"RTN","C0CRNFRP",67,0)
+ ; ... ANY FIELD USED BY ANY RECORD PROCESSED IS IN THE FIELD MAP
+"RTN","C0CRNFRP",68,0)
+ ; .. VALUE MAP @GRTN@("V","IEN","FIELDNAME")=VALUE
+"RTN","C0CRNFRP",69,0)
+ ; .. IF GNN="ALL" THEN ALL FIELDS FOR THE FILE ARE IN THE FIELD MAP
+"RTN","C0CRNFRP",70,0)
+ ; .. EVEN IF GNN="ALL" ONLY POPULATED FIELDS ARE RETURNED IN THE VALUE MAP
+"RTN","C0CRNFRP",71,0)
+ ; .. NULL FIELDS CAN BE DETERMINED BY CHECKING FIELD MAP - THIS SAVES SPACE
+"RTN","C0CRNFRP",72,0)
+ ; IF GREF IS "" THE FIRST RECORD IS OBTAINED
+"RTN","C0CRNFRP",73,0)
+ ; IF GNDX IS NULL, GREF IS AN IEN FOR THE FILE
+"RTN","C0CRNFRP",74,0)
+ ; GNDX IS THE INDEX TO USE TO OBTAIN THE IEN
+"RTN","C0CRNFRP",75,0)
+ ; GREF IS THE VALUE FOR THE INDEX
+"RTN","C0CRNFRP",76,0)
+ ; GANN= NOT NULL - IF GANN IS "ALL" THEN EVEN NULL FIELDS WILL BE RETURNED
+"RTN","C0CRNFRP",77,0)
+ ; OTHERWISE, ONLY POPULATED FIELDS ARE RETURNED IN GRTN
+"RTN","C0CRNFRP",78,0)
+ ;
+"RTN","C0CRNFRP",79,0)
+ ;
+"RTN","C0CRNFRP",80,0)
+ ;RETURN FORMAT:
+"RTN","C0CRNFRP",81,0)
+ ;^TMP("C0CRNF",$J,0)="NUMBER_OF_RESULTS^FILE_NUMBER^RNF1^IEN^CURRENT_DATE^$J^DUZ_$C(30)"
+"RTN","C0CRNFRP",82,0)
+ ;^TMP("C0CRNF",$J,I)="FIELD_NAME^FILE_NUMBER^FIELD_NUMBER^VALUE^INTERNAL_VALUE_$C(30)"
+"RTN","C0CRNFRP",83,0)
+ ;
+"RTN","C0CRNFRP",84,0)
+ ;SAMPLE OUTPUT FROM FIELDS^C0CRNF:
+"RTN","C0CRNFRP",85,0)
+ ;C0CRNFGETN(0)="2^RNF1^5095^3091209^2908^3268"
+"RTN","C0CRNFRP",86,0)
+ ;C0CRNFGETN("1U4N")="2^.0905^H5369"
+"RTN","C0CRNFRP",87,0)
+ ;C0CRNFGETN("1U4N","I")="^^H5369"
+"RTN","C0CRNFRP",88,0)
+ ;C0CRNFGETN("ADDRESS CHANGE DT/TM")="2^.118^OCT 21,2009@08:03:26"
+"RTN","C0CRNFRP",89,0)
+ ;C0CRNFGETN("ADDRESS CHANGE DT/TM","I")="^^3091021.080326"
+"RTN","C0CRNFRP",90,0)
+ ;
+"RTN","C0CRNFRP",91,0)
+ ;FORMAT APPEARS TO BE:
+"RTN","C0CRNFRP",92,0)
+ ;VARIABLENAME(0)="FILE_NUMBER^RNF1^IEN^CURRENT_DATE^$J^DUZ"
+"RTN","C0CRNFRP",93,0)
+ ;VARIABLENAME("FIELD_NAME")="FILE_NUMBER^FIELD_NUMBER^VALUE"
+"RTN","C0CRNFRP",94,0)
+ ;VARIABLENAME("FIELD_NAME","I")="^^INTERNAL_VALUE"
+"RTN","C0CRNFRP",95,0)
+ ;
+"RTN","C0CRNFRP",96,0)
+ ;SET DEBUG VALUE - REQUIRED - 0=OFF 1=ON
+"RTN","C0CRNFRP",97,0)
+ S DEBUG=0
+"RTN","C0CRNFRP",98,0)
+ ;SET RETURN VALUE
+"RTN","C0CRNFRP",99,0)
+ S C0CGRTN=$NA(^TMP("C0CRNF",$J))
+"RTN","C0CRNFRP",100,0)
+ K @C0CGRTN
+"RTN","C0CRNFRP",101,0)
+ ;RUN WRAPPED CALL
+"RTN","C0CRNFRP",102,0)
+ D GETN^C0CRNF("C0CRTN",$G(GFILE),$G(GREF),$G(GNDX),$G(GNN))
+"RTN","C0CRNFRP",103,0)
+ S J=""
+"RTN","C0CRNFRP",104,0)
+ S I=1
+"RTN","C0CRNFRP",105,0)
+ ;FORMAT RETURN
+"RTN","C0CRNFRP",106,0)
+ F  S J=$O(C0CRTN(J)) Q:J=""  D  ; FOR EACH FIELD IN THE ARRAY
+"RTN","C0CRNFRP",107,0)
+ . I J=0 S J=$O(C0CRTN(J)) ; SKIP THE 0 NODE
+"RTN","C0CRNFRP",108,0)
+ . S @C0CGRTN@(I)=J_"^"_C0CRTN(J)_"^" ; GETS THE FIRST LINE
+"RTN","C0CRNFRP",109,0)
+ . ;S J=$O(C0CRTN(J)) ; INCREMENT J SO WE CAN GET THE INTERNAL DATA
+"RTN","C0CRNFRP",110,0)
+ . ;TEST TO SEE IF INTERNAL DATA EXISTS
+"RTN","C0CRNFRP",111,0)
+ . I $D(C0CRTN(J,"I"))=1 D
+"RTN","C0CRNFRP",112,0)
+ . . S @C0CGRTN@(I)=@C0CGRTN@(I)_$P(C0CRTN(J,"I"),U,3) ; GETS THE INTERNAL VALUE PIECE 3
+"RTN","C0CRNFRP",113,0)
+ . S I=I+1
+"RTN","C0CRNFRP",114,0)
+ S @C0CGRTN@(0)=I-1_"^"_C0CRTN(0)
+"RTN","C0CRNFRP",115,0)
+ ;CLEAN UP
+"RTN","C0CRNFRP",116,0)
+ K J,I
+"RTN","C0CRNFRP",117,0)
+ Q
+"RTN","C0CRNFRP",118,0)
+ ;
+"RTN","C0CRNFRP",119,0)
+GETN1(GRTN,GFILE,GREF,GNDX,GNN) ; NEW GET ;GPL ; RETURN A FIELD VALUE MAP
+"RTN","C0CRNFRP",120,0)
+ ; THE FOLLOWING COMMENTS ARE WRONG.. THIS ROUTINE STILL RETURNS AN RNF1
+"RTN","C0CRNFRP",121,0)
+ ; FORMAT ARRAY @GRTN@("FIELD NAME")="FILE^FIELD#^VALUE" ;GPL
+"RTN","C0CRNFRP",122,0)
+ ; GETN IS AN EXTRINSIC WHICH RETURNS THE NEXT IEN AFTER THE CURRENT GIEN
+"RTN","C0CRNFRP",123,0)
+ ; GRTN, PASSED BY NAME, RETURNS A FIELD MAP AND A VALUE MAP
+"RTN","C0CRNFRP",124,0)
+ ; .. FIELD MAP @GRTN@("F","FIELDNAME^FILE^FIELD#")=""
+"RTN","C0CRNFRP",125,0)
+ ; ... ANY FIELD USED BY ANY RECORD PROCESSED IS IN THE FIELD MAP
+"RTN","C0CRNFRP",126,0)
+ ; .. VALUE MAP @GRTN@("V","IEN","FIELDNAME")=VALUE
+"RTN","C0CRNFRP",127,0)
+ ; .. GRTN IS NOT INITIALIZED, SO MULTIPLE CALLS ARE CUMULATIVE
+"RTN","C0CRNFRP",128,0)
+ ; .. IF GNN="ALL" THEN ALL FIELDS FOR THE FILE ARE IN THE FIELD MAP
+"RTN","C0CRNFRP",129,0)
+ ; .. EVEN IF GNN="ALL" ONLY POPULATED FIELDS ARE RETURNED IN THE VALUE MAP
+"RTN","C0CRNFRP",130,0)
+ ; .. NUL FIELDS CAN BE DETERMINED BY CHECKING FIELD MAP - THIS SAVES SPACE
+"RTN","C0CRNFRP",131,0)
+ ; IF GREF IS "" THE FIRST RECORD IS OBTAINED
+"RTN","C0CRNFRP",132,0)
+ ; IF GNDX IS NULL, GREF IS AN IEN FOR THE FILE
+"RTN","C0CRNFRP",133,0)
+ ; GNDX IS THE INDEX TO USE TO OBTAIN THE IEN
+"RTN","C0CRNFRP",134,0)
+ ; GREF IS THE VALUE FOR THE INDEX
+"RTN","C0CRNFRP",135,0)
+ ; GANN= NOT NULL - IF GANN IS "ALL" THEN EVEN NULL FIELDS WILL BE RETURNED
+"RTN","C0CRNFRP",136,0)
+ ; OTHERWISE, ONLY POPULATED FIELDS ARE RETURNED IN GRTN
+"RTN","C0CRNFRP",137,0)
+ ;
+"RTN","C0CRNFRP",138,0)
+ ;
+"RTN","C0CRNFRP",139,0)
+ N GIEN,GF
+"RTN","C0CRNFRP",140,0)
+ S GF=$$FILEREF(GFILE) ;CLOSED FILE REFERENCE FOR FILE NUMBER GFILE
+"RTN","C0CRNFRP",141,0)
+ I ('$D(GNDX))!(GNDX="") S GIEN=GREF ; IF NO INDEX USED, GREF IS THE IEN
+"RTN","C0CRNFRP",142,0)
+ E  D  ; WE ARE USING AN INDEX
+"RTN","C0CRNFRP",143,0)
+ . ;N ZG
+"RTN","C0CRNFRP",144,0)
+ . S ZG=$Q(@GF@(GNDX,GREF)) ;ACCESS INDEX
+"RTN","C0CRNFRP",145,0)
+ . I ZG'="" D  ;
+"RTN","C0CRNFRP",146,0)
+ . . I $QS(ZG,3)=GREF D  ; IS GREF IN INDEX?
+"RTN","C0CRNFRP",147,0)
+ . . . S GIEN=$QS(ZG,4) ; PULL OUT THE IEN
+"RTN","C0CRNFRP",148,0)
+ . . E  S GIEN="" ; NOT FOUND IN INDEX
+"RTN","C0CRNFRP",149,0)
+ . E  S GIEN="" ;
+"RTN","C0CRNFRP",150,0)
+ ;W "IEN: ",GIEN,!
+"RTN","C0CRNFRP",151,0)
+ ;N C0CTMP,C0CI,C0CJ,C0CREF,C0CNAME
+"RTN","C0CRNFRP",152,0)
+ I $D(GNN) I GNN="ALL" S C0CNN=0 ; NOT NON-NULL (ALL FIELDS TO BE RETURNED)
+"RTN","C0CRNFRP",153,0)
+ E  S C0CNN=1 ; NON-NULL IS TRUE (ONLY POPULATED FIELDS RETURNED)
+"RTN","C0CRNFRP",154,0)
+ S C0CREF=GIEN_"," ; OPEN ROOT REFERENCE INTO FILE
+"RTN","C0CRNFRP",155,0)
+ D CLEAN^DILF ; MAKE SURE WE ARE CLEANED UP
+"RTN","C0CRNFRP",156,0)
+ K C0CTMP
+"RTN","C0CRNFRP",157,0)
+ D GETS^DIQ(GFILE,C0CREF,"**","IE","C0CTMP")
+"RTN","C0CRNFRP",158,0)
+ D FIELDS(GRTN,GFILE) ;GET ALL THE FIELD NAMES FOR THE FILE
+"RTN","C0CRNFRP",159,0)
+ S @GRTN@(0)=GFILE_"^RNF1^"_GIEN_"^"_DT_"^"_$J_"^"_DUZ ; STRUCTURE SIGNATURE
+"RTN","C0CRNFRP",160,0)
+ S (C0CI,C0CJ)=""
+"RTN","C0CRNFRP",161,0)
+ F  S C0CJ=$O(C0CTMP(C0CJ)) Q:C0CJ=""  D  ; FOR ALL SUBFILES
+"RTN","C0CRNFRP",162,0)
+ . S C0CREF=$O(C0CTMP(C0CJ,"")) ; RECORD REFERENCE
+"RTN","C0CRNFRP",163,0)
+ . F  S C0CI=$O(C0CTMP(C0CJ,C0CREF,C0CI)) Q:C0CI=""  D  ; ARRAY OF FIELDS
+"RTN","C0CRNFRP",164,0)
+ . . ;W C0CJ," ",C0CI,!
+"RTN","C0CRNFRP",165,0)
+ . . S C0CNAME=$P(^DD(C0CJ,C0CI,0),"^",1) ;PULL THE FIELD NAME
+"RTN","C0CRNFRP",166,0)
+ . . S C0CVALUE=C0CTMP(C0CJ,C0CREF,C0CI,"E") ;
+"RTN","C0CRNFRP",167,0)
+ . . I C0CVALUE["C0CTMP" D  ; WP FIELD
+"RTN","C0CRNFRP",168,0)
+ . . . N ZT,ZWP S ZWP=0 ;ITERATOR
+"RTN","C0CRNFRP",169,0)
+ . . . S ZWP=$O(C0CTMP(C0CJ,C0CREF,C0CI,ZWP)) ; INIT TO FIRST LINE
+"RTN","C0CRNFRP",170,0)
+ . . . S C0CVALUE=C0CTMP(C0CJ,C0CREF,C0CI,ZWP) ; INIT TO FIRST LINE
+"RTN","C0CRNFRP",171,0)
+ . . . F  S ZWP=$O(C0CTMP(C0CJ,C0CREF,C0CI,ZWP)) Q:'ZWP  D  ;
+"RTN","C0CRNFRP",172,0)
+ . . . . S ZT=" "_C0CTMP(C0CJ,C0CREF,C0CI,ZWP) ;LINE OF WP
+"RTN","C0CRNFRP",173,0)
+ . . . . S ZT=$TR(ZT,"^""","|'") ;HACK TO GET RID OF ^ AND " IN TEXT "
+"RTN","C0CRNFRP",174,0)
+ . . . . S C0CVALUE=C0CVALUE_ZT ;
+"RTN","C0CRNFRP",175,0)
+ . . S $P(@GRTN@(C0CNAME),"^",3)=C0CVALUE ;RETURN VALUE IN P3
+"RTN","C0CRNFRP",176,0)
+ . . S $P(@GRTN@(C0CNAME,"I"),"^",3)=$G(C0CTMP(C0CJ,C0CREF,C0CI,"I"))
+"RTN","C0CRNFRP",177,0)
+ I C0CNN D  ; IF ONLY NON-NULL VALUES ARE TO BE RETURNED
+"RTN","C0CRNFRP",178,0)
+ . S C0CI=""
+"RTN","C0CRNFRP",179,0)
+ . F  S C0CI=$O(@GRTN@(C0CI)) Q:C0CI=""  D  ; GO THROUGH THE WHOLE ARRAY
+"RTN","C0CRNFRP",180,0)
+ . . I $P(@GRTN@(C0CI),"^",3)="" K @GRTN@(C0CI) ; KILL THE NULL ENTRIES
+"RTN","C0CRNFRP",181,0)
+ Q
+"RTN","C0CRNFRP",182,0)
+ ;
+"RTN","C0CRNFRP",183,0)
+GETN2(GARTN,GAFILE,GAIDX,GACNT,GASTRT,GANN) ; RETURN FIELD MAP AND VALUES
+"RTN","C0CRNFRP",184,0)
+ ; GARTN, PASSED BY NAME, RETURNS A FIELD MAP AND A VALUE MAP
+"RTN","C0CRNFRP",185,0)
+ ; .. FIELD MAP @GARTN@("F","FIELDNAME")="FILE;FIELD#"
+"RTN","C0CRNFRP",186,0)
+ ; ... ANY FIELD USED BY ANY RECORD PROCESSED IS IN THE FIELD MAP
+"RTN","C0CRNFRP",187,0)
+ ; .. VALUE MAP @GARTN@("V","IEN","FIELDNAME","N")=VALUE
+"RTN","C0CRNFRP",188,0)
+ ; .. WHERE N IS THE INDEX FOR MULTIPLES.. 1 FOR SINGLE VALUES
+"RTN","C0CRNFRP",189,0)
+ ; .. GARTN IS NOT INITIALIZED, SO MULTIPLE CALLS ARE CUMULATIVE
+"RTN","C0CRNFRP",190,0)
+ ; .. IF GANN="ALL" THEN ALL FIELDS FOR THE FILE ARE IN THE FIELD MAP
+"RTN","C0CRNFRP",191,0)
+ ; .. EVEN IF GANN="ALL" ONLY POPULATED FIELDS ARE RETURNED IN THE VALUE MAP
+"RTN","C0CRNFRP",192,0)
+ ; .. NUL FIELDS CAN BE DETERMINED BY CHECKING FIELD MAP - THIS SAVES SPACE
+"RTN","C0CRNFRP",193,0)
+ ; GAFILE IS THE FILE NUMBER TO BE PROCESSED. IT IS PASSED BY VALUE
+"RTN","C0CRNFRP",194,0)
+ ; GAIDX IS THE OPTIONAL INDEX TO USE IN THE FILE. IF GAIDX IS "" THE IEN
+"RTN","C0CRNFRP",195,0)
+ ; .. OF THE FILE WILL BE USED
+"RTN","C0CRNFRP",196,0)
+ ; GACNT IS THE NUMBER OF RECORDS TO PROCESS. IT IS PASSED BY VALUE
+"RTN","C0CRNFRP",197,0)
+ ; .. IF GARCNT IS NULL, ALL RECORDS ARE PROCESSED
+"RTN","C0CRNFRP",198,0)
+ ; GASTRT IS THE IEN OF THE FIRST RECORD TO PROCESS. IT IS PASSED BY VALUE
+"RTN","C0CRNFRP",199,0)
+ ; .. IF GARSTART IS NULL, PROCESSING STARTS AT THE FIRST RECORD
+"RTN","C0CRNFRP",200,0)
+ ; GANN= NOT NULL - IF GANN IS "ALL" THEN EVEN NULL FIELDS WILL BE RETURNED
+"RTN","C0CRNFRP",201,0)
+ ; OTHERWISE, ONLY POPULATED FIELDS ARE RETURNED IN GARFLD AND GARVAL
+"RTN","C0CRNFRP",202,0)
+ ;N GATMP,GAI,GAF
+"RTN","C0CRNFRP",203,0)
+ S GAF=$$FILEREF(GAFILE) ; GET CLOSED ROOT FOR THE FILE NUMBER GAFILE
+"RTN","C0CRNFRP",204,0)
+ I '$D(GAIDX) S GAIDX="" ;DEFAULT
+"RTN","C0CRNFRP",205,0)
+ I '$D(GANN) S GANN="" ;DEFAULT ONLY POPULATED FIELDS RETURNED
+"RTN","C0CRNFRP",206,0)
+ I GAIDX'="" S GAF=$NA(@GAF@(GAIDX)) ; IF WE ARE USING AN INDEX
+"RTN","C0CRNFRP",207,0)
+ W GAF,!
+"RTN","C0CRNFRP",208,0)
+ W $O(@GAF@(0)) ;
+"RTN","C0CRNFRP",209,0)
+ S GAI=0 ;ITERATOR
+"RTN","C0CRNFRP",210,0)
+ F  S GAI=$O(@GAF@(GAI)) Q:GAI=""  D  ;
+"RTN","C0CRNFRP",211,0)
+ . D GETN1("GATMP",GAFILE,GAI,GAIDX,GANN) ;GET ONE RECORD
+"RTN","C0CRNFRP",212,0)
+ . N GAX S GAX=0
+"RTN","C0CRNFRP",213,0)
+ . F  S GAX=$O(GATMP(GAX)) Q:GAX=""  D  ;PULL OUT THE FIELDS
+"RTN","C0CRNFRP",214,0)
+ . . D ADDNV(GARTN,GAI,GAX,GATMP(GAX)) ;INSERT THE NAME/VALUE INTO GARTN
+"RTN","C0CRNFRP",215,0)
+ Q
+"RTN","C0CRNFRP",216,0)
+ ;
+"RTN","C0CRNFRP",217,0)
+ADDNV(GNV,GNVN,GNVF,GNVV) ; CREATE AN ELEMENT OF THE MATRIX
+"RTN","C0CRNFRP",218,0)
+ ;
+"RTN","C0CRNFRP",219,0)
+ S @GNV@("F",GNVF)=$P(GNVV,"^",1)_"^"_$P(GNVV,"^",2) ;NAME=FILE^FIELD#
+"RTN","C0CRNFRP",220,0)
+ S @GNV@("V",GNVN,GNVF,1)=$P(GNVV,"^",3) ;SET THE VALUE
+"RTN","C0CRNFRP",221,0)
+ Q
+"RTN","C0CRNFRP",222,0)
+ ;
+"RTN","C0CRNFRP",223,0)
+RNF2CSV(RNRTN,RNIN,RNSTY) ;CONVERTS AN RFN2 GLOBAL TO A CSV FORMAT
+"RTN","C0CRNFRP",224,0)
+ ; READY TO WRITE FOR USE WITH EXCEL @RNRTN@(0) IS NUMBER OF LINES
+"RTN","C0CRNFRP",225,0)
+ ; RNSTY IS STYLE OF THE OUTPUT -
+"RTN","C0CRNFRP",226,0)
+ ; .. "NV"= ROWS ARE NAMES, COLUMNS ARE VALUES
+"RTN","C0CRNFRP",227,0)
+ ; .. "VN"= ROWS ARE VALUES, COLUMNS ARE NAMES
+"RTN","C0CRNFRP",228,0)
+ ; .. DEFAULT IS "NV" BECAUSE MANY MATRICES HAVE MORE FIELDS THAN VALUES
+"RTN","C0CRNFRP",229,0)
+ N RNR,RNC ;ROW ROOT,COL ROOT
+"RTN","C0CRNFRP",230,0)
+ N RNI,RNJ,RNX
+"RTN","C0CRNFRP",231,0)
+ I '$D(RNSTY) S RNSTY="NV" ;DEFAULT
+"RTN","C0CRNFRP",232,0)
+ I RNSTY="NV" D NV(RNRTN,RNIN)  ; INTERNAL SUBROUTINES DEPENDING ON ORIENTATION
+"RTN","C0CRNFRP",233,0)
+ E  D VN(RNRTN,RNIN) ;
+"RTN","C0CRNFRP",234,0)
+ Q
+"RTN","C0CRNFRP",235,0)
+ ;
+"RTN","C0CRNFRP",236,0)
+NV(RNRTN,RNIN) ;
+"RTN","C0CRNFRP",237,0)
+ S RNR=$NA(@RNIN@("F"))
+"RTN","C0CRNFRP",238,0)
+ S RNC=$NA(@RNIN@("V"))
+"RTN","C0CRNFRP",239,0)
+ ;S RNY=$P(@RNIN@(0),"^",1) ; FILE NUMBER
+"RTN","C0CRNFRP",240,0)
+ S RNX="""FILE"""_"," ; FIRST COLUMN NAME IS "FIELD"
+"RTN","C0CRNFRP",241,0)
+ S RNI=""
+"RTN","C0CRNFRP",242,0)
+ F  S RNI=$O(@RNC@(RNI)) Q:RNI=""  D  ; FOR EACH COLUMN
+"RTN","C0CRNFRP",243,0)
+ . S RNX=RNX_RNI_"," ;ADD THE COLUMM ELEMENT AND A COMMA
+"RTN","C0CRNFRP",244,0)
+ S RNX=$E(RNX,1,$L(RNX)-1) ; STRIP OFF THE LAST COMMA
+"RTN","C0CRNFRP",245,0)
+ D PUSH^GPLXPATH(RNRTN,RNX) ; FIRST LINE CONTAINS COLUMN HEADINGS
+"RTN","C0CRNFRP",246,0)
+ S RNI=""
+"RTN","C0CRNFRP",247,0)
+ F  S RNI=$O(@RNR@(RNI)) Q:RNI=""  D  ; FOR EACH ROW
+"RTN","C0CRNFRP",248,0)
+ . S RNX=""""_RNI_""""_"," ; FIRST ELEMENT ON ROW IS THE FIELD
+"RTN","C0CRNFRP",249,0)
+ . S RNJ=""
+"RTN","C0CRNFRP",250,0)
+ . F  S RNJ=$O(@RNC@(RNJ)) Q:RNJ=""  D  ; FOR EACH COL
+"RTN","C0CRNFRP",251,0)
+ . . I $D(@RNC@(RNJ,RNI,1)) D  ; THIS ROW HAS THIS COLUMN
+"RTN","C0CRNFRP",252,0)
+ . . . S RNX=RNX_""""_@RNC@(RNJ,RNI,1)_""""_"," ; ADD THE ELEMENT PLUS A COMMA
+"RTN","C0CRNFRP",253,0)
+ . . E  S RNX=RNX_"," ; NUL COLUMN
+"RTN","C0CRNFRP",254,0)
+ . S RNX=$E(RNX,1,$L(RNX)-1) ; STRIP OFF THE LAST COMMA
+"RTN","C0CRNFRP",255,0)
+ . D PUSH^GPLXPATH(RNRTN,RNX)
+"RTN","C0CRNFRP",256,0)
+ Q
+"RTN","C0CRNFRP",257,0)
+ ;
+"RTN","C0CRNFRP",258,0)
+VN(RNRTN,RNIN) ;
+"RTN","C0CRNFRP",259,0)
+ S RNR=$NA(@RNIN@("V"))
+"RTN","C0CRNFRP",260,0)
+ S RNC=$NA(@RNIN@("F"))
+"RTN","C0CRNFRP",261,0)
+ ;S RNY=$P(@RNIN@(0),"^",1) ; FILE NUMBER
+"RTN","C0CRNFRP",262,0)
+ S RNX="""FILE"""_"," ; FIRST COLUMN NAME IS "FIELD"
+"RTN","C0CRNFRP",263,0)
+ S RNI=""
+"RTN","C0CRNFRP",264,0)
+ F  S RNI=$O(@RNC@(RNI)) Q:RNI=""  D  ; FOR EACH COLUMN
+"RTN","C0CRNFRP",265,0)
+ . S RNX=RNX_RNI_"," ;ADD THE COLUMM ELEMENT AND A COMMA
+"RTN","C0CRNFRP",266,0)
+ S RNX=$E(RNX,1,$L(RNX)-1) ; STRIP OFF THE LAST COMMA
+"RTN","C0CRNFRP",267,0)
+ D PUSH^GPLXPATH(RNRTN,RNX) ; FIRST LINE CONTAINS COLUMN HEADINGS
+"RTN","C0CRNFRP",268,0)
+ S RNI=""
+"RTN","C0CRNFRP",269,0)
+ F  S RNI=$O(@RNR@(RNI)) Q:RNI=""  D  ; FOR EACH ROW
+"RTN","C0CRNFRP",270,0)
+ . S RNX=""""_RNI_""""_"," ; FIRST ELEMENT ON ROW IS THE FIELD
+"RTN","C0CRNFRP",271,0)
+ . S RNJ=""
+"RTN","C0CRNFRP",272,0)
+ . F  S RNJ=$O(@RNC@(RNJ)) Q:RNJ=""  D  ; FOR EACH COL
+"RTN","C0CRNFRP",273,0)
+ . . I $D(@RNR@(RNI,RNJ,1)) D  ; THIS ROW HAS THIS COLUMN
+"RTN","C0CRNFRP",274,0)
+ . . . S RNX=RNX_""""_@RNR@(RNI,RNJ,1)_""""_"," ; ADD THE ELEMENT PLUS A COMMA
+"RTN","C0CRNFRP",275,0)
+ . . E  S RNX=RNX_"," ; NUL COLUMN
+"RTN","C0CRNFRP",276,0)
+ . S RNX=$E(RNX,1,$L(RNX)-1) ; STRIP OFF THE LAST COMMA
+"RTN","C0CRNFRP",277,0)
+ . D PUSH^GPLXPATH(RNRTN,RNX)
+"RTN","C0CRNFRP",278,0)
+ Q
+"RTN","C0CRNFRP",279,0)
+ ;
+"RTN","C0CRNFRP",280,0)
+READCSV(PATH,NAME,GLB) ; READ A CSV FILE IN FROM UNIX TO GLB, PASSED BY NAME
+"RTN","C0CRNFRP",281,0)
+ ;
+"RTN","C0CRNFRP",282,0)
+ Q $$FTG^%ZISH(PATH,NAME,GLB,1)
+"RTN","C0CRNFRP",283,0)
+ ;
+"RTN","C0CRNFRP",284,0)
+FILE2CSV(FNUM,FVN) ; WRITES OUT A FILEMAN FILE TO CSV
+"RTN","C0CRNFRP",285,0)
+ ;
+"RTN","C0CRNFRP",286,0)
+ ;N G1,G2
+"RTN","C0CRNFRP",287,0)
+ I '$D(FVN) S FVN="NV" ; DEFAULT ORIENTATION OF CVS FILE
+"RTN","C0CRNFRP",288,0)
+ S G1=$NA(^TMP($J,"C0CCSV",1))
+"RTN","C0CRNFRP",289,0)
+ S G2=$NA(^TMP($J,"C0CCSV",2))
+"RTN","C0CRNFRP",290,0)
+ D GETN2(G1,FNUM) ; GET THE MATRIX
+"RTN","C0CRNFRP",291,0)
+ D RNF2CSV(G2,G1,FVN) ; PREPARE THE CVS FILE
+"RTN","C0CRNFRP",292,0)
+ K @G1
+"RTN","C0CRNFRP",293,0)
+ D FILEOUT(G2,"FILE_"_FNUM_".csv")
+"RTN","C0CRNFRP",294,0)
+ K @G2
+"RTN","C0CRNFRP",295,0)
+ Q
+"RTN","C0CRNFRP",296,0)
+ ;
+"RTN","C0CRNFRP",297,0)
+FILEOUT(FOARY,FONAM) ; WRITE OUT A FILE
+"RTN","C0CRNFRP",298,0)
+ ;
+"RTN","C0CRNFRP",299,0)
+ W $$OUTPUT^GPLXPATH($NA(@FOARY@(1)),FONAM,^TMP("GPLCCR","ODIR"))
+"RTN","C0CRNFRP",300,0)
+ Q
+"RTN","C0CRNFRP",301,0)
+ ;
+"RTN","C0CRNFRP",302,0)
+FILEREF(FNUM) ; EXTRINSIC THAT RETURNS A CLOSED ROOT FOR FILE NUMBER FNUM
+"RTN","C0CRNFRP",303,0)
+ ;
+"RTN","C0CRNFRP",304,0)
+ N C0CF
+"RTN","C0CRNFRP",305,0)
+ S C0CF=^DIC(FNUM,0,"GL") ;OPEN ROOT TO FILE
+"RTN","C0CRNFRP",306,0)
+ S C0CF=$P(C0CF,",",1)_")" ; CLOSE THE ROOT
+"RTN","C0CRNFRP",307,0)
+ I C0CF["()" S C0CF=$P(C0CF,"()",1)
+"RTN","C0CRNFRP",308,0)
+ Q C0CF
+"RTN","C0CRNFRP",309,0)
+ ;
+"RTN","C0CRNFRP",310,0)
+SKIP ;
+"RTN","C0CRNFRP",311,0)
+ N TXT,DIERR
+"RTN","C0CRNFRP",312,0)
+ S TXT=$$GET1^DIQ(8925,TIUIEN,"2","","TXT")
+"RTN","C0CRNFRP",313,0)
+ I $D(DIERR) D CLEAN^DILF Q
+"RTN","C0CRNFRP",314,0)
+ W "  report_text:",!  ;Progress Note Text
+"RTN","C0CRNFRP",315,0)
+ N LN S LN=0
+"RTN","C0CRNFRP",316,0)
+ F  S LN=$O(TXT(LN)) Q:'LN  D
+"RTN","C0CRNFRP",317,0)
+ . W "    text"_LN_": "_TXT(LN),!
+"RTN","C0CRNFRP",318,0)
+ . Q
+"RTN","C0CRNFRP",319,0)
+ Q
+"RTN","C0CRNFRP",320,0)
+ ;
+"RTN","C0CRNFRP",321,0)
+ZFILE(ZFN,ZTAB) ; EXTRINSIC TO RETURN FILE NUMBER FOR FIELD NAME PASSED
+"RTN","C0CRNFRP",322,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 1 OF @ZTAB@(ZFN)
+"RTN","C0CRNFRP",323,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRNFRP",324,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRNFRP",325,0)
+ Q $P(@ZTAB@(ZFN),"^",1)
+"RTN","C0CRNFRP",326,0)
+ZFIELD(ZFN,ZTAB) ;EXTRINSIC TO RETURN FIELD NUMBER FOR FIELD NAME PASSED
+"RTN","C0CRNFRP",327,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 2 OF @ZTAB@(ZFN)
+"RTN","C0CRNFRP",328,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRNFRP",329,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRNFRP",330,0)
+ Q $P(@ZTAB@(ZFN),"^",2)
+"RTN","C0CRNFRP",331,0)
+ZVALUE(ZFN,ZTAB) ;EXTRINSIC TO RETURN VALUE FOR FIELD NAME PASSED
+"RTN","C0CRNFRP",332,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF @ZTAB@(ZFN)
+"RTN","C0CRNFRP",333,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRNFRP",334,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRNFRP",335,0)
+ Q $P($G(@ZTAB@(ZFN)),"^",3)
+"RTN","C0CRNFRP",336,0)
+ ;
+"RTN","C0CRNFRP",337,0)
+ZVALUEI(ZFN,ZTAB) ;EXTRINSIC TO RETURN INTERNAL VALUE FOR FIELD NAME PASSED
+"RTN","C0CRNFRP",338,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF @ZTAB@(ZFN)
+"RTN","C0CRNFRP",339,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRNFRP",340,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRNFRP",341,0)
+ Q $P($G(@ZTAB@(ZFN,"I")),"^",3)
+"RTN","C0CRNFRP",342,0)
+ ;
+"RTN","C0CRPMS")
+0^96^B16300714
+"RTN","C0CRPMS",1,0)
+C0CRPMS ; CCDCCR/GPL - CCR/CCD PROCESSING FOR RPMS ;1/14/09  14:33
+"RTN","C0CRPMS",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CRPMS",3,0)
+ ;Copyright 2008 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CRPMS",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CRPMS",5,0)
+ ;
+"RTN","C0CRPMS",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CRPMS",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CRPMS",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CRPMS",9,0)
+ ;(at your option) any later version.
+"RTN","C0CRPMS",10,0)
+ ;
+"RTN","C0CRPMS",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CRPMS",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CRPMS",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CRPMS",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CRPMS",15,0)
+ ;
+"RTN","C0CRPMS",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CRPMS",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CRPMS",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CRPMS",19,0)
+ ;
+"RTN","C0CRPMS",20,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CRPMS",21,0)
+ Q
+"RTN","C0CRPMS",22,0)
+ ;
+"RTN","C0CRPMS",23,0)
+DISPLAY ; RUN THE PCC DISPLAY ROUTINE
+"RTN","C0CRPMS",24,0)
+ D ^APCDDISP
+"RTN","C0CRPMS",25,0)
+ Q
+"RTN","C0CRPMS",26,0)
+ ;
+"RTN","C0CRPMS",27,0)
+VTYPES ;
+"RTN","C0CRPMS",28,0)
+ D GETN2^C0CRNF("G1",9999999.07)
+"RTN","C0CRPMS",29,0)
+ ZWR G1
+"RTN","C0CRPMS",30,0)
+ Q
+"RTN","C0CRPMS",31,0)
+ ;
+"RTN","C0CRPMS",32,0)
+VISITS(C0CDFN,C0CCNT) ;LIST VISIT DATES FOR PATIENT DFN
+"RTN","C0CRPMS",33,0)
+ ; C0CCNT IS A LIMIT ON HOW MANY VISITS TO DISPLAY ; DEFAULTS TO ALL
+"RTN","C0CRPMS",34,0)
+ I '$D(C0CCNT) S C0CCNT=999999999
+"RTN","C0CRPMS",35,0)
+ N G,GN
+"RTN","C0CRPMS",36,0)
+ S G="" S GN=0
+"RTN","C0CRPMS",37,0)
+ F  S G=$O(^AUPNVSIT("AA",C0CDFN,G)) Q:(G="")!(GN>C0CCNT)  D  ;
+"RTN","C0CRPMS",38,0)
+ . S GN=GN+1
+"RTN","C0CRPMS",39,0)
+ . W $$FMDTOUTC^C0CUTIL(9999999-G),!
+"RTN","C0CRPMS",40,0)
+ Q
+"RTN","C0CRPMS",41,0)
+ ;
+"RTN","C0CRPMS",42,0)
+VISITS2(C0CDFN,C0CCNT) ;SECOND VERSION USING NEXTV
+"RTN","C0CRPMS",43,0)
+ ;
+"RTN","C0CRPMS",44,0)
+ N C0CG,GN
+"RTN","C0CRPMS",45,0)
+ S C0CG=""
+"RTN","C0CRPMS",46,0)
+ S GN=0
+"RTN","C0CRPMS",47,0)
+ I '$D(C0CCNT) S C0CCNT=99999999
+"RTN","C0CRPMS",48,0)
+ F  S C0CG=$$NEXTV(C0CDFN,C0CG) Q:(C0CG="")!(GN'<C0CCNT)  D  ;
+"RTN","C0CRPMS",49,0)
+ . S GN=GN+1
+"RTN","C0CRPMS",50,0)
+ . W $$FMDTOUTC^C0CUTIL(C0CG),!
+"RTN","C0CRPMS",51,0)
+ Q
+"RTN","C0CRPMS",52,0)
+ ;
+"RTN","C0CRPMS",53,0)
+NEXTV(C0CDFN,C0CVDT) ;EXTRINSIC WHICH RETURNS THE NEXT VISIT DATE
+"RTN","C0CRPMS",54,0)
+ ;FOR PATIENT C0CDFN IN REVERSE TIME ORDER; PASS "" TO GET THE MOST
+"RTN","C0CRPMS",55,0)
+ ; RECENT VISIT
+"RTN","C0CRPMS",56,0)
+ N G
+"RTN","C0CRPMS",57,0)
+ S G=C0CVDT
+"RTN","C0CRPMS",58,0)
+ I G'="" S G=9999999-C0CVDT ;INVERT FOR INDEX
+"RTN","C0CRPMS",59,0)
+ S G=$O(^AUPNVSIT("AA",C0CDFN,G))
+"RTN","C0CRPMS",60,0)
+ I G="" Q ""
+"RTN","C0CRPMS",61,0)
+ E  Q 9999999-G
+"RTN","C0CRPMS",62,0)
+ ;
+"RTN","C0CRPMS",63,0)
+GETV(C0CDFN,C0CVDT) ; GET VISIT USING DATE C0CVDT . IF C0CVDT IS NULL,
+"RTN","C0CRPMS",64,0)
+ ; GET MOST RECENT VISIT
+"RTN","C0CRPMS",65,0)
+ N C0CG
+"RTN","C0CRPMS",66,0)
+ I '$D(C0CVDT) S C0CVDT=$$NEXTV(C0CDFN,"")
+"RTN","C0CRPMS",67,0)
+ S APCDVLDT=C0CVDT
+"RTN","C0CRPMS",68,0)
+ S APCDPAT=C0CDFN
+"RTN","C0CRPMS",69,0)
+ D ^APCDVLK
+"RTN","C0CRPMS",70,0)
+ D ^APCDVD
+"RTN","C0CRPMS",71,0)
+ ;K APCDCLN,APCDCAT,APCDDATE,APCDLOC,APCDVSIT,APCDLOOK,APCDTYPE
+"RTN","C0CRPMS",72,0)
+ Q
+"RTN","C0CRPMS",73,0)
+ ;
+"RTN","C0CRPMS",74,0)
+GETNV(C0CDFN) ;GET MANY VISITS
+"RTN","C0CRPMS",75,0)
+ ;
+"RTN","C0CRPMS",76,0)
+ S APCDPAT=C0CDFN ;
+"RTN","C0CRPMS",77,0)
+ N C0CG S C0CG=""
+"RTN","C0CRPMS",78,0)
+ F  S C0CG=$$NEXTV(C0CDFN,C0CG) Q:C0CG=""  D  ; LOOP BACKWARD THROUGH VISITS
+"RTN","C0CRPMS",79,0)
+ . W C0CG,"    ",$$FMDTOUTC^C0CUTIL(C0CG),!
+"RTN","C0CRPMS",80,0)
+ . S APCDVLDT=C0CG
+"RTN","C0CRPMS",81,0)
+ . D ^APCDVLK
+"RTN","C0CRPMS",82,0)
+ . D ^APCDVD
+"RTN","C0CRPMS",83,0)
+ . K APCDCLN,APCDCAT,APCDDATE,APCDLOC,APCDVSIT,APCDLOOK,APCDTYPE
+"RTN","C0CRPMS",84,0)
+ Q
+"RTN","C0CRPMS",85,0)
+ ;
+"RTN","C0CRPMS",86,0)
+GETTBL(C0CTBL) ; SCAN FOR AND DISPLAY PATIENTS IN A RIMTBL, PASSED BY VALUE
+"RTN","C0CRPMS",87,0)
+ ;
+"RTN","C0CRPMS",88,0)
+ N ZG S ZG=$NA(^TMP("GPLRIM","RIMTBL","PATS",C0CTBL))
+"RTN","C0CRPMS",89,0)
+ N C0CG S C0CG=""
+"RTN","C0CRPMS",90,0)
+ N C0CQ S C0CQ=0
+"RTN","C0CRPMS",91,0)
+ F  S C0CG=$O(@ZG@(C0CG),-1) Q:(C0CG="")  D  ;
+"RTN","C0CRPMS",92,0)
+ . W "PAT: ",C0CG,!
+"RTN","C0CRPMS",93,0)
+ . D GETNV^C0CRPMS(C0CG)
+"RTN","C0CRPMS",94,0)
+ . K X R X
+"RTN","C0CRPMS",95,0)
+ . I X="Q" S C0CQ=1 ; QUIT IF Q
+"RTN","C0CRPMS",96,0)
+ Q
+"RTN","C0CRPMS",97,0)
+ ;
+"RTN","C0CRPMS",98,0)
+CMPDRG ; COMPARE THE DRUG FILE TO THE VA VUID MAPPING FILE FOR MATCHES
+"RTN","C0CRPMS",99,0)
+ ;
+"RTN","C0CRPMS",100,0)
+ S C0CZI=0 ;
+"RTN","C0CRPMS",101,0)
+ F  S C0CZI=$O(^C0CDRUG("V",C0CZI)) Q:C0CZI=""  D  ;ALL DRUGS IN RPMS DRUG FILE
+"RTN","C0CRPMS",102,0)
+ . S C0CZJ="" ; FOR EVERY FIELD AND SUBFIELD IN THE DRUG FILE
+"RTN","C0CRPMS",103,0)
+ . ;W "C0CZI:",C0CZI
+"RTN","C0CRPMS",104,0)
+ . F  S C0CZJ=$O(^C0CDRUG("V",C0CZI,C0CZJ)) Q:C0CZJ=""  D  ;
+"RTN","C0CRPMS",105,0)
+ . . ;W " C0CZJ:",C0CZJ
+"RTN","C0CRPMS",106,0)
+ . . N C0CZN,C0CZV ;
+"RTN","C0CRPMS",107,0)
+ . . S C0CZN=^C0CDRUG("V",C0CZI,C0CZJ,1) ; EVERY FIELD VALUE
+"RTN","C0CRPMS",108,0)
+ . . ;W " C0CZN:",C0CZN,!
+"RTN","C0CRPMS",109,0)
+ . . D GETN1^C0CRNF("C0CZV",176.112,C0CZN,"C") ;LOOK IN C XREF
+"RTN","C0CRPMS",110,0)
+ . . I $D(C0CZV) D  ;FOUND A MATCH
+"RTN","C0CRPMS",111,0)
+ . . . S C0CVO="FOUND:^"_C0CZI_"^"_C0CZJ_"^"_C0CZN
+"RTN","C0CRPMS",112,0)
+ . . . S C0CVO=C0CVO_"^RXNORM:^"_$$ZVALUE^C0CRNF("MEDIATION CODE","C0CZV")
+"RTN","C0CRPMS",113,0)
+ . . . D PUSH^GPLXPATH("^C0CZRX",C0CVO)
+"RTN","C0CRPMS",114,0)
+ . . . W C0CVO,!
+"RTN","C0CRPMS",115,0)
+ Q
+"RTN","C0CRPMS",116,0)
+ ;
+"RTN","C0CRPMS",117,0)
+CMPDRG2 ; COMPARE THE DRUG FILE TO THE VA VUID MAPPING FILE FOR MATCHES
+"RTN","C0CRPMS",118,0)
+ ;
+"RTN","C0CRPMS",119,0)
+ S C0CZI=0 ;
+"RTN","C0CRPMS",120,0)
+ F  S C0CZI=$O(^C0CDRUG("V",C0CZI)) Q:C0CZI=""  D  ;ALL DRUGS IN RPMS DRUG FILE
+"RTN","C0CRPMS",121,0)
+ . S C0CZJ="" ; FOR EVERY FIELD AND SUBFIELD IN THE DRUG FILE
+"RTN","C0CRPMS",122,0)
+ . W "C0CZI:",C0CZI
+"RTN","C0CRPMS",123,0)
+ . F  S C0CZJ=$O(^C0CDRUG("V",C0CZI,C0CZJ)) Q:C0CZJ=""  D  ;
+"RTN","C0CRPMS",124,0)
+ . . W " C0CZJ:",C0CZJ
+"RTN","C0CRPMS",125,0)
+ . . N C0CZN,C0CZV ;
+"RTN","C0CRPMS",126,0)
+ . . S C0CZN=^C0CDRUG("V",C0CZI,C0CZJ,1) ; EVERY FIELD VALUE
+"RTN","C0CRPMS",127,0)
+ . . W " C0CZN:",C0CZN,!
+"RTN","C0CRPMS",128,0)
+ . . D GETN1^C0CRNF("C0CZV",176.112,C0CZN,"C") ;LOOK IN C XREF
+"RTN","C0CRPMS",129,0)
+ . . I $D(C0CZV) D  ;FOUND A MATCH
+"RTN","C0CRPMS",130,0)
+ . . . W "FOUND: ",C0CZI," ",C0CZJ," ",C0CZN
+"RTN","C0CRPMS",131,0)
+ . . . W " VUID:",$$ZVALUE^C0CRNF("VUID","C0CZV"),!
+"RTN","C0CRPMS",132,0)
+ Q
+"RTN","C0CRPMS",133,0)
+ ;
+"RTN","C0CRXN")
+0^22^B103277157
+"RTN","C0CRXN",1,0)
+C0CRXN   ; CCDCCR/GPL - CCR RXN utilities; 12/6/08
+"RTN","C0CRXN",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CRXN",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CRXN",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CRXN",5,0)
+ ;
+"RTN","C0CRXN",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CRXN",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CRXN",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CRXN",9,0)
+ ;(at your option) any later version.
+"RTN","C0CRXN",10,0)
+ ;
+"RTN","C0CRXN",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CRXN",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CRXN",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CRXN",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CRXN",15,0)
+ ;
+"RTN","C0CRXN",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CRXN",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CRXN",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CRXN",19,0)
+ ;
+"RTN","C0CRXN",20,0)
+ W "This is the CCR RXNORM Utility Library ",!
+"RTN","C0CRXN",21,0)
+ W !
+"RTN","C0CRXN",22,0)
+ Q
+"RTN","C0CRXN",23,0)
+ ;
+"RTN","C0CRXN",24,0)
+EXPAND ; MAIN ROUTINE TO CREATE THE C0C RXNORM VUID EXPANSION FILE (176.112)
+"RTN","C0CRXN",25,0)
+ ; READ EACH RECORD FROM 176.111 AND USE THE VUID TO LOOK UP THE RXNORM
+"RTN","C0CRXN",26,0)
+ ; CODE FROM 176.001 (RXNORM CONCEPTS)
+"RTN","C0CRXN",27,0)
+ ; POPULATE ALL FIELDS IN 176.112 AND SET "NEW" TO "Y" IF 176.111 DOES NOT
+"RTN","C0CRXN",28,0)
+ ; ALREADY HAVE AN RXNORM CODE.
+"RTN","C0CRXN",29,0)
+ ; ADD THE RXNORM TEXT FIELD TO EVERY RECORD (NOT PRESENT IN 176.111)
+"RTN","C0CRXN",30,0)
+ ; AND COMPARE THE RXNORM TEXT FIELD WITH THE VUID TEXT FIELD, SETTING THE
+"RTN","C0CRXN",31,0)
+ ; "DIFFERENT TEXT" FIELD TO "Y" IF THERE ARE DIFFERENCES
+"RTN","C0CRXN",32,0)
+ ; USES SUPPORT ROUTINES FROM C0CRNF.m
+"RTN","C0CRXN",33,0)
+ N C0CFDA,C0CA,C0CB,C0CC,C0CZX ;FDA WORK ARRAY, RNF ARRAYS, AND IEN ITERATOR
+"RTN","C0CRXN",34,0)
+ N C0CFVA,C0CFRXN ; CLOSED ROOTS FOR SOURCE FILES
+"RTN","C0CRXN",35,0)
+ N C0CF ; CLOSED ROOT FOR DESTINATION FILE
+"RTN","C0CRXN",36,0)
+ S C0CVA=$$FILEREF^C0CRNF(176.111) ; C0C PHARMACY VA RXNORM MAPPING FILE
+"RTN","C0CRXN",37,0)
+ S C0CFRXN=$$FILEREF^C0CRNF(176.001) ; CLOSED ROOT FOR RXNORM CONCEPT FILE
+"RTN","C0CRXN",38,0)
+ S C0CF=$$FILEREF^C0CRNF(176.112) ; C0C RXNORM VUID MAPPING EXPANSION FILE
+"RTN","C0CRXN",39,0)
+ W C0CVA,C0CFRXN,C0CF,!
+"RTN","C0CRXN",40,0)
+ S C0CZX=0
+"RTN","C0CRXN",41,0)
+ S (HASRXN,NORXN,NOVUID,RXFOUND,RXMATCH,TXTMATCH)=0 ; INITIALIZE COUNTERS
+"RTN","C0CRXN",42,0)
+ F  S C0CZX=$O(^C0CCODES(176.111,C0CZX)) Q:+C0CZX=0  D  ; FOR EVERY RECORD
+"RTN","C0CRXN",43,0)
+ . K C0CA,C0CB,C0CC ; CLEAR ARRAYS
+"RTN","C0CRXN",44,0)
+ . D FIELDS^C0CRNF("C0CC",176.112) ;GET FIELD NAMES FOR OUTPUT FILE
+"RTN","C0CRXN",45,0)
+ . D GETN1^C0CRNF("C0CA",176.111,C0CZX,"","ALL") ;GET THE FIELDS
+"RTN","C0CRXN",46,0)
+ . I $$ZVALUE("MEDIATION CODE")="" D
+"RTN","C0CRXN",47,0)
+ . . S NORXN=NORXN+1 ;
+"RTN","C0CRXN",48,0)
+ . E  D  ; PROCESS MEDIATION CODE
+"RTN","C0CRXN",49,0)
+ . . S HASRXN=HASRXN+1
+"RTN","C0CRXN",50,0)
+ . . D SETFDA("MEDIATION CODE",$$ZVALUE("MEDIATION CODE")) ;
+"RTN","C0CRXN",51,0)
+ . I $$ZVALUE("VUID")="" D  ; BAD RECORD
+"RTN","C0CRXN",52,0)
+ . . S NOVUID=NOVUID+1
+"RTN","C0CRXN",53,0)
+ . . ;D SETFDA("VUID",$$ZVALUE("VUID"))
+"RTN","C0CRXN",54,0)
+ . E  D SETFDA("VUID TEXT",$$ZVALUE("VUID TEXT"))
+"RTN","C0CRXN",55,0)
+ . . ;ZWR C0CA
+"RTN","C0CRXN",56,0)
+ . D GETN1^C0CRNF("C0CB",176.001,$$ZVALUE("VUID"),"VUID","ALL")
+"RTN","C0CRXN",57,0)
+ . I $$ZVALUE("RXCUI","C0CB")'="" D  ; RXNORM FOUND
+"RTN","C0CRXN",58,0)
+ . . S RXFOUND=RXFOUND+1
+"RTN","C0CRXN",59,0)
+ . . I $$ZVALUE("MEDIATION CODE")="" D  ; THIS IS A NEW CODE
+"RTN","C0CRXN",60,0)
+ . . . D SETFDA("MEDIATION CODE",$$ZVALUE("RXCUI","C0CB"))
+"RTN","C0CRXN",61,0)
+ . . . D SETFDA("NEW","Y") ;FLAG RECORD HAS HAVING NEW RXNORM
+"RTN","C0CRXN",62,0)
+ . . W "RXNORM=",$$ZVALUE("RXCUI","C0CB")," ",$$ZVALUE("STR","C0CB"),!
+"RTN","C0CRXN",63,0)
+ . . W "VUID TEXT: ",$$ZVALUE("VUID TEXT"),!
+"RTN","C0CRXN",64,0)
+ . . I $$ZVALUE("VUID TEXT")=$$ZVALUE("STR","C0CB") S TXTMATCH=TXTMATCH+1
+"RTN","C0CRXN",65,0)
+ . . E  D  ;
+"RTN","C0CRXN",66,0)
+ . . . S ZZ=$$ZVALUE("VUID TEXT")_"^"_$$ZVALUE("STR","C0CB")
+"RTN","C0CRXN",67,0)
+ . . . D PUSH^GPLXPATH("NOMATCH",ZZ)
+"RTN","C0CRXN",68,0)
+ . . . D SETFDA("RXNORM TEXT",$$ZVALUE("STR","C0CB")) ;
+"RTN","C0CRXN",69,0)
+ . . . D SETFDA("DIFFERENT TEXT","Y") ;FLAG RECORD FOR DIFFERENT TEXT
+"RTN","C0CRXN",70,0)
+ . I $$ZVALUE("MEDIATION CODE")=$$ZVALUE("RXCUI","C0CB") D  ;
+"RTN","C0CRXN",71,0)
+ . . S RXMATCH=RXMATCH+1
+"RTN","C0CRXN",72,0)
+ . . W "VUID=",$$ZVALUE("VUID")," MATCH RXNORM=",$$ZVALUE("MEDIATION CODE"),!
+"RTN","C0CRXN",73,0)
+ . D CLEAN^DILF ; MAKE SURE WE ARE CLEANED UP
+"RTN","C0CRXN",74,0)
+ . S C0CFDA(176.112,"+"_C0CZX_",",.01)=$$ZVALUE("VUID") ; NEW VUID RECORD
+"RTN","C0CRXN",75,0)
+ . D UPDATE^DIE("","C0CFDA")
+"RTN","C0CRXN",76,0)
+ . I $D(^TMP("DIERR",$J)) U $P BREAK
+"RTN","C0CRXN",77,0)
+ W "HAS RXN=",HASRXN,!
+"RTN","C0CRXN",78,0)
+ W "NO RXN=",NORXN,!
+"RTN","C0CRXN",79,0)
+ W "NO VUID=",NOVUID,!
+"RTN","C0CRXN",80,0)
+ W "RXNORM FOUND=",RXFOUND,!
+"RTN","C0CRXN",81,0)
+ W "RXNORM MATCHES:",RXMATCH,!
+"RTN","C0CRXN",82,0)
+ W "TEXT MATCHES:",TXTMATCH,!
+"RTN","C0CRXN",83,0)
+ Q
+"RTN","C0CRXN",84,0)
+ ;
+"RTN","C0CRXN",85,0)
+EXP2 ; ROUTINE TO CREATE 176.113 C0C RXNORM VUID MAPPING DISCREPANCIES FILE
+"RTN","C0CRXN",86,0)
+ ; CROSS CHECKS THE NATIONAL DRUG FILE AND THE VA MAPPING FILE AGAINST
+"RTN","C0CRXN",87,0)
+ ; THE UMLS RXNORM DATABASE
+"RTN","C0CRXN",88,0)
+ ; THIS ROUTINE HAS BEEN ENHANCED TO ALSO CHECK THE 50.416 DRUG INGREDIENT
+"RTN","C0CRXN",89,0)
+ ; FILE AND TREAT VUIDS FOUND THERE LIKE THE ONES BEING FOUND IN THE NDF
+"RTN","C0CRXN",90,0)
+ ; IF THE VUID EXISISTS IN ALL THREE FILES, THE RXNORM CODE MATCHES IN
+"RTN","C0CRXN",91,0)
+ ; THE VA MAPPING FILE AND THE TEXT STRINGS ARE THE SAME, THE VUID IS INCLUDED
+"RTN","C0CRXN",92,0)
+ ; IN THE FILE BUT NO FLAGS ARE SET
+"RTN","C0CRXN",93,0)
+ ; IF THE VUID IS MISSING FROM THE NATIONAL DRUG FILE NDF=N
+"RTN","C0CRXN",94,0)
+ ; (IF THE VUID IS MISSING FROM THE NDF, IT IS CHECKED IN THE DRUG INGREDIENT
+"RTN","C0CRXN",95,0)
+ ; FILE, AND IF FOUND, THE FLAG IS NOT SET. IN THIS CASE THE TEXT FROM THE
+"RTN","C0CRXN",96,0)
+ ; DRUG INGREDIENT FILE IS USED FOR COMPARISONS)
+"RTN","C0CRXN",97,0)
+ ; IF THE VUID IS MISSING FROM THE VA MAPPING FILE VAMAP=N
+"RTN","C0CRXN",98,0)
+ ; IF THE VUID IS PRESENT IN THE VA MAPPING FILE, BUT THE RXNORM
+"RTN","C0CRXN",99,0)
+ ; CODE IS MISSING IN THAT FILE, VARXN=N
+"RTN","C0CRXN",100,0)
+ ; IF THE TEXT STRINGS DO NOT MATCH EXACTLY, TXTM=N AND ALL THREE STRINGS
+"RTN","C0CRXN",101,0)
+ ; ARE SHOWN; NDF TEXT=NDF TEXT STRING, VA MAP TEXT=VA MAPPING TEXT STRING
+"RTN","C0CRXN",102,0)
+ ; RXNORM TEXT=RXNORM TEXT STRING
+"RTN","C0CRXN",103,0)
+ ; THE FILE IS KEYED ON VUID AND WOULD USUALLY BE SORTED BY VUID
+"RTN","C0CRXN",104,0)
+ ; THE OBJECTIVE IS TO SEE IF NDF (50.68) AND VA MAPPING (176.111) HAVE
+"RTN","C0CRXN",105,0)
+ ; ALL THE VUID CODES THAT ARE IN THE UMLS RXNORM DATABASE
+"RTN","C0CRXN",106,0)
+ N C0CFDA,C0CA,C0CB,C0CC,C0CZX ;FDA WORK ARRAY, RNF ARRAYS, AND IEN ITERATOR
+"RTN","C0CRXN",107,0)
+ N C0CFVA,C0CFRXN ; CLOSED ROOTS FOR SOURCE FILES
+"RTN","C0CRXN",108,0)
+ N C0CF ; CLOSED ROOT FOR DESTINATION FILE
+"RTN","C0CRXN",109,0)
+ S C0CVA=$$FILEREF^C0CRNF(176.111) ; C0C PHARMACY VA RXNORM MAPPING FILE
+"RTN","C0CRXN",110,0)
+ S C0CFRXN=$$FILEREF^C0CRNF(176.001) ; CLOSED ROOT FOR RXNORM CONCEPT FILE
+"RTN","C0CRXN",111,0)
+ ;S C0CF=$$FILEREF^C0CRNF(176.113) ; C0C RXNORM VUID MAPPING ADDITIONAL FILE
+"RTN","C0CRXN",112,0)
+ W C0CVA,C0CFRXN,! ;C0CF,!
+"RTN","C0CRXN",113,0)
+ S C0CZX=0
+"RTN","C0CRXN",114,0)
+ S (NDFVCNT,NDFTCNT,NDFNO)=0 ; COUNTERS FOR NDF TESTS
+"RTN","C0CRXN",115,0)
+ S (VAVCNT,VATCNT,VARCNT,VANO)=0 ; COUNTERS FOR VA MAPPING FILE TESTS
+"RTN","C0CRXN",116,0)
+ F  S C0CZX=$O(^C0CRXN(176.001,"VUID",C0CZX)) Q:+C0CZX=0  D  ; FOR EVERY VUID
+"RTN","C0CRXN",117,0)
+ . K C0CA,C0CB,C0CC,C0CD ; CLEAR ARRAYS
+"RTN","C0CRXN",118,0)
+ . D FIELDS^C0CRNF("C0CC",176.113) ;GET FIELD NAMES FOR OUTPUT FILE
+"RTN","C0CRXN",119,0)
+ . D GETN1^C0CRNF("C0CA",176.001,C0CZX,"VUID","ALL") ;GET FROM RXNORM FILE
+"RTN","C0CRXN",120,0)
+ . D GETN1^C0CRNF("C0CB",176.111,C0CZX,"B","ALL") ;GET FROM VA MAPPING FILE
+"RTN","C0CRXN",121,0)
+ . D GETN1^C0CRNF("C0CD",50.68,C0CZX,"AVUID","ALL") ;GET FROM NDF
+"RTN","C0CRXN",122,0)
+ . D GETN1^C0CRNF("C0CE",50.416,C0CZX,"AVUID","ALL") ;GET FROM DRUG INGREDIENTS
+"RTN","C0CRXN",123,0)
+ . ;D SETFDA("VUID",$$ZVALUE("CODE")) ;SET THE VUID CODE
+"RTN","C0CRXN",124,0)
+ . D SETFDA("RXNORM",$$ZVALUE("RXCUI")) ;SET THE RXNORM CODE
+"RTN","C0CRXN",125,0)
+ . D SETFDA("RXNORM TEXT",$$ZVALUE("STR")) ;SET THE RXNORM TEXT
+"RTN","C0CRXN",126,0)
+ . ;VA MAPPING FILE TESTS
+"RTN","C0CRXN",127,0)
+ . I $$ZVALUE("VUID","C0CB")=C0CZX D  ; VUID FOUND
+"RTN","C0CRXN",128,0)
+ . . S VAVCNT=VAVCNT+1 ;INCREMENT COUNT
+"RTN","C0CRXN",129,0)
+ . . I $$ZVALUE("STR")'=$$ZVALUE("VUID TEXT","C0CB") D  ;TEXT MISMATCH
+"RTN","C0CRXN",130,0)
+ . . . S VATCNT=VATCNT+1 ; INCREMENT VA TEXT MISMATCH COUNT
+"RTN","C0CRXN",131,0)
+ . . . D SETFDA("TXTM","N") ;MARK THAT TEXT DOESN'T MATCH
+"RTN","C0CRXN",132,0)
+ . . . D SETFDA("VA MAP TEXT",$$ZVALUE("VUID TEXT","C0CB")) ; SET VA MAP TEXT
+"RTN","C0CRXN",133,0)
+ . E  D  ; VUID NOT FOUND
+"RTN","C0CRXN",134,0)
+ . . S VANO=VANO+1
+"RTN","C0CRXN",135,0)
+ . . D SETFDA("VAMAP","N") ;MARK AS MISSING FROM VA MAPPING FILE
+"RTN","C0CRXN",136,0)
+ . ; NATIONAL DRUG FILE TESTS
+"RTN","C0CRXN",137,0)
+ . I ($$ZVALUE("VUID","C0CD")=C0CZX)!($$ZVALUE("VUID","C0CE")=C0CZX) D  ;
+"RTN","C0CRXN",138,0)
+ . . ;FOUND IN NATIONAL DRUG FILE OR DRUG INGREDIENT FILE
+"RTN","C0CRXN",139,0)
+ . . S NDFVCNT=NDFVCNT+1 ;INCREMENT VUID FOUND COUNT
+"RTN","C0CRXN",140,0)
+ . . I $$ZVALUE("NAME","C0CD")'=$$ZVALUE("STR") D  ;NDF TEXT DOESN'T MATCH
+"RTN","C0CRXN",141,0)
+ . . . I $$ZVALUE("NAME","C0CE")'=$$ZVALUE("STR") D  ;DRUG ING FILE ALSO
+"RTN","C0CRXN",142,0)
+ . . . . S NDFTCNT=NDFTCNT+1 ; INCREMENT MISMATCHED NDF TEXT COUNT
+"RTN","C0CRXN",143,0)
+ . . . . D SETFDA("TXTM","N") ; SET TEXT MATCH FLAG TO N
+"RTN","C0CRXN",144,0)
+ . . . . D SETFDA("NDF TEXT",$$ZVALUE("NAME","C0CD")) ;POST THE TEXT
+"RTN","C0CRXN",145,0)
+ . . . . D SETFDA("NAT DRUG TEXT",$$ZVALUE("NAME","C0CE")) ;POST TEXT
+"RTN","C0CRXN",146,0)
+ . E  D  ;
+"RTN","C0CRXN",147,0)
+ . . D SETFDA("NDF","N") ;MARK AS MISSING
+"RTN","C0CRXN",148,0)
+ . . S NDFNO=NDFNO+1 ;INCREMENT MISSING COUNT
+"RTN","C0CRXN",149,0)
+ . D CLEAN^DILF ; MAKE SURE WE ARE CLEANED UP
+"RTN","C0CRXN",150,0)
+ . S C0CFDA(176.113,"+"_C0CZX_",",.01)=C0CZX ; NEW VUID RECORD
+"RTN","C0CRXN",151,0)
+ . D UPDATE^DIE("","C0CFDA")
+"RTN","C0CRXN",152,0)
+ . I $D(^TMP("DIERR",$J)) U $P BREAK
+"RTN","C0CRXN",153,0)
+ W "VA MAPPING VUID COUNT: ",VAVCNT,!
+"RTN","C0CRXN",154,0)
+ W "VA MAPPING MISSING: ",VANO,!
+"RTN","C0CRXN",155,0)
+ W "VA MAPPING TEXT MISMATCH: ",VATCNT,!
+"RTN","C0CRXN",156,0)
+ W "NDF VUID COUNT: ",NDFVCNT,!
+"RTN","C0CRXN",157,0)
+ W "NDF MISSING: ",NDFNO,!
+"RTN","C0CRXN",158,0)
+ W "NDF TEXT MISMATCH: ",NDFTCNT,!
+"RTN","C0CRXN",159,0)
+ Q
+"RTN","C0CRXN",160,0)
+CHKNDF ; ROUTINE TO CHECK THE NATIONAL DRUG FILE WITH THE UMLS RXNORM DB
+"RTN","C0CRXN",161,0)
+ ; USING THE AVUID INDEX, READS ALL VUID CODES IN ^PSNDF(50.68),
+"RTN","C0CRXN",162,0)
+ ; CHECKS TO SEE IF THE CODE IS IN 176.001, AND CREATES A RECORD
+"RTN","C0CRXN",163,0)
+ ; IN 176.114
+"RTN","C0CRXN",164,0)
+ ; THE OBJECTIVE IS TO SEE IF ^PSNDF(50.68) HAS ALL THE VUID CODES IN THE
+"RTN","C0CRXN",165,0)
+ ; UMLS RXNORM DATABASE AND IF THE TEXT FIELDS MATCH
+"RTN","C0CRXN",166,0)
+ ; ALSO CAPTURES THE RXNORM CODE MAPPING
+"RTN","C0CRXN",167,0)
+ ; CHKNDF2 WILL CHECK THE OTHER DIRECTION, STARTING WITH THE 176.001 VUID INDEX
+"RTN","C0CRXN",168,0)
+ ; THIS ROUTINE ALSO CHECKS IF THE VUID CODE IS IN 176.111 AND IF NOT
+"RTN","C0CRXN",169,0)
+ ; SETS NOTMAPPED=Y
+"RTN","C0CRXN",170,0)
+ N C0CFDA,C0CA,C0CB,C0CC,C0CZX ;FDA WORK ARRAY, RNF ARRAYS, AND IEN ITERATOR
+"RTN","C0CRXN",171,0)
+ N C0CFVA,C0CFRXN,C0CPSNDF ; CLOSED ROOTS FOR SOURCE FILES
+"RTN","C0CRXN",172,0)
+ N C0CF ; CLOSED ROOT FOR DESTINATION FILE
+"RTN","C0CRXN",173,0)
+ S C0CPSNDF=$$FILEREF^C0CRNF(50.68) ; NDF CLOSED ROOT REFERENCE
+"RTN","C0CRXN",174,0)
+ S C0CVA=$$FILEREF^C0CRNF(176.111) ; C0C PHARMACY VA RXNORM MAPPING FILE
+"RTN","C0CRXN",175,0)
+ S C0CFRXN=$$FILEREF^C0CRNF(176.001) ; CLOSED ROOT FOR RXNORM CONCEPT FILE
+"RTN","C0CRXN",176,0)
+ ;S C0CF=$$FILEREF^C0CRNF(176.113) ; C0C RXNORM VUID MAPPING ADDITIONAL FILE
+"RTN","C0CRXN",177,0)
+ W C0CVA,C0CFRXN,! ;C0CF,!
+"RTN","C0CRXN",178,0)
+ S C0CZX=0
+"RTN","C0CRXN",179,0)
+ S (FOUND,MISSING)=0
+"RTN","C0CRXN",180,0)
+ S (NOVUID,VMATCH,NOMATCH,MISSING,FOUND,TXTMATCH,NOTM,NVAM)=0 ; COUNTERS
+"RTN","C0CRXN",181,0)
+ F  S C0CZX=$O(^PSNDF(50.68,"AVUID",C0CZX)) Q:+C0CZX=0  D  ; FOR EVERY VUID
+"RTN","C0CRXN",182,0)
+ . K C0CA,C0CB,C0CC,C0CD ; CLEAR ARRAYS
+"RTN","C0CRXN",183,0)
+ . ;D FIELDS^C0CRNF("C0CC",176.113) ;GET FIELD NAMES FOR OUTPUT FILE
+"RTN","C0CRXN",184,0)
+ . D GETN1^C0CRNF("C0CA",50.68,C0CZX,"AVUID","ALL") ;GET THE FIELDS
+"RTN","C0CRXN",185,0)
+ . I $$ZVALUE("VUID")="" D  ; ERROR, SHOULD NOT HAPPEN
+"RTN","C0CRXN",186,0)
+ . . S NOVUID=NOVUID+1 ; FLAG THE ERROR
+"RTN","C0CRXN",187,0)
+ . . D PUSH^GPLXPATH("NOVUID",C0CZX) ; RECORD THE VUID
+"RTN","C0CRXN",188,0)
+ . D GETN1^C0CRNF("C0CD",176.001,C0CZX,"VUID","ALL") ;TRY RXNORM DB
+"RTN","C0CRXN",189,0)
+ . I $$ZVALUE("CODE","C0CD")=C0CZX D  ; FOUND IN RXNORM
+"RTN","C0CRXN",190,0)
+ . . S VMATCH=VMATCH+1 ; COUNT OF PSNDF VUIDS FOUND IN RXNORM
+"RTN","C0CRXN",191,0)
+ . . I $$ZVALUE("NAME")=$$ZVALUE("STR","C0CD") D  ;TEXT MATCHES
+"RTN","C0CRXN",192,0)
+ . . . S TXTMATCH=TXTMATCH+1 ; COUNT IT
+"RTN","C0CRXN",193,0)
+ . . E  D  ; TEXT DOESN'T MATCH
+"RTN","C0CRXN",194,0)
+ . . . S NOTM=NOTM+1 ;NO TEXT MATCH COUNTER
+"RTN","C0CRXN",195,0)
+ . . . S ZV=$$ZVALUE("NAME")_"^"_$$ZVALUE("STR","C0CD")
+"RTN","C0CRXN",196,0)
+ . . . W ZV,!
+"RTN","C0CRXN",197,0)
+ . . . D PUSH^GPLXPATH("TXTNM",ZV) ; RECORD THE TXT MISMATCH
+"RTN","C0CRXN",198,0)
+ . E  S NOMATCH=NOMATCH+1 ; NOT FOUND IN RXNORM
+"RTN","C0CRXN",199,0)
+ . D GETN1^C0CRNF("C0CB",176.111,C0CZX,"B","ALL") ;TRY TO GET FROM 176.111
+"RTN","C0CRXN",200,0)
+ . I $$ZVALUE("VUID","C0CB")="" D  ; VUID NOT FOUND
+"RTN","C0CRXN",201,0)
+ . . ;W "NOT FOUND: ",C0CZX," ",$$ZVALUE("STR")," ",$$ZVALUE("RXCUI"),!
+"RTN","C0CRXN",202,0)
+ . . S MISSING=MISSING+1
+"RTN","C0CRXN",203,0)
+ . . D PUSH^GPLXPATH("MISSING",C0CZX) ;MISSING FROM MAPPING FILE
+"RTN","C0CRXN",204,0)
+ . E  D  ; FOUND IN VA MAPPING FILE
+"RTN","C0CRXN",205,0)
+ . . S FOUND=FOUND+1
+"RTN","C0CRXN",206,0)
+ . . I $$ZVALUE("VUID TEXT","C0CB")'=$$ZVALUE("NAME") D  ; TEXT DOESN'T MATCH
+"RTN","C0CRXN",207,0)
+ . . . S NVAM=NVAM+1 ; MAPPING FILE TEXT IS DIFFERENT THAN NDF
+"RTN","C0CRXN",208,0)
+ . . . S ZY=$$ZVALUE("VUID TEXT","C0CB")_"^"_$$ZVALUE("NAME") ;BOTH STRINGS
+"RTN","C0CRXN",209,0)
+ . . . W "VA: ",ZY,!
+"RTN","C0CRXN",210,0)
+ . . . D PUSH^GPLXPATH("NVAM",ZY) ;SAVE IT
+"RTN","C0CRXN",211,0)
+ W "MISSING IN MAPPING FILE: ",MISSING,!
+"RTN","C0CRXN",212,0)
+ W "FOUND IN MAPPING FILE: ",FOUND,!
+"RTN","C0CRXN",213,0)
+ W "FOUND IN RXNORM: ",VMATCH,!
+"RTN","C0CRXN",214,0)
+ W "NOT FOUND IN RXNORM: ",NOMATCH,!
+"RTN","C0CRXN",215,0)
+ W "ERRORS: ",NOVUID,!
+"RTN","C0CRXN",216,0)
+ Q
+"RTN","C0CRXN",217,0)
+ ;
+"RTN","C0CRXN",218,0)
+ . I $$ZVALUE("MEDIATION CODE")="" D
+"RTN","C0CRXN",219,0)
+ . . S NORXN=NORXN+1 ;
+"RTN","C0CRXN",220,0)
+ . E  D  ; PROCESS MEDIATION CODE
+"RTN","C0CRXN",221,0)
+ . . S HASRXN=HASRXN+1
+"RTN","C0CRXN",222,0)
+ . . D SETFDA("MEDIATION CODE",$$ZVALUE("MEDIATION CODE")) ;
+"RTN","C0CRXN",223,0)
+ . I $$ZVALUE("VUID")="" D  ; BAD RECORD
+"RTN","C0CRXN",224,0)
+ . . S NOVUID=NOVUID+1
+"RTN","C0CRXN",225,0)
+ . . ;D SETFDA("VUID",$$ZVALUE("VUID"))
+"RTN","C0CRXN",226,0)
+ . E  D SETFDA("VUID TEXT",$$ZVALUE("VUID TEXT"))
+"RTN","C0CRXN",227,0)
+ . . ;ZWR C0CA
+"RTN","C0CRXN",228,0)
+ . D GETN1^C0CRNF("C0CB",176.001,$$ZVALUE("VUID"),"VUID","ALL")
+"RTN","C0CRXN",229,0)
+ . I $$ZVALUE("RXCUI","C0CB")'="" D  ; RXNORM FOUND
+"RTN","C0CRXN",230,0)
+ . . S RXFOUND=RXFOUND+1
+"RTN","C0CRXN",231,0)
+ . . I $$ZVALUE("MEDIATION CODE")="" D  ; THIS IS A NEW CODE
+"RTN","C0CRXN",232,0)
+ . . . D SETFDA("MEDIATION CODE",$$ZVALUE("RXCUI","C0CB"))
+"RTN","C0CRXN",233,0)
+ . . . D SETFDA("NEW","Y") ;FLAG RECORD HAS HAVING NEW RXNORM
+"RTN","C0CRXN",234,0)
+ . . W "RXNORM=",$$ZVALUE("RXCUI","C0CB")," ",$$ZVALUE("STR","C0CB"),!
+"RTN","C0CRXN",235,0)
+ . . W "VUID TEXT: ",$$ZVALUE("VUID TEXT"),!
+"RTN","C0CRXN",236,0)
+ . . I $$ZVALUE("VUID TEXT")=$$ZVALUE("STR","C0CB") S TXTMATCH=TXTMATCH+1
+"RTN","C0CRXN",237,0)
+ . . E  D  ;
+"RTN","C0CRXN",238,0)
+ . . . D PUSH^GPLXPATH("NOMATCH",$$ZVALUE("VUID TEXT")_"^"_$$ZVALUE("STR","C0CB"))
+"RTN","C0CRXN",239,0)
+ . . . D SETFDA("RXNORM TEXT",$$ZVALUE("STR","C0CB")) ;
+"RTN","C0CRXN",240,0)
+ . . . D SETFDA("DIFFERENT TEXT","Y") ;FLAG RECORD FOR DIFFERENT TEXT
+"RTN","C0CRXN",241,0)
+ . I $$ZVALUE("MEDIATION CODE")=$$ZVALUE("RXCUI","C0CB") D  ;
+"RTN","C0CRXN",242,0)
+ . . S RXMATCH=RXMATCH+1
+"RTN","C0CRXN",243,0)
+ . . W "VUID=",$$ZVALUE("VUID")," MATCH RXNORM=",$$ZVALUE("MEDIATION CODE"),!
+"RTN","C0CRXN",244,0)
+ . D CLEAN^DILF ; MAKE SURE WE ARE CLEANED UP
+"RTN","C0CRXN",245,0)
+ . S C0CFDA(176.112,"+"_C0CZX_",",.01)=$$ZVALUE("VUID") ; NEW VUID RECORD
+"RTN","C0CRXN",246,0)
+ . D UPDATE^DIE("","C0CFDA")
+"RTN","C0CRXN",247,0)
+ . I $D(^TMP("DIERR",$J)) U $P BREAK
+"RTN","C0CRXN",248,0)
+ W "HAS RXN=",HASRXN,!
+"RTN","C0CRXN",249,0)
+ W "NO RXN=",NORXN,!
+"RTN","C0CRXN",250,0)
+ W "NO VUID=",NOVUID,!
+"RTN","C0CRXN",251,0)
+ W "RXNORM FOUND=",RXFOUND,!
+"RTN","C0CRXN",252,0)
+ W "RXNORM MATCHES:",RXMATCH,!
+"RTN","C0CRXN",253,0)
+ W "TEXT MATCHES:",TXTMATCH,!
+"RTN","C0CRXN",254,0)
+ Q
+"RTN","C0CRXN",255,0)
+SETFDA(C0CSN,C0CSV) ; INTERNAL ROUTINE TO MAKE AN FDA ENTRY FOR FIELD C0CSN
+"RTN","C0CRXN",256,0)
+ ; TO SET TO VALUE C0CSV.
+"RTN","C0CRXN",257,0)
+ ; C0CFDA,C0CA,C0CZX ARE ASSUMED FROM THE CALLING ROUTINE
+"RTN","C0CRXN",258,0)
+ ; C0CSN,C0CSV ARE PASSED BY VALUE
+"RTN","C0CRXN",259,0)
+ ;
+"RTN","C0CRXN",260,0)
+ N C0CSI,C0CSJ
+"RTN","C0CRXN",261,0)
+ S C0CSI=$$ZFILE(C0CSN,"C0CC") ; FILE NUMBER
+"RTN","C0CRXN",262,0)
+ S C0CSJ=$$ZFIELD(C0CSN,"C0CC") ; FIELD NUMBER
+"RTN","C0CRXN",263,0)
+ S C0CFDA(C0CSI,"+"_C0CZX_",",C0CSJ)=C0CSV
+"RTN","C0CRXN",264,0)
+ Q
+"RTN","C0CRXN",265,0)
+ZFILE(ZFN,ZTAB) ; EXTRINSIC TO RETURN FILE NUMBER FOR FIELD NAME PASSED
+"RTN","C0CRXN",266,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 1 OF C0CA(ZFN)
+"RTN","C0CRXN",267,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRXN",268,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRXN",269,0)
+ N ZR
+"RTN","C0CRXN",270,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",1)
+"RTN","C0CRXN",271,0)
+ E  S ZR=""
+"RTN","C0CRXN",272,0)
+ Q ZR
+"RTN","C0CRXN",273,0)
+ZFIELD(ZFN,ZTAB) ;EXTRINSIC TO RETURN FIELD NUMBER FOR FIELD NAME PASSED
+"RTN","C0CRXN",274,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 2 OF C0CA(ZFN)
+"RTN","C0CRXN",275,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRXN",276,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRXN",277,0)
+ N ZR
+"RTN","C0CRXN",278,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",2)
+"RTN","C0CRXN",279,0)
+ E  S ZR=""
+"RTN","C0CRXN",280,0)
+ Q ZR
+"RTN","C0CRXN",281,0)
+ ;
+"RTN","C0CRXN",282,0)
+ZVALUE(ZFN,ZTAB) ;EXTRINSIC TO RETURN VALUE FOR FIELD NAME PASSED
+"RTN","C0CRXN",283,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF C0CA(ZFN)
+"RTN","C0CRXN",284,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CRXN",285,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CRXN",286,0)
+ N ZR
+"RTN","C0CRXN",287,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",3)
+"RTN","C0CRXN",288,0)
+ E  S ZR=""
+"RTN","C0CRXN",289,0)
+ Q ZR
+"RTN","C0CRXN",290,0)
+ ;
+"RTN","C0CRXNRD")
+0^97^B31474664
+"RTN","C0CRXNRD",1,0)
+C0CRXNRD ; WV/SMH - CCR/CCD PROJECT: Routine to Read RxNorm files;11/15/08
+"RTN","C0CRXNRD",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CRXNRD",3,0)
+ W "No entry from top" Q
+"RTN","C0CRXNRD",4,0)
+IMPORT(PATH) 
+"RTN","C0CRXNRD",5,0)
+ I PATH="" QUIT
+"RTN","C0CRXNRD",6,0)
+ D READSRC(PATH),READCON(PATH),READNDC(PATH)
+"RTN","C0CRXNRD",7,0)
+ QUIT
+"RTN","C0CRXNRD",8,0)
+ ;
+"RTN","C0CRXNRD",9,0)
+DELFILED(FN) ; Delete file data; PEP procedure; only for RxNorm files
+"RTN","C0CRXNRD",10,0)
+ ; FN is Filenumber passed by Value
+"RTN","C0CRXNRD",11,0)
+ QUIT:$E(FN,1,3)'=176  ; Quit if not RxNorm files
+"RTN","C0CRXNRD",12,0)
+ D CLEAN^DILF ; Clean FM variables
+"RTN","C0CRXNRD",13,0)
+ N ROOT S ROOT=$$ROOT^DILFD(FN,"",1) ; global root
+"RTN","C0CRXNRD",14,0)
+ N ZERO S ZERO=@ROOT@(0) ; Save zero node
+"RTN","C0CRXNRD",15,0)
+ S $P(ZERO,U,3,9999)="" ; Remove entry # and last edited
+"RTN","C0CRXNRD",16,0)
+ K @ROOT ; Kill the file -- so sad!
+"RTN","C0CRXNRD",17,0)
+ S @ROOT@(0)=ZERO ; It riseth again!
+"RTN","C0CRXNRD",18,0)
+ QUIT
+"RTN","C0CRXNRD",19,0)
+GETLINES(PATH,FILENAME) ; Get number of lines in a file
+"RTN","C0CRXNRD",20,0)
+ D OPEN^%ZISH("FILE",PATH,FILENAME,"R")
+"RTN","C0CRXNRD",21,0)
+ U IO
+"RTN","C0CRXNRD",22,0)
+ N I
+"RTN","C0CRXNRD",23,0)
+ F I=1:1 R LINE Q:$$STATUS^%ZISH
+"RTN","C0CRXNRD",24,0)
+ D CLOSE^%ZISH("FILE")
+"RTN","C0CRXNRD",25,0)
+ Q I-1
+"RTN","C0CRXNRD",26,0)
+READCON(PATH,INCRES) ; Open and read concepts file: RXNCONSO.RRF; EP
+"RTN","C0CRXNRD",27,0)
+ ; PATH ByVal, path of RxNorm files
+"RTN","C0CRXNRD",28,0)
+ ; INCRES ByVal, include restricted sources. 1 for yes, 0 for no
+"RTN","C0CRXNRD",29,0)
+ I PATH="" QUIT
+"RTN","C0CRXNRD",30,0)
+ S INCRES=+$G(INCRES) ; if not passed, becomes zero.
+"RTN","C0CRXNRD",31,0)
+ N FILENAME S FILENAME="RXNCONSO.RRF"
+"RTN","C0CRXNRD",32,0)
+ D DELFILED(176.001) ; delete data
+"RTN","C0CRXNRD",33,0)
+ N LINES S LINES=$$GETLINES(PATH,FILENAME)
+"RTN","C0CRXNRD",34,0)
+ D OPEN^%ZISH("FILE",PATH,FILENAME,"R")
+"RTN","C0CRXNRD",35,0)
+ IF POP D EN^DDIOL("Error reading file..., Please check...") G EX
+"RTN","C0CRXNRD",36,0)
+ N C0CCOUNT
+"RTN","C0CRXNRD",37,0)
+ F C0CCOUNT=1:1 D  Q:$$STATUS^%ZISH
+"RTN","C0CRXNRD",38,0)
+ . U IO
+"RTN","C0CRXNRD",39,0)
+ . N LINE R LINE
+"RTN","C0CRXNRD",40,0)
+ . IF $$STATUS^%ZISH QUIT
+"RTN","C0CRXNRD",41,0)
+ . I '(C0CCOUNT#1000) U $P W C0CCOUNT," of ",LINES," read ",! U IO ; update every 1000
+"RTN","C0CRXNRD",42,0)
+ . N RXCUI,RXAUI,SAB,TTY,CODE,STR  ; Fileman fields numbers below
+"RTN","C0CRXNRD",43,0)
+ . S RXCUI=$P(LINE,"|",1) ; .01
+"RTN","C0CRXNRD",44,0)
+ . S RXAUI=$P(LINE,"|",8) ; 1
+"RTN","C0CRXNRD",45,0)
+ . S SAB=$P(LINE,"|",12) ; 2
+"RTN","C0CRXNRD",46,0)
+ . ; If the source is a restricted source, decide what to do based on what's asked.
+"RTN","C0CRXNRD",47,0)
+ . N SRCIEN S SRCIEN=$$FIND1^DIC(176.003,"","QX",SAB,"B") ; SrcIEN in RXNORM SOURCES file
+"RTN","C0CRXNRD",48,0)
+ . N RESTRIC S RESTRIC=$$GET1^DIQ(176.003,SRCIEN,14,"I") ; 14 is restriction field; values 0-4
+"RTN","C0CRXNRD",49,0)
+ . ; If RESTRIC is zero, then it's unrestricted. Everything else is restricted.
+"RTN","C0CRXNRD",50,0)
+ . ; If user didn't ask to include restricted sources, and the source is restricted, then quit
+"RTN","C0CRXNRD",51,0)
+ . I 'INCRES,RESTRIC QUIT
+"RTN","C0CRXNRD",52,0)
+ . S TTY=$P(LINE,"|",13) ; 3
+"RTN","C0CRXNRD",53,0)
+ . S CODE=$P(LINE,"|",14) ; 4
+"RTN","C0CRXNRD",54,0)
+ . S STR=$P(LINE,"|",15) ; 5
+"RTN","C0CRXNRD",55,0)
+ . ; Remove embedded "^"
+"RTN","C0CRXNRD",56,0)
+ . S STR=$TR(STR,"^")
+"RTN","C0CRXNRD",57,0)
+ . ; Convert STR into an array of 80 characters on each line
+"RTN","C0CRXNRD",58,0)
+ . N STRLINE S STRLINE=$L(STR)\80+1
+"RTN","C0CRXNRD",59,0)
+ . ; In each line, chop 80 characters off, reset STR to be the rest
+"RTN","C0CRXNRD",60,0)
+ . N J F J=1:1:STRLINE S STR(J)=$E(STR,1,80) S STR=$E(STR,81,$L(STR))
+"RTN","C0CRXNRD",61,0)
+ . ; Now, construct the FDA array
+"RTN","C0CRXNRD",62,0)
+ . N RXNFDA
+"RTN","C0CRXNRD",63,0)
+ . S RXNFDA(176.001,"+1,",.01)=RXCUI
+"RTN","C0CRXNRD",64,0)
+ . S RXNFDA(176.001,"+1,",1)=RXAUI
+"RTN","C0CRXNRD",65,0)
+ . S RXNFDA(176.001,"+1,",2)=SAB
+"RTN","C0CRXNRD",66,0)
+ . S RXNFDA(176.001,"+1,",3)=TTY
+"RTN","C0CRXNRD",67,0)
+ . S RXNFDA(176.001,"+1,",4)=CODE
+"RTN","C0CRXNRD",68,0)
+ . N RXNIEN S RXNIEN(1)=C0CCOUNT
+"RTN","C0CRXNRD",69,0)
+ . D UPDATE^DIE("","RXNFDA","RXNIEN")
+"RTN","C0CRXNRD",70,0)
+ . I $D(^TMP("DIERR",$J)) D EN^DDIOL("ERROR") G EX
+"RTN","C0CRXNRD",71,0)
+ . ; Now, file WP field STR
+"RTN","C0CRXNRD",72,0)
+ . D WP^DIE(176.001,C0CCOUNT_",",5,,$NA(STR))
+"RTN","C0CRXNRD",73,0)
+EX D CLOSE^%ZISH("FILE")
+"RTN","C0CRXNRD",74,0)
+ QUIT
+"RTN","C0CRXNRD",75,0)
+READNDC(PATH) ; Open and read NDC/RxNorm/VANDF relationship file: RXNSAT.RRF
+"RTN","C0CRXNRD",76,0)
+ I PATH="" QUIT
+"RTN","C0CRXNRD",77,0)
+ N FILENAME S FILENAME="RXNSAT.RRF"
+"RTN","C0CRXNRD",78,0)
+ D DELFILED(176.002) ; delete data
+"RTN","C0CRXNRD",79,0)
+ N LINES S LINES=$$GETLINES(PATH,FILENAME)
+"RTN","C0CRXNRD",80,0)
+ D OPEN^%ZISH("FILE",PATH,FILENAME,"R")
+"RTN","C0CRXNRD",81,0)
+ IF POP W "Error reading file..., Please check...",! G EX2
+"RTN","C0CRXNRD",82,0)
+ F C0CCOUNT=1:1 Q:$$STATUS^%ZISH  D
+"RTN","C0CRXNRD",83,0)
+ . U IO
+"RTN","C0CRXNRD",84,0)
+ . N LINE R LINE
+"RTN","C0CRXNRD",85,0)
+ . IF $$STATUS^%ZISH QUIT
+"RTN","C0CRXNRD",86,0)
+ . I '(C0CCOUNT#1000) U $P W C0CCOUNT," of ",LINES," read ",! U IO ; update every 1000
+"RTN","C0CRXNRD",87,0)
+ . IF LINE'["NDC|RXNORM"  QUIT
+"RTN","C0CRXNRD",88,0)
+ . ; Otherwise, we are good to go
+"RTN","C0CRXNRD",89,0)
+ . N RXCUI,NDC ; Fileman fields below
+"RTN","C0CRXNRD",90,0)
+ . S RXCUI=$P(LINE,"|",1) ; .01
+"RTN","C0CRXNRD",91,0)
+ . S NDC=$P(LINE,"|",11) ; 2
+"RTN","C0CRXNRD",92,0)
+ . ; Using classic call to update.
+"RTN","C0CRXNRD",93,0)
+ . N DIC,X,DA,DR
+"RTN","C0CRXNRD",94,0)
+ . K DO
+"RTN","C0CRXNRD",95,0)
+ . S DIC="^C0CRXN(176.002,",DIC(0)="F",X=RXCUI,DIC("DR")="2////"_NDC
+"RTN","C0CRXNRD",96,0)
+ . D FILE^DICN
+"RTN","C0CRXNRD",97,0)
+ . I Y<1 U $P W !,"THERE IS TROUBLE IN RIVER CITY",! G EX2
+"RTN","C0CRXNRD",98,0)
+EX2 D CLOSE^%ZISH("FILE")
+"RTN","C0CRXNRD",99,0)
+ QUIT
+"RTN","C0CRXNRD",100,0)
+READSRC(PATH) ; Open the read RxNorm Sources file: RXNSAB.RRF
+"RTN","C0CRXNRD",101,0)
+ I PATH="" QUIT
+"RTN","C0CRXNRD",102,0)
+ N FILENAME S FILENAME="RXNSAB.RRF"
+"RTN","C0CRXNRD",103,0)
+ D DELFILED(176.003) ; delete data
+"RTN","C0CRXNRD",104,0)
+ D OPEN^%ZISH("FILE",PATH,FILENAME,"R")
+"RTN","C0CRXNRD",105,0)
+ IF POP W "Error reading file..., Please check...",! G EX3
+"RTN","C0CRXNRD",106,0)
+ F I=1:1 Q:$$STATUS^%ZISH  D
+"RTN","C0CRXNRD",107,0)
+ . U IO
+"RTN","C0CRXNRD",108,0)
+ . N LINE R LINE
+"RTN","C0CRXNRD",109,0)
+ . IF $$STATUS^%ZISH QUIT
+"RTN","C0CRXNRD",110,0)
+ . U $P W I,! U IO  ; Write I to the screen, then go back to reading the file
+"RTN","C0CRXNRD",111,0)
+ . N VCUI,RCUI,VSAB,RSAB,SON,SF,SVER,SRL,SCIT ; Fileman fields numbers below
+"RTN","C0CRXNRD",112,0)
+ . S VCUI=$P(LINE,"|",1)        ; .01
+"RTN","C0CRXNRD",113,0)
+ . S RCUI=$P(LINE,"|",2)        ; 2
+"RTN","C0CRXNRD",114,0)
+ . S VSAB=$P(LINE,"|",3)        ; 3
+"RTN","C0CRXNRD",115,0)
+ . S RSAB=$P(LINE,"|",4)        ; 4
+"RTN","C0CRXNRD",116,0)
+ . S SON=$P(LINE,"|",5)         ; 5
+"RTN","C0CRXNRD",117,0)
+ . S SF=$P(LINE,"|",6)          ; 6
+"RTN","C0CRXNRD",118,0)
+ . S SVER=$P(LINE,"|",7)        ; 7
+"RTN","C0CRXNRD",119,0)
+ . S SRL=$P(LINE,"|",14)  ; 14
+"RTN","C0CRXNRD",120,0)
+ . S SCIT=$P(LINE,"|",25)       ; 25
+"RTN","C0CRXNRD",121,0)
+ . ; Remove embedded "^"
+"RTN","C0CRXNRD",122,0)
+ . S SCIT=$TR(SCIT,"^")
+"RTN","C0CRXNRD",123,0)
+ . ; Convert SCIT into an array of 80 characters on each line
+"RTN","C0CRXNRD",124,0)
+ . ; In each line, chop 80 characters off, reset SCIT to be the rest
+"RTN","C0CRXNRD",125,0)
+ . N SCITLINE S SCITLINE=$L(SCIT)\80+1
+"RTN","C0CRXNRD",126,0)
+ . F J=1:1:SCITLINE S SCIT(J)=$E(SCIT,1,80) S SCIT=$E(SCIT,81,$L(SCIT))
+"RTN","C0CRXNRD",127,0)
+ . ; Now, construct the FDA array
+"RTN","C0CRXNRD",128,0)
+ . N RXNFDA
+"RTN","C0CRXNRD",129,0)
+ . S RXNFDA(176.003,"+"_I_",",.01)=VCUI
+"RTN","C0CRXNRD",130,0)
+ . S RXNFDA(176.003,"+"_I_",",2)=RCUI
+"RTN","C0CRXNRD",131,0)
+ . S RXNFDA(176.003,"+"_I_",",3)=VSAB
+"RTN","C0CRXNRD",132,0)
+ . S RXNFDA(176.003,"+"_I_",",4)=RSAB
+"RTN","C0CRXNRD",133,0)
+ . S RXNFDA(176.003,"+"_I_",",5)=SON
+"RTN","C0CRXNRD",134,0)
+ . S RXNFDA(176.003,"+"_I_",",6)=SF
+"RTN","C0CRXNRD",135,0)
+ . S RXNFDA(176.003,"+"_I_",",7)=SVER
+"RTN","C0CRXNRD",136,0)
+ . S RXNFDA(176.003,"+"_I_",",14)=SRL
+"RTN","C0CRXNRD",137,0)
+ . D UPDATE^DIE("","RXNFDA")
+"RTN","C0CRXNRD",138,0)
+ . I $D(^TMP("DIERR",$J)) U $P W "ERR" G EX
+"RTN","C0CRXNRD",139,0)
+ . ; Now, file WP field SCIT
+"RTN","C0CRXNRD",140,0)
+ . D WP^DIE(176.003,I_",",25,,$NA(SCIT))
+"RTN","C0CRXNRD",141,0)
+EX3 D CLOSE^%ZISH("FILE")
+"RTN","C0CRXNRD",142,0)
+ Q
+"RTN","C0CRXNRD",143,0)
+ 
+"RTN","C0CSNOA")
+0^98^B56032588
+"RTN","C0CSNOA",1,0)
+C0CSNOA   ; CCDCCR/GPL - SNOMED CT ANALYSIS ROUTINES; 10/14/08
+"RTN","C0CSNOA",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CSNOA",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota.
+"RTN","C0CSNOA",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CSNOA",5,0)
+ ;See attached copy of the License.
+"RTN","C0CSNOA",6,0)
+ ;
+"RTN","C0CSNOA",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CSNOA",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CSNOA",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CSNOA",10,0)
+ ;(at your option) any later version.
+"RTN","C0CSNOA",11,0)
+ ;
+"RTN","C0CSNOA",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CSNOA",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CSNOA",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CSNOA",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CSNOA",16,0)
+ ;
+"RTN","C0CSNOA",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CSNOA",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CSNOA",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CSNOA",20,0)
+ ;
+"RTN","C0CSNOA",21,0)
+ ; THESE ROUTINES ANALYZE THE POTENTIAL RETRIEVAL OF SNOMED CT CODES
+"RTN","C0CSNOA",22,0)
+ ; FOR PATIENT DRUG ALLERGIES FOR INCLUSION IN THE CCR OR CCD
+"RTN","C0CSNOA",23,0)
+ ; USING THE VISTA LEXICON ^LEX
+"RTN","C0CSNOA",24,0)
+ ;
+"RTN","C0CSNOA",25,0)
+ANALYZE(BEGIEN,IENCNT) ; SNOMED RETRIEVAL ANALYSIS ROUTINE
+"RTN","C0CSNOA",26,0)
+    ; BEGINS AT BEGIEN AND GOES FOR IENCNT DRUGS IN GMRD
+"RTN","C0CSNOA",27,0)
+    ; TO RESUME AT NEXT DRUG, USE BEGIEN=""
+"RTN","C0CSNOA",28,0)
+    ; USE RESET^C0CSNOA TO RESET TO TOP OF DRUG LIST
+"RTN","C0CSNOA",29,0)
+    ;
+"RTN","C0CSNOA",30,0)
+    N SNOARY,SNOTMP,SNOI,SNOIEN,RATTR
+"RTN","C0CSNOA",31,0)
+    N CCRGLO
+"RTN","C0CSNOA",32,0)
+    D ASETUP ; SET UP VARIABLES AND GLOBALS
+"RTN","C0CSNOA",33,0)
+    D AINIT ; INITIALIZE ATTRIBUTE VALUE TABLE
+"RTN","C0CSNOA",34,0)
+    I '$D(@SNOBASE@("RESUME")) S @SNOBASE@("RESUME")=$O(@GMRBASE@(1)) ;1ST TME
+"RTN","C0CSNOA",35,0)
+    S RESUME=@SNOBASE@("RESUME") ; WHERE WE LEFT OFF LAST RUN
+"RTN","C0CSNOA",36,0)
+    S SNOIEN=BEGIEN ; BEGIN WITH THE BEGIEN RECORD
+"RTN","C0CSNOA",37,0)
+    I SNOIEN="" S SNOIEN=RESUME
+"RTN","C0CSNOA",38,0)
+    I +SNOIEN=0 D  Q  ; AT THE END OF THE ALLERGY LIST
+"RTN","C0CSNOA",39,0)
+    . W "END OF DRUG LIST, CALL RESET^C0CSNOA",!
+"RTN","C0CSNOA",40,0)
+    F SNOI=1:1:IENCNT  D  Q:+SNOIEN=0  ; FOR IENCNT NUMBER OF PATIENTS OR END
+"RTN","C0CSNOA",41,0)
+    . ;D CCRRPC^C0CCCR(.CCRGLO,SNOIEN,"CCR","","","") ;PROCESS THE CCR
+"RTN","C0CSNOA",42,0)
+    . W SNOIEN,@GMRBASE@(SNOIEN,0),!
+"RTN","C0CSNOA",43,0)
+    . N SNORTN,TTERM ; RETURN ARRAY
+"RTN","C0CSNOA",44,0)
+    . S TTERM=$P(@GMRBASE@(SNOIEN,0),"^",1)_" ALLERGY"
+"RTN","C0CSNOA",45,0)
+    . D TEXTRPC(.SNORTN,TTERM)
+"RTN","C0CSNOA",46,0)
+    . I $D(SNORTN) ZWR SNORTN
+"RTN","C0CSNOA",47,0)
+    . K @SNOBASE@("VARS",SNOIEN) ; CLEAR OUT OLD VARS
+"RTN","C0CSNOA",48,0)
+    . I $P(TTMP,"^",1)=1 S @SNOBASE@("VARS",SNOIEN)=TTERM_"^"_TTMP_"^"_SNORTN(0)
+"RTN","C0CSNOA",49,0)
+    . ;
+"RTN","C0CSNOA",50,0)
+    . ; EVALUATE THE VARIABLES AND CREATE AN ATTRIBUTE MAP
+"RTN","C0CSNOA",51,0)
+    . ;
+"RTN","C0CSNOA",52,0)
+    . S RATTR=$$SETATTR(SNOIEN) ; SET THE ATTRIBUTE STRING BASED ON THE VARS
+"RTN","C0CSNOA",53,0)
+    . S @SNOBASE@("ATTR",SNOIEN)=RATTR ; SAVE THE ATRIBUTES FOR THIS DRUG
+"RTN","C0CSNOA",54,0)
+    . ;
+"RTN","C0CSNOA",55,0)
+    . N CATNAME,CATTBL
+"RTN","C0CSNOA",56,0)
+    . S CATNAME=""
+"RTN","C0CSNOA",57,0)
+    . D CPUSH(.CATNAME,SNOBASE,"SNOTBL",SNOIEN,RATTR) ; ADD TO CATEGORY
+"RTN","C0CSNOA",58,0)
+    . ; W "CATEGORY NAME: ",CATNAME,!
+"RTN","C0CSNOA",59,0)
+    . ;
+"RTN","C0CSNOA",60,0)
+    . S SNOIEN=$O(@GMRBASE@(SNOIEN)) ; NEXT RECORD
+"RTN","C0CSNOA",61,0)
+    . S @SNOBASE@("RESUME")=SNOIEN ; WHERE WE ARE LEAVING OFF THIS RUN
+"RTN","C0CSNOA",62,0)
+    ; D PARY^C0CXPATH(@SNOBASE@("ATTRTBL"))
+"RTN","C0CSNOA",63,0)
+    Q
+"RTN","C0CSNOA",64,0)
+    ;
+"RTN","C0CSNOA",65,0)
+TEXTRPC(ORTN,ITEXT) ; CALL THE LEXICON WITH ITEXT AND RETURN RESULTS IN ORTN
+"RTN","C0CSNOA",66,0)
+ ;
+"RTN","C0CSNOA",67,0)
+ ;N TTMP
+"RTN","C0CSNOA",68,0)
+ W ITEXT,!
+"RTN","C0CSNOA",69,0)
+ S TTMP=$$TEXT^LEXTRAN(ITEXT,"","","SCT","ORTN")
+"RTN","C0CSNOA",70,0)
+ Q
+"RTN","C0CSNOA",71,0)
+ ;
+"RTN","C0CSNOA",72,0)
+ASETUP ; SET UP GLOBALS AND VARS SNOBASE AND SNOTBL
+"RTN","C0CSNOA",73,0)
+      I '$D(SNOBASE) S SNOBASE=$NA(^TMP("C0CSNO"))
+"RTN","C0CSNOA",74,0)
+      I '$D(@SNOBASE) S @SNOBASE=""
+"RTN","C0CSNOA",75,0)
+      I '$D(GMRBASE) S GMRBASE=$NA(^GMRD(120.82))
+"RTN","C0CSNOA",76,0)
+      I '$D(SNOTBL) S SNOTBL=$NA(^TMP("C0CSNO","SNOTBL","TABLE")) ; ATTR TABLE
+"RTN","C0CSNOA",77,0)
+      S ^TMP("C0CSNO","TABLES","SNOTBL")=SNOTBL ; TABLE OF TABLES
+"RTN","C0CSNOA",78,0)
+      Q
+"RTN","C0CSNOA",79,0)
+      ;
+"RTN","C0CSNOA",80,0)
+AINIT ; INITIALIZE ATTRIBUTE TABLE
+"RTN","C0CSNOA",81,0)
+      I '$D(SNOBASE) D ASETUP ; FOR COMMAND LINE CALLS
+"RTN","C0CSNOA",82,0)
+      K @SNOTBL
+"RTN","C0CSNOA",83,0)
+      D APUSH^C0CRIMA(SNOTBL,"CODE")
+"RTN","C0CSNOA",84,0)
+      D APUSH^C0CRIMA(SNOTBL,"NOCODE")
+"RTN","C0CSNOA",85,0)
+      D APUSH^C0CRIMA(SNOTBL,"MULTICODE")
+"RTN","C0CSNOA",86,0)
+      D APUSH^C0CRIMA(SNOTBL,"SUBMULTI")
+"RTN","C0CSNOA",87,0)
+      D APUSH^C0CRIMA(SNOTBL,"DONE")
+"RTN","C0CSNOA",88,0)
+      Q
+"RTN","C0CSNOA",89,0)
+APOST(PRSLT,PTBL,PVAL) ; POST AN ATTRIBUTE PVAL TO PRSLT USING PTBL
+"RTN","C0CSNOA",90,0)
+    ; PSRLT AND PTBL ARE PASSED BY NAME. PVAL IS A STRING
+"RTN","C0CSNOA",91,0)
+    ; PTBL IS THE NAME OF A TABLE IN @SNOBASE@("TABLES") - "SNOTBL"=ALL VALUES
+"RTN","C0CSNOA",92,0)
+    ; PVAL WILL BE PLACED IN THE STRING PRSLT AT $P(X,U,@PTBL@(PVAL))
+"RTN","C0CSNOA",93,0)
+    I '$D(SNOBASE) D ASETUP ; FOR COMMANDLINE PROCESSING
+"RTN","C0CSNOA",94,0)
+    N USETBL
+"RTN","C0CSNOA",95,0)
+    I '$D(@SNOBASE@("TABLES",PTBL)) D  Q  ; NO TABLE
+"RTN","C0CSNOA",96,0)
+    . W "ERROR NO SUCH TABLE",!
+"RTN","C0CSNOA",97,0)
+    S USETBL=@SNOBASE@("TABLES",PTBL)
+"RTN","C0CSNOA",98,0)
+    S $P(@PRSLT,U,@USETBL@(PVAL))=PVAL
+"RTN","C0CSNOA",99,0)
+    Q
+"RTN","C0CSNOA",100,0)
+SETATTR(SDFN) ; SET ATTRIBUTES BASED ON VARS
+"RTN","C0CSNOA",101,0)
+    N SBASE,SATTR
+"RTN","C0CSNOA",102,0)
+    S SBASE=$NA(@SNOBASE@("VARS",SDFN))
+"RTN","C0CSNOA",103,0)
+    D APOST("SATTR","SNOTBL","DONE")
+"RTN","C0CSNOA",104,0)
+    I $P(TTMP,"^",1)=1 D APOST("SATTR","SNOTBL","CODE")
+"RTN","C0CSNOA",105,0)
+    I $P(TTMP,"^",1)=-1 D APOST("SATTR","SNOTBL","NOCODE")
+"RTN","C0CSNOA",106,0)
+    Q SATTR  ; C0C
+"RTN","C0CSNOA",107,0)
+    I $D(@SBASE@("PROBLEMS",1)) D  ;
+"RTN","C0CSNOA",108,0)
+    . D APOST("SATTR","SNOTBL","PROBLEMS")
+"RTN","C0CSNOA",109,0)
+    . ; W "POSTING PROBLEMS",!
+"RTN","C0CSNOA",110,0)
+    I $D(@SBASE@("VITALS",1)) D APOST("SATTR","SNOTBL","VITALS")
+"RTN","C0CSNOA",111,0)
+    I $D(@SBASE@("MEDS",1)) D  ; IF THE PATIENT HAS MEDS VARIABLES
+"RTN","C0CSNOA",112,0)
+    . D APOST("SATTR","SNOTBL","MEDS")
+"RTN","C0CSNOA",113,0)
+    . N ZR,ZI
+"RTN","C0CSNOA",114,0)
+    . D GETPA^C0CRIMA(.ZR,SDFN,"MEDS","MEDPRODUCTNAMECODEVALUE") ;CHECK FOR MED CODES
+"RTN","C0CSNOA",115,0)
+    . I ZR(0)>0 D  ; VAR LOOKUP WAS GOOD, CHECK FOR NON=NULL RETURN
+"RTN","C0CSNOA",116,0)
+    . . F ZI=1:1:ZR(0) D  ; LOOP THROUGH RETURNED VAR^VALUE PAIRS
+"RTN","C0CSNOA",117,0)
+    . . . I $P(ZR(ZI),"^",2)'="" D APOST("SATTR","SNOTBL","MEDSCODE") ;CODES
+"RTN","C0CSNOA",118,0)
+    . ; D PATD^C0CSNOA(2,"MEDS","MEDPRODUCTNAMECODEVALUE") CHECK FOR MED CODES
+"RTN","C0CSNOA",119,0)
+    D APOST("SATTR","SNOTBL","NOTEXTRACTED") ; OUTPUT NOT YET PRODUCED
+"RTN","C0CSNOA",120,0)
+    ; W "ATTRIBUTES: ",SATTR,!
+"RTN","C0CSNOA",121,0)
+    Q SATTR
+"RTN","C0CSNOA",122,0)
+    ;
+"RTN","C0CSNOA",123,0)
+RESET ; KILL RESUME INDICATOR TO START OVER. ALSO KILL SNO TMP VALUES
+"RTN","C0CSNOA",124,0)
+    K ^TMP("C0CSNO","RESUME")
+"RTN","C0CSNOA",125,0)
+    K ^TMP("C0CSNO")
+"RTN","C0CSNOA",126,0)
+    Q
+"RTN","C0CSNOA",127,0)
+    ;
+"RTN","C0CSNOA",128,0)
+CLIST ; LIST THE CATEGORIES
+"RTN","C0CSNOA",129,0)
+    ;
+"RTN","C0CSNOA",130,0)
+    I '$D(SNOBASE) D ASETUP ; FOR COMMAND LINE CALLS
+"RTN","C0CSNOA",131,0)
+    N CLBASE,CLNUM,ZI,CLIDX
+"RTN","C0CSNOA",132,0)
+    S CLBASE=$NA(@SNOBASE@("SNOTBL","CATS"))
+"RTN","C0CSNOA",133,0)
+    S CLNUM=@CLBASE@(0)
+"RTN","C0CSNOA",134,0)
+    F ZI=1:1:CLNUM D  ; LOOP THROUGH THE CATEGORIES
+"RTN","C0CSNOA",135,0)
+    . S CLIDX=@CLBASE@(ZI)
+"RTN","C0CSNOA",136,0)
+    . W "(",$P(@CLBASE@(CLIDX),"^",1)
+"RTN","C0CSNOA",137,0)
+    . W ":",$P(@CLBASE@(CLIDX),"^",2),") "
+"RTN","C0CSNOA",138,0)
+    . W CLIDX,!
+"RTN","C0CSNOA",139,0)
+    ; D PARY^C0CXPATH(CLBASE)
+"RTN","C0CSNOA",140,0)
+    Q
+"RTN","C0CSNOA",141,0)
+    ;
+"RTN","C0CSNOA",142,0)
+CPUSH(CATRTN,CBASE,CTBL,CDFN,CATTR) ; ADD PATIENTS TO CATEGORIES
+"RTN","C0CSNOA",143,0)
+    ; AND PASS BACK THE NAME OF THE CATEGORY TO WHICH THE PATIENT
+"RTN","C0CSNOA",144,0)
+    ; WAS ADDED IN CATRTN, WHICH IS PASSED BY REFERENCE
+"RTN","C0CSNOA",145,0)
+    ; CBASE IS WHERE TO PUT THE CATEGORIES PASSED BY NAME
+"RTN","C0CSNOA",146,0)
+    ; CTBL IS THE NAME OF THE TABLE USED TO CREATE THE ATTRIBUTES,
+"RTN","C0CSNOA",147,0)
+    ; PASSED BY NAME AND USED TO CREATE CATEGORY NAMES IE "@CTBL_X"
+"RTN","C0CSNOA",148,0)
+    ; WHERE X IS THE CATEGORY NUMBER. CTBL(0) IS THE NUMBER OF CATEGORIES
+"RTN","C0CSNOA",149,0)
+    ; CATBL(X)=CATTR STORES THE ATTRIBUTE IN THE CATEGORY
+"RTN","C0CSNOA",150,0)
+    ; CDFN IS THE PATIENT DFN, CATTR IS THE ATTRIBUTE STRING
+"RTN","C0CSNOA",151,0)
+    ; THE LIST OF PATIENTS IN A CATEGORY IS STORED INDEXED BY CATEGORY
+"RTN","C0CSNOA",152,0)
+    ; NUMBER IE CTBL_X(CDFN)=""
+"RTN","C0CSNOA",153,0)
+    ;
+"RTN","C0CSNOA",154,0)
+    ; N CCTBL,CENTRY,CNUM,CCOUNT,CPATLIST
+"RTN","C0CSNOA",155,0)
+    S CCTBL=$NA(@CBASE@(CTBL,"CATS"))
+"RTN","C0CSNOA",156,0)
+    ; W "CBASE: ",CCTBL,!
+"RTN","C0CSNOA",157,0)
+    ;
+"RTN","C0CSNOA",158,0)
+    I '$D(@CCTBL@(CATTR)) D  ; FIRST PATIENT IN THIS CATEGORY
+"RTN","C0CSNOA",159,0)
+    . D PUSH^C0CXPATH(CCTBL,CATTR) ; ADD THE CATEGORY TO THE ARRAY
+"RTN","C0CSNOA",160,0)
+    . S CNUM=@CCTBL@(0) ; ARRAY ENTRY NUMBER FOR THIS CATEGORY
+"RTN","C0CSNOA",161,0)
+    . S CENTRY=CTBL_"_"_CNUM_U_0 ; TABLE ENTRY DEFAULT
+"RTN","C0CSNOA",162,0)
+    . S @CCTBL@(CATTR)=CENTRY ; DEFAULT NON INCREMENTED TABLE ENTRY
+"RTN","C0CSNOA",163,0)
+    . ; NOTE THAT P1 IS THE CATEGORY NAME MADE UP OF THE TABLE NAME
+"RTN","C0CSNOA",164,0)
+    . ; AND CATGORY ARRAY NUMBER. P2 IS THE COUNT WHICH IS INITIALLY 0
+"RTN","C0CSNOA",165,0)
+    ;
+"RTN","C0CSNOA",166,0)
+    S CCOUNT=$P(@CCTBL@(CATTR),U,2) ; COUNT OF PATIENTS IN THIS CATEGORY
+"RTN","C0CSNOA",167,0)
+    S CCOUNT=CCOUNT+1 ; INCREMENT THE COUNT
+"RTN","C0CSNOA",168,0)
+    S $P(@CCTBL@(CATTR),U,2)=CCOUNT ; PUT IT BACK
+"RTN","C0CSNOA",169,0)
+    ;
+"RTN","C0CSNOA",170,0)
+    S CATRTN=$P(@CCTBL@(CATTR),U,1) ; THE CATEGORY NAME WHICH IS RETURNED
+"RTN","C0CSNOA",171,0)
+    ;
+"RTN","C0CSNOA",172,0)
+    S CPATLIST=$NA(@CBASE@(CTBL,"IENS",CATRTN)) ; BASE OF PAT LIST FOR THIS CAT
+"RTN","C0CSNOA",173,0)
+    ; W "IENS BASE: ",CPATLIST,!
+"RTN","C0CSNOA",174,0)
+    S @CPATLIST@(CDFN)="" ; ADD THIS PATIENT TO THE CAT PAT LIST
+"RTN","C0CSNOA",175,0)
+    ;
+"RTN","C0CSNOA",176,0)
+    Q
+"RTN","C0CSNOA",177,0)
+    ;
+"RTN","C0CSNOA",178,0)
+REUSE ; GET SAVED VALUES FROM ^TMP("C0CSAV") AND PUT THEM IN A DATABASE
+"RTN","C0CSNOA",179,0)
+ ;
+"RTN","C0CSNOA",180,0)
+ D ASETUP
+"RTN","C0CSNOA",181,0)
+ D AINIT
+"RTN","C0CSNOA",182,0)
+ N SNOI,SNOJ,SNOK,SNOSNO,SNOSEC,SNOIEN,SNOOLD,SNOSRCH
+"RTN","C0CSNOA",183,0)
+ S SAVBASE=$NA(^TMP("C0CSAV","VARS"))
+"RTN","C0CSNOA",184,0)
+ S SNOI=""
+"RTN","C0CSNOA",185,0)
+ F  D  Q:$O(@SAVBASE@(SNOI))="" ;THE WHOLE LIST
+"RTN","C0CSNOA",186,0)
+ . S SNOI=$O(@SAVBASE@(SNOI))
+"RTN","C0CSNOA",187,0)
+ . S SNOJ=@SAVBASE@(SNOI)
+"RTN","C0CSNOA",188,0)
+ . S SNOK=$P($P(SNOJ,"^",1)," ALLERGY",1)
+"RTN","C0CSNOA",189,0)
+ . S SNOSRCH=$P(SNOJ,"^",1) ;SEARCH TERM USED TO OBTAIN SNOMED CODE
+"RTN","C0CSNOA",190,0)
+ . S SNOIEN=$P(SNOJ,"^",3) ; IEN OF ELEMENT IN LEXICON
+"RTN","C0CSNOA",191,0)
+ . S SNOSNO=$P(SNOJ,"^",4) ; SNOMED CODE
+"RTN","C0CSNOA",192,0)
+ . S SNOSEC=$P(SNOJ,"^",5) ; SECTION OF SNOMED FOR THIS CODE
+"RTN","C0CSNOA",193,0)
+ . S SNOOLD=$P(SNOJ,"^",7) ; OLD NUMBER FOR THIS CODE
+"RTN","C0CSNOA",194,0)
+ . W "SEARCH:",SNOSRCH," IEN:",SNOIEN," CODE:",SNOSNO," SEC:",SNOSEC," OLD:",SNOOLD,!
+"RTN","C0CSNOA",195,0)
+ . W SNOK,!
+"RTN","C0CSNOA",196,0)
+ . W SNOJ,!
+"RTN","C0CSNOA",197,0)
+ Q
+"RTN","C0CSNOA",198,0)
+ ;
+"RTN","C0CSOAP")
+0^69^B79899662
+"RTN","C0CSOAP",1,0)
+C0CSOAP  ; CCDCCR/GPL - SOAP WEB SERVICE utilities; 8/25/09
+"RTN","C0CSOAP",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CSOAP",3,0)
+ ;Copyright 2008 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CSOAP",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CSOAP",5,0)
+ ;
+"RTN","C0CSOAP",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CSOAP",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CSOAP",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CSOAP",9,0)
+ ;(at your option) any later version.
+"RTN","C0CSOAP",10,0)
+ ;
+"RTN","C0CSOAP",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CSOAP",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CSOAP",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CSOAP",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CSOAP",15,0)
+ ;
+"RTN","C0CSOAP",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CSOAP",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CSOAP",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CSOAP",19,0)
+ ;
+"RTN","C0CSOAP",20,0)
+ W "This is an SOAP utility library",!
+"RTN","C0CSOAP",21,0)
+ W !
+"RTN","C0CSOAP",22,0)
+ Q
+"RTN","C0CSOAP",23,0)
+ ;
+"RTN","C0CSOAP",24,0)
+TEST1 
+"RTN","C0CSOAP",25,0)
+ S url="https://ec2-75-101-247-83.compute-1.amazonaws.com:8181/ccr/CCRService?wsdl"
+"RTN","C0CSOAP",26,0)
+ D GET1URL^C0CEWD2(url)
+"RTN","C0CSOAP",27,0)
+ Q
+"RTN","C0CSOAP",28,0)
+ ;
+"RTN","C0CSOAP",29,0)
+INITFARY(ARY) ;initialize the Fileman Field array for SOAP processing
+"RTN","C0CSOAP",30,0)
+ ; ARY is passed by name
+"RTN","C0CSOAP",31,0)
+ S @ARY@("XML FILE NUMBER")="178.301"
+"RTN","C0CSOAP",32,0)
+ S @ARY@("BINDING SUBFILE NUMBER")="178.3014"
+"RTN","C0CSOAP",33,0)
+ S @ARY@("MIME TYPE")="2.3"
+"RTN","C0CSOAP",34,0)
+ S @ARY@("PROXY SERVER")="2.4"
+"RTN","C0CSOAP",35,0)
+ S @ARY@("REPLY TEMPLATE")=".03"
+"RTN","C0CSOAP",36,0)
+ S @ARY@("TEMPLATE NAME")=".01"
+"RTN","C0CSOAP",37,0)
+ S @ARY@("TEMPLATE XML")="3"
+"RTN","C0CSOAP",38,0)
+ S @ARY@("URL")="1"
+"RTN","C0CSOAP",39,0)
+ S @ARY@("WSDL URL")="2"
+"RTN","C0CSOAP",40,0)
+ S @ARY@("XML")="2.1"
+"RTN","C0CSOAP",41,0)
+ S @ARY@("XML HEADER")="2.2"
+"RTN","C0CSOAP",42,0)
+ S @ARY@("XPATH REDUCTION STRING")="2.5"
+"RTN","C0CSOAP",43,0)
+ S @ARY@("CCR VARIABLE")="4"
+"RTN","C0CSOAP",44,0)
+ S @ARY@("FILEMAN FIELD NAME")="1"
+"RTN","C0CSOAP",45,0)
+ S @ARY@("FILEMAN FIELD NUMBER")="1.2"
+"RTN","C0CSOAP",46,0)
+ S @ARY@("FILEMAN FILE POINTER")="1.1"
+"RTN","C0CSOAP",47,0)
+ S @ARY@("INDEXED BY")=".05"
+"RTN","C0CSOAP",48,0)
+ S @ARY@("SQLI FIELD NAME")="3"
+"RTN","C0CSOAP",49,0)
+ S @ARY@("VARIABLE NAME")="2"
+"RTN","C0CSOAP",50,0)
+ Q
+"RTN","C0CSOAP",51,0)
+ ;
+"RTN","C0CSOAP",52,0)
+RESTID(INNAM,INFARY) ;EXTRINSIC TO RESOLVE TEMPLATE PASSED BY NAME
+"RTN","C0CSOAP",53,0)
+ ; FILE IS IDENTIFIED IN FARY, PASSED BY NAME
+"RTN","C0CSOAP",54,0)
+ I '$D(INFARY) D  ; NO FILE ARRAY PASSED
+"RTN","C0CSOAP",55,0)
+ . S INFARY="FARY"
+"RTN","C0CSOAP",56,0)
+ . D INITFARY(INFARY)
+"RTN","C0CSOAP",57,0)
+ N ZN,ZREF,ZR
+"RTN","C0CSOAP",58,0)
+ S ZN=@INFARY@("XML FILE NUMBER")
+"RTN","C0CSOAP",59,0)
+ S ZREF=$$FILEREF^C0CRNF(ZN)
+"RTN","C0CSOAP",60,0)
+ S ZR=$O(@ZREF@("B",INNAM,""))
+"RTN","C0CSOAP",61,0)
+ Q ZR
+"RTN","C0CSOAP",62,0)
+ ;
+"RTN","C0CSOAP",63,0)
+TESTSOAP ;
+"RTN","C0CSOAP",64,0)
+ ; USING ICD9 WEB SERVICE TO TEST SOAP
+"RTN","C0CSOAP",65,0)
+ S G("CODE")="E*"
+"RTN","C0CSOAP",66,0)
+ S G("CODELN")=3
+"RTN","C0CSOAP",67,0)
+ D SOAP("GPL","ICD9","G")
+"RTN","C0CSOAP",68,0)
+ Q
+"RTN","C0CSOAP",69,0)
+ ;
+"RTN","C0CSOAP",70,0)
+SOAP(C0CRTN,C0CTID,C0CVA,C0CVOR,ALTXML,IFARY) ; MAKES A SOAP CALL FOR 
+"RTN","C0CSOAP",71,0)
+ ; TEMPLATE ID C0CTID
+"RTN","C0CSOAP",72,0)
+ ; RETURNS THE XML RESULT IN C0CRTN, PASSED BY NAME
+"RTN","C0CSOAP",73,0)
+ ; C0CVA IS PASSED BY NAME AND IS THE VARIABLE ARRAY TO PASS TO BIND
+"RTN","C0CSOAP",74,0)
+ ; C0CVOR IS THE NAME OF A VARIABLE OVERRIDE ARRAY, WHICH IS APPLIED 
+"RTN","C0CSOAP",75,0)
+ ; BEFORE MAPPING
+"RTN","C0CSOAP",76,0)
+ ; IF ALTXML IS PASSED, BIND AND MAP WILL BE SKIPPED AND 
+"RTN","C0CSOAP",77,0)
+ ; ALTXML WILL BE USED INSTEAD
+"RTN","C0CSOAP",78,0)
+ ;
+"RTN","C0CSOAP",79,0)
+ ; ARTIFACTS SECTION
+"RTN","C0CSOAP",80,0)
+ ; THE FOLLOWING WILL SET UP DEBUGGING ARTIFACTS FOR A POSSIBLE FUTURE
+"RTN","C0CSOAP",81,0)
+ ; ONLINE DEBUGGER. IF DEBUG=1, VARIABLES CONTAINING INTERMEDIATE RESULTS
+"RTN","C0CSOAP",82,0)
+ ; WILL NOT BE NEWED.
+"RTN","C0CSOAP",83,0)
+ I $G(WSDEBUG)="" N C0CV ; CATALOG OF ARTIFACT VARIABLES AND ARRAYS
+"RTN","C0CSOAP",84,0)
+ S C0CV(100,"C0CXF","XML TEMPLATE FILE NUMBER")=""
+"RTN","C0CSOAP",85,0)
+ S C0CV(200,"C0CHEAD","SOAP HEADER VARIABLE NAME")=""
+"RTN","C0CSOAP",86,0)
+ S C0CV(300,"HEADER","SOAP HEADER")=""
+"RTN","C0CSOAP",87,0)
+ S C0CV(400,"C0CMIME","MIME TYPE")=""
+"RTN","C0CSOAP",88,0)
+ S C0CV(500,"C0CURL","WS URL")=""
+"RTN","C0CSOAP",89,0)
+ S C0CV(550,"C0CPURL","PROXY URL")=""
+"RTN","C0CSOAP",90,0)
+ S C0CV(600,"C0CXML","XML VARIABLE NAME")=""
+"RTN","C0CSOAP",91,0)
+ S C0CV(700,"XML","OUTBOUND XML")=""
+"RTN","C0CSOAP",92,0)
+ S C0CV(800,"C0CRSLT","RAW XML RESULT RETURNED FROM WEB SERVICE")=""
+"RTN","C0CSOAP",93,0)
+ S C0CV(900,"C0CRHDR","RETURNED HEADER")=""
+"RTN","C0CSOAP",94,0)
+ S C0CV(1000,"C0CRXML","XML RESULT NORMALIZED")=""
+"RTN","C0CSOAP",95,0)
+ S C0CV(1100,"C0CR","REPLY TEMPLATE")=""
+"RTN","C0CSOAP",96,0)
+ S C0CV(1200,"C0CREDUX","REDUX STRING")=""
+"RTN","C0CSOAP",97,0)
+ S C0CV(1300,"C0CIDX","RESULT XPATH INDEX")=""
+"RTN","C0CSOAP",98,0)
+ S C0CV(1400,"C0CARY","RESULT XPATH ARRAY")=""
+"RTN","C0CSOAP",99,0)
+ S C0CV(1500,"C0CNOM","RESULT DOM DOCUMENT NAME")=""
+"RTN","C0CSOAP",100,0)
+ S C0CV(1600,"C0CID","RESULT DOM ID")=""
+"RTN","C0CSOAP",101,0)
+ I $G(DEBUG)'="" G NOTNEW ; SKIP NEWING THE VARIABLES IF IN DEBUG
+"RTN","C0CSOAP",102,0)
+ N ZI,ZJ S ZI=""
+"RTN","C0CSOAP",103,0)
+NEW 
+"RTN","C0CSOAP",104,0)
+ S ZI=$O(C0CV(ZI))
+"RTN","C0CSOAP",105,0)
+ S ZJ=$O(C0CV(ZI,"")) ; SET UP NEW COMMAND
+"RTN","C0CSOAP",106,0)
+ ;W ZJ,!
+"RTN","C0CSOAP",107,0)
+ N @ZJ ; NEW THE VARIABLE
+"RTN","C0CSOAP",108,0)
+ I $O(C0CV(ZI))'="" G NEW ;LOOP TO GET NEW IN CONTEXT
+"RTN","C0CSOAP",109,0)
+NOTNEW 
+"RTN","C0CSOAP",110,0)
+ ; END ARTIFACTS
+"RTN","C0CSOAP",111,0)
+ ;
+"RTN","C0CSOAP",112,0)
+ I '$D(IFARY) D INITFARY("C0CF") ; SET FILE NUMBER AND PARAMATERS 
+"RTN","C0CSOAP",113,0)
+ E  D  ; 
+"RTN","C0CSOAP",114,0)
+ . K C0CF
+"RTN","C0CSOAP",115,0)
+ . M C0CF=@IFARY
+"RTN","C0CSOAP",116,0)
+ S C0CXF=C0CF("XML FILE NUMBER") ; FILE NUMBER FOR THE XML TEMPLATE FILE
+"RTN","C0CSOAP",117,0)
+ I +C0CTID=0 D  ; A STRING WAS PASSED FOR THE TEMPLATE NAME
+"RTN","C0CSOAP",118,0)
+ . S C0CUTID=$$RESTID(C0CTID,"C0CF") ;RESOLVE TEMPLATE IEN FROM NAME
+"RTN","C0CSOAP",119,0)
+ E  S C0CUTID=C0CTID ; AN IEN WAS PASSED
+"RTN","C0CSOAP",120,0)
+ N XML,TEMPLATE,HEADER
+"RTN","C0CSOAP",121,0)
+ N C0CFH S C0CFH=C0CF("XML HEADER")
+"RTN","C0CSOAP",122,0)
+ S C0CHEAD=$$GET1^DIQ(C0CXF,C0CUTID_",",C0CFH,,"HEADER")
+"RTN","C0CSOAP",123,0)
+ N C0CFM S C0CFM=C0CF("MIME TYPE")
+"RTN","C0CSOAP",124,0)
+ S C0CMIME=$$GET1^DIQ(C0CXF,C0CUTID_",",C0CFM)
+"RTN","C0CSOAP",125,0)
+ N C0CFP S C0CFP=C0CF("PROXY SERVER")
+"RTN","C0CSOAP",126,0)
+ S C0CPURL=$$GET1^DIQ(C0CXF,C0CUTID_",",C0CFP)
+"RTN","C0CSOAP",127,0)
+ N C0CFU S C0CFU=C0CF("URL")
+"RTN","C0CSOAP",128,0)
+ S C0CURL=$$GET1^DIQ(C0CXF,C0CUTID_",",C0CFU)
+"RTN","C0CSOAP",129,0)
+ N C0CFX S C0CFX=C0CF("XML")
+"RTN","C0CSOAP",130,0)
+ S C0CXML=$$GET1^DIQ(C0CXF,C0CUTID_",",C0CFX,,"XML")
+"RTN","C0CSOAP",131,0)
+ N C0CFT S C0CFT=C0CF("TEMPLATE XML")
+"RTN","C0CSOAP",132,0)
+ S C0CTMPL=$$GET1^DIQ(C0CXF,C0CUTID_",",C0CFT,,"TEMPLATE")
+"RTN","C0CSOAP",133,0)
+ I C0CTMPL="TEMPLATE" D  ; there is a template to process
+"RTN","C0CSOAP",134,0)
+ . K XML ; going to replace the xml array
+"RTN","C0CSOAP",135,0)
+ . N VARS
+"RTN","C0CSOAP",136,0)
+ . I $D(C0CVOR) M @C0CVA=@C0CVOR ; merge in varible overrides
+"RTN","C0CSOAP",137,0)
+ . I '$D(ALTXML) D  ; if ALTXML is passed in, don't bind
+"RTN","C0CSOAP",138,0)
+ . . D BIND("VARS",C0CVA,C0CUTID,"C0CF")
+"RTN","C0CSOAP",139,0)
+ . . D MAP("XML","VARS",TPTR,"C0CF")
+"RTN","C0CSOAP",140,0)
+ . . K XML(0)
+"RTN","C0CSOAP",141,0)
+ . E  M XML=@ALTXML ; use ALTXML instead
+"RTN","C0CSOAP",142,0)
+ I $G(C0CPROXY) S C0CURL=C0CPURL
+"RTN","C0CSOAP",143,0)
+ K C0CRSLT,C0CRHDR
+"RTN","C0CSOAP",144,0)
+ B
+"RTN","C0CSOAP",145,0)
+ S ok=$$httpPOST^%zewdGTM(C0CURL,.XML,C0CMIME,.C0CRSLT,.HEADER,"",.gpl5,.C0CRHDR)
+"RTN","C0CSOAP",146,0)
+ K C0CRXML
+"RTN","C0CSOAP",147,0)
+ D NORMAL("C0CRXML","C0CRSLT(1)") ;RETURN XML IN AN ARRAY
+"RTN","C0CSOAP",148,0)
+ N C0CFR S C0CFR=$G(C0CF("REPLY TEMPLATE"))
+"RTN","C0CSOAP",149,0)
+ S C0CR=$$GET1^DIQ(C0CXF,C0CUTID_",",C0CFR,"I") ; REPLY TEMPLATE
+"RTN","C0CSOAP",150,0)
+ ; reply templates are optional and are specified by populating a
+"RTN","C0CSOAP",151,0)
+ ; template pointer in field 2.5 of the request template
+"RTN","C0CSOAP",152,0)
+ ; if specified, the reply template is the source of the REDUX string
+"RTN","C0CSOAP",153,0)
+ ; used for XPath on the reply, and for UNBIND processing
+"RTN","C0CSOAP",154,0)
+ ; if no reply template is specified, REDUX is obtained from the request
+"RTN","C0CSOAP",155,0)
+ ; template and no UNBIND processing is performed. The XPath array is
+"RTN","C0CSOAP",156,0)
+ ; returned without variable bindings
+"RTN","C0CSOAP",157,0)
+ I C0CR'="" D  ; REPLY TEMPLATE EXISTS
+"RTN","C0CSOAP",158,0)
+ . I +$G(DEBUG)'=0 W "REPLY TEMPLATE:",C0CR,!
+"RTN","C0CSOAP",159,0)
+ . S C0CTID=C0CR ;
+"RTN","C0CSOAP",160,0)
+ N C0CFRDX S C0CFRDX=C0CF("XPATH REDUCTION STRING")
+"RTN","C0CSOAP",161,0)
+ S C0CREDUX=$$GET1^DIQ(C0CXF,C0CUTID_",",C0CFRDX) ;XPATH REDUCTION STRING
+"RTN","C0CSOAP",162,0)
+ K C0CIDX,C0CARY ; XPATH INDEX AND ARRAY VARS
+"RTN","C0CSOAP",163,0)
+ S C0CNOM="C0CWS"_$J ; DOCUMENT NAME FOR THE DOM
+"RTN","C0CSOAP",164,0)
+ S C0CID=$$PARSE^C0CXEWD("C0CRXML",C0CNOM) ;CALL THE PARSER
+"RTN","C0CSOAP",165,0)
+ S C0CID=$$FIRST^C0CXEWD($$ID^C0CXEWD(C0CNOM)) ;ID OF FIRST NODE
+"RTN","C0CSOAP",166,0)
+ D XPATH^C0CXEWD(C0CID,"/","C0CIDX","C0CARY","",C0CREDUX) ;XPATH GENERATOR
+"RTN","C0CSOAP",167,0)
+ ; Next, call UNBIND to map the reply XPath array to variables
+"RTN","C0CSOAP",168,0)
+ ; This is only done if a Reply Template is provided
+"RTN","C0CSOAP",169,0)
+ D DEMUXARY(C0CRTN,"C0CARY")
+"RTN","C0CSOAP",170,0)
+ ; M @C0CRTN=C0CARY
+"RTN","C0CSOAP",171,0)
+ Q
+"RTN","C0CSOAP",172,0)
+ ;
+"RTN","C0CSOAP",173,0)
+DEMUXARY(OARY,IARY) ;CONVERT AN XPATH ARRAY PASSED AS IARY TO
+"RTN","C0CSOAP",174,0)
+ ; FORMAT @OARY@(x,xpath) where x is the first multiple
+"RTN","C0CSOAP",175,0)
+ N ZI,ZJ,ZK,ZL S ZI=""
+"RTN","C0CSOAP",176,0)
+ F  S ZI=$O(@IARY@(ZI)) Q:ZI=""  D  ;
+"RTN","C0CSOAP",177,0)
+ . D DEMUX^C0CMXP("ZJ",ZI)
+"RTN","C0CSOAP",178,0)
+ . S ZK=$P(ZJ,"^",3)
+"RTN","C0CSOAP",179,0)
+ . S ZK=$RE($P($RE(ZK),"/",1))
+"RTN","C0CSOAP",180,0)
+ . S ZL=$P(ZJ,"^",1)
+"RTN","C0CSOAP",181,0)
+ . I ZL="" S ZL=1
+"RTN","C0CSOAP",182,0)
+ . S @OARY@(ZL,ZK)=@IARY@(ZI)
+"RTN","C0CSOAP",183,0)
+ Q
+"RTN","C0CSOAP",184,0)
+ ;
+"RTN","C0CSOAP",185,0)
+NORMAL(OUTXML,INXML) ;NORMALIZES AN XML STRING PASSED BY NAME IN INXML
+"RTN","C0CSOAP",186,0)
+ ; INTO AN XML ARRAY RETURNED IN OUTXML, ALSO PASSED BY NAME
+"RTN","C0CSOAP",187,0)
+ ;
+"RTN","C0CSOAP",188,0)
+ N ZI,ZN,ZTMP
+"RTN","C0CSOAP",189,0)
+ S ZN=1
+"RTN","C0CSOAP",190,0)
+ S @OUTXML@(ZN)=$P(@INXML,"><",ZN)_">"
+"RTN","C0CSOAP",191,0)
+ S ZN=ZN+1
+"RTN","C0CSOAP",192,0)
+ F  S @OUTXML@(ZN)="<"_$P(@INXML,"><",ZN) Q:$P(@INXML,"><",ZN+1)=""  D  ;
+"RTN","C0CSOAP",193,0)
+ . S @OUTXML@(ZN)=@OUTXML@(ZN)_">"
+"RTN","C0CSOAP",194,0)
+ . S ZN=ZN+1
+"RTN","C0CSOAP",195,0)
+ Q
+"RTN","C0CSOAP",196,0)
+ ;
+"RTN","C0CSOAP",197,0)
+MAP(RARY,IVARS,TPTR,INFARY) ;RETURNS MAPPED XML IN RARY PASSED BY NAME
+"RTN","C0CSOAP",198,0)
+ ; IVARS IS AN XPATH ARRAY PASSED BY NAME
+"RTN","C0CSOAP",199,0)
+ ; TPTR IS A POINT TO THE C0C XML TEMPLATE FILE USED TO RETRIEVE THE TEMPLATE
+"RTN","C0CSOAP",200,0)
+ ;
+"RTN","C0CSOAP",201,0)
+ N ZT ;THE TEMPLATE
+"RTN","C0CSOAP",202,0)
+ K ZT,@RARY
+"RTN","C0CSOAP",203,0)
+ I '$D(INFARY) D  ;
+"RTN","C0CSOAP",204,0)
+ . S INFARY="FARY"
+"RTN","C0CSOAP",205,0)
+ . D INITFARY(INFARY)
+"RTN","C0CSOAP",206,0)
+ N ZF,ZFT
+"RTN","C0CSOAP",207,0)
+ S ZF=@INFARY@("XML FILE NUMBER")
+"RTN","C0CSOAP",208,0)
+ S ZFT=@INFARY@("TEMPLATE XML")
+"RTN","C0CSOAP",209,0)
+ I $$GET1^DIQ(ZF,TPTR_",",ZFT,,"ZT")'="ZT" D  Q  ; ERROR GETTING TEMPLATE
+"RTN","C0CSOAP",210,0)
+ . W "ERROR RETRIEVING TEMPLATE",!
+"RTN","C0CSOAP",211,0)
+ D MAP^C0CXPATH("ZT",IVARS,RARY) ;DO THE MAPPING
+"RTN","C0CSOAP",212,0)
+ Q
+"RTN","C0CSOAP",213,0)
+ ;
+"RTN","C0CSOAP",214,0)
+TESTBIND ;
+"RTN","C0CSOAP",215,0)
+ S G1("TESTONE")=1
+"RTN","C0CSOAP",216,0)
+ S G1("TESTTWO")=2
+"RTN","C0CSOAP",217,0)
+ D BIND("G","G1","TEST")
+"RTN","C0CSOAP",218,0)
+ W !
+"RTN","C0CSOAP",219,0)
+ ZWR G
+"RTN","C0CSOAP",220,0)
+ Q
+"RTN","C0CSOAP",221,0)
+ ;
+"RTN","C0CSOAP",222,0)
+BIND(RARY,IVARS,INTPTR,INFARY) ;RETURNS AN XPATH ARRAY IN RARY FOR USE WITH MAP
+"RTN","C0CSOAP",223,0)
+ ; TO BUILD AN INSTANTIATED TEMPLATE
+"RTN","C0CSOAP",224,0)
+ ; TPTR IS THE IEN OF THE XML TEMPATE IN THE C0C XML TEMPLATE FILE
+"RTN","C0CSOAP",225,0)
+ ; LOOPS THROUGHT THE BINDING SUBFILE TO PULL OUT XPATHS AND 
+"RTN","C0CSOAP",226,0)
+ ; EITHER ASSIGNS VARIABLES OR DOES A FILEMAN CALL TO GET VALUES
+"RTN","C0CSOAP",227,0)
+ ; VARIABLES ARE IN IVARS WHICH IS PASSED BY NAME
+"RTN","C0CSOAP",228,0)
+ I '$D(INFARY) D  ;
+"RTN","C0CSOAP",229,0)
+ . S INFARY="FARY"
+"RTN","C0CSOAP",230,0)
+ . D INITFARY(INFARY) ;INITIALIZE FILE ARRAY IF NOT PASSED
+"RTN","C0CSOAP",231,0)
+ I +INTPTR>0 S TPTR=INTPTR
+"RTN","C0CSOAP",232,0)
+ E  S TPTR=$$RESTID(INTPTR,INFARY)
+"RTN","C0CSOAP",233,0)
+ N C0CFF,C0CBF,C0CXI,C0CFREF,C0CXREF
+"RTN","C0CSOAP",234,0)
+ S C0CFF=@INFARY@("XML FILE NUMBER") ;fileman file number of XML file
+"RTN","C0CSOAP",235,0)
+ S C0CFREF=$$FILEREF^C0CRNF(C0CFF) ; closed file reference to the file
+"RTN","C0CSOAP",236,0)
+ S C0CBF=@INFARY@("BINDING SUBFILE NUMBER") ; BINDING SUBFILE NUMBER
+"RTN","C0CSOAP",237,0)
+ S C0CXI=$G(@INFARY@("XPATH INDEX")) ; index to the XPath bindings
+"RTN","C0CSOAP",238,0)
+ I C0CXI="" S C0CXI="XPATH" ; default is the XPATH index
+"RTN","C0CSOAP",239,0)
+ ; this needs to be a whole file index on the XPath subfile with
+"RTN","C0CSOAP",240,0)
+ ; the Template IEN perceding the XPath in the index
+"RTN","C0CSOAP",241,0)
+ N ZI
+"RTN","C0CSOAP",242,0)
+ S ZI=""
+"RTN","C0CSOAP",243,0)
+ S C0CXREF=$NA(@C0CFREF@(C0CXI,TPTR)) ; where the xref is
+"RTN","C0CSOAP",244,0)
+ ;F  S ZI=$O(^C0CX(TPTR,5,"B",ZI)) Q:ZI=""  D  ; FOR EACH XPATH
+"RTN","C0CSOAP",245,0)
+ F  S ZI=$O(@C0CXREF@(ZI)) Q:ZI=""  D  ; for each XPath in this template
+"RTN","C0CSOAP",246,0)
+ . ;W !,ZI," ",$O(@C0CXREF@(ZI,TPTR,""))
+"RTN","C0CSOAP",247,0)
+ . N ZIEN,ZFILE,ZFIELD,ZVAR,ZIDX,ZINDEX ;
+"RTN","C0CSOAP",248,0)
+ . S ZIEN=$O(@C0CXREF@(ZI,TPTR,"")) ; IEN OF THE BINDING RECORD
+"RTN","C0CSOAP",249,0)
+ . N ZFF S ZFF=@INFARY@("FILEMAN FILE POINTER")
+"RTN","C0CSOAP",250,0)
+ . S ZFILE=$$GET1^DIQ(C0CBF,ZIEN_","_TPTR_",",ZFF,"I")
+"RTN","C0CSOAP",251,0)
+ . N ZFFLD S ZFFLD=@INFARY@("FILEMAN FIELD NUMBER")
+"RTN","C0CSOAP",252,0)
+ . S ZFIELD=$$GET1^DIQ(C0CBF,ZIEN_","_TPTR_",",ZFFLD,"I")
+"RTN","C0CSOAP",253,0)
+ . N ZFV S ZFV=@INFARY@("VARIABLE NAME")
+"RTN","C0CSOAP",254,0)
+ . S ZVAR=$$GET1^DIQ(C0CBF,ZIEN_","_TPTR_",",ZFV,"E")
+"RTN","C0CSOAP",255,0)
+ . N ZFX S ZFX=("INDEXED BY")
+"RTN","C0CSOAP",256,0)
+ . S ZIDX=$$GET1^DIQ(C0CBF,ZIEN_","_TPTR_",",ZFX,"I")
+"RTN","C0CSOAP",257,0)
+ . S ZINDEX=""
+"RTN","C0CSOAP",258,0)
+ . I ZIDX="DUZ" S ZINDEX=$G(DUZ) ; FILE IS INDEXED BY DUZ
+"RTN","C0CSOAP",259,0)
+ . I ZIDX="DFN" S ZINDEX=$G(DFN) ; BY DFN
+"RTN","C0CSOAP",260,0)
+ . E  I ZIDX'="" S ZINDEX=$G(@ZIDX) ; index variable
+"RTN","C0CSOAP",261,0)
+ . ;I ZIDX="ACCT" S ZINDEX=C0CACCT ; BY ACCOUNT RECORD POINT TO C0C WS ACCT
+"RTN","C0CSOAP",262,0)
+ . ;I ZIDX="LOC" S ZINDEX=C0CLOC ; BY LOCATION
+"RTN","C0CSOAP",263,0)
+ . I ZVAR'="" D  ; VARIABLES TAKE PRESCIDENCE OVER FILEMAN FIELDS
+"RTN","C0CSOAP",264,0)
+ . . S @RARY@(ZI)=@IVARS@(ZVAR) ; 
+"RTN","C0CSOAP",265,0)
+ . E  D  ; IF NO VARIABLE, TRY ACCESSING FROM FILEMAN
+"RTN","C0CSOAP",266,0)
+ . . I (ZFILE="")!(ZFIELD="") Q  ;QUIT IF FILE OR FIELD NOT THERE
+"RTN","C0CSOAP",267,0)
+ . . D CLEAN^DILF
+"RTN","C0CSOAP",268,0)
+ . . S @RARY@(ZI)=$$GET1^DIQ(ZFILE,ZINDEX_",",ZFIELD) ;GET THE VALUE
+"RTN","C0CSOAP",269,0)
+ . . I $D(^TMP("DIERR",$J,1)) D  B ;
+"RTN","C0CSOAP",270,0)
+ . . . W "ERROR!",!
+"RTN","C0CSOAP",271,0)
+ . . . ZWR ^TMP("DIERR",$J,*)
+"RTN","C0CSOAP",272,0)
+ Q
+"RTN","C0CSOAP",273,0)
+ ;
+"RTN","C0CSUB1")
+0^61^B16280924
+"RTN","C0CSUB1",1,0)
+C0CSUB1   ; CCDCCR/GPL - CCR SUBSCRIPTION utilities; 12/6/08
+"RTN","C0CSUB1",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CSUB1",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CSUB1",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CSUB1",5,0)
+ ;
+"RTN","C0CSUB1",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CSUB1",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CSUB1",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CSUB1",9,0)
+ ;(at your option) any later version.
+"RTN","C0CSUB1",10,0)
+ ;
+"RTN","C0CSUB1",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CSUB1",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CSUB1",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CSUB1",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CSUB1",15,0)
+ ;
+"RTN","C0CSUB1",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CSUB1",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CSUB1",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CSUB1",19,0)
+ ;
+"RTN","C0CSUB1",20,0)
+ W "This is the CCR SUBSCRIPTIONN Utility Library ",!
+"RTN","C0CSUB1",21,0)
+ Q
+"RTN","C0CSUB1",22,0)
+ ;
+"RTN","C0CSUB1",23,0)
+CHK1(DFN) ; ADD THE CHECKSUM FOR ONE PATIENT
+"RTN","C0CSUB1",24,0)
+ ;
+"RTN","C0CSUB1",25,0)
+ S C0CCHK=$NA(^TMP("C0CRIM","CHKSUM"))
+"RTN","C0CSUB1",26,0)
+ S C0CSF=177.101 ; FILE NUMBER FOR SUBSCRIPTION FILE
+"RTN","C0CSUB1",27,0)
+ S C0CSFS=177.1011 ; FILE NUMBER FOR SUBSCRIPTION SUBFILE
+"RTN","C0CSUB1",28,0)
+ S C0CSFC=177.1012 ; FILE NUMBER FOR CHECKSUM SUBFILE
+"RTN","C0CSUB1",29,0)
+ S C0CSFDC=177.10121 ; FILE NUMBER FOR DOMAIN CHECKSUMS
+"RTN","C0CSUB1",30,0)
+ S C0CPAT=$O(^C0CS("B",DFN,"")) ; IEN OF PAT
+"RTN","C0CSUB1",31,0)
+ K C0CFDA 
+"RTN","C0CSUB1",32,0)
+ S C0CALL=$G(@C0CCHK@(DFN,"ALL"))
+"RTN","C0CSUB1",33,0)
+ I C0CALL'="" S C0CFDA(C0CSFC,"?+1,"_C0CPAT_",",.01)=C0CALL
+"RTN","C0CSUB1",34,0)
+ E  Q ; NO CHECKSUMS FOR THISPATIENT
+"RTN","C0CSUB1",35,0)
+ D UPDIE
+"RTN","C0CSUB1",36,0)
+ N C0CJ S C0CJ=""
+"RTN","C0CSUB1",37,0)
+ F  S C0CJ=$O(@C0CCHK@(DFN,"DOMAIN",C0CJ)) Q:C0CJ=""  D  ; FOR EACH DOMAIN
+"RTN","C0CSUB1",38,0)
+ . S C0CD=$O(^C0CDIC(170.101,"B",C0CJ,"")) 
+"RTN","C0CSUB1",39,0)
+ . W C0CJ," ",C0CD,!
+"RTN","C0CSUB1",40,0)
+ . S C0CFDA(C0CSFDC,"?+1,1,"_C0CPAT_",",.01)=C0CD
+"RTN","C0CSUB1",41,0)
+ . S C0CFDA(C0CSFDC,"?+1,1,"_C0CPAT_",",1)=@C0CCHK@(DFN,"DOMAIN",C0CJ)
+"RTN","C0CSUB1",42,0)
+ . D UPDIE
+"RTN","C0CSUB1",43,0)
+ Q
+"RTN","C0CSUB1",44,0)
+ ;
+"RTN","C0CSUB1",45,0)
+SUBALL ; SUBSCRIBE ALL PATIENTS IN CCR GLOBALS TO SUBCRIBER 1
+"RTN","C0CSUB1",46,0)
+ ;
+"RTN","C0CSUB1",47,0)
+ S C0CGLB=$NA(^TMP("C0CRIM","VARS"))
+"RTN","C0CSUB1",48,0)
+ S C0CI=""
+"RTN","C0CSUB1",49,0)
+ F  S C0CI=$O(@C0CGLB@(C0CI)) Q:C0CI=""  D  ; FOR EACH PATIENT
+"RTN","C0CSUB1",50,0)
+ . D SUB1(C0CI,1) ;SUBSCIRBE THEM TO EPCRN
+"RTN","C0CSUB1",51,0)
+ Q
+"RTN","C0CSUB1",52,0)
+ ;
+"RTN","C0CSUB1",53,0)
+SUB1(DFN,C0CSS) ; SUBSCRIBE ONE PATIENT TO SUBSCRIBER C0CSS
+"RTN","C0CSUB1",54,0)
+ ;
+"RTN","C0CSUB1",55,0)
+ S C0CSF=177.101 ; FILE NUMBER FOR SUBSCRIPTION FILE
+"RTN","C0CSUB1",56,0)
+ S C0CSFS=177.1011 ; FILE NUMBER FOR SUBSCRIPTION SUBFILE
+"RTN","C0CSUB1",57,0)
+ S C0CSFC=177.10121 ; FILE NUMBER FOR CHECKSUMS
+"RTN","C0CSUB1",58,0)
+ S C0CSSF=177.201 ; FILE NUMBER FOR SUBSCRIBER FILE
+"RTN","C0CSUB1",59,0)
+ K C0CFDA
+"RTN","C0CSUB1",60,0)
+ S C0CFDA(C0CSF,"+1,",.01)=DFN
+"RTN","C0CSUB1",61,0)
+ D UPDIE ; ADD THE PATIENT
+"RTN","C0CSUB1",62,0)
+ S C0CPAT=$O(^C0CS("B",DFN,"")) ; IEN OF PAT
+"RTN","C0CSUB1",63,0)
+ S C0CFDA(C0CSFS,"+1,"_C0CPAT_",",.01)=C0CSS ; C0CSS IS A POINTER
+"RTN","C0CSUB1",64,0)
+ D UPDIE ; ADD THE SUBSCRIPTION
+"RTN","C0CSUB1",65,0)
+ D CHK1(DFN) ; ADD THE CHECKSUMS
+"RTN","C0CSUB1",66,0)
+ Q
+"RTN","C0CSUB1",67,0)
+ ;
+"RTN","C0CSUB1",68,0)
+UPDIE ; INTERNAL ROUTINE TO CALL UPDATE^DIE AND CHECK FOR ERRORS
+"RTN","C0CSUB1",69,0)
+ K ZERR
+"RTN","C0CSUB1",70,0)
+ D CLEAN^DILF
+"RTN","C0CSUB1",71,0)
+ D UPDATE^DIE("","C0CFDA","","ZERR")
+"RTN","C0CSUB1",72,0)
+ I $D(ZERR) D  ;
+"RTN","C0CSUB1",73,0)
+ . W "ERROR",!
+"RTN","C0CSUB1",74,0)
+ . ZWR ZERR
+"RTN","C0CSUB1",75,0)
+ . B
+"RTN","C0CSUB1",76,0)
+ K C0CFDA
+"RTN","C0CSUB1",77,0)
+ Q
+"RTN","C0CSUB1",78,0)
+ ;
+"RTN","C0CSUB1",79,0)
+VARPTR(ZVAR,ZTYP) ;EXTRINSIC WHICH RETURNS THE POINTER TO ZVAR IN THE
+"RTN","C0CSUB1",80,0)
+ ; CCR DICTIONARY. IT IS LAYGO, AS IT WILL ADD THE VARIABLE TO
+"RTN","C0CSUB1",81,0)
+ ; THE CCR DICTIONARY IF IT IS NOT THERE. ZTYP IS REQUIRED FOR LAYGO
+"RTN","C0CSUB1",82,0)
+ ;
+"RTN","C0CSUB1",83,0)
+ N ZCCRD,ZVARN,C0CFDA2
+"RTN","C0CSUB1",84,0)
+ S ZCCRD=170 ; FILE NUMBER FOR CCR DICTIONARY
+"RTN","C0CSUB1",85,0)
+ S ZVARN=$O(^C0CDIC(170,"B",ZVAR,"")) ;FIND IEN OF VARIABLE
+"RTN","C0CSUB1",86,0)
+ I ZVARN="" D  ; VARIABLE NOT IN CCR DICTIONARY - ADD IT
+"RTN","C0CSUB1",87,0)
+ . I '$D(ZTYP) D  Q  ; WON'T ADD A VARIABLE WITHOUT A TYPE
+"RTN","C0CSUB1",88,0)
+ . . W "CANNOT ADD VARIABLE WITHOUT A TYPE: ",ZVAR,!
+"RTN","C0CSUB1",89,0)
+ . S C0CFDA2(ZCCRD,"?+1,",.01)=ZVAR ; NAME OF NEW VARIABLE
+"RTN","C0CSUB1",90,0)
+ . S C0CFDA2(ZCCRD,"?+1,",12)=ZTYP ; TYPE EXTERNAL OF NEW VARIABLE
+"RTN","C0CSUB1",91,0)
+ . D CLEAN^DILF ;MAKE SURE ERRORS ARE CLEAN
+"RTN","C0CSUB1",92,0)
+ . D UPDATE^DIE("E","C0CFDA2","","ZERR") ;ADD VAR TO CCR DICTIONARY
+"RTN","C0CSUB1",93,0)
+ . I $D(ZERR) D  ; LAYGO ERROR
+"RTN","C0CSUB1",94,0)
+ . . W "ERROR ADDING "_ZC0CI_" TO CCR DICTIONARY",!
+"RTN","C0CSUB1",95,0)
+ . E  D  ;
+"RTN","C0CSUB1",96,0)
+ . . D CLEAN^DILF ; CLEAN UP
+"RTN","C0CSUB1",97,0)
+ . . S ZVARN=$O(^C0CDIC(170,"B",ZVAR,"")) ;FIND IEN OF VARIABLE
+"RTN","C0CSUB1",98,0)
+ . . W "ADDED ",ZVAR," TO CCR DICTIONARY, IEN:",ZVARN,!
+"RTN","C0CSUB1",99,0)
+ Q ZVARN
+"RTN","C0CSUB1",100,0)
+ ;
+"RTN","C0CSUB1",101,0)
+SETFDA(C0CSN,C0CSV) ; INTERNAL ROUTINE TO MAKE AN FDA ENTRY FOR FIELD C0CSN
+"RTN","C0CSUB1",102,0)
+ ; TO SET TO VALUE C0CSV.
+"RTN","C0CSUB1",103,0)
+ ; C0CFDA,C0CC,C0CZX ARE ASSUMED FROM THE CALLING ROUTINE
+"RTN","C0CSUB1",104,0)
+ ; C0CSN,C0CSV ARE PASSED BY VALUE
+"RTN","C0CSUB1",105,0)
+ ;
+"RTN","C0CSUB1",106,0)
+ N C0CSI,C0CSJ
+"RTN","C0CSUB1",107,0)
+ S C0CSI=$$ZFILE(C0CSN,"C0CC") ; FILE NUMBER
+"RTN","C0CSUB1",108,0)
+ S C0CSJ=$$ZFIELD(C0CSN,"C0CC") ; FIELD NUMBER
+"RTN","C0CSUB1",109,0)
+ S C0CFDA(C0CSI,C0CZX_",",C0CSJ)=C0CSV
+"RTN","C0CSUB1",110,0)
+ Q
+"RTN","C0CSUB1",111,0)
+ZFILE(ZFN,ZTAB) ; EXTRINSIC TO RETURN FILE NUMBER FOR FIELD NAME PASSED
+"RTN","C0CSUB1",112,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 1 OF C0CA(ZFN)
+"RTN","C0CSUB1",113,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CSUB1",114,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CSUB1",115,0)
+ N ZR
+"RTN","C0CSUB1",116,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",1)
+"RTN","C0CSUB1",117,0)
+ E  S ZR=""
+"RTN","C0CSUB1",118,0)
+ Q ZR
+"RTN","C0CSUB1",119,0)
+ZFIELD(ZFN,ZTAB) ;EXTRINSIC TO RETURN FIELD NUMBER FOR FIELD NAME PASSED
+"RTN","C0CSUB1",120,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 2 OF C0CA(ZFN)
+"RTN","C0CSUB1",121,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CSUB1",122,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CSUB1",123,0)
+ N ZR
+"RTN","C0CSUB1",124,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",2)
+"RTN","C0CSUB1",125,0)
+ E  S ZR=""
+"RTN","C0CSUB1",126,0)
+ Q ZR
+"RTN","C0CSUB1",127,0)
+ ;
+"RTN","C0CSUB1",128,0)
+ZVALUE(ZFN,ZTAB) ;EXTRINSIC TO RETURN VALUE FOR FIELD NAME PASSED
+"RTN","C0CSUB1",129,0)
+ ; BY VALUE IN ZFN. FILE NUMBER IS PIECE 3 OF C0CA(ZFN)
+"RTN","C0CSUB1",130,0)
+ ; IF ZTAB IS NULL, IT DEFAULTS TO C0CA
+"RTN","C0CSUB1",131,0)
+ I '$D(ZTAB) S ZTAB="C0CA"
+"RTN","C0CSUB1",132,0)
+ N ZR
+"RTN","C0CSUB1",133,0)
+ I $D(@ZTAB@(ZFN)) S ZR=$P(@ZTAB@(ZFN),"^",3)
+"RTN","C0CSUB1",134,0)
+ E  S ZR=""
+"RTN","C0CSUB1",135,0)
+ Q ZR
+"RTN","C0CSUB1",136,0)
+ ;
+"RTN","C0CSYS")
+0^56^B3933593
+"RTN","C0CSYS",1,0)
+C0CSYS ;WV/C0C/SMH - Routine to Get EHR System Information;6JUL2008
+"RTN","C0CSYS",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CSYS",3,0)
+ ; Copyright 2008 WorldVistA.  Licensed under the terms of the GNU
+"RTN","C0CSYS",4,0)
+ ; General Public License See attached copy of the License.
+"RTN","C0CSYS",5,0)
+ ; 
+"RTN","C0CSYS",6,0)
+ ; This program is free software; you can redistribute it and/or modify
+"RTN","C0CSYS",7,0)
+ ; it under the terms of the GNU General Public License as published by
+"RTN","C0CSYS",8,0)
+ ; the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CSYS",9,0)
+ ; (at your option) any later version.
+"RTN","C0CSYS",10,0)
+ ; 
+"RTN","C0CSYS",11,0)
+ ; This program is distributed in the hope that it will be useful,
+"RTN","C0CSYS",12,0)
+ ; but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CSYS",13,0)
+ ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CSYS",14,0)
+ ; GNU General Public License for more details.
+"RTN","C0CSYS",15,0)
+ ; 
+"RTN","C0CSYS",16,0)
+ ; You should have received a copy of the GNU General Public License along
+"RTN","C0CSYS",17,0)
+ ; with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CSYS",18,0)
+ ; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CSYS",19,0)
+ ;
+"RTN","C0CSYS",20,0)
+ W "Enter at appropriate points." Q
+"RTN","C0CSYS",21,0)
+ ;
+"RTN","C0CSYS",22,0)
+ ; Originally, I was going to use VEPERVER, but VEPERVER
+"RTN","C0CSYS",23,0)
+ ; actually kills ^TMP($J), outputs it to the screen in a user-friendly
+"RTN","C0CSYS",24,0)
+ ; manner (press any key to continue),
+"RTN","C0CSYS",25,0)
+ ; and is really a very half finished routine
+"RTN","C0CSYS",26,0)
+ ;
+"RTN","C0CSYS",27,0)
+ ; So for now, I am hard-coding the values.
+"RTN","C0CSYS",28,0)
+ ;
+"RTN","C0CSYS",29,0)
+SYSNAME() ;Get EHR System Name; PUBLIC; Extrinsic
+"RTN","C0CSYS",30,0)
+ Q:$G(DUZ("AG"))="I" "RPMS"
+"RTN","C0CSYS",31,0)
+ Q "WorldVistA EHR/VOE"
+"RTN","C0CSYS",32,0)
+ ;
+"RTN","C0CSYS",33,0)
+SYSVER() ;Get EHR System Version; PUBLIC; Extrinsic
+"RTN","C0CSYS",34,0)
+ Q "1.0"
+"RTN","C0CSYS",35,0)
+ ;
+"RTN","C0CSYS",36,0)
+PTST(DFN) ;TEST TO SEE IF PATIENT MERGED OR A TEST PATIENT
+"RTN","C0CSYS",37,0)
+  ; DFN = IEN of the Patient to be tested
+"RTN","C0CSYS",38,0)
+  ; 1 = Merged or Test Patient
+"RTN","C0CSYS",39,0)
+  ; 0 = Non-test Patient
+"RTN","C0CSYS",40,0)
+  ;
+"RTN","C0CSYS",41,0)
+  I DFN="" Q 0  ; BAD DFN PASSED
+"RTN","C0CSYS",42,0)
+  I $D(^DPT(DFN,-9)) Q 1  ;This patient has been merged
+"RTN","C0CSYS",43,0)
+  I $G(^DPT(DFN,0))="" Q 1  ;Missing zeroth node <---add
+"RTN","C0CSYS",44,0)
+  ;
+"RTN","C0CSYS",45,0)
+  I '$D(CCRTEST) S CCRTEST=1 ; DEFAULT IS THAT WE ARE TESTING
+"RTN","C0CSYS",46,0)
+  I CCRTEST Q 0  ; IF WE ARE TESTING, DON'T REJECT TEST PATIENTS
+"RTN","C0CSYS",47,0)
+  N DIERR,DATA
+"RTN","C0CSYS",48,0)
+  I $$TESTPAT^VADPT(DFN) Q 1 ; QUIT IF IT'S A VA TEST PATIENT
+"RTN","C0CSYS",49,0)
+  S DATA=+$$GET1^DIQ(2,DFN_",",.6,"I") ;Test Patient Indicator
+"RTN","C0CSYS",50,0)
+  ; 1 = Test Patient
+"RTN","C0CSYS",51,0)
+  ; 0 = Non-test Patient
+"RTN","C0CSYS",52,0)
+  I DATA Q DATA
+"RTN","C0CSYS",53,0)
+  S DATA=$$GET1^DIQ(2,DFN_",",.09,"I") ;SSN test
+"RTN","C0CSYS",54,0)
+  D CLEAN^DILF
+"RTN","C0CSYS",55,0)
+  I "Pp"[$E(DATA,$L(DATA),$L(DATA)) Q 0  ;Allow Pseudo SSN
+"RTN","C0CSYS",56,0)
+  I $E(DATA,1,3)="000" Q 1
+"RTN","C0CSYS",57,0)
+  I $E(DATA,1,3)="666" Q 1
+"RTN","C0CSYS",58,0)
+  Q 0
+"RTN","C0CSYS",59,0)
+  ;
+"RTN","C0CUNIT")
+0^37^B43465566
+"RTN","C0CUNIT",1,0)
+C0CUNIT ; CCDCCR/GPL - Unit Testing Library; 5/07/08
+"RTN","C0CUNIT",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CUNIT",3,0)
+ ;Copyright 2008 George Lilly. Licensed under the terms of the GNU
+"RTN","C0CUNIT",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CUNIT",5,0)
+ ;
+"RTN","C0CUNIT",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CUNIT",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CUNIT",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CUNIT",9,0)
+ ;(at your option) any later version.
+"RTN","C0CUNIT",10,0)
+ ;
+"RTN","C0CUNIT",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CUNIT",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CUNIT",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CUNIT",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CUNIT",15,0)
+ ;
+"RTN","C0CUNIT",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CUNIT",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CUNIT",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CUNIT",19,0)
+ ;
+"RTN","C0CUNIT",20,0)
+          W "This is a unit testing library",!
+"RTN","C0CUNIT",21,0)
+          W !
+"RTN","C0CUNIT",22,0)
+          Q
+"RTN","C0CUNIT",23,0)
+          ;
+"RTN","C0CUNIT",24,0)
+ZT(ZARY,BAT,TST) ; private routine to add a test case to the ZARY array
+"RTN","C0CUNIT",25,0)
+          ; ZARY IS PASSED BY REFERENCE
+"RTN","C0CUNIT",26,0)
+          ; BAT is a string identifying the test battery
+"RTN","C0CUNIT",27,0)
+          ; TST is a test which will evaluate to true or false
+"RTN","C0CUNIT",28,0)
+          ; I '$G(ZARY) D
+"RTN","C0CUNIT",29,0)
+          ; . S ZARY(0)=0 ; initially there are no elements
+"RTN","C0CUNIT",30,0)
+          ; W "GOT HERE LOADING "_TST,!
+"RTN","C0CUNIT",31,0)
+          N CNT ; count of array elements
+"RTN","C0CUNIT",32,0)
+          S CNT=ZARY(0) ; contains array count
+"RTN","C0CUNIT",33,0)
+          S CNT=CNT+1 ; increment count
+"RTN","C0CUNIT",34,0)
+          S ZARY(CNT)=TST ; put the test in the array
+"RTN","C0CUNIT",35,0)
+          I $D(ZARY(BAT))  D  ; NOT THE FIRST TEST IN BATTERY
+"RTN","C0CUNIT",36,0)
+          . N II,TN ; TEMP FOR ENDING TEST IN BATTERY
+"RTN","C0CUNIT",37,0)
+          . S II=$P(ZARY(BAT),"^",2)
+"RTN","C0CUNIT",38,0)
+          . S $P(ZARY(BAT),"^",2)=II+1
+"RTN","C0CUNIT",39,0)
+          I '$D(ZARY(BAT))  D  ; FIRST TEST IN THIS BATTERY
+"RTN","C0CUNIT",40,0)
+          . S ZARY(BAT)=CNT_"^"_CNT ; FIRST AND LAST TESTS IN BATTERY
+"RTN","C0CUNIT",41,0)
+          . S ZARY("TESTS",BAT)="" ; PUT THE BATTERY IN THE TESTS INDEX
+"RTN","C0CUNIT",42,0)
+          . ; S TN=$NA(ZARY("TESTS"))
+"RTN","C0CUNIT",43,0)
+          . ; D PUSH^C0CXPATH(TN,BAT)
+"RTN","C0CUNIT",44,0)
+          S ZARY(0)=CNT ; update the array counter
+"RTN","C0CUNIT",45,0)
+          Q
+"RTN","C0CUNIT",46,0)
+          ;
+"RTN","C0CUNIT",47,0)
+ZLOAD(ZARY,ROUTINE)  ; load tests into ZARY which is passed by reference
+"RTN","C0CUNIT",48,0)
+          ; ZARY IS PASSED BY NAME
+"RTN","C0CUNIT",49,0)
+          ; ZARY = name of the root, closed array format (e.g., "^TMP($J)")
+"RTN","C0CUNIT",50,0)
+          ; ROUTINE = NAME OF THE ROUTINE - PASSED BY VALUE
+"RTN","C0CUNIT",51,0)
+          K @ZARY
+"RTN","C0CUNIT",52,0)
+          S @ZARY@(0)=0 ; initialize array count
+"RTN","C0CUNIT",53,0)
+          N LINE,LABEL,BODY
+"RTN","C0CUNIT",54,0)
+          N INTEST S INTEST=0 ; switch for in the test case section
+"RTN","C0CUNIT",55,0)
+          N SECTION S SECTION="[anonymous]" ; test case section
+"RTN","C0CUNIT",56,0)
+          ;
+"RTN","C0CUNIT",57,0)
+          N NUM F NUM=1:1 S LINE=$T(+NUM^@ROUTINE) Q:LINE=""  D
+"RTN","C0CUNIT",58,0)
+          . I LINE?." "1";;><TEST>".E S INTEST=1 ; entering test section
+"RTN","C0CUNIT",59,0)
+          . I LINE?." "1";;><TEMPLATE>".E S INTEST=1 ; entering TEMPLATE section
+"RTN","C0CUNIT",60,0)
+          . I LINE?." "1";;></TEST>".E S INTEST=0 ; leaving test section
+"RTN","C0CUNIT",61,0)
+          . I LINE?." "1";;></TEMPLATE>".E S INTEST=0 ; leaving TEMPLATE section
+"RTN","C0CUNIT",62,0)
+          . I INTEST  D  ; within the testing section
+"RTN","C0CUNIT",63,0)
+          . . I LINE?." "1";;><".E  D  ; section name found
+"RTN","C0CUNIT",64,0)
+          . . . S SECTION=$P($P(LINE,";;><",2),">",1) ; pull out name
+"RTN","C0CUNIT",65,0)
+          . . I LINE?." "1";;>>".E  D  ; test case found
+"RTN","C0CUNIT",66,0)
+          . . . D ZT(.@ZARY,SECTION,$P(LINE,";;>>",2)) ; put the test in the array
+"RTN","C0CUNIT",67,0)
+          S @ZARY@("ALL")="1"_"^"_@ZARY@(0) ; MAKE A BATTERY FOR ALL
+"RTN","C0CUNIT",68,0)
+          Q
+"RTN","C0CUNIT",69,0)
+          ;
+"RTN","C0CUNIT",70,0)
+ZTEST(ZARY,WHICH)   ; try out the tests using a passed array ZTEST
+"RTN","C0CUNIT",71,0)
+          N ZI,ZX,ZR,ZP
+"RTN","C0CUNIT",72,0)
+          S DEBUG=0
+"RTN","C0CUNIT",73,0)
+          ; I WHICH="ALL" D  Q ; RUN ALL THE TESTS
+"RTN","C0CUNIT",74,0)
+          ; . W "DOING ALL",!
+"RTN","C0CUNIT",75,0)
+          ; . N J,NT
+"RTN","C0CUNIT",76,0)
+          ; . S NT=$NA(ZARY("TESTS"))
+"RTN","C0CUNIT",77,0)
+          ; . W NT,@NT@(0),!
+"RTN","C0CUNIT",78,0)
+          ; . F J=1:1:@NT@(0) D  ;
+"RTN","C0CUNIT",79,0)
+          ; . . W @NT@(J),!
+"RTN","C0CUNIT",80,0)
+          ; . . D ZTEST^C0CUNIT(@ZARY,@NT@(J))
+"RTN","C0CUNIT",81,0)
+          I '$D(ZARY(WHICH))  D  Q ; TEST SECTION DOESN'T EXIST
+"RTN","C0CUNIT",82,0)
+          . W "ERROR -- TEST SECTION DOESN'T EXIST -> ",WHICH,!
+"RTN","C0CUNIT",83,0)
+          N FIRST,LAST
+"RTN","C0CUNIT",84,0)
+          S FIRST=$P(ZARY(WHICH),"^",1)
+"RTN","C0CUNIT",85,0)
+          S LAST=$P(ZARY(WHICH),"^",2)
+"RTN","C0CUNIT",86,0)
+          F ZI=FIRST:1:LAST  D
+"RTN","C0CUNIT",87,0)
+          . I ZARY(ZI)?1">"1.E  D  ; NOT A TEST, JUST RUN THE STATEMENT
+"RTN","C0CUNIT",88,0)
+          . . S ZP=$E(ZARY(ZI),2,$L(ZARY(ZI)))
+"RTN","C0CUNIT",89,0)
+          . . ;  W ZP,!
+"RTN","C0CUNIT",90,0)
+          . . S ZX=ZP
+"RTN","C0CUNIT",91,0)
+          . . W "RUNNING: "_ZP
+"RTN","C0CUNIT",92,0)
+          . . X ZX
+"RTN","C0CUNIT",93,0)
+          . . W "..SUCCESS: ",WHICH,!
+"RTN","C0CUNIT",94,0)
+          . I ZARY(ZI)?1"?"1.E  D  ; THIS IS A TEST
+"RTN","C0CUNIT",95,0)
+          . . S ZP=$E(ZARY(ZI),2,$L(ZARY(ZI)))
+"RTN","C0CUNIT",96,0)
+          . . S ZX="S ZR="_ZP
+"RTN","C0CUNIT",97,0)
+          . . W "TRYING: "_ZP
+"RTN","C0CUNIT",98,0)
+          . . X ZX
+"RTN","C0CUNIT",99,0)
+          . . W $S(ZR=1:"..PASSED ",1:"..FAILED "),!
+"RTN","C0CUNIT",100,0)
+          . . I '$D(TPASSED) D  ; NOT INITIALIZED YET
+"RTN","C0CUNIT",101,0)
+          . . . S TPASSED=0 S TFAILED=0
+"RTN","C0CUNIT",102,0)
+          . . I ZR S TPASSED=TPASSED+1
+"RTN","C0CUNIT",103,0)
+          . . I 'ZR S TFAILED=TFAILED+1
+"RTN","C0CUNIT",104,0)
+          Q
+"RTN","C0CUNIT",105,0)
+          ;
+"RTN","C0CUNIT",106,0)
+TEST   ; RUN ALL THE TEST CASES
+"RTN","C0CUNIT",107,0)
+          N ZTMP
+"RTN","C0CUNIT",108,0)
+          D ZLOAD(.ZTMP)
+"RTN","C0CUNIT",109,0)
+          D ZTEST(.ZTMP,"ALL")
+"RTN","C0CUNIT",110,0)
+          W "PASSED: ",TPASSED,!
+"RTN","C0CUNIT",111,0)
+          W "FAILED: ",TFAILED,!
+"RTN","C0CUNIT",112,0)
+          W !
+"RTN","C0CUNIT",113,0)
+          W "THE TESTS!",!
+"RTN","C0CUNIT",114,0)
+          ; I DEBUG ZWR ZTMP
+"RTN","C0CUNIT",115,0)
+          Q
+"RTN","C0CUNIT",116,0)
+          ;
+"RTN","C0CUNIT",117,0)
+GTSTS(GTZARY,RTN) ; return an array of test names
+"RTN","C0CUNIT",118,0)
+          N I,J S I="" S I=$O(GTZARY("TESTS",I))
+"RTN","C0CUNIT",119,0)
+          F J=0:0  Q:I=""  D
+"RTN","C0CUNIT",120,0)
+          . D PUSH^C0CXPATH(RTN,I)
+"RTN","C0CUNIT",121,0)
+          . S I=$O(GTZARY("TESTS",I))
+"RTN","C0CUNIT",122,0)
+          Q
+"RTN","C0CUNIT",123,0)
+          ;
+"RTN","C0CUNIT",124,0)
+TESTALL(RNM) ; RUN ALL THE TESTS
+"RTN","C0CUNIT",125,0)
+          N ZI,J,TZTMP,TSTS,TOTP,TOTF
+"RTN","C0CUNIT",126,0)
+          S TOTP=0 S TOTF=0
+"RTN","C0CUNIT",127,0)
+          D ZLOAD^C0CUNIT("TZTMP",RNM)
+"RTN","C0CUNIT",128,0)
+          D GTSTS(.TZTMP,"TSTS")
+"RTN","C0CUNIT",129,0)
+          F ZI=1:1:TSTS(0) D  ;
+"RTN","C0CUNIT",130,0)
+          . S TPASSED=0 S TFAILED=0
+"RTN","C0CUNIT",131,0)
+          . D ZTEST^C0CUNIT(.TZTMP,TSTS(ZI))
+"RTN","C0CUNIT",132,0)
+          . S TOTP=TOTP+TPASSED
+"RTN","C0CUNIT",133,0)
+          . S TOTF=TOTF+TFAILED
+"RTN","C0CUNIT",134,0)
+          . S $P(TSTS(ZI),"^",2)=TPASSED
+"RTN","C0CUNIT",135,0)
+          . S $P(TSTS(ZI),"^",3)=TFAILED
+"RTN","C0CUNIT",136,0)
+          F ZI=1:1:TSTS(0) D  ;
+"RTN","C0CUNIT",137,0)
+          . W "TEST=> ",$P(TSTS(ZI),"^",1)
+"RTN","C0CUNIT",138,0)
+          . W " PASSED=>",$P(TSTS(ZI),"^",2)
+"RTN","C0CUNIT",139,0)
+          . W " FAILED=>",$P(TSTS(ZI),"^",3),!
+"RTN","C0CUNIT",140,0)
+          W "TOTAL=> PASSED:",TOTP," FAILED:",TOTF,!
+"RTN","C0CUNIT",141,0)
+          Q
+"RTN","C0CUNIT",142,0)
+          ;
+"RTN","C0CUNIT",143,0)
+TLIST(ZARY) ; LIST ALL THE TESTS
+"RTN","C0CUNIT",144,0)
+          ; THEY ARE MARKED AS ;;><TESTNAME> IN THE TEST CASES
+"RTN","C0CUNIT",145,0)
+          ; ZARY IS PASSED BY REFERENCE
+"RTN","C0CUNIT",146,0)
+          N I,J,K S I="" S I=$O(ZARY("TESTS",I))
+"RTN","C0CUNIT",147,0)
+          S K=1
+"RTN","C0CUNIT",148,0)
+          F J=0:0  Q:I=""  D
+"RTN","C0CUNIT",149,0)
+          . ; W "I IS NOW=",I,!
+"RTN","C0CUNIT",150,0)
+          . W I," "
+"RTN","C0CUNIT",151,0)
+          . S I=$O(ZARY("TESTS",I))
+"RTN","C0CUNIT",152,0)
+          . S K=K+1 I K=6  D
+"RTN","C0CUNIT",153,0)
+          . . W !
+"RTN","C0CUNIT",154,0)
+          . . S K=1
+"RTN","C0CUNIT",155,0)
+          Q
+"RTN","C0CUNIT",156,0)
+          ;
+"RTN","C0CUNIT",157,0)
+MEDS 
+"RTN","C0CUNIT",158,0)
+ N DEBUG S DEBUG=0
+"RTN","C0CUNIT",159,0)
+ N DFN S DFN=5685
+"RTN","C0CUNIT",160,0)
+ K ^TMP($J)
+"RTN","C0CUNIT",161,0)
+ W "Loading CCR Template into T using LOAD^GPLCCR0($NA(^TMP($J,""CCR"")))",!!
+"RTN","C0CUNIT",162,0)
+ N T S T=$NA(^TMP($J,"CCR"))     D LOAD^GPLCCR0(T)
+"RTN","C0CUNIT",163,0)
+ N XPATH S XPATH="//ContinuityOfCareRecord/Body/Medications"
+"RTN","C0CUNIT",164,0)
+ W "XPATH is: "_XPATH,!
+"RTN","C0CUNIT",165,0)
+ W "Getting Med Template into INXML using",!
+"RTN","C0CUNIT",166,0)
+ W "QUERY^GPLXPATH(T,XPATH,""INXML"")",!!
+"RTN","C0CUNIT",167,0)
+ D QUERY^GPLXPATH(T,XPATH,"INXML")
+"RTN","C0CUNIT",168,0)
+ W "Executing EXTRACT^C0CMED(INXML,DFN,OUTXML)",!
+"RTN","C0CUNIT",169,0)
+ W "OUTXML will be ^TMP($J,""OUT"")",!
+"RTN","C0CUNIT",170,0)
+ N OUTXML S OUTXML=$NA(^TMP($J,"OUT"))
+"RTN","C0CUNIT",171,0)
+ D EXTRACT^C0CMED6("INXML",DFN,OUTXML)
+"RTN","C0CUNIT",172,0)
+ D FILEOUT^C0CRNF(OUTXML,"TESTMEDS.xml")
+"RTN","C0CUNIT",173,0)
+ Q
+"RTN","C0CUNIT",174,0)
+PAT 
+"RTN","C0CUNIT",175,0)
+ D ANALYZE^ARJTXRD("C0CDPT",.OUT) ; Analyze a routine in the directory
+"RTN","C0CUNIT",176,0)
+ N X,Y
+"RTN","C0CUNIT",177,0)
+ ; Select Patient
+"RTN","C0CUNIT",178,0)
+ S DIC=2,DIC(0)="AEMQ" D ^DIC
+"RTN","C0CUNIT",179,0)
+ ;
+"RTN","C0CUNIT",180,0)
+ W "You have selected patient "_Y,!!
+"RTN","C0CUNIT",181,0)
+ N I S I=89 F  S I=$O(OUT(I)) Q:I="ALINE"  D
+"RTN","C0CUNIT",182,0)
+ . W "OUT("_I_",0)"_" is "_$P(OUT(I,0)," ")_" "
+"RTN","C0CUNIT",183,0)
+ . W "valued at "
+"RTN","C0CUNIT",184,0)
+ . W @("$$"_$P(OUT(I,0),"(DFN)")_"^"_"C0CDPT"_"("_$P(Y,"^")_")")
+"RTN","C0CUNIT",185,0)
+ . W !
+"RTN","C0CUNIT",186,0)
+ Q
+"RTN","C0CUTIL")
+0^54^B27079469
+"RTN","C0CUTIL",1,0)
+C0CUTIL ;WV/C0C/SMH - Various Utilites for generating the CCR/CCD;06/15/08
+"RTN","C0CUTIL",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CUTIL",3,0)
+ ;Copyright 2008-2009 Sam Habiel & George Lilly.  
+"RTN","C0CUTIL",4,0)
+ ;Licensed under the terms of the GNU
+"RTN","C0CUTIL",5,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CUTIL",6,0)
+ ;
+"RTN","C0CUTIL",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CUTIL",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CUTIL",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CUTIL",10,0)
+ ;(at your option) any later version.
+"RTN","C0CUTIL",11,0)
+ ;
+"RTN","C0CUTIL",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CUTIL",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CUTIL",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CUTIL",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CUTIL",16,0)
+ ;
+"RTN","C0CUTIL",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CUTIL",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CUTIL",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CUTIL",20,0)
+ ;
+"RTN","C0CUTIL",21,0)
+ W "No Entry at Top!"
+"RTN","C0CUTIL",22,0)
+ Q
+"RTN","C0CUTIL",23,0)
+ ;
+"RTN","C0CUTIL",24,0)
+UUID()  ; thanks to Wally for this.
+"RTN","C0CUTIL",25,0)
+        N R,I,J,N 
+"RTN","C0CUTIL",26,0)
+        S N="",R="" F  S N=N_$R(100000) Q:$L(N)>64 
+"RTN","C0CUTIL",27,0)
+        F I=1:2:64 S R=R_$E("0123456789abcdef",($E(N,I,I+1)#16+1)) 
+"RTN","C0CUTIL",28,0)
+        Q $E(R,1,8)_"-"_$E(R,9,12)_"-4"_$E(R,14,16)_"-"_$E("89ab",$E(N,17)#4+1)_$E(R,18,20)_"-"_$E(R,21,32)
+"RTN","C0CUTIL",29,0)
+ ;
+"RTN","C0CUTIL",30,0)
+OLDUUID() ; GENERATE A RANDOM UUID (Version 4)
+"RTN","C0CUTIL",31,0)
+ N I,J,ZS
+"RTN","C0CUTIL",32,0)
+ S ZS="0123456789abcdef" S J=""
+"RTN","C0CUTIL",33,0)
+ F I=1:1:36 S J=J_$S((I=9)!(I=14)!(I=19)!(I=24):"-",I=15:4,I=20:"a",1:$E(ZS,$R(16)+1))
+"RTN","C0CUTIL",34,0)
+ Q J
+"RTN","C0CUTIL",35,0)
+ ;
+"RTN","C0CUTIL",36,0)
+FMDTOUTC(DATE,FORMAT) ; Convert Fileman Date to UTC Date Format; PUBLIC; Extrinsic
+"RTN","C0CUTIL",37,0)
+ ; FORMAT is Format of Date. Can be either D (Day) or DT (Date and Time)
+"RTN","C0CUTIL",38,0)
+ ; If not passed, or passed incorrectly, it's assumed that it is D.
+"RTN","C0CUTIL",39,0)
+ ; FM Date format is "YYYMMDD.HHMMSS" HHMMSS may not be supplied.
+"RTN","C0CUTIL",40,0)
+ ; UTC date is formatted as follows: YYYY-MM-DDThh:mm:ss_offsetfromUTC
+"RTN","C0CUTIL",41,0)
+ ; UTC, Year, Month, Day, Hours, Minutes, Seconds, Time offset (obtained from Mailman Site Parameters)
+"RTN","C0CUTIL",42,0)
+ N UTC,Y,M,D,H,MM,S,OFF
+"RTN","C0CUTIL",43,0)
+ S Y=1700+$E(DATE,1,3)
+"RTN","C0CUTIL",44,0)
+ S M=$E(DATE,4,5)
+"RTN","C0CUTIL",45,0)
+ S D=$E(DATE,6,7)
+"RTN","C0CUTIL",46,0)
+ S H=$E(DATE,9,10)
+"RTN","C0CUTIL",47,0)
+ I $L(H)=1 S H="0"_H
+"RTN","C0CUTIL",48,0)
+ S MM=$E(DATE,11,12)
+"RTN","C0CUTIL",49,0)
+ I $L(MM)=1 S MM="0"_MM
+"RTN","C0CUTIL",50,0)
+ S S=$E(DATE,13,14)
+"RTN","C0CUTIL",51,0)
+ I $L(S)=1 S S="0"_S
+"RTN","C0CUTIL",52,0)
+ S OFF=$$TZ^XLFDT ; See Kernel Manual for documentation.
+"RTN","C0CUTIL",53,0)
+ S OFFS=$E(OFF,1,1)
+"RTN","C0CUTIL",54,0)
+ S OFF0=$TR(OFF,"+-")
+"RTN","C0CUTIL",55,0)
+ S OFF1=$E(OFF0+10000,2,3)
+"RTN","C0CUTIL",56,0)
+ S OFF2=$E(OFF0+10000,4,5)
+"RTN","C0CUTIL",57,0)
+ S OFF=OFFS_OFF1_":"_OFF2
+"RTN","C0CUTIL",58,0)
+ ;S OFF2=$E(OFF,1,2) ;
+"RTN","C0CUTIL",59,0)
+ ;S OFF2=$E(100+OFF2,2,3) ; GPL 11/08 CHANGED TO -05:00 FORMAT
+"RTN","C0CUTIL",60,0)
+ ;S OFF3=$E(OFF,3,4) ;MINUTES
+"RTN","C0CUTIL",61,0)
+ ;S OFF=$S(OFF2="":"00",0:"00",1:OFF2)_"."_$S(OFF3="":"00",1:OFF3)
+"RTN","C0CUTIL",62,0)
+ ; If H, MM and S are empty, it means that the FM date didn't supply the time.
+"RTN","C0CUTIL",63,0)
+ ; In this case, set H, MM and S to "00"
+"RTN","C0CUTIL",64,0)
+ ; S:('$L(H)&'$L(MM)&'$L(S)) (H,MM,S)="00" ; IF ONLY SOME ARE MISSING?
+"RTN","C0CUTIL",65,0)
+ S:'$L(H) H="00"
+"RTN","C0CUTIL",66,0)
+ S:'$L(MM) MM="00"
+"RTN","C0CUTIL",67,0)
+ S:'$L(S) S="00"
+"RTN","C0CUTIL",68,0)
+ S UTC=Y_"-"_M_"-"_D_"T"_H_":"_MM_$S(S="":":00",1:":"_S)_OFF ; Skip's code to fix hanging colon if no seconds
+"RTN","C0CUTIL",69,0)
+ I $L($G(FORMAT)),FORMAT="DT" Q UTC ; Date with time.
+"RTN","C0CUTIL",70,0)
+ E  Q $P(UTC,"T")
+"RTN","C0CUTIL",71,0)
+ ;
+"RTN","C0CUTIL",72,0)
+SORTDT(V1,V2,ORDR) ; DATE SORT ARRAY AND RETURN INDEX IN V1 AND COUNT
+"RTN","C0CUTIL",73,0)
+ ; AS EXTRINSIC ORDR IS 1 OR -1 FOR FORWARD OR REVERSE
+"RTN","C0CUTIL",74,0)
+ ; DATE AND TIME ORDER. DEFAULT IS FORWARD
+"RTN","C0CUTIL",75,0)
+ ; V2 IS AN ARRAY OF DATES IN FILEMAN FORMAT
+"RTN","C0CUTIL",76,0)
+ ; V1 IS RETURNS INDIRECT INDEXES OF V2 IN REVERSE DATE ORDER
+"RTN","C0CUTIL",77,0)
+ ; SO V2(V1(X)) WILL RETURN THE DATES IN DATE/TIME ORDER
+"RTN","C0CUTIL",78,0)
+ ; THE COUNT OF THE DATES IS RETURNED AS AN EXTRINSIC
+"RTN","C0CUTIL",79,0)
+ ; BOTH V1 AND V2 ARE PASSED BY REFERENCE
+"RTN","C0CUTIL",80,0)
+ N VSRT ; TEMP FOR HASHING DATES
+"RTN","C0CUTIL",81,0)
+ N ZI,ZJ,ZTMP,ZCNT,ZP1,ZP2
+"RTN","C0CUTIL",82,0)
+ S ZCNT=V2(0) ; COUNTING NUMBER OF DATES
+"RTN","C0CUTIL",83,0)
+ F ZI=1:1:ZCNT D  ; FOR EACH DATE IN THE ARRAY
+"RTN","C0CUTIL",84,0)
+ . I $D(V2(ZI)) D  ; IF THE DATE EXISTS
+"RTN","C0CUTIL",85,0)
+ . . S ZP1=$P(V2(ZI),".",1) ; THE DATE PIECE
+"RTN","C0CUTIL",86,0)
+ . . S ZP2=$P(V2(ZI),".",2) ; THE TIME PIECE
+"RTN","C0CUTIL",87,0)
+ . . ; W "DATE: ",ZP1," TIME: ",ZP2,!
+"RTN","C0CUTIL",88,0)
+ . . S VSRT(ZP1,ZP2,ZI)=ZI ; INDEX OF DATE, TIME AND COUNT
+"RTN","C0CUTIL",89,0)
+ N ZG
+"RTN","C0CUTIL",90,0)
+ S ZG=$Q(VSRT(""))
+"RTN","C0CUTIL",91,0)
+ F  D  Q:ZG=""  ;
+"RTN","C0CUTIL",92,0)
+ . ; W ZG,!
+"RTN","C0CUTIL",93,0)
+ . D PUSH^C0CXPATH("V1",@ZG)
+"RTN","C0CUTIL",94,0)
+ . S ZG=$Q(@ZG)
+"RTN","C0CUTIL",95,0)
+ I ORDR=-1 D  ; HAVE TO REVERSE ORDER
+"RTN","C0CUTIL",96,0)
+ . N ZG2
+"RTN","C0CUTIL",97,0)
+ . F ZI=1:1:V1(0) D  ; FOR EACH ELELMENT
+"RTN","C0CUTIL",98,0)
+ . . S ZG2(V1(0)-ZI+1)=V1(ZI) ; SET IN REVERSE ORDER
+"RTN","C0CUTIL",99,0)
+ . S ZG2(0)=V1(0)
+"RTN","C0CUTIL",100,0)
+ . D CP^C0CXPATH("ZG2","V1") ; COPY OVER THE NEW ARRAY
+"RTN","C0CUTIL",101,0)
+ Q ZCNT
+"RTN","C0CUTIL",102,0)
+ ;
+"RTN","C0CUTIL",103,0)
+DA2SNO(RTN,DNAME) ; LOOK UP DRUG ALLERGY CODE IN ^LEX
+"RTN","C0CUTIL",104,0)
+ ; RETURNS AN ARRAY RTN PASSED BY REFERENCE
+"RTN","C0CUTIL",105,0)
+ ; THIS ROUTINE CAN BE USED AS AN RPC
+"RTN","C0CUTIL",106,0)
+ ; RTN(0) IS THE NUMBER OF ELEMENTS IN THE ARRAY
+"RTN","C0CUTIL",107,0)
+ ; RTN(1) IS THE SNOMED CODE FOR THE DRUG ALLERGY
+"RTN","C0CUTIL",108,0)
+ ;
+"RTN","C0CUTIL",109,0)
+ N LEXIEN
+"RTN","C0CUTIL",110,0)
+ I $O(^LEX(757.21,"ADIS",DNAME,""))'="" D  ; IEN FOUND FOR THIS DRUG
+"RTN","C0CUTIL",111,0)
+ . S LEXIEN=$O(^LEX(757.21,"ADIS",DNAME,"")) ; GET THE IEN IN THE LEXICON
+"RTN","C0CUTIL",112,0)
+ . W LEXIEN,!
+"RTN","C0CUTIL",113,0)
+ . S RTN(1)=$P(^LEX(757.02,LEXIEN,0),"^",2) ; SNOMED CODE IN P2
+"RTN","C0CUTIL",114,0)
+ . S RTN(0)=1 ; ONE THING RETURNED
+"RTN","C0CUTIL",115,0)
+ E  S RTN(0)=0 ; NOT FOUND
+"RTN","C0CUTIL",116,0)
+ Q
+"RTN","C0CUTIL",117,0)
+ ;
+"RTN","C0CUTIL",118,0)
+DASNO(DANAME) ; PRINTS THE SNOMED CODE FOR ALLERGY TO DRUG DANAME
+"RTN","C0CUTIL",119,0)
+ ;
+"RTN","C0CUTIL",120,0)
+ N DARTN
+"RTN","C0CUTIL",121,0)
+ D DA2SNO(.DARTN,DANAME) ; CALL THE LOOKUP ROUTINE
+"RTN","C0CUTIL",122,0)
+ I DARTN(0)>0 D  ; GOT RESULTS
+"RTN","C0CUTIL",123,0)
+ . W !,DARTN(1) ;PRINT THE SNOMED CODE
+"RTN","C0CUTIL",124,0)
+ E  W !,"NOT FOUND",!
+"RTN","C0CUTIL",125,0)
+ Q
+"RTN","C0CUTIL",126,0)
+ ;
+"RTN","C0CUTIL",127,0)
+DASNALL(WHICH) ; ROUTINE TO EXAMINE THE ADIS INDEX IN LEX AND RETRIEVE ALL
+"RTN","C0CUTIL",128,0)
+ ; ASSOCIATED SNOMED CODES
+"RTN","C0CUTIL",129,0)
+ N DASTMP,DASIEN,DASNO
+"RTN","C0CUTIL",130,0)
+ S DASTMP=""
+"RTN","C0CUTIL",131,0)
+ F  S DASTMP=$O(^LEX(757.21,WHICH,DASTMP)) Q:DASTMP=""  D  ; NAME OF MED
+"RTN","C0CUTIL",132,0)
+ . S DASIEN=$O(^LEX(757.21,WHICH,DASTMP,"")) ; IEN OF MED
+"RTN","C0CUTIL",133,0)
+ . S DASNO=$P(^LEX(757.02,DASIEN,0),"^",2) ; SNOMED CODE FOR ENTRY
+"RTN","C0CUTIL",134,0)
+ . W DASTMP,"=",DASNO,! ; PRINT IT OUT
+"RTN","C0CUTIL",135,0)
+ Q
+"RTN","C0CUTIL",136,0)
+ ;
+"RTN","C0CUTIL",137,0)
+RXNFN() Q 1130590011.001 ; RxNorm Concepts file number
+"RTN","C0CUTIL",138,0)
+ ;
+"RTN","C0CUTIL",139,0)
+CODE(ZVUID) ; EXTRINSIC WHICH RETURNS THE RXNORM CODE IF KNOWN OF 
+"RTN","C0CUTIL",140,0)
+ ; THE VUID - RETURNS CODE^SYSTEM^VERSION TO USE IN THE CCR
+"RTN","C0CUTIL",141,0)
+ N ZRSLT S ZRSLT=ZVUID_"^"_"VUID"_"^" ; DEFAULT
+"RTN","C0CUTIL",142,0)
+ I $G(ZVUID)="" Q ""
+"RTN","C0CUTIL",143,0)
+ I '$D(^C0P("RXN")) Q ZRSLT ; ERX NOT INSTALLED
+"RTN","C0CUTIL",144,0)
+ N C0PIEN ; S C0PIEN=$$FIND1^DIC($$RXNFN,"","QX",ZVUID,"VUID")
+"RTN","C0CUTIL",145,0)
+ S C0PIEN=$O(^C0P("RXN","VUID",ZVUID,"")) ;GPL FIX FOR MULTIPLES
+"RTN","C0CUTIL",146,0)
+ N ZRXN S ZRXN=$$GET1^DIQ($$RXNFN,C0PIEN,.01)
+"RTN","C0CUTIL",147,0)
+ S ZRXN=$$NISTMAP(ZRXN) ; CHANGE THE CODE IF NEEDED
+"RTN","C0CUTIL",148,0)
+ I ZRXN'="" S ZRSLT=ZRXN_"^RXNORM^08AB_081201F"
+"RTN","C0CUTIL",149,0)
+ Q ZRSLT
+"RTN","C0CUTIL",150,0)
+ ;
+"RTN","C0CUTIL",151,0)
+NISTMAP(ZRXN) ; EXTRINSIC WHICH MAPS SOME RXNORM NUMBERS TO 
+"RTN","C0CUTIL",152,0)
+ ; CONFORM TO NIST REQUIREMENTS
+"RTN","C0CUTIL",153,0)
+ ;INPATIENT CERTIFICATION
+"RTN","C0CUTIL",154,0)
+ I ZRXN=309362 S ZRXN=213169
+"RTN","C0CUTIL",155,0)
+ I ZRXN=855318 S ZRXN=855320
+"RTN","C0CUTIL",156,0)
+ I ZRXN=197361 S ZRXN=212549
+"RTN","C0CUTIL",157,0)
+ ;OUTPATIENT CERTIFICATION
+"RTN","C0CUTIL",158,0)
+ I ZRXN=310534 S ZRXN=205875
+"RTN","C0CUTIL",159,0)
+ I ZRXN=617312 S ZRXN=617314
+"RTN","C0CUTIL",160,0)
+ I ZRXN=310429 S ZRXN=200801
+"RTN","C0CUTIL",161,0)
+ I ZRXN=628953 S ZRXN=628958
+"RTN","C0CUTIL",162,0)
+ I ZRXN=745679 S ZRXN=630208
+"RTN","C0CUTIL",163,0)
+ I ZRXN=311564 S ZRXN=979334
+"RTN","C0CUTIL",164,0)
+ I ZRXN=836343 S ZRXN=836370
+"RTN","C0CUTIL",165,0)
+ Q ZRXN
+"RTN","C0CUTIL",166,0)
+ ;
+"RTN","C0CUTIL",167,0)
+RPMS() ; Are we running on an RPMS system rather than Vista?
+"RTN","C0CUTIL",168,0)
+ Q $G(DUZ("AG"))="I" ; If User Agency is Indian Health Service
+"RTN","C0CUTIL",169,0)
+VISTA() ; Are we running on Vanilla Vista?
+"RTN","C0CUTIL",170,0)
+ Q $G(DUZ("AG"))="V" ; If User Agency is VA
+"RTN","C0CUTIL",171,0)
+WV() ; Are we running on WorldVista? 
+"RTN","C0CUTIL",172,0)
+ Q $G(DUZ("AG"))="E" ; Code for WV.
+"RTN","C0CUTIL",173,0)
+OV() ; Are we running on OpenVista?
+"RTN","C0CUTIL",174,0)
+ Q $G(DUZ("AG"))="O" ; Code for OpenVista
+"RTN","C0CUTIL",175,0)
+ 
+"RTN","C0CVA200")
+0^55^B32092477
+"RTN","C0CVA200",1,0)
+C0CVA200 ;WV/C0C/SMH - Routine to get Provider Data;07/13/2008
+"RTN","C0CVA200",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CVA200",3,0)
+ ;Copyright 2008 Sam Habiel.  Licensed under the terms of the GNU
+"RTN","C0CVA200",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CVA200",5,0)
+ ;
+"RTN","C0CVA200",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CVA200",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CVA200",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CVA200",9,0)
+ ;(at your option) any later version.
+"RTN","C0CVA200",10,0)
+ ;
+"RTN","C0CVA200",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CVA200",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CVA200",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CVA200",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CVA200",15,0)
+ ;
+"RTN","C0CVA200",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CVA200",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CVA200",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CVA200",19,0)
+ Q
+"RTN","C0CVA200",20,0)
+ ; This routine uses Kernel APIs and Direct Global Access to get
+"RTN","C0CVA200",21,0)
+ ; Proivder Data from File 200.
+"RTN","C0CVA200",22,0)
+ ;
+"RTN","C0CVA200",23,0)
+  ; The Global is VA(200,*)
+"RTN","C0CVA200",24,0)
+  ;
+"RTN","C0CVA200",25,0)
+FAMILY(DUZ) ; Get Family Name; PUBLIC; EXTRINSIC
+"RTN","C0CVA200",26,0)
+  ; INPUT: DUZ (i.e. File 200 IEN) ByVal
+"RTN","C0CVA200",27,0)
+  ; OUTPUT: String
+"RTN","C0CVA200",28,0)
+  N NAME S NAME=$P(^VA(200,DUZ,0),U)
+"RTN","C0CVA200",29,0)
+  D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CVA200",30,0)
+  Q NAME("FAMILY")
+"RTN","C0CVA200",31,0)
+  ;
+"RTN","C0CVA200",32,0)
+GIVEN(DUZ) ; Get Given Name; PUBLIC; EXTRINSIC
+"RTN","C0CVA200",33,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",34,0)
+  ; OUTPUT: String
+"RTN","C0CVA200",35,0)
+  N NAME S NAME=$P(^VA(200,DUZ,0),U)
+"RTN","C0CVA200",36,0)
+  D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CVA200",37,0)
+  Q NAME("GIVEN")
+"RTN","C0CVA200",38,0)
+  ;
+"RTN","C0CVA200",39,0)
+MIDDLE(DUZ) ; Get Middle Name, PUBLIC; EXTRINSIC
+"RTN","C0CVA200",40,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",41,0)
+  ; OUTPUT: String
+"RTN","C0CVA200",42,0)
+  N NAME S NAME=$P(^VA(200,DUZ,0),U)
+"RTN","C0CVA200",43,0)
+  D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CVA200",44,0)
+  Q NAME("MIDDLE")
+"RTN","C0CVA200",45,0)
+  ;
+"RTN","C0CVA200",46,0)
+SUFFIX(DUZ) ; Get Suffix Name, PUBLIC; EXTRINSIC
+"RTN","C0CVA200",47,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",48,0)
+  ; OUTPUT: String
+"RTN","C0CVA200",49,0)
+  N NAME S NAME=$P(^VA(200,DUZ,0),U)
+"RTN","C0CVA200",50,0)
+  D NAMECOMP^XLFNAME(.NAME)
+"RTN","C0CVA200",51,0)
+  Q NAME("SUFFIX")
+"RTN","C0CVA200",52,0)
+  ;
+"RTN","C0CVA200",53,0)
+TITLE(DUZ) ; Get Title for Proivder, PUBLIC; EXTRINSIC
+"RTN","C0CVA200",54,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",55,0)
+  ; OUTPUT: String
+"RTN","C0CVA200",56,0)
+  ; Gets External Value of Title field in New Person File.
+"RTN","C0CVA200",57,0)
+  ; It's actually a pointer to file 3.1
+"RTN","C0CVA200",58,0)
+  ; 200=New Person File; 8 is Title Field
+"RTN","C0CVA200",59,0)
+  Q $$GET1^DIQ(200,DUZ_",",8)
+"RTN","C0CVA200",60,0)
+  ;
+"RTN","C0CVA200",61,0)
+NPI(DUZ) ; Get NPI Number, PUBLIC; EXTRINSIC
+"RTN","C0CVA200",62,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",63,0)
+  ; OUTPUT: Delimited String in format:
+"RTN","C0CVA200",64,0)
+  ; IDType^ID^IDDescription
+"RTN","C0CVA200",65,0)
+  ; If the NPI doesn't exist, "" is returned.
+"RTN","C0CVA200",66,0)
+  ; This routine uses a call documented in the Kernel dev guide
+"RTN","C0CVA200",67,0)
+  ; This call returns as "NPI^TimeEntered^ActiveInactive"
+"RTN","C0CVA200",68,0)
+  ; It returns -1 for NPI if NPI doesn't exist.
+"RTN","C0CVA200",69,0)
+  N NPI S NPI=$P($$NPI^XUSNPI("Individual_ID",DUZ),U)
+"RTN","C0CVA200",70,0)
+  Q:NPI=-1 ""
+"RTN","C0CVA200",71,0)
+  Q "NPI^"_NPI_"^HHS"
+"RTN","C0CVA200",72,0)
+  ;
+"RTN","C0CVA200",73,0)
+SPEC(DUZ) ; Get Provider Specialty, PUBLIC; EXTRINSIC
+"RTN","C0CVA200",74,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",75,0)
+  ; OUTPUT: String: ProviderType/Specialty/Subspecialty OR ""
+"RTN","C0CVA200",76,0)
+  ; Uses a Kernel API. Returns -1 if a specialty is not specified
+"RTN","C0CVA200",77,0)
+  ; in file 200.
+"RTN","C0CVA200",78,0)
+  ; Otherwise, returns IEN^Profession^Specialty^Sub­specialty^Effect date^Expired date^VA code
+"RTN","C0CVA200",79,0)
+  N STR S STR=$$GET^XUA4A72(DUZ)
+"RTN","C0CVA200",80,0)
+  Q:+STR<0 ""
+"RTN","C0CVA200",81,0)
+  ; Sometimes we have 3 pieces, or 2. Deal with that.
+"RTN","C0CVA200",82,0)
+  Q:$L($P(STR,U,4)) $P(STR,U,2)_"-"_$P(STR,U,3)_"-"_$P(STR,U,4)
+"RTN","C0CVA200",83,0)
+  Q $P(STR,U,2)_"-"_$P(STR,U,3)
+"RTN","C0CVA200",84,0)
+  ;
+"RTN","C0CVA200",85,0)
+ADDTYPE(DUZ) ; Get Address Type, PUBLIC; EXTRINSIC
+"RTN","C0CVA200",86,0)
+  ; INPUT: DUZ, but not needed really... here for future expansion
+"RTN","C0CVA200",87,0)
+  ; OUTPUT: At this point "Work"
+"RTN","C0CVA200",88,0)
+  Q "Work"
+"RTN","C0CVA200",89,0)
+  ;
+"RTN","C0CVA200",90,0)
+ADDLINE1(ADUZ) ; Get Address associated with this instituation; PUBLIC; EXTRINSIC ; CHANGED PARAMETER TO ADUZ TO KEEP FROM CRASHING GPL 1/09
+"RTN","C0CVA200",91,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",92,0)
+  ; Output: String.
+"RTN","C0CVA200",93,0)
+  ;
+"RTN","C0CVA200",94,0)
+  ; First, get site number from the institution file.
+"RTN","C0CVA200",95,0)
+  ; 1st piece returned by $$SITE^VASITE, which gets the system institution
+"RTN","C0CVA200",96,0)
+  N INST S INST=$P($$SITE^VASITE(),U)
+"RTN","C0CVA200",97,0)
+  ;
+"RTN","C0CVA200",98,0)
+  ; Second, get mailing address
+"RTN","C0CVA200",99,0)
+  ; There are two APIs to get the address, one for physical and one for
+"RTN","C0CVA200",100,0)
+  ; mailing. We will check if mailing exists first, since that's the
+"RTN","C0CVA200",101,0)
+  ; one we want to use; then check for physical. If neither exists,
+"RTN","C0CVA200",102,0)
+  ; then we return nothing. We check for the existence of an address
+"RTN","C0CVA200",103,0)
+  ; by the length of the returned string.
+"RTN","C0CVA200",104,0)
+  ; NOTE: API doesn't support Address 2, so I won't even include it
+"RTN","C0CVA200",105,0)
+  ; in the template.
+"RTN","C0CVA200",106,0)
+  N ADD
+"RTN","C0CVA200",107,0)
+  S ADD=$$MADD^XUAF4(INST) ; mailing address
+"RTN","C0CVA200",108,0)
+  Q:$L(ADD) $P(ADD,U)
+"RTN","C0CVA200",109,0)
+  S ADD=$$PADD^XUAF4(INST) ; physical address
+"RTN","C0CVA200",110,0)
+  Q:$L(ADD) $P(ADD,U)
+"RTN","C0CVA200",111,0)
+  Q ""
+"RTN","C0CVA200",112,0)
+  ;
+"RTN","C0CVA200",113,0)
+CITY(ADUZ) ; Get City for Institution. PUBLIC; EXTRINSIC
+"RTN","C0CVA200",114,0)
+    ;GPL CHANGED PARAMETER TO ADUZ TO KEEP $$SITE^VASITE FROM CRASHING 
+"RTN","C0CVA200",115,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",116,0)
+  ; Output: String.
+"RTN","C0CVA200",117,0)
+  ; See ADD1 for comments
+"RTN","C0CVA200",118,0)
+  N INST S INST=$P($$SITE^VASITE(),U)
+"RTN","C0CVA200",119,0)
+  N ADD
+"RTN","C0CVA200",120,0)
+  S ADD=$$MADD^XUAF4(INST) ; mailing address
+"RTN","C0CVA200",121,0)
+  Q:$L(ADD) $P(ADD,U,2)
+"RTN","C0CVA200",122,0)
+  S ADD=$$PADD^XUAF4(INST) ; physical address
+"RTN","C0CVA200",123,0)
+  Q:$L(ADD) $P(ADD,U,2)
+"RTN","C0CVA200",124,0)
+  Q ""
+"RTN","C0CVA200",125,0)
+  ;
+"RTN","C0CVA200",126,0)
+STATE(ADUZ) ; Get State for Institution. PUBLIC; EXTRINSIC
+"RTN","C0CVA200",127,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",128,0)
+  ; Output: String.
+"RTN","C0CVA200",129,0)
+  ; See ADD1 for comments
+"RTN","C0CVA200",130,0)
+  N INST S INST=$P($$SITE^VASITE(),U)
+"RTN","C0CVA200",131,0)
+  N ADD
+"RTN","C0CVA200",132,0)
+  S ADD=$$MADD^XUAF4(INST) ; mailing address
+"RTN","C0CVA200",133,0)
+  Q:$L(ADD) $P(ADD,U,3)
+"RTN","C0CVA200",134,0)
+  S ADD=$$PADD^XUAF4(INST) ; physical address
+"RTN","C0CVA200",135,0)
+  Q:$L(ADD) $P(ADD,U,3)
+"RTN","C0CVA200",136,0)
+  Q ""
+"RTN","C0CVA200",137,0)
+  ;
+"RTN","C0CVA200",138,0)
+POSTCODE(ADUZ) ; Get Postal Code for Institution. PUBLIC; EXTRINSIC
+"RTN","C0CVA200",139,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",140,0)
+  ; OUTPUT: String.
+"RTN","C0CVA200",141,0)
+  ; See ADD1 for comments
+"RTN","C0CVA200",142,0)
+  N INST S INST=$P($$SITE^VASITE(),U)
+"RTN","C0CVA200",143,0)
+  N ADD
+"RTN","C0CVA200",144,0)
+  S ADD=$$MADD^XUAF4(INST) ; mailing address
+"RTN","C0CVA200",145,0)
+  Q:$L(ADD) $P(ADD,U,4)
+"RTN","C0CVA200",146,0)
+  S ADD=$$PADD^XUAF4(INST) ; physical address
+"RTN","C0CVA200",147,0)
+  Q:$L(ADD) $P(ADD,U,4)
+"RTN","C0CVA200",148,0)
+  Q ""
+"RTN","C0CVA200",149,0)
+  ;
+"RTN","C0CVA200",150,0)
+TEL(DUZ) ; Get Office Phone number. PUBLIC; EXTRINSIC
+"RTN","C0CVA200",151,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",152,0)
+  ; OUTPUT: String.
+"RTN","C0CVA200",153,0)
+  ; Direct global access
+"RTN","C0CVA200",154,0)
+  N TEL S TEL=$G(^VA(200,DUZ,.13))
+"RTN","C0CVA200",155,0)
+  Q $P(TEL,U,2)
+"RTN","C0CVA200",156,0)
+  ;
+"RTN","C0CVA200",157,0)
+TELTYPE(DUZ) ; Get Telephone Type. PUBLIC; EXTRINSIC
+"RTN","C0CVA200",158,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",159,0)
+  ; OUTPUT: String.
+"RTN","C0CVA200",160,0)
+  Q "Office"
+"RTN","C0CVA200",161,0)
+  ;
+"RTN","C0CVA200",162,0)
+EMAIL(DUZ) ; Get Provider's Email. PUBLIC; EXTRINSIC
+"RTN","C0CVA200",163,0)
+  ; INPUT: DUZ ByVal
+"RTN","C0CVA200",164,0)
+  ; OUTPUT: String
+"RTN","C0CVA200",165,0)
+  ; Direct global access
+"RTN","C0CVA200",166,0)
+  N EMAIL S EMAIL=$G(^VA(200,DUZ,.15))
+"RTN","C0CVA200",167,0)
+  Q $P(EMAIL,U)
+"RTN","C0CVA200",168,0)
+  ;
+"RTN","C0CVIT2")
+0^66^B320700684
+"RTN","C0CVIT2",1,0)
+C0CVIT2 ; CCDCCR/CJE/GPL - CCR/CCD PROCESSING FOR VITALS ; 07/16/08
+"RTN","C0CVIT2",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CVIT2",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota and others.
+"RTN","C0CVIT2",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CVIT2",5,0)
+ ;See attached copy of the License.
+"RTN","C0CVIT2",6,0)
+ ;
+"RTN","C0CVIT2",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CVIT2",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CVIT2",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CVIT2",10,0)
+ ;(at your option) any later version.
+"RTN","C0CVIT2",11,0)
+ ;
+"RTN","C0CVIT2",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CVIT2",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CVIT2",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CVIT2",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CVIT2",16,0)
+ ;
+"RTN","C0CVIT2",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CVIT2",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CVIT2",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CVIT2",20,0)
+ ;
+"RTN","C0CVIT2",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CVIT2",22,0)
+ Q
+"RTN","C0CVIT2",23,0)
+ ;
+"RTN","C0CVIT2",24,0)
+EXTRACT(VITXML,DFN,VITOUT) ; EXTRACT VITAL SIGNS INTO XML TEMPLATE
+"RTN","C0CVIT2",25,0)
+ ; VITXML AND VITOUT ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CVIT2",26,0)
+ ;
+"RTN","C0CVIT2",27,0)
+ ; USE THE FOLLOWING TEMPLATE FOR THE RNF2 ARRAYS
+"RTN","C0CVIT2",28,0)
+ ; THAT GET PASSED TO *GET ROUTINES
+"RTN","C0CVIT2",29,0)
+ ;C0C[NAME]=$NA(^TMP("C0CCCR",$J,DFN,"C0C(NAME))
+"RTN","C0CVIT2",30,0)
+ N C0CVIT
+"RTN","C0CVIT2",31,0)
+ S C0CVIT=$NA(^TMP("C0CCCR",$J,DFN,"C0CVIT"))
+"RTN","C0CVIT2",32,0)
+ ; USE THE FOLLOWING TEMPLATE FOR GETTING/GENERATING THE RNF2 ARRAYS
+"RTN","C0CVIT2",33,0)
+ ; THAT GET INSERTED INTO THE XML TEMPLATE
+"RTN","C0CVIT2",34,0)
+ ; D GET[VISTA/RPMS](DFN,C0CIMM) ; GET VARS
+"RTN","C0CVIT2",35,0)
+ I $$RPMS^C0CUTIL() D GETRPMS(DFN,C0CVIT) ; GET VARS
+"RTN","C0CVIT2",36,0)
+ I ($$VISTA^C0CUTIL())!($$WV^C0CUTIL())!($$OV^C0CUTIL()) D GETVISTA(DFN,C0CVIT)
+"RTN","C0CVIT2",37,0)
+ ; USE THE FOLLOWING TEMPATE FOR MAPPING RNF2 ARRAYS TO XML TEMPLATE
+"RTN","C0CVIT2",38,0)
+ ; D MAP([NAME]XML,C0C[NAME],[NAME]OUT) ;MAP RESULTS FOR PROCEDURES
+"RTN","C0CVIT2",39,0)
+ D MAP(VITXML,C0CVIT,VITOUT) ;MAP RESULTS FOR PROCEDURES
+"RTN","C0CVIT2",40,0)
+ Q
+"RTN","C0CVIT2",41,0)
+ ;
+"RTN","C0CVIT2",42,0)
+GETVISTA(DFN,C0CVIT) ; CALLS VITALS^ORQQVI TO GET VITAL SIGNS. 
+"RTN","C0CVIT2",43,0)
+ ; ERETURNS THEM IN RNF2 ARRAYS PASSED BY NAME
+"RTN","C0CVIT2",44,0)
+ ; C0CVIT: VITAL SIGNS
+"RTN","C0CVIT2",45,0)
+ ; READY TO BE MAPPED TO XML BY MAP^C0CVIT2
+"RTN","C0CVIT2",46,0)
+ ; THESE RETURN ARRAYS ARE NOT INITIALIZED, BUT ARE ADDED TO IF THEY 
+"RTN","C0CVIT2",47,0)
+ ; EXIST.
+"RTN","C0CVIT2",48,0)
+ ;
+"RTN","C0CVIT2",49,0)
+ ; KILL OF ARRAYS IS TAKEN CARE OF IN ^C0CCCR (K ^TMP("C0CCCR",$J))
+"RTN","C0CVIT2",50,0)
+ ;
+"RTN","C0CVIT2",51,0)
+ ; SETUP RPC/API CALL HERE
+"RTN","C0CVIT2",52,0)
+ ; USE START AND END DATES FROM PARAMETERS IF REQUIRED
+"RTN","C0CVIT2",53,0)
+ ;
+"RTN","C0CVIT2",54,0)
+ N VIT,DATA,START,END
+"RTN","C0CVIT2",55,0)
+ ; RPC REQUIRES FM DATES NOT T-* DATES
+"RTN","C0CVIT2",56,0)
+ D DT^DILF(,$$GET^C0CPARMS("VITLIMIT"),.END) ; GET THE LIMIT PARM
+"RTN","C0CVIT2",57,0)
+ D DT^DILF(,$$GET^C0CPARMS("VITSTART"),.START) ; GET START PARM
+"RTN","C0CVIT2",58,0)
+ ; RPC CALL (ORY,DFN,ORSDT,OREDT):
+"RTN","C0CVIT2",59,0)
+ ;ORY: return variable
+"RTN","C0CVIT2",60,0)
+ ;DFN: patient identifier from Patient File [#2]
+"RTN","C0CVIT2",61,0)
+ ;ORSDT: start date/time in Fileman format
+"RTN","C0CVIT2",62,0)
+ ;OREDT: end date/time in Fileman format
+"RTN","C0CVIT2",63,0)
+ ; OUTPUT FORMAT:
+"RTN","C0CVIT2",64,0)
+ ;vital measurement ien^vital type^rate^date/time taken
+"RTN","C0CVIT2",65,0)
+ D VITALS^ORQQVI(.VIT,DFN,START,END) ; RUN QUERY VITALS CALL
+"RTN","C0CVIT2",66,0)
+ I '$D(VIT) S @VITOUT@(0)=0 K VIT Q  ; RETURN NOT FOUND, KILL ARRAY AND QUIT
+"RTN","C0CVIT2",67,0)
+ I $P(VIT(1),U,2)="No vitals found." D  Q  ; signal no vitals and quit
+"RTN","C0CVIT2",68,0)
+ . I $D(VITOUT) S @VITOUT@(0)=0 
+"RTN","C0CVIT2",69,0)
+ . K VIT
+"RTN","C0CVIT2",70,0)
+ ;
+"RTN","C0CVIT2",71,0)
+ ; PREFORM SORT HERE IF NEEDED
+"RTN","C0CVIT2",72,0)
+ ;
+"RTN","C0CVIT2",73,0)
+ ; SORT IS REQUIRED FOR VITAL SIGNS - LATEST VITALS NEED TO BE LISTED FIRST
+"RTN","C0CVIT2",74,0)
+ ; COPIED SORT LOGIC:
+"RTN","C0CVIT2",75,0)
+ N VSORT,VDATES,VCNT ; ARRAY FOR DATE SORTED VITALS INDEX
+"RTN","C0CVIT2",76,0)
+ D VITSORT(.VDATES) ; PULL OUT THE DATES INTO AN ARRAY
+"RTN","C0CVIT2",77,0)
+ S VCNT=$$SORTDT^C0CUTIL(.VSORT,.VDATES,-1) ; PUT VITALS IN REVERSE
+"RTN","C0CVIT2",78,0)
+ ; VSORT IS VITALS IN REVERSE ORDER
+"RTN","C0CVIT2",79,0)
+ ;
+"RTN","C0CVIT2",80,0)
+ ; MAP EACH ROW OF RPC/API TO RNF1 ARRAY
+"RTN","C0CVIT2",81,0)
+ ; RNF1 ARRAY FORMAT:
+"RTN","C0CVIT2",82,0)
+ ; VAR("NAME_OF_RIM_VARIABLE")=VALUE
+"RTN","C0CVIT2",83,0)
+ ;
+"RTN","C0CVIT2",84,0)
+ ; VITAL SIGNS ARE DONE DIFFERENTLY DUE TO THE DIFFERENT TYPES OF VITAL SIGNS
+"RTN","C0CVIT2",85,0)
+ ; THIS LOOP WILL GET EACH ROW, DETERMINE THE TYPE, AND CALL THE RESPECTIVE PROCESSING METHOD
+"RTN","C0CVIT2",86,0)
+ ; THAT WILL DO THE MAPPING TO RNF1 STYLE ARRAYS
+"RTN","C0CVIT2",87,0)
+ N C0CVI,C0CC,ZRNF
+"RTN","C0CVIT2",88,0)
+ ;S C0CVI="" ; INITIALIZE FOR $O
+"RTN","C0CVIT2",89,0)
+ F C0CC=1:1:VSORT(0) S C0CVI=VSORT(C0CC) D  ; FOR EACH VITAL SIGN IN THE LIST
+"RTN","C0CVIT2",90,0)
+ . I DEBUG W VIT(C0CVI),!
+"RTN","C0CVIT2",91,0)
+ . ; FIGURE OUT WHICH TYPE OF VITAL SIGN IT IS (HEIGHT, WEIGHT, BLOOD PRESSURE, TEMPERATURE, RESPIRATION, PULSE, PAIN, OTHER)
+"RTN","C0CVIT2",92,0)
+ . D:$P(VIT(C0CVI),U,3)="HT" HEIGHT1($$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT"),$P(^GMR(120.5,$P(VIT(C0CVI),U,1),0),U,6),$P(VIT(C0CVI),U,3),"in")
+"RTN","C0CVIT2",93,0)
+ . D:$P(VIT(C0CVI),U,3)="WT" WEIGHT1($$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT"),$P(^GMR(120.5,$P(VIT(C0CVI),U,1),0),U,6),$P(VIT(C0CVI),U,3),"lbs")
+"RTN","C0CVIT2",94,0)
+ . D:$P(VIT(C0CVI),U,3)="BP" BP1($$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT"),$P(^GMR(120.5,$P(VIT(C0CVI),U,1),0),U,6),$P(VIT(C0CVI),U,3),"")
+"RTN","C0CVIT2",95,0)
+ . D:$P(VIT(C0CVI),U,3)="T" TMP1($$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT"),$P(^GMR(120.5,$P(VIT(C0CVI),U,1),0),U,6),$P(VIT(C0CVI),U,3),"F")
+"RTN","C0CVIT2",96,0)
+ . D:$P(VIT(C0CVI),U,3)="R" RESP1($$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT"),$P(^GMR(120.5,$P(VIT(C0CVI),U,1),0),U,6),$P(VIT(C0CVI),U,3),"")
+"RTN","C0CVIT2",97,0)
+ . D:$P(VIT(C0CVI),U,3)="P" PULSE1($$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT"),$P(^GMR(120.5,$P(VIT(C0CVI),U,1),0),U,6),$P(VIT(C0CVI),U,3),"")
+"RTN","C0CVIT2",98,0)
+ . D:$P(VIT(C0CVI),U,3)="PN" PAIN1($$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT"),$P(^GMR(120.5,$P(VIT(C0CVI),U,1),0),U,6),$P(VIT(C0CVI),U,3),"")
+"RTN","C0CVIT2",99,0)
+ . D:'$D(ZRNF) OTHER1($$FMDTOUTC^C0CUTIL($P(C0CVI,U,4),"DT"),"OTHER VITAL",$P(^GMR(120.5,$P(VIT(C0CVI),U,1),0),U,6),$P(VIT(C0CVI),U,3),"UNKNOWN") ;IF THE VITAL ISN'T DEFINED IT IS OTHER
+"RTN","C0CVIT2",100,0)
+ . D RNF1TO2^C0CRNF(C0CVIT,"ZRNF") ;ADD THIS ROW TO THE ARRAY
+"RTN","C0CVIT2",101,0)
+ . K ZRNF
+"RTN","C0CVIT2",102,0)
+ ; SAVE RIM VARIABLES SEE C0CRIMA
+"RTN","C0CVIT2",103,0)
+ N ZRIM S ZRIM=$NA(^TMP("C0CRIM","VARS",DFN,"VITALS"))
+"RTN","C0CVIT2",104,0)
+ M @ZRIM=@C0CVIT@("V")
+"RTN","C0CVIT2",105,0)
+ Q
+"RTN","C0CVIT2",106,0)
+ ;
+"RTN","C0CVIT2",107,0)
+GETRPMS(DFN,C0CVIT) ; CALLS QUERY^BEHOVM TO GET VITAL SIGNS. 
+"RTN","C0CVIT2",108,0)
+ ; ERETURNS THEM IN RNF2 ARRAYS PASSED BY NAME
+"RTN","C0CVIT2",109,0)
+ ; C0CVIT: VITAL SIGNS
+"RTN","C0CVIT2",110,0)
+ ; READY TO BE MAPPED TO XML BY MAP^C0CVIT2
+"RTN","C0CVIT2",111,0)
+ ; THESE RETURN ARRAYS ARE NOT INITIALIZED, BUT ARE ADDED TO IF THEY 
+"RTN","C0CVIT2",112,0)
+ ; EXIST.
+"RTN","C0CVIT2",113,0)
+ ;
+"RTN","C0CVIT2",114,0)
+ ; KILL OF ARRAYS IS TAKEN CARE OF IN ^C0CCCR (K ^TMP("C0CCCR",$J))
+"RTN","C0CVIT2",115,0)
+ ;
+"RTN","C0CVIT2",116,0)
+ ; SETUP RPC/API CALL HERE
+"RTN","C0CVIT2",117,0)
+ ; USE START AND END DATES FROM PARAMETERS IF REQUIRED
+"RTN","C0CVIT2",118,0)
+ ;
+"RTN","C0CVIT2",119,0)
+ ; RPMS VITAL RPC ONLY RETURNS LATEST VITAL IN SPECIFIED DATE RANGE NOT ALL VITALS IN DATE RANGE
+"RTN","C0CVIT2",120,0)
+ ; WE NEED TO SETUP THE VARIABLES THE INTERNAL CALL NEEDS TO BYPASS A HARD CODE OF ONE VITAL FOR DATE RANGE
+"RTN","C0CVIT2",121,0)
+ N C0CEDT,C0CSDT,VIT,DATA,START,END
+"RTN","C0CVIT2",122,0)
+ ; RPC REQUIRES FM DATES NOT T-* DATES
+"RTN","C0CVIT2",123,0)
+ D DT^DILF(,$$GET^C0CPARMS("VITLIMIT"),.END) ; GET THE LIMIT PARM
+"RTN","C0CVIT2",124,0)
+ D DT^DILF(,$$GET^C0CPARMS("VITSTART"),.START) ; GET START PARM
+"RTN","C0CVIT2",125,0)
+ ; RPC OUTPUT FORMAT:
+"RTN","C0CVIT2",126,0)
+ ; vfile ien^vital name^vital abbr^date/time taken(FM FORMAT)^value+units (US & metric)
+"RTN","C0CVIT2",127,0)
+ D QUERY^BEHOVM("LISTX") ; RUN QUERY VITALS CALL
+"RTN","C0CVIT2",128,0)
+ I '$D(^TMP("CIAVMRPC",$J)) S @VITOUT@(0)=0 K ^TMP("CIAVMRPC",$J) Q  ; RETURN NOT FOUND, KILL ARRAY AND QUIT
+"RTN","C0CVIT2",129,0)
+ ; MOVE THE ARRAY TO LOCAL VARIABLE
+"RTN","C0CVIT2",130,0)
+ M VIT=^TMP("CIAVMRPC",$J,0)
+"RTN","C0CVIT2",131,0)
+ ; RPC CLEANUP
+"RTN","C0CVIT2",132,0)
+ K ^TMP("CIAVMRPC",$J),VITS,RMAX,START,END,DATA,METRIC,VSTR,VUNT
+"RTN","C0CVIT2",133,0)
+ ;
+"RTN","C0CVIT2",134,0)
+ ; PREFORM SORT HERE IF NEEDED
+"RTN","C0CVIT2",135,0)
+ ;
+"RTN","C0CVIT2",136,0)
+ ; SORT IS REQUIRED FOR VITAL SIGNS - LATEST VITALS NEED TO BE LISTED FIRST
+"RTN","C0CVIT2",137,0)
+ ; COPIED SORT LOGIC:
+"RTN","C0CVIT2",138,0)
+ N VSORT,VDATES,VCNT ; ARRAY FOR DATE SORTED VITALS INDEX
+"RTN","C0CVIT2",139,0)
+ D VITSORT(.VDATES) ; PULL OUT THE DATES INTO AN ARRAY
+"RTN","C0CVIT2",140,0)
+ S VCNT=$$SORTDT^C0CUTIL(.VSORT,.VDATES,-1) ; PUT VITALS IN REVERSE
+"RTN","C0CVIT2",141,0)
+ ; VSORT IS VITALS IN REVERSE ORDER
+"RTN","C0CVIT2",142,0)
+ ;
+"RTN","C0CVIT2",143,0)
+ ; MAP EACH ROW OF RPC/API TO RNF1 ARRAY
+"RTN","C0CVIT2",144,0)
+ ; RNF1 ARRAY FORMAT:
+"RTN","C0CVIT2",145,0)
+ ; VAR("NAME_OF_RIM_VARIABLE")=VALUE
+"RTN","C0CVIT2",146,0)
+ ;
+"RTN","C0CVIT2",147,0)
+ ; VITAL SIGNS ARE DONE DIFFERENTLY DUE TO THE DIFFERENT TYPES OF VITAL SIGNS
+"RTN","C0CVIT2",148,0)
+ ; THIS LOOP WILL GET EACH ROW, DETERMINE THE TYPE, AND CALL THE RESPECTIVE PROCESSING METHOD
+"RTN","C0CVIT2",149,0)
+ ; THAT WILL DO THE MAPPING TO RNF1 STYLE ARRAYS
+"RTN","C0CVIT2",150,0)
+ N C0CVI,C0CC,ZRNF
+"RTN","C0CVIT2",151,0)
+ ;S C0CVI="" ; INITIALIZE FOR $O
+"RTN","C0CVIT2",152,0)
+ F C0CC=1:1:VSORT(0) S C0CVI=VSORT(C0CC) D  ; FOR EACH VITAL SIGN IN THE LIST
+"RTN","C0CVIT2",153,0)
+ . I DEBUG W VIT(C0CVI),!
+"RTN","C0CVIT2",154,0)
+ . ; FIGURE OUT WHICH TYPE OF VITAL SIGN IT IS (HEIGHT, WEIGHT, BLOOD PRESSURE, TEMPERATURE, RESPIRATION, PULSE, PAIN, OTHER)
+"RTN","C0CVIT2",155,0)
+ . D:$P(VIT(C0CVI),U,3)="HT" HEIGHT
+"RTN","C0CVIT2",156,0)
+ . D:$P(VIT(C0CVI),U,3)="WT" WEIGHT
+"RTN","C0CVIT2",157,0)
+ . D:$P(VIT(C0CVI),U,3)="BP" BP
+"RTN","C0CVIT2",158,0)
+ . D:$P(VIT(C0CVI),U,3)="TMP" TMP
+"RTN","C0CVIT2",159,0)
+ . D:$P(VIT(C0CVI),U,3)="RS" RESP
+"RTN","C0CVIT2",160,0)
+ . D:$P(VIT(C0CVI),U,3)="PU" PULSE
+"RTN","C0CVIT2",161,0)
+ . D:$P(VIT(C0CVI),U,3)="PA" PAIN
+"RTN","C0CVIT2",162,0)
+ . D:'$D(ZRNF) OTHER ;IF THE VITAL ISN'T DEFINED IT IS OTHER
+"RTN","C0CVIT2",163,0)
+ . D RNF1TO2^C0CRNF(C0CVIT,"ZRNF") ;ADD THIS ROW TO THE ARRAY
+"RTN","C0CVIT2",164,0)
+ . K ZRNF
+"RTN","C0CVIT2",165,0)
+ ; SAVE RIM VARIABLES SEE C0CRIMA
+"RTN","C0CVIT2",166,0)
+ N ZRIM S ZRIM=$NA(^TMP("C0CRIM","VARS",DFN,"VITALS"))
+"RTN","C0CVIT2",167,0)
+ M @ZRIM=@C0CVIT@("V")
+"RTN","C0CVIT2",168,0)
+ Q
+"RTN","C0CVIT2",169,0)
+ ;
+"RTN","C0CVIT2",170,0)
+HEIGHT 
+"RTN","C0CVIT2",171,0)
+ I DEBUG W "IN VITAL:  HEIGHT",!
+"RTN","C0CVIT2",172,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC ; UNIQUE OBJID
+"RTN","C0CVIT2",173,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",174,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT")
+"RTN","C0CVIT2",175,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"RTN","C0CVIT2",176,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",177,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",178,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",179,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="248327008"
+"RTN","C0CVIT2",180,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",181,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",182,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VIT(C0CVI),U,1),12)),U,4)
+"RTN","C0CVIT2",183,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=$P($P(VIT(C0CVI),U,5)," ",1)
+"RTN","C0CVIT2",184,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=$P($P(VIT(C0CVI),U,5)," ",2)
+"RTN","C0CVIT2",185,0)
+ Q
+"RTN","C0CVIT2",186,0)
+ ;
+"RTN","C0CVIT2",187,0)
+WEIGHT 
+"RTN","C0CVIT2",188,0)
+ I DEBUG W "IN VITAL:  WEIGHT",!
+"RTN","C0CVIT2",189,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",190,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",191,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT")
+"RTN","C0CVIT2",192,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"RTN","C0CVIT2",193,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",194,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",195,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",196,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="107647005"
+"RTN","C0CVIT2",197,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",198,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",199,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VIT(C0CVI),U,1),12)),U,4)
+"RTN","C0CVIT2",200,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=$P($P(VIT(C0CVI),U,5)," ",1)
+"RTN","C0CVIT2",201,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=$P($P(VIT(C0CVI),U,5)," ",2)
+"RTN","C0CVIT2",202,0)
+ Q
+"RTN","C0CVIT2",203,0)
+ ;
+"RTN","C0CVIT2",204,0)
+BP 
+"RTN","C0CVIT2",205,0)
+ I DEBUG W "IN VITAL:  BLOOD PRESSURE",!
+"RTN","C0CVIT2",206,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",207,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",208,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT")
+"RTN","C0CVIT2",209,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"RTN","C0CVIT2",210,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",211,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",212,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",213,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="392570002"
+"RTN","C0CVIT2",214,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",215,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",216,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VIT(C0CVI),U,1),12)),U,4)
+"RTN","C0CVIT2",217,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=$P($P(VIT(C0CVI),U,5)," ",1)
+"RTN","C0CVIT2",218,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=$P($P(VIT(C0CVI),U,5)," ",2)
+"RTN","C0CVIT2",219,0)
+ Q
+"RTN","C0CVIT2",220,0)
+ ;
+"RTN","C0CVIT2",221,0)
+TMP 
+"RTN","C0CVIT2",222,0)
+ I DEBUG W "IN VITAL:  TEMPERATURE",!
+"RTN","C0CVIT2",223,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",224,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",225,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT")
+"RTN","C0CVIT2",226,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"RTN","C0CVIT2",227,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",228,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",229,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",230,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="309646008"
+"RTN","C0CVIT2",231,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",232,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",233,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VIT(C0CVI),U,1),12)),U,4)
+"RTN","C0CVIT2",234,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=$P($P(VIT(C0CVI),U,5)," ",1)
+"RTN","C0CVIT2",235,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=$P($P(VIT(C0CVI),U,5)," ",2)
+"RTN","C0CVIT2",236,0)
+ Q
+"RTN","C0CVIT2",237,0)
+ ;
+"RTN","C0CVIT2",238,0)
+RESP 
+"RTN","C0CVIT2",239,0)
+ I DEBUG W "IN VITAL:  RESPIRATION",!
+"RTN","C0CVIT2",240,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",241,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",242,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT")
+"RTN","C0CVIT2",243,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"RTN","C0CVIT2",244,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",245,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",246,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",247,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="366147009"
+"RTN","C0CVIT2",248,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",249,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",250,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VIT(C0CVI),U,1),12)),U,4)
+"RTN","C0CVIT2",251,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=$P($P(VIT(C0CVI),U,5)," ",1)
+"RTN","C0CVIT2",252,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=$P($P(VIT(C0CVI),U,5)," ",2)
+"RTN","C0CVIT2",253,0)
+ Q
+"RTN","C0CVIT2",254,0)
+ ;
+"RTN","C0CVIT2",255,0)
+PULSE 
+"RTN","C0CVIT2",256,0)
+ I DEBUG W "IN VITAL:  PULSE",!
+"RTN","C0CVIT2",257,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",258,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",259,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT")
+"RTN","C0CVIT2",260,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"RTN","C0CVIT2",261,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",262,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",263,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",264,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="366199006"
+"RTN","C0CVIT2",265,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",266,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",267,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VIT(C0CVI),U,1),12)),U,4)
+"RTN","C0CVIT2",268,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=$P($P(VIT(C0CVI),U,5)," ",1)
+"RTN","C0CVIT2",269,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=$P($P(VIT(C0CVI),U,5)," ",2)
+"RTN","C0CVIT2",270,0)
+ Q
+"RTN","C0CVIT2",271,0)
+ ;
+"RTN","C0CVIT2",272,0)
+PAIN 
+"RTN","C0CVIT2",273,0)
+ I DEBUG W "IN VITAL:  PAIN",!
+"RTN","C0CVIT2",274,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",275,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",276,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT")
+"RTN","C0CVIT2",277,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"RTN","C0CVIT2",278,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",279,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",280,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",281,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="22253000"
+"RTN","C0CVIT2",282,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",283,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",284,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VIT(C0CVI),U,1),12)),U,4)
+"RTN","C0CVIT2",285,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=$P($P(VIT(C0CVI),U,5)," ",1)
+"RTN","C0CVIT2",286,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=$P($P(VIT(C0CVI),U,5)," ",2)
+"RTN","C0CVIT2",287,0)
+ Q
+"RTN","C0CVIT2",288,0)
+ ;
+"RTN","C0CVIT2",289,0)
+OTHER 
+"RTN","C0CVIT2",290,0)
+ I DEBUG W "IN VITAL:  OTHER",!
+"RTN","C0CVIT2",291,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",292,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",293,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VIT(C0CVI),U,4),"DT")
+"RTN","C0CVIT2",294,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")=$P(VIT(C0CVI),U,2)
+"RTN","C0CVIT2",295,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",296,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",297,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",298,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")=""
+"RTN","C0CVIT2",299,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")=""
+"RTN","C0CVIT2",300,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",301,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VIT(C0CVI),U,1),12)),U,4)
+"RTN","C0CVIT2",302,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=$P($P(VIT(C0CVI),U,5)," ",1)
+"RTN","C0CVIT2",303,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=$P($P(VIT(C0CVI),U,5)," ",2)
+"RTN","C0CVIT2",304,0)
+ Q
+"RTN","C0CVIT2",305,0)
+ ;
+"RTN","C0CVIT2",306,0)
+ ;TEMPORARY, THINKING ON HOW TO REFACTOR (CJE)
+"RTN","C0CVIT2",307,0)
+HEIGHT1(DT,ACTOR,VALUE,UNIT) 
+"RTN","C0CVIT2",308,0)
+ I DEBUG W "IN VITAL:  HEIGHT",!
+"RTN","C0CVIT2",309,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC ; UNIQUE OBJID
+"RTN","C0CVIT2",310,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",311,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=DT
+"RTN","C0CVIT2",312,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"RTN","C0CVIT2",313,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",314,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",315,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",316,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="248327008"
+"RTN","C0CVIT2",317,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",318,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",319,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_ACTOR
+"RTN","C0CVIT2",320,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=VALUE
+"RTN","C0CVIT2",321,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=UNIT
+"RTN","C0CVIT2",322,0)
+ Q
+"RTN","C0CVIT2",323,0)
+ ;
+"RTN","C0CVIT2",324,0)
+WEIGHT1(DT,ACTOR,VALUE,UNIT) 
+"RTN","C0CVIT2",325,0)
+ I DEBUG W "IN VITAL:  WEIGHT",!
+"RTN","C0CVIT2",326,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",327,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",328,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=DT
+"RTN","C0CVIT2",329,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"RTN","C0CVIT2",330,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",331,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",332,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",333,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="107647005"
+"RTN","C0CVIT2",334,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",335,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",336,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_ACTOR
+"RTN","C0CVIT2",337,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=VALUE
+"RTN","C0CVIT2",338,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=UNIT
+"RTN","C0CVIT2",339,0)
+ Q
+"RTN","C0CVIT2",340,0)
+ ;
+"RTN","C0CVIT2",341,0)
+BP1(DT,ACTOR,VALUE,UNIT) 
+"RTN","C0CVIT2",342,0)
+ I DEBUG W "IN VITAL:  BLOOD PRESSURE",!
+"RTN","C0CVIT2",343,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",344,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",345,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=DT
+"RTN","C0CVIT2",346,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"RTN","C0CVIT2",347,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",348,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",349,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",350,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="392570002"
+"RTN","C0CVIT2",351,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",352,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",353,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_ACTOR
+"RTN","C0CVIT2",354,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=VALUE
+"RTN","C0CVIT2",355,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=UNIT
+"RTN","C0CVIT2",356,0)
+ Q
+"RTN","C0CVIT2",357,0)
+ ;
+"RTN","C0CVIT2",358,0)
+TMP1(DT,ACTOR,VALUE,UNIT) 
+"RTN","C0CVIT2",359,0)
+ I DEBUG W "IN VITAL:  TEMPERATURE",!
+"RTN","C0CVIT2",360,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",361,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",362,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=DT
+"RTN","C0CVIT2",363,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"RTN","C0CVIT2",364,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",365,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",366,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",367,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="309646008"
+"RTN","C0CVIT2",368,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",369,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",370,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_ACTOR
+"RTN","C0CVIT2",371,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=VALUE
+"RTN","C0CVIT2",372,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=UNIT
+"RTN","C0CVIT2",373,0)
+ Q
+"RTN","C0CVIT2",374,0)
+ ;
+"RTN","C0CVIT2",375,0)
+RESP1(DT,ACTOR,VALUE,UNIT) 
+"RTN","C0CVIT2",376,0)
+ I DEBUG W "IN VITAL:  RESPIRATION",!
+"RTN","C0CVIT2",377,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",378,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",379,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=DT
+"RTN","C0CVIT2",380,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"RTN","C0CVIT2",381,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",382,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",383,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",384,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="366147009"
+"RTN","C0CVIT2",385,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",386,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",387,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_ACTOR
+"RTN","C0CVIT2",388,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=VALUE
+"RTN","C0CVIT2",389,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=UNIT
+"RTN","C0CVIT2",390,0)
+ Q
+"RTN","C0CVIT2",391,0)
+ ;
+"RTN","C0CVIT2",392,0)
+PULSE1(DT,ACTOR,VALUE,UNIT) 
+"RTN","C0CVIT2",393,0)
+ I DEBUG W "IN VITAL:  PULSE",!
+"RTN","C0CVIT2",394,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",395,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",396,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=DT
+"RTN","C0CVIT2",397,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"RTN","C0CVIT2",398,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",399,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",400,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",401,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="366199006"
+"RTN","C0CVIT2",402,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",403,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",404,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_ACTOR
+"RTN","C0CVIT2",405,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=VALUE
+"RTN","C0CVIT2",406,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=UNIT
+"RTN","C0CVIT2",407,0)
+ Q
+"RTN","C0CVIT2",408,0)
+ ;
+"RTN","C0CVIT2",409,0)
+PAIN1(DT,ACTOR,VALUE,UNIT) 
+"RTN","C0CVIT2",410,0)
+ I DEBUG W "IN VITAL:  PAIN",!
+"RTN","C0CVIT2",411,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",412,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",413,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=DT
+"RTN","C0CVIT2",414,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"RTN","C0CVIT2",415,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",416,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",417,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",418,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")="22253000"
+"RTN","C0CVIT2",419,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVIT2",420,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",421,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_ACTOR
+"RTN","C0CVIT2",422,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=VALUE
+"RTN","C0CVIT2",423,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=UNIT
+"RTN","C0CVIT2",424,0)
+ Q
+"RTN","C0CVIT2",425,0)
+ ;
+"RTN","C0CVIT2",426,0)
+OTHER1(DT,TEXT,ACTOR,VALUE,UNIT) 
+"RTN","C0CVIT2",427,0)
+ I DEBUG W "IN VITAL:  OTHER",!
+"RTN","C0CVIT2",428,0)
+ S ZRNF("VITALSIGNSDATAOBJECTID")="VITAL"_C0CC
+"RTN","C0CVIT2",429,0)
+ S ZRNF("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",430,0)
+ S ZRNF("VITALSIGNSEXACTDATETIME")=DT
+"RTN","C0CVIT2",431,0)
+ S ZRNF("VITALSIGNSDESCRIPTIONTEXT")=TEXT
+"RTN","C0CVIT2",432,0)
+ S ZRNF("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVIT2",433,0)
+ S ZRNF("VITALSIGNSTESTOBJECTID")="VITALTEST"_C0CC
+"RTN","C0CVIT2",434,0)
+ S ZRNF("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVIT2",435,0)
+ S ZRNF("VITALSIGNSDESCCODEVALUE")=""
+"RTN","C0CVIT2",436,0)
+ S ZRNF("VITALSIGNSDESCCODINGSYSTEM")=""
+"RTN","C0CVIT2",437,0)
+ S ZRNF("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVIT2",438,0)
+ S ZRNF("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_ACTOR
+"RTN","C0CVIT2",439,0)
+ S ZRNF("VITALSIGNSTESTRESULTVALUE")=VALUE
+"RTN","C0CVIT2",440,0)
+ S ZRNF("VITALSIGNSTESTRESULTUNIT")=UNIT
+"RTN","C0CVIT2",441,0)
+ Q
+"RTN","C0CVIT2",442,0)
+ ;
+"RTN","C0CVIT2",443,0)
+VITSORT(VDT) ; RUN DATE SORTING ALGORITHM
+"RTN","C0CVIT2",444,0)
+ ; VDT IS PASSED BY REFERENCE AND WILL CONTAIN THE ARRAY
+"RTN","C0CVIT2",445,0)
+ ; OF DATES IN THE VITALS RESULTS
+"RTN","C0CVIT2",446,0)
+ N VDTI,VDTJ,VTDCNT
+"RTN","C0CVIT2",447,0)
+ S VTDCNT=0 ; COUNT TO BUILD ARRAY
+"RTN","C0CVIT2",448,0)
+ S VDTJ="" ; USED TO VISIT THE RESULTS
+"RTN","C0CVIT2",449,0)
+ F VDTI=0:0 D  Q:$O(VIT(VDTJ))=""  ; VISIT ALL RESULTS
+"RTN","C0CVIT2",450,0)
+ . S VDTJ=$O(VIT(VDTJ)) ; NEXT RESULT
+"RTN","C0CVIT2",451,0)
+ . S VTDCNT=VTDCNT+1 ; INCREMENT COUNTER
+"RTN","C0CVIT2",452,0)
+ . S VDT(VTDCNT)=$P(VIT(VDTJ),U,4) ; PULL OUT THE DATE
+"RTN","C0CVIT2",453,0)
+ S VDT(0)=VTDCNT
+"RTN","C0CVIT2",454,0)
+ Q
+"RTN","C0CVIT2",455,0)
+ ;
+"RTN","C0CVIT2",456,0)
+MAP(VITXML,C0CVIT,VITOUT) ; MAP VITAL SIGNS XML 
+"RTN","C0CVIT2",457,0)
+ ;
+"RTN","C0CVIT2",458,0)
+ N ZTEMP S ZTEMP=$NA(^TMP("C0CCCR",$J,DFN,"VITTEMP")) ;WORK AREA FOR TEMPLATE
+"RTN","C0CVIT2",459,0)
+ K @ZTEMP
+"RTN","C0CVIT2",460,0)
+ N ZBLD
+"RTN","C0CVIT2",461,0)
+ S ZBLD=$NA(^TMP("C0CCCR",$J,DFN,"VITBLD")) ; BUILD LIST AREA
+"RTN","C0CVIT2",462,0)
+ D QUEUE^C0CXPATH(ZBLD,VITXML,1,1) ; FIRST LINE
+"RTN","C0CVIT2",463,0)
+ N ZINNER
+"RTN","C0CVIT2",464,0)
+ ; XPATH NEEDS TO MATCH YOUR SECTION
+"RTN","C0CVIT2",465,0)
+ D QUERY^C0CXPATH(VITXML,"//VitalSigns/Result","ZINNER") ;ONE VITAL SIGN
+"RTN","C0CVIT2",466,0)
+ N ZTMP,ZVAR,ZI
+"RTN","C0CVIT2",467,0)
+ S ZI=""
+"RTN","C0CVIT2",468,0)
+ F  S ZI=$O(@C0CVIT@("V",ZI)) Q:ZI=""  D  ;FOR EACH VITAL SIGN
+"RTN","C0CVIT2",469,0)
+ . S ZTMP=$NA(@ZTEMP@(ZI)) ;THIS VITAL SIGN XML
+"RTN","C0CVIT2",470,0)
+ . S ZVAR=$NA(@C0CVIT@("V",ZI)) ;THIS VITAL SIGN VARIABLES
+"RTN","C0CVIT2",471,0)
+ . D MAP^C0CXPATH("ZINNER",ZVAR,ZTMP) ; MAP THE VITAL SIGN
+"RTN","C0CVIT2",472,0)
+ . D QUEUE^C0CXPATH(ZBLD,ZTMP,1,@ZTMP@(0)) ;QUEUE FOR BUILD
+"RTN","C0CVIT2",473,0)
+ D QUEUE^C0CXPATH(ZBLD,VITXML,@VITXML@(0),@VITXML@(0))
+"RTN","C0CVIT2",474,0)
+ N ZZTMP ; IS THIS NEEDED?
+"RTN","C0CVIT2",475,0)
+ D BUILD^C0CXPATH(ZBLD,VITOUT) ;BUILD FINAL XML
+"RTN","C0CVIT2",476,0)
+ K @ZTEMP,@ZBLD
+"RTN","C0CVIT2",477,0)
+ Q
+"RTN","C0CVIT2",478,0)
+ ;  
+"RTN","C0CVITAL")
+0^36^B319933080
+"RTN","C0CVITAL",1,0)
+C0CVITAL ; CCDCCR/CJE/GPL - CCR/CCD PROCESSING FOR VITALS ; 07/16/08
+"RTN","C0CVITAL",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CVITAL",3,0)
+ ;Copyright 2008,2009 George Lilly, University of Minnesota and others.
+"RTN","C0CVITAL",4,0)
+ ;Licensed under the terms of the GNU General Public License.
+"RTN","C0CVITAL",5,0)
+ ;See attached copy of the License.
+"RTN","C0CVITAL",6,0)
+ ;
+"RTN","C0CVITAL",7,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CVITAL",8,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CVITAL",9,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CVITAL",10,0)
+ ;(at your option) any later version.
+"RTN","C0CVITAL",11,0)
+ ;
+"RTN","C0CVITAL",12,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CVITAL",13,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CVITAL",14,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CVITAL",15,0)
+ ;GNU General Public License for more details.
+"RTN","C0CVITAL",16,0)
+ ;
+"RTN","C0CVITAL",17,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CVITAL",18,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CVITAL",19,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CVITAL",20,0)
+ ;
+"RTN","C0CVITAL",21,0)
+ W "NO ENTRY FROM TOP",!
+"RTN","C0CVITAL",22,0)
+ Q
+"RTN","C0CVITAL",23,0)
+ ;
+"RTN","C0CVITAL",24,0)
+EXTRACT(VITXML,DFN,VITOUTXML) ; EXTRACT VITALS INTO PROVIDED XML TEMPLATE
+"RTN","C0CVITAL",25,0)
+ ;
+"RTN","C0CVITAL",26,0)
+ ; VITXML AND OUTXML ARE PASSED BY NAME SO GLOBALS CAN BE USED
+"RTN","C0CVITAL",27,0)
+ ; IVITXML CONTAINS ONLY THE VITALS SECTION OF THE OVERALL TEMPLATE
+"RTN","C0CVITAL",28,0)
+ ;
+"RTN","C0CVITAL",29,0)
+ N VITRSLT,J,K,VITPTMP,X,VITVMAP,TBUF,VORDR
+"RTN","C0CVITAL",30,0)
+ S C0CVLMT=$$GET^C0CPARMS("VITLIMIT") ; GET THE LIMIT PARM
+"RTN","C0CVITAL",31,0)
+ S C0CVSTRT=$$GET^C0CPARMS("VITSTART") ; GET START PARM
+"RTN","C0CVITAL",32,0)
+ D DT^DILF(,C0CVLMT,.C0CEDT) ;
+"RTN","C0CVITAL",33,0)
+ D DT^DILF(,C0CVSTRT,.C0CSDT) ; 
+"RTN","C0CVITAL",34,0)
+ ;D DT^DILF(,C0CVLMT,.C0CSDT) ; GPL TESTING
+"RTN","C0CVITAL",35,0)
+ ;D DT^DILF(,C0CVSTRT,.C0CEDT) ; 
+"RTN","C0CVITAL",36,0)
+ W "VITALS START: ",C0CVSTRT," LIMIT: ",C0CVLMT,!
+"RTN","C0CVITAL",37,0)
+ I $$RPMS^C0CUTIL() D VITRPMS QUIT
+"RTN","C0CVITAL",38,0)
+ I ($$VISTA^C0CUTIL())!($$WV^C0CUTIL())!($$OV^C0CUTIL()) D VITVISTA QUIT
+"RTN","C0CVITAL",39,0)
+ ;I $$SYSNAME^C0CSYS()="RPMS" D VITRPMS
+"RTN","C0CVITAL",40,0)
+ ;E  D VITVISTA
+"RTN","C0CVITAL",41,0)
+ Q
+"RTN","C0CVITAL",42,0)
+ ;
+"RTN","C0CVITAL",43,0)
+VITVISTA ; EXTRACT VITALS FROM VISTA INTO PROVIDED XML TEMPLATE
+"RTN","C0CVITAL",44,0)
+ D FASTVIT^ORQQVI(.VITRSLT,DFN,C0CEDT,C0CSDT) ; GPL THIS ONE WORKS FOR AT
+"RTN","C0CVITAL",45,0)
+ ; LEAST ONE SET OF VITALS - TO DO, CALL IT REPETIVELY TO GET EARLIER VITALS
+"RTN","C0CVITAL",46,0)
+ ;D VITALS^ORQQVI(.VITRSLT,DFN,C0CEDT,C0CSDT)
+"RTN","C0CVITAL",47,0)
+ ;D VITALS^ORQQVI(.VITRSLT,DFN,C0CSDT,C0CEDT)
+"RTN","C0CVITAL",48,0)
+ ;D VITALS^ORQQVI(.VITRSLT,DFN,C0CVSTRT,C0CVLMT) ; GPL LET GMR HANDLE THE DATES
+"RTN","C0CVITAL",49,0)
+ I '$D(VITRSLT(1)) S @VITOUTXML@(0)=0 Q  ; RETURN NOT FOUND AND QUIT
+"RTN","C0CVITAL",50,0)
+ I $P(VITRSLT(1),U,2)="No vitals found." D  Q  ; NULL RESULT FROM RPC
+"RTN","C0CVITAL",51,0)
+ . I DEBUG W "NO VITALS FOUND FROM VITALS RPC",!
+"RTN","C0CVITAL",52,0)
+ . S @VITOUTXML@(0)=0
+"RTN","C0CVITAL",53,0)
+ I $P(VITRSLT(1),U,2)="No vitals found." Q  ; QUIT
+"RTN","C0CVITAL",54,0)
+ ; ZWR RPCRSLT
+"RTN","C0CVITAL",55,0)
+ S VITTVMAP=$NA(^TMP("C0CCCR",$J,"VITALS"))
+"RTN","C0CVITAL",56,0)
+ S VITTARYTMP=$NA(^TMP("C0CCCR",$J,"VITALARYTMP"))
+"RTN","C0CVITAL",57,0)
+ K @VITTVMAP,@VITTARYTMP ; KILL OLD ARRAY VALUES
+"RTN","C0CVITAL",58,0)
+ N VSORT,VDATES,VCNT ; ARRAY FOR DATE SORTED VITALS INDEX
+"RTN","C0CVITAL",59,0)
+ D VITDVISTA(.VDATES) ; PULL OUT THE DATES INTO AN ARRAY
+"RTN","C0CVITAL",60,0)
+ I DEBUG ZWR VDATES ;DEBUG
+"RTN","C0CVITAL",61,0)
+ S VCNT=$$SORTDT^C0CUTIL(.VSORT,.VDATES,-1) ; PUT VITALS IN REVERSE
+"RTN","C0CVITAL",62,0)
+ ; DATE ORDER AND COUNT THEM. VSORT CONTAINS INDIRECT INDEXES ONLY
+"RTN","C0CVITAL",63,0)
+ S @VITTVMAP@(0)=VCNT ; SAVE NUMBER OF VITALS
+"RTN","C0CVITAL",64,0)
+ F J=1:1:VCNT  D  ; FOR EACH VITAL IN THE LIST
+"RTN","C0CVITAL",65,0)
+ . I $D(VITRSLT(VSORT(J))) D
+"RTN","C0CVITAL",66,0)
+ . . S VITVMAP=$NA(@VITTVMAP@(J))
+"RTN","C0CVITAL",67,0)
+ . . K @VITVMAP
+"RTN","C0CVITAL",68,0)
+ . . I DEBUG W "VMAP= ",VITVMAP,!
+"RTN","C0CVITAL",69,0)
+ . . S VITPTMP=VITRSLT(VSORT(J)) ; DATE SORTED VITAL FROM RETURN ARRAY
+"RTN","C0CVITAL",70,0)
+ . . I DEBUG W "VITAL ",VSORT(J),!
+"RTN","C0CVITAL",71,0)
+ . . I DEBUG W VITRSLT(VSORT(J))," ",$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT"),!
+"RTN","C0CVITAL",72,0)
+ . . I DEBUG W $P(VITPTMP,U,4),!
+"RTN","C0CVITAL",73,0)
+ . . S @VITVMAP@("VITALSIGNSDATAOBJECTID")="VITAL"_J ; UNIQUE OBJID
+"RTN","C0CVITAL",74,0)
+        . . ;B  ;gpl
+"RTN","C0CVITAL",75,0)
+        . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^GMR(120.5,$P(VITPTMP,U,1),0)),U,6)
+"RTN","C0CVITAL",76,0)
+        . . I @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_" D  ;
+"RTN","C0CVITAL",77,0)
+        . . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",78,0)
+ . . I $P(VITPTMP,U,2)="HT" D
+"RTN","C0CVITAL",79,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",80,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",81,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"RTN","C0CVITAL",82,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",83,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",84,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",85,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"RTN","C0CVITAL",86,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="248327008"
+"RTN","C0CVITAL",87,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",88,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",89,0)
+ . . . ;S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P(^GMR(120.5,$P(VITPTMP,U,1),0),U,6)
+"RTN","C0CVITAL",90,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P(VITPTMP,U,3)
+"RTN","C0CVITAL",91,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")="in"
+"RTN","C0CVITAL",92,0)
+ . . E  I $P(VITPTMP,U,2)="WT" D
+"RTN","C0CVITAL",93,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",94,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",95,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"RTN","C0CVITAL",96,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",97,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",98,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",99,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"RTN","C0CVITAL",100,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="107647005"
+"RTN","C0CVITAL",101,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",102,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",103,0)
+ . . . ;S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P(^GMR(120.5,$P(VITPTMP,U,1),0),U,6)
+"RTN","C0CVITAL",104,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P(VITPTMP,U,3)
+"RTN","C0CVITAL",105,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")="lbs"
+"RTN","C0CVITAL",106,0)
+ . . E  I $P(VITPTMP,U,2)="BP" D
+"RTN","C0CVITAL",107,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",108,0)
+ . . . ;S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",109,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"RTN","C0CVITAL",110,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",111,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",112,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",113,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"RTN","C0CVITAL",114,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="392570002"
+"RTN","C0CVITAL",115,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",116,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",117,0)
+ . . . ;S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P(^GMR(120.5,$P(VITPTMP,U,1),0),U,6)
+"RTN","C0CVITAL",118,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P(VITPTMP,U,3)
+"RTN","C0CVITAL",119,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=""
+"RTN","C0CVITAL",120,0)
+ . . E  I $P(VITPTMP,U,2)="T" D
+"RTN","C0CVITAL",121,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",122,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",123,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"RTN","C0CVITAL",124,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",125,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",126,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",127,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"RTN","C0CVITAL",128,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="309646008"
+"RTN","C0CVITAL",129,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",130,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",131,0)
+ . . . ;S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P(^GMR(120.5,$P(VITPTMP,U,1),0),U,6)
+"RTN","C0CVITAL",132,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P(VITPTMP,U,3)
+"RTN","C0CVITAL",133,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")="F"
+"RTN","C0CVITAL",134,0)
+ . . E  I $P(VITPTMP,U,2)="R" D
+"RTN","C0CVITAL",135,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",136,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",137,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"RTN","C0CVITAL",138,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",139,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",140,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",141,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"RTN","C0CVITAL",142,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="366147009"
+"RTN","C0CVITAL",143,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",144,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",145,0)
+ . . . ;S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P(^GMR(120.5,$P(VITPTMP,U,1),0),U,6)
+"RTN","C0CVITAL",146,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P(VITPTMP,U,3)
+"RTN","C0CVITAL",147,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=""
+"RTN","C0CVITAL",148,0)
+ . . E  I $P(VITPTMP,U,2)="P" D
+"RTN","C0CVITAL",149,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",150,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",151,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"RTN","C0CVITAL",152,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",153,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",154,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",155,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"RTN","C0CVITAL",156,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="366199006"
+"RTN","C0CVITAL",157,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",158,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",159,0)
+ . . . ;S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P(^GMR(120.5,$P(VITPTMP,U,1),0),U,6)
+"RTN","C0CVITAL",160,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P(VITPTMP,U,3)
+"RTN","C0CVITAL",161,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=""
+"RTN","C0CVITAL",162,0)
+ . . E  I $P(VITPTMP,U,2)="PN" D
+"RTN","C0CVITAL",163,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",164,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",165,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"RTN","C0CVITAL",166,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",167,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",168,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",169,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"RTN","C0CVITAL",170,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="22253000"
+"RTN","C0CVITAL",171,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",172,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",173,0)
+ . . . ;S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P(^GMR(120.5,$P(VITPTMP,U,1),0),U,6)
+"RTN","C0CVITAL",174,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P(VITPTMP,U,3)
+"RTN","C0CVITAL",175,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=""
+"RTN","C0CVITAL",176,0)
+ . . E  I $P(VITPTMP,U,2)="BMI" D
+"RTN","C0CVITAL",177,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",178,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",179,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BMI"
+"RTN","C0CVITAL",180,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",181,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",182,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",183,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BMI"
+"RTN","C0CVITAL",184,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="60621009"
+"RTN","C0CVITAL",185,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",186,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",187,0)
+ . . . ;S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P(^GMR(120.5,$P(VITPTMP,U,1),0),U,6)
+"RTN","C0CVITAL",188,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P(VITPTMP,U,3)
+"RTN","C0CVITAL",189,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=""
+"RTN","C0CVITAL",190,0)
+ . . E  D
+"RTN","C0CVITAL",191,0)
+ . . . ;W "IN VITAL:  OTHER",!
+"RTN","C0CVITAL",192,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",193,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",194,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="OTHER VITAL"
+"RTN","C0CVITAL",195,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",196,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",197,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="UNKNOWN"
+"RTN","C0CVITAL",198,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="OTHER"
+"RTN","C0CVITAL",199,0)
+ . . . ;S @VITVMAP@("VITALSIGNSDESCCODEVALUE")=""
+"RTN","C0CVITAL",200,0)
+ . . . ;S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")=""
+"RTN","C0CVITAL",201,0)
+ . . . ;S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",202,0)
+ . . . ;S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^GMR(120.5,$P(VITPTMP,U,1),0)),U,6)
+"RTN","C0CVITAL",203,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P(VITPTMP,U,3)
+"RTN","C0CVITAL",204,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")="UNKNOWN"
+"RTN","C0CVITAL",205,0)
+        . . I @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_" D  ;
+"RTN","C0CVITAL",206,0)
+        . . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORSYSTEM_1" ;
+"RTN","C0CVITAL",207,0)
+ . . S VITARYTMP=$NA(@VITTARYTMP@(J))
+"RTN","C0CVITAL",208,0)
+ . . K @VITARYTMP
+"RTN","C0CVITAL",209,0)
+ . . D MAP^C0CXPATH(VITXML,VITVMAP,VITARYTMP)
+"RTN","C0CVITAL",210,0)
+ . . I J=1 D  ; FIRST ONE IS JUST A COPY
+"RTN","C0CVITAL",211,0)
+ . . . ; W "FIRST ONE",!
+"RTN","C0CVITAL",212,0)
+ . . . D CP^C0CXPATH(VITARYTMP,VITOUTXML)
+"RTN","C0CVITAL",213,0)
+ . . . I DEBUG W "VITOUTXML ",VITOUTXML,!
+"RTN","C0CVITAL",214,0)
+ . . I J>1 D  ; AFTER THE FIRST, INSERT INNER XML
+"RTN","C0CVITAL",215,0)
+ . . . D INSINNER^C0CXPATH(VITOUTXML,VITARYTMP)
+"RTN","C0CVITAL",216,0)
+ ; ZWR ^TMP($J,"VITALS",*)
+"RTN","C0CVITAL",217,0)
+ ; ZWR ^TMP($J,"VITALARYTMP",*) ; SHOW THE RESULTS
+"RTN","C0CVITAL",218,0)
+ I DEBUG D PARY^C0CXPATH(VITOUTXML)
+"RTN","C0CVITAL",219,0)
+ N VITTMP,I
+"RTN","C0CVITAL",220,0)
+ D MISSING^C0CXPATH(VITOUTXML,"VITTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CVITAL",221,0)
+ I VITTMP(0)>0 D  ; IF THERE ARE MISSING VARS - MARKED AS @@X@@
+"RTN","C0CVITAL",222,0)
+ . W "VITALS MISSING ",!
+"RTN","C0CVITAL",223,0)
+ . F I=1:1:VITTMP(0) W VITTMP(I),!
+"RTN","C0CVITAL",224,0)
+ Q
+"RTN","C0CVITAL",225,0)
+ ;
+"RTN","C0CVITAL",226,0)
+VITRPMS ; EXTRACT VITALS FROM RPMS INTO PROVIDED XML TEMPLATE
+"RTN","C0CVITAL",227,0)
+ ; RPMS VITAL RPC ONLY RETURNS LATEST VITAL IN SPECIFIED DATE RANGE NOT ALL VITALS IN DATE RANGE
+"RTN","C0CVITAL",228,0)
+ ; WE NEED TO SETUP THE VARIABLES THE INTERNAL CALL NEEDS TO BYPASS A HARD CODE OF ONE VITAL FOR DATE RANGE
+"RTN","C0CVITAL",229,0)
+ N END,START,DATA
+"RTN","C0CVITAL",230,0)
+ D DT^DILF("",C0CVLMT,.END)
+"RTN","C0CVITAL",231,0)
+ D DT^DILF("",C0CVSTRT,.START)
+"RTN","C0CVITAL",232,0)
+ ; RPC OUTPUT FORMAT:
+"RTN","C0CVITAL",233,0)
+ ; vfile ien^vital name^vital abbr^date/time taken(FM FORMAT)^value+units (US & metric)
+"RTN","C0CVITAL",234,0)
+ D QUERY^BEHOVM("LISTX") ; RUN QUERY VITALS CALL
+"RTN","C0CVITAL",235,0)
+ I '$D(^TMP("CIAVMRPC",$J)) S @VITOUTXML@(0)=0 Q  ; RETURN NOT FOUND AND QUIT
+"RTN","C0CVITAL",236,0)
+ ;ZW ^TMP("CIAVMRPC",$J)
+"RTN","C0CVITAL",237,0)
+ S VITTVMAP=$NA(^TMP("C0CCCR",$J,"VITALS"))
+"RTN","C0CVITAL",238,0)
+ S VITTARYTMP=$NA(^TMP("C0CCCR",$J,"VITALARYTMP"))
+"RTN","C0CVITAL",239,0)
+ K @VITTVMAP,@VITTARYTMP ; KILL OLD ARRAY VALUES
+"RTN","C0CVITAL",240,0)
+ N VSORT,VDATES,VCNT ; ARRAY FOR DATE SORTED VITALS INDEX
+"RTN","C0CVITAL",241,0)
+ D VITDRPMS(.VDATES) ; PULL OUT THE DATES INTO AN ARRAY
+"RTN","C0CVITAL",242,0)
+ S VCNT=$$SORTDT^C0CUTIL(.VSORT,.VDATES,-1) ; PUT VITALS IN REVERSE
+"RTN","C0CVITAL",243,0)
+ ; DATE ORDER AND COUNT THEM. VSORT CONTAINS INDIRECT INDEXES ONLY
+"RTN","C0CVITAL",244,0)
+ S @VITTVMAP@(0)=VCNT ; SAVE NUMBER OF VITALS
+"RTN","C0CVITAL",245,0)
+ F J=1:1:VCNT  D  ; FOR EACH VITAL IN THE LIST
+"RTN","C0CVITAL",246,0)
+ . I $D(^TMP("CIAVMRPC",$J,0,(VSORT(J)))) D
+"RTN","C0CVITAL",247,0)
+ . . S VITVMAP=$NA(@VITTVMAP@(J))
+"RTN","C0CVITAL",248,0)
+ . . K @VITVMAP
+"RTN","C0CVITAL",249,0)
+ . . I DEBUG W "VMAP= ",VITVMAP,!
+"RTN","C0CVITAL",250,0)
+ . . S VITPTMP=^TMP("CIAVMRPC",$J,0,(VSORT(J))) ; DATE SORTED VITAL FROM RETURN ARRAY
+"RTN","C0CVITAL",251,0)
+ . . I DEBUG W "VITAL ",VSORT(J),!
+"RTN","C0CVITAL",252,0)
+ . . I DEBUG W ^TMP("CIAVMRPC",$J,0,(VSORT(J)))," ",$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT"),!
+"RTN","C0CVITAL",253,0)
+ . . I DEBUG W $P(VITPTMP,U,4),!
+"RTN","C0CVITAL",254,0)
+ . . S @VITVMAP@("VITALSIGNSDATAOBJECTID")="VITAL"_J ; UNIQUE OBJID
+"RTN","C0CVITAL",255,0)
+ . . I $P(VITPTMP,U,3)="HT" D
+"RTN","C0CVITAL",256,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",257,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",258,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"RTN","C0CVITAL",259,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",260,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",261,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",262,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT"
+"RTN","C0CVITAL",263,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="248327008"
+"RTN","C0CVITAL",264,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",265,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",266,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VITPTMP,U,1),12)),U,4)
+"RTN","C0CVITAL",267,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P($P(VITPTMP,U,5)," ",1)
+"RTN","C0CVITAL",268,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=$P($P(VITPTMP,U,5)," ",2)
+"RTN","C0CVITAL",269,0)
+ . . E  I $P(VITPTMP,U,3)="WT" D
+"RTN","C0CVITAL",270,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",271,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",272,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"RTN","C0CVITAL",273,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",274,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",275,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",276,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT"
+"RTN","C0CVITAL",277,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="107647005"
+"RTN","C0CVITAL",278,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",279,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",280,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VITPTMP,U,1),12)),U,4)
+"RTN","C0CVITAL",281,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P($P(VITPTMP,U,5)," ",1)
+"RTN","C0CVITAL",282,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=$P($P(VITPTMP,U,5)," ",2)
+"RTN","C0CVITAL",283,0)
+ . . E  I $P(VITPTMP,U,3)="BP" D
+"RTN","C0CVITAL",284,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",285,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",286,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"RTN","C0CVITAL",287,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",288,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",289,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",290,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE"
+"RTN","C0CVITAL",291,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="392570002"
+"RTN","C0CVITAL",292,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",293,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",294,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VITPTMP,U,1),12)),U,4)
+"RTN","C0CVITAL",295,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P($P(VITPTMP,U,5)," ",1)
+"RTN","C0CVITAL",296,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=$P($P(VITPTMP,U,5)," ",2)
+"RTN","C0CVITAL",297,0)
+ . . E  I $P(VITPTMP,U,3)="TMP" D
+"RTN","C0CVITAL",298,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",299,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",300,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"RTN","C0CVITAL",301,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",302,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",303,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",304,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE"
+"RTN","C0CVITAL",305,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="309646008"
+"RTN","C0CVITAL",306,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",307,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",308,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VITPTMP,U,1),12)),U,4)
+"RTN","C0CVITAL",309,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P($P(VITPTMP,U,5)," ",1)
+"RTN","C0CVITAL",310,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=$P($P(VITPTMP,U,5)," ",2)
+"RTN","C0CVITAL",311,0)
+ . . E  I $P(VITPTMP,U,3)="RS" D
+"RTN","C0CVITAL",312,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",313,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",314,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"RTN","C0CVITAL",315,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",316,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",317,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",318,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION"
+"RTN","C0CVITAL",319,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="366147009"
+"RTN","C0CVITAL",320,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",321,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",322,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VITPTMP,U,1),12)),U,4)
+"RTN","C0CVITAL",323,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P($P(VITPTMP,U,5)," ",1)
+"RTN","C0CVITAL",324,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=$P($P(VITPTMP,U,5)," ",2)
+"RTN","C0CVITAL",325,0)
+ . . E  I $P(VITPTMP,U,3)="PU" D
+"RTN","C0CVITAL",326,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",327,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",328,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"RTN","C0CVITAL",329,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",330,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",331,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",332,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE"
+"RTN","C0CVITAL",333,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="366199006"
+"RTN","C0CVITAL",334,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",335,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",336,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VITPTMP,U,1),12)),U,4)
+"RTN","C0CVITAL",337,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P($P(VITPTMP,U,5)," ",1)
+"RTN","C0CVITAL",338,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=$P($P(VITPTMP,U,5)," ",2)
+"RTN","C0CVITAL",339,0)
+ . . E  I $P(VITPTMP,U,3)="PA" D
+"RTN","C0CVITAL",340,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",341,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",342,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"RTN","C0CVITAL",343,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",344,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",345,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",346,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN"
+"RTN","C0CVITAL",347,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")="22253000"
+"RTN","C0CVITAL",348,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")="SNOMED"
+"RTN","C0CVITAL",349,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",350,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VITPTMP,U,1),12)),U,4)
+"RTN","C0CVITAL",351,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P($P(VITPTMP,U,5)," ",1)
+"RTN","C0CVITAL",352,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=$P($P(VITPTMP,U,5)," ",2)
+"RTN","C0CVITAL",353,0)
+ . . E  D
+"RTN","C0CVITAL",354,0)
+ . . . ;W "IN VITAL:  OTHER",!
+"RTN","C0CVITAL",355,0)
+ . . . S @VITVMAP@("VITALSIGNSDATETIMETYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",356,0)
+ . . . S @VITVMAP@("VITALSIGNSEXACTDATETIME")=$$FMDTOUTC^C0CUTIL($P(VITPTMP,U,4),"DT")
+"RTN","C0CVITAL",357,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")=$P(VITPTMP,U,2)
+"RTN","C0CVITAL",358,0)
+ . . . S @VITVMAP@("VITALSIGNSSOURCEACTORID")="ACTORSYSTEM_1"
+"RTN","C0CVITAL",359,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTOBJECTID")="VITALTEST"_J
+"RTN","C0CVITAL",360,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTTYPETEXT")="OBSERVED"
+"RTN","C0CVITAL",361,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")=$P(VITPTMP,U,2)
+"RTN","C0CVITAL",362,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODEVALUE")=""
+"RTN","C0CVITAL",363,0)
+ . . . S @VITVMAP@("VITALSIGNSDESCCODINGSYSTEM")=""
+"RTN","C0CVITAL",364,0)
+ . . . S @VITVMAP@("VITALSIGNSCODEVERSION")=""
+"RTN","C0CVITAL",365,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTSOURCEACTORID")="ACTORPROVIDER_"_$P($G(^AUPNVMSR($P(VITPTMP,U,1),12)),U,4)
+"RTN","C0CVITAL",366,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTVALUE")=$P($P(VITPTMP,U,5)," ",1)
+"RTN","C0CVITAL",367,0)
+ . . . S @VITVMAP@("VITALSIGNSTESTRESULTUNIT")=$P($P(VITPTMP,U,5)," ",2)
+"RTN","C0CVITAL",368,0)
+ . . S VITARYTMP=$NA(@VITTARYTMP@(J))
+"RTN","C0CVITAL",369,0)
+ . . K @VITARYTMP
+"RTN","C0CVITAL",370,0)
+ . . D MAP^C0CXPATH(VITXML,VITVMAP,VITARYTMP)
+"RTN","C0CVITAL",371,0)
+ . . I J=1 D  ; FIRST ONE IS JUST A COPY
+"RTN","C0CVITAL",372,0)
+ . . . ; W "FIRST ONE",!
+"RTN","C0CVITAL",373,0)
+ . . . D CP^C0CXPATH(VITARYTMP,VITOUTXML)
+"RTN","C0CVITAL",374,0)
+ . . . I DEBUG W "VITOUTXML ",VITOUTXML,!
+"RTN","C0CVITAL",375,0)
+ . . I J>1 D  ; AFTER THE FIRST, INSERT INNER XML
+"RTN","C0CVITAL",376,0)
+ . . . D INSINNER^C0CXPATH(VITOUTXML,VITARYTMP)
+"RTN","C0CVITAL",377,0)
+ ; ZWR ^TMP($J,"VITALS",*)
+"RTN","C0CVITAL",378,0)
+ ; ZWR ^TMP($J,"VITALARYTMP",*) ; SHOW THE RESULTS
+"RTN","C0CVITAL",379,0)
+ I DEBUG D PARY^C0CXPATH(VITOUTXML)
+"RTN","C0CVITAL",380,0)
+ N VITTMP,I
+"RTN","C0CVITAL",381,0)
+ D MISSING^C0CXPATH(VITOUTXML,"VITTMP") ; SEARCH XML FOR MISSING VARS
+"RTN","C0CVITAL",382,0)
+ I VITTMP(0)>0 D  ; IF THERE ARE MISSING VARS - MARKED AS @@X@@
+"RTN","C0CVITAL",383,0)
+ . W "VITALS MISSING ",!
+"RTN","C0CVITAL",384,0)
+ . F I=1:1:VITTMP(0) W VITTMP(I),!
+"RTN","C0CVITAL",385,0)
+ K ^TMP("CIAVMRPC",$J)
+"RTN","C0CVITAL",386,0)
+ Q
+"RTN","C0CVITAL",387,0)
+ ;
+"RTN","C0CVITAL",388,0)
+VITDRPMS(VDT) ; RUN DATE SORTING ALGORITHM FOR RPMS
+"RTN","C0CVITAL",389,0)
+ ; VDT IS PASSED BY REFERENCE AND WILL CONTAIN THE ARRAY
+"RTN","C0CVITAL",390,0)
+ ; OF DATES IN THE VITALS RESULTS
+"RTN","C0CVITAL",391,0)
+ N VDTI,VDTJ,VTDCNT
+"RTN","C0CVITAL",392,0)
+ S VTDCNT=0 ; COUNT TO BUILD ARRAY
+"RTN","C0CVITAL",393,0)
+ S VDTJ="" ; USED TO VISIT THE RESULTS
+"RTN","C0CVITAL",394,0)
+ F VDTI=0:0 D  Q:$O(^TMP("CIAVMRPC",$J,0,VDTJ))=""  ; VISIT ALL RESULTS
+"RTN","C0CVITAL",395,0)
+ . S VDTJ=$O(^TMP("CIAVMRPC",$J,0,VDTJ)) ; NEXT RESULT
+"RTN","C0CVITAL",396,0)
+ . S VTDCNT=VTDCNT+1 ; INCREMENT COUNTER
+"RTN","C0CVITAL",397,0)
+ . S VDT(VTDCNT)=$P(^TMP("CIAVMRPC",$J,0,VDTJ),U,4) ; PULL OUT THE DATE
+"RTN","C0CVITAL",398,0)
+ S VDT(0)=VTDCNT
+"RTN","C0CVITAL",399,0)
+ Q
+"RTN","C0CVITAL",400,0)
+ ;
+"RTN","C0CVITAL",401,0)
+VITDVISTA(VDT) ; RUN DATE SORTING ALGORITHM FOR VISTA
+"RTN","C0CVITAL",402,0)
+ ; VDT IS PASSED BY REFERENCE AND WILL CONTAIN THE ARRAY
+"RTN","C0CVITAL",403,0)
+ ; OF DATES IN THE VITALS RESULTS
+"RTN","C0CVITAL",404,0)
+ N VDTI,VDTJ,VTDCNT
+"RTN","C0CVITAL",405,0)
+ S VTDCNT=0 ; COUNT TO BUILD ARRAY
+"RTN","C0CVITAL",406,0)
+ S VDTJ="" ; USED TO VISIT THE RESULTS
+"RTN","C0CVITAL",407,0)
+ F VDTI=0:0 D  Q:$O(VITRSLT(VDTJ))=""  ; VISIT ALL RESULTS
+"RTN","C0CVITAL",408,0)
+ . S VDTJ=$O(VITRSLT(VDTJ)) ; NEXT RESULT
+"RTN","C0CVITAL",409,0)
+ . S VTDCNT=VTDCNT+1 ; INCREMENT COUNTER
+"RTN","C0CVITAL",410,0)
+ . S VDT(VTDCNT)=$P(VITRSLT(VDTJ),U,4) ; PULL OUT THE DATE
+"RTN","C0CVITAL",411,0)
+ S VDT(0)=VTDCNT
+"RTN","C0CVITAL",412,0)
+ Q
+"RTN","C0CVITAL",413,0)
+ ;
+"RTN","C0CVOBX1")
+0^99^B12947698
+"RTN","C0CVOBX1",1,0)
+LA7VOBX1 ;DALOI/JMC - LAB OBX Segment message builder (CH subscript) cont'd; 04/21/09 ; 5/10/12 5:18pm
+"RTN","C0CVOBX1",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CVOBX1",3,0)
+ ; JMC - mods to check for IHS V LAB file
+"RTN","C0CVOBX1",4,0)
+ ;
+"RTN","C0CVOBX1",5,0)
+CH ; Observation/Result segment for "CH" subscript results.
+"RTN","C0CVOBX1",6,0)
+ ; Called by LA7VOBX
+"RTN","C0CVOBX1",7,0)
+ ;
+"RTN","C0CVOBX1",8,0)
+ N LA76304,LA7ALT,LA7DIV,LA7I,LA7X,LA7Y,X
+"RTN","C0CVOBX1",9,0)
+ ;
+"RTN","C0CVOBX1",10,0)
+ ; "CH" subscript requires a dataname
+"RTN","C0CVOBX1",11,0)
+ I '$G(LRSB) Q
+"RTN","C0CVOBX1",12,0)
+ ;
+"RTN","C0CVOBX1",13,0)
+ ; get result node from LR global.
+"RTN","C0CVOBX1",14,0)
+ S LA76304(0)=$G(^LR(LRDFN,LRSS,LRIDT,0))
+"RTN","C0CVOBX1",15,0)
+ S LA7VAL=$G(^LR(LRDFN,LRSS,LRIDT,LRSB))
+"RTN","C0CVOBX1",16,0)
+ ;
+"RTN","C0CVOBX1",17,0)
+ ; Check if test is OK to send - (O)utput or (B)oth
+"RTN","C0CVOBX1",18,0)
+ S LA7X=$P(LA7VAL,"^",12)
+"RTN","C0CVOBX1",19,0)
+ I LA7X]"","BO"'[LA7X Q
+"RTN","C0CVOBX1",20,0)
+ I LA7X="",'$$OKTOSND^LA7VHLU1(LRSS,LRSB,+$P($P(LA7VAL,"^",3),"!",5)) Q
+"RTN","C0CVOBX1",21,0)
+ ;
+"RTN","C0CVOBX1",22,0)
+ ; If no result NLT or LOINC try to determine from file #60
+"RTN","C0CVOBX1",23,0)
+ S LA7X=$P(LA7VAL,"^",3)
+"RTN","C0CVOBX1",24,0)
+ ; WV check for IHS - NLT/LN codes from V LAB file
+"RTN","C0CVOBX1",25,0)
+ I $D(^AUPNVLAB) D TMPCHK^C0CLA7Q
+"RTN","C0CVOBX1",26,0)
+ ;
+"RTN","C0CVOBX1",27,0)
+ I $P(LA7X,"!",2)=""!($P(LA7X,"!",3)="") S $P(LA7VAL,"^",3)=$$DEFCODE^LA7VHLU5(LRSS,LRSB,LA7X,$P(LA76304(0),"^",5))
+"RTN","C0CVOBX1",28,0)
+ ; No result NLT code - log error
+"RTN","C0CVOBX1",29,0)
+ I $P($P(LA7VAL,"^",3),"!",2)="" D
+"RTN","C0CVOBX1",30,0)
+ . N LA7X
+"RTN","C0CVOBX1",31,0)
+ . S LA7X="["_LRSB_"]"_$$GET1^DID(63.04,LRSB,"","LABEL")
+"RTN","C0CVOBX1",32,0)
+ . D CREATE^LA7LOG(36)
+"RTN","C0CVOBX1",33,0)
+ ;
+"RTN","C0CVOBX1",34,0)
+ ; something missing - No NLT code, etc.
+"RTN","C0CVOBX1",35,0)
+ I LA7VAL="" Q
+"RTN","C0CVOBX1",36,0)
+ ;
+"RTN","C0CVOBX1",37,0)
+ ; Check for missing units/reference ranges
+"RTN","C0CVOBX1",38,0)
+ S LA7X=$P(LA7VAL,"^",5)
+"RTN","C0CVOBX1",39,0)
+ ;
+"RTN","C0CVOBX1",40,0)
+ ; Results missing units, lookup in file #60
+"RTN","C0CVOBX1",41,0)
+ I $P(LA7X,"!",7)="" S $P(LA7X,"!",7)=$P($$REFUNIT^LA7VHLU1(LRSB,$P(LA76304(0),"^",5)),"^",3)
+"RTN","C0CVOBX1",42,0)
+ ;
+"RTN","C0CVOBX1",43,0)
+ ; If results missing reference ranges, use values from file #60.
+"RTN","C0CVOBX1",44,0)
+ I $P(LA7X,"!",2)="",$P(LA7X,"!",3)="",$P(LA7X,"!",11)="",$P(LA7X,"!",12)="" D
+"RTN","C0CVOBX1",45,0)
+ . S LA7Y=$$REFUNIT^LA7VHLU1(LRSB,$P(LA76304(0),"^",5))
+"RTN","C0CVOBX1",46,0)
+ . S $P(LA7X,"!",2)=$P(LA7Y,"^")
+"RTN","C0CVOBX1",47,0)
+ . S $P(LA7X,"!",3)=$P(LA7Y,"^",2)
+"RTN","C0CVOBX1",48,0)
+ . S $P(LA7X,"!",11)=$P(LA7Y,"^",6)
+"RTN","C0CVOBX1",49,0)
+ . S $P(LA7X,"!",12)=$P(LA7Y,"^",7)
+"RTN","C0CVOBX1",50,0)
+ ; Use therapeutic low/high if low/high missing.
+"RTN","C0CVOBX1",51,0)
+ I $P(LA7X,"!",2)="",$P(LA7X,"!",3)="" D
+"RTN","C0CVOBX1",52,0)
+ . S $P(LA7X,"!",2)=$P(LA7X,"!",11)
+"RTN","C0CVOBX1",53,0)
+ . S $P(LA7X,"!",3)=$P(LA7X,"!",12)
+"RTN","C0CVOBX1",54,0)
+ ;
+"RTN","C0CVOBX1",55,0)
+ ; Evaluate low/high reference ranges in case M code in these fields.
+"RTN","C0CVOBX1",56,0)
+ S:$G(SEX)="" SEX="M" S:$G(AGE)="" AGE=99
+"RTN","C0CVOBX1",57,0)
+ F LA7I=2,3 I $E($P(LA7X,"!",LA7I),1,3)="$S(" D
+"RTN","C0CVOBX1",58,0)
+ . S @("X="_$P(LA7X,"!",LA7I))
+"RTN","C0CVOBX1",59,0)
+ . S $P(LA7X,"!",LA7I)=X
+"RTN","C0CVOBX1",60,0)
+ ;
+"RTN","C0CVOBX1",61,0)
+ ; Put units/reference ranges back in variable LA7VAL
+"RTN","C0CVOBX1",62,0)
+ S $P(LA7VAL,"^",5)=LA7X
+"RTN","C0CVOBX1",63,0)
+ ;
+"RTN","C0CVOBX1",64,0)
+ ; Initialize OBX segment
+"RTN","C0CVOBX1",65,0)
+ S LA7OBX(0)="OBX"
+"RTN","C0CVOBX1",66,0)
+ S LA7OBX(1)=$$OBX1^LA7VOBX(.LA7OBXSN)
+"RTN","C0CVOBX1",67,0)
+ ;
+"RTN","C0CVOBX1",68,0)
+ ; Value type
+"RTN","C0CVOBX1",69,0)
+ S LA7OBX(2)=$$OBX2^LA7VOBX(63.04,LRSB)
+"RTN","C0CVOBX1",70,0)
+ ;
+"RTN","C0CVOBX1",71,0)
+ ; Observation identifer
+"RTN","C0CVOBX1",72,0)
+ ; build alternate code based on dataname from file #63 in case it's needed
+"RTN","C0CVOBX1",73,0)
+ S LA7X=$P(LA7VAL,"^",3)
+"RTN","C0CVOBX1",74,0)
+ S LA7ALT="CH"_LRSB_"^"_$$GET1^DID(63.04,LRSB,"","LABEL")_"^"_"99VA63"
+"RTN","C0CVOBX1",75,0)
+ S LA7OBX(3)=$$OBX3^LA7VOBX($P(LA7X,"!",2),$P(LA7X,"!",3),LA7ALT,LA7FS,LA7ECH)
+"RTN","C0CVOBX1",76,0)
+ ;
+"RTN","C0CVOBX1",77,0)
+ ; Test value
+"RTN","C0CVOBX1",78,0)
+ S LA7OBX(5)=$$OBX5^LA7VOBX($P(LA7VAL,"^"),LA7OBX(2),LA7FS,LA7ECH)
+"RTN","C0CVOBX1",79,0)
+ ;
+"RTN","C0CVOBX1",80,0)
+ ; Units - remove leading and trailing spaces
+"RTN","C0CVOBX1",81,0)
+ S LA7X=$P(LA7VAL,"^",5),LA7X=$$TRIM^XLFSTR(LA7X,"LR"," ")
+"RTN","C0CVOBX1",82,0)
+ S LA7OBX(6)=$$OBX6^LA7VOBX($P(LA7X,"!",7),"",LA7FS,LA7ECH)
+"RTN","C0CVOBX1",83,0)
+ ;
+"RTN","C0CVOBX1",84,0)
+ ; Reference range
+"RTN","C0CVOBX1",85,0)
+ S LA7OBX(7)=$$OBX7^LA7VOBX($P(LA7X,"!",2),$P(LA7X,"!",3),LA7FS,LA7ECH)
+"RTN","C0CVOBX1",86,0)
+ ;
+"RTN","C0CVOBX1",87,0)
+ ; Abnormal flags
+"RTN","C0CVOBX1",88,0)
+ S LA7OBX(8)=$$OBX8^LA7VOBX($P(LA7VAL,U,2))
+"RTN","C0CVOBX1",89,0)
+ ;
+"RTN","C0CVOBX1",90,0)
+ ; "P"artial or "F"inal results
+"RTN","C0CVOBX1",91,0)
+ S LA7OBX(11)=$$OBX11^LA7VOBX($S("canccommentpending"[$P(LA7VAL,"^"):$P(LA7VAL,"^"),1:"F"))
+"RTN","C0CVOBX1",92,0)
+ ;
+"RTN","C0CVOBX1",93,0)
+ ; Observation date/time - collection date/time per HL7 standard
+"RTN","C0CVOBX1",94,0)
+ I $P(LA76304(0),"^") S LA7OBX(14)=$$OBX14^LA7VOBX($P(LA76304(0),"^"))
+"RTN","C0CVOBX1",95,0)
+ ;
+"RTN","C0CVOBX1",96,0)
+ S LA7DIV=$P(LA7VAL,"^",9)
+"RTN","C0CVOBX1",97,0)
+ I LA7DIV="",$$DIV4^XUSER(.LA7DIV,$P(LA7VAL,"^",4)) S LA7DIV=$O(LA7DIV(0))
+"RTN","C0CVOBX1",98,0)
+ ;
+"RTN","C0CVOBX1",99,0)
+ ; Facility that performed the testing
+"RTN","C0CVOBX1",100,0)
+ S LA7OBX(15)=$$OBX15^LA7VOBX(LA7DIV,LA7FS,LA7ECH)
+"RTN","C0CVOBX1",101,0)
+ ;
+"RTN","C0CVOBX1",102,0)
+ ; Person that verified the test
+"RTN","C0CVOBX1",103,0)
+ S LA7OBX(16)=$$OBX16^LA7VOBX($P(LA7VAL,"^",4),LA7DIV,LA7FS,LA7ECH)
+"RTN","C0CVOBX1",104,0)
+ ;
+"RTN","C0CVOBX1",105,0)
+ ; Observation method
+"RTN","C0CVOBX1",106,0)
+ S LA7X=$P($P(LA7VAL,"^",3),"!",4)
+"RTN","C0CVOBX1",107,0)
+ I LA7X S LA7OBX(17)=$$OBX17^LA7VOBX(LA7X,LA7FS,LA7ECH)
+"RTN","C0CVOBX1",108,0)
+ ;
+"RTN","C0CVOBX1",109,0)
+ ; Equipment entity identifier
+"RTN","C0CVOBX1",110,0)
+ I $L($P(LA7VAL,"^",11)) S LA7OBX(18)=$$OBX18^LA7VOBX($P(LA7VAL,"^",11),LA7FS,LA7ECH)
+"RTN","C0CVOBX1",111,0)
+ ;
+"RTN","C0CVOBX1",112,0)
+ D BUILDSEG^LA7VHLU(.LA7OBX,.LA7ARRAY,LA7FS)
+"RTN","C0CVOBX1",113,0)
+ ;
+"RTN","C0CVOBX1",114,0)
+ Q
+"RTN","C0CVORU")
+0^100^B58596883
+"RTN","C0CVORU",1,0)
+C0C7VORU ;WV/JMC - Builder of HL7 Lab Results OBR/OBX/NTE based on RPMS V LAB file ;Jun 16, 2009 ; 5/10/12 5:19pm
+"RTN","C0CVORU",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CVORU",3,0)
+ ;
+"RTN","C0CVORU",4,0)
+EN(LA) ; called from C0CVLAB
+"RTN","C0CVORU",5,0)
+ ; variables
+"RTN","C0CVORU",6,0)
+ ; LA("HUID") - Host Unique ID from the local ACCESSION file (#68)
+"RTN","C0CVORU",7,0)
+ ; LA("SITE") - Ordering site IEN in the INSTITUTION file (#4)
+"RTN","C0CVORU",8,0)
+ ; LA("RUID") - Remote sites Unique ID from ACCESSION file (#68)
+"RTN","C0CVORU",9,0)
+ ; LA("ORD") - Free text ordered test name from WKLD CODE file (#64)
+"RTN","C0CVORU",10,0)
+ ; LA("NLT") - National Laboratory test code from WKLD CODE file (#64)
+"RTN","C0CVORU",11,0)
+ ; LA("LRIDT") - Inverse date/time the lab arrival time (accession date/time)
+"RTN","C0CVORU",12,0)
+ ; LA("SUB") - test subscript defined in LABORATORY TEST file (#60)
+"RTN","C0CVORU",13,0)
+ ; LA("LRDFN") - IEN in LAB DATA file (#63)
+"RTN","C0CVORU",14,0)
+ ; LA("ORD"), LA("NLT"), and LA("SUB") are sent for specific lab results.
+"RTN","C0CVORU",15,0)
+ ; LA("AUTO-INST") - Auto-Instrument
+"RTN","C0CVORU",16,0)
+ ;
+"RTN","C0CVORU",17,0)
+ N LA763,LA7NLT,LA7NVAF,LA7X,PRIMARY
+"RTN","C0CVORU",18,0)
+ ;
+"RTN","C0CVORU",19,0)
+ S PRIMARY=$$PRIM^VASITE(DT),LA("AUTO-INST")=""
+"RTN","C0CVORU",20,0)
+ I $G(PRIMARY)'="" D
+"RTN","C0CVORU",21,0)
+ . S PRIMARY=$$SITE^VASITE(DT,PRIMARY)
+"RTN","C0CVORU",22,0)
+ . S PRIMARY=$P(PRIMARY,U,3)
+"RTN","C0CVORU",23,0)
+ . S LA("AUTO-INST")="LA7V HOST "_PRIMARY
+"RTN","C0CVORU",24,0)
+ ;
+"RTN","C0CVORU",25,0)
+ I '$O(^LR(LA("LRDFN"),LA("SUB"),LA("LRIDT"),0)) D  Q
+"RTN","C0CVORU",26,0)
+ . ; need to add error logging when no entry in 63.
+"RTN","C0CVORU",27,0)
+ ;
+"RTN","C0CVORU",28,0)
+ ; Get zeroth node of entry in #63.
+"RTN","C0CVORU",29,0)
+ S LA763(0)=$G(^LR(LA("LRDFN"),LA("SUB"),LA("LRIDT"),0))
+"RTN","C0CVORU",30,0)
+ S LA7NLT=$G(LA("NLT"))
+"RTN","C0CVORU",31,0)
+ ;
+"RTN","C0CVORU",32,0)
+ S LA7NVAF=$$NVAF^LA7VHLU2(+LA("SITE"))
+"RTN","C0CVORU",33,0)
+ S LA7NTESN=0
+"RTN","C0CVORU",34,0)
+ D ORC
+"RTN","C0CVORU",35,0)
+ ;
+"RTN","C0CVORU",36,0)
+ I $G(LA("SUB"))="CH" D CH
+"RTN","C0CVORU",37,0)
+ ;I $G(LA("SUB"))="MI" D MI^LA7VORU1
+"RTN","C0CVORU",38,0)
+ ;I "SPCYEM"[$G(LA("SUB")) D AP^LA7VORU2
+"RTN","C0CVORU",39,0)
+ Q
+"RTN","C0CVORU",40,0)
+ ;
+"RTN","C0CVORU",41,0)
+ ;
+"RTN","C0CVORU",42,0)
+CH ; Build segments for "CH" subscript
+"RTN","C0CVORU",43,0)
+ ;
+"RTN","C0CVORU",44,0)
+ D OBR
+"RTN","C0CVORU",45,0)
+ D NTE
+"RTN","C0CVORU",46,0)
+ S LA7OBXSN=0
+"RTN","C0CVORU",47,0)
+ D OBX
+"RTN","C0CVORU",48,0)
+ ;
+"RTN","C0CVORU",49,0)
+ Q
+"RTN","C0CVORU",50,0)
+ ;
+"RTN","C0CVORU",51,0)
+ ;
+"RTN","C0CVORU",52,0)
+ORC ; Build ORC segment
+"RTN","C0CVORU",53,0)
+ ;
+"RTN","C0CVORU",54,0)
+ N LA763,LA7696,LA7DATA,LA7SM,LA7X,LA7Y,ORC
+"RTN","C0CVORU",55,0)
+ ;
+"RTN","C0CVORU",56,0)
+ S LA763(0)=$G(^LR(LA("LRDFN"),LA("SUB"),LA("LRIDT"),0))
+"RTN","C0CVORU",57,0)
+ ;
+"RTN","C0CVORU",58,0)
+ S ORC(0)="ORC"
+"RTN","C0CVORU",59,0)
+ ;
+"RTN","C0CVORU",60,0)
+ ; Order control
+"RTN","C0CVORU",61,0)
+ S ORC(1)=$$ORC1^LA7VORC("RE")
+"RTN","C0CVORU",62,0)
+ ;
+"RTN","C0CVORU",63,0)
+ ; Remote UID
+"RTN","C0CVORU",64,0)
+ S ORC(2)=$$ORC2^LA7VORC(LA("RUID"),LA7FS,LA7ECH)
+"RTN","C0CVORU",65,0)
+ ;
+"RTN","C0CVORU",66,0)
+ ; Host UID
+"RTN","C0CVORU",67,0)
+ S ORC(3)=$$ORC3^LA7VORC(LA("HUID"),LA7FS,LA7ECH)
+"RTN","C0CVORU",68,0)
+ ;
+"RTN","C0CVORU",69,0)
+ ; Return shipping manifest if found
+"RTN","C0CVORU",70,0)
+ S LA7SM="",LA7696=0
+"RTN","C0CVORU",71,0)
+ I LA("SITE")'="",LA("RUID")'="" S LA7696=$O(^LRO(69.6,"RST",LA("SITE"),LA("RUID"),0))
+"RTN","C0CVORU",72,0)
+ I LA7696 S LA7SM=$P($G(^LRO(69.6,LA7696,0)),U,14)
+"RTN","C0CVORU",73,0)
+ I LA7SM'="" S ORC(4)=$$ORC4^LA7VORC(LA7SM,LA7FS,LA7ECH)
+"RTN","C0CVORU",74,0)
+ ;
+"RTN","C0CVORU",75,0)
+ ; Order status
+"RTN","C0CVORU",76,0)
+ ; DoD/CHCS requires ORC-5 valued otherwise will not process message
+"RTN","C0CVORU",77,0)
+ I LA7NVAF=1 S ORC(5)=$$ORC5^LA7VORC("CM",LA7FS,LA7ECH)
+"RTN","C0CVORU",78,0)
+ ;
+"RTN","C0CVORU",79,0)
+ ; Ordering provider
+"RTN","C0CVORU",80,0)
+ S (LA7X,LA7Y)=""
+"RTN","C0CVORU",81,0)
+ ; "CH" subscript stores requesting provider and requesting div/location.
+"RTN","C0CVORU",82,0)
+ I LA("SUB")="CH" D
+"RTN","C0CVORU",83,0)
+ . N LA7J
+"RTN","C0CVORU",84,0)
+ . S LA7J=$P(LA763(0),"^",13)
+"RTN","C0CVORU",85,0)
+ . I $P(LA7J,";",2)="SC(" S LA7Y=$$GET1^DIQ(44,$P(LA7J,";")_",",3,"I")
+"RTN","C0CVORU",86,0)
+ . I $P(LA7J,";",2)="DIC(4," S LA7Y=$P(LA7J,";")
+"RTN","C0CVORU",87,0)
+ . S LA7X=$P(LA763(0),"^",10)
+"RTN","C0CVORU",88,0)
+ ;
+"RTN","C0CVORU",89,0)
+ ; Other subscripts only store requesting provider
+"RTN","C0CVORU",90,0)
+ I "CYEMMISP"[LA("SUB") S LA7X=$P(LA763(0),"^",7)
+"RTN","C0CVORU",91,0)
+ ; Get default institution from MailMan Site Parameters file
+"RTN","C0CVORU",92,0)
+ I LA7Y="" S LA7Y=$$GET1^DIQ(4.3,"1,",217,"I")
+"RTN","C0CVORU",93,0)
+ S ORC(12)=$$ORC12^LA7VORC(LA7X,LA7Y,LA7FS,LA7ECH)
+"RTN","C0CVORU",94,0)
+ ;
+"RTN","C0CVORU",95,0)
+ ; Entering organization
+"RTN","C0CVORU",96,0)
+ S ORC(17)=$$ORC17^LA7VORC(LA7Y,LA7FS,LA7ECH)
+"RTN","C0CVORU",97,0)
+ ;
+"RTN","C0CVORU",98,0)
+ D BUILDSEG^LA7VHLU(.ORC,.LA7DATA,LA7FS)
+"RTN","C0CVORU",99,0)
+ D FILESEG^LA7VHLU(GBL,.LA7DATA)
+"RTN","C0CVORU",100,0)
+ ;
+"RTN","C0CVORU",101,0)
+ ; Check for flag to only build message but do not file
+"RTN","C0CVORU",102,0)
+ I '$G(LA7NOMSG) D FILE6249^LA7VHLU(LA76249P,.LA7DATA)
+"RTN","C0CVORU",103,0)
+ ;
+"RTN","C0CVORU",104,0)
+ Q
+"RTN","C0CVORU",105,0)
+ ;
+"RTN","C0CVORU",106,0)
+ ;
+"RTN","C0CVORU",107,0)
+OBR ;Observation Request segment for Lab Order
+"RTN","C0CVORU",108,0)
+ ;
+"RTN","C0CVORU",109,0)
+ N LA761,LA762,LA7DATA,LA7PLOBR,LA7X,LA7Y,OBR
+"RTN","C0CVORU",110,0)
+ ;
+"RTN","C0CVORU",111,0)
+ ; Retrieve placer's OBR information stored in #69.6
+"RTN","C0CVORU",112,0)
+ D RETOBR^LA7VHLU(LA("SITE"),LA("RUID"),LA("NLT"),.LA7PLOBR)
+"RTN","C0CVORU",113,0)
+ ;
+"RTN","C0CVORU",114,0)
+ ; Initialize OBR segment
+"RTN","C0CVORU",115,0)
+ S OBR(0)="OBR"
+"RTN","C0CVORU",116,0)
+ S OBR(1)=$$OBR1^LA7VOBR(.LA7OBRSN)
+"RTN","C0CVORU",117,0)
+ ;
+"RTN","C0CVORU",118,0)
+ ; Remote UID
+"RTN","C0CVORU",119,0)
+ S OBR(2)=$$OBR2^LA7VOBR(LA("RUID"),LA7FS,LA7ECH)
+"RTN","C0CVORU",120,0)
+ ;
+"RTN","C0CVORU",121,0)
+ ; Host UID
+"RTN","C0CVORU",122,0)
+ S OBR(3)=$$OBR3^LA7VOBR(LA("HUID"),LA7FS,LA7ECH)
+"RTN","C0CVORU",123,0)
+ ;
+"RTN","C0CVORU",124,0)
+ ; Universal service ID, build from info stored in #69.6
+"RTN","C0CVORU",125,0)
+ S LA7X=""
+"RTN","C0CVORU",126,0)
+ I $G(LA7PLOBR("OBR-4"))'="" S OBR(4)=$$CNVFLD^LA7VHLU3(LA7PLOBR("OBR-4"),LA7PLOBR("ECH"),LA7ECH)
+"RTN","C0CVORU",127,0)
+ E  S OBR(4)=$$OBR4^LA7VOBR(LA7NLT,"",LA7X,LA7FS,LA7ECH)
+"RTN","C0CVORU",128,0)
+ ;
+"RTN","C0CVORU",129,0)
+ ; Collection D/T
+"RTN","C0CVORU",130,0)
+ S OBR(7)=$$OBR7^LA7VOBR($P(LA763(0),U))
+"RTN","C0CVORU",131,0)
+ ;
+"RTN","C0CVORU",132,0)
+ ; Specimen action code
+"RTN","C0CVORU",133,0)
+ ; If no OBR from PENDING ORDER file (#69.6) then assume added test.
+"RTN","C0CVORU",134,0)
+ I $G(LA7INTYP)=10,$G(LA7PLOBR("OBR-4"))="" S OBR(11)=$$OBR11^LA7VOBR("A")
+"RTN","C0CVORU",135,0)
+ ;
+"RTN","C0CVORU",136,0)
+ ; Infection Warning
+"RTN","C0CVORU",137,0)
+ S OBR(12)=$$OBR12^LA7VOBR(LRDFN,LA7FS,LA7ECH)
+"RTN","C0CVORU",138,0)
+ ;
+"RTN","C0CVORU",139,0)
+ ; Lab Arrival Time
+"RTN","C0CVORU",140,0)
+ ; "CH" subscript does not store lab arrival time, use collection time.
+"RTN","C0CVORU",141,0)
+ ; Other subscripts do store lab arrival time (date/time received).
+"RTN","C0CVORU",142,0)
+ I "CYEMMISP"[LA("SUB") S OBR(14)=$$OBR14^LA7VOBR($P(LA763(0),"^",10))
+"RTN","C0CVORU",143,0)
+ I LA("SUB")="CH" S OBR(14)=$$OBR14^LA7VOBR($P(LA763(0),"^"))
+"RTN","C0CVORU",144,0)
+ ;
+"RTN","C0CVORU",145,0)
+ ; Specimen source 
+"RTN","C0CVORU",146,0)
+ S (LA761,LA762)=""
+"RTN","C0CVORU",147,0)
+ I "CHMI"[LA("SUB") D
+"RTN","C0CVORU",148,0)
+ . S LA761=$P(LA763(0),U,5)
+"RTN","C0CVORU",149,0)
+ . I LA761="" D CREATE^LA7LOG(27)
+"RTN","C0CVORU",150,0)
+ . I LA("SUB")="MI" S LA762=$P(LA763(0),U,11)
+"RTN","C0CVORU",151,0)
+ S OBR(15)=$$OBR15^LA7VOBR(LA761,LA762,"",LA7FS,LA7ECH)
+"RTN","C0CVORU",152,0)
+ ;
+"RTN","C0CVORU",153,0)
+ ; Ordering provider
+"RTN","C0CVORU",154,0)
+ S (LA7X,LA7Y)=""
+"RTN","C0CVORU",155,0)
+ ; "CH" subscript stores requesting provider and requesting div/location.
+"RTN","C0CVORU",156,0)
+ I LA("SUB")="CH" D
+"RTN","C0CVORU",157,0)
+ . N LA7J
+"RTN","C0CVORU",158,0)
+ . S LA7J=$P(LA763(0),"^",13)
+"RTN","C0CVORU",159,0)
+ . I $P(LA7J,";",2)="SC(" S LA7Y=$$GET1^DIQ(44,$P(LA7J,";")_",",3,"I")
+"RTN","C0CVORU",160,0)
+ . I $P(LA7J,";",2)="DIC(4," S LA7Y=$P(LA7J,";")
+"RTN","C0CVORU",161,0)
+ . S LA7X=$P(LA763(0),"^",10)
+"RTN","C0CVORU",162,0)
+ ;
+"RTN","C0CVORU",163,0)
+ ; Other subscripts only store requesting provider
+"RTN","C0CVORU",164,0)
+ I "CYEMMISP"[LA("SUB") S LA7X=$P(LA763(0),"^",7)
+"RTN","C0CVORU",165,0)
+ ; Get default institution from MailMan Site Parameters file
+"RTN","C0CVORU",166,0)
+ I LA7Y="" S LA7Y=$$GET1^DIQ(4.3,"1,",217,"I")
+"RTN","C0CVORU",167,0)
+ S OBR(16)=$$ORC12^LA7VORC(LA7X,LA7Y,LA7FS,LA7ECH)
+"RTN","C0CVORU",168,0)
+ ;
+"RTN","C0CVORU",169,0)
+ ; Placer Field #1 (remote auto-inst)
+"RTN","C0CVORU",170,0)
+ ; Build from info stored in #69.6
+"RTN","C0CVORU",171,0)
+ I $G(LA7PLOBR("OBR-18"))'="" D
+"RTN","C0CVORU",172,0)
+ . S OBR(18)=$$CHKDATA^LA7VHLU3(LA7PLOBR("OBR-18"),LA7FS_LA7ECH)
+"RTN","C0CVORU",173,0)
+ ; Else build "auto instrument" if sending to VA facility
+"RTN","C0CVORU",174,0)
+ I $G(LA7PLOBR("OBR-18"))="",'LA7NVAF D
+"RTN","C0CVORU",175,0)
+ . N LA7X
+"RTN","C0CVORU",176,0)
+ . S LA7X(1)=LA("AUTO-INST")
+"RTN","C0CVORU",177,0)
+ . S OBR(18)=$$OBR18^LA7VOBR(.LA7X,LA7FS,LA7ECH)
+"RTN","C0CVORU",178,0)
+ ;
+"RTN","C0CVORU",179,0)
+ ; Placer Field #2
+"RTN","C0CVORU",180,0)
+ I $G(LA7PLOBR("OBR-19"))'="" D
+"RTN","C0CVORU",181,0)
+ . S OBR(19)=$$CHKDATA^LA7VHLU3(LA7PLOBR("OBR-19"),LA7FS_LA7ECH)
+"RTN","C0CVORU",182,0)
+ ; Else build collecting UID if sending to VA facility
+"RTN","C0CVORU",183,0)
+ I $G(LA7PLOBR("OBR-19"))="",'LA7NVAF,LA("RUID")'="" D
+"RTN","C0CVORU",184,0)
+ . K LA7X
+"RTN","C0CVORU",185,0)
+ . S LA7X(7)=LA("RUID")
+"RTN","C0CVORU",186,0)
+ . S OBR(19)=$$OBR19^LA7VOBR(.LA7X,LA7FS,LA7ECH)
+"RTN","C0CVORU",187,0)
+ ;
+"RTN","C0CVORU",188,0)
+ ; Filler Field #1
+"RTN","C0CVORU",189,0)
+ ; Send file #63 ien info - used by HDR to track patient/specimen
+"RTN","C0CVORU",190,0)
+ K LA7X
+"RTN","C0CVORU",191,0)
+ S LA7X(1)=LA("LRDFN")
+"RTN","C0CVORU",192,0)
+ S LA7X(2)=LA("SUB")
+"RTN","C0CVORU",193,0)
+ S LA7X(3)=LA("LRIDT")
+"RTN","C0CVORU",194,0)
+ S OBR(20)=$$OBR20^LA7VOBR(.LA7X,LA7FS,LA7ECH)
+"RTN","C0CVORU",195,0)
+ ;
+"RTN","C0CVORU",196,0)
+ ; Date Report Completed
+"RTN","C0CVORU",197,0)
+ I $P(LA763(0),"^",3) S OBR(22)=$$OBR22^LA7VOBR($P(LA763(0),"^",3))
+"RTN","C0CVORU",198,0)
+ ;
+"RTN","C0CVORU",199,0)
+ ; Diagnostic service id
+"RTN","C0CVORU",200,0)
+ S OBR(24)=$$OBR24^LA7VOBR(LA("SUB")_"^"_$G(LRSB))
+"RTN","C0CVORU",201,0)
+ ;
+"RTN","C0CVORU",202,0)
+ ; Parent Result and Parent
+"RTN","C0CVORU",203,0)
+ I $D(LA7PARNT) D
+"RTN","C0CVORU",204,0)
+ . S OBR(26)=$$OBR26^LA7VOBR(LA7PARNT(1),LA7PARNT(2),LA7PARNT(3),LA7FS,LA7ECH)
+"RTN","C0CVORU",205,0)
+ . S OBR(29)=$$OBR29^LA7VOBR(LA("RUID"),LA("HUID"),LA7FS,LA7ECH)
+"RTN","C0CVORU",206,0)
+ ;
+"RTN","C0CVORU",207,0)
+ ; Principle result interpreter
+"RTN","C0CVORU",208,0)
+ ; Get default institution from MailMan Site Parameters file
+"RTN","C0CVORU",209,0)
+ I "CYEMMISP"[LA("SUB") D
+"RTN","C0CVORU",210,0)
+ . I LA("SUB")="MI" S LA7X=$P(LA763(0),"^",4)
+"RTN","C0CVORU",211,0)
+ . E  S LA7X=$P(LA763(0),"^",2)
+"RTN","C0CVORU",212,0)
+ . S LA7Y=$$GET1^DIQ(4.3,"1,",217,"I")
+"RTN","C0CVORU",213,0)
+ . S OBR(32)=$$OBR32^LA7VOBR(LA7X,LA7Y,LA7FS,LA7ECH)
+"RTN","C0CVORU",214,0)
+ ; 
+"RTN","C0CVORU",215,0)
+ ; Assistant result interpreter
+"RTN","C0CVORU",216,0)
+ ; Get default institution from MailMan Site Parameters file
+"RTN","C0CVORU",217,0)
+ I "EMSP"[LA("SUB") D
+"RTN","C0CVORU",218,0)
+ . S LA7X=$P(LA763(0),"^",4),LA7Y=$$GET1^DIQ(4.3,"1,",217,"I")
+"RTN","C0CVORU",219,0)
+ . S OBR(33)=$$OBR33^LA7VOBR(LA7X,LA7Y,LA7FS,LA7ECH)
+"RTN","C0CVORU",220,0)
+ ; 
+"RTN","C0CVORU",221,0)
+ ; Technician
+"RTN","C0CVORU",222,0)
+ ; Get default institution from MailMan Site Parameters file
+"RTN","C0CVORU",223,0)
+ I "CYEM"[LA("SUB") D
+"RTN","C0CVORU",224,0)
+ . S LA7X=$P(LA763(0),"^",4),LA7Y=$$GET1^DIQ(4.3,"1,",217,"I")
+"RTN","C0CVORU",225,0)
+ . S OBR(34)=$$OBR34^LA7VOBR(LA7X,LA7Y,LA7FS,LA7ECH)
+"RTN","C0CVORU",226,0)
+ ; 
+"RTN","C0CVORU",227,0)
+ ; Typist - VistA stores as free text
+"RTN","C0CVORU",228,0)
+ ; Get default institution from MailMan Site Parameters file
+"RTN","C0CVORU",229,0)
+ I "CYEMSP"[LA("SUB") D
+"RTN","C0CVORU",230,0)
+ . S LA7X=$P(LA763(0),"^",9),LA7Y=$$GET1^DIQ(4.3,"1,",217,"I")
+"RTN","C0CVORU",231,0)
+ . S OBR(35)=$$OBR35^LA7VOBR(LA7X,LA7Y,LA7FS,LA7ECH)
+"RTN","C0CVORU",232,0)
+ ; 
+"RTN","C0CVORU",233,0)
+ D BUILDSEG^LA7VHLU(.OBR,.LA7DATA,LA7FS)
+"RTN","C0CVORU",234,0)
+ D FILESEG^LA7VHLU(GBL,.LA7DATA)
+"RTN","C0CVORU",235,0)
+ ;
+"RTN","C0CVORU",236,0)
+ ; Check for flag to only build message but do not file
+"RTN","C0CVORU",237,0)
+ I '$G(LA7NOMSG) D FILE6249^LA7VHLU(LA76249,.LA7DATA)
+"RTN","C0CVORU",238,0)
+ ;
+"RTN","C0CVORU",239,0)
+ Q
+"RTN","C0CVORU",240,0)
+ ;
+"RTN","C0CVORU",241,0)
+ ;
+"RTN","C0CVORU",242,0)
+OBX ;Observation/Result segment for Lab Results
+"RTN","C0CVORU",243,0)
+ ;
+"RTN","C0CVORU",244,0)
+ N LA7953,LA7DATA,LA7VT,LA7VTIEN,LA7X
+"RTN","C0CVORU",245,0)
+ ;
+"RTN","C0CVORU",246,0)
+ S LA7VTIEN=0
+"RTN","C0CVORU",247,0)
+ F  S LA7VTIEN=$O(^LAHM(62.49,LA(62.49),1,LA7VTIEN)) Q:'LA7VTIEN  D
+"RTN","C0CVORU",248,0)
+ . S LA7VT=$P(^LAHM(62.49,LA(62.49),1,LA7VTIEN,0),"^",1,2)
+"RTN","C0CVORU",249,0)
+ . ; Build OBX segment
+"RTN","C0CVORU",250,0)
+ . K LA7DATA
+"RTN","C0CVORU",251,0)
+ . D OBX^LA7VOBX(LA("LRDFN"),LA("SUB"),LA("LRIDT"),$P(LA7VT,"^",1,2),.LA7DATA,.LA7OBXSN,LA7FS,LA7ECH,$G(LA7NVAF))
+"RTN","C0CVORU",252,0)
+ . ; If OBX failed to build then don't store
+"RTN","C0CVORU",253,0)
+ . I '$D(LA7DATA) Q
+"RTN","C0CVORU",254,0)
+ . ;
+"RTN","C0CVORU",255,0)
+ . D FILESEG^LA7VHLU(GBL,.LA7DATA)
+"RTN","C0CVORU",256,0)
+ . I '$G(LA7NOMSG) D FILE6249^LA7VHLU(LA76249,.LA7DATA)
+"RTN","C0CVORU",257,0)
+ . ;
+"RTN","C0CVORU",258,0)
+ . ; Send performing lab comment and interpretation from file #60
+"RTN","C0CVORU",259,0)
+ . S LA7NTESN=0
+"RTN","C0CVORU",260,0)
+ . I LA7NVAF=1 D PLC^LA7VORUA
+"RTN","C0CVORU",261,0)
+ . D INTRP^LA7VORUA
+"RTN","C0CVORU",262,0)
+ . ;
+"RTN","C0CVORU",263,0)
+ . ; Mark result as sent - set to 1, if corrected results set to 2
+"RTN","C0CVORU",264,0)
+ . I LA("SUB")="CH" D
+"RTN","C0CVORU",265,0)
+ . . I $P(^LR(LA("LRDFN"),LA("SUB"),LA("LRIDT"),$P(LA7VT,"^")),"^",10)>1 Q
+"RTN","C0CVORU",266,0)
+ . . S $P(^LR(LA("LRDFN"),LA("SUB"),LA("LRIDT"),$P(LA7VT,"^")),"^",10)=$S($P(LA7VT,"^",2)="C":2,1:1)
+"RTN","C0CVORU",267,0)
+ ;
+"RTN","C0CVORU",268,0)
+ Q
+"RTN","C0CVORU",269,0)
+ ;
+"RTN","C0CVORU",270,0)
+ ;
+"RTN","C0CVORU",271,0)
+NTE ; Build NTE segment
+"RTN","C0CVORU",272,0)
+ ;
+"RTN","C0CVORU",273,0)
+ D NTE^LA7VORUA
+"RTN","C0CVORU",274,0)
+ Q
+"RTN","C0CXEWD")
+0^101^B15380480
+"RTN","C0CXEWD",1,0)
+C0CXEWD   ; C0C/GPL - EWD based XPath utilities; 10/11/09
+"RTN","C0CXEWD",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CXEWD",3,0)
+ ;Copyright 2009 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CXEWD",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CXEWD",5,0)
+ ;
+"RTN","C0CXEWD",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CXEWD",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CXEWD",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CXEWD",9,0)
+ ;(at your option) any later version.
+"RTN","C0CXEWD",10,0)
+ ;
+"RTN","C0CXEWD",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CXEWD",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CXEWD",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CXEWD",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CXEWD",15,0)
+ ;
+"RTN","C0CXEWD",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CXEWD",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CXEWD",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CXEWD",19,0)
+ ;
+"RTN","C0CXEWD",20,0)
+ Q
+"RTN","C0CXEWD",21,0)
+ ;
+"RTN","C0CXEWD",22,0)
+TEST ;
+"RTN","C0CXEWD",23,0)
+ D XPATH($$FIRST($$ID("CCR1")),"/","GIDX","GARY")
+"RTN","C0CXEWD",24,0)
+ Q
+"RTN","C0CXEWD",25,0)
+ ;
+"RTN","C0CXEWD",26,0)
+TEST2 ;
+"RTN","C0CXEWD",27,0)
+ S REDUX="//soap:Envelope/soap:Body/GetPatientFullMedicationHistory5Response/GetPatientFullMedicationHistory5Result/patientDrugDetail"
+"RTN","C0CXEWD",28,0)
+ D XPATH($$FIRST($$ID("gpl")),"/","GIDX","GARY","",REDUX)
+"RTN","C0CXEWD",29,0)
+ Q
+"RTN","C0CXEWD",30,0)
+ ;
+"RTN","C0CXEWD",31,0)
+XPATH(ZOID,ZPATH,ZXIDX,ZXPARY,ZNUM,ZREDUX) ; RECURSIVE ROUTINE TO POPULATE
+"RTN","C0CXEWD",32,0)
+ ; THE XPATH INDEX ZXIDX, PASSED BY NAME
+"RTN","C0CXEWD",33,0)
+ ; THE XPATH ARRAY XPARY, PASSED BY NAME
+"RTN","C0CXEWD",34,0)
+ ; ZOID IS THE STARTING OID
+"RTN","C0CXEWD",35,0)
+ ; ZPATH IS THE STARTING XPATH, USUALLY "/"
+"RTN","C0CXEWD",36,0)
+ ; ZNUM IS THE MULTIPLE NUMBER [x], USUALLY NULL WHEN ON THE TOP NODE
+"RTN","C0CXEWD",37,0)
+ ; ZREDUX IS THE XPATH REDUCTION STRING, TAKEN OUT OF EACH XPATH IF PRESENT
+"RTN","C0CXEWD",38,0)
+ I '$D(ZREDUX) S ZREDUX=""
+"RTN","C0CXEWD",39,0)
+ N NEWPATH
+"RTN","C0CXEWD",40,0)
+ N NEWNUM S NEWNUM=""
+"RTN","C0CXEWD",41,0)
+ I $G(ZNUM)>0 S NEWNUM="["_ZNUM_"]"
+"RTN","C0CXEWD",42,0)
+ S NEWPATH=ZPATH_"/"_$$TAG(ZOID)_NEWNUM ; CREATE THE XPATH FOR THIS NODE
+"RTN","C0CXEWD",43,0)
+ I $G(ZREDUX)'="" D  ; REDUX PROVIDED?
+"RTN","C0CXEWD",44,0)
+ . N GT S GT=$P(NEWPATH,ZREDUX,2)
+"RTN","C0CXEWD",45,0)
+ . I GT'="" S NEWPATH=GT
+"RTN","C0CXEWD",46,0)
+ S @ZXIDX@(NEWPATH)=ZOID ; ADD THE XPATH FOR THIS NODE TO THE XPATH INDEX
+"RTN","C0CXEWD",47,0)
+ N GD D DATA("GD",ZOID) ; SEE IF THERE IS DATA FOR THIS NODE
+"RTN","C0CXEWD",48,0)
+ I $D(GD(2)) M @ZXPARY@(NEWPATH)=GD ; IF MULITPLE DATA MERGE TO THE ARRAY
+"RTN","C0CXEWD",49,0)
+ E  I $D(GD(1)) S @ZXPARY@(NEWPATH)=GD(1) ; IF SINGLE VALUE, ADD TO ARRAY
+"RTN","C0CXEWD",50,0)
+ I GD'="" S @ZXPARY@(NEWPATH)=GD ; IF YES, ADD IT TO THE XPATH ARRAY
+"RTN","C0CXEWD",51,0)
+ N ZFRST S ZFRST=$$FIRST(ZOID) ; SET FIRST CHILD
+"RTN","C0CXEWD",52,0)
+ I ZFRST'="" D  ; THERE IS A CHILD
+"RTN","C0CXEWD",53,0)
+ . N ZMULT S ZMULT=$$ISMULT(ZFRST) ; IS FIRST CHILD A MULTIPLE
+"RTN","C0CXEWD",54,0)
+ . D XPATH(ZFRST,NEWPATH,ZXIDX,ZXPARY,$S(ZMULT:1,1:""),ZREDUX) ; DO THE CHILD
+"RTN","C0CXEWD",55,0)
+ N GNXT S GNXT=$$NXTSIB(ZOID)
+"RTN","C0CXEWD",56,0)
+ I GNXT'="" D  ; MOVE ON TO THE NEXT SIBLING
+"RTN","C0CXEWD",57,0)
+ . D XPATH(GNXT,ZPATH,ZXIDX,ZXPARY,$S(ZNUM>0:ZNUM+1,1:""),ZREDUX) ; DO NEXT SIB
+"RTN","C0CXEWD",58,0)
+ Q
+"RTN","C0CXEWD",59,0)
+ ;
+"RTN","C0CXEWD",60,0)
+PARSE(INXML,INDOC) ;CALL THE EWD PARSER ON INXML, PASSED BY NAME
+"RTN","C0CXEWD",61,0)
+ ; INDOC IS PASSED AS THE DOCUMENT NAME TO EWD
+"RTN","C0CXEWD",62,0)
+ ; EXTRINSIC WHICH RETURNS THE DOCID ASSIGNED BY EWD
+"RTN","C0CXEWD",63,0)
+ N ZR
+"RTN","C0CXEWD",64,0)
+ M ^CacheTempEWD($j)=@INXML ;
+"RTN","C0CXEWD",65,0)
+ S ZR=$$parseDocument^%zewdHTMLParser(INDOC)
+"RTN","C0CXEWD",66,0)
+ Q ZR
+"RTN","C0CXEWD",67,0)
+ ;
+"RTN","C0CXEWD",68,0)
+ISMULT(ZOID) ; RETURN TRUE IF ZOID IS ONE OF A MULTIPLE
+"RTN","C0CXEWD",69,0)
+ N ZN
+"RTN","C0CXEWD",70,0)
+ S ZN=$$NXTSIB(ZOID)
+"RTN","C0CXEWD",71,0)
+ I ZN'="" Q $$TAG(ZOID)=$$TAG(ZN) ; IF TAG IS THE SAME AS NEXT SIB TAG
+"RTN","C0CXEWD",72,0)
+ Q 0
+"RTN","C0CXEWD",73,0)
+ ;
+"RTN","C0CXEWD",74,0)
+DETAIL(ZRTN,ZOID) ; RETURNS DETAIL FOR NODE ZOID IN ZRTN, PASSED BY NAME
+"RTN","C0CXEWD",75,0)
+ N DET
+"RTN","C0CXEWD",76,0)
+ D getElementDetails^%zewdXPath(ZOID,.DET)
+"RTN","C0CXEWD",77,0)
+ M @ZRTN=DET
+"RTN","C0CXEWD",78,0)
+ Q
+"RTN","C0CXEWD",79,0)
+ ;
+"RTN","C0CXEWD",80,0)
+ID(ZNAME) ;RETURNS THE docOID OF THE DOCUMENT NAMED ZNAME
+"RTN","C0CXEWD",81,0)
+ Q $$getDocumentNode^%zewdDOM(ZNAME)
+"RTN","C0CXEWD",82,0)
+ ;
+"RTN","C0CXEWD",83,0)
+NAME(ZOID) ;RETURNS THE NAME OF THE DOCUMENAT WITH docOID ZOID
+"RTN","C0CXEWD",84,0)
+ Q $$getDocumentName^%zewdDOM(ZOID)
+"RTN","C0CXEWD",85,0)
+ ;
+"RTN","C0CXEWD",86,0)
+FIRST(ZOID) ;RETURNS THE OID OF THE FIRST CHILD OF ZOID
+"RTN","C0CXEWD",87,0)
+ N GOID
+"RTN","C0CXEWD",88,0)
+ S GOID=ZOID
+"RTN","C0CXEWD",89,0)
+ S GOID=$$getFirstChild^%zewdDOM(GOID)
+"RTN","C0CXEWD",90,0)
+ I GOID="" Q ""
+"RTN","C0CXEWD",91,0)
+ I $$getNodeType^%zewdDOM(GOID)'=1 S GOID=$$NXTCHLD(GOID)
+"RTN","C0CXEWD",92,0)
+ Q GOID
+"RTN","C0CXEWD",93,0)
+ ;
+"RTN","C0CXEWD",94,0)
+HASCHILD(ZOID) ; RETURNS TRUE IF ZOID HAS CHILD NODES
+"RTN","C0CXEWD",95,0)
+ Q $$hasChildNodes^%zewdDOM(ZOID)
+"RTN","C0CXEWD",96,0)
+ ;
+"RTN","C0CXEWD",97,0)
+CHILDREN(ZRTN,ZOID) ;RETURNS CHILDREN OF ZOID IN ARRAY ZRTN, PASSED BY NAME
+"RTN","C0CXEWD",98,0)
+ N childArray
+"RTN","C0CXEWD",99,0)
+ d getChildrenInOrder^%zewdDOM(ZOID,.childArray)
+"RTN","C0CXEWD",100,0)
+ m @ZRTN=childArray
+"RTN","C0CXEWD",101,0)
+ q
+"RTN","C0CXEWD",102,0)
+ ;
+"RTN","C0CXEWD",103,0)
+TAG(ZOID) ; RETURNS THE XML TAG FOR THE NODE
+"RTN","C0CXEWD",104,0)
+ Q $$getName^%zewdDOM(ZOID)
+"RTN","C0CXEWD",105,0)
+ ;
+"RTN","C0CXEWD",106,0)
+NXTSIB(ZOID) ; RETURNS THE NEXT SIBLING
+"RTN","C0CXEWD",107,0)
+ Q $$getNextSibling^%zewdDOM(ZOID)
+"RTN","C0CXEWD",108,0)
+ ;
+"RTN","C0CXEWD",109,0)
+NXTCHLD(ZOID) ; RETURNS THE NEXT CHILD IN PARENT ZPAR
+"RTN","C0CXEWD",110,0)
+ N GOID
+"RTN","C0CXEWD",111,0)
+ S GOID=$$getNextChild^%zewdDOM($$PARENT(ZOID),ZOID)
+"RTN","C0CXEWD",112,0)
+ I GOID="" Q ""
+"RTN","C0CXEWD",113,0)
+ I $$getNodeType^%zewdDOM(GOID)'=1 S GOID=$$NXTCHLD(GOID)
+"RTN","C0CXEWD",114,0)
+ Q GOID
+"RTN","C0CXEWD",115,0)
+ ;
+"RTN","C0CXEWD",116,0)
+PARENT(ZOID) ; RETURNS PARENT OF ZOID
+"RTN","C0CXEWD",117,0)
+ Q $$getParentNode^%zewdDOM(ZOID)
+"RTN","C0CXEWD",118,0)
+ ;
+"RTN","C0CXEWD",119,0)
+DATA(ZT,ZOID) ; RETURNS DATA FOR THE NODE
+"RTN","C0CXEWD",120,0)
+ N ZT2
+"RTN","C0CXEWD",121,0)
+ S ZT2=$$getElementText^%zewdDOM(ZOID,.ZT2)
+"RTN","C0CXEWD",122,0)
+ M @ZT=ZT2
+"RTN","C0CXEWD",123,0)
+ Q
+"RTN","C0CXEWD",124,0)
+ ;Q $$getTextValue^%zewdXPath(ZOID)
+"RTN","C0CXEWD",125,0)
+ ;Q $$getData^%zewdDOM(ZOID,.ZT)
+"RTN","C0CXEWD",126,0)
+ ;
+"RTN","C0CXPAT0")
+0^35^B50736852
+"RTN","C0CXPAT0",1,0)
+C0CXPAT0   ; CCDCCR/GPL - XPATH TEST CASES ; 6/1/08
+"RTN","C0CXPAT0",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CXPAT0",3,0)
+ ;Copyright 2008 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CXPAT0",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CXPAT0",5,0)
+ ;
+"RTN","C0CXPAT0",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CXPAT0",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CXPAT0",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CXPAT0",9,0)
+ ;(at your option) any later version.
+"RTN","C0CXPAT0",10,0)
+ ;
+"RTN","C0CXPAT0",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CXPAT0",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CXPAT0",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CXPAT0",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CXPAT0",15,0)
+ ;
+"RTN","C0CXPAT0",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CXPAT0",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CXPAT0",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CXPAT0",19,0)
+ ;
+"RTN","C0CXPAT0",20,0)
+        W "NO ENTRY",!
+"RTN","C0CXPAT0",21,0)
+        Q
+"RTN","C0CXPAT0",22,0)
+        ;
+"RTN","C0CXPAT0",23,0)
+ ;;><TEST>
+"RTN","C0CXPAT0",24,0)
+ ;;><INIT>
+"RTN","C0CXPAT0",25,0)
+ ;;>>>K C0C S C0C=""
+"RTN","C0CXPAT0",26,0)
+ ;;>>>D PUSH^C0CXPATH("C0C","FIRST")
+"RTN","C0CXPAT0",27,0)
+ ;;>>>D PUSH^C0CXPATH("C0C","SECOND")
+"RTN","C0CXPAT0",28,0)
+ ;;>>>D PUSH^C0CXPATH("C0C","THIRD")
+"RTN","C0CXPAT0",29,0)
+ ;;>>>D PUSH^C0CXPATH("C0C","FOURTH")
+"RTN","C0CXPAT0",30,0)
+ ;;>>?C0C(0)=4
+"RTN","C0CXPAT0",31,0)
+ ;;><INITXML>
+"RTN","C0CXPAT0",32,0)
+ ;;>>>K GXML S GXML=""
+"RTN","C0CXPAT0",33,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<FIRST>")
+"RTN","C0CXPAT0",34,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<SECOND>")
+"RTN","C0CXPAT0",35,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<THIRD>")
+"RTN","C0CXPAT0",36,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<FOURTH>@@DATA1@@</FOURTH>")
+"RTN","C0CXPAT0",37,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<FIFTH>")
+"RTN","C0CXPAT0",38,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","@@DATA2@@")
+"RTN","C0CXPAT0",39,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","</FIFTH>")
+"RTN","C0CXPAT0",40,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<SIXTH ID=""SELF"" />")
+"RTN","C0CXPAT0",41,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","</THIRD>")
+"RTN","C0CXPAT0",42,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<SECOND>")
+"RTN","C0CXPAT0",43,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","</SECOND>")
+"RTN","C0CXPAT0",44,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","</SECOND>")
+"RTN","C0CXPAT0",45,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","</FIRST>")
+"RTN","C0CXPAT0",46,0)
+ ;;><INITXML2>
+"RTN","C0CXPAT0",47,0)
+ ;;>>>K GXML S GXML=""
+"RTN","C0CXPAT0",48,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<FIRST>")
+"RTN","C0CXPAT0",49,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<SECOND>")
+"RTN","C0CXPAT0",50,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<THIRD>")
+"RTN","C0CXPAT0",51,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<FOURTH>DATA1</FOURTH>")
+"RTN","C0CXPAT0",52,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<FOURTH>")
+"RTN","C0CXPAT0",53,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","DATA2")
+"RTN","C0CXPAT0",54,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","</FOURTH>")
+"RTN","C0CXPAT0",55,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","</THIRD>")
+"RTN","C0CXPAT0",56,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<_SECOND>")
+"RTN","C0CXPAT0",57,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","<FOURTH>DATA3</FOURTH>")
+"RTN","C0CXPAT0",58,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","</_SECOND>")
+"RTN","C0CXPAT0",59,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","</SECOND>")
+"RTN","C0CXPAT0",60,0)
+ ;;>>>D PUSH^C0CXPATH("GXML","</FIRST>")
+"RTN","C0CXPAT0",61,0)
+ ;;><PUSHPOP>
+"RTN","C0CXPAT0",62,0)
+ ;;>>>D ZLOAD^C0CUNIT("ZTMP","C0CXPAT0")
+"RTN","C0CXPAT0",63,0)
+ ;;>>>D ZTEST^C0CUNIT(.ZTMP,"INIT")
+"RTN","C0CXPAT0",64,0)
+ ;;>>?C0C(C0C(0))="FOURTH"
+"RTN","C0CXPAT0",65,0)
+ ;;>>>D POP^C0CXPATH("C0C",.GX)
+"RTN","C0CXPAT0",66,0)
+ ;;>>?GX="FOURTH"
+"RTN","C0CXPAT0",67,0)
+ ;;>>?C0C(C0C(0))="THIRD"
+"RTN","C0CXPAT0",68,0)
+ ;;>>>D POP^C0CXPATH("C0C",.GX)
+"RTN","C0CXPAT0",69,0)
+ ;;>>?GX="THIRD"
+"RTN","C0CXPAT0",70,0)
+ ;;>>?C0C(C0C(0))="SECOND"
+"RTN","C0CXPAT0",71,0)
+ ;;><MKMDX>
+"RTN","C0CXPAT0",72,0)
+ ;;>>>D ZLOAD^C0CUNIT("ZTMP","C0CXPAT0")
+"RTN","C0CXPAT0",73,0)
+ ;;>>>D ZTEST^C0CUNIT(.ZTMP,"INIT")
+"RTN","C0CXPAT0",74,0)
+ ;;>>>S GX=""
+"RTN","C0CXPAT0",75,0)
+ ;;>>>D MKMDX^C0CXPATH("C0C",.GX)
+"RTN","C0CXPAT0",76,0)
+ ;;>>?GX="//FIRST/SECOND/THIRD/FOURTH"
+"RTN","C0CXPAT0",77,0)
+ ;;><XNAME>
+"RTN","C0CXPAT0",78,0)
+ ;;>>?$$XNAME^C0CXPATH("<FOURTH>DATA1</FOURTH>")="FOURTH"
+"RTN","C0CXPAT0",79,0)
+ ;;>>?$$XNAME^C0CXPATH("<SIXTH  ID=""SELF"" />")="SIXTH"
+"RTN","C0CXPAT0",80,0)
+ ;;>>?$$XNAME^C0CXPATH("</THIRD>")="THIRD"
+"RTN","C0CXPAT0",81,0)
+ ;;><INDEX>
+"RTN","C0CXPAT0",82,0)
+ ;;>>>D ZLOAD^C0CUNIT("ZTMP","C0CXPAT0")
+"RTN","C0CXPAT0",83,0)
+ ;;>>>D ZTEST^C0CUNIT(.ZTMP,"INITXML")
+"RTN","C0CXPAT0",84,0)
+ ;;>>>D INDEX^C0CXPATH("GXML")
+"RTN","C0CXPAT0",85,0)
+ ;;>>?GXML("//FIRST/SECOND")="2^12"
+"RTN","C0CXPAT0",86,0)
+ ;;>>?GXML("//FIRST/SECOND/THIRD")="3^9"
+"RTN","C0CXPAT0",87,0)
+ ;;>>?GXML("//FIRST/SECOND/THIRD/FIFTH")="5^7"
+"RTN","C0CXPAT0",88,0)
+ ;;>>?GXML("//FIRST/SECOND/THIRD/FOURTH")="4^4^@@DATA1@@"
+"RTN","C0CXPAT0",89,0)
+ ;;>>?GXML("//FIRST/SECOND/THIRD/SIXTH")="8^8^"
+"RTN","C0CXPAT0",90,0)
+ ;;>>?GXML("//FIRST/SECOND")="2^12"
+"RTN","C0CXPAT0",91,0)
+ ;;>>?GXML("//FIRST")="1^13"
+"RTN","C0CXPAT0",92,0)
+ ;;><INDEX2>
+"RTN","C0CXPAT0",93,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML2")
+"RTN","C0CXPAT0",94,0)
+ ;;>>>D INDEX^C0CXPATH("GXML")
+"RTN","C0CXPAT0",95,0)
+ ;;>>?GXML("//FIRST/SECOND")="2^12"
+"RTN","C0CXPAT0",96,0)
+ ;;>>?GXML("//FIRST/SECOND/_SECOND")="9^11"
+"RTN","C0CXPAT0",97,0)
+ ;;>>?GXML("//FIRST/SECOND/_SECOND/FOURTH")="10^10^DATA3"
+"RTN","C0CXPAT0",98,0)
+ ;;>>?GXML("//FIRST/SECOND/THIRD")="3^8"
+"RTN","C0CXPAT0",99,0)
+ ;;>>?GXML("//FIRST/SECOND/THIRD/FOURTH[1]")="4^4^DATA1"
+"RTN","C0CXPAT0",100,0)
+ ;;>>?GXML("//FIRST")="1^13"
+"RTN","C0CXPAT0",101,0)
+ ;;><MISSING>
+"RTN","C0CXPAT0",102,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",103,0)
+ ;;>>>S OUTARY="^TMP($J,""MISSINGTEST"")"
+"RTN","C0CXPAT0",104,0)
+ ;;>>>D MISSING^C0CXPATH("GXML",OUTARY)
+"RTN","C0CXPAT0",105,0)
+ ;;>>?@OUTARY@(1)="DATA1"
+"RTN","C0CXPAT0",106,0)
+ ;;>>?@OUTARY@(2)="DATA2"
+"RTN","C0CXPAT0",107,0)
+ ;;><MAP>
+"RTN","C0CXPAT0",108,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",109,0)
+ ;;>>>S MAPARY="^TMP($J,""MAPVALUES"")"
+"RTN","C0CXPAT0",110,0)
+ ;;>>>S OUTARY="^TMP($J,""MAPTEST"")"
+"RTN","C0CXPAT0",111,0)
+ ;;>>>S @MAPARY@("DATA2")="VALUE2"
+"RTN","C0CXPAT0",112,0)
+ ;;>>>D MAP^C0CXPATH("GXML",MAPARY,OUTARY)
+"RTN","C0CXPAT0",113,0)
+ ;;>>?@OUTARY@(6)="VALUE2"
+"RTN","C0CXPAT0",114,0)
+ ;;><MAP2>
+"RTN","C0CXPAT0",115,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",116,0)
+ ;;>>>S MAPARY="^TMP($J,""MAPVALUES"")"
+"RTN","C0CXPAT0",117,0)
+ ;;>>>S OUTARY="^TMP($J,""MAPTEST"")"
+"RTN","C0CXPAT0",118,0)
+ ;;>>>S @MAPARY@("DATA1")="VALUE1"
+"RTN","C0CXPAT0",119,0)
+ ;;>>>S @MAPARY@("DATA2")="VALUE2"
+"RTN","C0CXPAT0",120,0)
+ ;;>>>S @MAPARY@("DATA3")="VALUE3"
+"RTN","C0CXPAT0",121,0)
+ ;;>>>S GXML(4)="<FOURTH>@@DATA1@@ AND @@DATA3@@</FOURTH>"
+"RTN","C0CXPAT0",122,0)
+ ;;>>>D MAP^C0CXPATH("GXML",MAPARY,OUTARY)
+"RTN","C0CXPAT0",123,0)
+ ;;>>>D PARY^C0CXPATH(OUTARY)
+"RTN","C0CXPAT0",124,0)
+ ;;>>?@OUTARY@(4)="<FOURTH>VALUE1 AND VALUE3</FOURTH>"
+"RTN","C0CXPAT0",125,0)
+ ;;><QUEUE>
+"RTN","C0CXPAT0",126,0)
+ ;;>>>D QUEUE^C0CXPATH("BTLIST","GXML",2,3)
+"RTN","C0CXPAT0",127,0)
+ ;;>>>D QUEUE^C0CXPATH("BTLIST","GXML",4,5)
+"RTN","C0CXPAT0",128,0)
+ ;;>>?$P(BTLIST(2),";",2)=4
+"RTN","C0CXPAT0",129,0)
+ ;;><BUILD>
+"RTN","C0CXPAT0",130,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",131,0)
+ ;;>>>D QUERY^C0CXPATH("GXML","//FIRST/SECOND/THIRD/FOURTH","G2")
+"RTN","C0CXPAT0",132,0)
+ ;;>>>D ZTEST^C0CXPATH("QUEUE")
+"RTN","C0CXPAT0",133,0)
+ ;;>>>D BUILD^C0CXPATH("BTLIST","G3")
+"RTN","C0CXPAT0",134,0)
+ ;;><CP>
+"RTN","C0CXPAT0",135,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",136,0)
+ ;;>>>D CP^C0CXPATH("GXML","G2")
+"RTN","C0CXPAT0",137,0)
+ ;;>>?G2(0)=13
+"RTN","C0CXPAT0",138,0)
+ ;;><QOPEN>
+"RTN","C0CXPAT0",139,0)
+ ;;>>>K G2,GBL
+"RTN","C0CXPAT0",140,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",141,0)
+ ;;>>>D QOPEN^C0CXPATH("GBL","GXML")
+"RTN","C0CXPAT0",142,0)
+ ;;>>?$P(GBL(1),";",3)=12
+"RTN","C0CXPAT0",143,0)
+ ;;>>>D BUILD^C0CXPATH("GBL","G2")
+"RTN","C0CXPAT0",144,0)
+ ;;>>?G2(G2(0))="</SECOND>"
+"RTN","C0CXPAT0",145,0)
+ ;;><QOPEN2>
+"RTN","C0CXPAT0",146,0)
+ ;;>>>K G2,GBL
+"RTN","C0CXPAT0",147,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",148,0)
+ ;;>>>D QOPEN^C0CXPATH("GBL","GXML","//FIRST/SECOND")
+"RTN","C0CXPAT0",149,0)
+ ;;>>?$P(GBL(1),";",3)=11
+"RTN","C0CXPAT0",150,0)
+ ;;>>>D BUILD^C0CXPATH("GBL","G2")
+"RTN","C0CXPAT0",151,0)
+ ;;>>?G2(G2(0))="</SECOND>"
+"RTN","C0CXPAT0",152,0)
+ ;;><QCLOSE>
+"RTN","C0CXPAT0",153,0)
+ ;;>>>K G2,GBL
+"RTN","C0CXPAT0",154,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",155,0)
+ ;;>>>D QCLOSE^C0CXPATH("GBL","GXML")
+"RTN","C0CXPAT0",156,0)
+ ;;>>?$P(GBL(1),";",3)=13
+"RTN","C0CXPAT0",157,0)
+ ;;>>>D BUILD^C0CXPATH("GBL","G2")
+"RTN","C0CXPAT0",158,0)
+ ;;>>?G2(G2(0))="</FIRST>"
+"RTN","C0CXPAT0",159,0)
+ ;;><QCLOSE2>
+"RTN","C0CXPAT0",160,0)
+ ;;>>>K G2,GBL
+"RTN","C0CXPAT0",161,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",162,0)
+ ;;>>>D QCLOSE^C0CXPATH("GBL","GXML","//FIRST/SECOND/THIRD")
+"RTN","C0CXPAT0",163,0)
+ ;;>>?$P(GBL(1),";",3)=13
+"RTN","C0CXPAT0",164,0)
+ ;;>>>D BUILD^C0CXPATH("GBL","G2")
+"RTN","C0CXPAT0",165,0)
+ ;;>>?G2(G2(0))="</FIRST>"
+"RTN","C0CXPAT0",166,0)
+ ;;>>?G2(1)="</THIRD>"
+"RTN","C0CXPAT0",167,0)
+ ;;><INSERT>
+"RTN","C0CXPAT0",168,0)
+ ;;>>>K G2,GBL,G3,G4
+"RTN","C0CXPAT0",169,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",170,0)
+ ;;>>>D QUERY^C0CXPATH("GXML","//FIRST/SECOND/THIRD/FIFTH","G2")
+"RTN","C0CXPAT0",171,0)
+ ;;>>>D INSERT^C0CXPATH("GXML","G2","//FIRST/SECOND/THIRD")
+"RTN","C0CXPAT0",172,0)
+ ;;>>>D INSERT^C0CXPATH("G3","G2","//")
+"RTN","C0CXPAT0",173,0)
+ ;;>>?G2(1)=GXML(9)
+"RTN","C0CXPAT0",174,0)
+ ;;><REPLACE>
+"RTN","C0CXPAT0",175,0)
+ ;;>>>K G2,GBL,G3
+"RTN","C0CXPAT0",176,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",177,0)
+ ;;>>>D QUERY^C0CXPATH("GXML","//FIRST/SECOND/THIRD/FIFTH","G2")
+"RTN","C0CXPAT0",178,0)
+ ;;>>>D REPLACE^C0CXPATH("GXML","G2","//FIRST/SECOND")
+"RTN","C0CXPAT0",179,0)
+ ;;>>?GXML(2)="<FIFTH>"
+"RTN","C0CXPAT0",180,0)
+ ;;><INSINNER>
+"RTN","C0CXPAT0",181,0)
+ ;;>>>K GXML,G2,GBL,G3
+"RTN","C0CXPAT0",182,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",183,0)
+ ;;>>>D QUERY^C0CXPATH("GXML","//FIRST/SECOND/THIRD","G2")
+"RTN","C0CXPAT0",184,0)
+ ;;>>>D INSINNER^C0CXPATH("GXML","G2","//FIRST/SECOND/THIRD")
+"RTN","C0CXPAT0",185,0)
+ ;;>>?GXML(10)="<FIFTH>"
+"RTN","C0CXPAT0",186,0)
+ ;;><INSINNER2>
+"RTN","C0CXPAT0",187,0)
+ ;;>>>K GXML,G2,GBL,G3
+"RTN","C0CXPAT0",188,0)
+ ;;>>>D ZTEST^C0CXPATH("INITXML")
+"RTN","C0CXPAT0",189,0)
+ ;;>>>D QUERY^C0CXPATH("GXML","//FIRST/SECOND/THIRD","G2")
+"RTN","C0CXPAT0",190,0)
+ ;;>>>D INSINNER^C0CXPATH("G2","G2")
+"RTN","C0CXPAT0",191,0)
+ ;;>>?G2(8)="<FIFTH>"
+"RTN","C0CXPAT0",192,0)
+ ;;><PUSHA>
+"RTN","C0CXPAT0",193,0)
+ ;;>>>K GTMP,GTMP2
+"RTN","C0CXPAT0",194,0)
+ ;;>>>N GTMP,GTMP2
+"RTN","C0CXPAT0",195,0)
+ ;;>>>D PUSH^C0CXPATH("GTMP","A")
+"RTN","C0CXPAT0",196,0)
+ ;;>>>D PUSH^C0CXPATH("GTMP2","B")
+"RTN","C0CXPAT0",197,0)
+ ;;>>>D PUSH^C0CXPATH("GTMP2","C")
+"RTN","C0CXPAT0",198,0)
+ ;;>>>D PUSHA^C0CXPATH("GTMP","GTMP2")
+"RTN","C0CXPAT0",199,0)
+ ;;>>?GTMP(3)="C"
+"RTN","C0CXPAT0",200,0)
+ ;;>>?GTMP(0)=3
+"RTN","C0CXPAT0",201,0)
+ ;;><H2ARY>
+"RTN","C0CXPAT0",202,0)
+ ;;>>>K GTMP,GTMP2
+"RTN","C0CXPAT0",203,0)
+ ;;>>>S GTMP("TEST1")=1
+"RTN","C0CXPAT0",204,0)
+ ;;>>>D H2ARY^C0CXPATH("GTMP2","GTMP")
+"RTN","C0CXPAT0",205,0)
+ ;;>>?GTMP2(0)=1
+"RTN","C0CXPAT0",206,0)
+ ;;>>?GTMP2(1)="^TEST1^1"
+"RTN","C0CXPAT0",207,0)
+ ;;><XVARS>
+"RTN","C0CXPAT0",208,0)
+ ;;>>>K GTMP,GTMP2
+"RTN","C0CXPAT0",209,0)
+ ;;>>>D PUSH^C0CXPATH("GTMP","<VALUE>@@VAR1@@</VALUE>")
+"RTN","C0CXPAT0",210,0)
+ ;;>>>D XVARS^C0CXPATH("GTMP2","GTMP")
+"RTN","C0CXPAT0",211,0)
+ ;;>>?GTMP2(1)="^VAR1^1"
+"RTN","C0CXPAT0",212,0)
+ ;;></TEST>
+"RTN","C0CXPATH")
+0^34^B521207435
+"RTN","C0CXPATH",1,0)
+C0CXPATH   ; CCDCCR/GPL - XPATH XML manipulation utilities; 6/1/08
+"RTN","C0CXPATH",2,0)
+ ;;1.2;C0C;;May 10, 2012;Build 42
+"RTN","C0CXPATH",3,0)
+ ;Copyright 2008 George Lilly.  Licensed under the terms of the GNU
+"RTN","C0CXPATH",4,0)
+ ;General Public License See attached copy of the License.
+"RTN","C0CXPATH",5,0)
+ ;
+"RTN","C0CXPATH",6,0)
+ ;This program is free software; you can redistribute it and/or modify
+"RTN","C0CXPATH",7,0)
+ ;it under the terms of the GNU General Public License as published by
+"RTN","C0CXPATH",8,0)
+ ;the Free Software Foundation; either version 2 of the License, or
+"RTN","C0CXPATH",9,0)
+ ;(at your option) any later version.
+"RTN","C0CXPATH",10,0)
+ ;
+"RTN","C0CXPATH",11,0)
+ ;This program is distributed in the hope that it will be useful,
+"RTN","C0CXPATH",12,0)
+ ;but WITHOUT ANY WARRANTY; without even the implied warranty of
+"RTN","C0CXPATH",13,0)
+ ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+"RTN","C0CXPATH",14,0)
+ ;GNU General Public License for more details.
+"RTN","C0CXPATH",15,0)
+ ;
+"RTN","C0CXPATH",16,0)
+ ;You should have received a copy of the GNU General Public License along
+"RTN","C0CXPATH",17,0)
+ ;with this program; if not, write to the Free Software Foundation, Inc.,
+"RTN","C0CXPATH",18,0)
+ ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+"RTN","C0CXPATH",19,0)
+ ;
+"RTN","C0CXPATH",20,0)
+ W "This is an XML XPATH utility library",!
+"RTN","C0CXPATH",21,0)
+ W !
+"RTN","C0CXPATH",22,0)
+ Q
+"RTN","C0CXPATH",23,0)
+ ;
+"RTN","C0CXPATH",24,0)
+OUTPUT(OUTARY,OUTNAME,OUTDIR)   ; WRITE AN ARRAY TO A FILE
+"RTN","C0CXPATH",25,0)
+ ;
+"RTN","C0CXPATH",26,0)
+ N Y
+"RTN","C0CXPATH",27,0)
+ S Y=$$GTF^%ZISH(OUTARY,$QL(OUTARY),OUTDIR,OUTNAME)
+"RTN","C0CXPATH",28,0)
+ I Y Q 1_U_"WROTE FILE: "_OUTNAME_" TO "_OUTDIR
+"RTN","C0CXPATH",29,0)
+ I 'Y Q 0_U_"ERROR WRITING FILE"_OUTNAME_" TO "_OUTDIR
+"RTN","C0CXPATH",30,0)
+ Q
+"RTN","C0CXPATH",31,0)
+ ;
+"RTN","C0CXPATH",32,0)
+PUSH(STK,VAL)   ; pushs VAL onto STK and updates STK(0)
+"RTN","C0CXPATH",33,0)
+ ;  VAL IS A STRING AND STK IS PASSED BY NAME
+"RTN","C0CXPATH",34,0)
+ ;
+"RTN","C0CXPATH",35,0)
+ I '$D(@STK@(0)) S @STK@(0)=0 ; IF THE ARRAY IS EMPTY, INITIALIZE
+"RTN","C0CXPATH",36,0)
+ S @STK@(0)=@STK@(0)+1 ; INCREMENT ARRAY DEPTH
+"RTN","C0CXPATH",37,0)
+ S @STK@(@STK@(0))=VAL ; PUT VAL A THE END OF THE ARRAY
+"RTN","C0CXPATH",38,0)
+ Q
+"RTN","C0CXPATH",39,0)
+ ;
+"RTN","C0CXPATH",40,0)
+POP(STK,VAL)    ; POPS THE LAST VALUE OFF THE STK AND RETURNS IT IN VAL
+"RTN","C0CXPATH",41,0)
+ ; VAL AND STK ARE PASSED BY REFERENCE
+"RTN","C0CXPATH",42,0)
+ ;
+"RTN","C0CXPATH",43,0)
+ I @STK@(0)<1 D  ; IF ARRAY IS EMPTY
+"RTN","C0CXPATH",44,0)
+ . S VAL=""
+"RTN","C0CXPATH",45,0)
+ . S @STK@(0)=0
+"RTN","C0CXPATH",46,0)
+ I @STK@(0)>0  D  ;
+"RTN","C0CXPATH",47,0)
+ . S VAL=@STK@(@STK@(0))
+"RTN","C0CXPATH",48,0)
+ . K @STK@(@STK@(0))
+"RTN","C0CXPATH",49,0)
+ . S @STK@(0)=@STK@(0)-1 ; NEW DEPTH OF THE ARRAY
+"RTN","C0CXPATH",50,0)
+ Q
+"RTN","C0CXPATH",51,0)
+ ;
+"RTN","C0CXPATH",52,0)
+PUSHA(ADEST,ASRC) ; PUSH ASRC ONTO ADEST, BOTH PASSED BY NAME
+"RTN","C0CXPATH",53,0)
+ ;
+"RTN","C0CXPATH",54,0)
+ N ZGI
+"RTN","C0CXPATH",55,0)
+ F ZGI=1:1:@ASRC@(0) D  ; FOR ALL OF THE SOURCE ARRAY
+"RTN","C0CXPATH",56,0)
+ . D PUSH(ADEST,@ASRC@(ZGI)) ; PUSH ONE ELEMENT
+"RTN","C0CXPATH",57,0)
+ Q
+"RTN","C0CXPATH",58,0)
+ ;
+"RTN","C0CXPATH",59,0)
+MKMDX(STK,RTN,INREDUX)  ; MAKES A MUMPS INDEX FROM THE ARRAY STK
+"RTN","C0CXPATH",60,0)
+ ; RTN IS SET TO //FIRST/SECOND/THIRD FOR THREE ARRAY ELEMENTS
+"RTN","C0CXPATH",61,0)
+ ; REDUX IS A STRING TO REMOVE FROM THE RESULT
+"RTN","C0CXPATH",62,0)
+ S RTN=""
+"RTN","C0CXPATH",63,0)
+ N I
+"RTN","C0CXPATH",64,0)
+ ; W "STK= ",STK,!
+"RTN","C0CXPATH",65,0)
+ I @STK@(0)>0  D  ; IF THE ARRAY IS NOT EMPTY
+"RTN","C0CXPATH",66,0)
+ . S RTN="//"_@STK@(1) ; FIRST ELEMENT NEEDS NO SEMICOLON
+"RTN","C0CXPATH",67,0)
+ . I @STK@(0)>1  D  ; SUBSEQUENT ELEMENTS NEED A SEMICOLON
+"RTN","C0CXPATH",68,0)
+ . . F I=2:1:@STK@(0) S RTN=RTN_"/"_@STK@(I)
+"RTN","C0CXPATH",69,0)
+ I $G(INREDUX)'="" S RTN=$P(RTN,INREDUX,1)_$P(RTN,INREDUX,2)
+"RTN","C0CXPATH",70,0)
+ Q
+"RTN","C0CXPATH",71,0)
+ ;
+"RTN","C0CXPATH",72,0)
+XNAME(ISTR)     ; FUNCTION TO EXTRACT A NAME FROM AN XML FRAG
+"RTN","C0CXPATH",73,0)
+ ;  </NAME> AND <NAME ID=XNAME> WILL RETURN NAME
+"RTN","C0CXPATH",74,0)
+ ; ISTR IS PASSED BY VALUE
+"RTN","C0CXPATH",75,0)
+ N CUR,TMP
+"RTN","C0CXPATH",76,0)
+ I ISTR?.E1"<".E  D  ; STRIP OFF LEFT BRACKET
+"RTN","C0CXPATH",77,0)
+ . S TMP=$P(ISTR,"<",2)
+"RTN","C0CXPATH",78,0)
+ I TMP?1"/".E  D  ; ALSO STRIP OFF SLASH IF PRESENT IE </NAME>
+"RTN","C0CXPATH",79,0)
+ . S TMP=$P(TMP,"/",2)
+"RTN","C0CXPATH",80,0)
+ S CUR=$P(TMP,">",1) ; EXTRACT THE NAME
+"RTN","C0CXPATH",81,0)
+ ; W "CUR= ",CUR,!
+"RTN","C0CXPATH",82,0)
+ I CUR?.1"_"1.A1" ".E  D  ; CONTAINS A BLANK IE NAME ID=TEST>
+"RTN","C0CXPATH",83,0)
+ . S CUR=$P(CUR," ",1) ; STRIP OUT BLANK AND AFTER
+"RTN","C0CXPATH",84,0)
+ ; W "CUR2= ",CUR,!
+"RTN","C0CXPATH",85,0)
+ Q CUR
+"RTN","C0CXPATH",86,0)
+ ;
+"RTN","C0CXPATH",87,0)
+XVAL(ISTR) ; EXTRACTS THE VALUE FROM A FRAGMENT OF XML
+"RTN","C0CXPATH",88,0)
+ ; <NAME>VALUE</NAME> WILL RETURN VALUE
+"RTN","C0CXPATH",89,0)
+ N G
+"RTN","C0CXPATH",90,0)
+ S G=$P(ISTR,">",2) ;STRIP OFF <NAME>
+"RTN","C0CXPATH",91,0)
+ Q $P(G,"<",1) ; STRIP OFF </NAME> LEAVING VALUE
+"RTN","C0CXPATH",92,0)
+ ;
+"RTN","C0CXPATH",93,0)
+VDX2VDV(OUTVDV,INVDX) ; CONVERT AN VDX ARRAY TO VDV
+"RTN","C0CXPATH",94,0)
+ ; VDX: @INVDX@(XPATH)=VALUE
+"RTN","C0CXPATH",95,0)
+ ; VDV: @OUTVDV@(X1X2X3X4)=VALUE
+"RTN","C0CXPATH",96,0)
+ ; THE VDV DATANAMES MIGHT BE MORE CONVENIENT FOR USE IN CODE
+"RTN","C0CXPATH",97,0)
+ ; AN INDEX IS PROVIDED TO GO BACK TO VDX FOR CONVERSIONS
+"RTN","C0CXPATH",98,0)
+ ; @VDV@("XPATH",X1X2X3X4)="XPATH"
+"RTN","C0CXPATH",99,0)
+ N ZA,ZI,ZW
+"RTN","C0CXPATH",100,0)
+ S ZI=""
+"RTN","C0CXPATH",101,0)
+ F  S ZI=$O(@INVDX@(ZI)) Q:ZI=""  D  ;
+"RTN","C0CXPATH",102,0)
+ . S ZW=$TR(ZI,"/","") ; ELIMINATE ALL SLASHES - CAMEL CASE VARIABLE NAME
+"RTN","C0CXPATH",103,0)
+ . W ZW,!
+"RTN","C0CXPATH",104,0)
+ . S @OUTVDV@(ZW)=@INVDX@(ZI)
+"RTN","C0CXPATH",105,0)
+ . S @OUTVDV@("XPATH",ZW)=ZI
+"RTN","C0CXPATH",106,0)
+ Q
+"RTN","C0CXPATH",107,0)
+ ;
+"RTN","C0CXPATH",108,0)
+VDX2XPG(OUTXPG,INVDX) ; CONVERT AN VDX ARRAY TO XPG
+"RTN","C0CXPATH",109,0)
+ ; VDX: @VDX@(XPATH)=VALUE
+"RTN","C0CXPATH",110,0)
+ ; XPG: @(VDX(X1,X2,X3,X4))@=VALUE
+"RTN","C0CXPATH",111,0)
+ ; THIS IS A STEP TOWARD GENERATING XML FROM A VDX
+"RTN","C0CXPATH",112,0)
+ N ZA,ZI,ZW
+"RTN","C0CXPATH",113,0)
+ S ZI=""
+"RTN","C0CXPATH",114,0)
+ F  S ZI=$O(@INVDX@(ZI)) Q:ZI=""  D  ;
+"RTN","C0CXPATH",115,0)
+ . S ZW=$E(ZI,3,$L(ZI)) ; STRIP OFF INITIAL //
+"RTN","C0CXPATH",116,0)
+ . S ZW2=$P(ZW,"/",1)
+"RTN","C0CXPATH",117,0)
+ . F ZK=1:1:$L(ZW,"/") D PUSH("ZA",$P(ZW,"/",ZK))
+"RTN","C0CXPATH",118,0)
+ . ;ZWR ZA
+"RTN","C0CXPATH",119,0)
+ . S ZW2=ZA(1)
+"RTN","C0CXPATH",120,0)
+ . F ZK=2:1:ZA(0) D  ;
+"RTN","C0CXPATH",121,0)
+ . . S ZW2=ZW2_""","""_ZA(ZK)
+"RTN","C0CXPATH",122,0)
+ . K ZA
+"RTN","C0CXPATH",123,0)
+ . S ZW2=""""_ZW2_""""
+"RTN","C0CXPATH",124,0)
+ . W ZW2,!
+"RTN","C0CXPATH",125,0)
+ . S ZN=OUTXPG_"("_ZW2_")"
+"RTN","C0CXPATH",126,0)
+ . S @ZN=@INVDX@(ZI)
+"RTN","C0CXPATH",127,0)
+ Q
+"RTN","C0CXPATH",128,0)
+ ;
+"RTN","C0CXPATH",129,0)
+XML2XPG(OUTXPG,INXML) ; CONVERT AN XML ARRAY, PASSED BY NAME TO AN XPG ARRAY
+"RTN","C0CXPATH",130,0)
+ ; XPG MEANS XPATH GLOBAL AND HAS THE FORM @OUTXPG@("X1","X2","X3")=VALUE
+"RTN","C0CXPATH",131,0)
+ ;
+"RTN","C0CXPATH",132,0)
+ ;N G1
+"RTN","C0CXPATH",133,0)
+ D INDEX(INXML,"G1",1) ; PRODUCES A VDX ARRAY IN G1, NO INDEX IS PRODUCED
+"RTN","C0CXPATH",134,0)
+ D VDX2XPG(OUTXPG,"G1") ; CONVERTS THE VDX ARRAY TO XPG FORM
+"RTN","C0CXPATH",135,0)
+ Q
+"RTN","C0CXPATH",136,0)
+ ;
+"RTN","C0CXPATH",137,0)
+DO 
+"RTN","C0CXPATH",138,0)
+ D XPG2XML("^GPL2B","^GPL2A")
+"RTN","C0CXPATH",139,0)
+ Q
+"RTN","C0CXPATH",140,0)
+ ;
+"RTN","C0CXPATH",141,0)
+T1 ; TEST OUT THESE ROUTINES 
+"RTN","C0CXPATH",142,0)
+ D XML2XPG("G2","^GPL")
+"RTN","C0CXPATH",143,0)
+ D XPG2XML("G3","G2")
+"RTN","C0CXPATH",144,0)
+ K ^GPLOUT
+"RTN","C0CXPATH",145,0)
+ M ^GPLOUT=G3
+"RTN","C0CXPATH",146,0)
+ W $$OUTPUT^C0CXPATH("^GPLOUT(1)","GPLTEST.xml","/home/vademo2/EHR/p")
+"RTN","C0CXPATH",147,0)
+ Q
+"RTN","C0CXPATH",148,0)
+ ;
+"RTN","C0CXPATH",149,0)
+XPG2XML(OUTXML,INXPG) ;
+"RTN","C0CXPATH",150,0)
+ N C0CN,FWD,ZA,G,GA,ZQ
+"RTN","C0CXPATH",151,0)
+ S ZQ=0 ; QUIT FLAG
+"RTN","C0CXPATH",152,0)
+ F  Q:ZQ=1  D  ; LOOP THROUGH EVERYTHING
+"RTN","C0CXPATH",153,0)
+ . I '$D(C0CN) D  ; FIRST TIME THROUGH
+"RTN","C0CXPATH",154,0)
+ . . K @OUTXML ; MAKE SURE OUTPUT ARRAY IS CLEAR
+"RTN","C0CXPATH",155,0)
+ . . S FWD=1 ; START OUT GOING FORWARD THROUGH SUBSCRIPTS
+"RTN","C0CXPATH",156,0)
+ . . S G=$Q(@INXPG) ; THIS ONE
+"RTN","C0CXPATH",157,0)
+ . . S GN=$Q(@G) ; NEXT ONE
+"RTN","C0CXPATH",158,0)
+ . . S C0CN=1 ; SUBSCRIPT COUNT
+"RTN","C0CXPATH",159,0)
+ . . S ZQ=0 ; QUIT FLAG
+"RTN","C0CXPATH",160,0)
+ . . D ZXO("?xml version=""1.0"" encoding=""UTF-8""?") ;MAKE IT REAL XML
+"RTN","C0CXPATH",161,0)
+ . . I $QS(G,1)="ContinuityOfCareRecord" D  ;
+"RTN","C0CXPATH",162,0)
+ . . . D ZXO("?xml-stylesheet type=""text/xsl"" href=""ccr.xsl""?") ; HACK TO MAKE THE CCR STYLESHEET WORK
+"RTN","C0CXPATH",163,0)
+ . I FWD D  ; GOING FORWARDS 
+"RTN","C0CXPATH",164,0)
+ . . I C0CN<$QL(G) D  ; NOT A DATA NODE
+"RTN","C0CXPATH",165,0)
+ . . . S ZA=$QS(G,C0CN) ; PULL OUT THE SUBSCRIPT
+"RTN","C0CXPATH",166,0)
+ . . . D ZXO(ZA) ; AND OPEN AN XML ELEMENT
+"RTN","C0CXPATH",167,0)
+ . . . I @OUTXML@(@OUTXML@(0))="<ContinuityOfCareRecord>" D  ;
+"RTN","C0CXPATH",168,0)
+ . . . . S @OUTXML@(@OUTXML@(0))="<ContinuityOfCareRecord xmlns=""urn:astm-org:CCR"">"
+"RTN","C0CXPATH",169,0)
+ . . . S C0CN=C0CN+1 ; MOVE TO THE NEXT ONE
+"RTN","C0CXPATH",170,0)
+ . . E  D  ; AT THE DATA NODE
+"RTN","C0CXPATH",171,0)
+ . . . S ZA=$QS(G,C0CN) ; PULL OUT THE SUBSCRIPT
+"RTN","C0CXPATH",172,0)
+ . . . D ZXVAL(ZA,@G) ; OUTPUT <X>VAL</X> FOR DATA NODE
+"RTN","C0CXPATH",173,0)
+ . . . S FWD=0 ; GO BACKWARDS
+"RTN","C0CXPATH",174,0)
+ . I 'FWD D  ;GOING BACKWARDS
+"RTN","C0CXPATH",175,0)
+ . . S GN=$Q(@G) ;NEXT XPATH
+"RTN","C0CXPATH",176,0)
+ . . ;W "NEXT!",GN,!
+"RTN","C0CXPATH",177,0)
+ . . S C0CN=C0CN-1 ; PREVIOUS SUBSCRIPT
+"RTN","C0CXPATH",178,0)
+ . . I GN'="" D  ;
+"RTN","C0CXPATH",179,0)
+ . . . I $QS(G,C0CN)'=$QS(GN,C0CN) D  ; NEED TO CLOSE OFF ELEMENT
+"RTN","C0CXPATH",180,0)
+ . . . . D ZXC($QS(G,C0CN)) ;
+"RTN","C0CXPATH",181,0)
+ . . . E  I GN'="" D  ; MORE ELEMENTS AT THIS LEVEL
+"RTN","C0CXPATH",182,0)
+ . . . . S G=$Q(@G) ; ADVANCE TO NEW XPATH
+"RTN","C0CXPATH",183,0)
+ . . . . S C0CN=C0CN+1 ; GET READY TO PROCESS NEXT SUBSCRIPT
+"RTN","C0CXPATH",184,0)
+ . . . . S FWD=1 ; GOING FORWARD NOW
+"RTN","C0CXPATH",185,0)
+ . I (GN="")&(C0CN=1) D  Q  ; WHEN WE ARE ALL DONE
+"RTN","C0CXPATH",186,0)
+ . . D ZXC($QS(G,C0CN)) ; LAST ONE
+"RTN","C0CXPATH",187,0)
+ . . S ZQ=1 ; QUIT NOW
+"RTN","C0CXPATH",188,0)
+ Q
+"RTN","C0CXPATH",189,0)
+ ;
+"RTN","C0CXPATH",190,0)
+ZXO(WHAT) 
+"RTN","C0CXPATH",191,0)
+ D PUSH("GA",WHAT)
+"RTN","C0CXPATH",192,0)
+ D PUSH(OUTXML,"<"_WHAT_">")
+"RTN","C0CXPATH",193,0)
+ Q
+"RTN","C0CXPATH",194,0)
+ ;
+"RTN","C0CXPATH",195,0)
+ZXC(WHAT) 
+"RTN","C0CXPATH",196,0)
+ D POP("GA",.TMP)
+"RTN","C0CXPATH",197,0)
+ D PUSH(OUTXML,"</"_WHAT_">")
+"RTN","C0CXPATH",198,0)
+ Q
+"RTN","C0CXPATH",199,0)
+ ;
+"RTN","C0CXPATH",200,0)
+ZXVAL(WHAT,VAL) 
+"RTN","C0CXPATH",201,0)
+ D PUSH(OUTXML,"<"_WHAT_">"_VAL_"</"_WHAT_">")
+"RTN","C0CXPATH",202,0)
+ Q
+"RTN","C0CXPATH",203,0)
+ ;
+"RTN","C0CXPATH",204,0)
+INDEX(IZXML,VDX,NOINX,TEMPLATE,REDUX) ; parse XML in IZXML and produce 
+"RTN","C0CXPATH",205,0)
+ ; an XPATH index; REDUX is a string to be removed from each xpath
+"RTN","C0CXPATH",206,0)
+ ; GPL 7/14/09 OPTIONALLY GENERATE AN XML TEMPLATE IF PASSED BY NAME
+"RTN","C0CXPATH",207,0)
+ ; TEMPLATE IS IDENTICAL TO THE PARSED XML LINE BY LINE
+"RTN","C0CXPATH",208,0)
+ ; EXCEPT THAT DATA VALUES ARE REPLACED WITH @@XPATH@@ FOR THE XPATH OF THE TAG
+"RTN","C0CXPATH",209,0)
+ ; GPL 5/24/09 AND OPTIONALLY PRODUCE THE VDX ARRAY PASSED BY NAME
+"RTN","C0CXPATH",210,0)
+ ; @VDX@("XPATH")=VALUE
+"RTN","C0CXPATH",211,0)
+ ; ex. @IZXML@("XPATH")=FIRSTLINE^LASTLINE
+"RTN","C0CXPATH",212,0)
+ ; WHERE FIRSTLINE AND LASTLINE ARE THE BEGINNING AND ENDING OF THE
+"RTN","C0CXPATH",213,0)
+ ; XML SECTION
+"RTN","C0CXPATH",214,0)
+ ; IZXML IS PASSED BY NAME
+"RTN","C0CXPATH",215,0)
+ ; IF NOINX IS SET TO 1, NO INDEX WILL BE GENERATED, BUT THE VDX WILL BE
+"RTN","C0CXPATH",216,0)
+ N I,LINE,FIRST,LAST,CUR,TMP,MDX,FOUND,CURVAL,DVDX,LCNT
+"RTN","C0CXPATH",217,0)
+ N C0CSTK ; LEAVE OUT FOR DEBUGGING
+"RTN","C0CXPATH",218,0)
+ I '$D(REDUX) S REDUX=""
+"RTN","C0CXPATH",219,0)
+ I '$D(NOINX) S NOINX=0 ; IF NOT PASSED, GENERATE AN INDEX
+"RTN","C0CXPATH",220,0)
+ N ZXML
+"RTN","C0CXPATH",221,0)
+ I NOINX S ZXML=$NA(^TMP("C0CINDEX",$J)) ; TEMP PLACE FOR INDEX TO DISCARD
+"RTN","C0CXPATH",222,0)
+ E  S ZXML=IZXML ; PLACE FOR INDEX TO KEEP
+"RTN","C0CXPATH",223,0)
+ I '$D(@IZXML@(0)) D  ; IF COUNT NOT IN NODE 0 COUNT THEM
+"RTN","C0CXPATH",224,0)
+ . S I="",LCNT=0
+"RTN","C0CXPATH",225,0)
+ . F  S I=$O(@IZXML@(I)) Q:I=""  S LCNT=LCNT+1
+"RTN","C0CXPATH",226,0)
+ E  S LCNT=@IZXML@(0) ; LINE COUNT PASSED IN ARRAY
+"RTN","C0CXPATH",227,0)
+ I LCNT=0  D  Q  ; NO XML PASSED
+"RTN","C0CXPATH",228,0)
+ . W "ERROR IN XML FILE",!
+"RTN","C0CXPATH",229,0)
+ S DVDX=0 ; DEFAULT DO NOT PRODUCE VDX INDEX
+"RTN","C0CXPATH",230,0)
+ I $D(VDX) S DVDX=1 ; IF NAME PASSED, DO VDX
+"RTN","C0CXPATH",231,0)
+ S C0CSTK(0)=0 ; INITIALIZE STACK
+"RTN","C0CXPATH",232,0)
+ K LKASD ; KILL LOOKASIDE ARRAY
+"RTN","C0CXPATH",233,0)
+ D MKLASD(.LKASD,IZXML) ;MAKE LOOK ASIDE BUFFER FOR MULTIPLES
+"RTN","C0CXPATH",234,0)
+ F I=1:1:LCNT  D  ; PROCESS THE ENTIRE ARRAY
+"RTN","C0CXPATH",235,0)
+ . S LINE=@IZXML@(I)
+"RTN","C0CXPATH",236,0)
+ . I $D(TEMPLATE) D  ;IF TEMPLATE IS REQUESTED
+"RTN","C0CXPATH",237,0)
+ . . S @TEMPLATE@(I)=$$CLEAN(LINE) 
+"RTN","C0CXPATH",238,0)
+ . ;W LINE,!
+"RTN","C0CXPATH",239,0)
+ . S FOUND=0  ; INTIALIZED FOUND FLAG
+"RTN","C0CXPATH",240,0)
+ . I LINE?.E1"<!".E S FOUND=1 ; SKIP OVER COMMENTS
+"RTN","C0CXPATH",241,0)
+ . I FOUND'=1  D
+"RTN","C0CXPATH",242,0)
+ . . I (LINE?.E1"<"1.E1"</".E)!(LINE?.E1"<"1.E1"/>".E)  D
+"RTN","C0CXPATH",243,0)
+ . . . ; THIS IS THE CASE THERE SECTION BEGINS AND ENDS
+"RTN","C0CXPATH",244,0)
+ . . . ; ON THE SAME LINE
+"RTN","C0CXPATH",245,0)
+ . . . ; W "FOUND ",LINE,!
+"RTN","C0CXPATH",246,0)
+ . . . S FOUND=1  ; SET FOUND FLAG
+"RTN","C0CXPATH",247,0)
+ . . . S CUR=$$XNAME(LINE) ; EXTRACT THE NAME
+"RTN","C0CXPATH",248,0)
+ . . . S CUR=CUR_$G(LKASD(CUR,I)) ; HANDLE MULTIPLES
+"RTN","C0CXPATH",249,0)
+ . . . D PUSH("C0CSTK",CUR) ; ADD TO THE STACK
+"RTN","C0CXPATH",250,0)
+ . . . D MKMDX("C0CSTK",.MDX,REDUX) ; GENERATE THE M INDEX
+"RTN","C0CXPATH",251,0)
+ . . . ; W "MDX=",MDX,!
+"RTN","C0CXPATH",252,0)
+ . . . I $D(@ZXML@(MDX))  D  ; IN THE INDEX, IS A MULTIPLE
+"RTN","C0CXPATH",253,0)
+ . . . . ;I '$D(ZDUP(MDX)) S ZDUP(MDX)=2
+"RTN","C0CXPATH",254,0)
+ . . . . ;E  S ZDUP(MDX)=ZDUP(MDX)+1
+"RTN","C0CXPATH",255,0)
+ . . . . ;W "DUP:",MDX,!
+"RTN","C0CXPATH",256,0)
+ . . . . ;I '$D(CURVAL) S CURVAL=""
+"RTN","C0CXPATH",257,0)
+ . . . . ;I DVDX S @VDX@(MDX_"["_ZDUP(MDX)_"]")=CURVAL
+"RTN","C0CXPATH",258,0)
+ . . . . S $P(@ZXML@(MDX),"^",2)=I ; UPDATE LAST LINE NUMBER
+"RTN","C0CXPATH",259,0)
+ . . . I '$D(@ZXML@(MDX))  D  ; NOT IN THE INDEX, NOT A MULTIPLE
+"RTN","C0CXPATH",260,0)
+ . . . . S @ZXML@(MDX)=I_"^"_I  ; ADD INDEX ENTRY-FIRST AND LAST
+"RTN","C0CXPATH",261,0)
+ . . . . S CURVAL=$$XVAL(LINE) ; VALUE
+"RTN","C0CXPATH",262,0)
+ . . . . S $P(@ZXML@(MDX),"^",3)=CURVAL ; THIRD PIECE
+"RTN","C0CXPATH",263,0)
+ . . . . I DVDX S @VDX@(MDX)=CURVAL ; FILL IN VDX ARRAY IF REQUESTED
+"RTN","C0CXPATH",264,0)
+ . . . . I $D(TEMPLATE) D  ; IF TEMPLATE IS REQUESTED
+"RTN","C0CXPATH",265,0)
+ . . . . . S LINE=$$CLEAN(LINE) ; CLEAN OUT CONTROL CHARACTERS
+"RTN","C0CXPATH",266,0)
+ . . . . . S @TEMPLATE@(I)=$P(LINE,">",1)_">@@"_MDX_"@@</"_$P(LINE,"</",2)
+"RTN","C0CXPATH",267,0)
+ . . . D POP("C0CSTK",.TMP) ; REMOVE FROM STACK
+"RTN","C0CXPATH",268,0)
+ . I FOUND'=1  D  ; THE LINE DOESN'T CONTAIN THE START AND END
+"RTN","C0CXPATH",269,0)
+ . . I LINE?.E1"</"1.E  D  ; LINE CONTAINS END OF A SECTION
+"RTN","C0CXPATH",270,0)
+ . . . ; W "FOUND ",LINE,!
+"RTN","C0CXPATH",271,0)
+ . . . S FOUND=1  ; SET FOUND FLAG
+"RTN","C0CXPATH",272,0)
+ . . . S CUR=$$XNAME(LINE) ; EXTRACT THE NAME
+"RTN","C0CXPATH",273,0)
+ . . . D MKMDX("C0CSTK",.MDX) ; GENERATE THE M INDEX
+"RTN","C0CXPATH",274,0)
+ . . . S $P(@ZXML@(MDX),"^",2)=I ; UPDATE LAST LINE NUMBER
+"RTN","C0CXPATH",275,0)
+ . . . D POP("C0CSTK",.TMP) ; REMOVE FROM STACK
+"RTN","C0CXPATH",276,0)
+ . . . S TMP=$P(TMP,"[",1) ; REMOVE [X] FROM MULTIPLE
+"RTN","C0CXPATH",277,0)
+ . . . I TMP'=CUR  D  ; MALFORMED XML, END MUST MATCH START
+"RTN","C0CXPATH",278,0)
+ . . . . W "MALFORMED XML ",CUR,"LINE "_I_LINE,!
+"RTN","C0CXPATH",279,0)
+ . . . . D PARY("C0CSTK") ; PRINT OUT THE STACK FOR DEBUGING
+"RTN","C0CXPATH",280,0)
+ . . . . Q
+"RTN","C0CXPATH",281,0)
+ . I FOUND'=1  D  ; THE LINE MIGHT CONTAIN A SECTION BEGINNING
+"RTN","C0CXPATH",282,0)
+ . . I (LINE?.E1"<"1.E)&(LINE'["?>")  D  ; BEGINNING OF A SECTION
+"RTN","C0CXPATH",283,0)
+ . . . ; W "FOUND ",LINE,!
+"RTN","C0CXPATH",284,0)
+ . . . S FOUND=1  ; SET FOUND FLAG
+"RTN","C0CXPATH",285,0)
+ . . . S CUR=$$XNAME(LINE) ; EXTRACT THE NAME
+"RTN","C0CXPATH",286,0)
+ . . . S CUR=CUR_$G(LKASD(CUR,I)) ; HANDLE MULTIPLES
+"RTN","C0CXPATH",287,0)
+ . . . D PUSH("C0CSTK",CUR) ; ADD TO THE STACK
+"RTN","C0CXPATH",288,0)
+ . . . D MKMDX("C0CSTK",.MDX) ; GENERATE THE M INDEX
+"RTN","C0CXPATH",289,0)
+ . . . ; W "MDX=",MDX,!
+"RTN","C0CXPATH",290,0)
+ . . . I $D(@ZXML@(MDX))  D  ; IN THE INDEX, IS A MULTIPLE
+"RTN","C0CXPATH",291,0)
+ . . . . S $P(@ZXML@(MDX),"^",2)=I ; UPDATE LAST LINE NUMBER
+"RTN","C0CXPATH",292,0)
+ . . . . ;B
+"RTN","C0CXPATH",293,0)
+ . . . I '$D(@ZXML@(MDX))  D  ; NOT IN THE INDEX, NOT A MULTIPLE
+"RTN","C0CXPATH",294,0)
+ . . . . S @ZXML@(MDX)=I_"^" ; INSERT INTO THE INDEX
+"RTN","C0CXPATH",295,0)
+ S @ZXML@("INDEXED")=""
+"RTN","C0CXPATH",296,0)
+ S @ZXML@("//")="1^"_LCNT ; ROOT XPATH
+"RTN","C0CXPATH",297,0)
+ I NOINX K @ZXML ; DELETE UNWANTED INDEX
+"RTN","C0CXPATH",298,0)
+ Q
+"RTN","C0CXPATH",299,0)
+ ;
+"RTN","C0CXPATH",300,0)
+MKLASD(OUTBUF,INARY) ; CREATE A LOOKASIDE BUFFER FOR MULTILPLES
+"RTN","C0CXPATH",301,0)
+ ;
+"RTN","C0CXPATH",302,0)
+ N ZI,ZN,ZA,ZLINE,ZLINE2,CUR,CUR2
+"RTN","C0CXPATH",303,0)
+ F ZI=1:1:LCNT-1  D  ; PROCESS THE ENTIRE ARRAY 
+"RTN","C0CXPATH",304,0)
+ . S ZLINE=@IZXML@(ZI)
+"RTN","C0CXPATH",305,0)
+ . I ZI<LCNT S ZLINE2=@IZXML@(ZI+1)
+"RTN","C0CXPATH",306,0)
+ . I ZLINE?.E1"</"1.E  D  ; NEXT LINE CONTAINS END OF A SECTION
+"RTN","C0CXPATH",307,0)
+ . . S CUR=$$XNAME(ZLINE) ; EXTRACT THE NAME
+"RTN","C0CXPATH",308,0)
+ . . I (ZLINE2?.E1"<"1.E)&(ZLINE'["?>")  D  ; BEGINNING OF A SECTION
+"RTN","C0CXPATH",309,0)
+ . . . S CUR2=$$XNAME(ZLINE2) ; EXTRACT THE NAME 
+"RTN","C0CXPATH",310,0)
+ . . . I CUR=CUR2 D  ; IF THIS IS A MULTIPLE
+"RTN","C0CXPATH",311,0)
+ . . . . S OUTBUF(CUR,ZI+1)=""
+"RTN","C0CXPATH",312,0)
+ ;ZWR OUTBUF
+"RTN","C0CXPATH",313,0)
+ S ZI=""
+"RTN","C0CXPATH",314,0)
+ F  S ZI=$O(OUTBUF(ZI)) Q:ZI=""  D  ; FOR EACH KIND OF MULTIPLE
+"RTN","C0CXPATH",315,0)
+ . S ZN=$O(OUTBUF(ZI,"")) ; LINE NUMBER OF SECOND MULTIPLE
+"RTN","C0CXPATH",316,0)
+ . F  S ZN=$O(@IZXML@(ZN),-1) Q:ZN=""  I $E($P(@IZXML@(ZN),"<"_ZI,2),1,1)=">" Q  ;
+"RTN","C0CXPATH",317,0)
+ . S OUTBUF(ZI,ZN)=""
+"RTN","C0CXPATH",318,0)
+ S ZA=1,ZI="",ZN=""
+"RTN","C0CXPATH",319,0)
+ F  S ZI=$O(OUTBUF(ZI)) Q:ZI=""  D  ; ADDING THE COUNT FOR THE MULIPLES [x]
+"RTN","C0CXPATH",320,0)
+ . S ZN="",ZA=1
+"RTN","C0CXPATH",321,0)
+ . F  S ZN=$O(OUTBUF(ZI,ZN)) Q:ZN=""  D  ;
+"RTN","C0CXPATH",322,0)
+ . . S OUTBUF(ZI,ZN)="["_ZA_"]"
+"RTN","C0CXPATH",323,0)
+ . . S ZA=ZA+1
+"RTN","C0CXPATH",324,0)
+ Q
+"RTN","C0CXPATH",325,0)
+ ;
+"RTN","C0CXPATH",326,0)
+CLEAN(STR,TR) ; extrinsic function; returns string
+"RTN","C0CXPATH",327,0)
+ ;; Removes all non printable characters from a string.
+"RTN","C0CXPATH",328,0)
+ ;; STR by Value
+"RTN","C0CXPATH",329,0)
+ ;; TR IS OPTIONAL TO IMPROVE PERFORMANCE
+"RTN","C0CXPATH",330,0)
+ N TR,I
+"RTN","C0CXPATH",331,0)
+ I '$D(TR) D  ;
+"RTN","C0CXPATH",332,0)
+ . F I=0:1:31 S TR=$G(TR)_$C(I)
+"RTN","C0CXPATH",333,0)
+ . S TR=TR_$C(127)
+"RTN","C0CXPATH",334,0)
+ QUIT $TR(STR,TR)
+"RTN","C0CXPATH",335,0)
+ ;
+"RTN","C0CXPATH",336,0)
+QUERY(IARY,XPATH,OARY)  ; RETURNS THE XML ARRAY MATCHING THE XPATH EXPRESSION
+"RTN","C0CXPATH",337,0)
+ ; XPATH IS OF THE FORM "//FIRST/SECOND/THIRD"
+"RTN","C0CXPATH",338,0)
+ ; IARY AND OARY ARE PASSED BY NAME
+"RTN","C0CXPATH",339,0)
+ I '$D(@IARY@("INDEXED"))  D  ; INDEX IS NOT PRESENT IN IARY
+"RTN","C0CXPATH",340,0)
+ . D INDEX(IARY) ; GENERATE AN INDEX FOR THE XML
+"RTN","C0CXPATH",341,0)
+ N FIRST,LAST ; FIRST AND LAST LINES OF ARRAY TO RETURN
+"RTN","C0CXPATH",342,0)
+ N TMP,I,J,QXPATH
+"RTN","C0CXPATH",343,0)
+ S FIRST=1
+"RTN","C0CXPATH",344,0)
+ I '$D(@IARY@(0)) D  ; LINE COUNT NOT IN ZERO NODE
+"RTN","C0CXPATH",345,0)
+ . S @IARY@(0)=$O(@IARY@("//"),-1) ; THIS SHOULD USUALLY WORK
+"RTN","C0CXPATH",346,0)
+ S LAST=@IARY@(0) ; FIRST AND LAST DEFAULT TO ROOT
+"RTN","C0CXPATH",347,0)
+ I XPATH'="//" D  ; NOT A ROOT QUERY
+"RTN","C0CXPATH",348,0)
+ . S TMP=@IARY@(XPATH) ; LOOK UP LINE VALUES
+"RTN","C0CXPATH",349,0)
+ . S FIRST=$P(TMP,"^",1)
+"RTN","C0CXPATH",350,0)
+ . S LAST=$P(TMP,"^",2)
+"RTN","C0CXPATH",351,0)
+ K @OARY
+"RTN","C0CXPATH",352,0)
+ S @OARY@(0)=+LAST-FIRST+1
+"RTN","C0CXPATH",353,0)
+ S J=1
+"RTN","C0CXPATH",354,0)
+ FOR I=FIRST:1:LAST  D
+"RTN","C0CXPATH",355,0)
+ . S @OARY@(J)=@IARY@(I) ; COPY THE LINE TO OARY
+"RTN","C0CXPATH",356,0)
+ . S J=J+1
+"RTN","C0CXPATH",357,0)
+ ; ZWR OARY
+"RTN","C0CXPATH",358,0)
+ Q
+"RTN","C0CXPATH",359,0)
+ ;
+"RTN","C0CXPATH",360,0)
+XF(IDX,XPATH)   ; EXTRINSIC TO RETURN THE STARTING LINE FROM AN XPATH
+"RTN","C0CXPATH",361,0)
+ ; INDEX WITH TWO PIECES START^FINISH
+"RTN","C0CXPATH",362,0)
+ ; IDX IS PASSED BY NAME
+"RTN","C0CXPATH",363,0)
+ Q $P(@IDX@(XPATH),"^",1)
+"RTN","C0CXPATH",364,0)
+ ;
+"RTN","C0CXPATH",365,0)
+XL(IDX,XPATH)   ; EXTRINSIC TO RETURN THE LAST LINE FROM AN XPATH
+"RTN","C0CXPATH",366,0)
+ ; INDEX WITH TWO PIECES START^FINISH
+"RTN","C0CXPATH",367,0)
+ ; IDX IS PASSED BY NAME
+"RTN","C0CXPATH",368,0)
+ Q $P(@IDX@(XPATH),"^",2)
+"RTN","C0CXPATH",369,0)
+ ;
+"RTN","C0CXPATH",370,0)
+START(ISTR)     ; EXTRINSIC TO RETURN THE STARTING LINE FROM AN INDEX
+"RTN","C0CXPATH",371,0)
+ ; TYPE STRING WITH THREE PIECES ARRAY;START;FINISH
+"RTN","C0CXPATH",372,0)
+ ; COMPANION TO FINISH ; IDX IS PASSED BY NAME
+"RTN","C0CXPATH",373,0)
+ Q $P(ISTR,";",2)
+"RTN","C0CXPATH",374,0)
+ ;
+"RTN","C0CXPATH",375,0)
+FINISH(ISTR)    ; EXTRINSIC TO RETURN THE LAST LINE FROM AN INDEX
+"RTN","C0CXPATH",376,0)
+ ; TYPE STRING WITH THREE PIECES ARRAY;START;FINISH
+"RTN","C0CXPATH",377,0)
+ Q $P(ISTR,";",3)
+"RTN","C0CXPATH",378,0)
+ ;
+"RTN","C0CXPATH",379,0)
+ARRAY(ISTR)     ; EXTRINSIC TO RETURN THE ARRAY REFERENCE FROM AN INDEX
+"RTN","C0CXPATH",380,0)
+ ; TYPE STRING WITH THREE PIECES ARRAY;START;FINISH
+"RTN","C0CXPATH",381,0)
+ Q $P(ISTR,";",1)
+"RTN","C0CXPATH",382,0)
+ ;
+"RTN","C0CXPATH",383,0)
+BUILD(BLIST,BDEST)      ; A COPY MACHINE THAT TAKE INSTRUCTIONS IN ARRAY BLIST
+"RTN","C0CXPATH",384,0)
+ ; WHICH HAVE ARRAY;START;FINISH AND COPIES THEM TO DEST
+"RTN","C0CXPATH",385,0)
+ ; DEST IS CLEARED TO START
+"RTN","C0CXPATH",386,0)
+ ; USES PUSH TO DO THE COPY
+"RTN","C0CXPATH",387,0)
+ N I
+"RTN","C0CXPATH",388,0)
+ K @BDEST
+"RTN","C0CXPATH",389,0)
+ F I=1:1:@BLIST@(0) D  ; FOR EACH INSTRUCTION IN BLIST
+"RTN","C0CXPATH",390,0)
+ . N J,ATMP
+"RTN","C0CXPATH",391,0)
+ . S ATMP=$$ARRAY(@BLIST@(I))
+"RTN","C0CXPATH",392,0)
+ . I $G(DEBUG) W "ATMP=",ATMP,!
+"RTN","C0CXPATH",393,0)
+ . I $G(DEBUG) W @BLIST@(I),!
+"RTN","C0CXPATH",394,0)
+ . F J=$$START(@BLIST@(I)):1:$$FINISH(@BLIST@(I)) D  ;
+"RTN","C0CXPATH",395,0)
+ . . ; FOR EACH LINE IN THIS INSTR
+"RTN","C0CXPATH",396,0)
+ . . I $G(DEBUG) W "BDEST= ",BDEST,!
+"RTN","C0CXPATH",397,0)
+ . . I $G(DEBUG) W "ATMP= ",@ATMP@(J),!
+"RTN","C0CXPATH",398,0)
+ . . D PUSH(BDEST,@ATMP@(J))
+"RTN","C0CXPATH",399,0)
+ Q
+"RTN","C0CXPATH",400,0)
+ ;
+"RTN","C0CXPATH",401,0)
+QUEUE(BLST,ARRAY,FIRST,LAST)    ; ADD AN ENTRY TO A BLIST
+"RTN","C0CXPATH",402,0)
+ ;
+"RTN","C0CXPATH",403,0)
+ I $G(DEBUG) W "QUEUEING ",BLST,!
+"RTN","C0CXPATH",404,0)
+ D PUSH(BLST,ARRAY_";"_FIRST_";"_LAST)
+"RTN","C0CXPATH",405,0)
+ Q
+"RTN","C0CXPATH",406,0)
+ ;
+"RTN","C0CXPATH",407,0)
+CP(CPSRC,CPDEST)        ; COPIES CPSRC TO CPDEST BOTH PASSED BY NAME
+"RTN","C0CXPATH",408,0)
+ ; KILLS CPDEST FIRST
+"RTN","C0CXPATH",409,0)
+ N CPINSTR
+"RTN","C0CXPATH",410,0)
+ I $G(DEBUG) W "MADE IT TO COPY",CPSRC,CPDEST,!
+"RTN","C0CXPATH",411,0)
+ I @CPSRC@(0)<1 D  ; BAD LENGTH
+"RTN","C0CXPATH",412,0)
+ . W "ERROR IN COPY BAD SOURCE LENGTH: ",CPSRC,!
+"RTN","C0CXPATH",413,0)
+ . Q
+"RTN","C0CXPATH",414,0)
+ ; I '$D(@CPDEST@(0)) S @CPDEST@(0)=0 ; IF THE DEST IS EMPTY, INIT
+"RTN","C0CXPATH",415,0)
+ D QUEUE("CPINSTR",CPSRC,1,@CPSRC@(0)) ; BLIST FOR ENTIRE ARRAY
+"RTN","C0CXPATH",416,0)
+ D BUILD("CPINSTR",CPDEST)
+"RTN","C0CXPATH",417,0)
+ Q
+"RTN","C0CXPATH",418,0)
+ ;
+"RTN","C0CXPATH",419,0)
+QOPEN(QOBLIST,QOXML,QOXPATH)    ; ADD ALL BUT THE LAST LINE OF QOXML TO QOBLIST
+"RTN","C0CXPATH",420,0)
+ ; WARNING NEED TO DO QCLOSE FOR SAME XML BEFORE CALLING BUILD
+"RTN","C0CXPATH",421,0)
+ ; QOXPATH IS OPTIONAL - WILL OPEN INSIDE THE XPATH POINT
+"RTN","C0CXPATH",422,0)
+ ; USED TO INSERT CHILDREN NODES
+"RTN","C0CXPATH",423,0)
+ I @QOXML@(0)<1 D  ; MALFORMED XML
+"RTN","C0CXPATH",424,0)
+ . W "MALFORMED XML PASSED TO QOPEN: ",QOXML,!
+"RTN","C0CXPATH",425,0)
+ . Q
+"RTN","C0CXPATH",426,0)
+ I $G(DEBUG) W "DOING QOPEN",!
+"RTN","C0CXPATH",427,0)
+ N S1,E1,QOT,QOTMP
+"RTN","C0CXPATH",428,0)
+ S S1=1 ; OPEN FROM THE BEGINNING OF THE XML
+"RTN","C0CXPATH",429,0)
+ I $D(QOXPATH) D  ; XPATH PROVIDED
+"RTN","C0CXPATH",430,0)
+ . D QUERY(QOXML,QOXPATH,"QOT") ; INSURE INDEX
+"RTN","C0CXPATH",431,0)
+ . S E1=$P(@QOXML@(QOXPATH),"^",2)-1
+"RTN","C0CXPATH",432,0)
+ I '$D(QOXPATH) D  ; NO XPATH PROVIDED, OPEN AT ROOT
+"RTN","C0CXPATH",433,0)
+ . S E1=@QOXML@(0)-1
+"RTN","C0CXPATH",434,0)
+ D QUEUE(QOBLIST,QOXML,S1,E1)
+"RTN","C0CXPATH",435,0)
+ ; S QOTMP=QOXML_"^"_S1_"^"_E1
+"RTN","C0CXPATH",436,0)
+ ; D PUSH(QOBLIST,QOTMP)
+"RTN","C0CXPATH",437,0)
+ Q
+"RTN","C0CXPATH",438,0)
+ ;
+"RTN","C0CXPATH",439,0)
+QCLOSE(QCBLIST,QCXML,QCXPATH)   ; CLOSE XML AFTER A QOPEN
+"RTN","C0CXPATH",440,0)
+ ; ADDS THE LIST LINE OF QCXML TO QCBLIST
+"RTN","C0CXPATH",441,0)
+ ; USED TO FINISH INSERTING CHILDERN NODES
+"RTN","C0CXPATH",442,0)
+ ; QCXPATH IS OPTIONAL - IF PROVIDED, WILL CLOSE UNTIL THE END
+"RTN","C0CXPATH",443,0)
+ ; IF QOPEN WAS CALLED WITH XPATH, QCLOSE SHOULD BE TOO
+"RTN","C0CXPATH",444,0)
+ I @QCXML@(0)<1 D  ; MALFORMED XML
+"RTN","C0CXPATH",445,0)
+ . W "MALFORMED XML PASSED TO QCLOSE: ",QCXML,!
+"RTN","C0CXPATH",446,0)
+ I $G(DEBUG) W "GOING TO CLOSE",!
+"RTN","C0CXPATH",447,0)
+ N S1,E1,QCT,QCTMP
+"RTN","C0CXPATH",448,0)
+ S E1=@QCXML@(0) ; CLOSE UNTIL THE END OF THE XML
+"RTN","C0CXPATH",449,0)
+ I $D(QCXPATH) D  ; XPATH PROVIDED
+"RTN","C0CXPATH",450,0)
+ . D QUERY(QCXML,QCXPATH,"QCT") ; INSURE INDEX
+"RTN","C0CXPATH",451,0)
+ . S S1=$P(@QCXML@(QCXPATH),"^",2) ; REMAINING XML
+"RTN","C0CXPATH",452,0)
+ I '$D(QCXPATH) D  ; NO XPATH PROVIDED, CLOSE AT ROOT
+"RTN","C0CXPATH",453,0)
+ . S S1=@QCXML@(0)
+"RTN","C0CXPATH",454,0)
+ D QUEUE(QCBLIST,QCXML,S1,E1)
+"RTN","C0CXPATH",455,0)
+ ; D PUSH(QCBLIST,QCXML_";"_S1_";"_E1)
+"RTN","C0CXPATH",456,0)
+ Q
+"RTN","C0CXPATH",457,0)
+ ;
+"RTN","C0CXPATH",458,0)
+INSERT(INSXML,INSNEW,INSXPATH)  ; INSERT INSNEW INTO INSXML AT THE
+"RTN","C0CXPATH",459,0)
+ ; INSXPATH XPATH POINT INSXPATH IS OPTIONAL - IF IT IS
+"RTN","C0CXPATH",460,0)
+ ; OMITTED, INSERTION WILL BE AT THE ROOT
+"RTN","C0CXPATH",461,0)
+ ; NOTE INSERT IS NON DESTRUCTIVE AND WILL ADD THE NEW
+"RTN","C0CXPATH",462,0)
+ ; XML AT THE END OF THE XPATH POINT
+"RTN","C0CXPATH",463,0)
+ ; INSXML AND INSNEW ARE PASSED BY NAME INSXPATH IS A VALUE
+"RTN","C0CXPATH",464,0)
+ N INSBLD,INSTMP
+"RTN","C0CXPATH",465,0)
+ I $G(DEBUG) W "DOING INSERT ",INSXML,INSNEW,INSXPATH,!
+"RTN","C0CXPATH",466,0)
+ I $G(DEBUG) F G1=1:1:@INSXML@(0) W @INSXML@(G1),!
+"RTN","C0CXPATH",467,0)
+ I '$D(@INSXML@(1)) D  ; INSERT INTO AN EMPTY ARRAY
+"RTN","C0CXPATH",468,0)
+ . D CP^C0CXPATH(INSNEW,INSXML) ; JUST COPY INTO THE OUTPUT
+"RTN","C0CXPATH",469,0)
+ I $D(@INSXML@(1)) D  ; IF ORIGINAL ARRAY IS NOT EMPTY
+"RTN","C0CXPATH",470,0)
+ . I '$D(@INSXML@(0)) S @INSXML@(0)=$O(@INSXML@(""),-1) ;SET LENGTH
+"RTN","C0CXPATH",471,0)
+ . I $D(INSXPATH) D  ; XPATH PROVIDED
+"RTN","C0CXPATH",472,0)
+ . . D QOPEN("INSBLD",INSXML,INSXPATH) ; COPY THE BEFORE
+"RTN","C0CXPATH",473,0)
+ . . I $G(DEBUG) D PARY^C0CXPATH("INSBLD")
+"RTN","C0CXPATH",474,0)
+ . I '$D(INSXPATH) D  ; NO XPATH PROVIDED, OPEN AT ROOT
+"RTN","C0CXPATH",475,0)
+ . . D QOPEN("INSBLD",INSXML,"//") ; OPEN WITH ROOT XPATH
+"RTN","C0CXPATH",476,0)
+ . I '$D(@INSNEW@(0)) S @INSNEW@(0)=$O(@INSNEW@(""),-1) ;SIZE OF XML
+"RTN","C0CXPATH",477,0)
+ . D QUEUE("INSBLD",INSNEW,1,@INSNEW@(0)) ; COPY IN NEW XML
+"RTN","C0CXPATH",478,0)
+ . I $D(INSXPATH) D  ; XPATH PROVIDED
+"RTN","C0CXPATH",479,0)
+ . . D QCLOSE("INSBLD",INSXML,INSXPATH) ; CLOSE WITH XPATH
+"RTN","C0CXPATH",480,0)
+ . I '$D(INSXPATH) D  ; NO XPATH PROVIDED, CLOSE AT ROOT
+"RTN","C0CXPATH",481,0)
+ . . D QCLOSE("INSBLD",INSXML,"//") ; CLOSE WITH ROOT XPATH
+"RTN","C0CXPATH",482,0)
+ . D BUILD("INSBLD","INSTMP") ; PUT RESULTS IN INDEST
+"RTN","C0CXPATH",483,0)
+ . D CP^C0CXPATH("INSTMP",INSXML) ; COPY BUFFER TO SOURCE
+"RTN","C0CXPATH",484,0)
+ Q
+"RTN","C0CXPATH",485,0)
+ ;
+"RTN","C0CXPATH",486,0)
+INSINNER(INNXML,INNNEW,INNXPATH)        ; INSERT THE INNER XML OF INNNEW
+"RTN","C0CXPATH",487,0)
+ ; INTO INNXML AT THE INNXPATH XPATH POINT
+"RTN","C0CXPATH",488,0)
+ ;
+"RTN","C0CXPATH",489,0)
+ N INNBLD,UXPATH
+"RTN","C0CXPATH",490,0)
+ N INNTBUF
+"RTN","C0CXPATH",491,0)
+ S INNTBUF=$NA(^TMP($J,"INNTBUF"))
+"RTN","C0CXPATH",492,0)
+ I '$D(INNXPATH) D  ; XPATH NOT PASSED
+"RTN","C0CXPATH",493,0)
+ . S UXPATH="//" ; USE ROOT XPATH
+"RTN","C0CXPATH",494,0)
+ I $D(INNXPATH) S UXPATH=INNXPATH ; USE THE XPATH THAT'S PASSED
+"RTN","C0CXPATH",495,0)
+ I '$D(@INNXML@(0)) D  ; INNXML IS EMPTY
+"RTN","C0CXPATH",496,0)
+ . D QUEUE^C0CXPATH("INNBLD",INNNEW,2,@INNNEW@(0)-1) ; JUST INNER
+"RTN","C0CXPATH",497,0)
+ . D BUILD("INNBLD",INNXML)
+"RTN","C0CXPATH",498,0)
+ I @INNXML@(0)>0  D  ; NOT EMPTY
+"RTN","C0CXPATH",499,0)
+ . D QOPEN("INNBLD",INNXML,UXPATH) ;
+"RTN","C0CXPATH",500,0)
+ . D QUEUE("INNBLD",INNNEW,2,@INNNEW@(0)-1) ; JUST INNER XML
+"RTN","C0CXPATH",501,0)
+ . D QCLOSE("INNBLD",INNXML,UXPATH)
+"RTN","C0CXPATH",502,0)
+ . D BUILD("INNBLD",INNTBUF) ; BUILD TO BUFFER
+"RTN","C0CXPATH",503,0)
+ . D CP(INNTBUF,INNXML) ; COPY BUFFER TO DEST
+"RTN","C0CXPATH",504,0)
+ Q
+"RTN","C0CXPATH",505,0)
+ ;
+"RTN","C0CXPATH",506,0)
+INSB4(XDEST,XNEW) ; INSERT XNEW AT THE BEGINNING OF XDEST
+"RTN","C0CXPATH",507,0)
+ ; BUT XDEST AN XNEW ARE PASSED BY NAME
+"RTN","C0CXPATH",508,0)
+ N XBLD,XTMP
+"RTN","C0CXPATH",509,0)
+ D QUEUE("XBLD",XDEST,1,1) ; NEED TO PRESERVE SECTION ROOT
+"RTN","C0CXPATH",510,0)
+ D QUEUE("XBLD",XNEW,1,@XNEW@(0)) ; ALL OF NEW XML FIRST
+"RTN","C0CXPATH",511,0)
+ D QUEUE("XBLD",XDEST,2,@XDEST@(0)) ; FOLLOWED BY THE REST OF SECTION
+"RTN","C0CXPATH",512,0)
+ D BUILD("XBLD","XTMP") ; BUILD THE RESULT
+"RTN","C0CXPATH",513,0)
+ D CP("XTMP",XDEST) ; COPY TO THE DESTINATION
+"RTN","C0CXPATH",514,0)
+ I $G(DEBUG) D PARY("XDEST")
+"RTN","C0CXPATH",515,0)
+ Q
+"RTN","C0CXPATH",516,0)
+ ;
+"RTN","C0CXPATH",517,0)
+REPLACE(REXML,RENEW,REXPATH)    ; REPLACE THE XML AT THE XPATH POINT
+"RTN","C0CXPATH",518,0)
+ ; WITH RENEW - NOTE THIS WILL DELETE WHAT WAS THERE BEFORE
+"RTN","C0CXPATH",519,0)
+ ; REXML AND RENEW ARE PASSED BY NAME XPATH IS A VALUE
+"RTN","C0CXPATH",520,0)
+ ; THE DELETED XML IS PUT IN ^TMP($J,"REPLACE_OLD")
+"RTN","C0CXPATH",521,0)
+ N REBLD,XFIRST,XLAST,OLD,XNODE,RETMP
+"RTN","C0CXPATH",522,0)
+ S OLD=$NA(^TMP($J,"REPLACE_OLD"))
+"RTN","C0CXPATH",523,0)
+ D QUERY(REXML,REXPATH,OLD) ; CREATE INDEX, TEST XPATH, MAKE OLD
+"RTN","C0CXPATH",524,0)
+ S XNODE=@REXML@(REXPATH) ; PULL OUT FIRST AND LAST LINE PTRS
+"RTN","C0CXPATH",525,0)
+ S XFIRST=$P(XNODE,"^",1)
+"RTN","C0CXPATH",526,0)
+ S XLAST=$P(XNODE,"^",2)
+"RTN","C0CXPATH",527,0)
+ I RENEW="" D  ; WE ARE DELETING A SECTION, MUST SAVE THE TAG
+"RTN","C0CXPATH",528,0)
+ . D QUEUE("REBLD",REXML,1,XFIRST) ; THE BEFORE
+"RTN","C0CXPATH",529,0)
+ . D QUEUE("REBLD",REXML,XLAST,@REXML@(0)) ; THE REST
+"RTN","C0CXPATH",530,0)
+ I RENEW'="" D  ; NEW XML IS NOT NULL
+"RTN","C0CXPATH",531,0)
+ . D QUEUE("REBLD",REXML,1,XFIRST-1) ; THE BEFORE
+"RTN","C0CXPATH",532,0)
+ . D QUEUE("REBLD",RENEW,1,@RENEW@(0)) ; THE NEW
+"RTN","C0CXPATH",533,0)
+ . D QUEUE("REBLD",REXML,XLAST+1,@REXML@(0)) ; THE REST
+"RTN","C0CXPATH",534,0)
+ I $G(DEBUG) W "REPLACE PREBUILD",!
+"RTN","C0CXPATH",535,0)
+ I $G(DEBUG) D PARY("REBLD")
+"RTN","C0CXPATH",536,0)
+ D BUILD("REBLD","RTMP")
+"RTN","C0CXPATH",537,0)
+ K @REXML ; KILL WHAT WAS THERE
+"RTN","C0CXPATH",538,0)
+ D CP("RTMP",REXML) ; COPY IN THE RESULT
+"RTN","C0CXPATH",539,0)
+ Q
+"RTN","C0CXPATH",540,0)
+ ;
+"RTN","C0CXPATH",541,0)
+DELETE(REXML,REXPATH)    ; DELETE THE XML AT THE XPATH POINT
+"RTN","C0CXPATH",542,0)
+ ; REXML IS PASSED BY NAME XPATH IS A VALUE
+"RTN","C0CXPATH",543,0)
+ N REBLD,XFIRST,XLAST,OLD,XNODE,RETMP
+"RTN","C0CXPATH",544,0)
+ S OLD=$NA(^TMP($J,"REPLACE_OLD"))
+"RTN","C0CXPATH",545,0)
+ D QUERY(REXML,REXPATH,OLD) ; CREATE INDEX, TEST XPATH, MAKE OLD
+"RTN","C0CXPATH",546,0)
+ S XNODE=@REXML@(REXPATH) ; PULL OUT FIRST AND LAST LINE PTRS
+"RTN","C0CXPATH",547,0)
+ S XFIRST=$P(XNODE,"^",1)
+"RTN","C0CXPATH",548,0)
+ S XLAST=$P(XNODE,"^",2)
+"RTN","C0CXPATH",549,0)
+ D QUEUE("REBLD",REXML,1,XFIRST-1) ; THE BEFORE
+"RTN","C0CXPATH",550,0)
+ D QUEUE("REBLD",REXML,XLAST+1,@REXML@(0)) ; THE REST
+"RTN","C0CXPATH",551,0)
+ I $G(DEBUG) D PARY("REBLD")
+"RTN","C0CXPATH",552,0)
+ D BUILD("REBLD","RTMP")
+"RTN","C0CXPATH",553,0)
+ K @REXML ; KILL WHAT WAS THERE
+"RTN","C0CXPATH",554,0)
+ D CP("RTMP",REXML) ; COPY IN THE RESULT
+"RTN","C0CXPATH",555,0)
+ Q
+"RTN","C0CXPATH",556,0)
+ ;
+"RTN","C0CXPATH",557,0)
+MISSING(IXML,OARY)      ; SEARTH THROUGH INXLM AND PUT ANY @@X@@ VARS IN OARY
+"RTN","C0CXPATH",558,0)
+ ; W "Reporting on the missing",!
+"RTN","C0CXPATH",559,0)
+ ; W OARY
+"RTN","C0CXPATH",560,0)
+ I '$D(@IXML@(0)) W "MALFORMED XML PASSED TO MISSING",! Q
+"RTN","C0CXPATH",561,0)
+ N I
+"RTN","C0CXPATH",562,0)
+ S @OARY@(0)=0 ; INITIALIZED MISSING COUNT
+"RTN","C0CXPATH",563,0)
+ F I=1:1:@IXML@(0)  D   ; LOOP THROUGH WHOLE ARRAY
+"RTN","C0CXPATH",564,0)
+ . I @IXML@(I)?.E1"@@".E D  ; MISSING VARIABLE HERE
+"RTN","C0CXPATH",565,0)
+ . . D PUSH^C0CXPATH(OARY,$P(@IXML@(I),"@@",2)) ; ADD TO OUTARY
+"RTN","C0CXPATH",566,0)
+ . . Q
+"RTN","C0CXPATH",567,0)
+ Q
+"RTN","C0CXPATH",568,0)
+ ;
+"RTN","C0CXPATH",569,0)
+MAP(IXML,INARY,OXML) ; SUBSTITUTE MULTIPLE @@X@@ VARS WITH VALUES IN INARY
+"RTN","C0CXPATH",570,0)
+ ; AND PUT THE RESULTS IN OXML
+"RTN","C0CXPATH",571,0)
+ N XCNT
+"RTN","C0CXPATH",572,0)
+ I '$D(DEBUG) S DEBUG=0
+"RTN","C0CXPATH",573,0)
+ I '$D(IXML) W "MALFORMED XML PASSED TO MAP",! Q
+"RTN","C0CXPATH",574,0)
+ I '$D(@IXML@(0)) D  ; INITIALIZE COUNT
+"RTN","C0CXPATH",575,0)
+ . S XCNT=$O(@IXML@(""),-1)
+"RTN","C0CXPATH",576,0)
+ E  S XCNT=@IXML@(0) ;COUNT
+"RTN","C0CXPATH",577,0)
+ I $O(@INARY@(""))="" W "EMPTY ARRAY PASSED TO MAP",! Q
+"RTN","C0CXPATH",578,0)
+ N I,J,TNAM,TVAL,TSTR
+"RTN","C0CXPATH",579,0)
+ S @OXML@(0)=XCNT ; TOTAL LINES IN OUTPUT
+"RTN","C0CXPATH",580,0)
+ F I=1:1:XCNT  D   ; LOOP THROUGH WHOLE ARRAY
+"RTN","C0CXPATH",581,0)
+ . S @OXML@(I)=@IXML@(I) ; COPY THE LINE TO OUTPUT
+"RTN","C0CXPATH",582,0)
+ . I @OXML@(I)?.E1"@@".E D  ; IS THERE A VARIABLE HERE?
+"RTN","C0CXPATH",583,0)
+ . . S TSTR=$P(@IXML@(I),"@@",1) ; INIT TO PART BEFORE VARS
+"RTN","C0CXPATH",584,0)
+ . . F J=2:2:10  D  Q:$P(@IXML@(I),"@@",J+2)=""  ; QUIT IF NO MORE VARS
+"RTN","C0CXPATH",585,0)
+ . . . I DEBUG W "IN MAPPING LOOP: ",TSTR,!
+"RTN","C0CXPATH",586,0)
+ . . . S TNAM=$P(@OXML@(I),"@@",J) ; EXTRACT THE VARIABLE NAME
+"RTN","C0CXPATH",587,0)
+ . . . S TVAL="@@"_$P(@IXML@(I),"@@",J)_"@@" ; DEFAULT UNCHANGED
+"RTN","C0CXPATH",588,0)
+ . . . I $D(@INARY@(TNAM))  D  ; IS THE VARIABLE IN THE MAP?
+"RTN","C0CXPATH",589,0)
+ . . . . I '$D(@INARY@(TNAM,"F")) D  ; NOT A SPECIAL FIELD
+"RTN","C0CXPATH",590,0)
+ . . . . . S TVAL=@INARY@(TNAM) ; PULL OUT MAPPED VALUE
+"RTN","C0CXPATH",591,0)
+ . . . . E  D DOFLD ; PROCESS A FIELD
+"RTN","C0CXPATH",592,0)
+ . . . S TVAL=$$SYMENC^MXMLUTL(TVAL) ;MAKE SURE THE VALUE IS XML SAFE
+"RTN","C0CXPATH",593,0)
+ . . . S TSTR=TSTR_TVAL_$P(@IXML@(I),"@@",J+1) ; ADD VAR AND PART AFTER
+"RTN","C0CXPATH",594,0)
+ . . S @OXML@(I)=TSTR ; COPY LINE WITH MAPPED VALUES
+"RTN","C0CXPATH",595,0)
+ . . I DEBUG W TSTR
+"RTN","C0CXPATH",596,0)
+ I DEBUG W "MAPPED",!
+"RTN","C0CXPATH",597,0)
+ Q
+"RTN","C0CXPATH",598,0)
+ ;
+"RTN","C0CXPATH",599,0)
+DOFLD ; PROCESS A FILEMAN FIELD REFERENCED BY A VARIABLE
+"RTN","C0CXPATH",600,0)
+ ;
+"RTN","C0CXPATH",601,0)
+ Q
+"RTN","C0CXPATH",602,0)
+ ;
+"RTN","C0CXPATH",603,0)
+TRIM(THEXML) ; TAKES OUT ALL NULL ELEMENTS
+"RTN","C0CXPATH",604,0)
+ ; THEXML IS PASSED BY NAME
+"RTN","C0CXPATH",605,0)
+ N I,J,TMPXML,DEL,FOUND,INTXT
+"RTN","C0CXPATH",606,0)
+ S FOUND=0
+"RTN","C0CXPATH",607,0)
+ S INTXT=0
+"RTN","C0CXPATH",608,0)
+ I $G(DEBUG) W "DELETING EMPTY ELEMENTS",!
+"RTN","C0CXPATH",609,0)
+ F I=1:1:(@THEXML@(0)-1) D  ; LOOP THROUGH ENTIRE ARRAY
+"RTN","C0CXPATH",610,0)
+ . S J=@THEXML@(I)
+"RTN","C0CXPATH",611,0)
+ . I J["<text>" D
+"RTN","C0CXPATH",612,0)
+ . . S INTXT=1 ; IN HTML SECTION, DON'T TRIM
+"RTN","C0CXPATH",613,0)
+ . . I $G(DEBUG) W "IN HTML SECTION",!
+"RTN","C0CXPATH",614,0)
+ . N JM,JP,JPX ; JMINUS AND JPLUS
+"RTN","C0CXPATH",615,0)
+ . S JM=@THEXML@(I-1) ; LINE BEFORE
+"RTN","C0CXPATH",616,0)
+ . I JM["</text>" S INTXT=0 ; LEFT HTML SECTION,START TRIM
+"RTN","C0CXPATH",617,0)
+ . S JP=@THEXML@(I+1) ; LINE AFTER
+"RTN","C0CXPATH",618,0)
+ . I INTXT=0 D  ; IF NOT IN AN HTML SECTION
+"RTN","C0CXPATH",619,0)
+ . . S JPX=$TR(JP,"/","") ; REMOVE THE SLASH
+"RTN","C0CXPATH",620,0)
+ . . I J=JPX D  ; AN EMPTY ELEMENT ON TWO LINES
+"RTN","C0CXPATH",621,0)
+ . . . I $G(DEBUG) W I,J,JP,!
+"RTN","C0CXPATH",622,0)
+ . . . S FOUND=1 ; FOUND SOMETHING TO BE DELETED
+"RTN","C0CXPATH",623,0)
+ . . . S DEL(I)="" ; SET LINE TO DELETE
+"RTN","C0CXPATH",624,0)
+ . . . S DEL(I+1)="" ; SET NEXT LINE TO DELETE
+"RTN","C0CXPATH",625,0)
+ . . I J["><" D  ; AN EMPTY ELEMENT ON ONE LINE
+"RTN","C0CXPATH",626,0)
+ . . . I $G(DEBUG) W I,J,!
+"RTN","C0CXPATH",627,0)
+ . . . S FOUND=1 ; FOUND SOMETHING TO BE DELETED
+"RTN","C0CXPATH",628,0)
+ . . . S DEL(I)="" ; SET THE EMPTY LINE UP TO BE DELETED
+"RTN","C0CXPATH",629,0)
+ . . . I JM=JPX D  ;
+"RTN","C0CXPATH",630,0)
+ . . . . I $G(DEBUG) W I,JM_J_JPX,!
+"RTN","C0CXPATH",631,0)
+ . . . . S DEL(I-1)=""
+"RTN","C0CXPATH",632,0)
+ . . . . S DEL(I+1)="" ; SET THE SURROUNDING LINES FOR DEL
+"RTN","C0CXPATH",633,0)
+ ; . I J'["><" D PUSH("TMPXML",J)
+"RTN","C0CXPATH",634,0)
+ I FOUND D  ; NEED TO DELETE THINGS
+"RTN","C0CXPATH",635,0)
+ . F I=1:1:@THEXML@(0) D  ; COPY ARRAY LEAVING OUT DELELTED LINES
+"RTN","C0CXPATH",636,0)
+ . . I '$D(DEL(I)) D  ; IF THE LINE IS NOT DELETED
+"RTN","C0CXPATH",637,0)
+ . . . D PUSH("TMPXML",@THEXML@(I)) ; COPY TO TMPXML ARRAY
+"RTN","C0CXPATH",638,0)
+ . D CP("TMPXML",THEXML) ; REPLACE THE XML WITH THE COPY
+"RTN","C0CXPATH",639,0)
+ Q FOUND
+"RTN","C0CXPATH",640,0)
+ ;
+"RTN","C0CXPATH",641,0)
+UNMARK(XSEC) ; REMOVE MARKUP FROM FIRST AND LAST LINE OF XML
+"RTN","C0CXPATH",642,0)
+ ; XSEC IS A SECTION PASSED BY NAME
+"RTN","C0CXPATH",643,0)
+ N XBLD,XTMP
+"RTN","C0CXPATH",644,0)
+ D QUEUE("XBLD",XSEC,2,@XSEC@(0)-1) ; BUILD LIST FOR INNER XML
+"RTN","C0CXPATH",645,0)
+ D BUILD("XBLD","XTMP") ; BUILD THE RESULT
+"RTN","C0CXPATH",646,0)
+ D CP("XTMP",XSEC) ; REPLACE PASSED XML
+"RTN","C0CXPATH",647,0)
+ Q
+"RTN","C0CXPATH",648,0)
+ ;
+"RTN","C0CXPATH",649,0)
+PARY(GLO,ZN)       ;PRINT AN ARRAY
+"RTN","C0CXPATH",650,0)
+ ; IF ZN=-1 NO LINE NUMBERS
+"RTN","C0CXPATH",651,0)
+ N I
+"RTN","C0CXPATH",652,0)
+ F I=1:1:@GLO@(0) D  ;
+"RTN","C0CXPATH",653,0)
+ . I $G(ZN)=-1 W @GLO@(I),!
+"RTN","C0CXPATH",654,0)
+ . E  W I_" "_@GLO@(I),!
+"RTN","C0CXPATH",655,0)
+ Q
+"RTN","C0CXPATH",656,0)
+ ;
+"RTN","C0CXPATH",657,0)
+H2ARY(IARYRTN,IHASH,IPRE) ; CONVERT IHASH TO RETURN ARRAY
+"RTN","C0CXPATH",658,0)
+ ; IPRE IS OPTIONAL PREFIX FOR THE ELEMENTS. USED FOR MUPTIPLES 1^"VAR"^VALUE
+"RTN","C0CXPATH",659,0)
+ I '$D(IPRE) S IPRE=""
+"RTN","C0CXPATH",660,0)
+ N H2I S H2I=""
+"RTN","C0CXPATH",661,0)
+ ; W $O(@IHASH@(H2I)),!
+"RTN","C0CXPATH",662,0)
+ F  S H2I=$O(@IHASH@(H2I)) Q:H2I=""  D  ; FOR EACH ELEMENT OF THE HASH
+"RTN","C0CXPATH",663,0)
+ . I $QS(H2I,$QL(H2I))="M" D  Q  ; SPECIAL CASE FOR MULTIPLES
+"RTN","C0CXPATH",664,0)
+ . . ;W H2I_"^"_@IHASH@(H2I),!
+"RTN","C0CXPATH",665,0)
+ . . N IH,IHI
+"RTN","C0CXPATH",666,0)
+ . . S IH=$NA(@IHASH@(H2I)) ;
+"RTN","C0CXPATH",667,0)
+ . . S IH2A=$O(@IH@("")) ; SKIP OVER MULTIPLE DISCRIPTOR
+"RTN","C0CXPATH",668,0)
+ . . S IH2=$NA(@IH@(IH2A)) ; PAST THE "M","DIRETIONS" FOR EXAMPLE
+"RTN","C0CXPATH",669,0)
+ . . S IHI="" ; INDEX INTO "M" MULTIPLES
+"RTN","C0CXPATH",670,0)
+ . . F  S IHI=$O(@IH2@(IHI)) Q:IHI=""  D  ; FOR EACH SUB-MULTIPLE
+"RTN","C0CXPATH",671,0)
+ . . . ; W @IH@(IHI)
+"RTN","C0CXPATH",672,0)
+ . . . S IH3=$NA(@IH2@(IHI))
+"RTN","C0CXPATH",673,0)
+ . . . ; W "HEY",IH3,!
+"RTN","C0CXPATH",674,0)
+ . . . D H2ARY(.IARYRTN,IH3,IPRE_";"_IHI) ; RECURSIVE CALL - INDENTED ELEMENTS
+"RTN","C0CXPATH",675,0)
+ . . ; W IH,!
+"RTN","C0CXPATH",676,0)
+ . . ; W "C0CZZ",!
+"RTN","C0CXPATH",677,0)
+ . . ; W $NA(@IHASH@(H2I)),!
+"RTN","C0CXPATH",678,0)
+ . . Q  ;
+"RTN","C0CXPATH",679,0)
+ . D PUSH(IARYRTN,IPRE_"^"_H2I_"^"_@IHASH@(H2I))
+"RTN","C0CXPATH",680,0)
+ . ; W @IARYRTN@(0),!
+"RTN","C0CXPATH",681,0)
+ Q
+"RTN","C0CXPATH",682,0)
+ ;
+"RTN","C0CXPATH",683,0)
+XVARS(XVRTN,XVIXML) ; RETURNS AN ARRAY XVRTN OF ALL UNIQUE VARIABLES
+"RTN","C0CXPATH",684,0)
+ ; DEFINED IN INPUT XML XVIXML BY @@VAR@@
+"RTN","C0CXPATH",685,0)
+ ; XVRTN AND XVIXML ARE PASSED BY NAME
+"RTN","C0CXPATH",686,0)
+ ;
+"RTN","C0CXPATH",687,0)
+ N XVI,XVTMP,XVT
+"RTN","C0CXPATH",688,0)
+ F XVI=1:1:@XVIXML@(0) D  ; FOR ALL LINES OF THE XML
+"RTN","C0CXPATH",689,0)
+ . S XVT=@XVIXML@(XVI)
+"RTN","C0CXPATH",690,0)
+ . I XVT["@@" S XVTMP($P(XVT,"@@",2))=XVI
+"RTN","C0CXPATH",691,0)
+ D H2ARY(XVRTN,"XVTMP")
+"RTN","C0CXPATH",692,0)
+ Q
+"RTN","C0CXPATH",693,0)
+ ;
+"RTN","C0CXPATH",694,0)
+DXVARS(DXIN) ;DISPLAY ALL VARIABLES IN A TEMPLATE
+"RTN","C0CXPATH",695,0)
+ ; IF PARAMETERS ARE NULL, DEFAULTS TO CCR TEMPLATE
+"RTN","C0CXPATH",696,0)
+ ;
+"RTN","C0CXPATH",697,0)
+ N DXUSE,DTMP ; DXUSE IS NAME OF VARIABLE, DTMP IS VARIABLE IF NOT SUPPLIED
+"RTN","C0CXPATH",698,0)
+ I DXIN="CCR" D  ; NEED TO GO GET CCR TEMPLATE
+"RTN","C0CXPATH",699,0)
+ . D LOAD^C0CCCR0("DTMP") ; LOAD CCR TEMPLATE INTO DXTMP
+"RTN","C0CXPATH",700,0)
+ . S DXUSE="DTMP" ; DXUSE IS NAME
+"RTN","C0CXPATH",701,0)
+ E  I DXIN="CCD" D  ; NEED TO GO GET CCD TEMPLATE
+"RTN","C0CXPATH",702,0)
+ . D LOAD^C0CCCD1("DTMP") ; LOAD CCR TEMPLATE INTO DXTMP
+"RTN","C0CXPATH",703,0)
+ . S DXUSE="DTMP" ; DXUSE IS NAME
+"RTN","C0CXPATH",704,0)
+ E  S DXUSE=DXIN ; IF PASSED THE TEMPLATE TO USE
+"RTN","C0CXPATH",705,0)
+ N DVARS ; PUT VARIABLE NAME RESULTS IN ARRAY HERE
+"RTN","C0CXPATH",706,0)
+ D XVARS("DVARS",DXUSE) ; PULL OUT VARS
+"RTN","C0CXPATH",707,0)
+ D PARY^C0CXPATH("DVARS") ;AND DISPLAY THEM
+"RTN","C0CXPATH",708,0)
+ Q
+"RTN","C0CXPATH",709,0)
+ ;
+"RTN","C0CXPATH",710,0)
+TEST     ; Run all the test cases
+"RTN","C0CXPATH",711,0)
+ D TESTALL^C0CUNIT("C0CXPAT0")
+"RTN","C0CXPATH",712,0)
+ Q
+"RTN","C0CXPATH",713,0)
+ ;
+"RTN","C0CXPATH",714,0)
+ZTEST(WHICH)    ; RUN ONE SET OF TESTS
+"RTN","C0CXPATH",715,0)
+ N ZTMP
+"RTN","C0CXPATH",716,0)
+ S DEBUG=1
+"RTN","C0CXPATH",717,0)
+ D ZLOAD^C0CUNIT("ZTMP","C0CXPAT0")
+"RTN","C0CXPATH",718,0)
+ D ZTEST^C0CUNIT(.ZTMP,WHICH)
+"RTN","C0CXPATH",719,0)
+ Q
+"RTN","C0CXPATH",720,0)
+ ;
+"RTN","C0CXPATH",721,0)
+TLIST   ; LIST THE TESTS
+"RTN","C0CXPATH",722,0)
+ N ZTMP
+"RTN","C0CXPATH",723,0)
+ D ZLOAD^C0CUNIT("ZTMP","C0CXPAT0")
+"RTN","C0CXPATH",724,0)
+ D TLIST^C0CUNIT(.ZTMP)
+"RTN","C0CXPATH",725,0)
+ Q
+"RTN","C0CXPATH",726,0)
+ ;
+"SEC","^DIC",170,170,0,"AUDIT")
+@
+"SEC","^DIC",170,170,0,"DD")
+@
+"SEC","^DIC",170,170,0,"DEL")
+@
+"SEC","^DIC",170,170,0,"LAYGO")
+@
+"SEC","^DIC",170,170,0,"RD")
+@
+"SEC","^DIC",170,170,0,"WR")
+@
+"SEC","^DIC",170.101,170.101,0,"AUDIT")
+@
+"SEC","^DIC",170.101,170.101,0,"DD")
+@
+"SEC","^DIC",170.101,170.101,0,"DEL")
+@
+"SEC","^DIC",170.101,170.101,0,"LAYGO")
+@
+"SEC","^DIC",170.101,170.101,0,"RD")
+@
+"SEC","^DIC",170.101,170.101,0,"WR")
+@
+"SEC","^DIC",170.9,170.9,0,"AUDIT")
+@
+"SEC","^DIC",170.9,170.9,0,"DD")
+@
+"SEC","^DIC",170.9,170.9,0,"DEL")
+@
+"SEC","^DIC",170.9,170.9,0,"LAYGO")
+@
+"SEC","^DIC",170.9,170.9,0,"RD")
+@
+"SEC","^DIC",170.9,170.9,0,"WR")
+@
+"SEC","^DIC",171.101,171.101,0,"AUDIT")
+@
+"SEC","^DIC",171.101,171.101,0,"DD")
+@
+"SEC","^DIC",171.101,171.101,0,"DEL")
+@
+"SEC","^DIC",171.101,171.101,0,"LAYGO")
+@
+"SEC","^DIC",171.101,171.101,0,"RD")
+@
+"SEC","^DIC",171.101,171.101,0,"WR")
+@
+"SEC","^DIC",171.401,171.401,0,"AUDIT")
+@
+"SEC","^DIC",171.401,171.401,0,"DD")
+@
+"SEC","^DIC",171.401,171.401,0,"DEL")
+@
+"SEC","^DIC",171.401,171.401,0,"LAYGO")
+@
+"SEC","^DIC",171.401,171.401,0,"RD")
+@
+"SEC","^DIC",171.401,171.401,0,"WR")
+@
+"SEC","^DIC",175,175,0,"AUDIT")
+@
+"SEC","^DIC",175,175,0,"DD")
+@
+"SEC","^DIC",175,175,0,"DEL")
+@
+"SEC","^DIC",175,175,0,"LAYGO")
+@
+"SEC","^DIC",175,175,0,"RD")
+@
+"SEC","^DIC",175,175,0,"WR")
+@
+"SEC","^DIC",176.112,176.112,0,"AUDIT")
+@
+"SEC","^DIC",176.112,176.112,0,"DD")
+@
+"SEC","^DIC",176.112,176.112,0,"DEL")
+@
+"SEC","^DIC",176.112,176.112,0,"LAYGO")
+@
+"SEC","^DIC",176.112,176.112,0,"RD")
+@
+"SEC","^DIC",176.112,176.112,0,"WR")
+@
+"SEC","^DIC",177.101,177.101,0,"AUDIT")
+@
+"SEC","^DIC",177.101,177.101,0,"DD")
+@
+"SEC","^DIC",177.101,177.101,0,"DEL")
+@
+"SEC","^DIC",177.101,177.101,0,"LAYGO")
+@
+"SEC","^DIC",177.101,177.101,0,"RD")
+@
+"SEC","^DIC",177.101,177.101,0,"WR")
+@
+"SEC","^DIC",177.201,177.201,0,"AUDIT")
+@
+"SEC","^DIC",177.201,177.201,0,"DD")
+@
+"SEC","^DIC",177.201,177.201,0,"DEL")
+@
+"SEC","^DIC",177.201,177.201,0,"LAYGO")
+@
+"SEC","^DIC",177.201,177.201,0,"RD")
+@
+"SEC","^DIC",177.201,177.201,0,"WR")
+@
+"SEC","^DIC",177.301,177.301,0,"AUDIT")
+@
+"SEC","^DIC",177.301,177.301,0,"DD")
+@
+"SEC","^DIC",177.301,177.301,0,"DEL")
+@
+"SEC","^DIC",177.301,177.301,0,"LAYGO")
+@
+"SEC","^DIC",177.301,177.301,0,"RD")
+@
+"SEC","^DIC",177.301,177.301,0,"WR")
+@
+"SEC","^DIC",178.101,178.101,0,"AUDIT")
+@
+"SEC","^DIC",178.101,178.101,0,"DD")
+@
+"SEC","^DIC",178.101,178.101,0,"DEL")
+@
+"SEC","^DIC",178.101,178.101,0,"LAYGO")
+@
+"SEC","^DIC",178.101,178.101,0,"RD")
+@
+"SEC","^DIC",178.101,178.101,0,"WR")
+@
+"SEC","^DIC",178.301,178.301,0,"AUDIT")
+@
+"SEC","^DIC",178.301,178.301,0,"DD")
+@
+"SEC","^DIC",178.301,178.301,0,"DEL")
+@
+"SEC","^DIC",178.301,178.301,0,"LAYGO")
+@
+"SEC","^DIC",178.301,178.301,0,"RD")
+@
+"SEC","^DIC",178.301,178.301,0,"WR")
+@
+"VER")
+8.0^22.0
+"^DD",170,170,0)
+FIELD^^12^12
+"^DD",170,170,0,"DDA")
+N
+"^DD",170,170,0,"DT")
+3090214
+"^DD",170,170,0,"ID",2)
+W:$D(^(1)) "   ",$P(^(1),U,1)
+"^DD",170,170,0,"IX","B",170,.01)
+
+"^DD",170,170,0,"NM","CCR DICTIONARY")
+
+"^DD",170,170,0,"PT",170.1012,.01)
+
+"^DD",170,170,0,"PT",171.1311,.01)
+
+"^DD",170,170,0,"PT",171.2012,.01)
+
+"^DD",170,170,0,"PT",171.201221,.01)
+
+"^DD",170,170,0,"PT",171.501,.01)
+
+"^DD",170,170,0,"PT",171.6011,.01)
+
+"^DD",170,170,0,"PT",178.1014,1)
+
+"^DD",170,170,0,"PT",178.3014,4)
+
+"^DD",170,170,0,"PT",113059001.04,4)
+
+"^DD",170,170,.01,0)
+AVARIABLE^RF^^0;1^K:$L(X)>30!($L(X)<2)!'(X'?1P.E) X
+"^DD",170,170,.01,.1)
+CCR/CCD/RIM VARIABLE NAME
+"^DD",170,170,.01,1,0)
+^.1
+"^DD",170,170,.01,1,1,0)
+170^B
+"^DD",170,170,.01,1,1,1)
+S ^C0CDIC(170,"B",$E(X,1,30),DA)=""
+"^DD",170,170,.01,1,1,2)
+K ^C0CDIC(170,"B",$E(X,1,30),DA)
+"^DD",170,170,.01,3)
+Answer must be 2-30 characters in length
+"^DD",170,170,.01,"DT")
+3090214
+"^DD",170,170,1,0)
+ID^NJ6,3^^0;2^K:+X'=X!(X>99)!(X<0)!(X?.E1"."4.N) X
+"^DD",170,170,1,.1)
+ELEMENT ID IN THE CCD C32 SPECIFICATION
+"^DD",170,170,1,3)
+Type a number between 0 and 99, 3 Decimal Digits
+"^DD",170,170,1,"DT")
+3081120
+"^DD",170,170,2,0)
+XPATH^F^^1;1^K:$L(X)>250!($L(X)<2) X
+"^DD",170,170,2,.1)
+XPATH INDEX INTO THE CCR
+"^DD",170,170,2,3)
+Answer must be 2-250 characters in length
+"^DD",170,170,2,"DT")
+3091027
+"^DD",170,170,3,0)
+DESCRIPTION^170.01^^5;0
+"^DD",170,170,4,0)
+SOURCE^170.04^^3;0
+"^DD",170,170,6,0)
+TYPE^S^DT:DATE/TIME UNIVERAL FORMAT;CD:CODE;CS:CODE SYSTEM;CV:CODE SYSTEM VERSION;ID:CCR/CCD/XML OBJECT ID;V:VALUE;^4;2^Q
+"^DD",170,170,6,.1)
+TYPE OF VARIABLE
+"^DD",170,170,6,"DT")
+3081120
+"^DD",170,170,7,0)
+DATA ELEMENT^F^^4;3^K:$L(X)>60!($L(X)<2) X
+"^DD",170,170,7,.1)
+CCR/CCD Data Element Name
+"^DD",170,170,7,3)
+Answer must be 2-60 characters in length
+"^DD",170,170,7,"DT")
+3081120
+"^DD",170,170,8,0)
+CODING^170.08S^^6;0
+"^DD",170,170,9,0)
+STATUS^S^X:NOT IMPLEMENTED YET;I:INCOMPLETE ENTRIES;C:COMPLETE BUT NOT REVIEWD;R:REVIEWED BUT NOT VERIFIED;V:VERIFIED - DONE;N:NEEDS WORK;^7;1^Q
+"^DD",170,170,9,.1)
+STATUS OF THE DICTIONARY ENTRY FOR THIS VARIABLE
+"^DD",170,170,9,3)
+STATUS OF THIS DICTIONARY ENTRY
+"^DD",170,170,9,"DT")
+3081121
+"^DD",170,170,10,0)
+SECTION^S^HEADER:HEADER;PROBLEMS:PROBLEMS;VITALS:VITALS;ALERTS:ALERTS;MEDS:MEDICATIONS;LABS:RESULTS;ACTORS:ACTORS;SOC:SOCIAL HISTORY;FAM:FAMILY HISTORY;IMM:IMMUNIZATIONS;ENC:ENCOUNTERS;TEST:RESULTS TEST;DIR:MEDS DIRECTIONS;^7;2^Q
+"^DD",170,170,10,.1)
+SECTION OF THE CCR/CCD IN WHICH THIS VARIABLE IS USED
+"^DD",170,170,10,"DT")
+3081206
+"^DD",170,170,11,0)
+RIM COHERENCE^F^^7;3^K:$L(X)>30!($L(X)<2) X
+"^DD",170,170,11,.1)
+RIM Coherence attribute for this variable
+"^DD",170,170,11,3)
+Answer must be 2-30 characters in length
+"^DD",170,170,11,"DT")
+3081216
+"^DD",170,170,12,0)
+ELEMENT TYPE^P170.101^C0CDIC(170.101,^7;4^Q
+"^DD",170,170,12,.1)
+NODE TYPE OF THE VARIABLE
+"^DD",170,170,12,"DT")
+3090208
+"^DD",170,170.01,0)
+DESCRIPTION SUB-FIELD^^.01^1
+"^DD",170,170.01,0,"DT")
+3081120
+"^DD",170,170.01,0,"NM","DESCRIPTION")
+
+"^DD",170,170.01,0,"UP")
+170
+"^DD",170,170.01,.01,0)
+DESCRIPTION^W^^0;1
+"^DD",170,170.01,.01,3)
+Describe this Variable
+"^DD",170,170.01,.01,"DT")
+3081120
+"^DD",170,170.04,0)
+SOURCE SUB-FIELD^^.01^1
+"^DD",170,170.04,0,"DT")
+3081120
+"^DD",170,170.04,0,"NM","SOURCE")
+
+"^DD",170,170.04,0,"UP")
+170
+"^DD",170,170.04,.01,0)
+SOURCE^W^^0;1
+"^DD",170,170.04,.01,3)
+Source in VistA for this Variable
+"^DD",170,170.04,.01,"DT")
+3081120
+"^DD",170,170.08,0)
+CODING SUB-FIELD^^1^2
+"^DD",170,170.08,0,"DT")
+3081121
+"^DD",170,170.08,0,"IX","B",170.08,.01)
+
+"^DD",170,170.08,0,"NM","CODING")
+
+"^DD",170,170.08,0,"UP")
+170
+"^DD",170,170.08,.01,0)
+CODING^MS^SNO:SNOMED CT;LN:LOINC;ICD:ICD9;VA:VA INTERNAL CODE;VUI:VUID VA CODE;RXN:RXNORM;NCD:NDC NATIONAL DRUG CODE;^0;1^Q
+"^DD",170,170.08,.01,.1)
+CODING SYSTEMS USED FOR THIS VARIABLE
+"^DD",170,170.08,.01,1,0)
+^.1
+"^DD",170,170.08,.01,1,1,0)
+170.08^B
+"^DD",170,170.08,.01,1,1,1)
+S ^C0CDIC(170,DA(1),6,"B",$E(X,1,30),DA)=""
+"^DD",170,170.08,.01,1,1,2)
+K ^C0CDIC(170,DA(1),6,"B",$E(X,1,30),DA)
+"^DD",170,170.08,.01,"DT")
+3081121
+"^DD",170,170.08,1,0)
+MAPPING METHOD^170.81^^1;0
+"^DD",170,170.81,0)
+MAPPING METHOD SUB-FIELD^^.01^1
+"^DD",170,170.81,0,"DT")
+3081121
+"^DD",170,170.81,0,"NM","MAPPING METHOD")
+
+"^DD",170,170.81,0,"UP")
+170.08
+"^DD",170,170.81,.01,0)
+MAPPING METHOD^W^^0;1
+"^DD",170,170.81,.01,3)
+HOW IS THIS CODE PRODUCED FOR THIS VARIABLE?
+"^DD",170,170.81,.01,"DT")
+3081121
+"^DD",170.101,170.101,0)
+FIELD^^3^4
+"^DD",170.101,170.101,0,"DDA")
+N
+"^DD",170.101,170.101,0,"DT")
+3090208
+"^DD",170.101,170.101,0,"IX","B",170.101,.01)
+
+"^DD",170.101,170.101,0,"NM","CCR NODE TYPE")
+
+"^DD",170.101,170.101,0,"PT",170,12)
+
+"^DD",170.101,170.101,0,"PT",170.101,1)
+
+"^DD",170.101,170.101,0,"PT",170.1013,.01)
+
+"^DD",170.101,170.101,0,"PT",171.121,.01)
+
+"^DD",170.101,170.101,0,"PT",171.201,.03)
+
+"^DD",170.101,170.101,0,"PT",171.301,3)
+
+"^DD",170.101,170.101,0,"PT",171.501,.04)
+
+"^DD",170.101,170.101,0,"PT",171.601,.01)
+
+"^DD",170.101,170.101,0,"PT",177.10121,.01)
+
+"^DD",170.101,170.101,.01,0)
+NODE TYPE^RF^^0;1^K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
+"^DD",170.101,170.101,.01,.1)
+CCR NODE TYPE
+"^DD",170.101,170.101,.01,1,0)
+^.1
+"^DD",170.101,170.101,.01,1,1,0)
+170.101^B
+"^DD",170.101,170.101,.01,1,1,1)
+S ^C0CDIC(170.101,"B",$E(X,1,30),DA)=""
+"^DD",170.101,170.101,.01,1,1,2)
+K ^C0CDIC(170.101,"B",$E(X,1,30),DA)
+"^DD",170.101,170.101,.01,3)
+NODE TYPE
+"^DD",170.101,170.101,.01,"DT")
+3090206
+"^DD",170.101,170.101,1,0)
+PARENT^P170.101'^C0CDIC(170.101,^0;2^Q
+"^DD",170.101,170.101,1,.1)
+NODE TYPE PARENT
+"^DD",170.101,170.101,1,3)
+NODE TYPE PARENT
+"^DD",170.101,170.101,1,"DT")
+3090206
+"^DD",170.101,170.101,2,0)
+CONTENTS^170.1012P^^1;0
+"^DD",170.101,170.101,3,0)
+CHILDREN^170.1013P^^2;0
+"^DD",170.101,170.1012,0)
+CONTENTS SUB-FIELD^^.01^1
+"^DD",170.101,170.1012,0,"DT")
+3090208
+"^DD",170.101,170.1012,0,"IX","B",170.1012,.01)
+
+"^DD",170.101,170.1012,0,"NM","CONTENTS")
+
+"^DD",170.101,170.1012,0,"UP")
+170.101
+"^DD",170.101,170.1012,.01,0)
+CONTENTS^P170'^C0CDIC(170,^0;1^Q
+"^DD",170.101,170.1012,.01,.1)
+CCR VARIABLES THAT THIS NODE CONTAINS
+"^DD",170.101,170.1012,.01,1,0)
+^.1
+"^DD",170.101,170.1012,.01,1,1,0)
+170.1012^B
+"^DD",170.101,170.1012,.01,1,1,1)
+S ^C0CDIC(170.101,DA(1),1,"B",$E(X,1,30),DA)=""
+"^DD",170.101,170.1012,.01,1,1,2)
+K ^C0CDIC(170.101,DA(1),1,"B",$E(X,1,30),DA)
+"^DD",170.101,170.1012,.01,3)
+VARIABLES THAT THIS TYPE CONTAINS
+"^DD",170.101,170.1012,.01,"DT")
+3090208
+"^DD",170.101,170.1013,0)
+CHILDREN SUB-FIELD^^.01^1
+"^DD",170.101,170.1013,0,"DT")
+3090206
+"^DD",170.101,170.1013,0,"IX","B",170.1013,.01)
+
+"^DD",170.101,170.1013,0,"NM","CHILDREN")
+
+"^DD",170.101,170.1013,0,"UP")
+170.101
+"^DD",170.101,170.1013,.01,0)
+CHILDREN^P170.101'^C0CDIC(170.101,^0;1^Q
+"^DD",170.101,170.1013,.01,.1)
+CHILDREN NODE TYPES
+"^DD",170.101,170.1013,.01,1,0)
+^.1
+"^DD",170.101,170.1013,.01,1,1,0)
+170.1013^B
+"^DD",170.101,170.1013,.01,1,1,1)
+S ^C0CDIC(170.101,DA(1),2,"B",$E(X,1,30),DA)=""
+"^DD",170.101,170.1013,.01,1,1,2)
+K ^C0CDIC(170.101,DA(1),2,"B",$E(X,1,30),DA)
+"^DD",170.101,170.1013,.01,3)
+CHILDREN NODE TYPES
+"^DD",170.101,170.1013,.01,"DT")
+3090206
+"^DD",170.9,170.9,0)
+FIELD^^3.3^11
+"^DD",170.9,170.9,0,"DDA")
+N
+"^DD",170.9,170.9,0,"DT")
+3120105
+"^DD",170.9,170.9,0,"IX","B",170.9,.01)
+
+"^DD",170.9,170.9,0,"NM","C0C PARAMETERS")
+
+"^DD",170.9,170.9,.01,0)
+NAME^RF^^0;1^K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
+"^DD",170.9,170.9,.01,1,0)
+^.1
+"^DD",170.9,170.9,.01,1,1,0)
+170.9^B
+"^DD",170.9,170.9,.01,1,1,1)
+S ^C0CPARM("B",$E(X,1,30),DA)=""
+"^DD",170.9,170.9,.01,1,1,2)
+K ^C0CPARM("B",$E(X,1,30),DA)
+"^DD",170.9,170.9,.01,3)
+NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
+"^DD",170.9,170.9,1.1,0)
+LAB LIMIT^F^^0;2^K:$L(X)>60!($L(X)<1) X
+"^DD",170.9,170.9,1.1,.1)
+EARLIEST LAB RESULTS TO BE INCLUDED
+"^DD",170.9,170.9,1.1,3)
+TIME DESIGNATION FOR EARLIEST LAB RESULTS IE T-360
+"^DD",170.9,170.9,1.1,"DT")
+3120105
+"^DD",170.9,170.9,1.2,0)
+LAB START^F^^0;3^K:$L(X)>60!($L(X)<1) X
+"^DD",170.9,170.9,1.2,.1)
+LAB RESULT START DATE - DEFAULT TODAY
+"^DD",170.9,170.9,1.2,3)
+TIME DESIGNATION IE T
+"^DD",170.9,170.9,1.2,"DT")
+3120105
+"^DD",170.9,170.9,2.1,0)
+VITALS LIMIT^F^^0;4^K:$L(X)>60!($L(X)<1) X
+"^DD",170.9,170.9,2.1,.1)
+EARLIEST VITAL SIGNS TO BE INCLUDED
+"^DD",170.9,170.9,2.1,3)
+TIME DESIGNATION FOR EARLIEST VITALS IE T-360
+"^DD",170.9,170.9,2.1,"DT")
+3120105
+"^DD",170.9,170.9,2.2,0)
+VITALS START^F^^1;1^K:$L(X)>60!($L(X)<1) X
+"^DD",170.9,170.9,2.2,.1)
+START DATE FOR VITALS EXTRACT - DEFAULT TODAY
+"^DD",170.9,170.9,2.2,3)
+TIME DESIGNATION IE T
+"^DD",170.9,170.9,2.2,"DT")
+3120105
+"^DD",170.9,170.9,3.1,0)
+MEDS LIMIT^F^^1;2^K:$L(X)>60!($L(X)<1) X
+"^DD",170.9,170.9,3.1,.1)
+EARLIEST MEDS TO BE EXTRACTED
+"^DD",170.9,170.9,3.1,3)
+TIME DESIGNATION IE T-360
+"^DD",170.9,170.9,3.1,"DT")
+3120105
+"^DD",170.9,170.9,3.2,0)
+MEDS START^F^^1;3^K:$L(X)>60!($L(X)<1) X
+"^DD",170.9,170.9,3.2,.1)
+LATEST MEDS TO BE EXTRACTED - DEFAULT T
+"^DD",170.9,170.9,3.2,3)
+TIME DESIGNATION IE T
+"^DD",170.9,170.9,3.2,"DT")
+3120105
+"^DD",170.9,170.9,3.3,0)
+MEDS FILTER^S^ACT:ACTIVE MEDS;PEN:PENDING MEDS;ALL:ALL MEDS;^1;4^Q
+"^DD",170.9,170.9,3.3,.1)
+INDICATOR FOR ACTIVE, PENDING OR ALL MEDS
+"^DD",170.9,170.9,3.3,3)
+ACTIVE, PENDING OR ALL MEDS
+"^DD",170.9,170.9,3.3,"DT")
+3120105
+"^DD",170.9,170.9,4.1,0)
+NOTES LIMIT^FX^^2;1^K:$L(X)>60!($L(X)<1) X
+"^DD",170.9,170.9,4.1,.1)
+EARLIEST NOTES TO BE EXTRACTED
+"^DD",170.9,170.9,4.1,3)
+TIME DESIGNATION FOR EARLIEST NOTE RESULTS IE T-360
+"^DD",170.9,170.9,4.1,"DT")
+3120109
+"^DD",170.9,170.9,4.2,0)
+NOTES START^FX^^2;2^K:$L(X)>60!($L(X)<1) X
+"^DD",170.9,170.9,4.2,.1)
+LATEST NOTES TO BE EXTRACTED - DEFAULT T
+"^DD",170.9,170.9,4.2,3)
+TIME DESIGNATION IE T
+"^DD",170.9,170.9,4.2,"DT")
+3120109
+"^DD",170.9,170.9,4.3,0)
+NOTES YES/NO^S^0:NO;1:YES;^2;3^Q
+"^DD",170.9,170.9,4.3,3)
+Y/N INCLUDE NOTES IN RESULTS
+"^DD",170.9,170.9,4.3,"DT")
+3120109
+"^DD",171.101,171.101,0)
+FIELD^^.02^2
+"^DD",171.101,171.101,0,"DDA")
+N
+"^DD",171.101,171.101,0,"DT")
+3090214
+"^DD",171.101,171.101,0,"IX","B",171.101,.01)
+
+"^DD",171.101,171.101,0,"NM","CCR E2")
+
+"^DD",171.101,171.101,.01,0)
+PATIENT^RP2'^DPT(^0;1^Q
+"^DD",171.101,171.101,.01,.1)
+POINTER TO PATIENT FILE
+"^DD",171.101,171.101,.01,1,0)
+^.1
+"^DD",171.101,171.101,.01,1,1,0)
+171.101^B
+"^DD",171.101,171.101,.01,1,1,1)
+S ^C0CE("B",$E(X,1,30),DA)=""
+"^DD",171.101,171.101,.01,1,1,2)
+K ^C0CE("B",$E(X,1,30),DA)
+"^DD",171.101,171.101,.01,3)
+PATIENT
+"^DD",171.101,171.101,.01,"DT")
+3090214
+"^DD",171.101,171.101,.02,0)
+CCR SOURCE^171.111P^^1;0
+"^DD",171.101,171.111,0)
+CCR SOURCE SUB-FIELD^^.03^2
+"^DD",171.101,171.111,0,"DT")
+3090214
+"^DD",171.101,171.111,0,"IX","B",171.111,.01)
+
+"^DD",171.101,171.111,0,"NM","CCR SOURCE")
+
+"^DD",171.101,171.111,0,"UP")
+171.101
+"^DD",171.101,171.111,.01,0)
+CCR SOURCE^P171.401^C0C(171.401,^0;1^Q
+"^DD",171.101,171.111,.01,.1)
+POINTER TO CCR SOURCE FILE
+"^DD",171.101,171.111,.01,1,0)
+^.1
+"^DD",171.101,171.111,.01,1,1,0)
+171.111^B
+"^DD",171.101,171.111,.01,1,1,1)
+S ^C0CE(DA(1),1,"B",$E(X,1,30),DA)=""
+"^DD",171.101,171.111,.01,1,1,2)
+K ^C0CE(DA(1),1,"B",$E(X,1,30),DA)
+"^DD",171.101,171.111,.01,3)
+CCR SOURCE
+"^DD",171.101,171.111,.01,"DT")
+3090214
+"^DD",171.101,171.111,.03,0)
+ELEMENT TYPE^171.121P^^1;0
+"^DD",171.101,171.121,0)
+ELEMENT TYPE SUB-FIELD^^.04^2
+"^DD",171.101,171.121,0,"DT")
+3090214
+"^DD",171.101,171.121,0,"IX","B",171.121,.01)
+
+"^DD",171.101,171.121,0,"NM","ELEMENT TYPE")
+
+"^DD",171.101,171.121,0,"UP")
+171.111
+"^DD",171.101,171.121,.01,0)
+ELEMENT TYPE^MP170.101'^C0CDIC(170.101,^0;1^Q
+"^DD",171.101,171.121,.01,.1)
+POINTER TO CCR NODE TYPE FILE
+"^DD",171.101,171.121,.01,1,0)
+^.1
+"^DD",171.101,171.121,.01,1,1,0)
+171.121^B
+"^DD",171.101,171.121,.01,1,1,1)
+S ^C0CE(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""
+"^DD",171.101,171.121,.01,1,1,2)
+K ^C0CE(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)
+"^DD",171.101,171.121,.01,3)
+CCR ELEMENT TYPE
+"^DD",171.101,171.121,.01,"DT")
+3090214
+"^DD",171.101,171.121,.04,0)
+OCCURANCE^171.131^^1;0
+"^DD",171.101,171.121,.04,"DT")
+3090217
+"^DD",171.101,171.131,0)
+OCCURANCE SUB-FIELD^^1^2
+"^DD",171.101,171.131,0,"DT")
+3090214
+"^DD",171.101,171.131,0,"IX","B",171.131,.01)
+
+"^DD",171.101,171.131,0,"NM","OCCURANCE")
+
+"^DD",171.101,171.131,0,"UP")
+171.121
+"^DD",171.101,171.131,.01,0)
+OCCURANCE^MF^^0;1^K:$L(X)>30!($L(X)<1) X
+"^DD",171.101,171.131,.01,.1)
+OCCURANCE OF THIS ELEMENT TYPE " NN" WITH LEADING SPACE
+"^DD",171.101,171.131,.01,1,0)
+^.1
+"^DD",171.101,171.131,.01,1,1,0)
+171.131^B
+"^DD",171.101,171.131,.01,1,1,1)
+S ^C0CE(DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""
+"^DD",171.101,171.131,.01,1,1,2)
+K ^C0CE(DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)
+"^DD",171.101,171.131,.01,3)
+OCCURANCE OF THE ELEMENT TYPE " NN" WITH LEADING SPACE
+"^DD",171.101,171.131,.01,"DT")
+3090214
+"^DD",171.101,171.131,1,0)
+VARIABLE^171.1311P^^1;0
+"^DD",171.101,171.1311,0)
+VARIABLE SUB-FIELD^^1^2
+"^DD",171.101,171.1311,0,"DT")
+3090214
+"^DD",171.101,171.1311,0,"IX","B",171.1311,.01)
+
+"^DD",171.101,171.1311,0,"NM","VARIABLE")
+
+"^DD",171.101,171.1311,0,"UP")
+171.131
+"^DD",171.101,171.1311,.01,0)
+VARIABLE^MP170^C0CDIC(170,^0;1^Q
+"^DD",171.101,171.1311,.01,.1)
+POINTER TO CCR DICTIONARY
+"^DD",171.101,171.1311,.01,1,0)
+^.1
+"^DD",171.101,171.1311,.01,1,1,0)
+171.1311^B
+"^DD",171.101,171.1311,.01,1,1,1)
+S ^C0CE(DA(4),1,DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""
+"^DD",171.101,171.1311,.01,1,1,2)
+K ^C0CE(DA(4),1,DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)
+"^DD",171.101,171.1311,.01,3)
+CCR VARIABLE
+"^DD",171.101,171.1311,.01,"DT")
+3090214
+"^DD",171.101,171.1311,1,0)
+VALUE^F^^0;2^K:$L(X)>200!($L(X)<1) X
+"^DD",171.101,171.1311,1,.1)
+VALUE OF THE VARIABLE
+"^DD",171.101,171.1311,1,3)
+VALUE OF THE VARIABLE
+"^DD",171.101,171.1311,1,"DT")
+3090214
+"^DD",171.401,171.401,0)
+FIELD^^2^3
+"^DD",171.401,171.401,0,"DDA")
+N
+"^DD",171.401,171.401,0,"DT")
+3090206
+"^DD",171.401,171.401,0,"IX","B",171.401,.01)
+
+"^DD",171.401,171.401,0,"NM","CCR SOURCE")
+
+"^DD",171.401,171.401,0,"PT",171.111,.01)
+
+"^DD",171.401,171.401,0,"PT",171.201,.02)
+
+"^DD",171.401,171.401,0,"PT",171.501,.03)
+
+"^DD",171.401,171.401,0,"PT",171.601,.03)
+
+"^DD",171.401,171.401,0,"PT",175,3)
+
+"^DD",171.401,171.401,.01,0)
+NAME^RF^^0;1^K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
+"^DD",171.401,171.401,.01,1,0)
+^.1
+"^DD",171.401,171.401,.01,1,1,0)
+171.401^B
+"^DD",171.401,171.401,.01,1,1,1)
+S ^C0C(171.401,"B",$E(X,1,30),DA)=""
+"^DD",171.401,171.401,.01,1,1,2)
+K ^C0C(171.401,"B",$E(X,1,30),DA)
+"^DD",171.401,171.401,.01,3)
+NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
+"^DD",171.401,171.401,1,0)
+LOCAL SOURCE^171.4011P^^1;0
+"^DD",171.401,171.401,2,0)
+NON LOCAL SOURCE^171.4012P^^2;0
+"^DD",171.401,171.4011,0)
+LOCAL SOURCE SUB-FIELD^^.01^1
+"^DD",171.401,171.4011,0,"DT")
+3090206
+"^DD",171.401,171.4011,0,"IX","B",171.4011,.01)
+
+"^DD",171.401,171.4011,0,"NM","LOCAL SOURCE")
+
+"^DD",171.401,171.4011,0,"UP")
+171.401
+"^DD",171.401,171.4011,.01,0)
+LOCAL SOURCE^P4'^DIC(4,^0;1^Q
+"^DD",171.401,171.4011,.01,.1)
+LOCALLY DEFINED INSTITUTION
+"^DD",171.401,171.4011,.01,1,0)
+^.1
+"^DD",171.401,171.4011,.01,1,1,0)
+171.4011^B
+"^DD",171.401,171.4011,.01,1,1,1)
+S ^C0C(171.401,DA(1),1,"B",$E(X,1,30),DA)=""
+"^DD",171.401,171.4011,.01,1,1,2)
+K ^C0C(171.401,DA(1),1,"B",$E(X,1,30),DA)
+"^DD",171.401,171.4011,.01,3)
+DEFINED INSTITUTION
+"^DD",171.401,171.4011,.01,"DT")
+3090206
+"^DD",171.401,171.4012,0)
+NON LOCAL SOURCE SUB-FIELD^^.01^1
+"^DD",171.401,171.4012,0,"DT")
+3090206
+"^DD",171.401,171.4012,0,"IX","B",171.4012,.01)
+
+"^DD",171.401,171.4012,0,"NM","NON LOCAL SOURCE")
+
+"^DD",171.401,171.4012,0,"UP")
+171.401
+"^DD",171.401,171.4012,.01,0)
+NON LOCAL SOURCE^P171.201'^C0C(171.201,^0;1^Q
+"^DD",171.401,171.4012,.01,.1)
+CCR NON LOCAL SOURCE
+"^DD",171.401,171.4012,.01,1,0)
+^.1
+"^DD",171.401,171.4012,.01,1,1,0)
+171.4012^B
+"^DD",171.401,171.4012,.01,1,1,1)
+S ^C0C(171.401,DA(1),2,"B",$E(X,1,30),DA)=""
+"^DD",171.401,171.4012,.01,1,1,2)
+K ^C0C(171.401,DA(1),2,"B",$E(X,1,30),DA)
+"^DD",171.401,171.4012,.01,3)
+NON LOCAL SOURCE OF THE CCR
+"^DD",171.401,171.4012,.01,"DT")
+3090206
+"^DD",175,175,0)
+FIELD^^8^12
+"^DD",175,175,0,"DDA")
+N
+"^DD",175,175,0,"DT")
+3091127
+"^DD",175,175,0,"ID",1)
+W "   ",$E($P(^(0),U,2),4,5)_"-"_$E($P(^(0),U,2),6,7)_"-"_$E($P(^(0),U,2),2,3)
+"^DD",175,175,0,"ID",2)
+W "   ",@("$P($P($C(59)_$S($D(^DD(175,2,0)):$P(^(0),U,3),1:0)_$E("_DIC_"Y,0),0),$C(59)_$P(^(0),U,3)_"":"",2),$C(59),1)")
+"^DD",175,175,0,"ID",3)
+S %I=Y,Y=$S('$D(^(0)):"",$D(^C0C(171.401,+$P(^(0),U,4),0))#2:$P(^(0),U,1),1:""),C=$P(^DD(171.401,.01,0),U,2) D Y^DIQ:Y]"" W "   ",Y,@("$E("_DIC_"%I,0),0)") S Y=%I K %I
+"^DD",175,175,0,"IX","B",175,.01)
+
+"^DD",175,175,0,"NM","C0C INCOMING XML")
+
+"^DD",175,175,.01,0)
+PATIENT^RP2'^DPT(^0;1^Q
+"^DD",175,175,.01,.1)
+PATIENT POINTER
+"^DD",175,175,.01,1,0)
+^.1
+"^DD",175,175,.01,1,1,0)
+175^B
+"^DD",175,175,.01,1,1,1)
+S ^C0CIN("B",$E(X,1,30),DA)=""
+"^DD",175,175,.01,1,1,2)
+K ^C0CIN("B",$E(X,1,30),DA)
+"^DD",175,175,.01,3)
+PATIENT POINTER
+"^DD",175,175,.01,"DT")
+3091027
+"^DD",175,175,.02,0)
+CREATED BY^P200'^VA(200,^0;5^Q
+"^DD",175,175,.02,.1)
+CCR Created by
+"^DD",175,175,.02,21,0)
+^^2^2^3110422^
+"^DD",175,175,.02,21,1,0)
+This is the name of the user who ran the option to import this CCR for a 
+"^DD",175,175,.02,21,2,0)
+given patient.
+"^DD",175,175,.02,23,0)
+^^2^2^3110422^
+"^DD",175,175,.02,23,1,0)
+Field .02(CREATED BY) is stored in the 5th piece on the 0 subscript. It 
+"^DD",175,175,.02,23,2,0)
+is a pointer to file #200(NEW PERSON).
+"^DD",175,175,.02,"DT")
+3110422
+"^DD",175,175,1,0)
+DATE^D^^0;2^S %DT="ESTR" D ^%DT S X=Y K:X<1 X
+"^DD",175,175,1,.1)
+DATE RECIEVED
+"^DD",175,175,1,3)
+DATE RECIEVED
+"^DD",175,175,1,"DT")
+3091027
+"^DD",175,175,2,0)
+TYPE^S^CCR:CCR;CCD:CCD;OTH:OTHER;^0;3^Q
+"^DD",175,175,2,.1)
+TYPE OF XML DOCUMENT
+"^DD",175,175,2,3)
+TYPE OF XML DOCUMENT
+"^DD",175,175,2,"DT")
+3091027
+"^DD",175,175,3,0)
+SOURCE^P171.401^C0C(171.401,^0;4^Q
+"^DD",175,175,3,.1)
+POINTER TO CCR SOURCE FILE
+"^DD",175,175,3,3)
+POINTER TO CCR SOURCE FILE
+"^DD",175,175,3,"DT")
+3091027
+"^DD",175,175,4,0)
+XML^175.04^^1;0
+"^DD",175,175,5,0)
+FILE NAME^F^^2;1^K:$L(X)>200!($L(X)<2) X
+"^DD",175,175,5,.1)
+FILE NAME OF XML
+"^DD",175,175,5,3)
+XML FILE NAME
+"^DD",175,175,5,"DT")
+3091027
+"^DD",175,175,6,0)
+FILE PATH^F^^3;1^K:$L(X)>240!($L(X)<1) X
+"^DD",175,175,6,.1)
+PATH TO THE XML FILE
+"^DD",175,175,6,3)
+PATH TO THE XML FILE
+"^DD",175,175,6,"DT")
+3091027
+"^DD",175,175,7,0)
+STATUS^S^NEW:ADDED BUT NOT PROCESSED;QUE:QUEUED;^3;2^Q
+"^DD",175,175,7,"DT")
+3091103
+"^DD",175,175,8,0)
+DOM^175.08^^4;0
+"^DD",175,175,9,0)
+SENDING EMAIL^F^^5;1^K:$L(X)>99!($L(X)<5) X
+"^DD",175,175,9,.1)
+Email address of sending provider
+"^DD",175,175,9,3)
+doc@institution.com
+"^DD",175,175,9,"DT")
+3110519
+"^DD",175,175,10,0)
+SENDING INSTITUTION^P4'^DIC(4,^5;2^Q
+"^DD",175,175,10,.1)
+Institution sending patient file
+"^DD",175,175,10,3)
+Select Institution file send from
+"^DD",175,175,10,"DT")
+3110509
+"^DD",175,175.04,0)
+XML SUB-FIELD^^.01^1
+"^DD",175,175.04,0,"DT")
+3091027
+"^DD",175,175.04,0,"NM","XML")
+
+"^DD",175,175.04,0,"UP")
+175
+"^DD",175,175.04,.01,0)
+XML^WL^^0;1
+"^DD",175,175.04,.01,.1)
+INCOMING XML
+"^DD",175,175.04,.01,3)
+INCOMING XML
+"^DD",175,175.04,.01,"DT")
+3091027
+"^DD",175,175.08,0)
+DOM SUB-FIELD^^3^6
+"^DD",175,175.08,0,"DT")
+3091127
+"^DD",175,175.08,0,"IX","B",175.08,.01)
+
+"^DD",175,175.08,0,"NM","DOM")
+
+"^DD",175,175.08,0,"UP")
+175
+"^DD",175,175.08,.01,0)
+TAG^F^^0;1^K:$L(X)>200!($L(X)<1) X
+"^DD",175,175.08,.01,.1)
+XML TAG FOR THIS NODE
+"^DD",175,175.08,.01,1,0)
+^.1
+"^DD",175,175.08,.01,1,1,0)
+175.08^B
+"^DD",175,175.08,.01,1,1,1)
+S ^C0CIN(DA(1),4,"B",$E(X,1,30),DA)=""
+"^DD",175,175.08,.01,1,1,2)
+K ^C0CIN(DA(1),4,"B",$E(X,1,30),DA)
+"^DD",175,175.08,.01,3)
+XML TAG FOR THIS NODE
+"^DD",175,175.08,.01,"DT")
+3091127
+"^DD",175,175.08,.02,0)
+PARENT^NJ8,0^^0;2^K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1.N) X
+"^DD",175,175.08,.02,.1)
+PARENT NODE
+"^DD",175,175.08,.02,3)
+PARENT NODE
+"^DD",175,175.08,.02,"DT")
+3091127
+"^DD",175,175.08,.03,0)
+CHILDREN^175.09^^1;0
+"^DD",175,175.08,1,0)
+DATA^175.81^^2;0
+"^DD",175,175.08,2,0)
+COMMENTS^175.82^^3;0
+"^DD",175,175.08,3,0)
+ATTRIBUTES^175.83^^4;0
+"^DD",175,175.09,0)
+CHILDREN SUB-FIELD^^.01^1
+"^DD",175,175.09,0,"DT")
+3091127
+"^DD",175,175.09,0,"IX","B",175.09,.01)
+
+"^DD",175,175.09,0,"NM","CHILDREN")
+
+"^DD",175,175.09,0,"UP")
+175.08
+"^DD",175,175.09,.01,0)
+CHILDREN^MNJ7,0^^0;1^K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1.N) X
+"^DD",175,175.09,.01,.1)
+CHLIDREN POINTER
+"^DD",175,175.09,.01,1,0)
+^.1
+"^DD",175,175.09,.01,1,1,0)
+175.09^B
+"^DD",175,175.09,.01,1,1,1)
+S ^C0CIN(DA(2),4,DA(1),1,"B",$E(X,1,30),DA)=""
+"^DD",175,175.09,.01,1,1,2)
+K ^C0CIN(DA(2),4,DA(1),1,"B",$E(X,1,30),DA)
+"^DD",175,175.09,.01,3)
+CHILDREN POINTER
+"^DD",175,175.09,.01,"DT")
+3091127
+"^DD",175,175.81,0)
+DATA SUB-FIELD^^.01^1
+"^DD",175,175.81,0,"DT")
+3091127
+"^DD",175,175.81,0,"NM","DATA")
+
+"^DD",175,175.81,0,"UP")
+175.08
+"^DD",175,175.81,.01,0)
+DATA^WFLx^^0;1^K:$L(X)>240!($L(X)<1) X
+"^DD",175,175.81,.01,.1)
+NODE DATA
+"^DD",175,175.81,.01,3)
+NODE DATA
+"^DD",175,175.81,.01,"DT")
+3091127
+"^DD",175,175.82,0)
+COMMENTS SUB-FIELD^^.01^1
+"^DD",175,175.82,0,"DT")
+3091127
+"^DD",175,175.82,0,"NM","COMMENTS")
+
+"^DD",175,175.82,0,"UP")
+175.08
+"^DD",175,175.82,.01,0)
+COMMENTS^WLx^^0;1
+"^DD",175,175.82,.01,.1)
+NODE COMMENT
+"^DD",175,175.82,.01,3)
+NODE COMMENT
+"^DD",175,175.82,.01,"DT")
+3091127
+"^DD",175,175.83,0)
+ATTRIBUTES SUB-FIELD^^1^2
+"^DD",175,175.83,0,"DT")
+3091127
+"^DD",175,175.83,0,"IX","B",175.83,.01)
+
+"^DD",175,175.83,0,"NM","ATTRIBUTES")
+
+"^DD",175,175.83,0,"UP")
+175.08
+"^DD",175,175.83,.01,0)
+ATTRIBUTE TAG^MF^^0;1^K:$L(X)>120!($L(X)<1) X
+"^DD",175,175.83,.01,.1)
+NODE ATTRIBUTES
+"^DD",175,175.83,.01,1,0)
+^.1
+"^DD",175,175.83,.01,1,1,0)
+175.83^B
+"^DD",175,175.83,.01,1,1,1)
+S ^C0CIN(DA(2),4,DA(1),4,"B",$E(X,1,30),DA)=""
+"^DD",175,175.83,.01,1,1,2)
+K ^C0CIN(DA(2),4,DA(1),4,"B",$E(X,1,30),DA)
+"^DD",175,175.83,.01,3)
+NODE ATTRIBUTES
+"^DD",175,175.83,.01,"DT")
+3091127
+"^DD",175,175.83,1,0)
+ATTRIBUTE DATA^F^^1;1^K:$L(X)>240!($L(X)<1) X
+"^DD",175,175.83,1,.1)
+THE ATTRIBUTE DATA
+"^DD",175,175.83,1,3)
+THE ATTRIBUTE DATA
+"^DD",175,175.83,1,"DT")
+3091127
+"^DD",176.112,176.112,0)
+FIELD^^6^7
+"^DD",176.112,176.112,0,"DDA")
+N
+"^DD",176.112,176.112,0,"DT")
+3081208
+"^DD",176.112,176.112,0,"ID",2)
+W "   ",$P(^(0),U,2)
+"^DD",176.112,176.112,0,"ID",5)
+W:$D(^(1)) "   ",$P(^(1),U,4)
+"^DD",176.112,176.112,0,"IX","B",176.112,.01)
+
+"^DD",176.112,176.112,0,"NM","C0C RXNORM VUID EXPANSION")
+
+"^DD",176.112,176.112,.01,0)
+VUID^RF^^0;1^K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
+"^DD",176.112,176.112,.01,1,0)
+^.1
+"^DD",176.112,176.112,.01,1,1,0)
+176.112^B
+"^DD",176.112,176.112,.01,1,1,1)
+S ^C0CCODES(176.112,"B",$E(X,1,30),DA)=""
+"^DD",176.112,176.112,.01,1,1,2)
+K ^C0CCODES(176.112,"B",$E(X,1,30),DA)
+"^DD",176.112,176.112,.01,3)
+NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
+"^DD",176.112,176.112,.01,"DT")
+3081208
+"^DD",176.112,176.112,1,0)
+MEDIATION CODE^F^^1;1^K:$L(X)>30!($L(X)<1) X
+"^DD",176.112,176.112,1,3)
+Answer must be 1-30 characters in length
+"^DD",176.112,176.112,1,"DT")
+3090127
+"^DD",176.112,176.112,2,0)
+VUID TEXT^F^^0;2^K:$L(X)>200!($L(X)<1) X
+"^DD",176.112,176.112,2,.1)
+TEXT FOR THE VUID
+"^DD",176.112,176.112,2,3)
+Answer must be 1-200 characters in length
+"^DD",176.112,176.112,2,"DT")
+3090126
+"^DD",176.112,176.112,3,0)
+PREFERRED TRANSLATION TEXT^F^^1;2^K:$L(X)>10!($L(X)<1) X
+"^DD",176.112,176.112,3,.1)
+T/F is this mapping the preferred translation?
+"^DD",176.112,176.112,3,3)
+Answer must be 1-10 characters in length
+"^DD",176.112,176.112,3,"DT")
+3081210
+"^DD",176.112,176.112,4,0)
+NEW^F^^1;3^K:$L(X)>1!($L(X)<1) X
+"^DD",176.112,176.112,4,.1)
+Y IF THIS MAPPING IS NEW (NOT FOUND IN 176.111
+"^DD",176.112,176.112,4,3)
+Answer must be 1 character in length
+"^DD",176.112,176.112,4,"DT")
+3081208
+"^DD",176.112,176.112,5,0)
+RXNORM TEXT^F^^1;4^K:$L(X)>200!($L(X)<1) X
+"^DD",176.112,176.112,5,.1)
+TEXT FOR THE CODE FROM THE RXNORM FILE (176.001)
+"^DD",176.112,176.112,5,3)
+Answer must be 1-200 characters in length
+"^DD",176.112,176.112,5,"DT")
+3081208
+"^DD",176.112,176.112,6,0)
+DIFFERENT TEXT^F^^1;5^K:$L(X)>1!($L(X)<1) X
+"^DD",176.112,176.112,6,.1)
+SET TO "Y" IF RXNORM TEXT IS DIFFERENT THAN VUID TEXT FIELDS
+"^DD",176.112,176.112,6,3)
+Answer must be 1 character in length
+"^DD",176.112,176.112,6,"DT")
+3081208
+"^DD",177.101,177.101,0)
+FIELD^^2^3
+"^DD",177.101,177.101,0,"DDA")
+N
+"^DD",177.101,177.101,0,"DT")
+3090428
+"^DD",177.101,177.101,0,"IX","B",177.101,.01)
+
+"^DD",177.101,177.101,0,"NM","CCR PATIENT SUBSCRIPTIONS")
+
+"^DD",177.101,177.101,.01,0)
+PATIENT^RP2'^DPT(^0;1^Q
+"^DD",177.101,177.101,.01,.1)
+POINTER TO PATIENT FILE
+"^DD",177.101,177.101,.01,1,0)
+^.1
+"^DD",177.101,177.101,.01,1,1,0)
+177.101^B
+"^DD",177.101,177.101,.01,1,1,1)
+S ^C0CS("B",$E(X,1,30),DA)=""
+"^DD",177.101,177.101,.01,1,1,2)
+K ^C0CS("B",$E(X,1,30),DA)
+"^DD",177.101,177.101,.01,3)
+POINTER TO PATIENT FILE
+"^DD",177.101,177.101,.01,"DT")
+3090414
+"^DD",177.101,177.101,1,0)
+SUBSCRIPTIONS^177.1011P^^1;0
+"^DD",177.101,177.101,2,0)
+CHECKSUMS^177.1012^^2;0
+"^DD",177.101,177.1011,0)
+SUBSCRIPTIONS SUB-FIELD^^.01^1
+"^DD",177.101,177.1011,0,"DT")
+3090428
+"^DD",177.101,177.1011,0,"IX","B",177.1011,.01)
+
+"^DD",177.101,177.1011,0,"NM","SUBSCRIPTIONS")
+
+"^DD",177.101,177.1011,0,"UP")
+177.101
+"^DD",177.101,177.1011,.01,0)
+SUBSCRIPTIONS^MP177.201^C0C(177.201,^0;1^Q
+"^DD",177.101,177.1011,.01,.1)
+POINTER TO SUBSCRIBER TO THIS PATIENT CCR
+"^DD",177.101,177.1011,.01,1,0)
+^.1
+"^DD",177.101,177.1011,.01,1,1,0)
+177.1011^B
+"^DD",177.101,177.1011,.01,1,1,1)
+S ^C0CS(DA(1),1,"B",$E(X,1,30),DA)=""
+"^DD",177.101,177.1011,.01,1,1,2)
+K ^C0CS(DA(1),1,"B",$E(X,1,30),DA)
+"^DD",177.101,177.1011,.01,3)
+POINTER TO SUBSCRIBER TO THIS PATIENT CCR
+"^DD",177.101,177.1011,.01,"DT")
+3090428
+"^DD",177.101,177.1012,0)
+CHECKSUMS SUB-FIELD^^1^2
+"^DD",177.101,177.1012,0,"DT")
+3090414
+"^DD",177.101,177.1012,0,"IX","B",177.1012,.01)
+
+"^DD",177.101,177.1012,0,"NM","CHECKSUMS")
+
+"^DD",177.101,177.1012,0,"UP")
+177.101
+"^DD",177.101,177.1012,.01,0)
+SUMMARY CHECKSUM^MF^^0;1^K:$L(X)>30!($L(X)<3) X
+"^DD",177.101,177.1012,.01,.1)
+CURRENT CHECKSUMS
+"^DD",177.101,177.1012,.01,1,0)
+^.1
+"^DD",177.101,177.1012,.01,1,1,0)
+177.1012^B
+"^DD",177.101,177.1012,.01,1,1,1)
+S ^C0CS(DA(1),2,"B",$E(X,1,30),DA)=""
+"^DD",177.101,177.1012,.01,1,1,2)
+K ^C0CS(DA(1),2,"B",$E(X,1,30),DA)
+"^DD",177.101,177.1012,.01,3)
+CURRENT CHECKSUMS
+"^DD",177.101,177.1012,.01,"DT")
+3090414
+"^DD",177.101,177.1012,1,0)
+DOMAIN CHECKSUM^177.10121P^^1;0
+"^DD",177.101,177.10121,0)
+DOMAIN CHECKSUM SUB-FIELD^^1^2
+"^DD",177.101,177.10121,0,"DT")
+3090414
+"^DD",177.101,177.10121,0,"IX","B",177.10121,.01)
+
+"^DD",177.101,177.10121,0,"NM","DOMAIN CHECKSUM")
+
+"^DD",177.101,177.10121,0,"UP")
+177.1012
+"^DD",177.101,177.10121,.01,0)
+DOMAIN^MP170.101'^C0CDIC(170.101,^0;1^Q
+"^DD",177.101,177.10121,.01,.1)
+DOMAIN SECTION POINTER
+"^DD",177.101,177.10121,.01,1,0)
+^.1
+"^DD",177.101,177.10121,.01,1,1,0)
+177.10121^B
+"^DD",177.101,177.10121,.01,1,1,1)
+S ^C0CS(DA(2),2,DA(1),1,"B",$E(X,1,30),DA)=""
+"^DD",177.101,177.10121,.01,1,1,2)
+K ^C0CS(DA(2),2,DA(1),1,"B",$E(X,1,30),DA)
+"^DD",177.101,177.10121,.01,3)
+DOMAIN POINTER
+"^DD",177.101,177.10121,.01,"DT")
+3090414
+"^DD",177.101,177.10121,1,0)
+CHECKSUM^F^^0;2^K:$L(X)>30!($L(X)<3) X
+"^DD",177.101,177.10121,1,.1)
+CHECKSUM FOR THIS DOMAIN
+"^DD",177.101,177.10121,1,3)
+CHECKSUM FOR THIS DOMAIN
+"^DD",177.101,177.10121,1,"DT")
+3090414
+"^DD",177.201,177.201,0)
+FIELD^^3^4
+"^DD",177.201,177.201,0,"DDA")
+N
+"^DD",177.201,177.201,0,"DT")
+3090414
+"^DD",177.201,177.201,0,"IX","B",177.201,.01)
+
+"^DD",177.201,177.201,0,"NM","CCR SUBSCRIBERS")
+
+"^DD",177.201,177.201,0,"PT",177.1011,.01)
+
+"^DD",177.201,177.201,.01,0)
+SUBSCRIBER NAME^RF^^0;1^K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
+"^DD",177.201,177.201,.01,.1)
+NAME OF THE SUBSCRIBING SYSTEM OR PERSON
+"^DD",177.201,177.201,.01,1,0)
+^.1
+"^DD",177.201,177.201,.01,1,1,0)
+177.201^B
+"^DD",177.201,177.201,.01,1,1,1)
+S ^C0C(177.201,"B",$E(X,1,30),DA)=""
+"^DD",177.201,177.201,.01,1,1,2)
+K ^C0C(177.201,"B",$E(X,1,30),DA)
+"^DD",177.201,177.201,.01,3)
+SUBSCRIBER NAME
+"^DD",177.201,177.201,.01,"DT")
+3090414
+"^DD",177.201,177.201,1,0)
+DELIVERY TYPE^S^DIR:DIRECTORY;WEB:WEBSERVICE;^0;2^Q
+"^DD",177.201,177.201,1,.1)
+CCR DELIVERY TYPE
+"^DD",177.201,177.201,1,3)
+CCR DELIVERY TYPE
+"^DD",177.201,177.201,1,"DT")
+3090414
+"^DD",177.201,177.201,2,0)
+DIRECTORY^F^^0;3^K:$L(X)>40!($L(X)<3) X
+"^DD",177.201,177.201,2,.1)
+CCR OUTPUT DIRECTORY
+"^DD",177.201,177.201,2,3)
+CCR OUTPUT DIRECTORY
+"^DD",177.201,177.201,2,"DT")
+3090414
+"^DD",177.201,177.201,3,0)
+URL^F^^1;1^K:$L(X)>200!($L(X)<3) X
+"^DD",177.201,177.201,3,.1)
+CCR DELIVERY URL
+"^DD",177.201,177.201,3,3)
+CCR DELIVERY URL
+"^DD",177.201,177.201,3,"DT")
+3090414
+"^DD",177.301,177.301,0)
+FIELD^^6^12
+"^DD",177.301,177.301,0,"DDA")
+N
+"^DD",177.301,177.301,0,"DT")
+3090505
+"^DD",177.301,177.301,0,"IX","B",177.301,.01)
+
+"^DD",177.301,177.301,0,"NM","C0C BATCH CONTROL")
+
+"^DD",177.301,177.301,.01,0)
+CCR BATCH RUN DATE/TIME^RD^^0;1^S %DT="ESTXR" D ^%DT S X=Y K:X<1 X
+"^DD",177.301,177.301,.01,.1)
+RUN DATE AND TIME OF THE CCR BATCH PROCESS
+"^DD",177.301,177.301,.01,1,0)
+^.1
+"^DD",177.301,177.301,.01,1,1,0)
+177.301^B
+"^DD",177.301,177.301,.01,1,1,1)
+S ^C0CB("B",$E(X,1,30),DA)=""
+"^DD",177.301,177.301,.01,1,1,2)
+K ^C0CB("B",$E(X,1,30),DA)
+"^DD",177.301,177.301,.01,3)
+RUN DATE AND TIME OF THE CCR BATCH PROCESS
+"^DD",177.301,177.301,.01,"DT")
+3090428
+"^DD",177.301,177.301,.02,0)
+BATCH ID^F^^2;1^K:$L(X)>30!($L(X)<1) X
+"^DD",177.301,177.301,.02,.1)
+BATCH ID FOR THIS RUN
+"^DD",177.301,177.301,.02,3)
+BATCH ID FOR THIS RUN
+"^DD",177.301,177.301,.02,"DT")
+3090428
+"^DD",177.301,177.301,1,0)
+SUBCRIBED TOTAL^NJ9,0^^0;2^K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1.N) X
+"^DD",177.301,177.301,1,.1)
+TOTAL NUMBER OF SUBSCRIBED PATIENTS
+"^DD",177.301,177.301,1,3)
+TOTAL NUMBER OF SUBSCRIBED PATIENTS
+"^DD",177.301,177.301,1,"DT")
+3090428
+"^DD",177.301,177.301,1.1,0)
+TOTAL PROCESSED^NJ7,0^^0;3^K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1.N) X
+"^DD",177.301,177.301,1.1,.1)
+NUMBER OF PATIENTS PROCESSED IN THE BATCH
+"^DD",177.301,177.301,1.1,3)
+NUMBER OF PATIENTS PROCESSED IN THE BATCH
+"^DD",177.301,177.301,1.1,"DT")
+3090428
+"^DD",177.301,177.301,2,0)
+HOT LIST TOTAL^NJ7,0^^0;4^K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1.N) X
+"^DD",177.301,177.301,2,.1)
+NUMBER OF PATIENTS IN THE HOT LIST
+"^DD",177.301,177.301,2,3)
+NUMBER OF PATIENTS IN THE HOT LIST
+"^DD",177.301,177.301,2,"DT")
+3090428
+"^DD",177.301,177.301,2.1,0)
+HOT LIST PROCESSED^NJ7,0^^0;5^K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1.N) X
+"^DD",177.301,177.301,2.1,.1)
+NUMBER PROCESSED IN THE HOT LIST
+"^DD",177.301,177.301,2.1,3)
+NUMBER PROCESSED IN THE HOT LIST
+"^DD",177.301,177.301,2.1,"DT")
+3090428
+"^DD",177.301,177.301,3,0)
+CCR UPDATES^177.3013P^^1;0
+"^DD",177.301,177.301,4,0)
+LAST UPDATE^D^^2;2^S %DT="ESTR" D ^%DT S X=Y K:X<1 X
+"^DD",177.301,177.301,4,.1)
+DATE AND TIME OF LAST UPDATE
+"^DD",177.301,177.301,4,3)
+DATE AND TIME OF LAST UPDATE
+"^DD",177.301,177.301,4,"DT")
+3090428
+"^DD",177.301,177.301,4.1,0)
+AVERAGE TIME IN SECONDS^NJ6,0^^2;3^K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1.N) X
+"^DD",177.301,177.301,4.1,.1)
+AVERAGE PROCESSING TIME IN SECONDS
+"^DD",177.301,177.301,4.1,3)
+AVERAGE PROCESSING TIME IN SECONDS
+"^DD",177.301,177.301,4.1,"DT")
+3090428
+"^DD",177.301,177.301,4.2,0)
+ESTIMATED COMPLETION TIME^D^^2;4^S %DT="ESTR" D ^%DT S X=Y K:X<1 X
+"^DD",177.301,177.301,4.2,.1)
+ESTIMATED BATCH COMPLETION TIME
+"^DD",177.301,177.301,4.2,3)
+ESTIMATED COMPLETION TIME
+"^DD",177.301,177.301,4.2,"DT")
+3090428
+"^DD",177.301,177.301,5,0)
+LAST RECORD^NJ9,0^^2;5^K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1.N) X
+"^DD",177.301,177.301,5,.1)
+LAST RECORD PROCESSED
+"^DD",177.301,177.301,5,3)
+Type a number between 0 and 999999999, 0 Decimal Digits
+"^DD",177.301,177.301,5,"DT")
+3090505
+"^DD",177.301,177.301,6,0)
+DISPOSITION^F^^2;6^K:$L(X)>30!($L(X)<1) X
+"^DD",177.301,177.301,6,.1)
+CCR BATCH PROCESS DISPOSITION
+"^DD",177.301,177.301,6,3)
+Answer must be 1-30 characters in length
+"^DD",177.301,177.301,6,"DT")
+3090505
+"^DD",177.301,177.3013,0)
+CCR UPDATES SUB-FIELD^^2^3
+"^DD",177.301,177.3013,0,"DT")
+3090428
+"^DD",177.301,177.3013,0,"IX","B",177.3013,.01)
+
+"^DD",177.301,177.3013,0,"NM","CCR UPDATES")
+
+"^DD",177.301,177.3013,0,"UP")
+177.301
+"^DD",177.301,177.3013,.01,0)
+CCR UPDATES^MP2'^DPT(^0;1^Q
+"^DD",177.301,177.3013,.01,.1)
+PATIENTS WHOS CCR HAS CHANGED
+"^DD",177.301,177.3013,.01,1,0)
+^.1
+"^DD",177.301,177.3013,.01,1,1,0)
+177.3013^B
+"^DD",177.301,177.3013,.01,1,1,1)
+S ^C0CB(DA(1),1,"B",$E(X,1,30),DA)=""
+"^DD",177.301,177.3013,.01,1,1,2)
+K ^C0CB(DA(1),1,"B",$E(X,1,30),DA)
+"^DD",177.301,177.3013,.01,3)
+PATIENTS WHOS CCR HAS CHANGED
+"^DD",177.301,177.3013,.01,"DT")
+3090505
+"^DD",177.301,177.3013,1,0)
+FILE CREATED^S^Y:YES;N:NO;^0;2^Q
+"^DD",177.301,177.3013,1,.1)
+WAS A FILE CREATED Y/N
+"^DD",177.301,177.3013,1,3)
+Y/N FILE CREATED
+"^DD",177.301,177.3013,1,"DT")
+3090428
+"^DD",177.301,177.3013,2,0)
+FILE NAME^F^^0;3^K:$L(X)>200!($L(X)<1) X
+"^DD",177.301,177.3013,2,.1)
+FILE NAME OF UPDATED CCR
+"^DD",177.301,177.3013,2,3)
+FILE NAME OF UPDATED CCR
+"^DD",177.301,177.3013,2,"DT")
+3090428
+"^DD",178.101,178.101,0)
+FIELD^^2.5^10
+"^DD",178.101,178.101,0,"DDA")
+N
+"^DD",178.101,178.101,0,"DT")
+3091130
+"^DD",178.101,178.101,0,"ID",1)
+W "   ",$P(^(0),U,2)
+"^DD",178.101,178.101,0,"NM","C0C XDS PROTOTYPE")
+
+"^DD",178.101,178.101,0,"PT",178.111,.01)
+
+"^DD",178.101,178.101,.01,0)
+NAME^RF^^0;1^K:$L(X)>80!($L(X)<3)!'(X'?1P.E) X
+"^DD",178.101,178.101,.01,.1)
+TEMPLATE NAME
+"^DD",178.101,178.101,.01,1,0)
+^.1^^0
+"^DD",178.101,178.101,.01,3)
+Answer must be 3-80 characters in length
+"^DD",178.101,178.101,.01,"DT")
+3091117
+"^DD",178.101,178.101,.02,0)
+TAG^F^^5;1^K:$L(X)>100!($L(X)<1) X
+"^DD",178.101,178.101,.02,.1)
+XML TAG USED FOR THIS TEMPLATE
+"^DD",178.101,178.101,.02,3)
+XML TAG USED FOR THIS TEMPLATE
+"^DD",178.101,178.101,.02,"DT")
+3091117
+"^DD",178.101,178.101,.03,0)
+ALT TAG^F^^5;2^K:$L(X)>100!($L(X)<1) X
+"^DD",178.101,178.101,.03,.1)
+ALTERNATE TAG FOR THIS TEMPLATE
+"^DD",178.101,178.101,.03,3)
+ALTERNATE TAG FOR THIS TEMPLATE
+"^DD",178.101,178.101,.03,"DT")
+3091110
+"^DD",178.101,178.101,1,0)
+TEMPLATE ID^F^^0;2^K:$L(X)>100!($L(X)<3) X
+"^DD",178.101,178.101,1,.1)
+TemplateID 
+"^DD",178.101,178.101,1,3)
+Template ID
+"^DD",178.101,178.101,1,"DT")
+3091109
+"^DD",178.101,178.101,1.5,0)
+WHERE USED^178.111P^^7;0
+"^DD",178.101,178.101,2,0)
+DESCRIPTION^178.1012^^1;0
+"^DD",178.101,178.101,2.1,0)
+XML^178.121^^9;0
+"^DD",178.101,178.101,2.5,0)
+XPATH REDUCTION STRING^F^^10;1^K:$L(X)>240!($L(X)<1) X
+"^DD",178.101,178.101,2.5,.1)
+REDUX
+"^DD",178.101,178.101,2.5,3)
+REDUX
+"^DD",178.101,178.101,2.5,"DT")
+3091130
+"^DD",178.101,178.101,3,0)
+TEMPLATE XML^178.1013^^2;0
+"^DD",178.101,178.101,3,"DT")
+3091130
+"^DD",178.101,178.101,4,0)
+BINDING^178.1014^^8;0
+"^DD",178.101,178.1012,0)
+DESCRIPTION SUB-FIELD^^.01^1
+"^DD",178.101,178.1012,0,"DT")
+3091109
+"^DD",178.101,178.1012,0,"NM","DESCRIPTION")
+
+"^DD",178.101,178.1012,0,"UP")
+178.101
+"^DD",178.101,178.1012,.01,0)
+DESCRIPTION^Wx^^0;1
+"^DD",178.101,178.1012,.01,.1)
+DESCRIPTION OF THIS TEMPLATE
+"^DD",178.101,178.1012,.01,3)
+DESCRIPTION OF THIS TEMPLATE
+"^DD",178.101,178.1012,.01,"DT")
+3091109
+"^DD",178.101,178.1013,0)
+TEMPLATE XML SUB-FIELD^^.01^1
+"^DD",178.101,178.1013,0,"DT")
+3091109
+"^DD",178.101,178.1013,0,"NM","TEMPLATE XML")
+
+"^DD",178.101,178.1013,0,"UP")
+178.101
+"^DD",178.101,178.1013,.01,0)
+XML^WLx^^0;1
+"^DD",178.101,178.1013,.01,.1)
+XML ASSOCIATED WITH THIS TEMPLATE
+"^DD",178.101,178.1013,.01,3)
+XML ASSOCIATED WITH THIS TEMPLATE
+"^DD",178.101,178.1013,.01,"DT")
+3091130
+"^DD",178.101,178.1014,0)
+BINDING SUB-FIELD^^3^4
+"^DD",178.101,178.1014,0,"DT")
+3091130
+"^DD",178.101,178.1014,0,"IX","B",178.1014,.01)
+
+"^DD",178.101,178.1014,0,"NM","BINDING")
+
+"^DD",178.101,178.1014,0,"UP")
+178.101
+"^DD",178.101,178.1014,.01,0)
+XPATH^MF^^0;1^K:$L(X)>240!($L(X)<1) X
+"^DD",178.101,178.1014,.01,.1)
+XPATH BINDING
+"^DD",178.101,178.1014,.01,1,0)
+^.1
+"^DD",178.101,178.1014,.01,1,1,0)
+178.1014^B
+"^DD",178.101,178.1014,.01,1,1,1)
+S ^C0CXDS(178.101,DA(1),8,"B",$E(X,1,30),DA)=""
+"^DD",178.101,178.1014,.01,1,1,2)
+K ^C0CXDS(178.101,DA(1),8,"B",$E(X,1,30),DA)
+"^DD",178.101,178.1014,.01,3)
+XPATH BINDING
+"^DD",178.101,178.1014,.01,"DT")
+3091130
+"^DD",178.101,178.1014,1,0)
+CCR VARIABLE^P170^C0CDIC(170,^0;2^Q
+"^DD",178.101,178.1014,1,.1)
+CCR DICTIONARY POINTER
+"^DD",178.101,178.1014,1,3)
+CCR DICTIONARY POINTER
+"^DD",178.101,178.1014,1,"DT")
+3091130
+"^DD",178.101,178.1014,2,0)
+VARIABLE^F^^1;1^K:$L(X)>100!($L(X)<1) X
+"^DD",178.101,178.1014,2,.1)
+MAPPING VARIABLE NAME
+"^DD",178.101,178.1014,2,3)
+MAPPING VARIABLE NAME
+"^DD",178.101,178.1014,2,"DT")
+3091130
+"^DD",178.101,178.1014,3,0)
+DEFAULT^F^^2;1^K:$L(X)>240!($L(X)<1) X
+"^DD",178.101,178.1014,3,.1)
+DEFAULT VALUE
+"^DD",178.101,178.1014,3,3)
+DEFAULT VALUE
+"^DD",178.101,178.1014,3,"DT")
+3091130
+"^DD",178.101,178.111,0)
+WHERE USED SUB-FIELD^^2^3
+"^DD",178.101,178.111,0,"DT")
+3091111
+"^DD",178.101,178.111,0,"IX","B",178.111,.01)
+
+"^DD",178.101,178.111,0,"NM","WHERE USED")
+
+"^DD",178.101,178.111,0,"UP")
+178.101
+"^DD",178.101,178.111,.01,0)
+WHERE USED^MP178.101'^C0CXDS(178.101,^0;1^Q
+"^DD",178.101,178.111,.01,.1)
+POINTER TO TEMPLATE WHICH CONTAINS THIS TEMPLATE
+"^DD",178.101,178.111,.01,1,0)
+^.1
+"^DD",178.101,178.111,.01,1,1,0)
+178.111^B
+"^DD",178.101,178.111,.01,1,1,1)
+S ^C0CXDS(178.101,DA(1),7,"B",$E(X,1,30),DA)=""
+"^DD",178.101,178.111,.01,1,1,2)
+K ^C0CXDS(178.101,DA(1),7,"B",$E(X,1,30),DA)
+"^DD",178.101,178.111,.01,3)
+POINTER TO TEMPLATE WHICH CONTAINS THIS TEMPLATE
+"^DD",178.101,178.111,.01,"DT")
+3091124
+"^DD",178.101,178.111,1,0)
+TAG^F^^0;2^K:$L(X)>30!($L(X)<1) X
+"^DD",178.101,178.111,1,.1)
+TAG VALUE FOR THIS USE
+"^DD",178.101,178.111,1,3)
+TAG VALUE FOR THIS USE
+"^DD",178.101,178.111,1,"DT")
+3091111
+"^DD",178.101,178.111,2,0)
+ALT TAG^F^^0;3^K:$L(X)>30!($L(X)<1) X
+"^DD",178.101,178.111,2,.1)
+ALTERNATE TAG VALUE FOR THIS USE
+"^DD",178.101,178.111,2,3)
+ALTERNATE TAG VALUE FOR THIS USE
+"^DD",178.101,178.111,2,"DT")
+3091111
+"^DD",178.101,178.121,0)
+XML SUB-FIELD^^.01^1
+"^DD",178.101,178.121,0,"DT")
+3091130
+"^DD",178.101,178.121,0,"NM","XML")
+
+"^DD",178.101,178.121,0,"UP")
+178.101
+"^DD",178.101,178.121,.01,0)
+XML^WLx^^0;1
+"^DD",178.101,178.121,.01,.1)
+SOURCE XML
+"^DD",178.101,178.121,.01,3)
+SOURCE XML
+"^DD",178.101,178.121,.01,"DT")
+3091130
+"^DD",178.301,178.301,0)
+FIELD^^2.2^11
+"^DD",178.301,178.301,0,"DDA")
+N
+"^DD",178.301,178.301,0,"DT")
+3100226
+"^DD",178.301,178.301,0,"IX","B",178.301,.01)
+
+"^DD",178.301,178.301,0,"NM","C0C XML MISC")
+
+"^DD",178.301,178.301,0,"PT",178.301,.03)
+
+"^DD",178.301,178.301,.01,0)
+TEMPLATE NAME^RF^^0;1^K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
+"^DD",178.301,178.301,.01,.1)
+NAME OF THE XML TEMPLATE
+"^DD",178.301,178.301,.01,1,0)
+^.1
+"^DD",178.301,178.301,.01,1,1,0)
+178.301^B
+"^DD",178.301,178.301,.01,1,1,1)
+S ^C0CX(178.301,"B",$E(X,1,30),DA)=""
+"^DD",178.301,178.301,.01,1,1,2)
+K ^C0CX(178.301,"B",$E(X,1,30),DA)
+"^DD",178.301,178.301,.01,3)
+NAME OF THE XML TEMPLATE
+"^DD",178.301,178.301,.01,"DT")
+3100224
+"^DD",178.301,178.301,.03,0)
+REPLY TEMPLATE^P178.301^C0CX(178.301,^0;2^Q
+"^DD",178.301,178.301,.03,.1)
+TEMPLATE TO USE FOR WEB SERVICE REPLY
+"^DD",178.301,178.301,.03,3)
+TEMPLATE TO USE FOR WEB SERVICE REPLY
+"^DD",178.301,178.301,.03,"DT")
+3100224
+"^DD",178.301,178.301,1,0)
+URL^F^^1;1^K:$L(X)>240!($L(X)<3) X
+"^DD",178.301,178.301,1,.1)
+WEB SERVICE URL
+"^DD",178.301,178.301,1,3)
+WEB SERVICE URL
+"^DD",178.301,178.301,1,"DT")
+3100224
+"^DD",178.301,178.301,2,0)
+WSDL URL^F^^2;1^K:$L(X)>240!($L(X)<3) X
+"^DD",178.301,178.301,2,.1)
+TEMPLATE DEFINITION URL - COULD BE WSDL
+"^DD",178.301,178.301,2,3)
+TEMPLATE DEFINITION URL - COULD BE WSDL
+"^DD",178.301,178.301,2,"DT")
+3100224
+"^DD",178.301,178.301,2.1,0)
+XML^178.311^^3;0
+"^DD",178.301,178.301,2.2,0)
+XML HEADER^178.321^^10;0
+"^DD",178.301,178.301,2.3,0)
+MIME TYPE^F^^5;1^K:$L(X)>240!($L(X)<3) X
+"^DD",178.301,178.301,2.3,.1)
+SOAP MIME TYPE
+"^DD",178.301,178.301,2.3,3)
+SOAP MIME TYPE
+"^DD",178.301,178.301,2.3,"DT")
+3100224
+"^DD",178.301,178.301,2.4,0)
+PROXY SERVER^F^^6;1^K:$L(X)>240!($L(X)<3) X
+"^DD",178.301,178.301,2.4,.1)
+OPTIONAL PROXY SERVER URL
+"^DD",178.301,178.301,2.4,3)
+OPTIONAL PROXY SERVER URL
+"^DD",178.301,178.301,2.4,"DT")
+3100224
+"^DD",178.301,178.301,2.5,0)
+XPATH REDUCTION STRING^F^^7;1^K:$L(X)>240!($L(X)<3) X
+"^DD",178.301,178.301,2.5,.1)
+PARTIAL XPATH TO BE REDACTED FROM GENERATED XPATHS
+"^DD",178.301,178.301,2.5,3)
+XPATH REDUCTION STRING
+"^DD",178.301,178.301,2.5,"DT")
+3100224
+"^DD",178.301,178.301,3,0)
+TEMPLATE XML^178.3013^^8;0
+"^DD",178.301,178.301,4,0)
+BINDING^178.3014^^9;0
+"^DD",178.301,178.3013,0)
+TEMPLATE XML SUB-FIELD^^.01^1
+"^DD",178.301,178.3013,0,"DT")
+3100224
+"^DD",178.301,178.3013,0,"NM","TEMPLATE XML")
+
+"^DD",178.301,178.3013,0,"UP")
+178.301
+"^DD",178.301,178.3013,.01,0)
+TEMPLATE XML^WLx^^0;1
+"^DD",178.301,178.3013,.01,.1)
+XML TEMPLATE - USUALLY GENERATED
+"^DD",178.301,178.3013,.01,3)
+XML TEMPLATE - USUALLY PROGRAM GENERATED
+"^DD",178.301,178.3013,.01,"DT")
+3100224
+"^DD",178.301,178.3014,0)
+BINDING SUB-FIELD^^4^8
+"^DD",178.301,178.3014,0,"DT")
+3100224
+"^DD",178.301,178.3014,0,"IX","B",178.3014,.01)
+
+"^DD",178.301,178.3014,0,"NM","BINDING")
+
+"^DD",178.301,178.3014,0,"UP")
+178.301
+"^DD",178.301,178.3014,.01,0)
+XPATH^MF^^0;1^K:$L(X)>240!($L(X)<3) X
+"^DD",178.301,178.3014,.01,.1)
+XPATH BINDINGS
+"^DD",178.301,178.3014,.01,1,0)
+^.1
+"^DD",178.301,178.3014,.01,1,1,0)
+178.3014^B
+"^DD",178.301,178.3014,.01,1,1,1)
+S ^C0CX(178.301,DA(1),9,"B",$E(X,1,30),DA)=""
+"^DD",178.301,178.3014,.01,1,1,2)
+K ^C0CX(178.301,DA(1),9,"B",$E(X,1,30),DA)
+"^DD",178.301,178.3014,.01,3)
+XPATH BINDINGS
+"^DD",178.301,178.3014,.01,"DT")
+3100225
+"^DD",178.301,178.3014,.05,0)
+INDEXED BY^F^^1;1^K:$L(X)>80!($L(X)<1) X
+"^DD",178.301,178.3014,.05,.1)
+IEN VARIABLE FOR FILEMAN MAPPING
+"^DD",178.301,178.3014,.05,3)
+IEN VARIABLE FOR FILEMAN MAPPING
+"^DD",178.301,178.3014,.05,"DT")
+3100224
+"^DD",178.301,178.3014,1,0)
+FILEMAN FIELD NAME^F^^1;2^K:$L(X)>60!($L(X)<3) X
+"^DD",178.301,178.3014,1,.1)
+NAME OF FILEMAN FIELD - OPTIONAL
+"^DD",178.301,178.3014,1,3)
+NAME OF FILEMAN FIELD - OPTIONAL
+"^DD",178.301,178.3014,1,"DT")
+3100224
+"^DD",178.301,178.3014,1.1,0)
+FILEMAN FILE POINTER^P1'^DIC(^1;3^Q
+"^DD",178.301,178.3014,1.1,.1)
+POINTER TO THE FILEMAN FILE
+"^DD",178.301,178.3014,1.1,3)
+POINTER TO THE FILEMAN FILE
+"^DD",178.301,178.3014,1.1,"DT")
+3100224
+"^DD",178.301,178.3014,1.2,0)
+FILEMAN FIELD NUMBER^NJ22,9^^1;4^K:+X'=X!(X>999999999999)!(X<.000000001)!(X?.E1"."10.N) X
+"^DD",178.301,178.3014,1.2,.1)
+FIELD NUMBER IN FILEMAN
+"^DD",178.301,178.3014,1.2,3)
+Type a number between .000000001 and 999999999999, 9 Decimal Digits
+"^DD",178.301,178.3014,1.2,"DT")
+3100224
+"^DD",178.301,178.3014,2,0)
+VARIABLE NAME^F^^2;1^K:$L(X)>240!($L(X)<1) X
+"^DD",178.301,178.3014,2,.1)
+NAME OF VARIABLE FOR BINDING
+"^DD",178.301,178.3014,2,3)
+NAME OF VARIABLE FOR BINDING
+"^DD",178.301,178.3014,2,"DT")
+3100224
+"^DD",178.301,178.3014,3,0)
+SQLI FIELD NAME^F^^3;1^K:$L(X)>240!($L(X)<3) X
+"^DD",178.301,178.3014,3,.1)
+SQLI NAME FOR THIS FIELD
+"^DD",178.301,178.3014,3,3)
+SQLI NAME FOR THIS FIELD
+"^DD",178.301,178.3014,3,"DT")
+3100224
+"^DD",178.301,178.3014,4,0)
+CCR VARIABLE^P170^C0CDIC(170,^3;2^Q
+"^DD",178.301,178.3014,4,.1)
+CCR DICTIONARY POINTER
+"^DD",178.301,178.3014,4,3)
+CCR DICTIONARY POINTER
+"^DD",178.301,178.3014,4,"DT")
+3100224
+"^DD",178.301,178.311,0)
+XML SUB-FIELD^^.01^1
+"^DD",178.301,178.311,0,"DT")
+3100224
+"^DD",178.301,178.311,0,"NM","XML")
+
+"^DD",178.301,178.311,0,"UP")
+178.301
+"^DD",178.301,178.311,.01,0)
+XML^WLx^^0;1
+"^DD",178.301,178.311,.01,.1)
+DEFINING XML
+"^DD",178.301,178.311,.01,3)
+DEFINING XML
+"^DD",178.301,178.311,.01,"DT")
+3100224
+"^DD",178.301,178.321,0)
+XML HEADER SUB-FIELD^^.01^1
+"^DD",178.301,178.321,0,"DT")
+3100226
+"^DD",178.301,178.321,0,"NM","XML HEADER")
+
+"^DD",178.301,178.321,0,"UP")
+178.301
+"^DD",178.301,178.321,.01,0)
+XML HEADER^WLx^^0;1
+"^DD",178.301,178.321,.01,.1)
+XML SOAP HEADER
+"^DD",178.301,178.321,.01,3)
+XML SOAP HEADER
+"^DD",178.301,178.321,.01,"DT")
+3100226
+"^DIC",170,170,0)
+CCR DICTIONARY^170
+"^DIC",170,170,0,"GL")
+^C0CDIC(170,
+"^DIC",170,"B","CCR DICTIONARY",170)
+
+"^DIC",170.101,170.101,0)
+CCR NODE TYPE^170.101
+"^DIC",170.101,170.101,0,"GL")
+^C0CDIC(170.101,
+"^DIC",170.101,"B","CCR NODE TYPE",170.101)
+
+"^DIC",170.9,170.9,0)
+C0C PARAMETERS^170.9
+"^DIC",170.9,170.9,0,"GL")
+^C0CPARM(
+"^DIC",170.9,"B","C0C PARAMETERS",170.9)
+
+"^DIC",171.101,171.101,0)
+CCR E2^171.101
+"^DIC",171.101,171.101,0,"GL")
+^C0CE(
+"^DIC",171.101,"B","CCR E2",171.101)
+
+"^DIC",171.401,171.401,0)
+CCR SOURCE^171.401
+"^DIC",171.401,171.401,0,"GL")
+^C0C(171.401,
+"^DIC",171.401,"B","CCR SOURCE",171.401)
+
+"^DIC",175,175,0)
+C0C INCOMING XML^175
+"^DIC",175,175,0,"GL")
+^C0CIN(
+"^DIC",175,"B","C0C INCOMING XML",175)
+
+"^DIC",176.112,176.112,0)
+C0C RXNORM VUID EXPANSION^176.112
+"^DIC",176.112,176.112,0,"GL")
+^C0CCODES(176.112,
+"^DIC",176.112,"B","C0C RXNORM VUID EXPANSION",176.112)
+
+"^DIC",177.101,177.101,0)
+CCR PATIENT SUBSCRIPTIONS^177.101
+"^DIC",177.101,177.101,0,"GL")
+^C0CS(
+"^DIC",177.101,"B","CCR PATIENT SUBSCRIPTIONS",177.101)
+
+"^DIC",177.201,177.201,0)
+CCR SUBSCRIBERS^177.201
+"^DIC",177.201,177.201,0,"GL")
+^C0C(177.201,
+"^DIC",177.201,"B","CCR SUBSCRIBERS",177.201)
+
+"^DIC",177.301,177.301,0)
+C0C BATCH CONTROL^177.301
+"^DIC",177.301,177.301,0,"GL")
+^C0CB(
+"^DIC",177.301,177.301,"%",0)
+^1.005^^0
+"^DIC",177.301,177.301,"%D",0)
+^^11^11^3090428^
+"^DIC",177.301,177.301,"%D",1,0)
+This is the CCR Batch control file created by George Lilly for the CCR 
+"^DIC",177.301,177.301,"%D",2,0)
+project in April, 2009. It contains a record for every time the batch 
+"^DIC",177.301,177.301,"%D",3,0)
+process (EN^C0CBAT) is run. The key is the date and time of the run, 
+"^DIC",177.301,177.301,"%D",4,0)
+established at the beginning of the run. The file supports the creation 
+"^DIC",177.301,177.301,"%D",5,0)
+of a "hot list" of patients who are more likely to have changes in their 
+"^DIC",177.301,177.301,"%D",6,0)
+CCR Variables and are processed first in the batch. The Hot List will 
+"^DIC",177.301,177.301,"%D",7,0)
+initially be populated by using the "AC" index on the Order file (100). 
+"^DIC",177.301,177.301,"%D",8,0)
+Only patients who have an entry in the CCR PATIENT SUBSCRIPTIONS 
+"^DIC",177.301,177.301,"%D",9,0)
+(177.101) file will be processed in batch. Processing order will be from 
+"^DIC",177.301,177.301,"%D",10,0)
+the highest DFN backward to increase the likelyhood of finding changes 
+"^DIC",177.301,177.301,"%D",11,0)
+early in the process. 
+"^DIC",177.301,"B","C0C BATCH CONTROL",177.301)
+
+"^DIC",178.101,178.101,0)
+C0C XDS PROTOTYPE^178.101
+"^DIC",178.101,178.101,0,"GL")
+^C0CXDS(178.101,
+"^DIC",178.101,178.101,"%",0)
+^1.005^^0
+"^DIC",178.101,178.101,"%D",0)
+^^4^4^3091109^
+"^DIC",178.101,178.101,"%D",1,0)
+This is a prototype XDS XML repository created for the C0C project by 
+"^DIC",178.101,178.101,"%D",2,0)
+George Lilly. Following the lead of the Connect project, the XDS 
+"^DIC",178.101,178.101,"%D",3,0)
+repository will be used to store CCD and other XML templates and to index 
+"^DIC",178.101,178.101,"%D",4,0)
+them by thier TemplateIDs. 11/9/2009 gpl
+"^DIC",178.101,"B","C0C XDS PROTOTYPE",178.101)
+
+"^DIC",178.301,178.301,0)
+C0C XML MISC^178.301
+"^DIC",178.301,178.301,0,"GL")
+^C0CX(178.301,
+"^DIC",178.301,"B","C0C XML MISC",178.301)
+
+**END**
+**END**
