BGP82L4 ; 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,"67544-0566-92 ")
;;1024
;;21,"67544-0566-94 ")
;;1025
;;21,"67544-0613-53 ")
;;1026
;;21,"67544-0653-53 ")
;;1027
;;21,"67544-0653-60 ")
;;1028
;;21,"67544-0653-70 ")
;;1029
;;21,"67544-0653-80 ")
;;1030
;;21,"67544-0653-90 ")
;;1031
;;21,"67544-0653-92 ")
;;1032
;;21,"67544-0653-94 ")
;;1033
;;21,"67544-0653-98 ")
;;1034
;;21,"67544-0661-41 ")
;;1035
;;21,"67544-0661-81 ")
;;1036
;;21,"67544-0875-60 ")
;;1037
;;21,"67544-0875-80 ")
;;1038
;;21,"68001-0177-00 ")
;;1039
;;21,"68001-0177-03 ")
;;1040
;;21,"68001-0178-00 ")
;;1041
;;21,"68001-0178-03 ")
;;1042
;;21,"68001-0179-00 ")
;;1043
;;21,"68001-0179-03 ")
;;1044
;;21,"68071-0008-30 ")
;;1045
;;21,"68071-0028-30 ")
;;1046
;;21,"68071-0028-60 ")
;;1047
;;21,"68071-0388-30 ")
;;1048
;;21,"68071-0823-30 ")
;;1049
;;21,"68084-0111-01 ")
;;1050
;;21,"68084-0111-11 ")
;;1051
;;21,"68084-0112-01 ")
;;1052
;;21,"68084-0112-11 ")
;;1053
;;21,"68084-0136-01 ")
;;1054
;;21,"68084-0136-11 ")
;;1055
;;21,"68084-0137-01 ")
;;1056
;;21,"68084-0137-11 ")
;;1057
;;21,"68084-0138-01 ")
;;1058
;;21,"68084-0138-11 ")
;;1059
;;21,"68084-0295-11 ")
;;1060
;;21,"68084-0295-21 ")
;;1061
;;21,"68084-0326-01 ")
;;1062
;;21,"68084-0326-11 ")
;;1063
;;21,"68084-0327-01 ")
;;1064
;;21,"68084-0327-11 ")
;;1065
;;21,"68084-0745-25 ")
;;1066
;;21,"68084-0745-95 ")
;;1067
;;21,"68084-0788-11 ")
;;1068
;;21,"68084-0788-21 ")
;;1069
;;21,"68084-0788-25 ")
;;1070
;;21,"68084-0788-95 ")
;;1071
;;21,"68084-0807-01 ")
;;1072
;;21,"68084-0807-11 ")
;;1073
;;21,"68382-0184-01 ")
;;1074
;;21,"68382-0185-01 ")
;;1075
;;21,"68382-0186-01 ")
;;1076
;;21,"68382-0653-01 ")
;;1077
;;21,"68382-0653-05 ")
;;1078
;;21,"68382-0654-01 ")
;;1079
;;21,"68382-0654-05 ")
;;1080
;;21,"68382-0655-01 ")
;;1081
;;21,"68382-0655-05 ")
;;1082
;;21,"68382-0656-01 ")
;;1083
;;21,"68382-0657-01 ")
;;1084
;;21,"68382-0657-05 ")
;;1085
;;21,"68382-0658-01 ")
;;1086
;;21,"68382-0658-10 ")
;;1087
;;21,"68645-0150-54 ")
;;1088
;;21,"68645-0151-59 ")
;;1089
;;21,"68645-0210-54 ")
;;1090
;;21,"68645-0211-54 ")
;;1091
;;21,"68788-0141-03 ")
;;1092
;;21,"68788-6411-01 ")
;;1093
;;21,"68788-6411-03 ")
;;1094
;;21,"68788-6411-06 ")
;;1095
;;21,"68788-6411-09 ")
;;1096
;;21,"68788-6426-03 ")
;;1097
;;21,"68788-6426-06 ")
;;1098
;;21,"68788-6426-09 ")
;;1099
;;21,"68788-6428-01 ")
;;1100
;;21,"68788-6436-01 ")
;;1101
;;21,"68788-6436-03 ")
;;1102
;;21,"68788-6436-06 ")
;;1103
;;21,"68788-6436-09 ")
;;1104
;;21,"68788-6801-01 ")
;;1105
;;21,"68788-6801-03 ")
;;1106
;;21,"68788-6801-06 ")
;;1107
;;21,"68788-6801-09 ")
;;1108
;;21,"68788-6818-01 ")
;;1109
;;21,"68788-6818-03 ")
;;1110
;;21,"68788-6818-06 ")
;;1111
;;21,"68788-6818-08 ")
;;1112
;;21,"68788-6818-09 ")
;;1113
;;21,"68788-9128-03 ")
;;1114
;;21,"68788-9128-06 ")
;;1115
;;21,"68788-9128-09 ")
;;1116
;;21,"68788-9216-01 ")
;;1117
;;21,"68788-9216-03 ")
;;1118
;;21,"68788-9216-06 ")
;;1119
;;21,"68788-9216-09 ")
;;1120
;;21,"68788-9716-03 ")
;;1121
;;21,"68788-9716-06 ")
;;1122
;;21,"68788-9716-09 ")
;;1123
;;21,"68788-9728-03 ")
;;1124
;;21,"68788-9918-03 ")
;;1125
;;21,"69452-0128-20 ")
;;1126
;;21,"69452-0128-30 ")
;;1127
;;21,"69452-0129-20 ")
;;1128
;;21,"69452-0129-30 ")
;;1129
;;21,"69452-0130-20 ")
;;1130
;;21,"69452-0130-30 ")
;;1131
;;21,"69543-0123-10 ")
;;1132
;;21,"69543-0123-50 ")
;;1133
;;21,"69543-0124-10 ")
;;1134
;;21,"69543-0124-50 ")
;;1135
;;21,"69543-0125-10 ")
;;1136
;;21,"69543-0125-50 ")
;;1137
;;21,"76439-0123-10 ")
;;1138
;;21,"76439-0124-10 ")
;;1139
;;21,"76439-0125-10 ")
;;1140
;;9002226,1222,.01)
;;BGP PQA SULFONYLUREA NDC
;;9002226,1222,.02)
;;@
;;9002226,1222,.04)
;;n
;;9002226,1222,.06)
;;@
;;9002226,1222,.08)
;;@
;;9002226,1222,.09)
;;3170809
;;9002226,1222,.11)
;;@
;;9002226,1222,.12)
;;@
;;9002226,1222,.13)
;;1
;;9002226,1222,.14)
;;@
;;9002226,1222,.15)
;;50.67
;;9002226,1222,.16)
;;@
;;9002226,1222,.17)
;;@
;;9002226,1222,.22)
;;1
;;9002226,1222,3101)
;;@
;;9002226.02101,"1222,00009-0341-01 ",.01)
;;00009-0341-01
;;9002226.02101,"1222,00009-0341-01 ",.02)
;;00009-0341-01
;;9002226.02101,"1222,00009-0352-01 ",.01)
;;00009-0352-01
;;9002226.02101,"1222,00009-0352-01 ",.02)
;;00009-0352-01
;;9002226.02101,"1222,00009-0352-04 ",.01)
;;00009-0352-04
;;9002226.02101,"1222,00009-0352-04 ",.02)
;;00009-0352-04
;;9002226.02101,"1222,00009-3449-01 ",.01)
;;00009-3449-01
;;9002226.02101,"1222,00009-3449-01 ",.02)
;;00009-3449-01
;;9002226.02101,"1222,00009-3449-03 ",.01)
;;00009-3449-03
;;9002226.02101,"1222,00009-3449-03 ",.02)
;;00009-3449-03
;;9002226.02101,"1222,00039-0051-10 ",.01)
;;00039-0051-10
;;9002226.02101,"1222,00039-0051-10 ",.02)
;;00039-0051-10
;;9002226.02101,"1222,00039-0052-10 ",.01)
;;00039-0052-10
;;9002226.02101,"1222,00039-0052-10 ",.02)
;;00039-0052-10
;;9002226.02101,"1222,00039-0052-70 ",.01)
;;00039-0052-70
;;9002226.02101,"1222,00039-0052-70 ",.02)
;;00039-0052-70
;;9002226.02101,"1222,00039-0053-05 ",.01)
;;00039-0053-05
;;9002226.02101,"1222,00039-0053-05 ",.02)
;;00039-0053-05
;;9002226.02101,"1222,00039-0221-10 ",.01)
;;00039-0221-10
;;9002226.02101,"1222,00039-0221-10 ",.02)
;;00039-0221-10
;;9002226.02101,"1222,00039-0222-10 ",.01)
;;00039-0222-10
;;9002226.02101,"1222,00039-0222-10 ",.02)
;;00039-0222-10
;;9002226.02101,"1222,00039-0223-10 ",.01)
;;00039-0223-10
;;9002226.02101,"1222,00039-0223-10 ",.02)
;;00039-0223-10
;;9002226.02101,"1222,00049-0170-01 ",.01)
;;00049-0170-01
;;9002226.02101,"1222,00049-0170-01 ",.02)
;;00049-0170-01
;;9002226.02101,"1222,00049-0174-02 ",.01)
;;00049-0174-02
;;9002226.02101,"1222,00049-0174-02 ",.02)
;;00049-0174-02
;;9002226.02101,"1222,00049-0174-03 ",.01)
;;00049-0174-03
;;9002226.02101,"1222,00049-0174-03 ",.02)
;;00049-0174-03
;;9002226.02101,"1222,00049-0178-07 ",.01)
;;00049-0178-07
;;9002226.02101,"1222,00049-0178-07 ",.02)
;;00049-0178-07
;;9002226.02101,"1222,00049-0178-08 ",.01)
;;00049-0178-08
;;9002226.02101,"1222,00049-0178-08 ",.02)
;;00049-0178-08
;;9002226.02101,"1222,00049-1550-66 ",.01)
;;00049-1550-66
;;9002226.02101,"1222,00049-1550-66 ",.02)
;;00049-1550-66
;;9002226.02101,"1222,00049-1550-73 ",.01)
;;00049-1550-73
;;9002226.02101,"1222,00049-1550-73 ",.02)
;;00049-1550-73
;;9002226.02101,"1222,00049-1560-66 ",.01)
;;00049-1560-66
;;9002226.02101,"1222,00049-1560-66 ",.02)
;;00049-1560-66
;;9002226.02101,"1222,00049-1560-73 ",.01)
;;00049-1560-73
;;9002226.02101,"1222,00049-1560-73 ",.02)
;;00049-1560-73
;;9002226.02101,"1222,00049-4110-66 ",.01)
;;00049-4110-66
;;9002226.02101,"1222,00049-4110-66 ",.02)
;;00049-4110-66
;;9002226.02101,"1222,00049-4120-66 ",.01)
;;00049-4120-66
;;9002226.02101,"1222,00049-4120-66 ",.02)
;;00049-4120-66
;;9002226.02101,"1222,00087-6073-11 ",.01)
;;00087-6073-11
;;9002226.02101,"1222,00087-6073-11 ",.02)
;;00087-6073-11
;;9002226.02101,"1222,00087-6074-11 ",.01)
;;00087-6074-11
;;9002226.02101,"1222,00087-6074-11 ",.02)
;;00087-6074-11
;;9002226.02101,"1222,00093-5710-01 ",.01)
;;00093-5710-01
;;9002226.02101,"1222,00093-5710-01 ",.02)
;;00093-5710-01
;;9002226.02101,"1222,00093-5710-05 ",.01)
;;00093-5710-05
;;9002226.02101,"1222,00093-5710-05 ",.02)
;;00093-5710-05
;;9002226.02101,"1222,00093-5711-01 ",.01)
;;00093-5711-01
;;9002226.02101,"1222,00093-5711-01 ",.02)
;;00093-5711-01
;;9002226.02101,"1222,00093-5711-05 ",.01)
;;00093-5711-05
;;9002226.02101,"1222,00093-5711-05 ",.02)
;;00093-5711-05
;;9002226.02101,"1222,00093-5711-19 ",.01)
;;00093-5711-19
;;9002226.02101,"1222,00093-5711-19 ",.02)
;;00093-5711-19
;;9002226.02101,"1222,00093-5712-01 ",.01)
;;00093-5712-01
;;9002226.02101,"1222,00093-5712-01 ",.02)
;;00093-5712-01
;;9002226.02101,"1222,00093-5712-05 ",.01)
;;00093-5712-05
;;9002226.02101,"1222,00093-5712-05 ",.02)
;;00093-5712-05
;;9002226.02101,"1222,00093-5712-19 ",.01)
;;00093-5712-19
;;9002226.02101,"1222,00093-5712-19 ",.02)
;;00093-5712-19
;;9002226.02101,"1222,00093-7254-01 ",.01)
;;00093-7254-01
;;9002226.02101,"1222,00093-7254-01 ",.02)
;;00093-7254-01
;;9002226.02101,"1222,00093-7255-01 ",.01)
;;00093-7255-01
;;9002226.02101,"1222,00093-7255-01 ",.02)
;;00093-7255-01
;;9002226.02101,"1222,00093-7256-01 ",.01)
;;00093-7256-01
;;9002226.02101,"1222,00093-7256-01 ",.02)
;;00093-7256-01
;;9002226.02101,"1222,00093-7256-52 ",.01)
;;00093-7256-52
;;9002226.02101,"1222,00093-7256-52 ",.02)
;;00093-7256-52
;;9002226.02101,"1222,00093-7261-05 ",.01)
;;00093-7261-05
;;9002226.02101,"1222,00093-7261-05 ",.02)
;;00093-7261-05
;;9002226.02101,"1222,00093-7262-05 ",.01)
;;00093-7262-05
;;9002226.02101,"1222,00093-7262-05 ",.02)
;;00093-7262-05
;;9002226.02101,"1222,00093-7455-01 ",.01)
;;00093-7455-01
;;9002226.02101,"1222,00093-7455-01 ",.02)
;;00093-7455-01
;;9002226.02101,"1222,00093-7456-01 ",.01)
;;00093-7456-01
;;9002226.02101,"1222,00093-7456-01 ",.02)
;;00093-7456-01
;;9002226.02101,"1222,00093-7457-01 ",.01)
;;00093-7457-01
;;9002226.02101,"1222,00093-7457-01 ",.02)
;;00093-7457-01
;;9002226.02101,"1222,00093-8034-01 ",.01)
;;00093-8034-01
;;9002226.02101,"1222,00093-8034-01 ",.02)
;;00093-8034-01
;;9002226.02101,"1222,00093-8035-01 ",.01)
;;00093-8035-01
;;9002226.02101,"1222,00093-8035-01 ",.02)
;;00093-8035-01
;;9002226.02101,"1222,00093-8035-05 ",.01)
;;00093-8035-05
;;9002226.02101,"1222,00093-8035-05 ",.02)
;;00093-8035-05
;;9002226.02101,"1222,00093-8036-01 ",.01)
;;00093-8036-01
;;9002226.02101,"1222,00093-8036-01 ",.02)
;;00093-8036-01
;;9002226.02101,"1222,00093-8342-01 ",.01)
;;00093-8342-01
;;9002226.02101,"1222,00093-8342-01 ",.02)
;;00093-8342-01
;;9002226.02101,"1222,00093-8343-01 ",.01)
;;00093-8343-01
;;9002226.02101,"1222,00093-8343-01 ",.02)
;;00093-8343-01
;;9002226.02101,"1222,00093-8343-05 ",.01)
;;00093-8343-05
;;9002226.02101,"1222,00093-8343-05 ",.02)
;;00093-8343-05
;;9002226.02101,"1222,00093-8343-10 ",.01)
;;00093-8343-10
;;9002226.02101,"1222,00093-8343-10 ",.02)
;;00093-8343-10
;;9002226.02101,"1222,00093-8343-98 ",.01)
;;00093-8343-98
;;9002226.02101,"1222,00093-8343-98 ",.02)
;;00093-8343-98
;;9002226.02101,"1222,00093-8344-01 ",.01)
;;00093-8344-01
;;9002226.02101,"1222,00093-8344-01 ",.02)
;;00093-8344-01
;;9002226.02101,"1222,00093-8344-05 ",.01)
;;00093-8344-05
;;9002226.02101,"1222,00093-8344-05 ",.02)
;;00093-8344-05
;;9002226.02101,"1222,00093-8344-10 ",.01)
;;00093-8344-10
;;9002226.02101,"1222,00093-8344-10 ",.02)
;;00093-8344-10
;;9002226.02101,"1222,00093-8344-98 ",.01)
;;00093-8344-98
;;9002226.02101,"1222,00093-8344-98 ",.02)
;;00093-8344-98
;;9002226.02101,"1222,00093-9364-01 ",.01)
;;00093-9364-01
;;9002226.02101,"1222,00093-9364-01 ",.02)
;;00093-9364-01
;;9002226.02101,"1222,00093-9364-05 ",.01)
;;00093-9364-05
;;9002226.02101,"1222,00093-9364-05 ",.02)
;;00093-9364-05
;;9002226.02101,"1222,00093-9364-10 ",.01)
;;00093-9364-10
BGP82L4 ; 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,"67544-0566-92 ")
+2 ;;1024
+3 ;;21,"67544-0566-94 ")
+4 ;;1025
+5 ;;21,"67544-0613-53 ")
+6 ;;1026
+7 ;;21,"67544-0653-53 ")
+8 ;;1027
+9 ;;21,"67544-0653-60 ")
+10 ;;1028
+11 ;;21,"67544-0653-70 ")
+12 ;;1029
+13 ;;21,"67544-0653-80 ")
+14 ;;1030
+15 ;;21,"67544-0653-90 ")
+16 ;;1031
+17 ;;21,"67544-0653-92 ")
+18 ;;1032
+19 ;;21,"67544-0653-94 ")
+20 ;;1033
+21 ;;21,"67544-0653-98 ")
+22 ;;1034
+23 ;;21,"67544-0661-41 ")
+24 ;;1035
+25 ;;21,"67544-0661-81 ")
+26 ;;1036
+27 ;;21,"67544-0875-60 ")
+28 ;;1037
+29 ;;21,"67544-0875-80 ")
+30 ;;1038
+31 ;;21,"68001-0177-00 ")
+32 ;;1039
+33 ;;21,"68001-0177-03 ")
+34 ;;1040
+35 ;;21,"68001-0178-00 ")
+36 ;;1041
+37 ;;21,"68001-0178-03 ")
+38 ;;1042
+39 ;;21,"68001-0179-00 ")
+40 ;;1043
+41 ;;21,"68001-0179-03 ")
+42 ;;1044
+43 ;;21,"68071-0008-30 ")
+44 ;;1045
+45 ;;21,"68071-0028-30 ")
+46 ;;1046
+47 ;;21,"68071-0028-60 ")
+48 ;;1047
+49 ;;21,"68071-0388-30 ")
+50 ;;1048
+51 ;;21,"68071-0823-30 ")
+52 ;;1049
+53 ;;21,"68084-0111-01 ")
+54 ;;1050
+55 ;;21,"68084-0111-11 ")
+56 ;;1051
+57 ;;21,"68084-0112-01 ")
+58 ;;1052
+59 ;;21,"68084-0112-11 ")
+60 ;;1053
+61 ;;21,"68084-0136-01 ")
+62 ;;1054
+63 ;;21,"68084-0136-11 ")
+64 ;;1055
+65 ;;21,"68084-0137-01 ")
+66 ;;1056
+67 ;;21,"68084-0137-11 ")
+68 ;;1057
+69 ;;21,"68084-0138-01 ")
+70 ;;1058
+71 ;;21,"68084-0138-11 ")
+72 ;;1059
+73 ;;21,"68084-0295-11 ")
+74 ;;1060
+75 ;;21,"68084-0295-21 ")
+76 ;;1061
+77 ;;21,"68084-0326-01 ")
+78 ;;1062
+79 ;;21,"68084-0326-11 ")
+80 ;;1063
+81 ;;21,"68084-0327-01 ")
+82 ;;1064
+83 ;;21,"68084-0327-11 ")
+84 ;;1065
+85 ;;21,"68084-0745-25 ")
+86 ;;1066
+87 ;;21,"68084-0745-95 ")
+88 ;;1067
+89 ;;21,"68084-0788-11 ")
+90 ;;1068
+91 ;;21,"68084-0788-21 ")
+92 ;;1069
+93 ;;21,"68084-0788-25 ")
+94 ;;1070
+95 ;;21,"68084-0788-95 ")
+96 ;;1071
+97 ;;21,"68084-0807-01 ")
+98 ;;1072
+99 ;;21,"68084-0807-11 ")
+100 ;;1073
+101 ;;21,"68382-0184-01 ")
+102 ;;1074
+103 ;;21,"68382-0185-01 ")
+104 ;;1075
+105 ;;21,"68382-0186-01 ")
+106 ;;1076
+107 ;;21,"68382-0653-01 ")
+108 ;;1077
+109 ;;21,"68382-0653-05 ")
+110 ;;1078
+111 ;;21,"68382-0654-01 ")
+112 ;;1079
+113 ;;21,"68382-0654-05 ")
+114 ;;1080
+115 ;;21,"68382-0655-01 ")
+116 ;;1081
+117 ;;21,"68382-0655-05 ")
+118 ;;1082
+119 ;;21,"68382-0656-01 ")
+120 ;;1083
+121 ;;21,"68382-0657-01 ")
+122 ;;1084
+123 ;;21,"68382-0657-05 ")
+124 ;;1085
+125 ;;21,"68382-0658-01 ")
+126 ;;1086
+127 ;;21,"68382-0658-10 ")
+128 ;;1087
+129 ;;21,"68645-0150-54 ")
+130 ;;1088
+131 ;;21,"68645-0151-59 ")
+132 ;;1089
+133 ;;21,"68645-0210-54 ")
+134 ;;1090
+135 ;;21,"68645-0211-54 ")
+136 ;;1091
+137 ;;21,"68788-0141-03 ")
+138 ;;1092
+139 ;;21,"68788-6411-01 ")
+140 ;;1093
+141 ;;21,"68788-6411-03 ")
+142 ;;1094
+143 ;;21,"68788-6411-06 ")
+144 ;;1095
+145 ;;21,"68788-6411-09 ")
+146 ;;1096
+147 ;;21,"68788-6426-03 ")
+148 ;;1097
+149 ;;21,"68788-6426-06 ")
+150 ;;1098
+151 ;;21,"68788-6426-09 ")
+152 ;;1099
+153 ;;21,"68788-6428-01 ")
+154 ;;1100
+155 ;;21,"68788-6436-01 ")
+156 ;;1101
+157 ;;21,"68788-6436-03 ")
+158 ;;1102
+159 ;;21,"68788-6436-06 ")
+160 ;;1103
+161 ;;21,"68788-6436-09 ")
+162 ;;1104
+163 ;;21,"68788-6801-01 ")
+164 ;;1105
+165 ;;21,"68788-6801-03 ")
+166 ;;1106
+167 ;;21,"68788-6801-06 ")
+168 ;;1107
+169 ;;21,"68788-6801-09 ")
+170 ;;1108
+171 ;;21,"68788-6818-01 ")
+172 ;;1109
+173 ;;21,"68788-6818-03 ")
+174 ;;1110
+175 ;;21,"68788-6818-06 ")
+176 ;;1111
+177 ;;21,"68788-6818-08 ")
+178 ;;1112
+179 ;;21,"68788-6818-09 ")
+180 ;;1113
+181 ;;21,"68788-9128-03 ")
+182 ;;1114
+183 ;;21,"68788-9128-06 ")
+184 ;;1115
+185 ;;21,"68788-9128-09 ")
+186 ;;1116
+187 ;;21,"68788-9216-01 ")
+188 ;;1117
+189 ;;21,"68788-9216-03 ")
+190 ;;1118
+191 ;;21,"68788-9216-06 ")
+192 ;;1119
+193 ;;21,"68788-9216-09 ")
+194 ;;1120
+195 ;;21,"68788-9716-03 ")
+196 ;;1121
+197 ;;21,"68788-9716-06 ")
+198 ;;1122
+199 ;;21,"68788-9716-09 ")
+200 ;;1123
+201 ;;21,"68788-9728-03 ")
+202 ;;1124
+203 ;;21,"68788-9918-03 ")
+204 ;;1125
+205 ;;21,"69452-0128-20 ")
+206 ;;1126
+207 ;;21,"69452-0128-30 ")
+208 ;;1127
+209 ;;21,"69452-0129-20 ")
+210 ;;1128
+211 ;;21,"69452-0129-30 ")
+212 ;;1129
+213 ;;21,"69452-0130-20 ")
+214 ;;1130
+215 ;;21,"69452-0130-30 ")
+216 ;;1131
+217 ;;21,"69543-0123-10 ")
+218 ;;1132
+219 ;;21,"69543-0123-50 ")
+220 ;;1133
+221 ;;21,"69543-0124-10 ")
+222 ;;1134
+223 ;;21,"69543-0124-50 ")
+224 ;;1135
+225 ;;21,"69543-0125-10 ")
+226 ;;1136
+227 ;;21,"69543-0125-50 ")
+228 ;;1137
+229 ;;21,"76439-0123-10 ")
+230 ;;1138
+231 ;;21,"76439-0124-10 ")
+232 ;;1139
+233 ;;21,"76439-0125-10 ")
+234 ;;1140
+235 ;;9002226,1222,.01)
+236 ;;BGP PQA SULFONYLUREA NDC
+237 ;;9002226,1222,.02)
+238 ;;@
+239 ;;9002226,1222,.04)
+240 ;;n
+241 ;;9002226,1222,.06)
+242 ;;@
+243 ;;9002226,1222,.08)
+244 ;;@
+245 ;;9002226,1222,.09)
+246 ;;3170809
+247 ;;9002226,1222,.11)
+248 ;;@
+249 ;;9002226,1222,.12)
+250 ;;@
+251 ;;9002226,1222,.13)
+252 ;;1
+253 ;;9002226,1222,.14)
+254 ;;@
+255 ;;9002226,1222,.15)
+256 ;;50.67
+257 ;;9002226,1222,.16)
+258 ;;@
+259 ;;9002226,1222,.17)
+260 ;;@
+261 ;;9002226,1222,.22)
+262 ;;1
+263 ;;9002226,1222,3101)
+264 ;;@
+265 ;;9002226.02101,"1222,00009-0341-01 ",.01)
+266 ;;00009-0341-01
+267 ;;9002226.02101,"1222,00009-0341-01 ",.02)
+268 ;;00009-0341-01
+269 ;;9002226.02101,"1222,00009-0352-01 ",.01)
+270 ;;00009-0352-01
+271 ;;9002226.02101,"1222,00009-0352-01 ",.02)
+272 ;;00009-0352-01
+273 ;;9002226.02101,"1222,00009-0352-04 ",.01)
+274 ;;00009-0352-04
+275 ;;9002226.02101,"1222,00009-0352-04 ",.02)
+276 ;;00009-0352-04
+277 ;;9002226.02101,"1222,00009-3449-01 ",.01)
+278 ;;00009-3449-01
+279 ;;9002226.02101,"1222,00009-3449-01 ",.02)
+280 ;;00009-3449-01
+281 ;;9002226.02101,"1222,00009-3449-03 ",.01)
+282 ;;00009-3449-03
+283 ;;9002226.02101,"1222,00009-3449-03 ",.02)
+284 ;;00009-3449-03
+285 ;;9002226.02101,"1222,00039-0051-10 ",.01)
+286 ;;00039-0051-10
+287 ;;9002226.02101,"1222,00039-0051-10 ",.02)
+288 ;;00039-0051-10
+289 ;;9002226.02101,"1222,00039-0052-10 ",.01)
+290 ;;00039-0052-10
+291 ;;9002226.02101,"1222,00039-0052-10 ",.02)
+292 ;;00039-0052-10
+293 ;;9002226.02101,"1222,00039-0052-70 ",.01)
+294 ;;00039-0052-70
+295 ;;9002226.02101,"1222,00039-0052-70 ",.02)
+296 ;;00039-0052-70
+297 ;;9002226.02101,"1222,00039-0053-05 ",.01)
+298 ;;00039-0053-05
+299 ;;9002226.02101,"1222,00039-0053-05 ",.02)
+300 ;;00039-0053-05
+301 ;;9002226.02101,"1222,00039-0221-10 ",.01)
+302 ;;00039-0221-10
+303 ;;9002226.02101,"1222,00039-0221-10 ",.02)
+304 ;;00039-0221-10
+305 ;;9002226.02101,"1222,00039-0222-10 ",.01)
+306 ;;00039-0222-10
+307 ;;9002226.02101,"1222,00039-0222-10 ",.02)
+308 ;;00039-0222-10
+309 ;;9002226.02101,"1222,00039-0223-10 ",.01)
+310 ;;00039-0223-10
+311 ;;9002226.02101,"1222,00039-0223-10 ",.02)
+312 ;;00039-0223-10
+313 ;;9002226.02101,"1222,00049-0170-01 ",.01)
+314 ;;00049-0170-01
+315 ;;9002226.02101,"1222,00049-0170-01 ",.02)
+316 ;;00049-0170-01
+317 ;;9002226.02101,"1222,00049-0174-02 ",.01)
+318 ;;00049-0174-02
+319 ;;9002226.02101,"1222,00049-0174-02 ",.02)
+320 ;;00049-0174-02
+321 ;;9002226.02101,"1222,00049-0174-03 ",.01)
+322 ;;00049-0174-03
+323 ;;9002226.02101,"1222,00049-0174-03 ",.02)
+324 ;;00049-0174-03
+325 ;;9002226.02101,"1222,00049-0178-07 ",.01)
+326 ;;00049-0178-07
+327 ;;9002226.02101,"1222,00049-0178-07 ",.02)
+328 ;;00049-0178-07
+329 ;;9002226.02101,"1222,00049-0178-08 ",.01)
+330 ;;00049-0178-08
+331 ;;9002226.02101,"1222,00049-0178-08 ",.02)
+332 ;;00049-0178-08
+333 ;;9002226.02101,"1222,00049-1550-66 ",.01)
+334 ;;00049-1550-66
+335 ;;9002226.02101,"1222,00049-1550-66 ",.02)
+336 ;;00049-1550-66
+337 ;;9002226.02101,"1222,00049-1550-73 ",.01)
+338 ;;00049-1550-73
+339 ;;9002226.02101,"1222,00049-1550-73 ",.02)
+340 ;;00049-1550-73
+341 ;;9002226.02101,"1222,00049-1560-66 ",.01)
+342 ;;00049-1560-66
+343 ;;9002226.02101,"1222,00049-1560-66 ",.02)
+344 ;;00049-1560-66
+345 ;;9002226.02101,"1222,00049-1560-73 ",.01)
+346 ;;00049-1560-73
+347 ;;9002226.02101,"1222,00049-1560-73 ",.02)
+348 ;;00049-1560-73
+349 ;;9002226.02101,"1222,00049-4110-66 ",.01)
+350 ;;00049-4110-66
+351 ;;9002226.02101,"1222,00049-4110-66 ",.02)
+352 ;;00049-4110-66
+353 ;;9002226.02101,"1222,00049-4120-66 ",.01)
+354 ;;00049-4120-66
+355 ;;9002226.02101,"1222,00049-4120-66 ",.02)
+356 ;;00049-4120-66
+357 ;;9002226.02101,"1222,00087-6073-11 ",.01)
+358 ;;00087-6073-11
+359 ;;9002226.02101,"1222,00087-6073-11 ",.02)
+360 ;;00087-6073-11
+361 ;;9002226.02101,"1222,00087-6074-11 ",.01)
+362 ;;00087-6074-11
+363 ;;9002226.02101,"1222,00087-6074-11 ",.02)
+364 ;;00087-6074-11
+365 ;;9002226.02101,"1222,00093-5710-01 ",.01)
+366 ;;00093-5710-01
+367 ;;9002226.02101,"1222,00093-5710-01 ",.02)
+368 ;;00093-5710-01
+369 ;;9002226.02101,"1222,00093-5710-05 ",.01)
+370 ;;00093-5710-05
+371 ;;9002226.02101,"1222,00093-5710-05 ",.02)
+372 ;;00093-5710-05
+373 ;;9002226.02101,"1222,00093-5711-01 ",.01)
+374 ;;00093-5711-01
+375 ;;9002226.02101,"1222,00093-5711-01 ",.02)
+376 ;;00093-5711-01
+377 ;;9002226.02101,"1222,00093-5711-05 ",.01)
+378 ;;00093-5711-05
+379 ;;9002226.02101,"1222,00093-5711-05 ",.02)
+380 ;;00093-5711-05
+381 ;;9002226.02101,"1222,00093-5711-19 ",.01)
+382 ;;00093-5711-19
+383 ;;9002226.02101,"1222,00093-5711-19 ",.02)
+384 ;;00093-5711-19
+385 ;;9002226.02101,"1222,00093-5712-01 ",.01)
+386 ;;00093-5712-01
+387 ;;9002226.02101,"1222,00093-5712-01 ",.02)
+388 ;;00093-5712-01
+389 ;;9002226.02101,"1222,00093-5712-05 ",.01)
+390 ;;00093-5712-05
+391 ;;9002226.02101,"1222,00093-5712-05 ",.02)
+392 ;;00093-5712-05
+393 ;;9002226.02101,"1222,00093-5712-19 ",.01)
+394 ;;00093-5712-19
+395 ;;9002226.02101,"1222,00093-5712-19 ",.02)
+396 ;;00093-5712-19
+397 ;;9002226.02101,"1222,00093-7254-01 ",.01)
+398 ;;00093-7254-01
+399 ;;9002226.02101,"1222,00093-7254-01 ",.02)
+400 ;;00093-7254-01
+401 ;;9002226.02101,"1222,00093-7255-01 ",.01)
+402 ;;00093-7255-01
+403 ;;9002226.02101,"1222,00093-7255-01 ",.02)
+404 ;;00093-7255-01
+405 ;;9002226.02101,"1222,00093-7256-01 ",.01)
+406 ;;00093-7256-01
+407 ;;9002226.02101,"1222,00093-7256-01 ",.02)
+408 ;;00093-7256-01
+409 ;;9002226.02101,"1222,00093-7256-52 ",.01)
+410 ;;00093-7256-52
+411 ;;9002226.02101,"1222,00093-7256-52 ",.02)
+412 ;;00093-7256-52
+413 ;;9002226.02101,"1222,00093-7261-05 ",.01)
+414 ;;00093-7261-05
+415 ;;9002226.02101,"1222,00093-7261-05 ",.02)
+416 ;;00093-7261-05
+417 ;;9002226.02101,"1222,00093-7262-05 ",.01)
+418 ;;00093-7262-05
+419 ;;9002226.02101,"1222,00093-7262-05 ",.02)
+420 ;;00093-7262-05
+421 ;;9002226.02101,"1222,00093-7455-01 ",.01)
+422 ;;00093-7455-01
+423 ;;9002226.02101,"1222,00093-7455-01 ",.02)
+424 ;;00093-7455-01
+425 ;;9002226.02101,"1222,00093-7456-01 ",.01)
+426 ;;00093-7456-01
+427 ;;9002226.02101,"1222,00093-7456-01 ",.02)
+428 ;;00093-7456-01
+429 ;;9002226.02101,"1222,00093-7457-01 ",.01)
+430 ;;00093-7457-01
+431 ;;9002226.02101,"1222,00093-7457-01 ",.02)
+432 ;;00093-7457-01
+433 ;;9002226.02101,"1222,00093-8034-01 ",.01)
+434 ;;00093-8034-01
+435 ;;9002226.02101,"1222,00093-8034-01 ",.02)
+436 ;;00093-8034-01
+437 ;;9002226.02101,"1222,00093-8035-01 ",.01)
+438 ;;00093-8035-01
+439 ;;9002226.02101,"1222,00093-8035-01 ",.02)
+440 ;;00093-8035-01
+441 ;;9002226.02101,"1222,00093-8035-05 ",.01)
+442 ;;00093-8035-05
+443 ;;9002226.02101,"1222,00093-8035-05 ",.02)
+444 ;;00093-8035-05
+445 ;;9002226.02101,"1222,00093-8036-01 ",.01)
+446 ;;00093-8036-01
+447 ;;9002226.02101,"1222,00093-8036-01 ",.02)
+448 ;;00093-8036-01
+449 ;;9002226.02101,"1222,00093-8342-01 ",.01)
+450 ;;00093-8342-01
+451 ;;9002226.02101,"1222,00093-8342-01 ",.02)
+452 ;;00093-8342-01
+453 ;;9002226.02101,"1222,00093-8343-01 ",.01)
+454 ;;00093-8343-01
+455 ;;9002226.02101,"1222,00093-8343-01 ",.02)
+456 ;;00093-8343-01
+457 ;;9002226.02101,"1222,00093-8343-05 ",.01)
+458 ;;00093-8343-05
+459 ;;9002226.02101,"1222,00093-8343-05 ",.02)
+460 ;;00093-8343-05
+461 ;;9002226.02101,"1222,00093-8343-10 ",.01)
+462 ;;00093-8343-10
+463 ;;9002226.02101,"1222,00093-8343-10 ",.02)
+464 ;;00093-8343-10
+465 ;;9002226.02101,"1222,00093-8343-98 ",.01)
+466 ;;00093-8343-98
+467 ;;9002226.02101,"1222,00093-8343-98 ",.02)
+468 ;;00093-8343-98
+469 ;;9002226.02101,"1222,00093-8344-01 ",.01)
+470 ;;00093-8344-01
+471 ;;9002226.02101,"1222,00093-8344-01 ",.02)
+472 ;;00093-8344-01
+473 ;;9002226.02101,"1222,00093-8344-05 ",.01)
+474 ;;00093-8344-05
+475 ;;9002226.02101,"1222,00093-8344-05 ",.02)
+476 ;;00093-8344-05
+477 ;;9002226.02101,"1222,00093-8344-10 ",.01)
+478 ;;00093-8344-10
+479 ;;9002226.02101,"1222,00093-8344-10 ",.02)
+480 ;;00093-8344-10
+481 ;;9002226.02101,"1222,00093-8344-98 ",.01)
+482 ;;00093-8344-98
+483 ;;9002226.02101,"1222,00093-8344-98 ",.02)
+484 ;;00093-8344-98
+485 ;;9002226.02101,"1222,00093-9364-01 ",.01)
+486 ;;00093-9364-01
+487 ;;9002226.02101,"1222,00093-9364-01 ",.02)
+488 ;;00093-9364-01
+489 ;;9002226.02101,"1222,00093-9364-05 ",.01)
+490 ;;00093-9364-05
+491 ;;9002226.02101,"1222,00093-9364-05 ",.02)
+492 ;;00093-9364-05
+493 ;;9002226.02101,"1222,00093-9364-10 ",.01)
+494 ;;00093-9364-10