BGP82Q2 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 09, 2017 ;
;;18.0;IHS CLINICAL REPORTING;;NOV 21, 2017;Build 51
;
START ;
K:'$G(ATXPGMC) ^TMP("ATX",$J)
S ATXPGMC=$G(ATXPGMC)+1
F ATXI=1:1 S X=$P($T(TMP+ATXI),";;",2,99) Q:X="" S X="^TMP(""ATX"",$J,"_X,ATXI=ATXI+1,Y=$P($T(TMP+ATXI),";;",2,99) S @X=Y
Q
;
TMP ;;TAXONOMY (WITH BULLETIN)
;;21,"55289-0392-03 ")
;;340
;;21,"55289-0477-27 ")
;;341
;;21,"55289-0947-12 ")
;;342
;;21,"55700-0096-04 ")
;;343
;;21,"55700-0096-06 ")
;;344
;;21,"55700-0304-06 ")
;;345
;;21,"55700-0411-06 ")
;;346
;;21,"57237-0274-24 ")
;;347
;;21,"59676-0278-01 ")
;;348
;;21,"59676-0561-01 ")
;;349
;;21,"59676-0562-01 ")
;;350
;;21,"59676-0563-01 ")
;;351
;;21,"59676-0564-01 ")
;;352
;;21,"59676-0565-01 ")
;;353
;;21,"59676-0566-30 ")
;;354
;;21,"59676-0570-01 ")
;;355
;;21,"59676-0571-01 ")
;;356
;;21,"59676-0572-01 ")
;;357
;;21,"59676-0575-30 ")
;;358
;;21,"60429-0298-60 ")
;;359
;;21,"60429-0353-60 ")
;;360
;;21,"60429-0354-30 ")
;;361
;;21,"60505-3251-06 ")
;;362
;;21,"60505-3252-03 ")
;;363
;;21,"60505-3583-06 ")
;;364
;;21,"60505-3788-06 ")
;;365
;;21,"60505-4058-03 ")
;;366
;;21,"60760-0010-18 ")
;;367
;;21,"60760-0010-63 ")
;;368
;;21,"60760-0385-04 ")
;;369
;;21,"60760-0385-14 ")
;;370
;;21,"60760-0595-04 ")
;;371
;;21,"60760-0595-14 ")
;;372
;;21,"61442-0470-60 ")
;;373
;;21,"61919-0061-02 ")
;;374
;;21,"61958-0401-01 ")
;;375
;;21,"61958-0403-01 ")
;;376
;;21,"61958-0404-01 ")
;;377
;;21,"61958-0405-01 ")
;;378
;;21,"61958-0406-01 ")
;;379
;;21,"61958-0601-01 ")
;;380
;;21,"61958-0602-01 ")
;;381
;;21,"61958-0701-01 ")
;;382
;;21,"61958-0703-01 ")
;;383
;;21,"61958-0704-01 ")
;;384
;;21,"61958-0705-01 ")
;;385
;;21,"61958-1101-01 ")
;;386
;;21,"61958-1201-01 ")
;;387
;;21,"61958-1301-01 ")
;;388
;;21,"61958-1302-01 ")
;;389
;;21,"61958-1901-01 ")
;;390
;;21,"61958-2002-01 ")
;;391
;;21,"61958-2101-01 ")
;;392
;;21,"63010-0010-30 ")
;;393
;;21,"63010-0027-70 ")
;;394
;;21,"64376-0128-01 ")
;;395
;;21,"64376-0129-23 ")
;;396
;;21,"64376-0133-02 ")
;;397
;;21,"64380-0707-03 ")
;;398
;;21,"64380-0717-03 ")
;;399
;;21,"65162-0209-06 ")
;;400
;;21,"65862-0024-60 ")
;;401
;;21,"65862-0027-60 ")
;;402
;;21,"65862-0046-60 ")
;;403
;;21,"65862-0047-60 ")
;;404
;;21,"65862-0048-24 ")
;;405
;;21,"65862-0055-24 ")
;;406
;;21,"65862-0073-60 ")
;;407
;;21,"65862-0107-01 ")
;;408
;;21,"65862-0111-60 ")
;;409
;;21,"65862-0112-60 ")
;;410
;;21,"65862-0310-30 ")
;;411
;;21,"65862-0311-30 ")
;;412
;;21,"65862-0312-30 ")
;;413
;;21,"65862-0313-30 ")
;;414
;;21,"65862-0552-60 ")
;;415
;;21,"65862-0553-30 ")
;;416
;;21,"65862-0597-60 ")
;;417
;;21,"65862-0900-30 ")
;;418
;;21,"65862-0932-90 ")
;;419
;;21,"65862-0933-30 ")
;;420
;;21,"66267-0509-06 ")
;;421
;;21,"66267-0513-06 ")
;;422
;;21,"66267-0514-18 ")
;;423
;;21,"66267-0514-63 ")
;;424
;;21,"66336-0214-06 ")
;;425
;;21,"66336-0624-12 ")
;;426
;;21,"66993-0482-30 ")
;;427
;;21,"68071-0748-12 ")
;;428
;;21,"68071-0908-06 ")
;;429
;;21,"68071-2112-03 ")
;;430
;;21,"68071-2113-06 ")
;;431
;;21,"68084-0021-11 ")
;;432
;;21,"68084-0021-21 ")
;;433
;;21,"68084-0416-11 ")
;;434
;;21,"68084-0416-21 ")
;;435
;;21,"68084-0416-25 ")
;;436
;;21,"68084-0416-95 ")
;;437
;;21,"68084-0460-11 ")
;;438
;;21,"68084-0460-21 ")
;;439
;;21,"68084-0461-11 ")
;;440
;;21,"68084-0461-21 ")
;;441
;;21,"68084-0462-11 ")
;;442
;;21,"68084-0462-21 ")
;;443
;;21,"68084-0578-11 ")
;;444
;;21,"68084-0578-21 ")
;;445
;;21,"68180-0284-07 ")
;;446
;;21,"68180-0286-07 ")
;;447
;;21,"68180-0288-06 ")
;;448
;;21,"68180-0602-07 ")
;;449
;;21,"68180-0603-06 ")
;;450
;;21,"68258-1972-01 ")
;;451
;;21,"68788-6394-01 ")
;;452
;;21,"68788-6394-02 ")
;;453
;;21,"68788-6394-03 ")
;;454
;;21,"68788-6394-06 ")
;;455
;;21,"68788-6394-08 ")
;;456
;;21,"68788-6394-09 ")
;;457
;;21,"69097-0362-02 ")
;;458
;;21,"69097-0403-02 ")
;;459
;;21,"76282-0115-60 ")
;;460
;;21,"76519-1005-06 ")
;;461
;;9002226,1225,.01)
;;BGP PQA ANTIRETROVIRAL NDC
;;9002226,1225,.02)
;;@
;;9002226,1225,.04)
;;n
;;9002226,1225,.06)
;;@
;;9002226,1225,.08)
;;@
;;9002226,1225,.09)
;;3170809
;;9002226,1225,.11)
;;@
;;9002226,1225,.12)
;;@
;;9002226,1225,.13)
;;1
;;9002226,1225,.14)
;;@
;;9002226,1225,.15)
;;50.67
;;9002226,1225,.16)
;;@
;;9002226,1225,.17)
;;@
;;9002226,1225,.22)
;;1
;;9002226,1225,3101)
;;@
;;9002226.02101,"1225,00003-1964-01 ",.01)
;;00003-1964-01
;;9002226.02101,"1225,00003-1964-01 ",.02)
;;00003-1964-01
;;9002226.02101,"1225,00003-1965-01 ",.01)
;;00003-1965-01
;;9002226.02101,"1225,00003-1965-01 ",.02)
;;00003-1965-01
;;9002226.02101,"1225,00003-1966-01 ",.01)
;;00003-1966-01
;;9002226.02101,"1225,00003-1966-01 ",.02)
;;00003-1966-01
;;9002226.02101,"1225,00003-1967-01 ",.01)
;;00003-1967-01
;;9002226.02101,"1225,00003-1967-01 ",.02)
;;00003-1967-01
;;9002226.02101,"1225,00003-1968-01 ",.01)
;;00003-1968-01
;;9002226.02101,"1225,00003-1968-01 ",.02)
;;00003-1968-01
;;9002226.02101,"1225,00003-3622-12 ",.01)
;;00003-3622-12
;;9002226.02101,"1225,00003-3622-12 ",.02)
;;00003-3622-12
;;9002226.02101,"1225,00003-3623-12 ",.01)
;;00003-3623-12
;;9002226.02101,"1225,00003-3623-12 ",.02)
;;00003-3623-12
;;9002226.02101,"1225,00003-3624-12 ",.01)
;;00003-3624-12
;;9002226.02101,"1225,00003-3624-12 ",.02)
;;00003-3624-12
;;9002226.02101,"1225,00003-3631-12 ",.01)
;;00003-3631-12
;;9002226.02101,"1225,00003-3631-12 ",.02)
;;00003-3631-12
;;9002226.02101,"1225,00003-3638-10 ",.01)
;;00003-3638-10
;;9002226.02101,"1225,00003-3638-10 ",.02)
;;00003-3638-10
;;9002226.02101,"1225,00003-3641-11 ",.01)
;;00003-3641-11
;;9002226.02101,"1225,00003-3641-11 ",.02)
;;00003-3641-11
;;9002226.02101,"1225,00004-0244-51 ",.01)
;;00004-0244-51
;;9002226.02101,"1225,00004-0244-51 ",.02)
;;00004-0244-51
;;9002226.02101,"1225,00004-0245-15 ",.01)
;;00004-0245-15
;;9002226.02101,"1225,00004-0245-15 ",.02)
;;00004-0245-15
;;9002226.02101,"1225,00004-0381-40 ",.01)
;;00004-0381-40
;;9002226.02101,"1225,00004-0381-40 ",.02)
;;00004-0381-40
;;9002226.02101,"1225,00006-0227-61 ",.01)
;;00006-0227-61
;;9002226.02101,"1225,00006-0227-61 ",.02)
;;00006-0227-61
;;9002226.02101,"1225,00006-0473-61 ",.01)
;;00006-0473-61
;;9002226.02101,"1225,00006-0473-61 ",.02)
;;00006-0473-61
;;9002226.02101,"1225,00006-0477-61 ",.01)
;;00006-0477-61
;;9002226.02101,"1225,00006-0477-61 ",.02)
;;00006-0477-61
;;9002226.02101,"1225,00006-0571-43 ",.01)
;;00006-0571-43
;;9002226.02101,"1225,00006-0571-43 ",.02)
;;00006-0571-43
;;9002226.02101,"1225,00006-0573-62 ",.01)
;;00006-0573-62
;;9002226.02101,"1225,00006-0573-62 ",.02)
;;00006-0573-62
;;9002226.02101,"1225,00006-3603-01 ",.01)
;;00006-3603-01
;;9002226.02101,"1225,00006-3603-01 ",.02)
;;00006-3603-01
;;9002226.02101,"1225,00006-3603-60 ",.01)
;;00006-3603-60
;;9002226.02101,"1225,00006-3603-60 ",.02)
;;00006-3603-60
;;9002226.02101,"1225,00054-0450-58 ",.01)
;;00054-0450-58
;;9002226.02101,"1225,00054-0450-58 ",.02)
;;00054-0450-58
;;9002226.02101,"1225,00054-0459-21 ",.01)
;;00054-0459-21
;;9002226.02101,"1225,00054-0459-21 ",.02)
;;00054-0459-21
;;9002226.02101,"1225,00056-0470-30 ",.01)
;;00056-0470-30
;;9002226.02101,"1225,00056-0470-30 ",.02)
;;00056-0470-30
;;9002226.02101,"1225,00056-0474-92 ",.01)
;;00056-0474-92
;;9002226.02101,"1225,00056-0474-92 ",.02)
;;00056-0474-92
;;9002226.02101,"1225,00056-0510-30 ",.01)
;;00056-0510-30
;;9002226.02101,"1225,00056-0510-30 ",.02)
;;00056-0510-30
;;9002226.02101,"1225,00074-0522-60 ",.01)
;;00074-0522-60
;;9002226.02101,"1225,00074-0522-60 ",.02)
;;00074-0522-60
;;9002226.02101,"1225,00074-1940-63 ",.01)
;;00074-1940-63
;;9002226.02101,"1225,00074-1940-63 ",.02)
;;00074-1940-63
;;9002226.02101,"1225,00074-3333-30 ",.01)
;;00074-3333-30
;;9002226.02101,"1225,00074-3333-30 ",.02)
;;00074-3333-30
;;9002226.02101,"1225,00074-3956-46 ",.01)
;;00074-3956-46
;;9002226.02101,"1225,00074-3956-46 ",.02)
;;00074-3956-46
;;9002226.02101,"1225,00074-6633-30 ",.01)
;;00074-6633-30
;;9002226.02101,"1225,00074-6633-30 ",.02)
;;00074-6633-30
;;9002226.02101,"1225,00074-6799-22 ",.01)
;;00074-6799-22
;;9002226.02101,"1225,00074-6799-22 ",.02)
;;00074-6799-22
;;9002226.02101,"1225,00087-6632-41 ",.01)
;;00087-6632-41
;;9002226.02101,"1225,00087-6632-41 ",.02)
;;00087-6632-41
;;9002226.02101,"1225,00087-6633-41 ",.01)
;;00087-6633-41
;;9002226.02101,"1225,00087-6633-41 ",.02)
;;00087-6633-41
;;9002226.02101,"1225,00087-6671-17 ",.01)
;;00087-6671-17
;;9002226.02101,"1225,00087-6671-17 ",.02)
;;00087-6671-17
;;9002226.02101,"1225,00087-6672-17 ",.01)
;;00087-6672-17
;;9002226.02101,"1225,00087-6672-17 ",.02)
;;00087-6672-17
;;9002226.02101,"1225,00087-6673-17 ",.01)
;;00087-6673-17
;;9002226.02101,"1225,00087-6673-17 ",.02)
;;00087-6673-17
;;9002226.02101,"1225,00087-6674-17 ",.01)
;;00087-6674-17
;;9002226.02101,"1225,00087-6674-17 ",.02)
;;00087-6674-17
;;9002226.02101,"1225,00093-5382-56 ",.01)
;;00093-5382-56
;;9002226.02101,"1225,00093-5382-56 ",.02)
;;00093-5382-56
;;9002226.02101,"1225,00093-5385-06 ",.01)
;;00093-5385-06
;;9002226.02101,"1225,00093-5385-06 ",.02)
;;00093-5385-06
;;9002226.02101,"1225,00378-4050-91 ",.01)
;;00378-4050-91
;;9002226.02101,"1225,00378-4050-91 ",.02)
;;00378-4050-91
;;9002226.02101,"1225,00378-4105-91 ",.01)
;;00378-4105-91
;;9002226.02101,"1225,00378-4105-91 ",.02)
;;00378-4105-91
;;9002226.02101,"1225,00378-4890-93 ",.01)
;;00378-4890-93
;;9002226.02101,"1225,00378-4890-93 ",.02)
;;00378-4890-93
;;9002226.02101,"1225,00378-5040-91 ",.01)
;;00378-5040-91
;;9002226.02101,"1225,00378-5040-91 ",.02)
;;00378-5040-91
;;9002226.02101,"1225,00378-5041-91 ",.01)
;;00378-5041-91
;;9002226.02101,"1225,00378-5041-91 ",.02)
;;00378-5041-91
;;9002226.02101,"1225,00378-5042-91 ",.01)
;;00378-5042-91
;;9002226.02101,"1225,00378-5042-91 ",.02)
;;00378-5042-91
;;9002226.02101,"1225,00378-5043-91 ",.01)
;;00378-5043-91
;;9002226.02101,"1225,00378-5043-91 ",.02)
;;00378-5043-91
;;9002226.02101,"1225,00378-5169-91 ",.01)
;;00378-5169-91
;;9002226.02101,"1225,00378-5169-91 ",.02)
;;00378-5169-91
;;9002226.02101,"1225,00378-5170-93 ",.01)
;;00378-5170-93
;;9002226.02101,"1225,00378-5170-93 ",.02)
;;00378-5170-93
;;9002226.02101,"1225,00378-5180-91 ",.01)
;;00378-5180-91
;;9002226.02101,"1225,00378-5180-91 ",.02)
;;00378-5180-91
;;9002226.02101,"1225,00378-6106-91 ",.01)
;;00378-6106-91
;;9002226.02101,"1225,00378-6106-91 ",.02)
;;00378-6106-91
;;9002226.02101,"1225,00378-6950-77 ",.01)
;;00378-6950-77
;;9002226.02101,"1225,00378-6950-77 ",.02)
;;00378-6950-77
;;9002226.02101,"1225,00378-8886-93 ",.01)
;;00378-8886-93
;;9002226.02101,"1225,00378-8886-93 ",.02)
;;00378-8886-93
;;9002226.02101,"1225,00378-8887-93 ",.01)
;;00378-8887-93
;;9002226.02101,"1225,00378-8887-93 ",.02)
;;00378-8887-93
;;9002226.02101,"1225,00378-8888-93 ",.01)
;;00378-8888-93
;;9002226.02101,"1225,00378-8888-93 ",.02)
;;00378-8888-93
;;9002226.02101,"1225,00378-8889-93 ",.01)
;;00378-8889-93
;;9002226.02101,"1225,00378-8889-93 ",.02)
;;00378-8889-93
;;9002226.02101,"1225,00527-1905-06 ",.01)
;;00527-1905-06
;;9002226.02101,"1225,00527-1905-06 ",.02)
;;00527-1905-06
BGP82Q2 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 09, 2017 ;
+1 ;;18.0;IHS CLINICAL REPORTING;;NOV 21, 2017;Build 51
+2 ;
START ;
+1 IF '$GET(ATXPGMC)
KILL ^TMP("ATX",$JOB)
+2 SET ATXPGMC=$GET(ATXPGMC)+1
+3 FOR ATXI=1:1
SET X=$PIECE($TEXT(TMP+ATXI),";;",2,99)
IF X=""
QUIT
SET X="^TMP(""ATX"",$J,"_X
SET ATXI=ATXI+1
SET Y=$PIECE($TEXT(TMP+ATXI),";;",2,99)
SET @X=Y
+4 QUIT
+5 ;
TMP ;;TAXONOMY (WITH BULLETIN)
+1 ;;21,"55289-0392-03 ")
+2 ;;340
+3 ;;21,"55289-0477-27 ")
+4 ;;341
+5 ;;21,"55289-0947-12 ")
+6 ;;342
+7 ;;21,"55700-0096-04 ")
+8 ;;343
+9 ;;21,"55700-0096-06 ")
+10 ;;344
+11 ;;21,"55700-0304-06 ")
+12 ;;345
+13 ;;21,"55700-0411-06 ")
+14 ;;346
+15 ;;21,"57237-0274-24 ")
+16 ;;347
+17 ;;21,"59676-0278-01 ")
+18 ;;348
+19 ;;21,"59676-0561-01 ")
+20 ;;349
+21 ;;21,"59676-0562-01 ")
+22 ;;350
+23 ;;21,"59676-0563-01 ")
+24 ;;351
+25 ;;21,"59676-0564-01 ")
+26 ;;352
+27 ;;21,"59676-0565-01 ")
+28 ;;353
+29 ;;21,"59676-0566-30 ")
+30 ;;354
+31 ;;21,"59676-0570-01 ")
+32 ;;355
+33 ;;21,"59676-0571-01 ")
+34 ;;356
+35 ;;21,"59676-0572-01 ")
+36 ;;357
+37 ;;21,"59676-0575-30 ")
+38 ;;358
+39 ;;21,"60429-0298-60 ")
+40 ;;359
+41 ;;21,"60429-0353-60 ")
+42 ;;360
+43 ;;21,"60429-0354-30 ")
+44 ;;361
+45 ;;21,"60505-3251-06 ")
+46 ;;362
+47 ;;21,"60505-3252-03 ")
+48 ;;363
+49 ;;21,"60505-3583-06 ")
+50 ;;364
+51 ;;21,"60505-3788-06 ")
+52 ;;365
+53 ;;21,"60505-4058-03 ")
+54 ;;366
+55 ;;21,"60760-0010-18 ")
+56 ;;367
+57 ;;21,"60760-0010-63 ")
+58 ;;368
+59 ;;21,"60760-0385-04 ")
+60 ;;369
+61 ;;21,"60760-0385-14 ")
+62 ;;370
+63 ;;21,"60760-0595-04 ")
+64 ;;371
+65 ;;21,"60760-0595-14 ")
+66 ;;372
+67 ;;21,"61442-0470-60 ")
+68 ;;373
+69 ;;21,"61919-0061-02 ")
+70 ;;374
+71 ;;21,"61958-0401-01 ")
+72 ;;375
+73 ;;21,"61958-0403-01 ")
+74 ;;376
+75 ;;21,"61958-0404-01 ")
+76 ;;377
+77 ;;21,"61958-0405-01 ")
+78 ;;378
+79 ;;21,"61958-0406-01 ")
+80 ;;379
+81 ;;21,"61958-0601-01 ")
+82 ;;380
+83 ;;21,"61958-0602-01 ")
+84 ;;381
+85 ;;21,"61958-0701-01 ")
+86 ;;382
+87 ;;21,"61958-0703-01 ")
+88 ;;383
+89 ;;21,"61958-0704-01 ")
+90 ;;384
+91 ;;21,"61958-0705-01 ")
+92 ;;385
+93 ;;21,"61958-1101-01 ")
+94 ;;386
+95 ;;21,"61958-1201-01 ")
+96 ;;387
+97 ;;21,"61958-1301-01 ")
+98 ;;388
+99 ;;21,"61958-1302-01 ")
+100 ;;389
+101 ;;21,"61958-1901-01 ")
+102 ;;390
+103 ;;21,"61958-2002-01 ")
+104 ;;391
+105 ;;21,"61958-2101-01 ")
+106 ;;392
+107 ;;21,"63010-0010-30 ")
+108 ;;393
+109 ;;21,"63010-0027-70 ")
+110 ;;394
+111 ;;21,"64376-0128-01 ")
+112 ;;395
+113 ;;21,"64376-0129-23 ")
+114 ;;396
+115 ;;21,"64376-0133-02 ")
+116 ;;397
+117 ;;21,"64380-0707-03 ")
+118 ;;398
+119 ;;21,"64380-0717-03 ")
+120 ;;399
+121 ;;21,"65162-0209-06 ")
+122 ;;400
+123 ;;21,"65862-0024-60 ")
+124 ;;401
+125 ;;21,"65862-0027-60 ")
+126 ;;402
+127 ;;21,"65862-0046-60 ")
+128 ;;403
+129 ;;21,"65862-0047-60 ")
+130 ;;404
+131 ;;21,"65862-0048-24 ")
+132 ;;405
+133 ;;21,"65862-0055-24 ")
+134 ;;406
+135 ;;21,"65862-0073-60 ")
+136 ;;407
+137 ;;21,"65862-0107-01 ")
+138 ;;408
+139 ;;21,"65862-0111-60 ")
+140 ;;409
+141 ;;21,"65862-0112-60 ")
+142 ;;410
+143 ;;21,"65862-0310-30 ")
+144 ;;411
+145 ;;21,"65862-0311-30 ")
+146 ;;412
+147 ;;21,"65862-0312-30 ")
+148 ;;413
+149 ;;21,"65862-0313-30 ")
+150 ;;414
+151 ;;21,"65862-0552-60 ")
+152 ;;415
+153 ;;21,"65862-0553-30 ")
+154 ;;416
+155 ;;21,"65862-0597-60 ")
+156 ;;417
+157 ;;21,"65862-0900-30 ")
+158 ;;418
+159 ;;21,"65862-0932-90 ")
+160 ;;419
+161 ;;21,"65862-0933-30 ")
+162 ;;420
+163 ;;21,"66267-0509-06 ")
+164 ;;421
+165 ;;21,"66267-0513-06 ")
+166 ;;422
+167 ;;21,"66267-0514-18 ")
+168 ;;423
+169 ;;21,"66267-0514-63 ")
+170 ;;424
+171 ;;21,"66336-0214-06 ")
+172 ;;425
+173 ;;21,"66336-0624-12 ")
+174 ;;426
+175 ;;21,"66993-0482-30 ")
+176 ;;427
+177 ;;21,"68071-0748-12 ")
+178 ;;428
+179 ;;21,"68071-0908-06 ")
+180 ;;429
+181 ;;21,"68071-2112-03 ")
+182 ;;430
+183 ;;21,"68071-2113-06 ")
+184 ;;431
+185 ;;21,"68084-0021-11 ")
+186 ;;432
+187 ;;21,"68084-0021-21 ")
+188 ;;433
+189 ;;21,"68084-0416-11 ")
+190 ;;434
+191 ;;21,"68084-0416-21 ")
+192 ;;435
+193 ;;21,"68084-0416-25 ")
+194 ;;436
+195 ;;21,"68084-0416-95 ")
+196 ;;437
+197 ;;21,"68084-0460-11 ")
+198 ;;438
+199 ;;21,"68084-0460-21 ")
+200 ;;439
+201 ;;21,"68084-0461-11 ")
+202 ;;440
+203 ;;21,"68084-0461-21 ")
+204 ;;441
+205 ;;21,"68084-0462-11 ")
+206 ;;442
+207 ;;21,"68084-0462-21 ")
+208 ;;443
+209 ;;21,"68084-0578-11 ")
+210 ;;444
+211 ;;21,"68084-0578-21 ")
+212 ;;445
+213 ;;21,"68180-0284-07 ")
+214 ;;446
+215 ;;21,"68180-0286-07 ")
+216 ;;447
+217 ;;21,"68180-0288-06 ")
+218 ;;448
+219 ;;21,"68180-0602-07 ")
+220 ;;449
+221 ;;21,"68180-0603-06 ")
+222 ;;450
+223 ;;21,"68258-1972-01 ")
+224 ;;451
+225 ;;21,"68788-6394-01 ")
+226 ;;452
+227 ;;21,"68788-6394-02 ")
+228 ;;453
+229 ;;21,"68788-6394-03 ")
+230 ;;454
+231 ;;21,"68788-6394-06 ")
+232 ;;455
+233 ;;21,"68788-6394-08 ")
+234 ;;456
+235 ;;21,"68788-6394-09 ")
+236 ;;457
+237 ;;21,"69097-0362-02 ")
+238 ;;458
+239 ;;21,"69097-0403-02 ")
+240 ;;459
+241 ;;21,"76282-0115-60 ")
+242 ;;460
+243 ;;21,"76519-1005-06 ")
+244 ;;461
+245 ;;9002226,1225,.01)
+246 ;;BGP PQA ANTIRETROVIRAL NDC
+247 ;;9002226,1225,.02)
+248 ;;@
+249 ;;9002226,1225,.04)
+250 ;;n
+251 ;;9002226,1225,.06)
+252 ;;@
+253 ;;9002226,1225,.08)
+254 ;;@
+255 ;;9002226,1225,.09)
+256 ;;3170809
+257 ;;9002226,1225,.11)
+258 ;;@
+259 ;;9002226,1225,.12)
+260 ;;@
+261 ;;9002226,1225,.13)
+262 ;;1
+263 ;;9002226,1225,.14)
+264 ;;@
+265 ;;9002226,1225,.15)
+266 ;;50.67
+267 ;;9002226,1225,.16)
+268 ;;@
+269 ;;9002226,1225,.17)
+270 ;;@
+271 ;;9002226,1225,.22)
+272 ;;1
+273 ;;9002226,1225,3101)
+274 ;;@
+275 ;;9002226.02101,"1225,00003-1964-01 ",.01)
+276 ;;00003-1964-01
+277 ;;9002226.02101,"1225,00003-1964-01 ",.02)
+278 ;;00003-1964-01
+279 ;;9002226.02101,"1225,00003-1965-01 ",.01)
+280 ;;00003-1965-01
+281 ;;9002226.02101,"1225,00003-1965-01 ",.02)
+282 ;;00003-1965-01
+283 ;;9002226.02101,"1225,00003-1966-01 ",.01)
+284 ;;00003-1966-01
+285 ;;9002226.02101,"1225,00003-1966-01 ",.02)
+286 ;;00003-1966-01
+287 ;;9002226.02101,"1225,00003-1967-01 ",.01)
+288 ;;00003-1967-01
+289 ;;9002226.02101,"1225,00003-1967-01 ",.02)
+290 ;;00003-1967-01
+291 ;;9002226.02101,"1225,00003-1968-01 ",.01)
+292 ;;00003-1968-01
+293 ;;9002226.02101,"1225,00003-1968-01 ",.02)
+294 ;;00003-1968-01
+295 ;;9002226.02101,"1225,00003-3622-12 ",.01)
+296 ;;00003-3622-12
+297 ;;9002226.02101,"1225,00003-3622-12 ",.02)
+298 ;;00003-3622-12
+299 ;;9002226.02101,"1225,00003-3623-12 ",.01)
+300 ;;00003-3623-12
+301 ;;9002226.02101,"1225,00003-3623-12 ",.02)
+302 ;;00003-3623-12
+303 ;;9002226.02101,"1225,00003-3624-12 ",.01)
+304 ;;00003-3624-12
+305 ;;9002226.02101,"1225,00003-3624-12 ",.02)
+306 ;;00003-3624-12
+307 ;;9002226.02101,"1225,00003-3631-12 ",.01)
+308 ;;00003-3631-12
+309 ;;9002226.02101,"1225,00003-3631-12 ",.02)
+310 ;;00003-3631-12
+311 ;;9002226.02101,"1225,00003-3638-10 ",.01)
+312 ;;00003-3638-10
+313 ;;9002226.02101,"1225,00003-3638-10 ",.02)
+314 ;;00003-3638-10
+315 ;;9002226.02101,"1225,00003-3641-11 ",.01)
+316 ;;00003-3641-11
+317 ;;9002226.02101,"1225,00003-3641-11 ",.02)
+318 ;;00003-3641-11
+319 ;;9002226.02101,"1225,00004-0244-51 ",.01)
+320 ;;00004-0244-51
+321 ;;9002226.02101,"1225,00004-0244-51 ",.02)
+322 ;;00004-0244-51
+323 ;;9002226.02101,"1225,00004-0245-15 ",.01)
+324 ;;00004-0245-15
+325 ;;9002226.02101,"1225,00004-0245-15 ",.02)
+326 ;;00004-0245-15
+327 ;;9002226.02101,"1225,00004-0381-40 ",.01)
+328 ;;00004-0381-40
+329 ;;9002226.02101,"1225,00004-0381-40 ",.02)
+330 ;;00004-0381-40
+331 ;;9002226.02101,"1225,00006-0227-61 ",.01)
+332 ;;00006-0227-61
+333 ;;9002226.02101,"1225,00006-0227-61 ",.02)
+334 ;;00006-0227-61
+335 ;;9002226.02101,"1225,00006-0473-61 ",.01)
+336 ;;00006-0473-61
+337 ;;9002226.02101,"1225,00006-0473-61 ",.02)
+338 ;;00006-0473-61
+339 ;;9002226.02101,"1225,00006-0477-61 ",.01)
+340 ;;00006-0477-61
+341 ;;9002226.02101,"1225,00006-0477-61 ",.02)
+342 ;;00006-0477-61
+343 ;;9002226.02101,"1225,00006-0571-43 ",.01)
+344 ;;00006-0571-43
+345 ;;9002226.02101,"1225,00006-0571-43 ",.02)
+346 ;;00006-0571-43
+347 ;;9002226.02101,"1225,00006-0573-62 ",.01)
+348 ;;00006-0573-62
+349 ;;9002226.02101,"1225,00006-0573-62 ",.02)
+350 ;;00006-0573-62
+351 ;;9002226.02101,"1225,00006-3603-01 ",.01)
+352 ;;00006-3603-01
+353 ;;9002226.02101,"1225,00006-3603-01 ",.02)
+354 ;;00006-3603-01
+355 ;;9002226.02101,"1225,00006-3603-60 ",.01)
+356 ;;00006-3603-60
+357 ;;9002226.02101,"1225,00006-3603-60 ",.02)
+358 ;;00006-3603-60
+359 ;;9002226.02101,"1225,00054-0450-58 ",.01)
+360 ;;00054-0450-58
+361 ;;9002226.02101,"1225,00054-0450-58 ",.02)
+362 ;;00054-0450-58
+363 ;;9002226.02101,"1225,00054-0459-21 ",.01)
+364 ;;00054-0459-21
+365 ;;9002226.02101,"1225,00054-0459-21 ",.02)
+366 ;;00054-0459-21
+367 ;;9002226.02101,"1225,00056-0470-30 ",.01)
+368 ;;00056-0470-30
+369 ;;9002226.02101,"1225,00056-0470-30 ",.02)
+370 ;;00056-0470-30
+371 ;;9002226.02101,"1225,00056-0474-92 ",.01)
+372 ;;00056-0474-92
+373 ;;9002226.02101,"1225,00056-0474-92 ",.02)
+374 ;;00056-0474-92
+375 ;;9002226.02101,"1225,00056-0510-30 ",.01)
+376 ;;00056-0510-30
+377 ;;9002226.02101,"1225,00056-0510-30 ",.02)
+378 ;;00056-0510-30
+379 ;;9002226.02101,"1225,00074-0522-60 ",.01)
+380 ;;00074-0522-60
+381 ;;9002226.02101,"1225,00074-0522-60 ",.02)
+382 ;;00074-0522-60
+383 ;;9002226.02101,"1225,00074-1940-63 ",.01)
+384 ;;00074-1940-63
+385 ;;9002226.02101,"1225,00074-1940-63 ",.02)
+386 ;;00074-1940-63
+387 ;;9002226.02101,"1225,00074-3333-30 ",.01)
+388 ;;00074-3333-30
+389 ;;9002226.02101,"1225,00074-3333-30 ",.02)
+390 ;;00074-3333-30
+391 ;;9002226.02101,"1225,00074-3956-46 ",.01)
+392 ;;00074-3956-46
+393 ;;9002226.02101,"1225,00074-3956-46 ",.02)
+394 ;;00074-3956-46
+395 ;;9002226.02101,"1225,00074-6633-30 ",.01)
+396 ;;00074-6633-30
+397 ;;9002226.02101,"1225,00074-6633-30 ",.02)
+398 ;;00074-6633-30
+399 ;;9002226.02101,"1225,00074-6799-22 ",.01)
+400 ;;00074-6799-22
+401 ;;9002226.02101,"1225,00074-6799-22 ",.02)
+402 ;;00074-6799-22
+403 ;;9002226.02101,"1225,00087-6632-41 ",.01)
+404 ;;00087-6632-41
+405 ;;9002226.02101,"1225,00087-6632-41 ",.02)
+406 ;;00087-6632-41
+407 ;;9002226.02101,"1225,00087-6633-41 ",.01)
+408 ;;00087-6633-41
+409 ;;9002226.02101,"1225,00087-6633-41 ",.02)
+410 ;;00087-6633-41
+411 ;;9002226.02101,"1225,00087-6671-17 ",.01)
+412 ;;00087-6671-17
+413 ;;9002226.02101,"1225,00087-6671-17 ",.02)
+414 ;;00087-6671-17
+415 ;;9002226.02101,"1225,00087-6672-17 ",.01)
+416 ;;00087-6672-17
+417 ;;9002226.02101,"1225,00087-6672-17 ",.02)
+418 ;;00087-6672-17
+419 ;;9002226.02101,"1225,00087-6673-17 ",.01)
+420 ;;00087-6673-17
+421 ;;9002226.02101,"1225,00087-6673-17 ",.02)
+422 ;;00087-6673-17
+423 ;;9002226.02101,"1225,00087-6674-17 ",.01)
+424 ;;00087-6674-17
+425 ;;9002226.02101,"1225,00087-6674-17 ",.02)
+426 ;;00087-6674-17
+427 ;;9002226.02101,"1225,00093-5382-56 ",.01)
+428 ;;00093-5382-56
+429 ;;9002226.02101,"1225,00093-5382-56 ",.02)
+430 ;;00093-5382-56
+431 ;;9002226.02101,"1225,00093-5385-06 ",.01)
+432 ;;00093-5385-06
+433 ;;9002226.02101,"1225,00093-5385-06 ",.02)
+434 ;;00093-5385-06
+435 ;;9002226.02101,"1225,00378-4050-91 ",.01)
+436 ;;00378-4050-91
+437 ;;9002226.02101,"1225,00378-4050-91 ",.02)
+438 ;;00378-4050-91
+439 ;;9002226.02101,"1225,00378-4105-91 ",.01)
+440 ;;00378-4105-91
+441 ;;9002226.02101,"1225,00378-4105-91 ",.02)
+442 ;;00378-4105-91
+443 ;;9002226.02101,"1225,00378-4890-93 ",.01)
+444 ;;00378-4890-93
+445 ;;9002226.02101,"1225,00378-4890-93 ",.02)
+446 ;;00378-4890-93
+447 ;;9002226.02101,"1225,00378-5040-91 ",.01)
+448 ;;00378-5040-91
+449 ;;9002226.02101,"1225,00378-5040-91 ",.02)
+450 ;;00378-5040-91
+451 ;;9002226.02101,"1225,00378-5041-91 ",.01)
+452 ;;00378-5041-91
+453 ;;9002226.02101,"1225,00378-5041-91 ",.02)
+454 ;;00378-5041-91
+455 ;;9002226.02101,"1225,00378-5042-91 ",.01)
+456 ;;00378-5042-91
+457 ;;9002226.02101,"1225,00378-5042-91 ",.02)
+458 ;;00378-5042-91
+459 ;;9002226.02101,"1225,00378-5043-91 ",.01)
+460 ;;00378-5043-91
+461 ;;9002226.02101,"1225,00378-5043-91 ",.02)
+462 ;;00378-5043-91
+463 ;;9002226.02101,"1225,00378-5169-91 ",.01)
+464 ;;00378-5169-91
+465 ;;9002226.02101,"1225,00378-5169-91 ",.02)
+466 ;;00378-5169-91
+467 ;;9002226.02101,"1225,00378-5170-93 ",.01)
+468 ;;00378-5170-93
+469 ;;9002226.02101,"1225,00378-5170-93 ",.02)
+470 ;;00378-5170-93
+471 ;;9002226.02101,"1225,00378-5180-91 ",.01)
+472 ;;00378-5180-91
+473 ;;9002226.02101,"1225,00378-5180-91 ",.02)
+474 ;;00378-5180-91
+475 ;;9002226.02101,"1225,00378-6106-91 ",.01)
+476 ;;00378-6106-91
+477 ;;9002226.02101,"1225,00378-6106-91 ",.02)
+478 ;;00378-6106-91
+479 ;;9002226.02101,"1225,00378-6950-77 ",.01)
+480 ;;00378-6950-77
+481 ;;9002226.02101,"1225,00378-6950-77 ",.02)
+482 ;;00378-6950-77
+483 ;;9002226.02101,"1225,00378-8886-93 ",.01)
+484 ;;00378-8886-93
+485 ;;9002226.02101,"1225,00378-8886-93 ",.02)
+486 ;;00378-8886-93
+487 ;;9002226.02101,"1225,00378-8887-93 ",.01)
+488 ;;00378-8887-93
+489 ;;9002226.02101,"1225,00378-8887-93 ",.02)
+490 ;;00378-8887-93
+491 ;;9002226.02101,"1225,00378-8888-93 ",.01)
+492 ;;00378-8888-93
+493 ;;9002226.02101,"1225,00378-8888-93 ",.02)
+494 ;;00378-8888-93
+495 ;;9002226.02101,"1225,00378-8889-93 ",.01)
+496 ;;00378-8889-93
+497 ;;9002226.02101,"1225,00378-8889-93 ",.02)
+498 ;;00378-8889-93
+499 ;;9002226.02101,"1225,00527-1905-06 ",.01)
+500 ;;00527-1905-06
+501 ;;9002226.02101,"1225,00527-1905-06 ",.02)
+502 ;;00527-1905-06