Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: BGP82K

BGP82K.m

Go to the documentation of this file.
  1. BGP82K ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 09, 2017 ;
  1. ;;18.0;IHS CLINICAL REPORTING;;NOV 21, 2017;Build 51
  1. ;;BGP PQA BIGUANIDE NDC
  1. ;
  1. ; This routine loads Taxonomy BGP PQA BIGUANIDE NDC
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. D OTHER
  1. I $O(^TMP("ATX",$J,3.6,0)) D BULL^ATXSTX2
  1. I $O(^TMP("ATX",$J,9002226,0)) D TAX^ATXSTX2
  1. D KILL^ATXSTX2
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;21,"00003-4221-11 ")
  1. ;;1
  1. ;;21,"00003-4222-16 ")
  1. ;;2
  1. ;;21,"00003-4223-11 ")
  1. ;;3
  1. ;;21,"00006-0078-61 ")
  1. ;;4
  1. ;;21,"00006-0078-62 ")
  1. ;;5
  1. ;;21,"00006-0078-82 ")
  1. ;;6
  1. ;;21,"00006-0080-61 ")
  1. ;;7
  1. ;;21,"00006-0080-62 ")
  1. ;;8
  1. ;;21,"00006-0080-82 ")
  1. ;;9
  1. ;;21,"00006-0081-31 ")
  1. ;;10
  1. ;;21,"00006-0081-54 ")
  1. ;;11
  1. ;;21,"00006-0081-82 ")
  1. ;;12
  1. ;;21,"00006-0575-52 ")
  1. ;;13
  1. ;;21,"00006-0575-61 ")
  1. ;;14
  1. ;;21,"00006-0575-62 ")
  1. ;;15
  1. ;;21,"00006-0575-82 ")
  1. ;;16
  1. ;;21,"00006-0577-52 ")
  1. ;;17
  1. ;;21,"00006-0577-61 ")
  1. ;;18
  1. ;;21,"00006-0577-62 ")
  1. ;;19
  1. ;;21,"00006-0577-82 ")
  1. ;;20
  1. ;;21,"00087-6060-05 ")
  1. ;;21
  1. ;;21,"00087-6060-10 ")
  1. ;;22
  1. ;;21,"00087-6063-13 ")
  1. ;;23
  1. ;;21,"00087-6064-13 ")
  1. ;;24
  1. ;;21,"00087-6070-05 ")
  1. ;;25
  1. ;;21,"00087-6071-11 ")
  1. ;;26
  1. ;;21,"00087-6073-11 ")
  1. ;;27
  1. ;;21,"00087-6074-11 ")
  1. ;;28
  1. ;;21,"00093-1048-01 ")
  1. ;;29
  1. ;;21,"00093-1048-10 ")
  1. ;;30
  1. ;;21,"00093-1048-98 ")
  1. ;;31
  1. ;;21,"00093-1049-01 ")
  1. ;;32
  1. ;;21,"00093-1049-10 ")
  1. ;;33
  1. ;;21,"00093-1049-98 ")
  1. ;;34
  1. ;;21,"00093-5049-06 ")
  1. ;;35
  1. ;;21,"00093-5049-86 ")
  1. ;;36
  1. ;;21,"00093-5050-06 ")
  1. ;;37
  1. ;;21,"00093-5050-86 ")
  1. ;;38
  1. ;;21,"00093-5710-01 ")
  1. ;;39
  1. ;;21,"00093-5710-05 ")
  1. ;;40
  1. ;;21,"00093-5711-01 ")
  1. ;;41
  1. ;;21,"00093-5711-05 ")
  1. ;;42
  1. ;;21,"00093-5711-19 ")
  1. ;;43
  1. ;;21,"00093-5712-01 ")
  1. ;;44
  1. ;;21,"00093-5712-05 ")
  1. ;;45
  1. ;;21,"00093-5712-19 ")
  1. ;;46
  1. ;;21,"00093-7212-01 ")
  1. ;;47
  1. ;;21,"00093-7214-01 ")
  1. ;;48
  1. ;;21,"00093-7214-10 ")
  1. ;;49
  1. ;;21,"00093-7214-98 ")
  1. ;;50
  1. ;;21,"00093-7261-05 ")
  1. ;;51
  1. ;;21,"00093-7262-05 ")
  1. ;;52
  1. ;;21,"00093-7267-01 ")
  1. ;;53
  1. ;;21,"00093-7267-10 ")
  1. ;;54
  1. ;;21,"00093-7455-01 ")
  1. ;;55
  1. ;;21,"00093-7456-01 ")
  1. ;;56
  1. ;;21,"00093-7457-01 ")
  1. ;;57
  1. ;;21,"00093-7677-06 ")
  1. ;;58
  1. ;;21,"00093-7677-86 ")
  1. ;;59
  1. ;;21,"00093-7678-06 ")
  1. ;;60
  1. ;;21,"00093-7678-86 ")
  1. ;;61
  1. ;;21,"00115-1648-01 ")
  1. ;;62
  1. ;;21,"00115-1649-01 ")
  1. ;;63
  1. ;;21,"00115-1649-02 ")
  1. ;;64
  1. ;;21,"00115-1650-01 ")
  1. ;;65
  1. ;;21,"00115-1650-02 ")
  1. ;;66
  1. ;;21,"00169-0092-01 ")
  1. ;;67
  1. ;;21,"00169-0093-01 ")
  1. ;;68
  1. ;;21,"00173-0837-18 ")
  1. ;;69
  1. ;;21,"00173-0838-18 ")
  1. ;;70
  1. ;;21,"00173-0839-18 ")
  1. ;;71
  1. ;;21,"00173-0840-18 ")
  1. ;;72
  1. ;;21,"00185-4416-01 ")
  1. ;;73
  1. ;;21,"00228-2751-11 ")
  1. ;;74
  1. ;;21,"00228-2751-50 ")
  1. ;;75
  1. ;;21,"00228-2752-11 ")
  1. ;;76
  1. ;;21,"00228-2752-50 ")
  1. ;;77
  1. ;;21,"00228-2753-11 ")
  1. ;;78
  1. ;;21,"00228-2753-50 ")
  1. ;;79
  1. ;;21,"00310-6125-60 ")
  1. ;;80
  1. ;;21,"00310-6135-30 ")
  1. ;;81
  1. ;;21,"00310-6145-30 ")
  1. ;;82
  1. ;;21,"00310-6250-30 ")
  1. ;;83
  1. ;;21,"00310-6260-30 ")
  1. ;;84
  1. ;;21,"00310-6260-60 ")
  1. ;;85
  1. ;;21,"00310-6270-30 ")
  1. ;;86
  1. ;;21,"00310-6280-30 ")
  1. ;;87
  1. ;;21,"00378-1550-91 ")
  1. ;;88
  1. ;;21,"00378-1575-91 ")
  1. ;;89
  1. ;;21,"00378-3131-01 ")
  1. ;;90
  1. ;;21,"00378-3132-01 ")
  1. ;;91
  1. ;;21,"00378-3133-01 ")
  1. ;;92
  1. ;;21,"00378-6001-91 ")
  1. ;;93
  1. ;;21,"00378-6002-91 ")
  1. ;;94
  1. ;;21,"00378-7185-05 ")
  1. ;;95
  1. ;;21,"00378-7186-05 ")
  1. ;;96
  1. ;;21,"00378-7187-05 ")
  1. ;;97
  1. ;;21,"00406-2028-01 ")
  1. ;;98
  1. ;;21,"00406-2028-05 ")
  1. ;;99
  1. ;;21,"00406-2028-10 ")
  1. ;;100
  1. ;;21,"00406-2029-01 ")
  1. ;;101
  1. ;;21,"00406-2029-05 ")
  1. ;;102
  1. ;;21,"00406-2029-10 ")
  1. ;;103
  1. ;;21,"00440-5739-00 ")
  1. ;;104
  1. ;;21,"00440-5739-01 ")
  1. ;;105
  1. ;;21,"00440-5739-05 ")
  1. ;;106
  1. ;;21,"00440-5739-81 ")
  1. ;;107
  1. ;;21,"00440-5739-85 ")
  1. ;;108
  1. ;;21,"00440-5739-90 ")
  1. ;;109
  1. ;;21,"00440-5739-92 ")
  1. ;;110
  1. ;;21,"00440-5745-00 ")
  1. ;;111
  1. ;;21,"00440-5745-01 ")
  1. ;;112
  1. ;;21,"00440-5745-05 ")
  1. ;;113
  1. ;;21,"00440-5745-81 ")
  1. ;;114
  1. ;;21,"00440-5745-85 ")
  1. ;;115
  1. ;;21,"00440-5745-90 ")
  1. ;;116
  1. ;;21,"00440-5745-92 ")
  1. ;;117
  1. ;;21,"00440-5746-00 ")
  1. ;;118
  1. ;;21,"00440-5746-01 ")
  1. ;;119
  1. ;;21,"00440-5746-05 ")
  1. ;;120
  1. ;;21,"00440-5746-81 ")
  1. ;;121
  1. ;;21,"00440-5746-85 ")
  1. ;;122
  1. ;;21,"00440-5746-90 ")
  1. ;;123
  1. ;;21,"00440-5746-92 ")
  1. ;;124
  1. ;;21,"00440-6739-00 ")
  1. ;;125
  1. ;;21,"00440-6739-01 ")
  1. ;;126
  1. ;;21,"00440-6739-05 ")
  1. ;;127
  1. ;;21,"00440-6739-81 ")
  1. ;;128
  1. ;;21,"00440-6739-85 ")
  1. ;;129
  1. ;;21,"00440-6739-90 ")
  1. ;;130
  1. ;;21,"00440-6739-92 ")
  1. ;;131
  1. ;;21,"00440-6745-01 ")
  1. ;;132
  1. ;;21,"00440-6745-05 ")
  1. ;;133
  1. ;;21,"00440-6745-81 ")
  1. ;;134
  1. ;;21,"00440-6745-85 ")
  1. ;;135
  1. ;;21,"00440-6745-90 ")
  1. ;;136
  1. ;;21,"00440-6745-92 ")
  1. ;;137
  1. ;;21,"00440-6746-05 ")
  1. ;;138
  1. ;;21,"00440-6746-81 ")
  1. ;;139
  1. ;;21,"00440-6746-85 ")
  1. ;;140
  1. ;;21,"00440-6746-92 ")
  1. ;;141
  1. ;;21,"00440-7585-90 ")
  1. ;;142
  1. ;;21,"00440-7587-90 ")
  1. ;;143
  1. ;;21,"00440-7589-90 ")
  1. ;;144
  1. ;;21,"00440-7589-95 ")
  1. ;;145
  1. ;;21,"00440-7739-14 ")
  1. ;;146
  1. ;;21,"00440-7739-60 ")
  1. ;;147
  1. ;;21,"00440-7739-90 ")
  1. ;;148
  1. ;;21,"00440-7739-92 ")
  1. ;;149
  1. ;;21,"00440-7739-94 ")
  1. ;;150
  1. ;;21,"00440-7739-95 ")
  1. ;;151
  1. ;;21,"00440-7745-90 ")
  1. ;;152
  1. ;;21,"00440-7745-92 ")
  1. ;;153
  1. ;;21,"00440-7746-90 ")
  1. ;;154
  1. ;;21,"00440-7746-92 ")
  1. ;;155
  1. ;;21,"00440-7748-90 ")
  1. ;;156
  1. ;;21,"00440-7748-92 ")
  1. ;;157
  1. ;;21,"00591-2411-01 ")
  1. ;;158
  1. ;;21,"00591-2412-19 ")
  1. ;;159
  1. ;;21,"00591-2719-60 ")
  1. ;;160
  1. ;;21,"00591-2720-60 ")
  1. ;;161
  1. ;;21,"00597-0146-18 ")
  1. ;;162
  1. ;;21,"00597-0146-60 ")
  1. ;;163
  1. ;;21,"00597-0147-18 ")
  1. ;;164
  1. ;;21,"00597-0147-60 ")
  1. ;;165
  1. ;;21,"00597-0148-18 ")
  1. ;;166
  1. ;;21,"00597-0148-60 ")
  1. ;;167
  1. ;;21,"00597-0159-18 ")
  1. ;;168
  1. ;;21,"00597-0159-60 ")
  1. ;;169
  1. ;;21,"00597-0168-18 ")
  1. ;;170
  1. ;;21,"00597-0168-60 ")
  1. ;;171
  1. ;;21,"00597-0175-18 ")
  1. ;;172
  1. ;;21,"00597-0175-60 ")
  1. ;;173
  1. ;;21,"00597-0180-18 ")
  1. ;;174
  1. ;;21,"00597-0180-60 ")
  1. ;;175
  1. ;;21,"00597-0270-73 ")
  1. ;;176
  1. ;;21,"00597-0270-94 ")
  1. ;;177
  1. ;;21,"00597-0275-33 ")
  1. ;;178
  1. ;;21,"00597-0275-81 ")
  1. ;;179
  1. ;;21,"00597-0280-36 ")
  1. ;;180
  1. ;;21,"00597-0280-73 ")
  1. ;;181
  1. ;;21,"00597-0280-90 ")
  1. ;;182
  1. ;;21,"00597-0290-20 ")
  1. ;;183
  1. ;;21,"00597-0290-59 ")
  1. ;;184
  1. ;;21,"00597-0290-74 ")
  1. ;;185
  1. ;;21,"00597-0295-61 ")
  1. ;;186
  1. ;;21,"00597-0295-78 ")
  1. ;;187
  1. ;;21,"00597-0295-88 ")
  1. ;;188
  1. ;;21,"00597-0300-20 ")
  1. ;;189
  1. ;;21,"00597-0300-45 ")
  1. ;;190
  1. ;;21,"00597-0300-93 ")
  1. ;;191
  1. ;;21,"00603-4467-21 ")
  1. ;;192
  1. ;;21,"00603-4467-28 ")
  1. ;;193
  1. ;;21,"00603-4467-32 ")
  1. ;;194
  1. ;;21,"00603-4468-21 ")
  1. ;;195
  1. ;;21,"00603-4468-28 ")
  1. ;;196
  1. ;;21,"00603-4468-32 ")
  1. ;;197
  1. ;;21,"00603-4469-21 ")
  1. ;;198
  1. ;;21,"00603-4469-28 ")
  1. ;;199
  1. ;;21,"00603-4469-32 ")
  1. ;;200
  1. ;;21,"00781-5050-01 ")
  1. ;;201
  1. ;;21,"00781-5050-05 ")
  1. ;;202
  1. ;;21,"00781-5050-10 ")
  1. ;;203
  1. ;;21,"00781-5050-61 ")
  1. ;;204
  1. ;;21,"00781-5051-01 ")
  1. ;;205
  1. ;;21,"00781-5051-05 ")
  1. ;;206
  1. ;;21,"00781-5051-61 ")
  1. ;;207
  1. ;;21,"00781-5052-01 ")
  1. ;;208
  1. ;;21,"00781-5052-05 ")
  1. ;;209
  1. ;;21,"00781-5052-61 ")
  1. ;;210
  1. ;;21,"00781-5503-01 ")
  1. ;;211
  1. ;;21,"00781-5626-60 ")
  1. ;;212
  1. ;;21,"00781-5627-60 ")
  1. ;;213
  1. ;;21,"00904-5794-61 ")
  1. ;;214
  1. ;;21,"00904-5849-14 ")
  1. ;;215
  1. ;;21,"00904-5849-18 ")
  1. ;;216
  1. ;;21,"00904-5849-40 ")
  1. ;;217
  1. ;;21,"00904-5849-52 ")
  1. ;;218
  1. ;;21,"00904-5849-53 ")
  1. ;;219
  1. ;;21,"00904-5849-54 ")
  1. ;;220
  1. ;;21,"00904-5849-80 ")
  1. ;;221
  1. ;;21,"00904-5849-89 ")
  1. ;;222
  1. ;;21,"00904-5849-93 ")
  1. ;;223
  1. ;;21,"00904-5850-40 ")
  1. ;;224
  1. ;;21,"00904-5850-52 ")
  1. ;;225
  1. ;;21,"00904-5850-53 ")
  1. ;;226
  1. ;;21,"00904-5850-89 ")
  1. ;;227
  1. ;;21,"00904-5850-93 ")
  1. ;;228
  1. ;;21,"00904-5851-40 ")
  1. ;;229
  1. ;;21,"00904-5851-52 ")
  1. ;;230
  1. ;;21,"00904-5851-89 ")
  1. ;;231
  1. ;;21,"00904-5851-93 ")
  1. ;;232
  1. ;;21,"00904-6090-61 ")
  1. ;;233
  1. ;;21,"00904-6091-61 ")
  1. ;;234
  1. ;;21,"00904-6092-61 ")
  1. ;;235
  1. ;;21,"00904-6326-61 ")
  1. ;;236
  1. ;;21,"00904-6327-61 ")
  1. ;;237
  1. ;;21,"00904-6328-61 ")
  1. ;;238
  1. ;;21,"00904-6343-14 ")
  1. ;;239
  1. ;;21,"00904-6343-18 ")
  1. ;;240
  1. ;;21,"00904-6343-25 ")
  1. ;;241
  1. ;;21,"00904-6343-40 ")
  1. ;;242
  1. ;;21,"00904-6343-52 ")
  1. ;;243
  1. ;;21,"00904-6343-53 ")
  1. ;;244
  1. ;;21,"00904-6343-54 ")
  1. ;;245
  1. ;;21,"00904-6343-60 ")
  1. ;;246
  1. ;;21,"00904-6343-80 ")
  1. ;;247
  1. ;;21,"00904-6343-89 ")
  1. ;;248
  1. ;;21,"00904-6343-93 ")
  1. ;;249
  1. ;;21,"00904-6344-40 ")
  1. ;;250
  1. ;;21,"00904-6344-52 ")
  1. ;;251
  1. ;;21,"00904-6344-53 ")
  1. ;;252
  1. ;;21,"00904-6344-89 ")
  1. ;;253
  1. ;;21,"00904-6344-93 ")
  1. ;;254
  1. ;;21,"00904-6345-40 ")
  1. ;;255
  1. ;;21,"00904-6345-52 ")
  1. ;;256
  1. ;;21,"00904-6345-89 ")
  1. ;;257
  1. ;;21,"00904-6345-93 ")
  1. ;;258
  1. ;;21,"10135-0617-10 ")
  1. ;;259
  1. ;;21,"10135-0618-05 ")
  1. ;;260
  1. ;;21,"10135-0619-05 ")
  1. ;;261
  1. ;;21,"10544-0058-30 ")
  1. ;;262
  1. ;;21,"10544-0248-02 ")
  1. ;;263
  1. ;;21,"10544-0248-30 ")
  1. ;;264
  1. ;;21,"10544-0248-60 ")
  1. ;;265
  1. ;;21,"10544-0248-90 ")
  1. ;;266
  1. ;;21,"10544-0253-30 ")
  1. ;;267
  1. ;;21,"10544-0254-30 ")
  1. ;;268
  1. ;;21,"10544-0255-30 ")
  1. ;;269
  1. ;;21,"10544-0521-30 ")
  1. ;;270
  1. ;;21,"10544-0579-30 ")
  1. ;;271
  1. ;;21,"10544-0579-90 ")
  1. ;;272
  1. ;;21,"10544-0589-60 ")
  1. ;;273
  1. ;;21,"10544-0630-30 ")
  1. ;;274
  1. ;;21,"10544-0630-90 ")
  1. ;;275
  1. ;;21,"10544-0944-30 ")
  1. ;;276
  1. ;;21,"10544-0944-90 ")
  1. ;;277
  1. ;;21,"10544-0947-90 ")
  1. ;;278
  1. ;;21,"10631-0206-01 ")
  1. ;;279
  1. ;;21,"10631-0206-02 ")
  1. ;;280
  1. ;;21,"10631-0238-01 ")
  1. ;;281
  1. ;;21,"10631-0238-02 ")
  1. ;;282
  1. ;;21,"13668-0280-33 ")
  1. ;;283
  1. ;;21,"13668-0280-60 ")
  1. ;;284
  1. ;;21,"13668-0281-33 ")
  1. ;;285
  1. ;;21,"13668-0281-60 ")
  1. ;;286
  1. ;;21,"13913-0002-13 ")
  1. ;;287
  1. ;;21,"13913-0003-16 ")
  1. ;;288
  1. ;;21,"14565-0202-10 ")
  1. ;;289
  1. ;;21,"14565-0202-50 ")
  1. ;;290
  1. ;;21,"16590-0313-30 ")
  1. ;;291
  1. ;;21,"16590-0313-60 ")
  1. ;;292
  1. ;;21,"16590-0313-72 ")
  1. ;;293
  1. ;;21,"16590-0313-82 ")
  1. ;;294
  1. ;;21,"16590-0313-90 ")
  1. ;;295
  1. ;;21,"16590-0397-30 ")
  1. ;;296
  1. ;;21,"16590-0397-60 ")
  1. ;;297
  1. ;;21,"16590-0397-90 ")
  1. ;;298
  1. ;;21,"20091-0531-01 ")
  1. ;;299
  1. ;;21,"20091-0531-05 ")
  1. ;;300
  1. ;;21,"20091-0531-10 ")
  1. ;;301
  1. ;;21,"20091-0533-01 ")
  1. ;;302
  1. ;;21,"20091-0533-05 ")
  1. ;;303
  1. ;;21,"20091-0533-10 ")
  1. ;;304
  1. ;;21,"20091-0535-01 ")
  1. ;;305
  1. ;;21,"20091-0535-05 ")
  1. ;;306
  1. ;;21,"20091-0535-10 ")
  1. ;;307
  1. ;;21,"21695-0471-00 ")
  1. ;;308
  1. ;;21,"21695-0471-30 ")
  1. ;;309
  1. ;;21,"21695-0471-60 ")
  1. ;;310
  1. ;;21,"21695-0471-78 ")
  1. ;;311
  1. ;;21,"21695-0471-90 ")
  1. ;;312
  1. ;;21,"21695-0472-30 ")
  1. ;;313
  1. ;;21,"21695-0472-60 ")
  1. ;;314
  1. ;;21,"21695-0473-30 ")
  1. ;;315
  1. ;;21,"21695-0473-60 ")
  1. ;;316
  1. ;;21,"21695-0473-78 ")
  1. ;;317
  1. ;;21,"21695-0473-90 ")
  1. ;;318
  1. ;;21,"21695-0568-30 ")
  1. ;;319
  1. ;;21,"21695-0828-30 ")
  1. ;;320
  1. ;;21,"21695-0828-60 ")
  1. ;;321
  1. ;;21,"21695-0828-90 ")
  1. ;;322
  1. ;;21,"21695-0894-00 ")
  1. ;;323
  1. ;;21,"23155-0102-01 ")
  1. ;;324
  1. ;;21,"23155-0102-05 ")
  1. ;;325
  1. ;;21,"23155-0102-06 ")
  1. ;;326
  1. ;;21,"23155-0102-10 ")
  1. ;;327
  1. ;;21,"23155-0103-01 ")
  1. ;;328
  1. ;;21,"23155-0103-05 ")
  1. ;;329
  1. ;;21,"23155-0103-06 ")
  1. ;;330
  1. ;;21,"23155-0103-10 ")
  1. ;;331
  1. ;;21,"23155-0104-01 ")
  1. ;;332
  1. ;;21,"23155-0104-05 ")
  1. ;;333
  1. ;;21,"23155-0104-06 ")
  1. ;;334
  1. ;;21,"23155-0104-10 ")
  1. ;;335
  1. ;;21,"23155-0115-01 ")
  1. ;;336
  1. ;;21,"23155-0116-01 ")
  1. ;;337
  1. ;;21,"23155-0117-01 ")
  1. ;;338
  1. ;;21,"23155-0233-01 ")
  1. ;;339
  1. ;
  1. OTHER ; OTHER ROUTINES
  1. D ^BGP82K10
  1. D ^BGP82K11
  1. D ^BGP82K12
  1. D ^BGP82K13
  1. D ^BGP82K14
  1. D ^BGP82K15
  1. D ^BGP82K16
  1. D ^BGP82K17
  1. D ^BGP82K18
  1. D ^BGP82K19
  1. D ^BGP82K2
  1. D ^BGP82K3
  1. D ^BGP82K4
  1. D ^BGP82K5
  1. D ^BGP82K6
  1. D ^BGP82K7
  1. D ^BGP82K8
  1. D ^BGP82K9
  1. Q