IBDEI0A5 ; ; 01-AUG-2022
;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
Q:'DIFQR(358.3) F I=1:2 S X=$T(Q+I) Q:X="" S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E S @X=Y
Q Q
;;^UTILITY(U,$J,358.3,24821,1,3,0)
;;=3^Rheumatoid Nodule Left Wrist
;;^UTILITY(U,$J,358.3,24821,1,4,0)
;;=4^M06.332
;;^UTILITY(U,$J,358.3,24821,2)
;;=^5010104
;;^UTILITY(U,$J,358.3,24822,0)
;;=M06.39^^74^981^133
;;^UTILITY(U,$J,358.3,24822,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24822,1,3,0)
;;=3^Rheumatoid Nodule Mult Sites
;;^UTILITY(U,$J,358.3,24822,1,4,0)
;;=4^M06.39
;;^UTILITY(U,$J,358.3,24822,2)
;;=^5010119
;;^UTILITY(U,$J,358.3,24823,0)
;;=M06.371^^74^981^134
;;^UTILITY(U,$J,358.3,24823,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24823,1,3,0)
;;=3^Rheumatoid Nodule Right Ankle/Foot
;;^UTILITY(U,$J,358.3,24823,1,4,0)
;;=4^M06.371
;;^UTILITY(U,$J,358.3,24823,2)
;;=^5010115
;;^UTILITY(U,$J,358.3,24824,0)
;;=M06.321^^74^981^135
;;^UTILITY(U,$J,358.3,24824,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24824,1,3,0)
;;=3^Rheumatoid Nodule Right Elbow
;;^UTILITY(U,$J,358.3,24824,1,4,0)
;;=4^M06.321
;;^UTILITY(U,$J,358.3,24824,2)
;;=^5010100
;;^UTILITY(U,$J,358.3,24825,0)
;;=M06.341^^74^981^136
;;^UTILITY(U,$J,358.3,24825,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24825,1,3,0)
;;=3^Rheumatoid Nodule Right Hand
;;^UTILITY(U,$J,358.3,24825,1,4,0)
;;=4^M06.341
;;^UTILITY(U,$J,358.3,24825,2)
;;=^5010106
;;^UTILITY(U,$J,358.3,24826,0)
;;=M06.351^^74^981^137
;;^UTILITY(U,$J,358.3,24826,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24826,1,3,0)
;;=3^Rheumatoid Nodule Right Hip
;;^UTILITY(U,$J,358.3,24826,1,4,0)
;;=4^M06.351
;;^UTILITY(U,$J,358.3,24826,2)
;;=^5010109
;;^UTILITY(U,$J,358.3,24827,0)
;;=M06.361^^74^981^138
;;^UTILITY(U,$J,358.3,24827,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24827,1,3,0)
;;=3^Rheumatoid Nodule Right Knee
;;^UTILITY(U,$J,358.3,24827,1,4,0)
;;=4^M06.361
;;^UTILITY(U,$J,358.3,24827,2)
;;=^5010112
;;^UTILITY(U,$J,358.3,24828,0)
;;=M06.311^^74^981^139
;;^UTILITY(U,$J,358.3,24828,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24828,1,3,0)
;;=3^Rheumatoid Nodule Right Shoulder
;;^UTILITY(U,$J,358.3,24828,1,4,0)
;;=4^M06.311
;;^UTILITY(U,$J,358.3,24828,2)
;;=^5010097
;;^UTILITY(U,$J,358.3,24829,0)
;;=M06.331^^74^981^140
;;^UTILITY(U,$J,358.3,24829,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24829,1,3,0)
;;=3^Rheumatoid Nodule Right Wrist
;;^UTILITY(U,$J,358.3,24829,1,4,0)
;;=4^M06.331
;;^UTILITY(U,$J,358.3,24829,2)
;;=^5010103
;;^UTILITY(U,$J,358.3,24830,0)
;;=M06.30^^74^981^141
;;^UTILITY(U,$J,358.3,24830,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24830,1,3,0)
;;=3^Rheumatoid Nodule Unspec Site
;;^UTILITY(U,$J,358.3,24830,1,4,0)
;;=4^M06.30
;;^UTILITY(U,$J,358.3,24830,2)
;;=^5010096
;;^UTILITY(U,$J,358.3,24831,0)
;;=M06.38^^74^981^142
;;^UTILITY(U,$J,358.3,24831,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24831,1,3,0)
;;=3^Rheumatoid Nodule Vertebrae
;;^UTILITY(U,$J,358.3,24831,1,4,0)
;;=4^M06.38
;;^UTILITY(U,$J,358.3,24831,2)
;;=^5010118
;;^UTILITY(U,$J,358.3,24832,0)
;;=M05.572^^74^981^77
;;^UTILITY(U,$J,358.3,24832,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24832,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Ankle/Foot
;;^UTILITY(U,$J,358.3,24832,1,4,0)
;;=4^M05.572
;;^UTILITY(U,$J,358.3,24832,2)
;;=^5009974
;;^UTILITY(U,$J,358.3,24833,0)
;;=M05.522^^74^981^78
;;^UTILITY(U,$J,358.3,24833,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24833,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Elbow
;;^UTILITY(U,$J,358.3,24833,1,4,0)
;;=4^M05.522
;;^UTILITY(U,$J,358.3,24833,2)
;;=^5009959
;;^UTILITY(U,$J,358.3,24834,0)
;;=M05.542^^74^981^79
;;^UTILITY(U,$J,358.3,24834,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24834,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Hand
;;^UTILITY(U,$J,358.3,24834,1,4,0)
;;=4^M05.542
;;^UTILITY(U,$J,358.3,24834,2)
;;=^5009965
;;^UTILITY(U,$J,358.3,24835,0)
;;=M05.552^^74^981^80
;;^UTILITY(U,$J,358.3,24835,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24835,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Hip
;;^UTILITY(U,$J,358.3,24835,1,4,0)
;;=4^M05.552
;;^UTILITY(U,$J,358.3,24835,2)
;;=^5009968
;;^UTILITY(U,$J,358.3,24836,0)
;;=M05.562^^74^981^81
;;^UTILITY(U,$J,358.3,24836,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24836,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Knee
;;^UTILITY(U,$J,358.3,24836,1,4,0)
;;=4^M05.562
;;^UTILITY(U,$J,358.3,24836,2)
;;=^5009971
;;^UTILITY(U,$J,358.3,24837,0)
;;=M05.512^^74^981^82
;;^UTILITY(U,$J,358.3,24837,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24837,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Shoulder
;;^UTILITY(U,$J,358.3,24837,1,4,0)
;;=4^M05.512
;;^UTILITY(U,$J,358.3,24837,2)
;;=^5009956
;;^UTILITY(U,$J,358.3,24838,0)
;;=M05.532^^74^981^83
;;^UTILITY(U,$J,358.3,24838,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24838,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Wrist
;;^UTILITY(U,$J,358.3,24838,1,4,0)
;;=4^M05.532
;;^UTILITY(U,$J,358.3,24838,2)
;;=^5009962
;;^UTILITY(U,$J,358.3,24839,0)
;;=M05.59^^74^981^84
;;^UTILITY(U,$J,358.3,24839,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24839,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Mult Sites
;;^UTILITY(U,$J,358.3,24839,1,4,0)
;;=4^M05.59
;;^UTILITY(U,$J,358.3,24839,2)
;;=^5009976
;;^UTILITY(U,$J,358.3,24840,0)
;;=M05.571^^74^981^85
;;^UTILITY(U,$J,358.3,24840,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24840,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Ankle/Foot
;;^UTILITY(U,$J,358.3,24840,1,4,0)
;;=4^M05.571
;;^UTILITY(U,$J,358.3,24840,2)
;;=^5009973
;;^UTILITY(U,$J,358.3,24841,0)
;;=M05.521^^74^981^86
;;^UTILITY(U,$J,358.3,24841,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24841,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Elbow
;;^UTILITY(U,$J,358.3,24841,1,4,0)
;;=4^M05.521
;;^UTILITY(U,$J,358.3,24841,2)
;;=^5009958
;;^UTILITY(U,$J,358.3,24842,0)
;;=M05.541^^74^981^87
;;^UTILITY(U,$J,358.3,24842,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24842,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Hand
;;^UTILITY(U,$J,358.3,24842,1,4,0)
;;=4^M05.541
;;^UTILITY(U,$J,358.3,24842,2)
;;=^5009964
;;^UTILITY(U,$J,358.3,24843,0)
;;=M05.551^^74^981^88
;;^UTILITY(U,$J,358.3,24843,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24843,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Hip
;;^UTILITY(U,$J,358.3,24843,1,4,0)
;;=4^M05.551
;;^UTILITY(U,$J,358.3,24843,2)
;;=^5009967
;;^UTILITY(U,$J,358.3,24844,0)
;;=M05.561^^74^981^89
;;^UTILITY(U,$J,358.3,24844,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24844,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Knee
;;^UTILITY(U,$J,358.3,24844,1,4,0)
;;=4^M05.561
;;^UTILITY(U,$J,358.3,24844,2)
;;=^5009970
;;^UTILITY(U,$J,358.3,24845,0)
;;=M05.511^^74^981^90
;;^UTILITY(U,$J,358.3,24845,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24845,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Shoulder
;;^UTILITY(U,$J,358.3,24845,1,4,0)
;;=4^M05.511
;;^UTILITY(U,$J,358.3,24845,2)
;;=^5009955
;;^UTILITY(U,$J,358.3,24846,0)
;;=M05.531^^74^981^91
;;^UTILITY(U,$J,358.3,24846,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24846,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Wrist
;;^UTILITY(U,$J,358.3,24846,1,4,0)
;;=4^M05.531
;;^UTILITY(U,$J,358.3,24846,2)
;;=^5009961
;;^UTILITY(U,$J,358.3,24847,0)
;;=M05.50^^74^981^92
;;^UTILITY(U,$J,358.3,24847,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24847,1,3,0)
;;=3^Rheum Polyneuropathy w/ Rheum Arth Unspec Site
;;^UTILITY(U,$J,358.3,24847,1,4,0)
;;=4^M05.50
;;^UTILITY(U,$J,358.3,24847,2)
;;=^5009954
;;^UTILITY(U,$J,358.3,24848,0)
;;=G04.1^^74^981^143
;;^UTILITY(U,$J,358.3,24848,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24848,1,3,0)
;;=3^Tropical Spastic Paraplegia
;;^UTILITY(U,$J,358.3,24848,1,4,0)
;;=4^G04.1
;;^UTILITY(U,$J,358.3,24848,2)
;;=^5003733
;;^UTILITY(U,$J,358.3,24849,0)
;;=M19.90^^74^981^20
;;^UTILITY(U,$J,358.3,24849,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24849,1,3,0)
;;=3^Osteoarthritis Unspec Site
;;^UTILITY(U,$J,358.3,24849,1,4,0)
;;=4^M19.90
;;^UTILITY(U,$J,358.3,24849,2)
;;=^5010853
;;^UTILITY(U,$J,358.3,24850,0)
;;=M54.50^^74^981^16
;;^UTILITY(U,$J,358.3,24850,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24850,1,3,0)
;;=3^Low Back Pain,Unspec
;;^UTILITY(U,$J,358.3,24850,1,4,0)
;;=4^M54.50
;;^UTILITY(U,$J,358.3,24850,2)
;;=^5161215
;;^UTILITY(U,$J,358.3,24851,0)
;;=M54.59^^74^981^15
;;^UTILITY(U,$J,358.3,24851,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24851,1,3,0)
;;=3^Low Back Pain,Other
;;^UTILITY(U,$J,358.3,24851,1,4,0)
;;=4^M54.59
;;^UTILITY(U,$J,358.3,24851,2)
;;=^5161217
;;^UTILITY(U,$J,358.3,24852,0)
;;=M54.51^^74^981^17
;;^UTILITY(U,$J,358.3,24852,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24852,1,3,0)
;;=3^Low Back Pain,Vertebrogenic
;;^UTILITY(U,$J,358.3,24852,1,4,0)
;;=4^M54.51
;;^UTILITY(U,$J,358.3,24852,2)
;;=^5161216
;;^UTILITY(U,$J,358.3,24853,0)
;;=Z79.1^^74^981^14
;;^UTILITY(U,$J,358.3,24853,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24853,1,3,0)
;;=3^Long Term (Current) Use of NSAID
;;^UTILITY(U,$J,358.3,24853,1,4,0)
;;=4^Z79.1
;;^UTILITY(U,$J,358.3,24853,2)
;;=^5063332
;;^UTILITY(U,$J,358.3,24854,0)
;;=Z48.02^^74^982^1
;;^UTILITY(U,$J,358.3,24854,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24854,1,3,0)
;;=3^Suture Removal
;;^UTILITY(U,$J,358.3,24854,1,4,0)
;;=4^Z48.02
;;^UTILITY(U,$J,358.3,24854,2)
;;=^5063035
;;^UTILITY(U,$J,358.3,24855,0)
;;=J70.1^^74^983^1
;;^UTILITY(U,$J,358.3,24855,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24855,1,3,0)
;;=3^Chr Pulmonary Manifestations d/t Radiation
;;^UTILITY(U,$J,358.3,24855,1,4,0)
;;=4^J70.1
;;^UTILITY(U,$J,358.3,24855,2)
;;=^269983
;;^UTILITY(U,$J,358.3,24856,0)
;;=J70.0^^74^984^1
;;^UTILITY(U,$J,358.3,24856,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24856,1,3,0)
;;=3^Acute Pulmonary Manifestations d/t Radiation
;;^UTILITY(U,$J,358.3,24856,1,4,0)
;;=4^J70.0
;;^UTILITY(U,$J,358.3,24856,2)
;;=^269982
;;^UTILITY(U,$J,358.3,24857,0)
;;=J63.0^^74^984^2
;;^UTILITY(U,$J,358.3,24857,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24857,1,3,0)
;;=3^Aluminosis of Lung
;;^UTILITY(U,$J,358.3,24857,1,4,0)
;;=4^J63.0
;;^UTILITY(U,$J,358.3,24857,2)
;;=^5008265
;;^UTILITY(U,$J,358.3,24858,0)
;;=J63.1^^74^984^3
;;^UTILITY(U,$J,358.3,24858,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24858,1,3,0)
;;=3^Bauxite Fibrosis of Lung
;;^UTILITY(U,$J,358.3,24858,1,4,0)
;;=4^J63.1
;;^UTILITY(U,$J,358.3,24858,2)
;;=^5008266
;;^UTILITY(U,$J,358.3,24859,0)
;;=J63.2^^74^984^4
;;^UTILITY(U,$J,358.3,24859,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24859,1,3,0)
;;=3^Berylliosis
;;^UTILITY(U,$J,358.3,24859,1,4,0)
;;=4^J63.2
;;^UTILITY(U,$J,358.3,24859,2)
;;=^13594
;;^UTILITY(U,$J,358.3,24860,0)
;;=J60.^^74^984^5
;;^UTILITY(U,$J,358.3,24860,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24860,1,3,0)
;;=3^Coalworker's Pneumoconiosis
;;^UTILITY(U,$J,358.3,24860,1,4,0)
;;=4^J60.
;;^UTILITY(U,$J,358.3,24860,2)
;;=^5008261
;;^UTILITY(U,$J,358.3,24861,0)
;;=J63.3^^74^984^9
;;^UTILITY(U,$J,358.3,24861,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24861,1,3,0)
;;=3^Graphite Fibrosis of Lung
;;^UTILITY(U,$J,358.3,24861,1,4,0)
;;=4^J63.3
;;^UTILITY(U,$J,358.3,24861,2)
;;=^5008267
;;^UTILITY(U,$J,358.3,24862,0)
;;=J65.^^74^984^10
;;^UTILITY(U,$J,358.3,24862,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24862,1,3,0)
;;=3^Pneumoconiosis Associated w/ Tuberculosis
;;^UTILITY(U,$J,358.3,24862,1,4,0)
;;=4^J65.
;;^UTILITY(U,$J,358.3,24862,2)
;;=^5008272
;;^UTILITY(U,$J,358.3,24863,0)
;;=J61.^^74^984^11
;;^UTILITY(U,$J,358.3,24863,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24863,1,3,0)
;;=3^Pneumoconiosis d/t Asbestos/Oth Mineral Fibers
;;^UTILITY(U,$J,358.3,24863,1,4,0)
;;=4^J61.
;;^UTILITY(U,$J,358.3,24863,2)
;;=^5008262
;;^UTILITY(U,$J,358.3,24864,0)
;;=J62.8^^74^984^12
;;^UTILITY(U,$J,358.3,24864,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24864,1,3,0)
;;=3^Pneumoconiosis d/t Dust Containing Silica
;;^UTILITY(U,$J,358.3,24864,1,4,0)
;;=4^J62.8
;;^UTILITY(U,$J,358.3,24864,2)
;;=^5008264
;;^UTILITY(U,$J,358.3,24865,0)
;;=J62.0^^74^984^13
;;^UTILITY(U,$J,358.3,24865,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24865,1,3,0)
;;=3^Pneumoconiosis d/t Talc Dust
;;^UTILITY(U,$J,358.3,24865,1,4,0)
;;=4^J62.0
;;^UTILITY(U,$J,358.3,24865,2)
;;=^5008263
;;^UTILITY(U,$J,358.3,24866,0)
;;=J63.4^^74^984^15
;;^UTILITY(U,$J,358.3,24866,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24866,1,3,0)
;;=3^Siderosis
;;^UTILITY(U,$J,358.3,24866,1,4,0)
;;=4^J63.4
;;^UTILITY(U,$J,358.3,24866,2)
;;=^5008268
;;^UTILITY(U,$J,358.3,24867,0)
;;=J63.5^^74^984^16
;;^UTILITY(U,$J,358.3,24867,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24867,1,3,0)
;;=3^Stannosis
;;^UTILITY(U,$J,358.3,24867,1,4,0)
;;=4^J63.5
;;^UTILITY(U,$J,358.3,24867,2)
;;=^5008269
;;^UTILITY(U,$J,358.3,24868,0)
;;=J64.^^74^984^14
;;^UTILITY(U,$J,358.3,24868,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24868,1,3,0)
;;=3^Pneumoconiosis,Unspec
;;^UTILITY(U,$J,358.3,24868,1,4,0)
;;=4^J64.
;;^UTILITY(U,$J,358.3,24868,2)
;;=^5008271
;;^UTILITY(U,$J,358.3,24869,0)
;;=J82.81^^74^984^8
;;^UTILITY(U,$J,358.3,24869,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24869,1,3,0)
;;=3^Eosinophilic Pneumonia,Chronic
;;^UTILITY(U,$J,358.3,24869,1,4,0)
;;=4^J82.81
;;^UTILITY(U,$J,358.3,24869,2)
;;=^24374
;;^UTILITY(U,$J,358.3,24870,0)
;;=J82.82^^74^984^7
;;^UTILITY(U,$J,358.3,24870,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24870,1,3,0)
;;=3^Eosinophilic Pneumonia,Acute
;;^UTILITY(U,$J,358.3,24870,1,4,0)
;;=4^J82.82
;;^UTILITY(U,$J,358.3,24870,2)
;;=^5159205
;;^UTILITY(U,$J,358.3,24871,0)
;;=J82.83^^74^984^6
;;^UTILITY(U,$J,358.3,24871,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24871,1,3,0)
;;=3^Eosinophilic Asthma
;;^UTILITY(U,$J,358.3,24871,1,4,0)
;;=4^J82.83
;;^UTILITY(U,$J,358.3,24871,2)
;;=^5159206
;;^UTILITY(U,$J,358.3,24872,0)
;;=G89.22^^74^985^2
;;^UTILITY(U,$J,358.3,24872,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24872,1,3,0)
;;=3^Chr Post-Thoracotomy Pain
;;^UTILITY(U,$J,358.3,24872,1,4,0)
;;=4^G89.22
;;^UTILITY(U,$J,358.3,24872,2)
;;=^5004156
;;^UTILITY(U,$J,358.3,24873,0)
;;=G89.3^^74^985^4
;;^UTILITY(U,$J,358.3,24873,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24873,1,3,0)
;;=3^Neoplasm Related Pain
;;^UTILITY(U,$J,358.3,24873,1,4,0)
;;=4^G89.3
;;^UTILITY(U,$J,358.3,24873,2)
;;=^5004159
;;^UTILITY(U,$J,358.3,24874,0)
;;=G89.18^^74^985^1
;;^UTILITY(U,$J,358.3,24874,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24874,1,3,0)
;;=3^Acute Postprocedural Pain
;;^UTILITY(U,$J,358.3,24874,1,4,0)
;;=4^G89.18
;;^UTILITY(U,$J,358.3,24874,2)
;;=^5004154
;;^UTILITY(U,$J,358.3,24875,0)
;;=G89.29^^74^985^3
;;^UTILITY(U,$J,358.3,24875,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24875,1,3,0)
;;=3^Chronic Pain
;;^UTILITY(U,$J,358.3,24875,1,4,0)
;;=4^G89.29
;;^UTILITY(U,$J,358.3,24875,2)
;;=^5004158
;;^UTILITY(U,$J,358.3,24876,0)
;;=J94.1^^74^986^1
;;^UTILITY(U,$J,358.3,24876,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24876,1,3,0)
;;=3^Fibrothorax
;;^UTILITY(U,$J,358.3,24876,1,4,0)
;;=4^J94.1
;;^UTILITY(U,$J,358.3,24876,2)
;;=^5008317
;;^UTILITY(U,$J,358.3,24877,0)
;;=C45.0^^74^986^2
;;^UTILITY(U,$J,358.3,24877,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24877,1,3,0)
;;=3^Pleura Mesothelioma
;;^UTILITY(U,$J,358.3,24877,1,4,0)
;;=4^C45.0
;;^UTILITY(U,$J,358.3,24877,2)
;;=^5001095
;;^UTILITY(U,$J,358.3,24878,0)
;;=J94.8^^74^986^4
;;^UTILITY(U,$J,358.3,24878,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24878,1,3,0)
;;=3^Pleural Conditions NEC
;;^UTILITY(U,$J,358.3,24878,1,4,0)
;;=4^J94.8
;;^UTILITY(U,$J,358.3,24878,2)
;;=^5008319
;;^UTILITY(U,$J,358.3,24879,0)
;;=J94.9^^74^986^3
;;^UTILITY(U,$J,358.3,24879,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24879,1,3,0)
;;=3^Pleural Condition,Unspec
;;^UTILITY(U,$J,358.3,24879,1,4,0)
;;=4^J94.9
;;^UTILITY(U,$J,358.3,24879,2)
;;=^5008320
;;^UTILITY(U,$J,358.3,24880,0)
;;=J91.8^^74^986^6
;;^UTILITY(U,$J,358.3,24880,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24880,1,3,0)
;;=3^Pleural Effusion in Conditions Classified Elsewhere
;;^UTILITY(U,$J,358.3,24880,1,4,0)
;;=4^J91.8
;;^UTILITY(U,$J,358.3,24880,2)
;;=^5008311
;;^UTILITY(U,$J,358.3,24881,0)
;;=J90.^^74^986^5
;;^UTILITY(U,$J,358.3,24881,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24881,1,3,0)
;;=3^Pleural Effusion NEC
;;^UTILITY(U,$J,358.3,24881,1,4,0)
;;=4^J90.
;;^UTILITY(U,$J,358.3,24881,2)
;;=^5008310
;;^UTILITY(U,$J,358.3,24882,0)
;;=J92.0^^74^986^7
;;^UTILITY(U,$J,358.3,24882,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24882,1,3,0)
;;=3^Pleural Plaque w/ Presence of Asbestos
;;^UTILITY(U,$J,358.3,24882,1,4,0)
;;=4^J92.0
;;^UTILITY(U,$J,358.3,24882,2)
;;=^5008312
;;^UTILITY(U,$J,358.3,24883,0)
;;=J92.9^^74^986^8
;;^UTILITY(U,$J,358.3,24883,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24883,1,3,0)
;;=3^Pleural Plaque w/o Asbestos
;;^UTILITY(U,$J,358.3,24883,1,4,0)
;;=4^J92.9
;;^UTILITY(U,$J,358.3,24883,2)
;;=^5008313
;;^UTILITY(U,$J,358.3,24884,0)
;;=R09.1^^74^986^9
;;^UTILITY(U,$J,358.3,24884,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24884,1,3,0)
;;=3^Pleurisy
;;^UTILITY(U,$J,358.3,24884,1,4,0)
;;=4^R09.1
;;^UTILITY(U,$J,358.3,24884,2)
;;=^95428
;;^UTILITY(U,$J,358.3,24885,0)
;;=J86.0^^74^986^10
;;^UTILITY(U,$J,358.3,24885,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24885,1,3,0)
;;=3^Pyothorax w/ Fistula
;;^UTILITY(U,$J,358.3,24885,1,4,0)
;;=4^J86.0
;;^UTILITY(U,$J,358.3,24885,2)
;;=^5008308
;;^UTILITY(U,$J,358.3,24886,0)
;;=J86.9^^74^986^11
;;^UTILITY(U,$J,358.3,24886,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24886,1,3,0)
;;=3^Pyothorax w/o Fistula
;;^UTILITY(U,$J,358.3,24886,1,4,0)
;;=4^J86.9
;;^UTILITY(U,$J,358.3,24886,2)
;;=^5008309
;;^UTILITY(U,$J,358.3,24887,0)
;;=F41.9^^74^987^2
;;^UTILITY(U,$J,358.3,24887,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24887,1,3,0)
;;=3^Anxiety Disorder,Unspec
;;^UTILITY(U,$J,358.3,24887,1,4,0)
;;=4^F41.9
;;^UTILITY(U,$J,358.3,24887,2)
;;=^5003567
;;^UTILITY(U,$J,358.3,24888,0)
;;=F10.20^^74^987^1
;;^UTILITY(U,$J,358.3,24888,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24888,1,3,0)
;;=3^Alcohol Dependence,Uncomplicated
;;^UTILITY(U,$J,358.3,24888,1,4,0)
;;=4^F10.20
;;^UTILITY(U,$J,358.3,24888,2)
;;=^5003081
;;^UTILITY(U,$J,358.3,24889,0)
;;=F32.9^^74^987^13
;;^UTILITY(U,$J,358.3,24889,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24889,1,3,0)
;;=3^MDD,Single Episode,Unspec
;;^UTILITY(U,$J,358.3,24889,1,4,0)
;;=4^F32.9
;;^UTILITY(U,$J,358.3,24889,2)
;;=^5003528
;;^UTILITY(U,$J,358.3,24890,0)
;;=F17.221^^74^987^14
;;^UTILITY(U,$J,358.3,24890,1,0)
;;=^358.31IA^4^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0A5 19771 printed Dec 13, 2024@01:44:39 Page 2
IBDEI0A5 ; ; 01-AUG-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
+2 if 'DIFQR(358.3)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
if X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
if $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)
if $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,358.3,24821,1,3,0)
+2 ;;=3^Rheumatoid Nodule Left Wrist
+3 ;;^UTILITY(U,$J,358.3,24821,1,4,0)
+4 ;;=4^M06.332
+5 ;;^UTILITY(U,$J,358.3,24821,2)
+6 ;;=^5010104
+7 ;;^UTILITY(U,$J,358.3,24822,0)
+8 ;;=M06.39^^74^981^133
+9 ;;^UTILITY(U,$J,358.3,24822,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,24822,1,3,0)
+12 ;;=3^Rheumatoid Nodule Mult Sites
+13 ;;^UTILITY(U,$J,358.3,24822,1,4,0)
+14 ;;=4^M06.39
+15 ;;^UTILITY(U,$J,358.3,24822,2)
+16 ;;=^5010119
+17 ;;^UTILITY(U,$J,358.3,24823,0)
+18 ;;=M06.371^^74^981^134
+19 ;;^UTILITY(U,$J,358.3,24823,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,24823,1,3,0)
+22 ;;=3^Rheumatoid Nodule Right Ankle/Foot
+23 ;;^UTILITY(U,$J,358.3,24823,1,4,0)
+24 ;;=4^M06.371
+25 ;;^UTILITY(U,$J,358.3,24823,2)
+26 ;;=^5010115
+27 ;;^UTILITY(U,$J,358.3,24824,0)
+28 ;;=M06.321^^74^981^135
+29 ;;^UTILITY(U,$J,358.3,24824,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,24824,1,3,0)
+32 ;;=3^Rheumatoid Nodule Right Elbow
+33 ;;^UTILITY(U,$J,358.3,24824,1,4,0)
+34 ;;=4^M06.321
+35 ;;^UTILITY(U,$J,358.3,24824,2)
+36 ;;=^5010100
+37 ;;^UTILITY(U,$J,358.3,24825,0)
+38 ;;=M06.341^^74^981^136
+39 ;;^UTILITY(U,$J,358.3,24825,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,24825,1,3,0)
+42 ;;=3^Rheumatoid Nodule Right Hand
+43 ;;^UTILITY(U,$J,358.3,24825,1,4,0)
+44 ;;=4^M06.341
+45 ;;^UTILITY(U,$J,358.3,24825,2)
+46 ;;=^5010106
+47 ;;^UTILITY(U,$J,358.3,24826,0)
+48 ;;=M06.351^^74^981^137
+49 ;;^UTILITY(U,$J,358.3,24826,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,24826,1,3,0)
+52 ;;=3^Rheumatoid Nodule Right Hip
+53 ;;^UTILITY(U,$J,358.3,24826,1,4,0)
+54 ;;=4^M06.351
+55 ;;^UTILITY(U,$J,358.3,24826,2)
+56 ;;=^5010109
+57 ;;^UTILITY(U,$J,358.3,24827,0)
+58 ;;=M06.361^^74^981^138
+59 ;;^UTILITY(U,$J,358.3,24827,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,24827,1,3,0)
+62 ;;=3^Rheumatoid Nodule Right Knee
+63 ;;^UTILITY(U,$J,358.3,24827,1,4,0)
+64 ;;=4^M06.361
+65 ;;^UTILITY(U,$J,358.3,24827,2)
+66 ;;=^5010112
+67 ;;^UTILITY(U,$J,358.3,24828,0)
+68 ;;=M06.311^^74^981^139
+69 ;;^UTILITY(U,$J,358.3,24828,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,24828,1,3,0)
+72 ;;=3^Rheumatoid Nodule Right Shoulder
+73 ;;^UTILITY(U,$J,358.3,24828,1,4,0)
+74 ;;=4^M06.311
+75 ;;^UTILITY(U,$J,358.3,24828,2)
+76 ;;=^5010097
+77 ;;^UTILITY(U,$J,358.3,24829,0)
+78 ;;=M06.331^^74^981^140
+79 ;;^UTILITY(U,$J,358.3,24829,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,24829,1,3,0)
+82 ;;=3^Rheumatoid Nodule Right Wrist
+83 ;;^UTILITY(U,$J,358.3,24829,1,4,0)
+84 ;;=4^M06.331
+85 ;;^UTILITY(U,$J,358.3,24829,2)
+86 ;;=^5010103
+87 ;;^UTILITY(U,$J,358.3,24830,0)
+88 ;;=M06.30^^74^981^141
+89 ;;^UTILITY(U,$J,358.3,24830,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,24830,1,3,0)
+92 ;;=3^Rheumatoid Nodule Unspec Site
+93 ;;^UTILITY(U,$J,358.3,24830,1,4,0)
+94 ;;=4^M06.30
+95 ;;^UTILITY(U,$J,358.3,24830,2)
+96 ;;=^5010096
+97 ;;^UTILITY(U,$J,358.3,24831,0)
+98 ;;=M06.38^^74^981^142
+99 ;;^UTILITY(U,$J,358.3,24831,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,24831,1,3,0)
+102 ;;=3^Rheumatoid Nodule Vertebrae
+103 ;;^UTILITY(U,$J,358.3,24831,1,4,0)
+104 ;;=4^M06.38
+105 ;;^UTILITY(U,$J,358.3,24831,2)
+106 ;;=^5010118
+107 ;;^UTILITY(U,$J,358.3,24832,0)
+108 ;;=M05.572^^74^981^77
+109 ;;^UTILITY(U,$J,358.3,24832,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,24832,1,3,0)
+112 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Ankle/Foot
+113 ;;^UTILITY(U,$J,358.3,24832,1,4,0)
+114 ;;=4^M05.572
+115 ;;^UTILITY(U,$J,358.3,24832,2)
+116 ;;=^5009974
+117 ;;^UTILITY(U,$J,358.3,24833,0)
+118 ;;=M05.522^^74^981^78
+119 ;;^UTILITY(U,$J,358.3,24833,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,24833,1,3,0)
+122 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Elbow
+123 ;;^UTILITY(U,$J,358.3,24833,1,4,0)
+124 ;;=4^M05.522
+125 ;;^UTILITY(U,$J,358.3,24833,2)
+126 ;;=^5009959
+127 ;;^UTILITY(U,$J,358.3,24834,0)
+128 ;;=M05.542^^74^981^79
+129 ;;^UTILITY(U,$J,358.3,24834,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,24834,1,3,0)
+132 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Hand
+133 ;;^UTILITY(U,$J,358.3,24834,1,4,0)
+134 ;;=4^M05.542
+135 ;;^UTILITY(U,$J,358.3,24834,2)
+136 ;;=^5009965
+137 ;;^UTILITY(U,$J,358.3,24835,0)
+138 ;;=M05.552^^74^981^80
+139 ;;^UTILITY(U,$J,358.3,24835,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,24835,1,3,0)
+142 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Hip
+143 ;;^UTILITY(U,$J,358.3,24835,1,4,0)
+144 ;;=4^M05.552
+145 ;;^UTILITY(U,$J,358.3,24835,2)
+146 ;;=^5009968
+147 ;;^UTILITY(U,$J,358.3,24836,0)
+148 ;;=M05.562^^74^981^81
+149 ;;^UTILITY(U,$J,358.3,24836,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,24836,1,3,0)
+152 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Knee
+153 ;;^UTILITY(U,$J,358.3,24836,1,4,0)
+154 ;;=4^M05.562
+155 ;;^UTILITY(U,$J,358.3,24836,2)
+156 ;;=^5009971
+157 ;;^UTILITY(U,$J,358.3,24837,0)
+158 ;;=M05.512^^74^981^82
+159 ;;^UTILITY(U,$J,358.3,24837,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,24837,1,3,0)
+162 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Shoulder
+163 ;;^UTILITY(U,$J,358.3,24837,1,4,0)
+164 ;;=4^M05.512
+165 ;;^UTILITY(U,$J,358.3,24837,2)
+166 ;;=^5009956
+167 ;;^UTILITY(U,$J,358.3,24838,0)
+168 ;;=M05.532^^74^981^83
+169 ;;^UTILITY(U,$J,358.3,24838,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,24838,1,3,0)
+172 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Left Wrist
+173 ;;^UTILITY(U,$J,358.3,24838,1,4,0)
+174 ;;=4^M05.532
+175 ;;^UTILITY(U,$J,358.3,24838,2)
+176 ;;=^5009962
+177 ;;^UTILITY(U,$J,358.3,24839,0)
+178 ;;=M05.59^^74^981^84
+179 ;;^UTILITY(U,$J,358.3,24839,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,24839,1,3,0)
+182 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Mult Sites
+183 ;;^UTILITY(U,$J,358.3,24839,1,4,0)
+184 ;;=4^M05.59
+185 ;;^UTILITY(U,$J,358.3,24839,2)
+186 ;;=^5009976
+187 ;;^UTILITY(U,$J,358.3,24840,0)
+188 ;;=M05.571^^74^981^85
+189 ;;^UTILITY(U,$J,358.3,24840,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,24840,1,3,0)
+192 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Ankle/Foot
+193 ;;^UTILITY(U,$J,358.3,24840,1,4,0)
+194 ;;=4^M05.571
+195 ;;^UTILITY(U,$J,358.3,24840,2)
+196 ;;=^5009973
+197 ;;^UTILITY(U,$J,358.3,24841,0)
+198 ;;=M05.521^^74^981^86
+199 ;;^UTILITY(U,$J,358.3,24841,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,24841,1,3,0)
+202 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Elbow
+203 ;;^UTILITY(U,$J,358.3,24841,1,4,0)
+204 ;;=4^M05.521
+205 ;;^UTILITY(U,$J,358.3,24841,2)
+206 ;;=^5009958
+207 ;;^UTILITY(U,$J,358.3,24842,0)
+208 ;;=M05.541^^74^981^87
+209 ;;^UTILITY(U,$J,358.3,24842,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,24842,1,3,0)
+212 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Hand
+213 ;;^UTILITY(U,$J,358.3,24842,1,4,0)
+214 ;;=4^M05.541
+215 ;;^UTILITY(U,$J,358.3,24842,2)
+216 ;;=^5009964
+217 ;;^UTILITY(U,$J,358.3,24843,0)
+218 ;;=M05.551^^74^981^88
+219 ;;^UTILITY(U,$J,358.3,24843,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,24843,1,3,0)
+222 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Hip
+223 ;;^UTILITY(U,$J,358.3,24843,1,4,0)
+224 ;;=4^M05.551
+225 ;;^UTILITY(U,$J,358.3,24843,2)
+226 ;;=^5009967
+227 ;;^UTILITY(U,$J,358.3,24844,0)
+228 ;;=M05.561^^74^981^89
+229 ;;^UTILITY(U,$J,358.3,24844,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,24844,1,3,0)
+232 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Knee
+233 ;;^UTILITY(U,$J,358.3,24844,1,4,0)
+234 ;;=4^M05.561
+235 ;;^UTILITY(U,$J,358.3,24844,2)
+236 ;;=^5009970
+237 ;;^UTILITY(U,$J,358.3,24845,0)
+238 ;;=M05.511^^74^981^90
+239 ;;^UTILITY(U,$J,358.3,24845,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,24845,1,3,0)
+242 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Shoulder
+243 ;;^UTILITY(U,$J,358.3,24845,1,4,0)
+244 ;;=4^M05.511
+245 ;;^UTILITY(U,$J,358.3,24845,2)
+246 ;;=^5009955
+247 ;;^UTILITY(U,$J,358.3,24846,0)
+248 ;;=M05.531^^74^981^91
+249 ;;^UTILITY(U,$J,358.3,24846,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,24846,1,3,0)
+252 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Right Wrist
+253 ;;^UTILITY(U,$J,358.3,24846,1,4,0)
+254 ;;=4^M05.531
+255 ;;^UTILITY(U,$J,358.3,24846,2)
+256 ;;=^5009961
+257 ;;^UTILITY(U,$J,358.3,24847,0)
+258 ;;=M05.50^^74^981^92
+259 ;;^UTILITY(U,$J,358.3,24847,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,24847,1,3,0)
+262 ;;=3^Rheum Polyneuropathy w/ Rheum Arth Unspec Site
+263 ;;^UTILITY(U,$J,358.3,24847,1,4,0)
+264 ;;=4^M05.50
+265 ;;^UTILITY(U,$J,358.3,24847,2)
+266 ;;=^5009954
+267 ;;^UTILITY(U,$J,358.3,24848,0)
+268 ;;=G04.1^^74^981^143
+269 ;;^UTILITY(U,$J,358.3,24848,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,24848,1,3,0)
+272 ;;=3^Tropical Spastic Paraplegia
+273 ;;^UTILITY(U,$J,358.3,24848,1,4,0)
+274 ;;=4^G04.1
+275 ;;^UTILITY(U,$J,358.3,24848,2)
+276 ;;=^5003733
+277 ;;^UTILITY(U,$J,358.3,24849,0)
+278 ;;=M19.90^^74^981^20
+279 ;;^UTILITY(U,$J,358.3,24849,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,24849,1,3,0)
+282 ;;=3^Osteoarthritis Unspec Site
+283 ;;^UTILITY(U,$J,358.3,24849,1,4,0)
+284 ;;=4^M19.90
+285 ;;^UTILITY(U,$J,358.3,24849,2)
+286 ;;=^5010853
+287 ;;^UTILITY(U,$J,358.3,24850,0)
+288 ;;=M54.50^^74^981^16
+289 ;;^UTILITY(U,$J,358.3,24850,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,24850,1,3,0)
+292 ;;=3^Low Back Pain,Unspec
+293 ;;^UTILITY(U,$J,358.3,24850,1,4,0)
+294 ;;=4^M54.50
+295 ;;^UTILITY(U,$J,358.3,24850,2)
+296 ;;=^5161215
+297 ;;^UTILITY(U,$J,358.3,24851,0)
+298 ;;=M54.59^^74^981^15
+299 ;;^UTILITY(U,$J,358.3,24851,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,24851,1,3,0)
+302 ;;=3^Low Back Pain,Other
+303 ;;^UTILITY(U,$J,358.3,24851,1,4,0)
+304 ;;=4^M54.59
+305 ;;^UTILITY(U,$J,358.3,24851,2)
+306 ;;=^5161217
+307 ;;^UTILITY(U,$J,358.3,24852,0)
+308 ;;=M54.51^^74^981^17
+309 ;;^UTILITY(U,$J,358.3,24852,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,24852,1,3,0)
+312 ;;=3^Low Back Pain,Vertebrogenic
+313 ;;^UTILITY(U,$J,358.3,24852,1,4,0)
+314 ;;=4^M54.51
+315 ;;^UTILITY(U,$J,358.3,24852,2)
+316 ;;=^5161216
+317 ;;^UTILITY(U,$J,358.3,24853,0)
+318 ;;=Z79.1^^74^981^14
+319 ;;^UTILITY(U,$J,358.3,24853,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,24853,1,3,0)
+322 ;;=3^Long Term (Current) Use of NSAID
+323 ;;^UTILITY(U,$J,358.3,24853,1,4,0)
+324 ;;=4^Z79.1
+325 ;;^UTILITY(U,$J,358.3,24853,2)
+326 ;;=^5063332
+327 ;;^UTILITY(U,$J,358.3,24854,0)
+328 ;;=Z48.02^^74^982^1
+329 ;;^UTILITY(U,$J,358.3,24854,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,24854,1,3,0)
+332 ;;=3^Suture Removal
+333 ;;^UTILITY(U,$J,358.3,24854,1,4,0)
+334 ;;=4^Z48.02
+335 ;;^UTILITY(U,$J,358.3,24854,2)
+336 ;;=^5063035
+337 ;;^UTILITY(U,$J,358.3,24855,0)
+338 ;;=J70.1^^74^983^1
+339 ;;^UTILITY(U,$J,358.3,24855,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,24855,1,3,0)
+342 ;;=3^Chr Pulmonary Manifestations d/t Radiation
+343 ;;^UTILITY(U,$J,358.3,24855,1,4,0)
+344 ;;=4^J70.1
+345 ;;^UTILITY(U,$J,358.3,24855,2)
+346 ;;=^269983
+347 ;;^UTILITY(U,$J,358.3,24856,0)
+348 ;;=J70.0^^74^984^1
+349 ;;^UTILITY(U,$J,358.3,24856,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,24856,1,3,0)
+352 ;;=3^Acute Pulmonary Manifestations d/t Radiation
+353 ;;^UTILITY(U,$J,358.3,24856,1,4,0)
+354 ;;=4^J70.0
+355 ;;^UTILITY(U,$J,358.3,24856,2)
+356 ;;=^269982
+357 ;;^UTILITY(U,$J,358.3,24857,0)
+358 ;;=J63.0^^74^984^2
+359 ;;^UTILITY(U,$J,358.3,24857,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,24857,1,3,0)
+362 ;;=3^Aluminosis of Lung
+363 ;;^UTILITY(U,$J,358.3,24857,1,4,0)
+364 ;;=4^J63.0
+365 ;;^UTILITY(U,$J,358.3,24857,2)
+366 ;;=^5008265
+367 ;;^UTILITY(U,$J,358.3,24858,0)
+368 ;;=J63.1^^74^984^3
+369 ;;^UTILITY(U,$J,358.3,24858,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,24858,1,3,0)
+372 ;;=3^Bauxite Fibrosis of Lung
+373 ;;^UTILITY(U,$J,358.3,24858,1,4,0)
+374 ;;=4^J63.1
+375 ;;^UTILITY(U,$J,358.3,24858,2)
+376 ;;=^5008266
+377 ;;^UTILITY(U,$J,358.3,24859,0)
+378 ;;=J63.2^^74^984^4
+379 ;;^UTILITY(U,$J,358.3,24859,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,24859,1,3,0)
+382 ;;=3^Berylliosis
+383 ;;^UTILITY(U,$J,358.3,24859,1,4,0)
+384 ;;=4^J63.2
+385 ;;^UTILITY(U,$J,358.3,24859,2)
+386 ;;=^13594
+387 ;;^UTILITY(U,$J,358.3,24860,0)
+388 ;;=J60.^^74^984^5
+389 ;;^UTILITY(U,$J,358.3,24860,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,24860,1,3,0)
+392 ;;=3^Coalworker's Pneumoconiosis
+393 ;;^UTILITY(U,$J,358.3,24860,1,4,0)
+394 ;;=4^J60.
+395 ;;^UTILITY(U,$J,358.3,24860,2)
+396 ;;=^5008261
+397 ;;^UTILITY(U,$J,358.3,24861,0)
+398 ;;=J63.3^^74^984^9
+399 ;;^UTILITY(U,$J,358.3,24861,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,24861,1,3,0)
+402 ;;=3^Graphite Fibrosis of Lung
+403 ;;^UTILITY(U,$J,358.3,24861,1,4,0)
+404 ;;=4^J63.3
+405 ;;^UTILITY(U,$J,358.3,24861,2)
+406 ;;=^5008267
+407 ;;^UTILITY(U,$J,358.3,24862,0)
+408 ;;=J65.^^74^984^10
+409 ;;^UTILITY(U,$J,358.3,24862,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,24862,1,3,0)
+412 ;;=3^Pneumoconiosis Associated w/ Tuberculosis
+413 ;;^UTILITY(U,$J,358.3,24862,1,4,0)
+414 ;;=4^J65.
+415 ;;^UTILITY(U,$J,358.3,24862,2)
+416 ;;=^5008272
+417 ;;^UTILITY(U,$J,358.3,24863,0)
+418 ;;=J61.^^74^984^11
+419 ;;^UTILITY(U,$J,358.3,24863,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,24863,1,3,0)
+422 ;;=3^Pneumoconiosis d/t Asbestos/Oth Mineral Fibers
+423 ;;^UTILITY(U,$J,358.3,24863,1,4,0)
+424 ;;=4^J61.
+425 ;;^UTILITY(U,$J,358.3,24863,2)
+426 ;;=^5008262
+427 ;;^UTILITY(U,$J,358.3,24864,0)
+428 ;;=J62.8^^74^984^12
+429 ;;^UTILITY(U,$J,358.3,24864,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,24864,1,3,0)
+432 ;;=3^Pneumoconiosis d/t Dust Containing Silica
+433 ;;^UTILITY(U,$J,358.3,24864,1,4,0)
+434 ;;=4^J62.8
+435 ;;^UTILITY(U,$J,358.3,24864,2)
+436 ;;=^5008264
+437 ;;^UTILITY(U,$J,358.3,24865,0)
+438 ;;=J62.0^^74^984^13
+439 ;;^UTILITY(U,$J,358.3,24865,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,24865,1,3,0)
+442 ;;=3^Pneumoconiosis d/t Talc Dust
+443 ;;^UTILITY(U,$J,358.3,24865,1,4,0)
+444 ;;=4^J62.0
+445 ;;^UTILITY(U,$J,358.3,24865,2)
+446 ;;=^5008263
+447 ;;^UTILITY(U,$J,358.3,24866,0)
+448 ;;=J63.4^^74^984^15
+449 ;;^UTILITY(U,$J,358.3,24866,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,24866,1,3,0)
+452 ;;=3^Siderosis
+453 ;;^UTILITY(U,$J,358.3,24866,1,4,0)
+454 ;;=4^J63.4
+455 ;;^UTILITY(U,$J,358.3,24866,2)
+456 ;;=^5008268
+457 ;;^UTILITY(U,$J,358.3,24867,0)
+458 ;;=J63.5^^74^984^16
+459 ;;^UTILITY(U,$J,358.3,24867,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,24867,1,3,0)
+462 ;;=3^Stannosis
+463 ;;^UTILITY(U,$J,358.3,24867,1,4,0)
+464 ;;=4^J63.5
+465 ;;^UTILITY(U,$J,358.3,24867,2)
+466 ;;=^5008269
+467 ;;^UTILITY(U,$J,358.3,24868,0)
+468 ;;=J64.^^74^984^14
+469 ;;^UTILITY(U,$J,358.3,24868,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,24868,1,3,0)
+472 ;;=3^Pneumoconiosis,Unspec
+473 ;;^UTILITY(U,$J,358.3,24868,1,4,0)
+474 ;;=4^J64.
+475 ;;^UTILITY(U,$J,358.3,24868,2)
+476 ;;=^5008271
+477 ;;^UTILITY(U,$J,358.3,24869,0)
+478 ;;=J82.81^^74^984^8
+479 ;;^UTILITY(U,$J,358.3,24869,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,24869,1,3,0)
+482 ;;=3^Eosinophilic Pneumonia,Chronic
+483 ;;^UTILITY(U,$J,358.3,24869,1,4,0)
+484 ;;=4^J82.81
+485 ;;^UTILITY(U,$J,358.3,24869,2)
+486 ;;=^24374
+487 ;;^UTILITY(U,$J,358.3,24870,0)
+488 ;;=J82.82^^74^984^7
+489 ;;^UTILITY(U,$J,358.3,24870,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,24870,1,3,0)
+492 ;;=3^Eosinophilic Pneumonia,Acute
+493 ;;^UTILITY(U,$J,358.3,24870,1,4,0)
+494 ;;=4^J82.82
+495 ;;^UTILITY(U,$J,358.3,24870,2)
+496 ;;=^5159205
+497 ;;^UTILITY(U,$J,358.3,24871,0)
+498 ;;=J82.83^^74^984^6
+499 ;;^UTILITY(U,$J,358.3,24871,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,24871,1,3,0)
+502 ;;=3^Eosinophilic Asthma
+503 ;;^UTILITY(U,$J,358.3,24871,1,4,0)
+504 ;;=4^J82.83
+505 ;;^UTILITY(U,$J,358.3,24871,2)
+506 ;;=^5159206
+507 ;;^UTILITY(U,$J,358.3,24872,0)
+508 ;;=G89.22^^74^985^2
+509 ;;^UTILITY(U,$J,358.3,24872,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,24872,1,3,0)
+512 ;;=3^Chr Post-Thoracotomy Pain
+513 ;;^UTILITY(U,$J,358.3,24872,1,4,0)
+514 ;;=4^G89.22
+515 ;;^UTILITY(U,$J,358.3,24872,2)
+516 ;;=^5004156
+517 ;;^UTILITY(U,$J,358.3,24873,0)
+518 ;;=G89.3^^74^985^4
+519 ;;^UTILITY(U,$J,358.3,24873,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,24873,1,3,0)
+522 ;;=3^Neoplasm Related Pain
+523 ;;^UTILITY(U,$J,358.3,24873,1,4,0)
+524 ;;=4^G89.3
+525 ;;^UTILITY(U,$J,358.3,24873,2)
+526 ;;=^5004159
+527 ;;^UTILITY(U,$J,358.3,24874,0)
+528 ;;=G89.18^^74^985^1
+529 ;;^UTILITY(U,$J,358.3,24874,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,24874,1,3,0)
+532 ;;=3^Acute Postprocedural Pain
+533 ;;^UTILITY(U,$J,358.3,24874,1,4,0)
+534 ;;=4^G89.18
+535 ;;^UTILITY(U,$J,358.3,24874,2)
+536 ;;=^5004154
+537 ;;^UTILITY(U,$J,358.3,24875,0)
+538 ;;=G89.29^^74^985^3
+539 ;;^UTILITY(U,$J,358.3,24875,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,24875,1,3,0)
+542 ;;=3^Chronic Pain
+543 ;;^UTILITY(U,$J,358.3,24875,1,4,0)
+544 ;;=4^G89.29
+545 ;;^UTILITY(U,$J,358.3,24875,2)
+546 ;;=^5004158
+547 ;;^UTILITY(U,$J,358.3,24876,0)
+548 ;;=J94.1^^74^986^1
+549 ;;^UTILITY(U,$J,358.3,24876,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,24876,1,3,0)
+552 ;;=3^Fibrothorax
+553 ;;^UTILITY(U,$J,358.3,24876,1,4,0)
+554 ;;=4^J94.1
+555 ;;^UTILITY(U,$J,358.3,24876,2)
+556 ;;=^5008317
+557 ;;^UTILITY(U,$J,358.3,24877,0)
+558 ;;=C45.0^^74^986^2
+559 ;;^UTILITY(U,$J,358.3,24877,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,24877,1,3,0)
+562 ;;=3^Pleura Mesothelioma
+563 ;;^UTILITY(U,$J,358.3,24877,1,4,0)
+564 ;;=4^C45.0
+565 ;;^UTILITY(U,$J,358.3,24877,2)
+566 ;;=^5001095
+567 ;;^UTILITY(U,$J,358.3,24878,0)
+568 ;;=J94.8^^74^986^4
+569 ;;^UTILITY(U,$J,358.3,24878,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,24878,1,3,0)
+572 ;;=3^Pleural Conditions NEC
+573 ;;^UTILITY(U,$J,358.3,24878,1,4,0)
+574 ;;=4^J94.8
+575 ;;^UTILITY(U,$J,358.3,24878,2)
+576 ;;=^5008319
+577 ;;^UTILITY(U,$J,358.3,24879,0)
+578 ;;=J94.9^^74^986^3
+579 ;;^UTILITY(U,$J,358.3,24879,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,24879,1,3,0)
+582 ;;=3^Pleural Condition,Unspec
+583 ;;^UTILITY(U,$J,358.3,24879,1,4,0)
+584 ;;=4^J94.9
+585 ;;^UTILITY(U,$J,358.3,24879,2)
+586 ;;=^5008320
+587 ;;^UTILITY(U,$J,358.3,24880,0)
+588 ;;=J91.8^^74^986^6
+589 ;;^UTILITY(U,$J,358.3,24880,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,24880,1,3,0)
+592 ;;=3^Pleural Effusion in Conditions Classified Elsewhere
+593 ;;^UTILITY(U,$J,358.3,24880,1,4,0)
+594 ;;=4^J91.8
+595 ;;^UTILITY(U,$J,358.3,24880,2)
+596 ;;=^5008311
+597 ;;^UTILITY(U,$J,358.3,24881,0)
+598 ;;=J90.^^74^986^5
+599 ;;^UTILITY(U,$J,358.3,24881,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,24881,1,3,0)
+602 ;;=3^Pleural Effusion NEC
+603 ;;^UTILITY(U,$J,358.3,24881,1,4,0)
+604 ;;=4^J90.
+605 ;;^UTILITY(U,$J,358.3,24881,2)
+606 ;;=^5008310
+607 ;;^UTILITY(U,$J,358.3,24882,0)
+608 ;;=J92.0^^74^986^7
+609 ;;^UTILITY(U,$J,358.3,24882,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,24882,1,3,0)
+612 ;;=3^Pleural Plaque w/ Presence of Asbestos
+613 ;;^UTILITY(U,$J,358.3,24882,1,4,0)
+614 ;;=4^J92.0
+615 ;;^UTILITY(U,$J,358.3,24882,2)
+616 ;;=^5008312
+617 ;;^UTILITY(U,$J,358.3,24883,0)
+618 ;;=J92.9^^74^986^8
+619 ;;^UTILITY(U,$J,358.3,24883,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,24883,1,3,0)
+622 ;;=3^Pleural Plaque w/o Asbestos
+623 ;;^UTILITY(U,$J,358.3,24883,1,4,0)
+624 ;;=4^J92.9
+625 ;;^UTILITY(U,$J,358.3,24883,2)
+626 ;;=^5008313
+627 ;;^UTILITY(U,$J,358.3,24884,0)
+628 ;;=R09.1^^74^986^9
+629 ;;^UTILITY(U,$J,358.3,24884,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,24884,1,3,0)
+632 ;;=3^Pleurisy
+633 ;;^UTILITY(U,$J,358.3,24884,1,4,0)
+634 ;;=4^R09.1
+635 ;;^UTILITY(U,$J,358.3,24884,2)
+636 ;;=^95428
+637 ;;^UTILITY(U,$J,358.3,24885,0)
+638 ;;=J86.0^^74^986^10
+639 ;;^UTILITY(U,$J,358.3,24885,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,24885,1,3,0)
+642 ;;=3^Pyothorax w/ Fistula
+643 ;;^UTILITY(U,$J,358.3,24885,1,4,0)
+644 ;;=4^J86.0
+645 ;;^UTILITY(U,$J,358.3,24885,2)
+646 ;;=^5008308
+647 ;;^UTILITY(U,$J,358.3,24886,0)
+648 ;;=J86.9^^74^986^11
+649 ;;^UTILITY(U,$J,358.3,24886,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,24886,1,3,0)
+652 ;;=3^Pyothorax w/o Fistula
+653 ;;^UTILITY(U,$J,358.3,24886,1,4,0)
+654 ;;=4^J86.9
+655 ;;^UTILITY(U,$J,358.3,24886,2)
+656 ;;=^5008309
+657 ;;^UTILITY(U,$J,358.3,24887,0)
+658 ;;=F41.9^^74^987^2
+659 ;;^UTILITY(U,$J,358.3,24887,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,24887,1,3,0)
+662 ;;=3^Anxiety Disorder,Unspec
+663 ;;^UTILITY(U,$J,358.3,24887,1,4,0)
+664 ;;=4^F41.9
+665 ;;^UTILITY(U,$J,358.3,24887,2)
+666 ;;=^5003567
+667 ;;^UTILITY(U,$J,358.3,24888,0)
+668 ;;=F10.20^^74^987^1
+669 ;;^UTILITY(U,$J,358.3,24888,1,0)
+670 ;;=^358.31IA^4^2
+671 ;;^UTILITY(U,$J,358.3,24888,1,3,0)
+672 ;;=3^Alcohol Dependence,Uncomplicated
+673 ;;^UTILITY(U,$J,358.3,24888,1,4,0)
+674 ;;=4^F10.20
+675 ;;^UTILITY(U,$J,358.3,24888,2)
+676 ;;=^5003081
+677 ;;^UTILITY(U,$J,358.3,24889,0)
+678 ;;=F32.9^^74^987^13
+679 ;;^UTILITY(U,$J,358.3,24889,1,0)
+680 ;;=^358.31IA^4^2
+681 ;;^UTILITY(U,$J,358.3,24889,1,3,0)
+682 ;;=3^MDD,Single Episode,Unspec
+683 ;;^UTILITY(U,$J,358.3,24889,1,4,0)
+684 ;;=4^F32.9
+685 ;;^UTILITY(U,$J,358.3,24889,2)
+686 ;;=^5003528
+687 ;;^UTILITY(U,$J,358.3,24890,0)
+688 ;;=F17.221^^74^987^14
+689 ;;^UTILITY(U,$J,358.3,24890,1,0)
+690 ;;=^358.31IA^4^2