BGP51X2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 19, 2014;
;;15.1;IHS CLINICAL REPORTING;;MAY 06, 2015;Build 143
;
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,"58016-0698-00 ")
;;453
;;21,"58016-0698-30 ")
;;454
;;21,"58016-0698-60 ")
;;455
;;21,"58016-0698-90 ")
;;456
;;21,"58016-0699-00 ")
;;88
;;21,"58016-0699-30 ")
;;89
;;21,"58016-0699-60 ")
;;90
;;21,"58016-0699-90 ")
;;91
;;21,"58016-0795-00 ")
;;235
;;21,"58016-0795-30 ")
;;236
;;21,"58016-0795-60 ")
;;237
;;21,"58016-0795-90 ")
;;238
;;21,"58016-0864-00 ")
;;313
;;21,"58016-0864-30 ")
;;314
;;21,"58016-0864-60 ")
;;315
;;21,"58016-0864-90 ")
;;316
;;21,"59676-0278-01 ")
;;402
;;21,"59676-0561-01 ")
;;48
;;21,"59676-0562-01 ")
;;53
;;21,"59676-0563-01 ")
;;45
;;21,"59676-0564-01 ")
;;46
;;21,"59676-0565-01 ")
;;58
;;21,"59676-0566-30 ")
;;57
;;21,"59676-0570-01 ")
;;367
;;21,"59676-0571-01 ")
;;372
;;21,"59676-0572-01 ")
;;366
;;21,"59762-1190-01 ")
;;252
;;21,"59762-1191-01 ")
;;258
;;21,"59762-1192-01 ")
;;266
;;21,"59762-1193-01 ")
;;274
;;21,"59762-3650-01 ")
;;317
;;21,"60429-0298-60 ")
;;380
;;21,"60429-0353-60 ")
;;234
;;21,"60429-0354-30 ")
;;245
;;21,"60505-3251-06 ")
;;233
;;21,"60505-3252-03 ")
;;246
;;21,"60505-3583-06 ")
;;141
;;21,"60505-3788-06 ")
;;381
;;21,"60505-4058-03 ")
;;396
;;21,"60760-0010-18 ")
;;95
;;21,"60760-0010-63 ")
;;96
;;21,"60760-0385-04 ")
;;480
;;21,"60760-0385-14 ")
;;471
;;21,"60760-0595-04 ")
;;446
;;21,"60760-0595-14 ")
;;447
;;21,"61958-0401-01 ")
;;345
;;21,"61958-0403-01 ")
;;351
;;21,"61958-0404-01 ")
;;342
;;21,"61958-0405-01 ")
;;343
;;21,"61958-0406-01 ")
;;344
;;21,"61958-0601-01 ")
;;204
;;21,"61958-0602-01 ")
;;207
;;21,"61958-0701-01 ")
;;419
;;21,"61958-1101-01 ")
;;518
;;21,"61958-1201-01 ")
;;523
;;21,"62584-0046-11 ")
;;168
;;21,"62584-0046-21 ")
;;169
;;21,"62584-0048-11 ")
;;185
;;21,"62584-0048-21 ")
;;186
;;21,"63010-0010-30 ")
;;97
;;21,"63010-0011-90 ")
;;112
;;21,"63010-0027-70 ")
;;106
;;21,"64376-0128-01 ")
;;307
;;21,"64376-0129-23 ")
;;341
;;21,"64376-0133-02 ")
;;286
;;21,"65162-0209-06 ")
;;382
;;21,"65862-0024-60 ")
;;333
;;21,"65862-0027-60 ")
;;383
;;21,"65862-0046-60 ")
;;267
;;21,"65862-0047-60 ")
;;275
;;21,"65862-0048-24 ")
;;340
;;21,"65862-0073-60 ")
;;140
;;21,"65862-0107-01 ")
;;308
;;21,"65862-0111-60 ")
;;253
;;21,"65862-0112-60 ")
;;259
;;21,"65862-0310-30 ")
;;157
;;21,"65862-0311-30 ")
;;166
;;21,"65862-0312-30 ")
;;170
;;21,"65862-0313-30 ")
;;187
;;21,"65862-0552-60 ")
;;232
;;21,"65862-0553-30 ")
;;247
;;21,"65862-0597-60 ")
;;469
;;21,"66267-0509-06 ")
;;457
;;21,"66267-0513-06 ")
;;214
;;21,"66267-0514-18 ")
;;98
;;21,"66267-0514-63 ")
;;99
;;21,"66336-0032-03 ")
;;416
;;21,"66336-0214-06 ")
;;19
;;21,"66336-0563-03 ")
;;458
;;21,"66336-0563-06 ")
;;459
;;21,"66336-0624-12 ")
;;502
;;21,"66336-1994-60 ")
;;66
;;21,"68071-0748-12 ")
;;501
;;21,"68071-0908-06 ")
;;462
;;21,"68084-0021-11 ")
;;138
;;21,"68084-0021-21 ")
;;139
;;21,"68084-0416-11 ")
;;465
;;21,"68084-0416-21 ")
;;466
;;21,"68084-0431-11 ")
;;172
;;21,"68084-0431-21 ")
;;173
;;21,"68084-0432-11 ")
;;188
;;21,"68084-0432-21 ")
;;189
;;21,"68084-0460-11 ")
;;276
;;21,"68084-0460-21 ")
;;277
;;21,"68084-0461-11 ")
;;309
;;21,"68084-0461-21 ")
;;310
;;21,"68084-0462-11 ")
;;335
;;21,"68084-0462-21 ")
;;336
;;21,"68084-0578-11 ")
;;230
;;21,"68084-0578-21 ")
;;231
;;21,"68180-0284-07 ")
;;464
;;21,"68180-0286-07 ")
;;505
;;21,"68258-1970-01 ")
;;127
;;21,"68258-1971-03 ")
;;347
;;21,"68258-1972-01 ")
;;500
;;21,"68258-1977-06 ")
;;463
;;21,"68258-1978-03 ")
;;398
;;21,"68258-1979-03 ")
;;365
;;21,"68258-1980-06 ")
;;51
;;21,"68258-1981-06 ")
;;20
;;21,"68258-1982-06 ")
;;373
;;21,"68258-1983-03 ")
;;415
;;21,"68258-1984-06 ")
;;35
;;21,"68258-1985-03 ")
;;43
;;21,"68258-1986-06 ")
;;50
;;21,"68258-1987-03 ")
;;120
;;21,"68258-1988-03 ")
;;404
;;21,"68258-1989-03 ")
;;519
;;21,"68258-1990-03 ")
;;515
;;21,"68258-1993-06 ")
;;460
;;21,"68258-1994-06 ")
;;65
;;21,"76519-1005-06 ")
;;461
;;9002226,1202,.01)
;;BGP PQA ANTIRETROVIRAL NDC
;;9002226,1202,.02)
;;@
;;9002226,1202,.04)
;;n
;;9002226,1202,.06)
;;@
;;9002226,1202,.08)
;;@
;;9002226,1202,.09)
;;3140819
;;9002226,1202,.11)
;;@
;;9002226,1202,.12)
;;@
;;9002226,1202,.13)
;;1
;;9002226,1202,.14)
;;@
;;9002226,1202,.15)
;;50.67
;;9002226,1202,.16)
;;@
;;9002226,1202,.17)
;;@
;;9002226,1202,3101)
;;@
;;9002226.02101,"1202,00003-1964-01 ",.01)
;;00003-1964-01
;;9002226.02101,"1202,00003-1964-01 ",.02)
;;00003-1964-01
;;9002226.02101,"1202,00003-1965-01 ",.01)
;;00003-1965-01
;;9002226.02101,"1202,00003-1965-01 ",.02)
;;00003-1965-01
;;9002226.02101,"1202,00003-1966-01 ",.01)
;;00003-1966-01
;;9002226.02101,"1202,00003-1966-01 ",.02)
;;00003-1966-01
;;9002226.02101,"1202,00003-1967-01 ",.01)
;;00003-1967-01
;;9002226.02101,"1202,00003-1967-01 ",.02)
;;00003-1967-01
;;9002226.02101,"1202,00003-1968-01 ",.01)
;;00003-1968-01
;;9002226.02101,"1202,00003-1968-01 ",.02)
;;00003-1968-01
;;9002226.02101,"1202,00003-3622-12 ",.01)
;;00003-3622-12
;;9002226.02101,"1202,00003-3622-12 ",.02)
;;00003-3622-12
;;9002226.02101,"1202,00003-3623-12 ",.01)
;;00003-3623-12
;;9002226.02101,"1202,00003-3623-12 ",.02)
;;00003-3623-12
;;9002226.02101,"1202,00003-3624-12 ",.01)
;;00003-3624-12
;;9002226.02101,"1202,00003-3624-12 ",.02)
;;00003-3624-12
;;9002226.02101,"1202,00003-3631-12 ",.01)
;;00003-3631-12
;;9002226.02101,"1202,00003-3631-12 ",.02)
;;00003-3631-12
;;9002226.02101,"1202,00004-0244-51 ",.01)
;;00004-0244-51
;;9002226.02101,"1202,00004-0244-51 ",.02)
;;00004-0244-51
;;9002226.02101,"1202,00004-0245-15 ",.01)
;;00004-0245-15
;;9002226.02101,"1202,00004-0245-15 ",.02)
;;00004-0245-15
;;9002226.02101,"1202,00004-0380-39 ",.01)
;;00004-0380-39
;;9002226.02101,"1202,00004-0380-39 ",.02)
;;00004-0380-39
;;9002226.02101,"1202,00004-0381-40 ",.01)
;;00004-0381-40
;;9002226.02101,"1202,00004-0381-40 ",.02)
;;00004-0381-40
;;9002226.02101,"1202,00006-0227-61 ",.01)
;;00006-0227-61
;;9002226.02101,"1202,00006-0227-61 ",.02)
;;00006-0227-61
;;9002226.02101,"1202,00006-0473-61 ",.01)
;;00006-0473-61
;;9002226.02101,"1202,00006-0473-61 ",.02)
;;00006-0473-61
;;9002226.02101,"1202,00006-0477-61 ",.01)
;;00006-0477-61
;;9002226.02101,"1202,00006-0477-61 ",.02)
;;00006-0477-61
;;9002226.02101,"1202,00006-0570-62 ",.01)
;;00006-0570-62
;;9002226.02101,"1202,00006-0570-62 ",.02)
;;00006-0570-62
;;9002226.02101,"1202,00006-0571-43 ",.01)
;;00006-0571-43
;;9002226.02101,"1202,00006-0571-43 ",.02)
;;00006-0571-43
;;9002226.02101,"1202,00006-0573-01 ",.01)
;;00006-0573-01
;;9002226.02101,"1202,00006-0573-01 ",.02)
;;00006-0573-01
;;9002226.02101,"1202,00006-0573-18 ",.01)
;;00006-0573-18
;;9002226.02101,"1202,00006-0573-18 ",.02)
;;00006-0573-18
;;9002226.02101,"1202,00006-0573-40 ",.01)
;;00006-0573-40
;;9002226.02101,"1202,00006-0573-40 ",.02)
;;00006-0573-40
;;9002226.02101,"1202,00006-0573-42 ",.01)
;;00006-0573-42
;;9002226.02101,"1202,00006-0573-42 ",.02)
;;00006-0573-42
;;9002226.02101,"1202,00006-0573-54 ",.01)
;;00006-0573-54
;;9002226.02101,"1202,00006-0573-54 ",.02)
;;00006-0573-54
;;9002226.02101,"1202,00006-0573-62 ",.01)
;;00006-0573-62
;;9002226.02101,"1202,00006-0573-62 ",.02)
;;00006-0573-62
;;9002226.02101,"1202,00054-0052-21 ",.01)
;;00054-0052-21
;;9002226.02101,"1202,00054-0052-21 ",.02)
;;00054-0052-21
;;9002226.02101,"1202,00054-0450-58 ",.01)
;;00054-0450-58
;;9002226.02101,"1202,00054-0450-58 ",.02)
;;00054-0450-58
;;9002226.02101,"1202,00054-0459-21 ",.01)
;;00054-0459-21
;;9002226.02101,"1202,00054-0459-21 ",.02)
;;00054-0459-21
;;9002226.02101,"1202,00056-0470-30 ",.01)
;;00056-0470-30
;;9002226.02101,"1202,00056-0470-30 ",.02)
;;00056-0470-30
;;9002226.02101,"1202,00056-0474-92 ",.01)
;;00056-0474-92
;;9002226.02101,"1202,00056-0474-92 ",.02)
;;00056-0474-92
;;9002226.02101,"1202,00056-0510-30 ",.01)
;;00056-0510-30
;;9002226.02101,"1202,00056-0510-30 ",.02)
;;00056-0510-30
;;9002226.02101,"1202,00069-0807-60 ",.01)
;;00069-0807-60
;;9002226.02101,"1202,00069-0807-60 ",.02)
;;00069-0807-60
;;9002226.02101,"1202,00069-0808-60 ",.01)
;;00069-0808-60
;;9002226.02101,"1202,00069-0808-60 ",.02)
;;00069-0808-60
;;9002226.02101,"1202,00074-0522-60 ",.01)
;;00074-0522-60
;;9002226.02101,"1202,00074-0522-60 ",.02)
;;00074-0522-60
;;9002226.02101,"1202,00074-1940-63 ",.01)
;;00074-1940-63
;;9002226.02101,"1202,00074-1940-63 ",.02)
;;00074-1940-63
;;9002226.02101,"1202,00074-3333-30 ",.01)
;;00074-3333-30
;;9002226.02101,"1202,00074-3333-30 ",.02)
;;00074-3333-30
;;9002226.02101,"1202,00074-3956-46 ",.01)
;;00074-3956-46
;;9002226.02101,"1202,00074-3956-46 ",.02)
;;00074-3956-46
;;9002226.02101,"1202,00074-6633-30 ",.01)
;;00074-6633-30
;;9002226.02101,"1202,00074-6633-30 ",.02)
;;00074-6633-30
;;9002226.02101,"1202,00074-6799-22 ",.01)
;;00074-6799-22
;;9002226.02101,"1202,00074-6799-22 ",.02)
;;00074-6799-22
;;9002226.02101,"1202,00087-6632-41 ",.01)
;;00087-6632-41
;;9002226.02101,"1202,00087-6632-41 ",.02)
;;00087-6632-41
;;9002226.02101,"1202,00087-6633-41 ",.01)
;;00087-6633-41
;;9002226.02101,"1202,00087-6633-41 ",.02)
;;00087-6633-41
;;9002226.02101,"1202,00087-6671-17 ",.01)
;;00087-6671-17
;;9002226.02101,"1202,00087-6671-17 ",.02)
;;00087-6671-17
;;9002226.02101,"1202,00087-6672-17 ",.01)
;;00087-6672-17
;;9002226.02101,"1202,00087-6672-17 ",.02)
;;00087-6672-17
;;9002226.02101,"1202,00087-6673-17 ",.01)
;;00087-6673-17
;;9002226.02101,"1202,00087-6673-17 ",.02)
;;00087-6673-17
;;9002226.02101,"1202,00087-6674-17 ",.01)
;;00087-6674-17
;;9002226.02101,"1202,00087-6674-17 ",.02)
;;00087-6674-17
;;9002226.02101,"1202,00093-5385-06 ",.01)
;;00093-5385-06
;;9002226.02101,"1202,00093-5385-06 ",.02)
;;00093-5385-06
;;9002226.02101,"1202,00173-0108-55 ",.01)
;;00173-0108-55
;;9002226.02101,"1202,00173-0108-55 ",.02)
;;00173-0108-55
;;9002226.02101,"1202,00173-0113-18 ",.01)
;;00173-0113-18
;;9002226.02101,"1202,00173-0113-18 ",.02)
;;00173-0113-18
;;9002226.02101,"1202,00173-0470-01 ",.01)
;;00173-0470-01
;;9002226.02101,"1202,00173-0470-01 ",.02)
;;00173-0470-01
;;9002226.02101,"1202,00173-0471-00 ",.01)
;;00173-0471-00
;;9002226.02101,"1202,00173-0471-00 ",.02)
;;00173-0471-00
;;9002226.02101,"1202,00173-0501-00 ",.01)
;;00173-0501-00
;;9002226.02101,"1202,00173-0501-00 ",.02)
;;00173-0501-00
;;9002226.02101,"1202,00173-0595-00 ",.01)
;;00173-0595-00
;;9002226.02101,"1202,00173-0595-00 ",.02)
;;00173-0595-00
;;9002226.02101,"1202,00173-0595-02 ",.01)
;;00173-0595-02
;;9002226.02101,"1202,00173-0595-02 ",.02)
;;00173-0595-02
;;9002226.02101,"1202,00173-0661-00 ",.01)
;;00173-0661-00
;;9002226.02101,"1202,00173-0661-00 ",.02)
;;00173-0661-00
;;9002226.02101,"1202,00173-0661-01 ",.01)
;;00173-0661-01
;;9002226.02101,"1202,00173-0661-01 ",.02)
;;00173-0661-01
;;9002226.02101,"1202,00173-0664-00 ",.01)
;;00173-0664-00
;;9002226.02101,"1202,00173-0664-00 ",.02)
;;00173-0664-00
;;9002226.02101,"1202,00173-0691-00 ",.01)
;;00173-0691-00
;;9002226.02101,"1202,00173-0691-00 ",.02)
;;00173-0691-00
;;9002226.02101,"1202,00173-0714-00 ",.01)
;;00173-0714-00
;;9002226.02101,"1202,00173-0714-00 ",.02)
;;00173-0714-00
;;9002226.02101,"1202,00173-0721-00 ",.01)
;;00173-0721-00
;;9002226.02101,"1202,00173-0721-00 ",.02)
;;00173-0721-00
;;9002226.02101,"1202,00173-0727-00 ",.01)
;;00173-0727-00
;;9002226.02101,"1202,00173-0727-00 ",.02)
;;00173-0727-00
;;9002226.02101,"1202,00173-0742-00 ",.01)
;;00173-0742-00
;;9002226.02101,"1202,00173-0742-00 ",.02)
;;00173-0742-00
;;9002226.02101,"1202,00378-4050-91 ",.01)
;;00378-4050-91
;;9002226.02101,"1202,00378-4050-91 ",.02)
;;00378-4050-91
;;9002226.02101,"1202,00378-4105-91 ",.01)
;;00378-4105-91
;;9002226.02101,"1202,00378-4105-91 ",.02)
;;00378-4105-91
;;9002226.02101,"1202,00378-5040-91 ",.01)
;;00378-5040-91
;;9002226.02101,"1202,00378-5040-91 ",.02)
;;00378-5040-91
;;9002226.02101,"1202,00378-5041-91 ",.01)
;;00378-5041-91
;;9002226.02101,"1202,00378-5041-91 ",.02)
;;00378-5041-91
;;9002226.02101,"1202,00378-5042-91 ",.01)
;;00378-5042-91
;;9002226.02101,"1202,00378-5042-91 ",.02)
;;00378-5042-91
;;9002226.02101,"1202,00378-5043-91 ",.01)
;;00378-5043-91
;;9002226.02101,"1202,00378-5043-91 ",.02)
;;00378-5043-91
;;9002226.02101,"1202,00378-6106-91 ",.01)
;;00378-6106-91
;;9002226.02101,"1202,00378-6106-91 ",.02)
;;00378-6106-91
;;9002226.02101,"1202,00378-8886-93 ",.01)
;;00378-8886-93
;;9002226.02101,"1202,00378-8886-93 ",.02)
;;00378-8886-93
;;9002226.02101,"1202,00378-8887-93 ",.01)
;;00378-8887-93
;;9002226.02101,"1202,00378-8887-93 ",.02)
;;00378-8887-93
;;9002226.02101,"1202,00378-8888-93 ",.01)
;;00378-8888-93
BGP51X2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 19, 2014;
+1 ;;15.1;IHS CLINICAL REPORTING;;MAY 06, 2015;Build 143
+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,"58016-0698-00 ")
+2 ;;453
+3 ;;21,"58016-0698-30 ")
+4 ;;454
+5 ;;21,"58016-0698-60 ")
+6 ;;455
+7 ;;21,"58016-0698-90 ")
+8 ;;456
+9 ;;21,"58016-0699-00 ")
+10 ;;88
+11 ;;21,"58016-0699-30 ")
+12 ;;89
+13 ;;21,"58016-0699-60 ")
+14 ;;90
+15 ;;21,"58016-0699-90 ")
+16 ;;91
+17 ;;21,"58016-0795-00 ")
+18 ;;235
+19 ;;21,"58016-0795-30 ")
+20 ;;236
+21 ;;21,"58016-0795-60 ")
+22 ;;237
+23 ;;21,"58016-0795-90 ")
+24 ;;238
+25 ;;21,"58016-0864-00 ")
+26 ;;313
+27 ;;21,"58016-0864-30 ")
+28 ;;314
+29 ;;21,"58016-0864-60 ")
+30 ;;315
+31 ;;21,"58016-0864-90 ")
+32 ;;316
+33 ;;21,"59676-0278-01 ")
+34 ;;402
+35 ;;21,"59676-0561-01 ")
+36 ;;48
+37 ;;21,"59676-0562-01 ")
+38 ;;53
+39 ;;21,"59676-0563-01 ")
+40 ;;45
+41 ;;21,"59676-0564-01 ")
+42 ;;46
+43 ;;21,"59676-0565-01 ")
+44 ;;58
+45 ;;21,"59676-0566-30 ")
+46 ;;57
+47 ;;21,"59676-0570-01 ")
+48 ;;367
+49 ;;21,"59676-0571-01 ")
+50 ;;372
+51 ;;21,"59676-0572-01 ")
+52 ;;366
+53 ;;21,"59762-1190-01 ")
+54 ;;252
+55 ;;21,"59762-1191-01 ")
+56 ;;258
+57 ;;21,"59762-1192-01 ")
+58 ;;266
+59 ;;21,"59762-1193-01 ")
+60 ;;274
+61 ;;21,"59762-3650-01 ")
+62 ;;317
+63 ;;21,"60429-0298-60 ")
+64 ;;380
+65 ;;21,"60429-0353-60 ")
+66 ;;234
+67 ;;21,"60429-0354-30 ")
+68 ;;245
+69 ;;21,"60505-3251-06 ")
+70 ;;233
+71 ;;21,"60505-3252-03 ")
+72 ;;246
+73 ;;21,"60505-3583-06 ")
+74 ;;141
+75 ;;21,"60505-3788-06 ")
+76 ;;381
+77 ;;21,"60505-4058-03 ")
+78 ;;396
+79 ;;21,"60760-0010-18 ")
+80 ;;95
+81 ;;21,"60760-0010-63 ")
+82 ;;96
+83 ;;21,"60760-0385-04 ")
+84 ;;480
+85 ;;21,"60760-0385-14 ")
+86 ;;471
+87 ;;21,"60760-0595-04 ")
+88 ;;446
+89 ;;21,"60760-0595-14 ")
+90 ;;447
+91 ;;21,"61958-0401-01 ")
+92 ;;345
+93 ;;21,"61958-0403-01 ")
+94 ;;351
+95 ;;21,"61958-0404-01 ")
+96 ;;342
+97 ;;21,"61958-0405-01 ")
+98 ;;343
+99 ;;21,"61958-0406-01 ")
+100 ;;344
+101 ;;21,"61958-0601-01 ")
+102 ;;204
+103 ;;21,"61958-0602-01 ")
+104 ;;207
+105 ;;21,"61958-0701-01 ")
+106 ;;419
+107 ;;21,"61958-1101-01 ")
+108 ;;518
+109 ;;21,"61958-1201-01 ")
+110 ;;523
+111 ;;21,"62584-0046-11 ")
+112 ;;168
+113 ;;21,"62584-0046-21 ")
+114 ;;169
+115 ;;21,"62584-0048-11 ")
+116 ;;185
+117 ;;21,"62584-0048-21 ")
+118 ;;186
+119 ;;21,"63010-0010-30 ")
+120 ;;97
+121 ;;21,"63010-0011-90 ")
+122 ;;112
+123 ;;21,"63010-0027-70 ")
+124 ;;106
+125 ;;21,"64376-0128-01 ")
+126 ;;307
+127 ;;21,"64376-0129-23 ")
+128 ;;341
+129 ;;21,"64376-0133-02 ")
+130 ;;286
+131 ;;21,"65162-0209-06 ")
+132 ;;382
+133 ;;21,"65862-0024-60 ")
+134 ;;333
+135 ;;21,"65862-0027-60 ")
+136 ;;383
+137 ;;21,"65862-0046-60 ")
+138 ;;267
+139 ;;21,"65862-0047-60 ")
+140 ;;275
+141 ;;21,"65862-0048-24 ")
+142 ;;340
+143 ;;21,"65862-0073-60 ")
+144 ;;140
+145 ;;21,"65862-0107-01 ")
+146 ;;308
+147 ;;21,"65862-0111-60 ")
+148 ;;253
+149 ;;21,"65862-0112-60 ")
+150 ;;259
+151 ;;21,"65862-0310-30 ")
+152 ;;157
+153 ;;21,"65862-0311-30 ")
+154 ;;166
+155 ;;21,"65862-0312-30 ")
+156 ;;170
+157 ;;21,"65862-0313-30 ")
+158 ;;187
+159 ;;21,"65862-0552-60 ")
+160 ;;232
+161 ;;21,"65862-0553-30 ")
+162 ;;247
+163 ;;21,"65862-0597-60 ")
+164 ;;469
+165 ;;21,"66267-0509-06 ")
+166 ;;457
+167 ;;21,"66267-0513-06 ")
+168 ;;214
+169 ;;21,"66267-0514-18 ")
+170 ;;98
+171 ;;21,"66267-0514-63 ")
+172 ;;99
+173 ;;21,"66336-0032-03 ")
+174 ;;416
+175 ;;21,"66336-0214-06 ")
+176 ;;19
+177 ;;21,"66336-0563-03 ")
+178 ;;458
+179 ;;21,"66336-0563-06 ")
+180 ;;459
+181 ;;21,"66336-0624-12 ")
+182 ;;502
+183 ;;21,"66336-1994-60 ")
+184 ;;66
+185 ;;21,"68071-0748-12 ")
+186 ;;501
+187 ;;21,"68071-0908-06 ")
+188 ;;462
+189 ;;21,"68084-0021-11 ")
+190 ;;138
+191 ;;21,"68084-0021-21 ")
+192 ;;139
+193 ;;21,"68084-0416-11 ")
+194 ;;465
+195 ;;21,"68084-0416-21 ")
+196 ;;466
+197 ;;21,"68084-0431-11 ")
+198 ;;172
+199 ;;21,"68084-0431-21 ")
+200 ;;173
+201 ;;21,"68084-0432-11 ")
+202 ;;188
+203 ;;21,"68084-0432-21 ")
+204 ;;189
+205 ;;21,"68084-0460-11 ")
+206 ;;276
+207 ;;21,"68084-0460-21 ")
+208 ;;277
+209 ;;21,"68084-0461-11 ")
+210 ;;309
+211 ;;21,"68084-0461-21 ")
+212 ;;310
+213 ;;21,"68084-0462-11 ")
+214 ;;335
+215 ;;21,"68084-0462-21 ")
+216 ;;336
+217 ;;21,"68084-0578-11 ")
+218 ;;230
+219 ;;21,"68084-0578-21 ")
+220 ;;231
+221 ;;21,"68180-0284-07 ")
+222 ;;464
+223 ;;21,"68180-0286-07 ")
+224 ;;505
+225 ;;21,"68258-1970-01 ")
+226 ;;127
+227 ;;21,"68258-1971-03 ")
+228 ;;347
+229 ;;21,"68258-1972-01 ")
+230 ;;500
+231 ;;21,"68258-1977-06 ")
+232 ;;463
+233 ;;21,"68258-1978-03 ")
+234 ;;398
+235 ;;21,"68258-1979-03 ")
+236 ;;365
+237 ;;21,"68258-1980-06 ")
+238 ;;51
+239 ;;21,"68258-1981-06 ")
+240 ;;20
+241 ;;21,"68258-1982-06 ")
+242 ;;373
+243 ;;21,"68258-1983-03 ")
+244 ;;415
+245 ;;21,"68258-1984-06 ")
+246 ;;35
+247 ;;21,"68258-1985-03 ")
+248 ;;43
+249 ;;21,"68258-1986-06 ")
+250 ;;50
+251 ;;21,"68258-1987-03 ")
+252 ;;120
+253 ;;21,"68258-1988-03 ")
+254 ;;404
+255 ;;21,"68258-1989-03 ")
+256 ;;519
+257 ;;21,"68258-1990-03 ")
+258 ;;515
+259 ;;21,"68258-1993-06 ")
+260 ;;460
+261 ;;21,"68258-1994-06 ")
+262 ;;65
+263 ;;21,"76519-1005-06 ")
+264 ;;461
+265 ;;9002226,1202,.01)
+266 ;;BGP PQA ANTIRETROVIRAL NDC
+267 ;;9002226,1202,.02)
+268 ;;@
+269 ;;9002226,1202,.04)
+270 ;;n
+271 ;;9002226,1202,.06)
+272 ;;@
+273 ;;9002226,1202,.08)
+274 ;;@
+275 ;;9002226,1202,.09)
+276 ;;3140819
+277 ;;9002226,1202,.11)
+278 ;;@
+279 ;;9002226,1202,.12)
+280 ;;@
+281 ;;9002226,1202,.13)
+282 ;;1
+283 ;;9002226,1202,.14)
+284 ;;@
+285 ;;9002226,1202,.15)
+286 ;;50.67
+287 ;;9002226,1202,.16)
+288 ;;@
+289 ;;9002226,1202,.17)
+290 ;;@
+291 ;;9002226,1202,3101)
+292 ;;@
+293 ;;9002226.02101,"1202,00003-1964-01 ",.01)
+294 ;;00003-1964-01
+295 ;;9002226.02101,"1202,00003-1964-01 ",.02)
+296 ;;00003-1964-01
+297 ;;9002226.02101,"1202,00003-1965-01 ",.01)
+298 ;;00003-1965-01
+299 ;;9002226.02101,"1202,00003-1965-01 ",.02)
+300 ;;00003-1965-01
+301 ;;9002226.02101,"1202,00003-1966-01 ",.01)
+302 ;;00003-1966-01
+303 ;;9002226.02101,"1202,00003-1966-01 ",.02)
+304 ;;00003-1966-01
+305 ;;9002226.02101,"1202,00003-1967-01 ",.01)
+306 ;;00003-1967-01
+307 ;;9002226.02101,"1202,00003-1967-01 ",.02)
+308 ;;00003-1967-01
+309 ;;9002226.02101,"1202,00003-1968-01 ",.01)
+310 ;;00003-1968-01
+311 ;;9002226.02101,"1202,00003-1968-01 ",.02)
+312 ;;00003-1968-01
+313 ;;9002226.02101,"1202,00003-3622-12 ",.01)
+314 ;;00003-3622-12
+315 ;;9002226.02101,"1202,00003-3622-12 ",.02)
+316 ;;00003-3622-12
+317 ;;9002226.02101,"1202,00003-3623-12 ",.01)
+318 ;;00003-3623-12
+319 ;;9002226.02101,"1202,00003-3623-12 ",.02)
+320 ;;00003-3623-12
+321 ;;9002226.02101,"1202,00003-3624-12 ",.01)
+322 ;;00003-3624-12
+323 ;;9002226.02101,"1202,00003-3624-12 ",.02)
+324 ;;00003-3624-12
+325 ;;9002226.02101,"1202,00003-3631-12 ",.01)
+326 ;;00003-3631-12
+327 ;;9002226.02101,"1202,00003-3631-12 ",.02)
+328 ;;00003-3631-12
+329 ;;9002226.02101,"1202,00004-0244-51 ",.01)
+330 ;;00004-0244-51
+331 ;;9002226.02101,"1202,00004-0244-51 ",.02)
+332 ;;00004-0244-51
+333 ;;9002226.02101,"1202,00004-0245-15 ",.01)
+334 ;;00004-0245-15
+335 ;;9002226.02101,"1202,00004-0245-15 ",.02)
+336 ;;00004-0245-15
+337 ;;9002226.02101,"1202,00004-0380-39 ",.01)
+338 ;;00004-0380-39
+339 ;;9002226.02101,"1202,00004-0380-39 ",.02)
+340 ;;00004-0380-39
+341 ;;9002226.02101,"1202,00004-0381-40 ",.01)
+342 ;;00004-0381-40
+343 ;;9002226.02101,"1202,00004-0381-40 ",.02)
+344 ;;00004-0381-40
+345 ;;9002226.02101,"1202,00006-0227-61 ",.01)
+346 ;;00006-0227-61
+347 ;;9002226.02101,"1202,00006-0227-61 ",.02)
+348 ;;00006-0227-61
+349 ;;9002226.02101,"1202,00006-0473-61 ",.01)
+350 ;;00006-0473-61
+351 ;;9002226.02101,"1202,00006-0473-61 ",.02)
+352 ;;00006-0473-61
+353 ;;9002226.02101,"1202,00006-0477-61 ",.01)
+354 ;;00006-0477-61
+355 ;;9002226.02101,"1202,00006-0477-61 ",.02)
+356 ;;00006-0477-61
+357 ;;9002226.02101,"1202,00006-0570-62 ",.01)
+358 ;;00006-0570-62
+359 ;;9002226.02101,"1202,00006-0570-62 ",.02)
+360 ;;00006-0570-62
+361 ;;9002226.02101,"1202,00006-0571-43 ",.01)
+362 ;;00006-0571-43
+363 ;;9002226.02101,"1202,00006-0571-43 ",.02)
+364 ;;00006-0571-43
+365 ;;9002226.02101,"1202,00006-0573-01 ",.01)
+366 ;;00006-0573-01
+367 ;;9002226.02101,"1202,00006-0573-01 ",.02)
+368 ;;00006-0573-01
+369 ;;9002226.02101,"1202,00006-0573-18 ",.01)
+370 ;;00006-0573-18
+371 ;;9002226.02101,"1202,00006-0573-18 ",.02)
+372 ;;00006-0573-18
+373 ;;9002226.02101,"1202,00006-0573-40 ",.01)
+374 ;;00006-0573-40
+375 ;;9002226.02101,"1202,00006-0573-40 ",.02)
+376 ;;00006-0573-40
+377 ;;9002226.02101,"1202,00006-0573-42 ",.01)
+378 ;;00006-0573-42
+379 ;;9002226.02101,"1202,00006-0573-42 ",.02)
+380 ;;00006-0573-42
+381 ;;9002226.02101,"1202,00006-0573-54 ",.01)
+382 ;;00006-0573-54
+383 ;;9002226.02101,"1202,00006-0573-54 ",.02)
+384 ;;00006-0573-54
+385 ;;9002226.02101,"1202,00006-0573-62 ",.01)
+386 ;;00006-0573-62
+387 ;;9002226.02101,"1202,00006-0573-62 ",.02)
+388 ;;00006-0573-62
+389 ;;9002226.02101,"1202,00054-0052-21 ",.01)
+390 ;;00054-0052-21
+391 ;;9002226.02101,"1202,00054-0052-21 ",.02)
+392 ;;00054-0052-21
+393 ;;9002226.02101,"1202,00054-0450-58 ",.01)
+394 ;;00054-0450-58
+395 ;;9002226.02101,"1202,00054-0450-58 ",.02)
+396 ;;00054-0450-58
+397 ;;9002226.02101,"1202,00054-0459-21 ",.01)
+398 ;;00054-0459-21
+399 ;;9002226.02101,"1202,00054-0459-21 ",.02)
+400 ;;00054-0459-21
+401 ;;9002226.02101,"1202,00056-0470-30 ",.01)
+402 ;;00056-0470-30
+403 ;;9002226.02101,"1202,00056-0470-30 ",.02)
+404 ;;00056-0470-30
+405 ;;9002226.02101,"1202,00056-0474-92 ",.01)
+406 ;;00056-0474-92
+407 ;;9002226.02101,"1202,00056-0474-92 ",.02)
+408 ;;00056-0474-92
+409 ;;9002226.02101,"1202,00056-0510-30 ",.01)
+410 ;;00056-0510-30
+411 ;;9002226.02101,"1202,00056-0510-30 ",.02)
+412 ;;00056-0510-30
+413 ;;9002226.02101,"1202,00069-0807-60 ",.01)
+414 ;;00069-0807-60
+415 ;;9002226.02101,"1202,00069-0807-60 ",.02)
+416 ;;00069-0807-60
+417 ;;9002226.02101,"1202,00069-0808-60 ",.01)
+418 ;;00069-0808-60
+419 ;;9002226.02101,"1202,00069-0808-60 ",.02)
+420 ;;00069-0808-60
+421 ;;9002226.02101,"1202,00074-0522-60 ",.01)
+422 ;;00074-0522-60
+423 ;;9002226.02101,"1202,00074-0522-60 ",.02)
+424 ;;00074-0522-60
+425 ;;9002226.02101,"1202,00074-1940-63 ",.01)
+426 ;;00074-1940-63
+427 ;;9002226.02101,"1202,00074-1940-63 ",.02)
+428 ;;00074-1940-63
+429 ;;9002226.02101,"1202,00074-3333-30 ",.01)
+430 ;;00074-3333-30
+431 ;;9002226.02101,"1202,00074-3333-30 ",.02)
+432 ;;00074-3333-30
+433 ;;9002226.02101,"1202,00074-3956-46 ",.01)
+434 ;;00074-3956-46
+435 ;;9002226.02101,"1202,00074-3956-46 ",.02)
+436 ;;00074-3956-46
+437 ;;9002226.02101,"1202,00074-6633-30 ",.01)
+438 ;;00074-6633-30
+439 ;;9002226.02101,"1202,00074-6633-30 ",.02)
+440 ;;00074-6633-30
+441 ;;9002226.02101,"1202,00074-6799-22 ",.01)
+442 ;;00074-6799-22
+443 ;;9002226.02101,"1202,00074-6799-22 ",.02)
+444 ;;00074-6799-22
+445 ;;9002226.02101,"1202,00087-6632-41 ",.01)
+446 ;;00087-6632-41
+447 ;;9002226.02101,"1202,00087-6632-41 ",.02)
+448 ;;00087-6632-41
+449 ;;9002226.02101,"1202,00087-6633-41 ",.01)
+450 ;;00087-6633-41
+451 ;;9002226.02101,"1202,00087-6633-41 ",.02)
+452 ;;00087-6633-41
+453 ;;9002226.02101,"1202,00087-6671-17 ",.01)
+454 ;;00087-6671-17
+455 ;;9002226.02101,"1202,00087-6671-17 ",.02)
+456 ;;00087-6671-17
+457 ;;9002226.02101,"1202,00087-6672-17 ",.01)
+458 ;;00087-6672-17
+459 ;;9002226.02101,"1202,00087-6672-17 ",.02)
+460 ;;00087-6672-17
+461 ;;9002226.02101,"1202,00087-6673-17 ",.01)
+462 ;;00087-6673-17
+463 ;;9002226.02101,"1202,00087-6673-17 ",.02)
+464 ;;00087-6673-17
+465 ;;9002226.02101,"1202,00087-6674-17 ",.01)
+466 ;;00087-6674-17
+467 ;;9002226.02101,"1202,00087-6674-17 ",.02)
+468 ;;00087-6674-17
+469 ;;9002226.02101,"1202,00093-5385-06 ",.01)
+470 ;;00093-5385-06
+471 ;;9002226.02101,"1202,00093-5385-06 ",.02)
+472 ;;00093-5385-06
+473 ;;9002226.02101,"1202,00173-0108-55 ",.01)
+474 ;;00173-0108-55
+475 ;;9002226.02101,"1202,00173-0108-55 ",.02)
+476 ;;00173-0108-55
+477 ;;9002226.02101,"1202,00173-0113-18 ",.01)
+478 ;;00173-0113-18
+479 ;;9002226.02101,"1202,00173-0113-18 ",.02)
+480 ;;00173-0113-18
+481 ;;9002226.02101,"1202,00173-0470-01 ",.01)
+482 ;;00173-0470-01
+483 ;;9002226.02101,"1202,00173-0470-01 ",.02)
+484 ;;00173-0470-01
+485 ;;9002226.02101,"1202,00173-0471-00 ",.01)
+486 ;;00173-0471-00
+487 ;;9002226.02101,"1202,00173-0471-00 ",.02)
+488 ;;00173-0471-00
+489 ;;9002226.02101,"1202,00173-0501-00 ",.01)
+490 ;;00173-0501-00
+491 ;;9002226.02101,"1202,00173-0501-00 ",.02)
+492 ;;00173-0501-00
+493 ;;9002226.02101,"1202,00173-0595-00 ",.01)
+494 ;;00173-0595-00
+495 ;;9002226.02101,"1202,00173-0595-00 ",.02)
+496 ;;00173-0595-00
+497 ;;9002226.02101,"1202,00173-0595-02 ",.01)
+498 ;;00173-0595-02
+499 ;;9002226.02101,"1202,00173-0595-02 ",.02)
+500 ;;00173-0595-02
+501 ;;9002226.02101,"1202,00173-0661-00 ",.01)
+502 ;;00173-0661-00
+503 ;;9002226.02101,"1202,00173-0661-00 ",.02)
+504 ;;00173-0661-00
+505 ;;9002226.02101,"1202,00173-0661-01 ",.01)
+506 ;;00173-0661-01
+507 ;;9002226.02101,"1202,00173-0661-01 ",.02)
+508 ;;00173-0661-01
+509 ;;9002226.02101,"1202,00173-0664-00 ",.01)
+510 ;;00173-0664-00
+511 ;;9002226.02101,"1202,00173-0664-00 ",.02)
+512 ;;00173-0664-00
+513 ;;9002226.02101,"1202,00173-0691-00 ",.01)
+514 ;;00173-0691-00
+515 ;;9002226.02101,"1202,00173-0691-00 ",.02)
+516 ;;00173-0691-00
+517 ;;9002226.02101,"1202,00173-0714-00 ",.01)
+518 ;;00173-0714-00
+519 ;;9002226.02101,"1202,00173-0714-00 ",.02)
+520 ;;00173-0714-00
+521 ;;9002226.02101,"1202,00173-0721-00 ",.01)
+522 ;;00173-0721-00
+523 ;;9002226.02101,"1202,00173-0721-00 ",.02)
+524 ;;00173-0721-00
+525 ;;9002226.02101,"1202,00173-0727-00 ",.01)
+526 ;;00173-0727-00
+527 ;;9002226.02101,"1202,00173-0727-00 ",.02)
+528 ;;00173-0727-00
+529 ;;9002226.02101,"1202,00173-0742-00 ",.01)
+530 ;;00173-0742-00
+531 ;;9002226.02101,"1202,00173-0742-00 ",.02)
+532 ;;00173-0742-00
+533 ;;9002226.02101,"1202,00378-4050-91 ",.01)
+534 ;;00378-4050-91
+535 ;;9002226.02101,"1202,00378-4050-91 ",.02)
+536 ;;00378-4050-91
+537 ;;9002226.02101,"1202,00378-4105-91 ",.01)
+538 ;;00378-4105-91
+539 ;;9002226.02101,"1202,00378-4105-91 ",.02)
+540 ;;00378-4105-91
+541 ;;9002226.02101,"1202,00378-5040-91 ",.01)
+542 ;;00378-5040-91
+543 ;;9002226.02101,"1202,00378-5040-91 ",.02)
+544 ;;00378-5040-91
+545 ;;9002226.02101,"1202,00378-5041-91 ",.01)
+546 ;;00378-5041-91
+547 ;;9002226.02101,"1202,00378-5041-91 ",.02)
+548 ;;00378-5041-91
+549 ;;9002226.02101,"1202,00378-5042-91 ",.01)
+550 ;;00378-5042-91
+551 ;;9002226.02101,"1202,00378-5042-91 ",.02)
+552 ;;00378-5042-91
+553 ;;9002226.02101,"1202,00378-5043-91 ",.01)
+554 ;;00378-5043-91
+555 ;;9002226.02101,"1202,00378-5043-91 ",.02)
+556 ;;00378-5043-91
+557 ;;9002226.02101,"1202,00378-6106-91 ",.01)
+558 ;;00378-6106-91
+559 ;;9002226.02101,"1202,00378-6106-91 ",.02)
+560 ;;00378-6106-91
+561 ;;9002226.02101,"1202,00378-8886-93 ",.01)
+562 ;;00378-8886-93
+563 ;;9002226.02101,"1202,00378-8886-93 ",.02)
+564 ;;00378-8886-93
+565 ;;9002226.02101,"1202,00378-8887-93 ",.01)
+566 ;;00378-8887-93
+567 ;;9002226.02101,"1202,00378-8887-93 ",.02)
+568 ;;00378-8887-93
+569 ;;9002226.02101,"1202,00378-8888-93 ",.01)
+570 ;;00378-8888-93
