BGP50Q2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 07, 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,"63874-0292-04 ")
;;235
;;21,"63874-0292-10 ")
;;236
;;21,"63874-0292-12 ")
;;237
;;21,"63874-0292-15 ")
;;238
;;21,"63874-0292-20 ")
;;239
;;21,"63874-0292-30 ")
;;240
;;21,"63874-0292-60 ")
;;241
;;21,"63874-0292-74 ")
;;242
;;21,"63874-0292-90 ")
;;243
;;21,"63874-0713-01 ")
;;389
;;21,"63874-0713-04 ")
;;390
;;21,"63874-0713-12 ")
;;391
;;21,"63874-0713-15 ")
;;392
;;21,"63874-0713-20 ")
;;393
;;21,"63874-0713-30 ")
;;394
;;21,"63874-0713-40 ")
;;395
;;21,"63874-0713-60 ")
;;396
;;21,"63874-0713-74 ")
;;397
;;21,"63874-0713-90 ")
;;398
;;21,"63874-0808-12 ")
;;404
;;21,"63874-0808-15 ")
;;405
;;21,"63874-0808-20 ")
;;406
;;21,"63874-0808-30 ")
;;407
;;21,"66116-0467-30 ")
;;255
;;21,"66267-0321-10 ")
;;379
;;21,"66267-0321-28 ")
;;380
;;21,"66267-0321-30 ")
;;381
;;21,"66267-0321-60 ")
;;382
;;21,"66267-0331-15 ")
;;53
;;21,"66267-0331-30 ")
;;54
;;21,"66267-0331-45 ")
;;55
;;21,"66267-0331-60 ")
;;56
;;21,"66267-0415-30 ")
;;221
;;21,"66267-0415-60 ")
;;222
;;21,"66267-0492-30 ")
;;495
;;21,"66336-0005-10 ")
;;352
;;21,"66336-0005-30 ")
;;353
;;21,"66336-0005-60 ")
;;354
;;21,"66336-0239-30 ")
;;49
;;21,"66336-0668-10 ")
;;225
;;21,"66336-0668-15 ")
;;226
;;21,"66336-0668-30 ")
;;227
;;21,"66336-0668-44 ")
;;228
;;21,"66336-0668-60 ")
;;229
;;21,"66336-0886-02 ")
;;496
;;21,"66336-0886-03 ")
;;497
;;21,"66336-0886-30 ")
;;498
;;21,"67544-0022-30 ")
;;76
;;21,"67544-0038-10 ")
;;244
;;21,"67544-0038-14 ")
;;245
;;21,"67544-0038-15 ")
;;246
;;21,"67544-0038-20 ")
;;247
;;21,"67544-0038-28 ")
;;248
;;21,"67544-0038-30 ")
;;249
;;21,"67544-0038-45 ")
;;250
;;21,"67544-0038-53 ")
;;251
;;21,"67544-0038-60 ")
;;252
;;21,"67544-0039-15 ")
;;384
;;21,"67544-0039-20 ")
;;385
;;21,"67544-0039-30 ")
;;386
;;21,"67544-0039-53 ")
;;387
;;21,"67544-0039-60 ")
;;388
;;21,"67544-0040-30 ")
;;408
;;21,"67544-0040-53 ")
;;409
;;21,"67544-0041-30 ")
;;499
;;21,"67544-0045-30 ")
;;122
;;21,"67544-0045-53 ")
;;123
;;21,"67544-0045-60 ")
;;124
;;21,"67544-0127-15 ")
;;355
;;21,"67544-0127-20 ")
;;356
;;21,"67544-0127-30 ")
;;357
;;21,"67544-0127-53 ")
;;358
;;21,"67544-0127-60 ")
;;359
;;21,"67544-0136-10 ")
;;256
;;21,"67544-0136-14 ")
;;257
;;21,"67544-0136-15 ")
;;258
;;21,"67544-0136-20 ")
;;259
;;21,"67544-0136-28 ")
;;260
;;21,"67544-0136-30 ")
;;261
;;21,"67544-0136-45 ")
;;262
;;21,"67544-0136-53 ")
;;263
;;21,"67544-0136-60 ")
;;264
;;21,"67544-0217-10 ")
;;265
;;21,"67544-0217-14 ")
;;266
;;21,"67544-0217-15 ")
;;267
;;21,"67544-0217-20 ")
;;268
;;21,"67544-0217-30 ")
;;269
;;21,"67544-0217-45 ")
;;270
;;21,"67544-0217-53 ")
;;271
;;21,"67544-0217-60 ")
;;272
;;21,"67544-0287-10 ")
;;363
;;21,"67544-0287-15 ")
;;364
;;21,"67544-0287-20 ")
;;365
;;21,"67544-0287-28 ")
;;366
;;21,"67544-0287-30 ")
;;367
;;21,"67544-0287-53 ")
;;368
;;21,"67544-0287-59 ")
;;369
;;21,"67544-0287-60 ")
;;370
;;21,"67544-0373-10 ")
;;371
;;21,"67544-0373-15 ")
;;372
;;21,"67544-0373-20 ")
;;373
;;21,"67544-0373-28 ")
;;374
;;21,"67544-0373-30 ")
;;375
;;21,"67544-0373-53 ")
;;376
;;21,"67544-0373-59 ")
;;377
;;21,"67544-0373-60 ")
;;378
;;21,"67544-0725-30 ")
;;501
;;21,"67544-0725-53 ")
;;502
;;21,"67544-0752-30 ")
;;50
;;21,"67544-0785-30 ")
;;52
;;21,"67877-0146-01 ")
;;223
;;21,"67877-0146-05 ")
;;224
;;21,"67877-0147-01 ")
;;360
;;21,"67877-0147-05 ")
;;361
;;21,"67877-0148-01 ")
;;127
;;21,"67877-0149-30 ")
;;279
;;21,"68071-0220-20 ")
;;57
;;21,"68071-0220-30 ")
;;51
;;21,"68084-0549-11 ")
;;125
;;21,"68084-0549-21 ")
;;126
;;21,"68387-0195-24 ")
;;219
;;21,"68387-0195-30 ")
;;220
;;21,"68387-0196-30 ")
;;362
;;21,"68387-0530-15 ")
;;493
;;21,"68387-0530-30 ")
;;494
;;21,"68387-0610-15 ")
;;58
;;21,"68387-0610-30 ")
;;59
;;21,"76218-0405-01 ")
;;107
;;9002226,1820,.01)
;;BGP PQA BENZODIAZ NDC
;;9002226,1820,.02)
;;@
;;9002226,1820,.04)
;;n
;;9002226,1820,.06)
;;@
;;9002226,1820,.08)
;;@
;;9002226,1820,.09)
;;3140807
;;9002226,1820,.11)
;;@
;;9002226,1820,.12)
;;@
;;9002226,1820,.13)
;;1
;;9002226,1820,.14)
;;@
;;9002226,1820,.15)
;;50.67
;;9002226,1820,.16)
;;@
;;9002226,1820,.17)
;;@
;;9002226,1820,3101)
;;@
;;9002226.02101,"1820,00009-0017-02 ",.01)
;;00009-0017-02
;;9002226.02101,"1820,00009-0017-02 ",.02)
;;00009-0017-02
;;9002226.02101,"1820,00009-0017-55 ",.01)
;;00009-0017-55
;;9002226.02101,"1820,00009-0017-55 ",.02)
;;00009-0017-55
;;9002226.02101,"1820,00009-0017-58 ",.01)
;;00009-0017-58
;;9002226.02101,"1820,00009-0017-58 ",.02)
;;00009-0017-58
;;9002226.02101,"1820,00009-0017-59 ",.01)
;;00009-0017-59
;;9002226.02101,"1820,00009-0017-59 ",.02)
;;00009-0017-59
;;9002226.02101,"1820,00054-4858-51 ",.01)
;;00054-4858-51
;;9002226.02101,"1820,00054-4858-51 ",.02)
;;00054-4858-51
;;9002226.02101,"1820,00054-4859-29 ",.01)
;;00054-4859-29
;;9002226.02101,"1820,00054-4859-29 ",.02)
;;00054-4859-29
;;9002226.02101,"1820,00054-4859-51 ",.01)
;;00054-4859-51
;;9002226.02101,"1820,00054-4859-51 ",.02)
;;00054-4859-51
;;9002226.02101,"1820,00054-8858-25 ",.01)
;;00054-8858-25
;;9002226.02101,"1820,00054-8858-25 ",.02)
;;00054-8858-25
;;9002226.02101,"1820,00054-8859-25 ",.01)
;;00054-8859-25
;;9002226.02101,"1820,00054-8859-25 ",.02)
;;00054-8859-25
;;9002226.02101,"1820,00093-0129-01 ",.01)
;;00093-0129-01
;;9002226.02101,"1820,00093-0129-01 ",.02)
;;00093-0129-01
;;9002226.02101,"1820,00093-0130-01 ",.01)
;;00093-0130-01
;;9002226.02101,"1820,00093-0130-01 ",.02)
;;00093-0130-01
;;9002226.02101,"1820,00143-3367-01 ",.01)
;;00143-3367-01
;;9002226.02101,"1820,00143-3367-01 ",.02)
;;00143-3367-01
;;9002226.02101,"1820,00143-3367-05 ",.01)
;;00143-3367-05
;;9002226.02101,"1820,00143-3367-05 ",.02)
;;00143-3367-05
;;9002226.02101,"1820,00143-3370-01 ",.01)
;;00143-3370-01
;;9002226.02101,"1820,00143-3370-01 ",.02)
;;00143-3370-01
;;9002226.02101,"1820,00143-3370-05 ",.01)
;;00143-3370-05
;;9002226.02101,"1820,00143-3370-05 ",.02)
;;00143-3370-05
;;9002226.02101,"1820,00228-2076-10 ",.01)
;;00228-2076-10
;;9002226.02101,"1820,00228-2076-10 ",.02)
;;00228-2076-10
;;9002226.02101,"1820,00228-2076-50 ",.01)
;;00228-2076-50
;;9002226.02101,"1820,00228-2076-50 ",.02)
;;00228-2076-50
;;9002226.02101,"1820,00228-2077-10 ",.01)
;;00228-2077-10
;;9002226.02101,"1820,00228-2077-10 ",.02)
;;00228-2077-10
;;9002226.02101,"1820,00228-2077-50 ",.01)
;;00228-2077-50
;;9002226.02101,"1820,00228-2077-50 ",.02)
;;00228-2077-50
;;9002226.02101,"1820,00378-3110-01 ",.01)
;;00378-3110-01
;;9002226.02101,"1820,00378-3110-01 ",.02)
;;00378-3110-01
;;9002226.02101,"1820,00378-3120-93 ",.01)
;;00378-3120-93
;;9002226.02101,"1820,00378-3120-93 ",.02)
;;00378-3120-93
;;9002226.02101,"1820,00378-4010-01 ",.01)
;;00378-4010-01
;;9002226.02101,"1820,00378-4010-01 ",.02)
;;00378-4010-01
;;9002226.02101,"1820,00378-4010-05 ",.01)
;;00378-4010-05
;;9002226.02101,"1820,00378-4010-05 ",.02)
;;00378-4010-05
;;9002226.02101,"1820,00378-4010-77 ",.01)
;;00378-4010-77
;;9002226.02101,"1820,00378-4010-77 ",.02)
;;00378-4010-77
;;9002226.02101,"1820,00378-4415-01 ",.01)
;;00378-4415-01
;;9002226.02101,"1820,00378-4415-01 ",.02)
;;00378-4415-01
;;9002226.02101,"1820,00378-4430-01 ",.01)
;;00378-4430-01
;;9002226.02101,"1820,00378-4430-01 ",.02)
;;00378-4430-01
;;9002226.02101,"1820,00378-5050-01 ",.01)
;;00378-5050-01
;;9002226.02101,"1820,00378-5050-01 ",.02)
;;00378-5050-01
;;9002226.02101,"1820,00378-5050-05 ",.01)
;;00378-5050-05
;;9002226.02101,"1820,00378-5050-05 ",.02)
;;00378-5050-05
;;9002226.02101,"1820,00378-5050-77 ",.01)
;;00378-5050-77
;;9002226.02101,"1820,00378-5050-77 ",.02)
;;00378-5050-77
;;9002226.02101,"1820,00406-9914-03 ",.01)
;;00406-9914-03
;;9002226.02101,"1820,00406-9914-03 ",.02)
;;00406-9914-03
;;9002226.02101,"1820,00406-9915-01 ",.01)
;;00406-9915-01
;;9002226.02101,"1820,00406-9915-01 ",.02)
;;00406-9915-01
;;9002226.02101,"1820,00406-9915-03 ",.01)
;;00406-9915-03
;;9002226.02101,"1820,00406-9915-03 ",.02)
;;00406-9915-03
;;9002226.02101,"1820,00406-9916-01 ",.01)
;;00406-9916-01
;;9002226.02101,"1820,00406-9916-01 ",.02)
;;00406-9916-01
;;9002226.02101,"1820,00406-9917-01 ",.01)
;;00406-9917-01
;;9002226.02101,"1820,00406-9917-01 ",.02)
;;00406-9917-01
;;9002226.02101,"1820,00406-9959-03 ",.01)
;;00406-9959-03
;;9002226.02101,"1820,00406-9959-03 ",.02)
;;00406-9959-03
;;9002226.02101,"1820,00406-9960-01 ",.01)
;;00406-9960-01
;;9002226.02101,"1820,00406-9960-01 ",.02)
;;00406-9960-01
;;9002226.02101,"1820,00440-7516-30 ",.01)
;;00440-7516-30
;;9002226.02101,"1820,00440-7516-30 ",.02)
;;00440-7516-30
;;9002226.02101,"1820,00440-7530-30 ",.01)
;;00440-7530-30
;;9002226.02101,"1820,00440-7530-30 ",.02)
;;00440-7530-30
;;9002226.02101,"1820,00440-7531-30 ",.01)
;;00440-7531-30
;;9002226.02101,"1820,00440-7531-30 ",.02)
;;00440-7531-30
;;9002226.02101,"1820,00440-7531-60 ",.01)
;;00440-7531-60
;;9002226.02101,"1820,00440-7531-60 ",.02)
;;00440-7531-60
;;9002226.02101,"1820,00440-8475-14 ",.01)
;;00440-8475-14
;;9002226.02101,"1820,00440-8475-14 ",.02)
;;00440-8475-14
;;9002226.02101,"1820,00440-8475-15 ",.01)
;;00440-8475-15
;;9002226.02101,"1820,00440-8475-15 ",.02)
;;00440-8475-15
;;9002226.02101,"1820,00440-8475-30 ",.01)
;;00440-8475-30
;;9002226.02101,"1820,00440-8475-30 ",.02)
;;00440-8475-30
;;9002226.02101,"1820,00440-8476-14 ",.01)
;;00440-8476-14
;;9002226.02101,"1820,00440-8476-14 ",.02)
;;00440-8476-14
;;9002226.02101,"1820,00440-8476-15 ",.01)
;;00440-8476-15
;;9002226.02101,"1820,00440-8476-15 ",.02)
;;00440-8476-15
;;9002226.02101,"1820,00440-8476-30 ",.01)
;;00440-8476-30
;;9002226.02101,"1820,00440-8476-30 ",.02)
;;00440-8476-30
;;9002226.02101,"1820,00591-0744-01 ",.01)
;;00591-0744-01
;;9002226.02101,"1820,00591-0744-01 ",.02)
;;00591-0744-01
;;9002226.02101,"1820,00591-0745-01 ",.01)
;;00591-0745-01
;;9002226.02101,"1820,00591-0745-01 ",.02)
;;00591-0745-01
;;9002226.02101,"1820,00781-2201-01 ",.01)
;;00781-2201-01
;;9002226.02101,"1820,00781-2201-01 ",.02)
;;00781-2201-01
;;9002226.02101,"1820,00781-2201-05 ",.01)
;;00781-2201-05
;;9002226.02101,"1820,00781-2201-05 ",.02)
;;00781-2201-05
;;9002226.02101,"1820,00781-2202-01 ",.01)
;;00781-2202-01
;;9002226.02101,"1820,00781-2202-01 ",.02)
;;00781-2202-01
;;9002226.02101,"1820,00781-2202-05 ",.01)
;;00781-2202-05
;;9002226.02101,"1820,00781-2202-05 ",.02)
;;00781-2202-05
;;9002226.02101,"1820,16590-0214-15 ",.01)
;;16590-0214-15
;;9002226.02101,"1820,16590-0214-15 ",.02)
;;16590-0214-15
;;9002226.02101,"1820,16590-0214-28 ",.01)
;;16590-0214-28
;;9002226.02101,"1820,16590-0214-28 ",.02)
;;16590-0214-28
;;9002226.02101,"1820,16590-0214-30 ",.01)
;;16590-0214-30
;;9002226.02101,"1820,16590-0214-30 ",.02)
;;16590-0214-30
;;9002226.02101,"1820,16590-0214-45 ",.01)
;;16590-0214-45
;;9002226.02101,"1820,16590-0214-45 ",.02)
;;16590-0214-45
;;9002226.02101,"1820,16590-0214-60 ",.01)
;;16590-0214-60
;;9002226.02101,"1820,16590-0214-60 ",.02)
;;16590-0214-60
;;9002226.02101,"1820,16590-0214-90 ",.01)
;;16590-0214-90
;;9002226.02101,"1820,16590-0214-90 ",.02)
;;16590-0214-90
;;9002226.02101,"1820,16590-0236-20 ",.01)
;;16590-0236-20
;;9002226.02101,"1820,16590-0236-20 ",.02)
;;16590-0236-20
;;9002226.02101,"1820,16590-0236-28 ",.01)
;;16590-0236-28
;;9002226.02101,"1820,16590-0236-28 ",.02)
;;16590-0236-28
;;9002226.02101,"1820,16590-0236-30 ",.01)
;;16590-0236-30
;;9002226.02101,"1820,16590-0236-30 ",.02)
;;16590-0236-30
;;9002226.02101,"1820,16590-0236-40 ",.01)
;;16590-0236-40
;;9002226.02101,"1820,16590-0236-40 ",.02)
;;16590-0236-40
;;9002226.02101,"1820,16590-0236-60 ",.01)
;;16590-0236-60
;;9002226.02101,"1820,16590-0236-60 ",.02)
;;16590-0236-60
;;9002226.02101,"1820,16590-0236-90 ",.01)
;;16590-0236-90
;;9002226.02101,"1820,16590-0236-90 ",.02)
;;16590-0236-90
;;9002226.02101,"1820,16590-0438-28 ",.01)
;;16590-0438-28
;;9002226.02101,"1820,16590-0438-28 ",.02)
;;16590-0438-28
;;9002226.02101,"1820,16590-0438-30 ",.01)
;;16590-0438-30
;;9002226.02101,"1820,16590-0438-30 ",.02)
;;16590-0438-30
;;9002226.02101,"1820,16590-0438-60 ",.01)
;;16590-0438-60
;;9002226.02101,"1820,16590-0438-60 ",.02)
;;16590-0438-60
;;9002226.02101,"1820,16590-0438-72 ",.01)
;;16590-0438-72
;;9002226.02101,"1820,16590-0438-72 ",.02)
;;16590-0438-72
;;9002226.02101,"1820,16590-0438-90 ",.01)
;;16590-0438-90
;;9002226.02101,"1820,16590-0438-90 ",.02)
;;16590-0438-90
;;9002226.02101,"1820,21695-0220-30 ",.01)
;;21695-0220-30
;;9002226.02101,"1820,21695-0220-30 ",.02)
;;21695-0220-30
;;9002226.02101,"1820,21695-0282-30 ",.01)
;;21695-0282-30
BGP50Q2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 07, 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,"63874-0292-04 ")
+2 ;;235
+3 ;;21,"63874-0292-10 ")
+4 ;;236
+5 ;;21,"63874-0292-12 ")
+6 ;;237
+7 ;;21,"63874-0292-15 ")
+8 ;;238
+9 ;;21,"63874-0292-20 ")
+10 ;;239
+11 ;;21,"63874-0292-30 ")
+12 ;;240
+13 ;;21,"63874-0292-60 ")
+14 ;;241
+15 ;;21,"63874-0292-74 ")
+16 ;;242
+17 ;;21,"63874-0292-90 ")
+18 ;;243
+19 ;;21,"63874-0713-01 ")
+20 ;;389
+21 ;;21,"63874-0713-04 ")
+22 ;;390
+23 ;;21,"63874-0713-12 ")
+24 ;;391
+25 ;;21,"63874-0713-15 ")
+26 ;;392
+27 ;;21,"63874-0713-20 ")
+28 ;;393
+29 ;;21,"63874-0713-30 ")
+30 ;;394
+31 ;;21,"63874-0713-40 ")
+32 ;;395
+33 ;;21,"63874-0713-60 ")
+34 ;;396
+35 ;;21,"63874-0713-74 ")
+36 ;;397
+37 ;;21,"63874-0713-90 ")
+38 ;;398
+39 ;;21,"63874-0808-12 ")
+40 ;;404
+41 ;;21,"63874-0808-15 ")
+42 ;;405
+43 ;;21,"63874-0808-20 ")
+44 ;;406
+45 ;;21,"63874-0808-30 ")
+46 ;;407
+47 ;;21,"66116-0467-30 ")
+48 ;;255
+49 ;;21,"66267-0321-10 ")
+50 ;;379
+51 ;;21,"66267-0321-28 ")
+52 ;;380
+53 ;;21,"66267-0321-30 ")
+54 ;;381
+55 ;;21,"66267-0321-60 ")
+56 ;;382
+57 ;;21,"66267-0331-15 ")
+58 ;;53
+59 ;;21,"66267-0331-30 ")
+60 ;;54
+61 ;;21,"66267-0331-45 ")
+62 ;;55
+63 ;;21,"66267-0331-60 ")
+64 ;;56
+65 ;;21,"66267-0415-30 ")
+66 ;;221
+67 ;;21,"66267-0415-60 ")
+68 ;;222
+69 ;;21,"66267-0492-30 ")
+70 ;;495
+71 ;;21,"66336-0005-10 ")
+72 ;;352
+73 ;;21,"66336-0005-30 ")
+74 ;;353
+75 ;;21,"66336-0005-60 ")
+76 ;;354
+77 ;;21,"66336-0239-30 ")
+78 ;;49
+79 ;;21,"66336-0668-10 ")
+80 ;;225
+81 ;;21,"66336-0668-15 ")
+82 ;;226
+83 ;;21,"66336-0668-30 ")
+84 ;;227
+85 ;;21,"66336-0668-44 ")
+86 ;;228
+87 ;;21,"66336-0668-60 ")
+88 ;;229
+89 ;;21,"66336-0886-02 ")
+90 ;;496
+91 ;;21,"66336-0886-03 ")
+92 ;;497
+93 ;;21,"66336-0886-30 ")
+94 ;;498
+95 ;;21,"67544-0022-30 ")
+96 ;;76
+97 ;;21,"67544-0038-10 ")
+98 ;;244
+99 ;;21,"67544-0038-14 ")
+100 ;;245
+101 ;;21,"67544-0038-15 ")
+102 ;;246
+103 ;;21,"67544-0038-20 ")
+104 ;;247
+105 ;;21,"67544-0038-28 ")
+106 ;;248
+107 ;;21,"67544-0038-30 ")
+108 ;;249
+109 ;;21,"67544-0038-45 ")
+110 ;;250
+111 ;;21,"67544-0038-53 ")
+112 ;;251
+113 ;;21,"67544-0038-60 ")
+114 ;;252
+115 ;;21,"67544-0039-15 ")
+116 ;;384
+117 ;;21,"67544-0039-20 ")
+118 ;;385
+119 ;;21,"67544-0039-30 ")
+120 ;;386
+121 ;;21,"67544-0039-53 ")
+122 ;;387
+123 ;;21,"67544-0039-60 ")
+124 ;;388
+125 ;;21,"67544-0040-30 ")
+126 ;;408
+127 ;;21,"67544-0040-53 ")
+128 ;;409
+129 ;;21,"67544-0041-30 ")
+130 ;;499
+131 ;;21,"67544-0045-30 ")
+132 ;;122
+133 ;;21,"67544-0045-53 ")
+134 ;;123
+135 ;;21,"67544-0045-60 ")
+136 ;;124
+137 ;;21,"67544-0127-15 ")
+138 ;;355
+139 ;;21,"67544-0127-20 ")
+140 ;;356
+141 ;;21,"67544-0127-30 ")
+142 ;;357
+143 ;;21,"67544-0127-53 ")
+144 ;;358
+145 ;;21,"67544-0127-60 ")
+146 ;;359
+147 ;;21,"67544-0136-10 ")
+148 ;;256
+149 ;;21,"67544-0136-14 ")
+150 ;;257
+151 ;;21,"67544-0136-15 ")
+152 ;;258
+153 ;;21,"67544-0136-20 ")
+154 ;;259
+155 ;;21,"67544-0136-28 ")
+156 ;;260
+157 ;;21,"67544-0136-30 ")
+158 ;;261
+159 ;;21,"67544-0136-45 ")
+160 ;;262
+161 ;;21,"67544-0136-53 ")
+162 ;;263
+163 ;;21,"67544-0136-60 ")
+164 ;;264
+165 ;;21,"67544-0217-10 ")
+166 ;;265
+167 ;;21,"67544-0217-14 ")
+168 ;;266
+169 ;;21,"67544-0217-15 ")
+170 ;;267
+171 ;;21,"67544-0217-20 ")
+172 ;;268
+173 ;;21,"67544-0217-30 ")
+174 ;;269
+175 ;;21,"67544-0217-45 ")
+176 ;;270
+177 ;;21,"67544-0217-53 ")
+178 ;;271
+179 ;;21,"67544-0217-60 ")
+180 ;;272
+181 ;;21,"67544-0287-10 ")
+182 ;;363
+183 ;;21,"67544-0287-15 ")
+184 ;;364
+185 ;;21,"67544-0287-20 ")
+186 ;;365
+187 ;;21,"67544-0287-28 ")
+188 ;;366
+189 ;;21,"67544-0287-30 ")
+190 ;;367
+191 ;;21,"67544-0287-53 ")
+192 ;;368
+193 ;;21,"67544-0287-59 ")
+194 ;;369
+195 ;;21,"67544-0287-60 ")
+196 ;;370
+197 ;;21,"67544-0373-10 ")
+198 ;;371
+199 ;;21,"67544-0373-15 ")
+200 ;;372
+201 ;;21,"67544-0373-20 ")
+202 ;;373
+203 ;;21,"67544-0373-28 ")
+204 ;;374
+205 ;;21,"67544-0373-30 ")
+206 ;;375
+207 ;;21,"67544-0373-53 ")
+208 ;;376
+209 ;;21,"67544-0373-59 ")
+210 ;;377
+211 ;;21,"67544-0373-60 ")
+212 ;;378
+213 ;;21,"67544-0725-30 ")
+214 ;;501
+215 ;;21,"67544-0725-53 ")
+216 ;;502
+217 ;;21,"67544-0752-30 ")
+218 ;;50
+219 ;;21,"67544-0785-30 ")
+220 ;;52
+221 ;;21,"67877-0146-01 ")
+222 ;;223
+223 ;;21,"67877-0146-05 ")
+224 ;;224
+225 ;;21,"67877-0147-01 ")
+226 ;;360
+227 ;;21,"67877-0147-05 ")
+228 ;;361
+229 ;;21,"67877-0148-01 ")
+230 ;;127
+231 ;;21,"67877-0149-30 ")
+232 ;;279
+233 ;;21,"68071-0220-20 ")
+234 ;;57
+235 ;;21,"68071-0220-30 ")
+236 ;;51
+237 ;;21,"68084-0549-11 ")
+238 ;;125
+239 ;;21,"68084-0549-21 ")
+240 ;;126
+241 ;;21,"68387-0195-24 ")
+242 ;;219
+243 ;;21,"68387-0195-30 ")
+244 ;;220
+245 ;;21,"68387-0196-30 ")
+246 ;;362
+247 ;;21,"68387-0530-15 ")
+248 ;;493
+249 ;;21,"68387-0530-30 ")
+250 ;;494
+251 ;;21,"68387-0610-15 ")
+252 ;;58
+253 ;;21,"68387-0610-30 ")
+254 ;;59
+255 ;;21,"76218-0405-01 ")
+256 ;;107
+257 ;;9002226,1820,.01)
+258 ;;BGP PQA BENZODIAZ NDC
+259 ;;9002226,1820,.02)
+260 ;;@
+261 ;;9002226,1820,.04)
+262 ;;n
+263 ;;9002226,1820,.06)
+264 ;;@
+265 ;;9002226,1820,.08)
+266 ;;@
+267 ;;9002226,1820,.09)
+268 ;;3140807
+269 ;;9002226,1820,.11)
+270 ;;@
+271 ;;9002226,1820,.12)
+272 ;;@
+273 ;;9002226,1820,.13)
+274 ;;1
+275 ;;9002226,1820,.14)
+276 ;;@
+277 ;;9002226,1820,.15)
+278 ;;50.67
+279 ;;9002226,1820,.16)
+280 ;;@
+281 ;;9002226,1820,.17)
+282 ;;@
+283 ;;9002226,1820,3101)
+284 ;;@
+285 ;;9002226.02101,"1820,00009-0017-02 ",.01)
+286 ;;00009-0017-02
+287 ;;9002226.02101,"1820,00009-0017-02 ",.02)
+288 ;;00009-0017-02
+289 ;;9002226.02101,"1820,00009-0017-55 ",.01)
+290 ;;00009-0017-55
+291 ;;9002226.02101,"1820,00009-0017-55 ",.02)
+292 ;;00009-0017-55
+293 ;;9002226.02101,"1820,00009-0017-58 ",.01)
+294 ;;00009-0017-58
+295 ;;9002226.02101,"1820,00009-0017-58 ",.02)
+296 ;;00009-0017-58
+297 ;;9002226.02101,"1820,00009-0017-59 ",.01)
+298 ;;00009-0017-59
+299 ;;9002226.02101,"1820,00009-0017-59 ",.02)
+300 ;;00009-0017-59
+301 ;;9002226.02101,"1820,00054-4858-51 ",.01)
+302 ;;00054-4858-51
+303 ;;9002226.02101,"1820,00054-4858-51 ",.02)
+304 ;;00054-4858-51
+305 ;;9002226.02101,"1820,00054-4859-29 ",.01)
+306 ;;00054-4859-29
+307 ;;9002226.02101,"1820,00054-4859-29 ",.02)
+308 ;;00054-4859-29
+309 ;;9002226.02101,"1820,00054-4859-51 ",.01)
+310 ;;00054-4859-51
+311 ;;9002226.02101,"1820,00054-4859-51 ",.02)
+312 ;;00054-4859-51
+313 ;;9002226.02101,"1820,00054-8858-25 ",.01)
+314 ;;00054-8858-25
+315 ;;9002226.02101,"1820,00054-8858-25 ",.02)
+316 ;;00054-8858-25
+317 ;;9002226.02101,"1820,00054-8859-25 ",.01)
+318 ;;00054-8859-25
+319 ;;9002226.02101,"1820,00054-8859-25 ",.02)
+320 ;;00054-8859-25
+321 ;;9002226.02101,"1820,00093-0129-01 ",.01)
+322 ;;00093-0129-01
+323 ;;9002226.02101,"1820,00093-0129-01 ",.02)
+324 ;;00093-0129-01
+325 ;;9002226.02101,"1820,00093-0130-01 ",.01)
+326 ;;00093-0130-01
+327 ;;9002226.02101,"1820,00093-0130-01 ",.02)
+328 ;;00093-0130-01
+329 ;;9002226.02101,"1820,00143-3367-01 ",.01)
+330 ;;00143-3367-01
+331 ;;9002226.02101,"1820,00143-3367-01 ",.02)
+332 ;;00143-3367-01
+333 ;;9002226.02101,"1820,00143-3367-05 ",.01)
+334 ;;00143-3367-05
+335 ;;9002226.02101,"1820,00143-3367-05 ",.02)
+336 ;;00143-3367-05
+337 ;;9002226.02101,"1820,00143-3370-01 ",.01)
+338 ;;00143-3370-01
+339 ;;9002226.02101,"1820,00143-3370-01 ",.02)
+340 ;;00143-3370-01
+341 ;;9002226.02101,"1820,00143-3370-05 ",.01)
+342 ;;00143-3370-05
+343 ;;9002226.02101,"1820,00143-3370-05 ",.02)
+344 ;;00143-3370-05
+345 ;;9002226.02101,"1820,00228-2076-10 ",.01)
+346 ;;00228-2076-10
+347 ;;9002226.02101,"1820,00228-2076-10 ",.02)
+348 ;;00228-2076-10
+349 ;;9002226.02101,"1820,00228-2076-50 ",.01)
+350 ;;00228-2076-50
+351 ;;9002226.02101,"1820,00228-2076-50 ",.02)
+352 ;;00228-2076-50
+353 ;;9002226.02101,"1820,00228-2077-10 ",.01)
+354 ;;00228-2077-10
+355 ;;9002226.02101,"1820,00228-2077-10 ",.02)
+356 ;;00228-2077-10
+357 ;;9002226.02101,"1820,00228-2077-50 ",.01)
+358 ;;00228-2077-50
+359 ;;9002226.02101,"1820,00228-2077-50 ",.02)
+360 ;;00228-2077-50
+361 ;;9002226.02101,"1820,00378-3110-01 ",.01)
+362 ;;00378-3110-01
+363 ;;9002226.02101,"1820,00378-3110-01 ",.02)
+364 ;;00378-3110-01
+365 ;;9002226.02101,"1820,00378-3120-93 ",.01)
+366 ;;00378-3120-93
+367 ;;9002226.02101,"1820,00378-3120-93 ",.02)
+368 ;;00378-3120-93
+369 ;;9002226.02101,"1820,00378-4010-01 ",.01)
+370 ;;00378-4010-01
+371 ;;9002226.02101,"1820,00378-4010-01 ",.02)
+372 ;;00378-4010-01
+373 ;;9002226.02101,"1820,00378-4010-05 ",.01)
+374 ;;00378-4010-05
+375 ;;9002226.02101,"1820,00378-4010-05 ",.02)
+376 ;;00378-4010-05
+377 ;;9002226.02101,"1820,00378-4010-77 ",.01)
+378 ;;00378-4010-77
+379 ;;9002226.02101,"1820,00378-4010-77 ",.02)
+380 ;;00378-4010-77
+381 ;;9002226.02101,"1820,00378-4415-01 ",.01)
+382 ;;00378-4415-01
+383 ;;9002226.02101,"1820,00378-4415-01 ",.02)
+384 ;;00378-4415-01
+385 ;;9002226.02101,"1820,00378-4430-01 ",.01)
+386 ;;00378-4430-01
+387 ;;9002226.02101,"1820,00378-4430-01 ",.02)
+388 ;;00378-4430-01
+389 ;;9002226.02101,"1820,00378-5050-01 ",.01)
+390 ;;00378-5050-01
+391 ;;9002226.02101,"1820,00378-5050-01 ",.02)
+392 ;;00378-5050-01
+393 ;;9002226.02101,"1820,00378-5050-05 ",.01)
+394 ;;00378-5050-05
+395 ;;9002226.02101,"1820,00378-5050-05 ",.02)
+396 ;;00378-5050-05
+397 ;;9002226.02101,"1820,00378-5050-77 ",.01)
+398 ;;00378-5050-77
+399 ;;9002226.02101,"1820,00378-5050-77 ",.02)
+400 ;;00378-5050-77
+401 ;;9002226.02101,"1820,00406-9914-03 ",.01)
+402 ;;00406-9914-03
+403 ;;9002226.02101,"1820,00406-9914-03 ",.02)
+404 ;;00406-9914-03
+405 ;;9002226.02101,"1820,00406-9915-01 ",.01)
+406 ;;00406-9915-01
+407 ;;9002226.02101,"1820,00406-9915-01 ",.02)
+408 ;;00406-9915-01
+409 ;;9002226.02101,"1820,00406-9915-03 ",.01)
+410 ;;00406-9915-03
+411 ;;9002226.02101,"1820,00406-9915-03 ",.02)
+412 ;;00406-9915-03
+413 ;;9002226.02101,"1820,00406-9916-01 ",.01)
+414 ;;00406-9916-01
+415 ;;9002226.02101,"1820,00406-9916-01 ",.02)
+416 ;;00406-9916-01
+417 ;;9002226.02101,"1820,00406-9917-01 ",.01)
+418 ;;00406-9917-01
+419 ;;9002226.02101,"1820,00406-9917-01 ",.02)
+420 ;;00406-9917-01
+421 ;;9002226.02101,"1820,00406-9959-03 ",.01)
+422 ;;00406-9959-03
+423 ;;9002226.02101,"1820,00406-9959-03 ",.02)
+424 ;;00406-9959-03
+425 ;;9002226.02101,"1820,00406-9960-01 ",.01)
+426 ;;00406-9960-01
+427 ;;9002226.02101,"1820,00406-9960-01 ",.02)
+428 ;;00406-9960-01
+429 ;;9002226.02101,"1820,00440-7516-30 ",.01)
+430 ;;00440-7516-30
+431 ;;9002226.02101,"1820,00440-7516-30 ",.02)
+432 ;;00440-7516-30
+433 ;;9002226.02101,"1820,00440-7530-30 ",.01)
+434 ;;00440-7530-30
+435 ;;9002226.02101,"1820,00440-7530-30 ",.02)
+436 ;;00440-7530-30
+437 ;;9002226.02101,"1820,00440-7531-30 ",.01)
+438 ;;00440-7531-30
+439 ;;9002226.02101,"1820,00440-7531-30 ",.02)
+440 ;;00440-7531-30
+441 ;;9002226.02101,"1820,00440-7531-60 ",.01)
+442 ;;00440-7531-60
+443 ;;9002226.02101,"1820,00440-7531-60 ",.02)
+444 ;;00440-7531-60
+445 ;;9002226.02101,"1820,00440-8475-14 ",.01)
+446 ;;00440-8475-14
+447 ;;9002226.02101,"1820,00440-8475-14 ",.02)
+448 ;;00440-8475-14
+449 ;;9002226.02101,"1820,00440-8475-15 ",.01)
+450 ;;00440-8475-15
+451 ;;9002226.02101,"1820,00440-8475-15 ",.02)
+452 ;;00440-8475-15
+453 ;;9002226.02101,"1820,00440-8475-30 ",.01)
+454 ;;00440-8475-30
+455 ;;9002226.02101,"1820,00440-8475-30 ",.02)
+456 ;;00440-8475-30
+457 ;;9002226.02101,"1820,00440-8476-14 ",.01)
+458 ;;00440-8476-14
+459 ;;9002226.02101,"1820,00440-8476-14 ",.02)
+460 ;;00440-8476-14
+461 ;;9002226.02101,"1820,00440-8476-15 ",.01)
+462 ;;00440-8476-15
+463 ;;9002226.02101,"1820,00440-8476-15 ",.02)
+464 ;;00440-8476-15
+465 ;;9002226.02101,"1820,00440-8476-30 ",.01)
+466 ;;00440-8476-30
+467 ;;9002226.02101,"1820,00440-8476-30 ",.02)
+468 ;;00440-8476-30
+469 ;;9002226.02101,"1820,00591-0744-01 ",.01)
+470 ;;00591-0744-01
+471 ;;9002226.02101,"1820,00591-0744-01 ",.02)
+472 ;;00591-0744-01
+473 ;;9002226.02101,"1820,00591-0745-01 ",.01)
+474 ;;00591-0745-01
+475 ;;9002226.02101,"1820,00591-0745-01 ",.02)
+476 ;;00591-0745-01
+477 ;;9002226.02101,"1820,00781-2201-01 ",.01)
+478 ;;00781-2201-01
+479 ;;9002226.02101,"1820,00781-2201-01 ",.02)
+480 ;;00781-2201-01
+481 ;;9002226.02101,"1820,00781-2201-05 ",.01)
+482 ;;00781-2201-05
+483 ;;9002226.02101,"1820,00781-2201-05 ",.02)
+484 ;;00781-2201-05
+485 ;;9002226.02101,"1820,00781-2202-01 ",.01)
+486 ;;00781-2202-01
+487 ;;9002226.02101,"1820,00781-2202-01 ",.02)
+488 ;;00781-2202-01
+489 ;;9002226.02101,"1820,00781-2202-05 ",.01)
+490 ;;00781-2202-05
+491 ;;9002226.02101,"1820,00781-2202-05 ",.02)
+492 ;;00781-2202-05
+493 ;;9002226.02101,"1820,16590-0214-15 ",.01)
+494 ;;16590-0214-15
+495 ;;9002226.02101,"1820,16590-0214-15 ",.02)
+496 ;;16590-0214-15
+497 ;;9002226.02101,"1820,16590-0214-28 ",.01)
+498 ;;16590-0214-28
+499 ;;9002226.02101,"1820,16590-0214-28 ",.02)
+500 ;;16590-0214-28
+501 ;;9002226.02101,"1820,16590-0214-30 ",.01)
+502 ;;16590-0214-30
+503 ;;9002226.02101,"1820,16590-0214-30 ",.02)
+504 ;;16590-0214-30
+505 ;;9002226.02101,"1820,16590-0214-45 ",.01)
+506 ;;16590-0214-45
+507 ;;9002226.02101,"1820,16590-0214-45 ",.02)
+508 ;;16590-0214-45
+509 ;;9002226.02101,"1820,16590-0214-60 ",.01)
+510 ;;16590-0214-60
+511 ;;9002226.02101,"1820,16590-0214-60 ",.02)
+512 ;;16590-0214-60
+513 ;;9002226.02101,"1820,16590-0214-90 ",.01)
+514 ;;16590-0214-90
+515 ;;9002226.02101,"1820,16590-0214-90 ",.02)
+516 ;;16590-0214-90
+517 ;;9002226.02101,"1820,16590-0236-20 ",.01)
+518 ;;16590-0236-20
+519 ;;9002226.02101,"1820,16590-0236-20 ",.02)
+520 ;;16590-0236-20
+521 ;;9002226.02101,"1820,16590-0236-28 ",.01)
+522 ;;16590-0236-28
+523 ;;9002226.02101,"1820,16590-0236-28 ",.02)
+524 ;;16590-0236-28
+525 ;;9002226.02101,"1820,16590-0236-30 ",.01)
+526 ;;16590-0236-30
+527 ;;9002226.02101,"1820,16590-0236-30 ",.02)
+528 ;;16590-0236-30
+529 ;;9002226.02101,"1820,16590-0236-40 ",.01)
+530 ;;16590-0236-40
+531 ;;9002226.02101,"1820,16590-0236-40 ",.02)
+532 ;;16590-0236-40
+533 ;;9002226.02101,"1820,16590-0236-60 ",.01)
+534 ;;16590-0236-60
+535 ;;9002226.02101,"1820,16590-0236-60 ",.02)
+536 ;;16590-0236-60
+537 ;;9002226.02101,"1820,16590-0236-90 ",.01)
+538 ;;16590-0236-90
+539 ;;9002226.02101,"1820,16590-0236-90 ",.02)
+540 ;;16590-0236-90
+541 ;;9002226.02101,"1820,16590-0438-28 ",.01)
+542 ;;16590-0438-28
+543 ;;9002226.02101,"1820,16590-0438-28 ",.02)
+544 ;;16590-0438-28
+545 ;;9002226.02101,"1820,16590-0438-30 ",.01)
+546 ;;16590-0438-30
+547 ;;9002226.02101,"1820,16590-0438-30 ",.02)
+548 ;;16590-0438-30
+549 ;;9002226.02101,"1820,16590-0438-60 ",.01)
+550 ;;16590-0438-60
+551 ;;9002226.02101,"1820,16590-0438-60 ",.02)
+552 ;;16590-0438-60
+553 ;;9002226.02101,"1820,16590-0438-72 ",.01)
+554 ;;16590-0438-72
+555 ;;9002226.02101,"1820,16590-0438-72 ",.02)
+556 ;;16590-0438-72
+557 ;;9002226.02101,"1820,16590-0438-90 ",.01)
+558 ;;16590-0438-90
+559 ;;9002226.02101,"1820,16590-0438-90 ",.02)
+560 ;;16590-0438-90
+561 ;;9002226.02101,"1820,21695-0220-30 ",.01)
+562 ;;21695-0220-30
+563 ;;9002226.02101,"1820,21695-0220-30 ",.02)
+564 ;;21695-0220-30
+565 ;;9002226.02101,"1820,21695-0282-30 ",.01)
+566 ;;21695-0282-30