BGP51Q12 ;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,"68258-6060-03 ")
;;3156
;;21,"68258-6066-03 ")
;;2455
;;21,"68258-6066-06 ")
;;2456
;;21,"68258-6069-03 ")
;;3061
;;21,"68258-6069-06 ")
;;3077
;;21,"68258-6069-09 ")
;;3078
;;21,"68258-6070-03 ")
;;3131
;;21,"68258-6070-06 ")
;;3132
;;21,"68258-6070-09 ")
;;3133
;;21,"68258-6071-03 ")
;;2993
;;21,"68258-6075-03 ")
;;477
;;21,"68258-6078-03 ")
;;4232
;;21,"68258-6094-03 ")
;;4207
;;21,"68258-6094-09 ")
;;4208
;;21,"68258-6095-03 ")
;;4241
;;21,"68258-6095-09 ")
;;4242
;;21,"68258-6096-03 ")
;;4297
;;21,"68258-6096-09 ")
;;4298
;;21,"68258-6097-03 ")
;;4328
;;21,"68258-6097-09 ")
;;4329
;;21,"68258-6098-03 ")
;;4360
;;21,"68258-6098-09 ")
;;4361
;;21,"68258-6100-03 ")
;;2337
;;21,"68258-6106-03 ")
;;891
;;21,"68258-6965-09 ")
;;4206
;;21,"68258-6966-09 ")
;;4243
;;21,"68258-6967-09 ")
;;4296
;;21,"68258-6968-09 ")
;;4330
;;21,"68258-6969-09 ")
;;4359
;;21,"68258-6973-03 ")
;;4286
;;21,"68258-6978-03 ")
;;3762
;;21,"68258-6979-03 ")
;;4124
;;21,"68258-6986-03 ")
;;2928
;;21,"68258-6989-03 ")
;;4105
;;21,"68258-6990-03 ")
;;4139
;;21,"68258-6994-09 ")
;;2992
;;21,"68258-6995-03 ")
;;2880
;;21,"68382-0135-01 ")
;;2578
;;21,"68382-0135-06 ")
;;2579
;;21,"68382-0135-10 ")
;;2580
;;21,"68382-0135-16 ")
;;2581
;;21,"68382-0136-01 ")
;;2718
;;21,"68382-0136-06 ")
;;2719
;;21,"68382-0136-10 ")
;;2720
;;21,"68382-0136-16 ")
;;2721
;;21,"68382-0137-01 ")
;;2828
;;21,"68382-0137-06 ")
;;2829
;;21,"68382-0137-10 ")
;;2830
;;21,"68382-0137-16 ")
;;2831
;;21,"68382-0142-06 ")
;;3919
;;21,"68382-0142-10 ")
;;3920
;;21,"68382-0142-16 ")
;;3921
;;21,"68382-0143-06 ")
;;4047
;;21,"68382-0143-10 ")
;;4048
;;21,"68382-0143-16 ")
;;4049
;;21,"68382-0144-01 ")
;;2125
;;21,"68382-0144-05 ")
;;2126
;;21,"68382-0144-06 ")
;;2127
;;21,"68382-0145-01 ")
;;2149
;;21,"68382-0145-05 ")
;;2150
;;21,"68382-0145-06 ")
;;2151
;;21,"68382-0146-01 ")
;;2206
;;21,"68382-0146-05 ")
;;2207
;;21,"68382-0146-06 ")
;;2208
;;21,"68382-0147-01 ")
;;2266
;;21,"68382-0147-05 ")
;;2267
;;21,"68382-0147-06 ")
;;2268
;;21,"68387-0543-30 ")
;;1322
;;21,"68462-0205-01 ")
;;3706
;;21,"68462-0206-01 ")
;;3698
;;21,"68462-0207-01 ")
;;3690
;;21,"68462-0208-01 ")
;;1982
;;21,"68462-0209-01 ")
;;1974
;;21,"68462-0294-01 ")
;;3264
;;21,"68462-0295-01 ")
;;3269
;;21,"68462-0296-01 ")
;;3275
;;21,"68462-0329-01 ")
;;3283
;;21,"68462-0367-10 ")
;;852
;;21,"68462-0367-90 ")
;;853
;;21,"68462-0368-10 ")
;;889
;;21,"68462-0368-90 ")
;;890
;;21,"68462-0369-10 ")
;;957
;;21,"68462-0369-90 ")
;;958
;;21,"68462-0554-01 ")
;;3397
;;21,"68462-0555-01 ")
;;3408
;;21,"68552-0221-10 ")
;;850
;;21,"68552-0221-90 ")
;;851
;;21,"68552-0222-10 ")
;;892
;;21,"68552-0222-90 ")
;;893
;;21,"68552-0223-10 ")
;;955
;;21,"68552-0223-90 ")
;;956
;;21,"68645-0160-59 ")
;;290
;;21,"68645-0161-59 ")
;;375
;;21,"68645-0162-59 ")
;;434
;;21,"68645-0163-59 ")
;;475
;;21,"68645-0272-54 ")
;;1536
;;21,"68645-0404-70 ")
;;2498
;;21,"68645-0405-70 ")
;;3866
;;21,"68645-0406-70 ")
;;2574
;;21,"68645-0407-70 ")
;;2575
;;21,"68645-0408-70 ")
;;2725
;;21,"68645-0409-70 ")
;;2726
;;21,"68645-0410-70 ")
;;2823
;;21,"68645-0411-70 ")
;;2824
;;21,"68645-0454-90 ")
;;476
;;21,"68645-0455-90 ")
;;618
;;21,"68645-0456-90 ")
;;731
;;21,"68645-0457-90 ")
;;826
;;21,"68645-0469-54 ")
;;1537
;;21,"76234-0001-01 ")
;;1990
;;21,"76234-0002-01 ")
;;1996
;;21,"76282-0200-10 ")
;;848
;;21,"76282-0200-90 ")
;;849
;;21,"76282-0201-10 ")
;;894
;;21,"76282-0201-90 ")
;;895
;;21,"76282-0202-10 ")
;;953
;;21,"76282-0202-90 ")
;;954
;;21,"76282-0271-01 ")
;;2124
;;21,"76282-0272-01 ")
;;2152
;;21,"76282-0272-05 ")
;;2153
;;21,"76282-0273-01 ")
;;2204
;;21,"76282-0273-05 ")
;;2205
;;21,"76282-0274-01 ")
;;2269
;;21,"76282-0274-05 ")
;;2270
;;21,"76282-0417-05 ")
;;1005
;;21,"76282-0418-10 ")
;;1110
;;21,"76282-0418-45 ")
;;1111
;;21,"76282-0418-90 ")
;;1112
;;21,"76282-0419-10 ")
;;1319
;;21,"76282-0419-45 ")
;;1320
;;21,"76282-0419-90 ")
;;1321
;;21,"76282-0420-10 ")
;;1532
;;21,"76282-0420-18 ")
;;1533
;;21,"76282-0420-45 ")
;;1534
;;21,"76282-0420-90 ")
;;1535
;;21,"76282-0421-01 ")
;;1737
;;21,"76282-0422-05 ")
;;1818
;;21,"76282-0422-10 ")
;;1819
;;21,"76282-0422-18 ")
;;1820
;;21,"76282-0422-45 ")
;;1821
;;21,"76282-0422-90 ")
;;1822
;;21,"76439-0140-11 ")
;;2576
;;21,"76439-0140-90 ")
;;2577
;;21,"76439-0141-11 ")
;;2722
;;21,"76439-0141-30 ")
;;2723
;;21,"76439-0141-90 ")
;;2724
;;21,"76439-0142-11 ")
;;2825
;;21,"76439-0142-30 ")
;;2826
;;21,"76439-0142-90 ")
;;2827
;;9002226,1729,.01)
;;BGP PQA RASA NDC
;;9002226,1729,.02)
;;RASA NDC
;;9002226,1729,.04)
;;n
;;9002226,1729,.06)
;;@
;;9002226,1729,.08)
;;@
;;9002226,1729,.09)
;;3140819
;;9002226,1729,.11)
;;@
;;9002226,1729,.12)
;;@
;;9002226,1729,.13)
;;1
;;9002226,1729,.14)
;;@
;;9002226,1729,.15)
;;50.67
;;9002226,1729,.16)
;;@
;;9002226,1729,.17)
;;@
;;9002226,1729,3101)
;;@
;;9002226.02101,"1729,00006-0019-54 ",.01)
;;00006-0019-54
;;9002226.02101,"1729,00006-0019-54 ",.02)
;;00006-0019-54
;;9002226.02101,"1729,00006-0106-54 ",.01)
;;00006-0106-54
;;9002226.02101,"1729,00006-0106-54 ",.02)
;;00006-0106-54
;;9002226.02101,"1729,00006-0140-58 ",.01)
;;00006-0140-58
;;9002226.02101,"1729,00006-0140-58 ",.02)
;;00006-0140-58
;;9002226.02101,"1729,00006-0145-58 ",.01)
;;00006-0145-58
;;9002226.02101,"1729,00006-0145-58 ",.02)
;;00006-0145-58
;;9002226.02101,"1729,00006-0207-54 ",.01)
;;00006-0207-54
;;9002226.02101,"1729,00006-0207-54 ",.02)
;;00006-0207-54
;;9002226.02101,"1729,00006-0717-31 ",.01)
;;00006-0717-31
;;9002226.02101,"1729,00006-0717-31 ",.02)
;;00006-0717-31
;;9002226.02101,"1729,00006-0717-54 ",.01)
;;00006-0717-54
;;9002226.02101,"1729,00006-0717-54 ",.02)
;;00006-0717-54
;;9002226.02101,"1729,00006-0717-82 ",.01)
;;00006-0717-82
;;9002226.02101,"1729,00006-0717-82 ",.02)
;;00006-0717-82
;;9002226.02101,"1729,00006-0745-31 ",.01)
;;00006-0745-31
;;9002226.02101,"1729,00006-0745-31 ",.02)
;;00006-0745-31
;;9002226.02101,"1729,00006-0745-54 ",.01)
;;00006-0745-54
;;9002226.02101,"1729,00006-0745-54 ",.02)
;;00006-0745-54
;;9002226.02101,"1729,00006-0745-82 ",.01)
;;00006-0745-82
;;9002226.02101,"1729,00006-0745-82 ",.02)
;;00006-0745-82
;;9002226.02101,"1729,00006-0747-28 ",.01)
;;00006-0747-28
;;9002226.02101,"1729,00006-0747-28 ",.02)
;;00006-0747-28
;;9002226.02101,"1729,00006-0747-31 ",.01)
;;00006-0747-31
;;9002226.02101,"1729,00006-0747-31 ",.02)
;;00006-0747-31
;;9002226.02101,"1729,00006-0747-54 ",.01)
;;00006-0747-54
;;9002226.02101,"1729,00006-0747-54 ",.02)
;;00006-0747-54
;;9002226.02101,"1729,00006-0747-81 ",.01)
;;00006-0747-81
;;9002226.02101,"1729,00006-0747-81 ",.02)
;;00006-0747-81
;;9002226.02101,"1729,00006-0747-82 ",.01)
;;00006-0747-82
;;9002226.02101,"1729,00006-0747-82 ",.02)
;;00006-0747-82
;;9002226.02101,"1729,00006-0951-54 ",.01)
;;00006-0951-54
;;9002226.02101,"1729,00006-0951-54 ",.02)
;;00006-0951-54
;;9002226.02101,"1729,00006-0951-82 ",.01)
;;00006-0951-82
;;9002226.02101,"1729,00006-0951-82 ",.02)
;;00006-0951-82
;;9002226.02101,"1729,00006-0951-87 ",.01)
;;00006-0951-87
;;9002226.02101,"1729,00006-0951-87 ",.02)
;;00006-0951-87
;;9002226.02101,"1729,00006-0952-31 ",.01)
;;00006-0952-31
;;9002226.02101,"1729,00006-0952-31 ",.02)
;;00006-0952-31
;;9002226.02101,"1729,00006-0952-54 ",.01)
;;00006-0952-54
;;9002226.02101,"1729,00006-0952-54 ",.02)
;;00006-0952-54
;;9002226.02101,"1729,00006-0952-82 ",.01)
;;00006-0952-82
;;9002226.02101,"1729,00006-0952-82 ",.02)
;;00006-0952-82
;;9002226.02101,"1729,00006-0960-31 ",.01)
;;00006-0960-31
;;9002226.02101,"1729,00006-0960-31 ",.02)
;;00006-0960-31
;;9002226.02101,"1729,00006-0960-54 ",.01)
;;00006-0960-54
;;9002226.02101,"1729,00006-0960-54 ",.02)
;;00006-0960-54
;;9002226.02101,"1729,00006-0960-82 ",.01)
;;00006-0960-82
;;9002226.02101,"1729,00006-0960-82 ",.02)
;;00006-0960-82
;;9002226.02101,"1729,00006-0960-86 ",.01)
;;00006-0960-86
;;9002226.02101,"1729,00006-0960-86 ",.02)
;;00006-0960-86
;;9002226.02101,"1729,00024-5850-30 ",.01)
;;00024-5850-30
;;9002226.02101,"1729,00024-5850-30 ",.02)
;;00024-5850-30
;;9002226.02101,"1729,00024-5850-90 ",.01)
;;00024-5850-90
;;9002226.02101,"1729,00024-5850-90 ",.02)
;;00024-5850-90
;;9002226.02101,"1729,00024-5851-30 ",.01)
;;00024-5851-30
;;9002226.02101,"1729,00024-5851-30 ",.02)
;;00024-5851-30
;;9002226.02101,"1729,00024-5851-90 ",.01)
;;00024-5851-90
;;9002226.02101,"1729,00024-5851-90 ",.02)
;;00024-5851-90
;;9002226.02101,"1729,00024-5852-30 ",.01)
;;00024-5852-30
;;9002226.02101,"1729,00024-5852-30 ",.02)
;;00024-5852-30
;;9002226.02101,"1729,00024-5852-90 ",.01)
;;00024-5852-90
;;9002226.02101,"1729,00024-5852-90 ",.02)
;;00024-5852-90
;;9002226.02101,"1729,00024-5855-30 ",.01)
;;00024-5855-30
;;9002226.02101,"1729,00024-5855-30 ",.02)
;;00024-5855-30
;;9002226.02101,"1729,00024-5855-90 ",.01)
;;00024-5855-90
;;9002226.02101,"1729,00024-5855-90 ",.02)
;;00024-5855-90
;;9002226.02101,"1729,00024-5856-30 ",.01)
;;00024-5856-30
;;9002226.02101,"1729,00024-5856-30 ",.02)
;;00024-5856-30
;;9002226.02101,"1729,00024-5856-90 ",.01)
;;00024-5856-90
;;9002226.02101,"1729,00024-5856-90 ",.02)
;;00024-5856-90
;;9002226.02101,"1729,00032-1101-01 ",.01)
;;00032-1101-01
;;9002226.02101,"1729,00032-1101-01 ",.02)
;;00032-1101-01
;;9002226.02101,"1729,00032-1102-01 ",.01)
;;00032-1102-01
;;9002226.02101,"1729,00032-1102-01 ",.02)
;;00032-1102-01
;;9002226.02101,"1729,00032-1103-01 ",.01)
;;00032-1103-01
;;9002226.02101,"1729,00032-1103-01 ",.02)
;;00032-1103-01
;;9002226.02101,"1729,00054-0106-25 ",.01)
;;00054-0106-25
;;9002226.02101,"1729,00054-0106-25 ",.02)
;;00054-0106-25
;;9002226.02101,"1729,00054-0107-20 ",.01)
;;00054-0107-20
;;9002226.02101,"1729,00054-0107-20 ",.02)
;;00054-0107-20
;;9002226.02101,"1729,00054-0107-25 ",.01)
;;00054-0107-25
;;9002226.02101,"1729,00054-0107-25 ",.02)
;;00054-0107-25
;;9002226.02101,"1729,00054-0107-29 ",.01)
;;00054-0107-29
;;9002226.02101,"1729,00054-0107-29 ",.02)
;;00054-0107-29
;;9002226.02101,"1729,00054-0108-20 ",.01)
;;00054-0108-20
;;9002226.02101,"1729,00054-0108-20 ",.02)
;;00054-0108-20
;;9002226.02101,"1729,00054-0108-25 ",.01)
;;00054-0108-25
;;9002226.02101,"1729,00054-0108-25 ",.02)
;;00054-0108-25
;;9002226.02101,"1729,00054-0108-29 ",.01)
;;00054-0108-29
;;9002226.02101,"1729,00054-0108-29 ",.02)
;;00054-0108-29
;;9002226.02101,"1729,00054-0109-25 ",.01)
;;00054-0109-25
;;9002226.02101,"1729,00054-0109-25 ",.02)
;;00054-0109-25
;;9002226.02101,"1729,00054-0109-29 ",.01)
;;00054-0109-29
;;9002226.02101,"1729,00054-0109-29 ",.02)
;;00054-0109-29
;;9002226.02101,"1729,00054-0110-25 ",.01)
;;00054-0110-25
;;9002226.02101,"1729,00054-0110-25 ",.02)
;;00054-0110-25
;;9002226.02101,"1729,00054-0111-25 ",.01)
;;00054-0111-25
;;9002226.02101,"1729,00054-0111-25 ",.02)
;;00054-0111-25
;;9002226.02101,"1729,00054-0112-25 ",.01)
;;00054-0112-25
;;9002226.02101,"1729,00054-0112-25 ",.02)
;;00054-0112-25
;;9002226.02101,"1729,00054-0123-22 ",.01)
;;00054-0123-22
;;9002226.02101,"1729,00054-0123-22 ",.02)
;;00054-0123-22
;;9002226.02101,"1729,00054-0124-22 ",.01)
;;00054-0124-22
;;9002226.02101,"1729,00054-0124-22 ",.02)
;;00054-0124-22
;;9002226.02101,"1729,00054-0125-22 ",.01)
;;00054-0125-22
;;9002226.02101,"1729,00054-0125-22 ",.02)
;;00054-0125-22
;;9002226.02101,"1729,00054-0126-22 ",.01)
;;00054-0126-22
;;9002226.02101,"1729,00054-0126-22 ",.02)
;;00054-0126-22
;;9002226.02101,"1729,00054-0127-22 ",.01)
;;00054-0127-22
;;9002226.02101,"1729,00054-0127-22 ",.02)
;;00054-0127-22
;;9002226.02101,"1729,00054-0250-13 ",.01)
;;00054-0250-13
;;9002226.02101,"1729,00054-0250-13 ",.02)
;;00054-0250-13
;;9002226.02101,"1729,00054-0250-22 ",.01)
;;00054-0250-22
;;9002226.02101,"1729,00054-0250-22 ",.02)
;;00054-0250-22
;;9002226.02101,"1729,00054-0251-13 ",.01)
;;00054-0251-13
;;9002226.02101,"1729,00054-0251-13 ",.02)
;;00054-0251-13
;;9002226.02101,"1729,00054-0251-22 ",.01)
;;00054-0251-22
;;9002226.02101,"1729,00054-0251-22 ",.02)
;;00054-0251-22
;;9002226.02101,"1729,00054-0252-13 ",.01)
;;00054-0252-13
;;9002226.02101,"1729,00054-0252-13 ",.02)
;;00054-0252-13
;;9002226.02101,"1729,00054-0252-22 ",.01)
;;00054-0252-22
;;9002226.02101,"1729,00054-0252-22 ",.02)
;;00054-0252-22
;;9002226.02101,"1729,00054-0254-13 ",.01)
;;00054-0254-13
;;9002226.02101,"1729,00054-0254-13 ",.02)
;;00054-0254-13
;;9002226.02101,"1729,00054-0254-22 ",.01)
;;00054-0254-22
;;9002226.02101,"1729,00054-0254-22 ",.02)
;;00054-0254-22
BGP51Q12 ;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,"68258-6060-03 ")
+2 ;;3156
+3 ;;21,"68258-6066-03 ")
+4 ;;2455
+5 ;;21,"68258-6066-06 ")
+6 ;;2456
+7 ;;21,"68258-6069-03 ")
+8 ;;3061
+9 ;;21,"68258-6069-06 ")
+10 ;;3077
+11 ;;21,"68258-6069-09 ")
+12 ;;3078
+13 ;;21,"68258-6070-03 ")
+14 ;;3131
+15 ;;21,"68258-6070-06 ")
+16 ;;3132
+17 ;;21,"68258-6070-09 ")
+18 ;;3133
+19 ;;21,"68258-6071-03 ")
+20 ;;2993
+21 ;;21,"68258-6075-03 ")
+22 ;;477
+23 ;;21,"68258-6078-03 ")
+24 ;;4232
+25 ;;21,"68258-6094-03 ")
+26 ;;4207
+27 ;;21,"68258-6094-09 ")
+28 ;;4208
+29 ;;21,"68258-6095-03 ")
+30 ;;4241
+31 ;;21,"68258-6095-09 ")
+32 ;;4242
+33 ;;21,"68258-6096-03 ")
+34 ;;4297
+35 ;;21,"68258-6096-09 ")
+36 ;;4298
+37 ;;21,"68258-6097-03 ")
+38 ;;4328
+39 ;;21,"68258-6097-09 ")
+40 ;;4329
+41 ;;21,"68258-6098-03 ")
+42 ;;4360
+43 ;;21,"68258-6098-09 ")
+44 ;;4361
+45 ;;21,"68258-6100-03 ")
+46 ;;2337
+47 ;;21,"68258-6106-03 ")
+48 ;;891
+49 ;;21,"68258-6965-09 ")
+50 ;;4206
+51 ;;21,"68258-6966-09 ")
+52 ;;4243
+53 ;;21,"68258-6967-09 ")
+54 ;;4296
+55 ;;21,"68258-6968-09 ")
+56 ;;4330
+57 ;;21,"68258-6969-09 ")
+58 ;;4359
+59 ;;21,"68258-6973-03 ")
+60 ;;4286
+61 ;;21,"68258-6978-03 ")
+62 ;;3762
+63 ;;21,"68258-6979-03 ")
+64 ;;4124
+65 ;;21,"68258-6986-03 ")
+66 ;;2928
+67 ;;21,"68258-6989-03 ")
+68 ;;4105
+69 ;;21,"68258-6990-03 ")
+70 ;;4139
+71 ;;21,"68258-6994-09 ")
+72 ;;2992
+73 ;;21,"68258-6995-03 ")
+74 ;;2880
+75 ;;21,"68382-0135-01 ")
+76 ;;2578
+77 ;;21,"68382-0135-06 ")
+78 ;;2579
+79 ;;21,"68382-0135-10 ")
+80 ;;2580
+81 ;;21,"68382-0135-16 ")
+82 ;;2581
+83 ;;21,"68382-0136-01 ")
+84 ;;2718
+85 ;;21,"68382-0136-06 ")
+86 ;;2719
+87 ;;21,"68382-0136-10 ")
+88 ;;2720
+89 ;;21,"68382-0136-16 ")
+90 ;;2721
+91 ;;21,"68382-0137-01 ")
+92 ;;2828
+93 ;;21,"68382-0137-06 ")
+94 ;;2829
+95 ;;21,"68382-0137-10 ")
+96 ;;2830
+97 ;;21,"68382-0137-16 ")
+98 ;;2831
+99 ;;21,"68382-0142-06 ")
+100 ;;3919
+101 ;;21,"68382-0142-10 ")
+102 ;;3920
+103 ;;21,"68382-0142-16 ")
+104 ;;3921
+105 ;;21,"68382-0143-06 ")
+106 ;;4047
+107 ;;21,"68382-0143-10 ")
+108 ;;4048
+109 ;;21,"68382-0143-16 ")
+110 ;;4049
+111 ;;21,"68382-0144-01 ")
+112 ;;2125
+113 ;;21,"68382-0144-05 ")
+114 ;;2126
+115 ;;21,"68382-0144-06 ")
+116 ;;2127
+117 ;;21,"68382-0145-01 ")
+118 ;;2149
+119 ;;21,"68382-0145-05 ")
+120 ;;2150
+121 ;;21,"68382-0145-06 ")
+122 ;;2151
+123 ;;21,"68382-0146-01 ")
+124 ;;2206
+125 ;;21,"68382-0146-05 ")
+126 ;;2207
+127 ;;21,"68382-0146-06 ")
+128 ;;2208
+129 ;;21,"68382-0147-01 ")
+130 ;;2266
+131 ;;21,"68382-0147-05 ")
+132 ;;2267
+133 ;;21,"68382-0147-06 ")
+134 ;;2268
+135 ;;21,"68387-0543-30 ")
+136 ;;1322
+137 ;;21,"68462-0205-01 ")
+138 ;;3706
+139 ;;21,"68462-0206-01 ")
+140 ;;3698
+141 ;;21,"68462-0207-01 ")
+142 ;;3690
+143 ;;21,"68462-0208-01 ")
+144 ;;1982
+145 ;;21,"68462-0209-01 ")
+146 ;;1974
+147 ;;21,"68462-0294-01 ")
+148 ;;3264
+149 ;;21,"68462-0295-01 ")
+150 ;;3269
+151 ;;21,"68462-0296-01 ")
+152 ;;3275
+153 ;;21,"68462-0329-01 ")
+154 ;;3283
+155 ;;21,"68462-0367-10 ")
+156 ;;852
+157 ;;21,"68462-0367-90 ")
+158 ;;853
+159 ;;21,"68462-0368-10 ")
+160 ;;889
+161 ;;21,"68462-0368-90 ")
+162 ;;890
+163 ;;21,"68462-0369-10 ")
+164 ;;957
+165 ;;21,"68462-0369-90 ")
+166 ;;958
+167 ;;21,"68462-0554-01 ")
+168 ;;3397
+169 ;;21,"68462-0555-01 ")
+170 ;;3408
+171 ;;21,"68552-0221-10 ")
+172 ;;850
+173 ;;21,"68552-0221-90 ")
+174 ;;851
+175 ;;21,"68552-0222-10 ")
+176 ;;892
+177 ;;21,"68552-0222-90 ")
+178 ;;893
+179 ;;21,"68552-0223-10 ")
+180 ;;955
+181 ;;21,"68552-0223-90 ")
+182 ;;956
+183 ;;21,"68645-0160-59 ")
+184 ;;290
+185 ;;21,"68645-0161-59 ")
+186 ;;375
+187 ;;21,"68645-0162-59 ")
+188 ;;434
+189 ;;21,"68645-0163-59 ")
+190 ;;475
+191 ;;21,"68645-0272-54 ")
+192 ;;1536
+193 ;;21,"68645-0404-70 ")
+194 ;;2498
+195 ;;21,"68645-0405-70 ")
+196 ;;3866
+197 ;;21,"68645-0406-70 ")
+198 ;;2574
+199 ;;21,"68645-0407-70 ")
+200 ;;2575
+201 ;;21,"68645-0408-70 ")
+202 ;;2725
+203 ;;21,"68645-0409-70 ")
+204 ;;2726
+205 ;;21,"68645-0410-70 ")
+206 ;;2823
+207 ;;21,"68645-0411-70 ")
+208 ;;2824
+209 ;;21,"68645-0454-90 ")
+210 ;;476
+211 ;;21,"68645-0455-90 ")
+212 ;;618
+213 ;;21,"68645-0456-90 ")
+214 ;;731
+215 ;;21,"68645-0457-90 ")
+216 ;;826
+217 ;;21,"68645-0469-54 ")
+218 ;;1537
+219 ;;21,"76234-0001-01 ")
+220 ;;1990
+221 ;;21,"76234-0002-01 ")
+222 ;;1996
+223 ;;21,"76282-0200-10 ")
+224 ;;848
+225 ;;21,"76282-0200-90 ")
+226 ;;849
+227 ;;21,"76282-0201-10 ")
+228 ;;894
+229 ;;21,"76282-0201-90 ")
+230 ;;895
+231 ;;21,"76282-0202-10 ")
+232 ;;953
+233 ;;21,"76282-0202-90 ")
+234 ;;954
+235 ;;21,"76282-0271-01 ")
+236 ;;2124
+237 ;;21,"76282-0272-01 ")
+238 ;;2152
+239 ;;21,"76282-0272-05 ")
+240 ;;2153
+241 ;;21,"76282-0273-01 ")
+242 ;;2204
+243 ;;21,"76282-0273-05 ")
+244 ;;2205
+245 ;;21,"76282-0274-01 ")
+246 ;;2269
+247 ;;21,"76282-0274-05 ")
+248 ;;2270
+249 ;;21,"76282-0417-05 ")
+250 ;;1005
+251 ;;21,"76282-0418-10 ")
+252 ;;1110
+253 ;;21,"76282-0418-45 ")
+254 ;;1111
+255 ;;21,"76282-0418-90 ")
+256 ;;1112
+257 ;;21,"76282-0419-10 ")
+258 ;;1319
+259 ;;21,"76282-0419-45 ")
+260 ;;1320
+261 ;;21,"76282-0419-90 ")
+262 ;;1321
+263 ;;21,"76282-0420-10 ")
+264 ;;1532
+265 ;;21,"76282-0420-18 ")
+266 ;;1533
+267 ;;21,"76282-0420-45 ")
+268 ;;1534
+269 ;;21,"76282-0420-90 ")
+270 ;;1535
+271 ;;21,"76282-0421-01 ")
+272 ;;1737
+273 ;;21,"76282-0422-05 ")
+274 ;;1818
+275 ;;21,"76282-0422-10 ")
+276 ;;1819
+277 ;;21,"76282-0422-18 ")
+278 ;;1820
+279 ;;21,"76282-0422-45 ")
+280 ;;1821
+281 ;;21,"76282-0422-90 ")
+282 ;;1822
+283 ;;21,"76439-0140-11 ")
+284 ;;2576
+285 ;;21,"76439-0140-90 ")
+286 ;;2577
+287 ;;21,"76439-0141-11 ")
+288 ;;2722
+289 ;;21,"76439-0141-30 ")
+290 ;;2723
+291 ;;21,"76439-0141-90 ")
+292 ;;2724
+293 ;;21,"76439-0142-11 ")
+294 ;;2825
+295 ;;21,"76439-0142-30 ")
+296 ;;2826
+297 ;;21,"76439-0142-90 ")
+298 ;;2827
+299 ;;9002226,1729,.01)
+300 ;;BGP PQA RASA NDC
+301 ;;9002226,1729,.02)
+302 ;;RASA NDC
+303 ;;9002226,1729,.04)
+304 ;;n
+305 ;;9002226,1729,.06)
+306 ;;@
+307 ;;9002226,1729,.08)
+308 ;;@
+309 ;;9002226,1729,.09)
+310 ;;3140819
+311 ;;9002226,1729,.11)
+312 ;;@
+313 ;;9002226,1729,.12)
+314 ;;@
+315 ;;9002226,1729,.13)
+316 ;;1
+317 ;;9002226,1729,.14)
+318 ;;@
+319 ;;9002226,1729,.15)
+320 ;;50.67
+321 ;;9002226,1729,.16)
+322 ;;@
+323 ;;9002226,1729,.17)
+324 ;;@
+325 ;;9002226,1729,3101)
+326 ;;@
+327 ;;9002226.02101,"1729,00006-0019-54 ",.01)
+328 ;;00006-0019-54
+329 ;;9002226.02101,"1729,00006-0019-54 ",.02)
+330 ;;00006-0019-54
+331 ;;9002226.02101,"1729,00006-0106-54 ",.01)
+332 ;;00006-0106-54
+333 ;;9002226.02101,"1729,00006-0106-54 ",.02)
+334 ;;00006-0106-54
+335 ;;9002226.02101,"1729,00006-0140-58 ",.01)
+336 ;;00006-0140-58
+337 ;;9002226.02101,"1729,00006-0140-58 ",.02)
+338 ;;00006-0140-58
+339 ;;9002226.02101,"1729,00006-0145-58 ",.01)
+340 ;;00006-0145-58
+341 ;;9002226.02101,"1729,00006-0145-58 ",.02)
+342 ;;00006-0145-58
+343 ;;9002226.02101,"1729,00006-0207-54 ",.01)
+344 ;;00006-0207-54
+345 ;;9002226.02101,"1729,00006-0207-54 ",.02)
+346 ;;00006-0207-54
+347 ;;9002226.02101,"1729,00006-0717-31 ",.01)
+348 ;;00006-0717-31
+349 ;;9002226.02101,"1729,00006-0717-31 ",.02)
+350 ;;00006-0717-31
+351 ;;9002226.02101,"1729,00006-0717-54 ",.01)
+352 ;;00006-0717-54
+353 ;;9002226.02101,"1729,00006-0717-54 ",.02)
+354 ;;00006-0717-54
+355 ;;9002226.02101,"1729,00006-0717-82 ",.01)
+356 ;;00006-0717-82
+357 ;;9002226.02101,"1729,00006-0717-82 ",.02)
+358 ;;00006-0717-82
+359 ;;9002226.02101,"1729,00006-0745-31 ",.01)
+360 ;;00006-0745-31
+361 ;;9002226.02101,"1729,00006-0745-31 ",.02)
+362 ;;00006-0745-31
+363 ;;9002226.02101,"1729,00006-0745-54 ",.01)
+364 ;;00006-0745-54
+365 ;;9002226.02101,"1729,00006-0745-54 ",.02)
+366 ;;00006-0745-54
+367 ;;9002226.02101,"1729,00006-0745-82 ",.01)
+368 ;;00006-0745-82
+369 ;;9002226.02101,"1729,00006-0745-82 ",.02)
+370 ;;00006-0745-82
+371 ;;9002226.02101,"1729,00006-0747-28 ",.01)
+372 ;;00006-0747-28
+373 ;;9002226.02101,"1729,00006-0747-28 ",.02)
+374 ;;00006-0747-28
+375 ;;9002226.02101,"1729,00006-0747-31 ",.01)
+376 ;;00006-0747-31
+377 ;;9002226.02101,"1729,00006-0747-31 ",.02)
+378 ;;00006-0747-31
+379 ;;9002226.02101,"1729,00006-0747-54 ",.01)
+380 ;;00006-0747-54
+381 ;;9002226.02101,"1729,00006-0747-54 ",.02)
+382 ;;00006-0747-54
+383 ;;9002226.02101,"1729,00006-0747-81 ",.01)
+384 ;;00006-0747-81
+385 ;;9002226.02101,"1729,00006-0747-81 ",.02)
+386 ;;00006-0747-81
+387 ;;9002226.02101,"1729,00006-0747-82 ",.01)
+388 ;;00006-0747-82
+389 ;;9002226.02101,"1729,00006-0747-82 ",.02)
+390 ;;00006-0747-82
+391 ;;9002226.02101,"1729,00006-0951-54 ",.01)
+392 ;;00006-0951-54
+393 ;;9002226.02101,"1729,00006-0951-54 ",.02)
+394 ;;00006-0951-54
+395 ;;9002226.02101,"1729,00006-0951-82 ",.01)
+396 ;;00006-0951-82
+397 ;;9002226.02101,"1729,00006-0951-82 ",.02)
+398 ;;00006-0951-82
+399 ;;9002226.02101,"1729,00006-0951-87 ",.01)
+400 ;;00006-0951-87
+401 ;;9002226.02101,"1729,00006-0951-87 ",.02)
+402 ;;00006-0951-87
+403 ;;9002226.02101,"1729,00006-0952-31 ",.01)
+404 ;;00006-0952-31
+405 ;;9002226.02101,"1729,00006-0952-31 ",.02)
+406 ;;00006-0952-31
+407 ;;9002226.02101,"1729,00006-0952-54 ",.01)
+408 ;;00006-0952-54
+409 ;;9002226.02101,"1729,00006-0952-54 ",.02)
+410 ;;00006-0952-54
+411 ;;9002226.02101,"1729,00006-0952-82 ",.01)
+412 ;;00006-0952-82
+413 ;;9002226.02101,"1729,00006-0952-82 ",.02)
+414 ;;00006-0952-82
+415 ;;9002226.02101,"1729,00006-0960-31 ",.01)
+416 ;;00006-0960-31
+417 ;;9002226.02101,"1729,00006-0960-31 ",.02)
+418 ;;00006-0960-31
+419 ;;9002226.02101,"1729,00006-0960-54 ",.01)
+420 ;;00006-0960-54
+421 ;;9002226.02101,"1729,00006-0960-54 ",.02)
+422 ;;00006-0960-54
+423 ;;9002226.02101,"1729,00006-0960-82 ",.01)
+424 ;;00006-0960-82
+425 ;;9002226.02101,"1729,00006-0960-82 ",.02)
+426 ;;00006-0960-82
+427 ;;9002226.02101,"1729,00006-0960-86 ",.01)
+428 ;;00006-0960-86
+429 ;;9002226.02101,"1729,00006-0960-86 ",.02)
+430 ;;00006-0960-86
+431 ;;9002226.02101,"1729,00024-5850-30 ",.01)
+432 ;;00024-5850-30
+433 ;;9002226.02101,"1729,00024-5850-30 ",.02)
+434 ;;00024-5850-30
+435 ;;9002226.02101,"1729,00024-5850-90 ",.01)
+436 ;;00024-5850-90
+437 ;;9002226.02101,"1729,00024-5850-90 ",.02)
+438 ;;00024-5850-90
+439 ;;9002226.02101,"1729,00024-5851-30 ",.01)
+440 ;;00024-5851-30
+441 ;;9002226.02101,"1729,00024-5851-30 ",.02)
+442 ;;00024-5851-30
+443 ;;9002226.02101,"1729,00024-5851-90 ",.01)
+444 ;;00024-5851-90
+445 ;;9002226.02101,"1729,00024-5851-90 ",.02)
+446 ;;00024-5851-90
+447 ;;9002226.02101,"1729,00024-5852-30 ",.01)
+448 ;;00024-5852-30
+449 ;;9002226.02101,"1729,00024-5852-30 ",.02)
+450 ;;00024-5852-30
+451 ;;9002226.02101,"1729,00024-5852-90 ",.01)
+452 ;;00024-5852-90
+453 ;;9002226.02101,"1729,00024-5852-90 ",.02)
+454 ;;00024-5852-90
+455 ;;9002226.02101,"1729,00024-5855-30 ",.01)
+456 ;;00024-5855-30
+457 ;;9002226.02101,"1729,00024-5855-30 ",.02)
+458 ;;00024-5855-30
+459 ;;9002226.02101,"1729,00024-5855-90 ",.01)
+460 ;;00024-5855-90
+461 ;;9002226.02101,"1729,00024-5855-90 ",.02)
+462 ;;00024-5855-90
+463 ;;9002226.02101,"1729,00024-5856-30 ",.01)
+464 ;;00024-5856-30
+465 ;;9002226.02101,"1729,00024-5856-30 ",.02)
+466 ;;00024-5856-30
+467 ;;9002226.02101,"1729,00024-5856-90 ",.01)
+468 ;;00024-5856-90
+469 ;;9002226.02101,"1729,00024-5856-90 ",.02)
+470 ;;00024-5856-90
+471 ;;9002226.02101,"1729,00032-1101-01 ",.01)
+472 ;;00032-1101-01
+473 ;;9002226.02101,"1729,00032-1101-01 ",.02)
+474 ;;00032-1101-01
+475 ;;9002226.02101,"1729,00032-1102-01 ",.01)
+476 ;;00032-1102-01
+477 ;;9002226.02101,"1729,00032-1102-01 ",.02)
+478 ;;00032-1102-01
+479 ;;9002226.02101,"1729,00032-1103-01 ",.01)
+480 ;;00032-1103-01
+481 ;;9002226.02101,"1729,00032-1103-01 ",.02)
+482 ;;00032-1103-01
+483 ;;9002226.02101,"1729,00054-0106-25 ",.01)
+484 ;;00054-0106-25
+485 ;;9002226.02101,"1729,00054-0106-25 ",.02)
+486 ;;00054-0106-25
+487 ;;9002226.02101,"1729,00054-0107-20 ",.01)
+488 ;;00054-0107-20
+489 ;;9002226.02101,"1729,00054-0107-20 ",.02)
+490 ;;00054-0107-20
+491 ;;9002226.02101,"1729,00054-0107-25 ",.01)
+492 ;;00054-0107-25
+493 ;;9002226.02101,"1729,00054-0107-25 ",.02)
+494 ;;00054-0107-25
+495 ;;9002226.02101,"1729,00054-0107-29 ",.01)
+496 ;;00054-0107-29
+497 ;;9002226.02101,"1729,00054-0107-29 ",.02)
+498 ;;00054-0107-29
+499 ;;9002226.02101,"1729,00054-0108-20 ",.01)
+500 ;;00054-0108-20
+501 ;;9002226.02101,"1729,00054-0108-20 ",.02)
+502 ;;00054-0108-20
+503 ;;9002226.02101,"1729,00054-0108-25 ",.01)
+504 ;;00054-0108-25
+505 ;;9002226.02101,"1729,00054-0108-25 ",.02)
+506 ;;00054-0108-25
+507 ;;9002226.02101,"1729,00054-0108-29 ",.01)
+508 ;;00054-0108-29
+509 ;;9002226.02101,"1729,00054-0108-29 ",.02)
+510 ;;00054-0108-29
+511 ;;9002226.02101,"1729,00054-0109-25 ",.01)
+512 ;;00054-0109-25
+513 ;;9002226.02101,"1729,00054-0109-25 ",.02)
+514 ;;00054-0109-25
+515 ;;9002226.02101,"1729,00054-0109-29 ",.01)
+516 ;;00054-0109-29
+517 ;;9002226.02101,"1729,00054-0109-29 ",.02)
+518 ;;00054-0109-29
+519 ;;9002226.02101,"1729,00054-0110-25 ",.01)
+520 ;;00054-0110-25
+521 ;;9002226.02101,"1729,00054-0110-25 ",.02)
+522 ;;00054-0110-25
+523 ;;9002226.02101,"1729,00054-0111-25 ",.01)
+524 ;;00054-0111-25
+525 ;;9002226.02101,"1729,00054-0111-25 ",.02)
+526 ;;00054-0111-25
+527 ;;9002226.02101,"1729,00054-0112-25 ",.01)
+528 ;;00054-0112-25
+529 ;;9002226.02101,"1729,00054-0112-25 ",.02)
+530 ;;00054-0112-25
+531 ;;9002226.02101,"1729,00054-0123-22 ",.01)
+532 ;;00054-0123-22
+533 ;;9002226.02101,"1729,00054-0123-22 ",.02)
+534 ;;00054-0123-22
+535 ;;9002226.02101,"1729,00054-0124-22 ",.01)
+536 ;;00054-0124-22
+537 ;;9002226.02101,"1729,00054-0124-22 ",.02)
+538 ;;00054-0124-22
+539 ;;9002226.02101,"1729,00054-0125-22 ",.01)
+540 ;;00054-0125-22
+541 ;;9002226.02101,"1729,00054-0125-22 ",.02)
+542 ;;00054-0125-22
+543 ;;9002226.02101,"1729,00054-0126-22 ",.01)
+544 ;;00054-0126-22
+545 ;;9002226.02101,"1729,00054-0126-22 ",.02)
+546 ;;00054-0126-22
+547 ;;9002226.02101,"1729,00054-0127-22 ",.01)
+548 ;;00054-0127-22
+549 ;;9002226.02101,"1729,00054-0127-22 ",.02)
+550 ;;00054-0127-22
+551 ;;9002226.02101,"1729,00054-0250-13 ",.01)
+552 ;;00054-0250-13
+553 ;;9002226.02101,"1729,00054-0250-13 ",.02)
+554 ;;00054-0250-13
+555 ;;9002226.02101,"1729,00054-0250-22 ",.01)
+556 ;;00054-0250-22
+557 ;;9002226.02101,"1729,00054-0250-22 ",.02)
+558 ;;00054-0250-22
+559 ;;9002226.02101,"1729,00054-0251-13 ",.01)
+560 ;;00054-0251-13
+561 ;;9002226.02101,"1729,00054-0251-13 ",.02)
+562 ;;00054-0251-13
+563 ;;9002226.02101,"1729,00054-0251-22 ",.01)
+564 ;;00054-0251-22
+565 ;;9002226.02101,"1729,00054-0251-22 ",.02)
+566 ;;00054-0251-22
+567 ;;9002226.02101,"1729,00054-0252-13 ",.01)
+568 ;;00054-0252-13
+569 ;;9002226.02101,"1729,00054-0252-13 ",.02)
+570 ;;00054-0252-13
+571 ;;9002226.02101,"1729,00054-0252-22 ",.01)
+572 ;;00054-0252-22
+573 ;;9002226.02101,"1729,00054-0252-22 ",.02)
+574 ;;00054-0252-22
+575 ;;9002226.02101,"1729,00054-0254-13 ",.01)
+576 ;;00054-0254-13
+577 ;;9002226.02101,"1729,00054-0254-13 ",.02)
+578 ;;00054-0254-13
+579 ;;9002226.02101,"1729,00054-0254-22 ",.01)
+580 ;;00054-0254-22
+581 ;;9002226.02101,"1729,00054-0254-22 ",.02)
+582 ;;00054-0254-22
