BGP72G4 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 11, 2016 ;
;;17.1;IHS CLINICAL REPORTING;;MAY 10, 2017;Build 29
;
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,"64253-0222-25 ")
;;1024
;;21,"64253-0222-30 ")
;;1025
;;21,"64253-0222-33 ")
;;1026
;;21,"64253-0222-35 ")
;;1027
;;21,"64253-0222-52 ")
;;1028
;;21,"64253-0333-21 ")
;;1029
;;21,"64253-0333-22 ")
;;1030
;;21,"64253-0333-23 ")
;;1031
;;21,"64253-0333-25 ")
;;1032
;;21,"64253-0333-30 ")
;;1033
;;21,"64253-0333-33 ")
;;1034
;;21,"64253-0333-35 ")
;;1035
;;21,"64253-0333-52 ")
;;1036
;;21,"64253-0444-21 ")
;;1037
;;21,"64253-0444-22 ")
;;1038
;;21,"64253-0444-23 ")
;;1039
;;21,"64253-0444-25 ")
;;1040
;;21,"64253-0444-30 ")
;;1041
;;21,"64253-0444-33 ")
;;1042
;;21,"64253-0444-35 ")
;;1043
;;21,"64253-0444-52 ")
;;1044
;;21,"65162-0761-10 ")
;;1045
;;21,"65162-0761-11 ")
;;1046
;;21,"65162-0762-10 ")
;;1047
;;21,"65162-0762-11 ")
;;1048
;;21,"65162-0763-10 ")
;;1049
;;21,"65162-0763-11 ")
;;1050
;;21,"65162-0764-10 ")
;;1051
;;21,"65162-0764-11 ")
;;1052
;;21,"65162-0765-10 ")
;;1053
;;21,"65162-0765-11 ")
;;1054
;;21,"65162-0766-10 ")
;;1055
;;21,"65162-0766-11 ")
;;1056
;;21,"65162-0767-10 ")
;;1057
;;21,"65162-0767-11 ")
;;1058
;;21,"65162-0768-10 ")
;;1059
;;21,"65162-0768-11 ")
;;1060
;;21,"65162-0769-10 ")
;;1061
;;21,"65162-0769-11 ")
;;1062
;;21,"65243-0274-03 ")
;;1063
;;21,"66105-0110-10 ")
;;1064
;;21,"66105-0176-10 ")
;;1065
;;21,"66105-0518-10 ")
;;1066
;;21,"66105-0519-10 ")
;;1067
;;21,"66105-0521-10 ")
;;1068
;;21,"66105-0523-10 ")
;;1069
;;21,"66116-0469-30 ")
;;1070
;;21,"66116-0470-30 ")
;;1071
;;21,"66267-0268-30 ")
;;1072
;;21,"66267-0285-30 ")
;;1073
;;21,"66267-0628-00 ")
;;1074
;;21,"66267-0629-00 ")
;;1075
;;21,"66267-0630-00 ")
;;1076
;;21,"66267-0631-00 ")
;;1077
;;21,"66267-0632-00 ")
;;1078
;;21,"66267-0633-00 ")
;;1079
;;21,"66267-0634-00 ")
;;1080
;;21,"66267-0635-00 ")
;;1081
;;21,"66267-0636-00 ")
;;1082
;;21,"67457-0582-00 ")
;;1083
;;21,"67457-0582-10 ")
;;1084
;;21,"67457-0583-00 ")
;;1085
;;21,"67457-0583-04 ")
;;1086
;;21,"67457-0584-00 ")
;;1087
;;21,"67457-0584-06 ")
;;1088
;;21,"67457-0585-00 ")
;;1089
;;21,"67457-0585-08 ")
;;1090
;;21,"67457-0592-00 ")
;;1091
;;21,"67457-0592-10 ")
;;1092
;;21,"67457-0593-00 ")
;;1093
;;21,"67457-0593-04 ")
;;1094
;;21,"67457-0594-00 ")
;;1095
;;21,"67457-0594-06 ")
;;1096
;;21,"67457-0595-00 ")
;;1097
;;21,"67457-0595-08 ")
;;1098
;;21,"67457-0693-00 ")
;;1099
;;21,"67457-0693-10 ")
;;1100
;;21,"67457-0694-00 ")
;;1101
;;21,"67457-0694-10 ")
;;1102
;;21,"67457-0695-00 ")
;;1103
;;21,"67457-0695-10 ")
;;1104
;;21,"67457-0696-00 ")
;;1105
;;21,"67457-0696-10 ")
;;1106
;;21,"67544-0052-15 ")
;;1107
;;21,"67544-0052-20 ")
;;1108
;;21,"67544-0052-25 ")
;;1109
;;21,"67544-0052-28 ")
;;1110
;;21,"67544-0052-30 ")
;;1111
;;21,"67544-0052-35 ")
;;1112
;;21,"67544-0052-38 ")
;;1113
;;21,"67544-0052-40 ")
;;1114
;;21,"67544-0052-45 ")
;;1115
;;21,"67544-0052-50 ")
;;1116
;;21,"67544-0052-53 ")
;;1117
;;21,"67544-0052-55 ")
;;1118
;;21,"67544-0052-57 ")
;;1119
;;21,"67544-0052-60 ")
;;1120
;;21,"67544-0052-61 ")
;;1121
;;21,"67544-0052-65 ")
;;1122
;;21,"67544-0052-68 ")
;;1123
;;21,"67544-0052-70 ")
;;1124
;;21,"67544-0052-78 ")
;;1125
;;21,"67544-0070-30 ")
;;1126
;;21,"67544-0194-30 ")
;;1127
;;21,"67544-0194-60 ")
;;1128
;;21,"67544-0195-30 ")
;;1129
;;21,"67544-0195-40 ")
;;1130
;;21,"67544-0195-45 ")
;;1131
;;21,"67544-0195-53 ")
;;1132
;;21,"67544-0195-60 ")
;;1133
;;21,"67544-0318-15 ")
;;1134
;;21,"67544-0318-30 ")
;;1135
;;21,"67544-0318-35 ")
;;1136
;;21,"67544-0318-40 ")
;;1137
;;21,"67544-0318-45 ")
;;1138
;;21,"67544-0318-50 ")
;;1139
;;21,"67544-0318-53 ")
;;1140
;;21,"67544-0318-55 ")
;;1141
;;21,"67544-0318-60 ")
;;1142
;;21,"67544-0318-61 ")
;;1143
;;21,"67544-0318-70 ")
;;1144
;;21,"67544-0401-15 ")
;;1145
;;21,"67544-0401-30 ")
;;1146
;;21,"67544-0401-35 ")
;;1147
;;21,"67544-0401-40 ")
;;1148
;;21,"67544-0401-45 ")
;;1149
;;21,"67544-0401-50 ")
;;1150
;;21,"67544-0401-53 ")
;;1151
;;21,"67544-0401-55 ")
;;1152
;;21,"67544-0401-60 ")
;;1153
;;21,"67544-0401-61 ")
;;1154
;;21,"67544-0401-70 ")
;;1155
;;21,"68084-0027-01 ")
;;1156
;;21,"68084-0027-11 ")
;;1157
;;21,"68084-0027-77 ")
;;1158
;;21,"68382-0052-01 ")
;;1159
;;21,"68382-0052-10 ")
;;1160
;;21,"68382-0053-01 ")
;;1161
;;21,"68382-0053-10 ")
;;1162
;;21,"68382-0054-01 ")
;;1163
;;21,"68382-0054-10 ")
;;1164
;;21,"68382-0055-01 ")
;;1165
;;21,"68382-0055-10 ")
;;1166
;;21,"68382-0056-01 ")
;;1167
;;21,"68382-0056-10 ")
;;1168
;;21,"68382-0056-16 ")
;;1169
;;21,"68382-0057-01 ")
;;1170
;;21,"68382-0058-01 ")
;;1171
;;21,"68382-0059-01 ")
;;1172
;;21,"68382-0064-01 ")
;;1173
;;21,"68382-0064-10 ")
;;1174
;;21,"68883-0010-05 ")
;;1175
;;21,"68883-0100-03 ")
;;1176
;;21,"68883-0100-05 ")
;;1177
;;21,"76282-0327-01 ")
;;1178
;;21,"76282-0327-10 ")
;;1179
;;21,"76282-0328-01 ")
;;1180
;;21,"76282-0328-10 ")
;;1181
;;21,"76282-0329-01 ")
;;1182
;;21,"76282-0329-10 ")
;;1183
;;21,"76282-0330-01 ")
;;1184
;;21,"76282-0330-10 ")
;;1185
;;21,"76282-0331-01 ")
;;1186
;;21,"76282-0331-10 ")
;;1187
;;21,"76282-0332-01 ")
;;1188
;;21,"76282-0332-10 ")
;;1189
;;21,"76282-0333-01 ")
;;1190
;;21,"76282-0333-10 ")
;;1191
;;21,"76282-0334-01 ")
;;1192
;;21,"76282-0335-01 ")
;;1193
;;9002226,1905,.01)
;;BGP PQA WARFARIN NDC
;;9002226,1905,.02)
;;@
;;9002226,1905,.04)
;;n
;;9002226,1905,.06)
;;@
;;9002226,1905,.08)
;;@
;;9002226,1905,.09)
;;3160811
;;9002226,1905,.11)
;;@
;;9002226,1905,.12)
;;@
;;9002226,1905,.13)
;;1
;;9002226,1905,.14)
;;@
;;9002226,1905,.15)
;;50.67
;;9002226,1905,.16)
;;@
;;9002226,1905,.17)
;;@
;;9002226,1905,.22)
;;1
;;9002226,1905,3101)
;;@
;;9002226.02101,"1905,00007-3230-01 ",.01)
;;00007-3230-01
;;9002226.02101,"1905,00007-3230-01 ",.02)
;;00007-3230-01
;;9002226.02101,"1905,00007-3230-11 ",.01)
;;00007-3230-11
;;9002226.02101,"1905,00007-3230-11 ",.02)
;;00007-3230-11
;;9002226.02101,"1905,00007-3232-01 ",.01)
;;00007-3232-01
;;9002226.02101,"1905,00007-3232-01 ",.02)
;;00007-3232-01
;;9002226.02101,"1905,00007-3232-02 ",.01)
;;00007-3232-02
;;9002226.02101,"1905,00007-3232-02 ",.02)
;;00007-3232-02
;;9002226.02101,"1905,00007-3232-11 ",.01)
;;00007-3232-11
;;9002226.02101,"1905,00007-3232-11 ",.02)
;;00007-3232-11
;;9002226.02101,"1905,00007-3234-01 ",.01)
;;00007-3234-01
;;9002226.02101,"1905,00007-3234-01 ",.02)
;;00007-3234-01
;;9002226.02101,"1905,00007-3234-02 ",.01)
;;00007-3234-02
;;9002226.02101,"1905,00007-3234-02 ",.02)
;;00007-3234-02
;;9002226.02101,"1905,00007-3234-11 ",.01)
;;00007-3234-11
;;9002226.02101,"1905,00007-3234-11 ",.02)
;;00007-3234-11
;;9002226.02101,"1905,00007-3236-01 ",.01)
;;00007-3236-01
;;9002226.02101,"1905,00007-3236-01 ",.02)
;;00007-3236-01
;;9002226.02101,"1905,00007-3236-11 ",.01)
;;00007-3236-11
;;9002226.02101,"1905,00007-3236-11 ",.02)
;;00007-3236-11
;;9002226.02101,"1905,00056-0168-01 ",.01)
;;00056-0168-01
;;9002226.02101,"1905,00056-0168-01 ",.02)
;;00056-0168-01
;;9002226.02101,"1905,00056-0168-70 ",.01)
;;00056-0168-70
;;9002226.02101,"1905,00056-0168-70 ",.02)
;;00056-0168-70
;;9002226.02101,"1905,00056-0168-75 ",.01)
;;00056-0168-75
;;9002226.02101,"1905,00056-0168-75 ",.02)
;;00056-0168-75
;;9002226.02101,"1905,00056-0169-01 ",.01)
;;00056-0169-01
;;9002226.02101,"1905,00056-0169-01 ",.02)
;;00056-0169-01
;;9002226.02101,"1905,00056-0169-70 ",.01)
;;00056-0169-70
;;9002226.02101,"1905,00056-0169-70 ",.02)
;;00056-0169-70
;;9002226.02101,"1905,00056-0169-75 ",.01)
;;00056-0169-75
;;9002226.02101,"1905,00056-0169-75 ",.02)
;;00056-0169-75
;;9002226.02101,"1905,00056-0169-90 ",.01)
;;00056-0169-90
;;9002226.02101,"1905,00056-0169-90 ",.02)
;;00056-0169-90
;;9002226.02101,"1905,00056-0170-01 ",.01)
;;00056-0170-01
;;9002226.02101,"1905,00056-0170-01 ",.02)
;;00056-0170-01
;;9002226.02101,"1905,00056-0170-70 ",.01)
;;00056-0170-70
;;9002226.02101,"1905,00056-0170-70 ",.02)
;;00056-0170-70
;;9002226.02101,"1905,00056-0170-75 ",.01)
;;00056-0170-75
;;9002226.02101,"1905,00056-0170-75 ",.02)
;;00056-0170-75
;;9002226.02101,"1905,00056-0170-90 ",.01)
;;00056-0170-90
;;9002226.02101,"1905,00056-0170-90 ",.02)
;;00056-0170-90
;;9002226.02101,"1905,00056-0172-01 ",.01)
;;00056-0172-01
;;9002226.02101,"1905,00056-0172-01 ",.02)
;;00056-0172-01
;;9002226.02101,"1905,00056-0172-70 ",.01)
;;00056-0172-70
;;9002226.02101,"1905,00056-0172-70 ",.02)
;;00056-0172-70
;;9002226.02101,"1905,00056-0172-75 ",.01)
;;00056-0172-75
;;9002226.02101,"1905,00056-0172-75 ",.02)
;;00056-0172-75
;;9002226.02101,"1905,00056-0172-90 ",.01)
;;00056-0172-90
;;9002226.02101,"1905,00056-0172-90 ",.02)
;;00056-0172-90
;;9002226.02101,"1905,00056-0173-01 ",.01)
;;00056-0173-01
;;9002226.02101,"1905,00056-0173-01 ",.02)
;;00056-0173-01
;;9002226.02101,"1905,00056-0173-70 ",.01)
;;00056-0173-70
;;9002226.02101,"1905,00056-0173-70 ",.02)
;;00056-0173-70
;;9002226.02101,"1905,00056-0173-75 ",.01)
;;00056-0173-75
;;9002226.02101,"1905,00056-0173-75 ",.02)
;;00056-0173-75
;;9002226.02101,"1905,00056-0174-01 ",.01)
;;00056-0174-01
;;9002226.02101,"1905,00056-0174-01 ",.02)
;;00056-0174-01
;;9002226.02101,"1905,00056-0174-70 ",.01)
;;00056-0174-70
;;9002226.02101,"1905,00056-0174-70 ",.02)
;;00056-0174-70
;;9002226.02101,"1905,00056-0174-75 ",.01)
;;00056-0174-75
;;9002226.02101,"1905,00056-0174-75 ",.02)
;;00056-0174-75
;;9002226.02101,"1905,00056-0176-01 ",.01)
;;00056-0176-01
;;9002226.02101,"1905,00056-0176-01 ",.02)
;;00056-0176-01
;;9002226.02101,"1905,00056-0176-70 ",.01)
;;00056-0176-70
;;9002226.02101,"1905,00056-0176-70 ",.02)
;;00056-0176-70
;;9002226.02101,"1905,00056-0176-75 ",.01)
;;00056-0176-75
;;9002226.02101,"1905,00056-0176-75 ",.02)
;;00056-0176-75
;;9002226.02101,"1905,00056-0176-90 ",.01)
;;00056-0176-90
;;9002226.02101,"1905,00056-0176-90 ",.02)
;;00056-0176-90
;;9002226.02101,"1905,00056-0188-01 ",.01)
;;00056-0188-01
;;9002226.02101,"1905,00056-0188-01 ",.02)
;;00056-0188-01
;;9002226.02101,"1905,00056-0188-70 ",.01)
;;00056-0188-70
;;9002226.02101,"1905,00056-0188-70 ",.02)
;;00056-0188-70
;;9002226.02101,"1905,00056-0188-75 ",.01)
;;00056-0188-75
;;9002226.02101,"1905,00056-0188-75 ",.02)
;;00056-0188-75
;;9002226.02101,"1905,00056-0189-01 ",.01)
;;00056-0189-01
;;9002226.02101,"1905,00056-0189-01 ",.02)
;;00056-0189-01
;;9002226.02101,"1905,00056-0189-70 ",.01)
;;00056-0189-70
;;9002226.02101,"1905,00056-0189-70 ",.02)
;;00056-0189-70
;;9002226.02101,"1905,00056-0189-75 ",.01)
;;00056-0189-75
;;9002226.02101,"1905,00056-0189-75 ",.02)
;;00056-0189-75
;;9002226.02101,"1905,00056-0189-90 ",.01)
;;00056-0189-90
;;9002226.02101,"1905,00056-0189-90 ",.02)
;;00056-0189-90
;;9002226.02101,"1905,00069-0043-01 ",.01)
;;00069-0043-01
BGP72G4 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 11, 2016 ;
+1 ;;17.1;IHS CLINICAL REPORTING;;MAY 10, 2017;Build 29
+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,"64253-0222-25 ")
+2 ;;1024
+3 ;;21,"64253-0222-30 ")
+4 ;;1025
+5 ;;21,"64253-0222-33 ")
+6 ;;1026
+7 ;;21,"64253-0222-35 ")
+8 ;;1027
+9 ;;21,"64253-0222-52 ")
+10 ;;1028
+11 ;;21,"64253-0333-21 ")
+12 ;;1029
+13 ;;21,"64253-0333-22 ")
+14 ;;1030
+15 ;;21,"64253-0333-23 ")
+16 ;;1031
+17 ;;21,"64253-0333-25 ")
+18 ;;1032
+19 ;;21,"64253-0333-30 ")
+20 ;;1033
+21 ;;21,"64253-0333-33 ")
+22 ;;1034
+23 ;;21,"64253-0333-35 ")
+24 ;;1035
+25 ;;21,"64253-0333-52 ")
+26 ;;1036
+27 ;;21,"64253-0444-21 ")
+28 ;;1037
+29 ;;21,"64253-0444-22 ")
+30 ;;1038
+31 ;;21,"64253-0444-23 ")
+32 ;;1039
+33 ;;21,"64253-0444-25 ")
+34 ;;1040
+35 ;;21,"64253-0444-30 ")
+36 ;;1041
+37 ;;21,"64253-0444-33 ")
+38 ;;1042
+39 ;;21,"64253-0444-35 ")
+40 ;;1043
+41 ;;21,"64253-0444-52 ")
+42 ;;1044
+43 ;;21,"65162-0761-10 ")
+44 ;;1045
+45 ;;21,"65162-0761-11 ")
+46 ;;1046
+47 ;;21,"65162-0762-10 ")
+48 ;;1047
+49 ;;21,"65162-0762-11 ")
+50 ;;1048
+51 ;;21,"65162-0763-10 ")
+52 ;;1049
+53 ;;21,"65162-0763-11 ")
+54 ;;1050
+55 ;;21,"65162-0764-10 ")
+56 ;;1051
+57 ;;21,"65162-0764-11 ")
+58 ;;1052
+59 ;;21,"65162-0765-10 ")
+60 ;;1053
+61 ;;21,"65162-0765-11 ")
+62 ;;1054
+63 ;;21,"65162-0766-10 ")
+64 ;;1055
+65 ;;21,"65162-0766-11 ")
+66 ;;1056
+67 ;;21,"65162-0767-10 ")
+68 ;;1057
+69 ;;21,"65162-0767-11 ")
+70 ;;1058
+71 ;;21,"65162-0768-10 ")
+72 ;;1059
+73 ;;21,"65162-0768-11 ")
+74 ;;1060
+75 ;;21,"65162-0769-10 ")
+76 ;;1061
+77 ;;21,"65162-0769-11 ")
+78 ;;1062
+79 ;;21,"65243-0274-03 ")
+80 ;;1063
+81 ;;21,"66105-0110-10 ")
+82 ;;1064
+83 ;;21,"66105-0176-10 ")
+84 ;;1065
+85 ;;21,"66105-0518-10 ")
+86 ;;1066
+87 ;;21,"66105-0519-10 ")
+88 ;;1067
+89 ;;21,"66105-0521-10 ")
+90 ;;1068
+91 ;;21,"66105-0523-10 ")
+92 ;;1069
+93 ;;21,"66116-0469-30 ")
+94 ;;1070
+95 ;;21,"66116-0470-30 ")
+96 ;;1071
+97 ;;21,"66267-0268-30 ")
+98 ;;1072
+99 ;;21,"66267-0285-30 ")
+100 ;;1073
+101 ;;21,"66267-0628-00 ")
+102 ;;1074
+103 ;;21,"66267-0629-00 ")
+104 ;;1075
+105 ;;21,"66267-0630-00 ")
+106 ;;1076
+107 ;;21,"66267-0631-00 ")
+108 ;;1077
+109 ;;21,"66267-0632-00 ")
+110 ;;1078
+111 ;;21,"66267-0633-00 ")
+112 ;;1079
+113 ;;21,"66267-0634-00 ")
+114 ;;1080
+115 ;;21,"66267-0635-00 ")
+116 ;;1081
+117 ;;21,"66267-0636-00 ")
+118 ;;1082
+119 ;;21,"67457-0582-00 ")
+120 ;;1083
+121 ;;21,"67457-0582-10 ")
+122 ;;1084
+123 ;;21,"67457-0583-00 ")
+124 ;;1085
+125 ;;21,"67457-0583-04 ")
+126 ;;1086
+127 ;;21,"67457-0584-00 ")
+128 ;;1087
+129 ;;21,"67457-0584-06 ")
+130 ;;1088
+131 ;;21,"67457-0585-00 ")
+132 ;;1089
+133 ;;21,"67457-0585-08 ")
+134 ;;1090
+135 ;;21,"67457-0592-00 ")
+136 ;;1091
+137 ;;21,"67457-0592-10 ")
+138 ;;1092
+139 ;;21,"67457-0593-00 ")
+140 ;;1093
+141 ;;21,"67457-0593-04 ")
+142 ;;1094
+143 ;;21,"67457-0594-00 ")
+144 ;;1095
+145 ;;21,"67457-0594-06 ")
+146 ;;1096
+147 ;;21,"67457-0595-00 ")
+148 ;;1097
+149 ;;21,"67457-0595-08 ")
+150 ;;1098
+151 ;;21,"67457-0693-00 ")
+152 ;;1099
+153 ;;21,"67457-0693-10 ")
+154 ;;1100
+155 ;;21,"67457-0694-00 ")
+156 ;;1101
+157 ;;21,"67457-0694-10 ")
+158 ;;1102
+159 ;;21,"67457-0695-00 ")
+160 ;;1103
+161 ;;21,"67457-0695-10 ")
+162 ;;1104
+163 ;;21,"67457-0696-00 ")
+164 ;;1105
+165 ;;21,"67457-0696-10 ")
+166 ;;1106
+167 ;;21,"67544-0052-15 ")
+168 ;;1107
+169 ;;21,"67544-0052-20 ")
+170 ;;1108
+171 ;;21,"67544-0052-25 ")
+172 ;;1109
+173 ;;21,"67544-0052-28 ")
+174 ;;1110
+175 ;;21,"67544-0052-30 ")
+176 ;;1111
+177 ;;21,"67544-0052-35 ")
+178 ;;1112
+179 ;;21,"67544-0052-38 ")
+180 ;;1113
+181 ;;21,"67544-0052-40 ")
+182 ;;1114
+183 ;;21,"67544-0052-45 ")
+184 ;;1115
+185 ;;21,"67544-0052-50 ")
+186 ;;1116
+187 ;;21,"67544-0052-53 ")
+188 ;;1117
+189 ;;21,"67544-0052-55 ")
+190 ;;1118
+191 ;;21,"67544-0052-57 ")
+192 ;;1119
+193 ;;21,"67544-0052-60 ")
+194 ;;1120
+195 ;;21,"67544-0052-61 ")
+196 ;;1121
+197 ;;21,"67544-0052-65 ")
+198 ;;1122
+199 ;;21,"67544-0052-68 ")
+200 ;;1123
+201 ;;21,"67544-0052-70 ")
+202 ;;1124
+203 ;;21,"67544-0052-78 ")
+204 ;;1125
+205 ;;21,"67544-0070-30 ")
+206 ;;1126
+207 ;;21,"67544-0194-30 ")
+208 ;;1127
+209 ;;21,"67544-0194-60 ")
+210 ;;1128
+211 ;;21,"67544-0195-30 ")
+212 ;;1129
+213 ;;21,"67544-0195-40 ")
+214 ;;1130
+215 ;;21,"67544-0195-45 ")
+216 ;;1131
+217 ;;21,"67544-0195-53 ")
+218 ;;1132
+219 ;;21,"67544-0195-60 ")
+220 ;;1133
+221 ;;21,"67544-0318-15 ")
+222 ;;1134
+223 ;;21,"67544-0318-30 ")
+224 ;;1135
+225 ;;21,"67544-0318-35 ")
+226 ;;1136
+227 ;;21,"67544-0318-40 ")
+228 ;;1137
+229 ;;21,"67544-0318-45 ")
+230 ;;1138
+231 ;;21,"67544-0318-50 ")
+232 ;;1139
+233 ;;21,"67544-0318-53 ")
+234 ;;1140
+235 ;;21,"67544-0318-55 ")
+236 ;;1141
+237 ;;21,"67544-0318-60 ")
+238 ;;1142
+239 ;;21,"67544-0318-61 ")
+240 ;;1143
+241 ;;21,"67544-0318-70 ")
+242 ;;1144
+243 ;;21,"67544-0401-15 ")
+244 ;;1145
+245 ;;21,"67544-0401-30 ")
+246 ;;1146
+247 ;;21,"67544-0401-35 ")
+248 ;;1147
+249 ;;21,"67544-0401-40 ")
+250 ;;1148
+251 ;;21,"67544-0401-45 ")
+252 ;;1149
+253 ;;21,"67544-0401-50 ")
+254 ;;1150
+255 ;;21,"67544-0401-53 ")
+256 ;;1151
+257 ;;21,"67544-0401-55 ")
+258 ;;1152
+259 ;;21,"67544-0401-60 ")
+260 ;;1153
+261 ;;21,"67544-0401-61 ")
+262 ;;1154
+263 ;;21,"67544-0401-70 ")
+264 ;;1155
+265 ;;21,"68084-0027-01 ")
+266 ;;1156
+267 ;;21,"68084-0027-11 ")
+268 ;;1157
+269 ;;21,"68084-0027-77 ")
+270 ;;1158
+271 ;;21,"68382-0052-01 ")
+272 ;;1159
+273 ;;21,"68382-0052-10 ")
+274 ;;1160
+275 ;;21,"68382-0053-01 ")
+276 ;;1161
+277 ;;21,"68382-0053-10 ")
+278 ;;1162
+279 ;;21,"68382-0054-01 ")
+280 ;;1163
+281 ;;21,"68382-0054-10 ")
+282 ;;1164
+283 ;;21,"68382-0055-01 ")
+284 ;;1165
+285 ;;21,"68382-0055-10 ")
+286 ;;1166
+287 ;;21,"68382-0056-01 ")
+288 ;;1167
+289 ;;21,"68382-0056-10 ")
+290 ;;1168
+291 ;;21,"68382-0056-16 ")
+292 ;;1169
+293 ;;21,"68382-0057-01 ")
+294 ;;1170
+295 ;;21,"68382-0058-01 ")
+296 ;;1171
+297 ;;21,"68382-0059-01 ")
+298 ;;1172
+299 ;;21,"68382-0064-01 ")
+300 ;;1173
+301 ;;21,"68382-0064-10 ")
+302 ;;1174
+303 ;;21,"68883-0010-05 ")
+304 ;;1175
+305 ;;21,"68883-0100-03 ")
+306 ;;1176
+307 ;;21,"68883-0100-05 ")
+308 ;;1177
+309 ;;21,"76282-0327-01 ")
+310 ;;1178
+311 ;;21,"76282-0327-10 ")
+312 ;;1179
+313 ;;21,"76282-0328-01 ")
+314 ;;1180
+315 ;;21,"76282-0328-10 ")
+316 ;;1181
+317 ;;21,"76282-0329-01 ")
+318 ;;1182
+319 ;;21,"76282-0329-10 ")
+320 ;;1183
+321 ;;21,"76282-0330-01 ")
+322 ;;1184
+323 ;;21,"76282-0330-10 ")
+324 ;;1185
+325 ;;21,"76282-0331-01 ")
+326 ;;1186
+327 ;;21,"76282-0331-10 ")
+328 ;;1187
+329 ;;21,"76282-0332-01 ")
+330 ;;1188
+331 ;;21,"76282-0332-10 ")
+332 ;;1189
+333 ;;21,"76282-0333-01 ")
+334 ;;1190
+335 ;;21,"76282-0333-10 ")
+336 ;;1191
+337 ;;21,"76282-0334-01 ")
+338 ;;1192
+339 ;;21,"76282-0335-01 ")
+340 ;;1193
+341 ;;9002226,1905,.01)
+342 ;;BGP PQA WARFARIN NDC
+343 ;;9002226,1905,.02)
+344 ;;@
+345 ;;9002226,1905,.04)
+346 ;;n
+347 ;;9002226,1905,.06)
+348 ;;@
+349 ;;9002226,1905,.08)
+350 ;;@
+351 ;;9002226,1905,.09)
+352 ;;3160811
+353 ;;9002226,1905,.11)
+354 ;;@
+355 ;;9002226,1905,.12)
+356 ;;@
+357 ;;9002226,1905,.13)
+358 ;;1
+359 ;;9002226,1905,.14)
+360 ;;@
+361 ;;9002226,1905,.15)
+362 ;;50.67
+363 ;;9002226,1905,.16)
+364 ;;@
+365 ;;9002226,1905,.17)
+366 ;;@
+367 ;;9002226,1905,.22)
+368 ;;1
+369 ;;9002226,1905,3101)
+370 ;;@
+371 ;;9002226.02101,"1905,00007-3230-01 ",.01)
+372 ;;00007-3230-01
+373 ;;9002226.02101,"1905,00007-3230-01 ",.02)
+374 ;;00007-3230-01
+375 ;;9002226.02101,"1905,00007-3230-11 ",.01)
+376 ;;00007-3230-11
+377 ;;9002226.02101,"1905,00007-3230-11 ",.02)
+378 ;;00007-3230-11
+379 ;;9002226.02101,"1905,00007-3232-01 ",.01)
+380 ;;00007-3232-01
+381 ;;9002226.02101,"1905,00007-3232-01 ",.02)
+382 ;;00007-3232-01
+383 ;;9002226.02101,"1905,00007-3232-02 ",.01)
+384 ;;00007-3232-02
+385 ;;9002226.02101,"1905,00007-3232-02 ",.02)
+386 ;;00007-3232-02
+387 ;;9002226.02101,"1905,00007-3232-11 ",.01)
+388 ;;00007-3232-11
+389 ;;9002226.02101,"1905,00007-3232-11 ",.02)
+390 ;;00007-3232-11
+391 ;;9002226.02101,"1905,00007-3234-01 ",.01)
+392 ;;00007-3234-01
+393 ;;9002226.02101,"1905,00007-3234-01 ",.02)
+394 ;;00007-3234-01
+395 ;;9002226.02101,"1905,00007-3234-02 ",.01)
+396 ;;00007-3234-02
+397 ;;9002226.02101,"1905,00007-3234-02 ",.02)
+398 ;;00007-3234-02
+399 ;;9002226.02101,"1905,00007-3234-11 ",.01)
+400 ;;00007-3234-11
+401 ;;9002226.02101,"1905,00007-3234-11 ",.02)
+402 ;;00007-3234-11
+403 ;;9002226.02101,"1905,00007-3236-01 ",.01)
+404 ;;00007-3236-01
+405 ;;9002226.02101,"1905,00007-3236-01 ",.02)
+406 ;;00007-3236-01
+407 ;;9002226.02101,"1905,00007-3236-11 ",.01)
+408 ;;00007-3236-11
+409 ;;9002226.02101,"1905,00007-3236-11 ",.02)
+410 ;;00007-3236-11
+411 ;;9002226.02101,"1905,00056-0168-01 ",.01)
+412 ;;00056-0168-01
+413 ;;9002226.02101,"1905,00056-0168-01 ",.02)
+414 ;;00056-0168-01
+415 ;;9002226.02101,"1905,00056-0168-70 ",.01)
+416 ;;00056-0168-70
+417 ;;9002226.02101,"1905,00056-0168-70 ",.02)
+418 ;;00056-0168-70
+419 ;;9002226.02101,"1905,00056-0168-75 ",.01)
+420 ;;00056-0168-75
+421 ;;9002226.02101,"1905,00056-0168-75 ",.02)
+422 ;;00056-0168-75
+423 ;;9002226.02101,"1905,00056-0169-01 ",.01)
+424 ;;00056-0169-01
+425 ;;9002226.02101,"1905,00056-0169-01 ",.02)
+426 ;;00056-0169-01
+427 ;;9002226.02101,"1905,00056-0169-70 ",.01)
+428 ;;00056-0169-70
+429 ;;9002226.02101,"1905,00056-0169-70 ",.02)
+430 ;;00056-0169-70
+431 ;;9002226.02101,"1905,00056-0169-75 ",.01)
+432 ;;00056-0169-75
+433 ;;9002226.02101,"1905,00056-0169-75 ",.02)
+434 ;;00056-0169-75
+435 ;;9002226.02101,"1905,00056-0169-90 ",.01)
+436 ;;00056-0169-90
+437 ;;9002226.02101,"1905,00056-0169-90 ",.02)
+438 ;;00056-0169-90
+439 ;;9002226.02101,"1905,00056-0170-01 ",.01)
+440 ;;00056-0170-01
+441 ;;9002226.02101,"1905,00056-0170-01 ",.02)
+442 ;;00056-0170-01
+443 ;;9002226.02101,"1905,00056-0170-70 ",.01)
+444 ;;00056-0170-70
+445 ;;9002226.02101,"1905,00056-0170-70 ",.02)
+446 ;;00056-0170-70
+447 ;;9002226.02101,"1905,00056-0170-75 ",.01)
+448 ;;00056-0170-75
+449 ;;9002226.02101,"1905,00056-0170-75 ",.02)
+450 ;;00056-0170-75
+451 ;;9002226.02101,"1905,00056-0170-90 ",.01)
+452 ;;00056-0170-90
+453 ;;9002226.02101,"1905,00056-0170-90 ",.02)
+454 ;;00056-0170-90
+455 ;;9002226.02101,"1905,00056-0172-01 ",.01)
+456 ;;00056-0172-01
+457 ;;9002226.02101,"1905,00056-0172-01 ",.02)
+458 ;;00056-0172-01
+459 ;;9002226.02101,"1905,00056-0172-70 ",.01)
+460 ;;00056-0172-70
+461 ;;9002226.02101,"1905,00056-0172-70 ",.02)
+462 ;;00056-0172-70
+463 ;;9002226.02101,"1905,00056-0172-75 ",.01)
+464 ;;00056-0172-75
+465 ;;9002226.02101,"1905,00056-0172-75 ",.02)
+466 ;;00056-0172-75
+467 ;;9002226.02101,"1905,00056-0172-90 ",.01)
+468 ;;00056-0172-90
+469 ;;9002226.02101,"1905,00056-0172-90 ",.02)
+470 ;;00056-0172-90
+471 ;;9002226.02101,"1905,00056-0173-01 ",.01)
+472 ;;00056-0173-01
+473 ;;9002226.02101,"1905,00056-0173-01 ",.02)
+474 ;;00056-0173-01
+475 ;;9002226.02101,"1905,00056-0173-70 ",.01)
+476 ;;00056-0173-70
+477 ;;9002226.02101,"1905,00056-0173-70 ",.02)
+478 ;;00056-0173-70
+479 ;;9002226.02101,"1905,00056-0173-75 ",.01)
+480 ;;00056-0173-75
+481 ;;9002226.02101,"1905,00056-0173-75 ",.02)
+482 ;;00056-0173-75
+483 ;;9002226.02101,"1905,00056-0174-01 ",.01)
+484 ;;00056-0174-01
+485 ;;9002226.02101,"1905,00056-0174-01 ",.02)
+486 ;;00056-0174-01
+487 ;;9002226.02101,"1905,00056-0174-70 ",.01)
+488 ;;00056-0174-70
+489 ;;9002226.02101,"1905,00056-0174-70 ",.02)
+490 ;;00056-0174-70
+491 ;;9002226.02101,"1905,00056-0174-75 ",.01)
+492 ;;00056-0174-75
+493 ;;9002226.02101,"1905,00056-0174-75 ",.02)
+494 ;;00056-0174-75
+495 ;;9002226.02101,"1905,00056-0176-01 ",.01)
+496 ;;00056-0176-01
+497 ;;9002226.02101,"1905,00056-0176-01 ",.02)
+498 ;;00056-0176-01
+499 ;;9002226.02101,"1905,00056-0176-70 ",.01)
+500 ;;00056-0176-70
+501 ;;9002226.02101,"1905,00056-0176-70 ",.02)
+502 ;;00056-0176-70
+503 ;;9002226.02101,"1905,00056-0176-75 ",.01)
+504 ;;00056-0176-75
+505 ;;9002226.02101,"1905,00056-0176-75 ",.02)
+506 ;;00056-0176-75
+507 ;;9002226.02101,"1905,00056-0176-90 ",.01)
+508 ;;00056-0176-90
+509 ;;9002226.02101,"1905,00056-0176-90 ",.02)
+510 ;;00056-0176-90
+511 ;;9002226.02101,"1905,00056-0188-01 ",.01)
+512 ;;00056-0188-01
+513 ;;9002226.02101,"1905,00056-0188-01 ",.02)
+514 ;;00056-0188-01
+515 ;;9002226.02101,"1905,00056-0188-70 ",.01)
+516 ;;00056-0188-70
+517 ;;9002226.02101,"1905,00056-0188-70 ",.02)
+518 ;;00056-0188-70
+519 ;;9002226.02101,"1905,00056-0188-75 ",.01)
+520 ;;00056-0188-75
+521 ;;9002226.02101,"1905,00056-0188-75 ",.02)
+522 ;;00056-0188-75
+523 ;;9002226.02101,"1905,00056-0189-01 ",.01)
+524 ;;00056-0189-01
+525 ;;9002226.02101,"1905,00056-0189-01 ",.02)
+526 ;;00056-0189-01
+527 ;;9002226.02101,"1905,00056-0189-70 ",.01)
+528 ;;00056-0189-70
+529 ;;9002226.02101,"1905,00056-0189-70 ",.02)
+530 ;;00056-0189-70
+531 ;;9002226.02101,"1905,00056-0189-75 ",.01)
+532 ;;00056-0189-75
+533 ;;9002226.02101,"1905,00056-0189-75 ",.02)
+534 ;;00056-0189-75
+535 ;;9002226.02101,"1905,00056-0189-90 ",.01)
+536 ;;00056-0189-90
+537 ;;9002226.02101,"1905,00056-0189-90 ",.02)
+538 ;;00056-0189-90
+539 ;;9002226.02101,"1905,00069-0043-01 ",.01)
+540 ;;00069-0043-01
