IBDEI085 ; ; 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,19843,1,3,0)
;;=3^Skin sensation disturbances,unspec
;;^UTILITY(U,$J,358.3,19843,1,4,0)
;;=4^R20.9
;;^UTILITY(U,$J,358.3,19843,2)
;;=^5019282
;;^UTILITY(U,$J,358.3,19844,0)
;;=G82.50^^65^804^66
;;^UTILITY(U,$J,358.3,19844,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19844,1,3,0)
;;=3^Quadriplegia, unspecified
;;^UTILITY(U,$J,358.3,19844,1,4,0)
;;=4^G82.50
;;^UTILITY(U,$J,358.3,19844,2)
;;=^5004128
;;^UTILITY(U,$J,358.3,19845,0)
;;=G47.9^^65^804^71
;;^UTILITY(U,$J,358.3,19845,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19845,1,3,0)
;;=3^Sleep disorder, unspecified
;;^UTILITY(U,$J,358.3,19845,1,4,0)
;;=4^G47.9
;;^UTILITY(U,$J,358.3,19845,2)
;;=^5003990
;;^UTILITY(U,$J,358.3,19846,0)
;;=G44.209^^65^804^73
;;^UTILITY(U,$J,358.3,19846,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19846,1,3,0)
;;=3^Tension-type headache, unspecified, not intractable
;;^UTILITY(U,$J,358.3,19846,1,4,0)
;;=4^G44.209
;;^UTILITY(U,$J,358.3,19846,2)
;;=^5003936
;;^UTILITY(U,$J,358.3,19847,0)
;;=R32.^^65^804^79
;;^UTILITY(U,$J,358.3,19847,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19847,1,3,0)
;;=3^Urinary incontinence,unspec
;;^UTILITY(U,$J,358.3,19847,1,4,0)
;;=4^R32.
;;^UTILITY(U,$J,358.3,19847,2)
;;=^5019329
;;^UTILITY(U,$J,358.3,19848,0)
;;=R53.1^^65^804^80
;;^UTILITY(U,$J,358.3,19848,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19848,1,3,0)
;;=3^Weakness
;;^UTILITY(U,$J,358.3,19848,1,4,0)
;;=4^R53.1
;;^UTILITY(U,$J,358.3,19848,2)
;;=^5019516
;;^UTILITY(U,$J,358.3,19849,0)
;;=G47.63^^65^804^3
;;^UTILITY(U,$J,358.3,19849,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19849,1,3,0)
;;=3^Bruxism
;;^UTILITY(U,$J,358.3,19849,1,4,0)
;;=4^G47.63
;;^UTILITY(U,$J,358.3,19849,2)
;;=^332783
;;^UTILITY(U,$J,358.3,19850,0)
;;=G56.01^^65^804^8
;;^UTILITY(U,$J,358.3,19850,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19850,1,3,0)
;;=3^Carpal Tunnel Syndrome,Right Upper Limb
;;^UTILITY(U,$J,358.3,19850,1,4,0)
;;=4^G56.01
;;^UTILITY(U,$J,358.3,19850,2)
;;=^5004018
;;^UTILITY(U,$J,358.3,19851,0)
;;=G56.02^^65^804^7
;;^UTILITY(U,$J,358.3,19851,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19851,1,3,0)
;;=3^Carpal Tunnel Syndrome,Left Upper Limb
;;^UTILITY(U,$J,358.3,19851,1,4,0)
;;=4^G56.02
;;^UTILITY(U,$J,358.3,19851,2)
;;=^5004019
;;^UTILITY(U,$J,358.3,19852,0)
;;=S06.0X0A^^65^804^10
;;^UTILITY(U,$J,358.3,19852,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19852,1,3,0)
;;=3^Concussion,Acute
;;^UTILITY(U,$J,358.3,19852,1,4,0)
;;=4^S06.0X0A
;;^UTILITY(U,$J,358.3,19852,2)
;;=^5020666
;;^UTILITY(U,$J,358.3,19853,0)
;;=S06.0X0S^^65^804^11
;;^UTILITY(U,$J,358.3,19853,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19853,1,3,0)
;;=3^Concussion,Sequela
;;^UTILITY(U,$J,358.3,19853,1,4,0)
;;=4^S06.0X0S
;;^UTILITY(U,$J,358.3,19853,2)
;;=^5020668
;;^UTILITY(U,$J,358.3,19854,0)
;;=R42.^^65^804^13
;;^UTILITY(U,$J,358.3,19854,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19854,1,3,0)
;;=3^Dizziness
;;^UTILITY(U,$J,358.3,19854,1,4,0)
;;=4^R42.
;;^UTILITY(U,$J,358.3,19854,2)
;;=^5019450
;;^UTILITY(U,$J,358.3,19855,0)
;;=G57.11^^65^804^26
;;^UTILITY(U,$J,358.3,19855,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19855,1,3,0)
;;=3^Meralgia Paresthetica,Right Lower Limb
;;^UTILITY(U,$J,358.3,19855,1,4,0)
;;=4^G57.11
;;^UTILITY(U,$J,358.3,19855,2)
;;=^5004042
;;^UTILITY(U,$J,358.3,19856,0)
;;=G57.12^^65^804^25
;;^UTILITY(U,$J,358.3,19856,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19856,1,3,0)
;;=3^Meralgia Paresthetica,Left Lower Limb
;;^UTILITY(U,$J,358.3,19856,1,4,0)
;;=4^G57.12
;;^UTILITY(U,$J,358.3,19856,2)
;;=^5004043
;;^UTILITY(U,$J,358.3,19857,0)
;;=G43.901^^65^804^27
;;^UTILITY(U,$J,358.3,19857,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19857,1,3,0)
;;=3^Migraine w/ Status Migrainosus
;;^UTILITY(U,$J,358.3,19857,1,4,0)
;;=4^G43.901
;;^UTILITY(U,$J,358.3,19857,2)
;;=^5003908
;;^UTILITY(U,$J,358.3,19858,0)
;;=M79.601^^65^804^42
;;^UTILITY(U,$J,358.3,19858,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19858,1,3,0)
;;=3^Pain,Arm,Right
;;^UTILITY(U,$J,358.3,19858,1,4,0)
;;=4^M79.601
;;^UTILITY(U,$J,358.3,19858,2)
;;=^5013325
;;^UTILITY(U,$J,358.3,19859,0)
;;=M79.602^^65^804^41
;;^UTILITY(U,$J,358.3,19859,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19859,1,3,0)
;;=3^Pain,Arm,Left
;;^UTILITY(U,$J,358.3,19859,1,4,0)
;;=4^M79.602
;;^UTILITY(U,$J,358.3,19859,2)
;;=^5013326
;;^UTILITY(U,$J,358.3,19860,0)
;;=M25.511^^65^804^56
;;^UTILITY(U,$J,358.3,19860,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19860,1,3,0)
;;=3^Pain,Shoulder,Right
;;^UTILITY(U,$J,358.3,19860,1,4,0)
;;=4^M25.511
;;^UTILITY(U,$J,358.3,19860,2)
;;=^5011602
;;^UTILITY(U,$J,358.3,19861,0)
;;=M25.512^^65^804^55
;;^UTILITY(U,$J,358.3,19861,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19861,1,3,0)
;;=3^Pain,Shoulder,Left
;;^UTILITY(U,$J,358.3,19861,1,4,0)
;;=4^M25.512
;;^UTILITY(U,$J,358.3,19861,2)
;;=^5011603
;;^UTILITY(U,$J,358.3,19862,0)
;;=M25.521^^65^804^44
;;^UTILITY(U,$J,358.3,19862,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19862,1,3,0)
;;=3^Pain,Elbow,Right
;;^UTILITY(U,$J,358.3,19862,1,4,0)
;;=4^M25.521
;;^UTILITY(U,$J,358.3,19862,2)
;;=^5011605
;;^UTILITY(U,$J,358.3,19863,0)
;;=M25.522^^65^804^43
;;^UTILITY(U,$J,358.3,19863,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19863,1,3,0)
;;=3^Pain,Elbow,Left
;;^UTILITY(U,$J,358.3,19863,1,4,0)
;;=4^M25.522
;;^UTILITY(U,$J,358.3,19863,2)
;;=^5011606
;;^UTILITY(U,$J,358.3,19864,0)
;;=M25.531^^65^804^58
;;^UTILITY(U,$J,358.3,19864,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19864,1,3,0)
;;=3^Pain,Wrist,Right
;;^UTILITY(U,$J,358.3,19864,1,4,0)
;;=4^M25.531
;;^UTILITY(U,$J,358.3,19864,2)
;;=^5011608
;;^UTILITY(U,$J,358.3,19865,0)
;;=M25.532^^65^804^57
;;^UTILITY(U,$J,358.3,19865,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19865,1,3,0)
;;=3^Pain,Wrist,Left
;;^UTILITY(U,$J,358.3,19865,1,4,0)
;;=4^M25.532
;;^UTILITY(U,$J,358.3,19865,2)
;;=^5011609
;;^UTILITY(U,$J,358.3,19866,0)
;;=M79.641^^65^804^48
;;^UTILITY(U,$J,358.3,19866,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19866,1,3,0)
;;=3^Pain,Hand,Right
;;^UTILITY(U,$J,358.3,19866,1,4,0)
;;=4^M79.641
;;^UTILITY(U,$J,358.3,19866,2)
;;=^5013338
;;^UTILITY(U,$J,358.3,19867,0)
;;=M79.642^^65^804^47
;;^UTILITY(U,$J,358.3,19867,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19867,1,3,0)
;;=3^Pain,Hand,Left
;;^UTILITY(U,$J,358.3,19867,1,4,0)
;;=4^M79.642
;;^UTILITY(U,$J,358.3,19867,2)
;;=^5013339
;;^UTILITY(U,$J,358.3,19868,0)
;;=M79.604^^65^804^54
;;^UTILITY(U,$J,358.3,19868,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19868,1,3,0)
;;=3^Pain,Leg,Right
;;^UTILITY(U,$J,358.3,19868,1,4,0)
;;=4^M79.604
;;^UTILITY(U,$J,358.3,19868,2)
;;=^5013328
;;^UTILITY(U,$J,358.3,19869,0)
;;=M79.605^^65^804^53
;;^UTILITY(U,$J,358.3,19869,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19869,1,3,0)
;;=3^Pain,Leg,Left
;;^UTILITY(U,$J,358.3,19869,1,4,0)
;;=4^M79.605
;;^UTILITY(U,$J,358.3,19869,2)
;;=^5013329
;;^UTILITY(U,$J,358.3,19870,0)
;;=M25.551^^65^804^50
;;^UTILITY(U,$J,358.3,19870,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19870,1,3,0)
;;=3^Pain,Hip,Right
;;^UTILITY(U,$J,358.3,19870,1,4,0)
;;=4^M25.551
;;^UTILITY(U,$J,358.3,19870,2)
;;=^5011611
;;^UTILITY(U,$J,358.3,19871,0)
;;=M25.552^^65^804^49
;;^UTILITY(U,$J,358.3,19871,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19871,1,3,0)
;;=3^Pain,Hip,Left
;;^UTILITY(U,$J,358.3,19871,1,4,0)
;;=4^M25.552
;;^UTILITY(U,$J,358.3,19871,2)
;;=^5011612
;;^UTILITY(U,$J,358.3,19872,0)
;;=M25.561^^65^804^52
;;^UTILITY(U,$J,358.3,19872,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19872,1,3,0)
;;=3^Pain,Knee,Right
;;^UTILITY(U,$J,358.3,19872,1,4,0)
;;=4^M25.561
;;^UTILITY(U,$J,358.3,19872,2)
;;=^5011614
;;^UTILITY(U,$J,358.3,19873,0)
;;=M25.562^^65^804^51
;;^UTILITY(U,$J,358.3,19873,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19873,1,3,0)
;;=3^Pain,Knee,Left
;;^UTILITY(U,$J,358.3,19873,1,4,0)
;;=4^M25.562
;;^UTILITY(U,$J,358.3,19873,2)
;;=^5011615
;;^UTILITY(U,$J,358.3,19874,0)
;;=M25.571^^65^804^40
;;^UTILITY(U,$J,358.3,19874,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19874,1,3,0)
;;=3^Pain,Ankle,Right
;;^UTILITY(U,$J,358.3,19874,1,4,0)
;;=4^M25.571
;;^UTILITY(U,$J,358.3,19874,2)
;;=^5011617
;;^UTILITY(U,$J,358.3,19875,0)
;;=M25.572^^65^804^39
;;^UTILITY(U,$J,358.3,19875,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19875,1,3,0)
;;=3^Pain,Ankle,Left
;;^UTILITY(U,$J,358.3,19875,1,4,0)
;;=4^M25.572
;;^UTILITY(U,$J,358.3,19875,2)
;;=^5011618
;;^UTILITY(U,$J,358.3,19876,0)
;;=M79.671^^65^804^46
;;^UTILITY(U,$J,358.3,19876,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19876,1,3,0)
;;=3^Pain,Foot,Right
;;^UTILITY(U,$J,358.3,19876,1,4,0)
;;=4^M79.671
;;^UTILITY(U,$J,358.3,19876,2)
;;=^5013350
;;^UTILITY(U,$J,358.3,19877,0)
;;=M79.672^^65^804^45
;;^UTILITY(U,$J,358.3,19877,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19877,1,3,0)
;;=3^Pain,Foot,Left
;;^UTILITY(U,$J,358.3,19877,1,4,0)
;;=4^M79.672
;;^UTILITY(U,$J,358.3,19877,2)
;;=^5013351
;;^UTILITY(U,$J,358.3,19878,0)
;;=M54.31^^65^804^68
;;^UTILITY(U,$J,358.3,19878,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19878,1,3,0)
;;=3^Sciatica,Right
;;^UTILITY(U,$J,358.3,19878,1,4,0)
;;=4^M54.31
;;^UTILITY(U,$J,358.3,19878,2)
;;=^5012306
;;^UTILITY(U,$J,358.3,19879,0)
;;=M54.32^^65^804^67
;;^UTILITY(U,$J,358.3,19879,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19879,1,3,0)
;;=3^Sciatica,Left
;;^UTILITY(U,$J,358.3,19879,1,4,0)
;;=4^M54.32
;;^UTILITY(U,$J,358.3,19879,2)
;;=^5012307
;;^UTILITY(U,$J,358.3,19880,0)
;;=G44.201^^65^804^72
;;^UTILITY(U,$J,358.3,19880,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19880,1,3,0)
;;=3^Tension Headache,Intractable
;;^UTILITY(U,$J,358.3,19880,1,4,0)
;;=4^G44.201
;;^UTILITY(U,$J,358.3,19880,2)
;;=^5003935
;;^UTILITY(U,$J,358.3,19881,0)
;;=G50.0^^65^804^78
;;^UTILITY(U,$J,358.3,19881,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19881,1,3,0)
;;=3^Trigeminal Neuralgia
;;^UTILITY(U,$J,358.3,19881,1,4,0)
;;=4^G50.0
;;^UTILITY(U,$J,358.3,19881,2)
;;=^121978
;;^UTILITY(U,$J,358.3,19882,0)
;;=M79.10^^65^804^30
;;^UTILITY(U,$J,358.3,19882,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19882,1,3,0)
;;=3^Myalga,Unspec Site
;;^UTILITY(U,$J,358.3,19882,1,4,0)
;;=4^M79.10
;;^UTILITY(U,$J,358.3,19882,2)
;;=^5157394
;;^UTILITY(U,$J,358.3,19883,0)
;;=M79.11^^65^804^32
;;^UTILITY(U,$J,358.3,19883,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19883,1,3,0)
;;=3^Myalgia,Mastication Muscle
;;^UTILITY(U,$J,358.3,19883,1,4,0)
;;=4^M79.11
;;^UTILITY(U,$J,358.3,19883,2)
;;=^5157395
;;^UTILITY(U,$J,358.3,19884,0)
;;=M79.12^^65^804^31
;;^UTILITY(U,$J,358.3,19884,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19884,1,3,0)
;;=3^Myalgia,Auxiliary Muscles,Head/Neck
;;^UTILITY(U,$J,358.3,19884,1,4,0)
;;=4^M79.12
;;^UTILITY(U,$J,358.3,19884,2)
;;=^5157396
;;^UTILITY(U,$J,358.3,19885,0)
;;=M79.18^^65^804^33
;;^UTILITY(U,$J,358.3,19885,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19885,1,3,0)
;;=3^Myalgia,Other Site
;;^UTILITY(U,$J,358.3,19885,1,4,0)
;;=4^M79.18
;;^UTILITY(U,$J,358.3,19885,2)
;;=^5157397
;;^UTILITY(U,$J,358.3,19886,0)
;;=R51.0^^65^804^20
;;^UTILITY(U,$J,358.3,19886,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19886,1,3,0)
;;=3^Headache w/ Orthostatic Component
;;^UTILITY(U,$J,358.3,19886,1,4,0)
;;=4^R51.0
;;^UTILITY(U,$J,358.3,19886,2)
;;=^5159305
;;^UTILITY(U,$J,358.3,19887,0)
;;=R51.9^^65^804^21
;;^UTILITY(U,$J,358.3,19887,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19887,1,3,0)
;;=3^Headache,Unspec
;;^UTILITY(U,$J,358.3,19887,1,4,0)
;;=4^R51.9
;;^UTILITY(U,$J,358.3,19887,2)
;;=^5159306
;;^UTILITY(U,$J,358.3,19888,0)
;;=T20.20XS^^65^804^4
;;^UTILITY(U,$J,358.3,19888,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19888,1,3,0)
;;=3^Burn 2nd Degree of Head,Face,Neck,Unspec Site,Sequela
;;^UTILITY(U,$J,358.3,19888,1,4,0)
;;=4^T20.20XS
;;^UTILITY(U,$J,358.3,19888,2)
;;=^5046707
;;^UTILITY(U,$J,358.3,19889,0)
;;=T20.30XS^^65^804^5
;;^UTILITY(U,$J,358.3,19889,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19889,1,3,0)
;;=3^Burn 3rd Degree of Head,Face,Neck,Unspec Site,Sequela
;;^UTILITY(U,$J,358.3,19889,1,4,0)
;;=4^T20.30XS
;;^UTILITY(U,$J,358.3,19889,2)
;;=^5046740
;;^UTILITY(U,$J,358.3,19890,0)
;;=Z47.1^^65^805^1
;;^UTILITY(U,$J,358.3,19890,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19890,1,3,0)
;;=3^Aftercare following joint replacement surgery
;;^UTILITY(U,$J,358.3,19890,1,4,0)
;;=4^Z47.1
;;^UTILITY(U,$J,358.3,19890,2)
;;=^5063025
;;^UTILITY(U,$J,358.3,19891,0)
;;=Z96.662^^65^805^2
;;^UTILITY(U,$J,358.3,19891,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19891,1,3,0)
;;=3^Presence of left artificial ankle joint
;;^UTILITY(U,$J,358.3,19891,1,4,0)
;;=4^Z96.662
;;^UTILITY(U,$J,358.3,19891,2)
;;=^5063710
;;^UTILITY(U,$J,358.3,19892,0)
;;=Z96.622^^65^805^3
;;^UTILITY(U,$J,358.3,19892,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19892,1,3,0)
;;=3^Presence of left artificial elbow joint
;;^UTILITY(U,$J,358.3,19892,1,4,0)
;;=4^Z96.622
;;^UTILITY(U,$J,358.3,19892,2)
;;=^5063696
;;^UTILITY(U,$J,358.3,19893,0)
;;=Z96.642^^65^805^4
;;^UTILITY(U,$J,358.3,19893,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19893,1,3,0)
;;=3^Presence of left artificial hip joint
;;^UTILITY(U,$J,358.3,19893,1,4,0)
;;=4^Z96.642
;;^UTILITY(U,$J,358.3,19893,2)
;;=^5063702
;;^UTILITY(U,$J,358.3,19894,0)
;;=Z96.652^^65^805^5
;;^UTILITY(U,$J,358.3,19894,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19894,1,3,0)
;;=3^Presence of left artificial knee joint
;;^UTILITY(U,$J,358.3,19894,1,4,0)
;;=4^Z96.652
;;^UTILITY(U,$J,358.3,19894,2)
;;=^5063706
;;^UTILITY(U,$J,358.3,19895,0)
;;=Z96.612^^65^805^6
;;^UTILITY(U,$J,358.3,19895,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19895,1,3,0)
;;=3^Presence of left artificial shoulder joint
;;^UTILITY(U,$J,358.3,19895,1,4,0)
;;=4^Z96.612
;;^UTILITY(U,$J,358.3,19895,2)
;;=^5063693
;;^UTILITY(U,$J,358.3,19896,0)
;;=Z96.632^^65^805^7
;;^UTILITY(U,$J,358.3,19896,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19896,1,3,0)
;;=3^Presence of left artificial wrist joint
;;^UTILITY(U,$J,358.3,19896,1,4,0)
;;=4^Z96.632
;;^UTILITY(U,$J,358.3,19896,2)
;;=^5063699
;;^UTILITY(U,$J,358.3,19897,0)
;;=Z96.60^^65^805^14
;;^UTILITY(U,$J,358.3,19897,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19897,1,3,0)
;;=3^Presence of unspecified orthopedic joint implant
;;^UTILITY(U,$J,358.3,19897,1,4,0)
;;=4^Z96.60
;;^UTILITY(U,$J,358.3,19897,2)
;;=^5063691
;;^UTILITY(U,$J,358.3,19898,0)
;;=Z96.661^^65^805^8
;;^UTILITY(U,$J,358.3,19898,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19898,1,3,0)
;;=3^Presence of right artificial ankle joint
;;^UTILITY(U,$J,358.3,19898,1,4,0)
;;=4^Z96.661
;;^UTILITY(U,$J,358.3,19898,2)
;;=^5063709
;;^UTILITY(U,$J,358.3,19899,0)
;;=Z96.621^^65^805^9
;;^UTILITY(U,$J,358.3,19899,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19899,1,3,0)
;;=3^Presence of right artificial elbow joint
;;^UTILITY(U,$J,358.3,19899,1,4,0)
;;=4^Z96.621
;;^UTILITY(U,$J,358.3,19899,2)
;;=^5063695
;;^UTILITY(U,$J,358.3,19900,0)
;;=Z96.641^^65^805^10
;;^UTILITY(U,$J,358.3,19900,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19900,1,3,0)
;;=3^Presence of right artificial hip joint
;;^UTILITY(U,$J,358.3,19900,1,4,0)
;;=4^Z96.641
;;^UTILITY(U,$J,358.3,19900,2)
;;=^5063701
;;^UTILITY(U,$J,358.3,19901,0)
;;=Z96.651^^65^805^11
;;^UTILITY(U,$J,358.3,19901,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19901,1,3,0)
;;=3^Presence of right artificial knee joint
;;^UTILITY(U,$J,358.3,19901,1,4,0)
;;=4^Z96.651
;;^UTILITY(U,$J,358.3,19901,2)
;;=^5063705
;;^UTILITY(U,$J,358.3,19902,0)
;;=Z96.611^^65^805^12
;;^UTILITY(U,$J,358.3,19902,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19902,1,3,0)
;;=3^Presence of right artificial shoulder joint
;;^UTILITY(U,$J,358.3,19902,1,4,0)
;;=4^Z96.611
;;^UTILITY(U,$J,358.3,19902,2)
;;=^5063692
;;^UTILITY(U,$J,358.3,19903,0)
;;=Z96.631^^65^805^13
;;^UTILITY(U,$J,358.3,19903,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19903,1,3,0)
;;=3^Presence of right artificial wrist joint
;;^UTILITY(U,$J,358.3,19903,1,4,0)
;;=4^Z96.631
;;^UTILITY(U,$J,358.3,19903,2)
;;=^5063698
;;^UTILITY(U,$J,358.3,19904,0)
;;=M05.772^^65^806^1
;;^UTILITY(U,$J,358.3,19904,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19904,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Ankle/Foot
;;^UTILITY(U,$J,358.3,19904,1,4,0)
;;=4^M05.772
;;^UTILITY(U,$J,358.3,19904,2)
;;=^5010020
;;^UTILITY(U,$J,358.3,19905,0)
;;=M05.722^^65^806^2
;;^UTILITY(U,$J,358.3,19905,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19905,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Elbow
;;^UTILITY(U,$J,358.3,19905,1,4,0)
;;=4^M05.722
;;^UTILITY(U,$J,358.3,19905,2)
;;=^5010005
;;^UTILITY(U,$J,358.3,19906,0)
;;=M05.742^^65^806^3
;;^UTILITY(U,$J,358.3,19906,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19906,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hand
;;^UTILITY(U,$J,358.3,19906,1,4,0)
;;=4^M05.742
;;^UTILITY(U,$J,358.3,19906,2)
;;=^5010011
;;^UTILITY(U,$J,358.3,19907,0)
;;=M05.752^^65^806^4
;;^UTILITY(U,$J,358.3,19907,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19907,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hip
;;^UTILITY(U,$J,358.3,19907,1,4,0)
;;=4^M05.752
;;^UTILITY(U,$J,358.3,19907,2)
;;=^5010014
;;^UTILITY(U,$J,358.3,19908,0)
;;=M05.752^^65^806^5
;;^UTILITY(U,$J,358.3,19908,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19908,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hip
;;^UTILITY(U,$J,358.3,19908,1,4,0)
;;=4^M05.752
;;^UTILITY(U,$J,358.3,19908,2)
;;=^5010014
;;^UTILITY(U,$J,358.3,19909,0)
;;=M05.762^^65^806^6
;;^UTILITY(U,$J,358.3,19909,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19909,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Knee
;;^UTILITY(U,$J,358.3,19909,1,4,0)
;;=4^M05.762
;;^UTILITY(U,$J,358.3,19909,2)
;;=^5010017
;;^UTILITY(U,$J,358.3,19910,0)
;;=M05.712^^65^806^7
;;^UTILITY(U,$J,358.3,19910,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19910,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Shoulder
;;^UTILITY(U,$J,358.3,19910,1,4,0)
;;=4^M05.712
;;^UTILITY(U,$J,358.3,19910,2)
;;=^5010002
;;^UTILITY(U,$J,358.3,19911,0)
;;=M05.732^^65^806^8
;;^UTILITY(U,$J,358.3,19911,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19911,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Wrist
;;^UTILITY(U,$J,358.3,19911,1,4,0)
;;=4^M05.732
;;^UTILITY(U,$J,358.3,19911,2)
;;=^5010008
;;^UTILITY(U,$J,358.3,19912,0)
;;=M05.79^^65^806^9
;;^UTILITY(U,$J,358.3,19912,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19912,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Mult Sites
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI085 19773 printed Dec 13, 2024@01:43:31 Page 2
IBDEI085 ; ; 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,19843,1,3,0)
+2 ;;=3^Skin sensation disturbances,unspec
+3 ;;^UTILITY(U,$J,358.3,19843,1,4,0)
+4 ;;=4^R20.9
+5 ;;^UTILITY(U,$J,358.3,19843,2)
+6 ;;=^5019282
+7 ;;^UTILITY(U,$J,358.3,19844,0)
+8 ;;=G82.50^^65^804^66
+9 ;;^UTILITY(U,$J,358.3,19844,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,19844,1,3,0)
+12 ;;=3^Quadriplegia, unspecified
+13 ;;^UTILITY(U,$J,358.3,19844,1,4,0)
+14 ;;=4^G82.50
+15 ;;^UTILITY(U,$J,358.3,19844,2)
+16 ;;=^5004128
+17 ;;^UTILITY(U,$J,358.3,19845,0)
+18 ;;=G47.9^^65^804^71
+19 ;;^UTILITY(U,$J,358.3,19845,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,19845,1,3,0)
+22 ;;=3^Sleep disorder, unspecified
+23 ;;^UTILITY(U,$J,358.3,19845,1,4,0)
+24 ;;=4^G47.9
+25 ;;^UTILITY(U,$J,358.3,19845,2)
+26 ;;=^5003990
+27 ;;^UTILITY(U,$J,358.3,19846,0)
+28 ;;=G44.209^^65^804^73
+29 ;;^UTILITY(U,$J,358.3,19846,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,19846,1,3,0)
+32 ;;=3^Tension-type headache, unspecified, not intractable
+33 ;;^UTILITY(U,$J,358.3,19846,1,4,0)
+34 ;;=4^G44.209
+35 ;;^UTILITY(U,$J,358.3,19846,2)
+36 ;;=^5003936
+37 ;;^UTILITY(U,$J,358.3,19847,0)
+38 ;;=R32.^^65^804^79
+39 ;;^UTILITY(U,$J,358.3,19847,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,19847,1,3,0)
+42 ;;=3^Urinary incontinence,unspec
+43 ;;^UTILITY(U,$J,358.3,19847,1,4,0)
+44 ;;=4^R32.
+45 ;;^UTILITY(U,$J,358.3,19847,2)
+46 ;;=^5019329
+47 ;;^UTILITY(U,$J,358.3,19848,0)
+48 ;;=R53.1^^65^804^80
+49 ;;^UTILITY(U,$J,358.3,19848,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,19848,1,3,0)
+52 ;;=3^Weakness
+53 ;;^UTILITY(U,$J,358.3,19848,1,4,0)
+54 ;;=4^R53.1
+55 ;;^UTILITY(U,$J,358.3,19848,2)
+56 ;;=^5019516
+57 ;;^UTILITY(U,$J,358.3,19849,0)
+58 ;;=G47.63^^65^804^3
+59 ;;^UTILITY(U,$J,358.3,19849,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,19849,1,3,0)
+62 ;;=3^Bruxism
+63 ;;^UTILITY(U,$J,358.3,19849,1,4,0)
+64 ;;=4^G47.63
+65 ;;^UTILITY(U,$J,358.3,19849,2)
+66 ;;=^332783
+67 ;;^UTILITY(U,$J,358.3,19850,0)
+68 ;;=G56.01^^65^804^8
+69 ;;^UTILITY(U,$J,358.3,19850,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,19850,1,3,0)
+72 ;;=3^Carpal Tunnel Syndrome,Right Upper Limb
+73 ;;^UTILITY(U,$J,358.3,19850,1,4,0)
+74 ;;=4^G56.01
+75 ;;^UTILITY(U,$J,358.3,19850,2)
+76 ;;=^5004018
+77 ;;^UTILITY(U,$J,358.3,19851,0)
+78 ;;=G56.02^^65^804^7
+79 ;;^UTILITY(U,$J,358.3,19851,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,19851,1,3,0)
+82 ;;=3^Carpal Tunnel Syndrome,Left Upper Limb
+83 ;;^UTILITY(U,$J,358.3,19851,1,4,0)
+84 ;;=4^G56.02
+85 ;;^UTILITY(U,$J,358.3,19851,2)
+86 ;;=^5004019
+87 ;;^UTILITY(U,$J,358.3,19852,0)
+88 ;;=S06.0X0A^^65^804^10
+89 ;;^UTILITY(U,$J,358.3,19852,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,19852,1,3,0)
+92 ;;=3^Concussion,Acute
+93 ;;^UTILITY(U,$J,358.3,19852,1,4,0)
+94 ;;=4^S06.0X0A
+95 ;;^UTILITY(U,$J,358.3,19852,2)
+96 ;;=^5020666
+97 ;;^UTILITY(U,$J,358.3,19853,0)
+98 ;;=S06.0X0S^^65^804^11
+99 ;;^UTILITY(U,$J,358.3,19853,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,19853,1,3,0)
+102 ;;=3^Concussion,Sequela
+103 ;;^UTILITY(U,$J,358.3,19853,1,4,0)
+104 ;;=4^S06.0X0S
+105 ;;^UTILITY(U,$J,358.3,19853,2)
+106 ;;=^5020668
+107 ;;^UTILITY(U,$J,358.3,19854,0)
+108 ;;=R42.^^65^804^13
+109 ;;^UTILITY(U,$J,358.3,19854,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,19854,1,3,0)
+112 ;;=3^Dizziness
+113 ;;^UTILITY(U,$J,358.3,19854,1,4,0)
+114 ;;=4^R42.
+115 ;;^UTILITY(U,$J,358.3,19854,2)
+116 ;;=^5019450
+117 ;;^UTILITY(U,$J,358.3,19855,0)
+118 ;;=G57.11^^65^804^26
+119 ;;^UTILITY(U,$J,358.3,19855,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,19855,1,3,0)
+122 ;;=3^Meralgia Paresthetica,Right Lower Limb
+123 ;;^UTILITY(U,$J,358.3,19855,1,4,0)
+124 ;;=4^G57.11
+125 ;;^UTILITY(U,$J,358.3,19855,2)
+126 ;;=^5004042
+127 ;;^UTILITY(U,$J,358.3,19856,0)
+128 ;;=G57.12^^65^804^25
+129 ;;^UTILITY(U,$J,358.3,19856,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,19856,1,3,0)
+132 ;;=3^Meralgia Paresthetica,Left Lower Limb
+133 ;;^UTILITY(U,$J,358.3,19856,1,4,0)
+134 ;;=4^G57.12
+135 ;;^UTILITY(U,$J,358.3,19856,2)
+136 ;;=^5004043
+137 ;;^UTILITY(U,$J,358.3,19857,0)
+138 ;;=G43.901^^65^804^27
+139 ;;^UTILITY(U,$J,358.3,19857,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,19857,1,3,0)
+142 ;;=3^Migraine w/ Status Migrainosus
+143 ;;^UTILITY(U,$J,358.3,19857,1,4,0)
+144 ;;=4^G43.901
+145 ;;^UTILITY(U,$J,358.3,19857,2)
+146 ;;=^5003908
+147 ;;^UTILITY(U,$J,358.3,19858,0)
+148 ;;=M79.601^^65^804^42
+149 ;;^UTILITY(U,$J,358.3,19858,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,19858,1,3,0)
+152 ;;=3^Pain,Arm,Right
+153 ;;^UTILITY(U,$J,358.3,19858,1,4,0)
+154 ;;=4^M79.601
+155 ;;^UTILITY(U,$J,358.3,19858,2)
+156 ;;=^5013325
+157 ;;^UTILITY(U,$J,358.3,19859,0)
+158 ;;=M79.602^^65^804^41
+159 ;;^UTILITY(U,$J,358.3,19859,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,19859,1,3,0)
+162 ;;=3^Pain,Arm,Left
+163 ;;^UTILITY(U,$J,358.3,19859,1,4,0)
+164 ;;=4^M79.602
+165 ;;^UTILITY(U,$J,358.3,19859,2)
+166 ;;=^5013326
+167 ;;^UTILITY(U,$J,358.3,19860,0)
+168 ;;=M25.511^^65^804^56
+169 ;;^UTILITY(U,$J,358.3,19860,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,19860,1,3,0)
+172 ;;=3^Pain,Shoulder,Right
+173 ;;^UTILITY(U,$J,358.3,19860,1,4,0)
+174 ;;=4^M25.511
+175 ;;^UTILITY(U,$J,358.3,19860,2)
+176 ;;=^5011602
+177 ;;^UTILITY(U,$J,358.3,19861,0)
+178 ;;=M25.512^^65^804^55
+179 ;;^UTILITY(U,$J,358.3,19861,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,19861,1,3,0)
+182 ;;=3^Pain,Shoulder,Left
+183 ;;^UTILITY(U,$J,358.3,19861,1,4,0)
+184 ;;=4^M25.512
+185 ;;^UTILITY(U,$J,358.3,19861,2)
+186 ;;=^5011603
+187 ;;^UTILITY(U,$J,358.3,19862,0)
+188 ;;=M25.521^^65^804^44
+189 ;;^UTILITY(U,$J,358.3,19862,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,19862,1,3,0)
+192 ;;=3^Pain,Elbow,Right
+193 ;;^UTILITY(U,$J,358.3,19862,1,4,0)
+194 ;;=4^M25.521
+195 ;;^UTILITY(U,$J,358.3,19862,2)
+196 ;;=^5011605
+197 ;;^UTILITY(U,$J,358.3,19863,0)
+198 ;;=M25.522^^65^804^43
+199 ;;^UTILITY(U,$J,358.3,19863,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,19863,1,3,0)
+202 ;;=3^Pain,Elbow,Left
+203 ;;^UTILITY(U,$J,358.3,19863,1,4,0)
+204 ;;=4^M25.522
+205 ;;^UTILITY(U,$J,358.3,19863,2)
+206 ;;=^5011606
+207 ;;^UTILITY(U,$J,358.3,19864,0)
+208 ;;=M25.531^^65^804^58
+209 ;;^UTILITY(U,$J,358.3,19864,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,19864,1,3,0)
+212 ;;=3^Pain,Wrist,Right
+213 ;;^UTILITY(U,$J,358.3,19864,1,4,0)
+214 ;;=4^M25.531
+215 ;;^UTILITY(U,$J,358.3,19864,2)
+216 ;;=^5011608
+217 ;;^UTILITY(U,$J,358.3,19865,0)
+218 ;;=M25.532^^65^804^57
+219 ;;^UTILITY(U,$J,358.3,19865,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,19865,1,3,0)
+222 ;;=3^Pain,Wrist,Left
+223 ;;^UTILITY(U,$J,358.3,19865,1,4,0)
+224 ;;=4^M25.532
+225 ;;^UTILITY(U,$J,358.3,19865,2)
+226 ;;=^5011609
+227 ;;^UTILITY(U,$J,358.3,19866,0)
+228 ;;=M79.641^^65^804^48
+229 ;;^UTILITY(U,$J,358.3,19866,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,19866,1,3,0)
+232 ;;=3^Pain,Hand,Right
+233 ;;^UTILITY(U,$J,358.3,19866,1,4,0)
+234 ;;=4^M79.641
+235 ;;^UTILITY(U,$J,358.3,19866,2)
+236 ;;=^5013338
+237 ;;^UTILITY(U,$J,358.3,19867,0)
+238 ;;=M79.642^^65^804^47
+239 ;;^UTILITY(U,$J,358.3,19867,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,19867,1,3,0)
+242 ;;=3^Pain,Hand,Left
+243 ;;^UTILITY(U,$J,358.3,19867,1,4,0)
+244 ;;=4^M79.642
+245 ;;^UTILITY(U,$J,358.3,19867,2)
+246 ;;=^5013339
+247 ;;^UTILITY(U,$J,358.3,19868,0)
+248 ;;=M79.604^^65^804^54
+249 ;;^UTILITY(U,$J,358.3,19868,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,19868,1,3,0)
+252 ;;=3^Pain,Leg,Right
+253 ;;^UTILITY(U,$J,358.3,19868,1,4,0)
+254 ;;=4^M79.604
+255 ;;^UTILITY(U,$J,358.3,19868,2)
+256 ;;=^5013328
+257 ;;^UTILITY(U,$J,358.3,19869,0)
+258 ;;=M79.605^^65^804^53
+259 ;;^UTILITY(U,$J,358.3,19869,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,19869,1,3,0)
+262 ;;=3^Pain,Leg,Left
+263 ;;^UTILITY(U,$J,358.3,19869,1,4,0)
+264 ;;=4^M79.605
+265 ;;^UTILITY(U,$J,358.3,19869,2)
+266 ;;=^5013329
+267 ;;^UTILITY(U,$J,358.3,19870,0)
+268 ;;=M25.551^^65^804^50
+269 ;;^UTILITY(U,$J,358.3,19870,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,19870,1,3,0)
+272 ;;=3^Pain,Hip,Right
+273 ;;^UTILITY(U,$J,358.3,19870,1,4,0)
+274 ;;=4^M25.551
+275 ;;^UTILITY(U,$J,358.3,19870,2)
+276 ;;=^5011611
+277 ;;^UTILITY(U,$J,358.3,19871,0)
+278 ;;=M25.552^^65^804^49
+279 ;;^UTILITY(U,$J,358.3,19871,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,19871,1,3,0)
+282 ;;=3^Pain,Hip,Left
+283 ;;^UTILITY(U,$J,358.3,19871,1,4,0)
+284 ;;=4^M25.552
+285 ;;^UTILITY(U,$J,358.3,19871,2)
+286 ;;=^5011612
+287 ;;^UTILITY(U,$J,358.3,19872,0)
+288 ;;=M25.561^^65^804^52
+289 ;;^UTILITY(U,$J,358.3,19872,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,19872,1,3,0)
+292 ;;=3^Pain,Knee,Right
+293 ;;^UTILITY(U,$J,358.3,19872,1,4,0)
+294 ;;=4^M25.561
+295 ;;^UTILITY(U,$J,358.3,19872,2)
+296 ;;=^5011614
+297 ;;^UTILITY(U,$J,358.3,19873,0)
+298 ;;=M25.562^^65^804^51
+299 ;;^UTILITY(U,$J,358.3,19873,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,19873,1,3,0)
+302 ;;=3^Pain,Knee,Left
+303 ;;^UTILITY(U,$J,358.3,19873,1,4,0)
+304 ;;=4^M25.562
+305 ;;^UTILITY(U,$J,358.3,19873,2)
+306 ;;=^5011615
+307 ;;^UTILITY(U,$J,358.3,19874,0)
+308 ;;=M25.571^^65^804^40
+309 ;;^UTILITY(U,$J,358.3,19874,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,19874,1,3,0)
+312 ;;=3^Pain,Ankle,Right
+313 ;;^UTILITY(U,$J,358.3,19874,1,4,0)
+314 ;;=4^M25.571
+315 ;;^UTILITY(U,$J,358.3,19874,2)
+316 ;;=^5011617
+317 ;;^UTILITY(U,$J,358.3,19875,0)
+318 ;;=M25.572^^65^804^39
+319 ;;^UTILITY(U,$J,358.3,19875,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,19875,1,3,0)
+322 ;;=3^Pain,Ankle,Left
+323 ;;^UTILITY(U,$J,358.3,19875,1,4,0)
+324 ;;=4^M25.572
+325 ;;^UTILITY(U,$J,358.3,19875,2)
+326 ;;=^5011618
+327 ;;^UTILITY(U,$J,358.3,19876,0)
+328 ;;=M79.671^^65^804^46
+329 ;;^UTILITY(U,$J,358.3,19876,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,19876,1,3,0)
+332 ;;=3^Pain,Foot,Right
+333 ;;^UTILITY(U,$J,358.3,19876,1,4,0)
+334 ;;=4^M79.671
+335 ;;^UTILITY(U,$J,358.3,19876,2)
+336 ;;=^5013350
+337 ;;^UTILITY(U,$J,358.3,19877,0)
+338 ;;=M79.672^^65^804^45
+339 ;;^UTILITY(U,$J,358.3,19877,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,19877,1,3,0)
+342 ;;=3^Pain,Foot,Left
+343 ;;^UTILITY(U,$J,358.3,19877,1,4,0)
+344 ;;=4^M79.672
+345 ;;^UTILITY(U,$J,358.3,19877,2)
+346 ;;=^5013351
+347 ;;^UTILITY(U,$J,358.3,19878,0)
+348 ;;=M54.31^^65^804^68
+349 ;;^UTILITY(U,$J,358.3,19878,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,19878,1,3,0)
+352 ;;=3^Sciatica,Right
+353 ;;^UTILITY(U,$J,358.3,19878,1,4,0)
+354 ;;=4^M54.31
+355 ;;^UTILITY(U,$J,358.3,19878,2)
+356 ;;=^5012306
+357 ;;^UTILITY(U,$J,358.3,19879,0)
+358 ;;=M54.32^^65^804^67
+359 ;;^UTILITY(U,$J,358.3,19879,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,19879,1,3,0)
+362 ;;=3^Sciatica,Left
+363 ;;^UTILITY(U,$J,358.3,19879,1,4,0)
+364 ;;=4^M54.32
+365 ;;^UTILITY(U,$J,358.3,19879,2)
+366 ;;=^5012307
+367 ;;^UTILITY(U,$J,358.3,19880,0)
+368 ;;=G44.201^^65^804^72
+369 ;;^UTILITY(U,$J,358.3,19880,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,19880,1,3,0)
+372 ;;=3^Tension Headache,Intractable
+373 ;;^UTILITY(U,$J,358.3,19880,1,4,0)
+374 ;;=4^G44.201
+375 ;;^UTILITY(U,$J,358.3,19880,2)
+376 ;;=^5003935
+377 ;;^UTILITY(U,$J,358.3,19881,0)
+378 ;;=G50.0^^65^804^78
+379 ;;^UTILITY(U,$J,358.3,19881,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,19881,1,3,0)
+382 ;;=3^Trigeminal Neuralgia
+383 ;;^UTILITY(U,$J,358.3,19881,1,4,0)
+384 ;;=4^G50.0
+385 ;;^UTILITY(U,$J,358.3,19881,2)
+386 ;;=^121978
+387 ;;^UTILITY(U,$J,358.3,19882,0)
+388 ;;=M79.10^^65^804^30
+389 ;;^UTILITY(U,$J,358.3,19882,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,19882,1,3,0)
+392 ;;=3^Myalga,Unspec Site
+393 ;;^UTILITY(U,$J,358.3,19882,1,4,0)
+394 ;;=4^M79.10
+395 ;;^UTILITY(U,$J,358.3,19882,2)
+396 ;;=^5157394
+397 ;;^UTILITY(U,$J,358.3,19883,0)
+398 ;;=M79.11^^65^804^32
+399 ;;^UTILITY(U,$J,358.3,19883,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,19883,1,3,0)
+402 ;;=3^Myalgia,Mastication Muscle
+403 ;;^UTILITY(U,$J,358.3,19883,1,4,0)
+404 ;;=4^M79.11
+405 ;;^UTILITY(U,$J,358.3,19883,2)
+406 ;;=^5157395
+407 ;;^UTILITY(U,$J,358.3,19884,0)
+408 ;;=M79.12^^65^804^31
+409 ;;^UTILITY(U,$J,358.3,19884,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,19884,1,3,0)
+412 ;;=3^Myalgia,Auxiliary Muscles,Head/Neck
+413 ;;^UTILITY(U,$J,358.3,19884,1,4,0)
+414 ;;=4^M79.12
+415 ;;^UTILITY(U,$J,358.3,19884,2)
+416 ;;=^5157396
+417 ;;^UTILITY(U,$J,358.3,19885,0)
+418 ;;=M79.18^^65^804^33
+419 ;;^UTILITY(U,$J,358.3,19885,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,19885,1,3,0)
+422 ;;=3^Myalgia,Other Site
+423 ;;^UTILITY(U,$J,358.3,19885,1,4,0)
+424 ;;=4^M79.18
+425 ;;^UTILITY(U,$J,358.3,19885,2)
+426 ;;=^5157397
+427 ;;^UTILITY(U,$J,358.3,19886,0)
+428 ;;=R51.0^^65^804^20
+429 ;;^UTILITY(U,$J,358.3,19886,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,19886,1,3,0)
+432 ;;=3^Headache w/ Orthostatic Component
+433 ;;^UTILITY(U,$J,358.3,19886,1,4,0)
+434 ;;=4^R51.0
+435 ;;^UTILITY(U,$J,358.3,19886,2)
+436 ;;=^5159305
+437 ;;^UTILITY(U,$J,358.3,19887,0)
+438 ;;=R51.9^^65^804^21
+439 ;;^UTILITY(U,$J,358.3,19887,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,19887,1,3,0)
+442 ;;=3^Headache,Unspec
+443 ;;^UTILITY(U,$J,358.3,19887,1,4,0)
+444 ;;=4^R51.9
+445 ;;^UTILITY(U,$J,358.3,19887,2)
+446 ;;=^5159306
+447 ;;^UTILITY(U,$J,358.3,19888,0)
+448 ;;=T20.20XS^^65^804^4
+449 ;;^UTILITY(U,$J,358.3,19888,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,19888,1,3,0)
+452 ;;=3^Burn 2nd Degree of Head,Face,Neck,Unspec Site,Sequela
+453 ;;^UTILITY(U,$J,358.3,19888,1,4,0)
+454 ;;=4^T20.20XS
+455 ;;^UTILITY(U,$J,358.3,19888,2)
+456 ;;=^5046707
+457 ;;^UTILITY(U,$J,358.3,19889,0)
+458 ;;=T20.30XS^^65^804^5
+459 ;;^UTILITY(U,$J,358.3,19889,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,19889,1,3,0)
+462 ;;=3^Burn 3rd Degree of Head,Face,Neck,Unspec Site,Sequela
+463 ;;^UTILITY(U,$J,358.3,19889,1,4,0)
+464 ;;=4^T20.30XS
+465 ;;^UTILITY(U,$J,358.3,19889,2)
+466 ;;=^5046740
+467 ;;^UTILITY(U,$J,358.3,19890,0)
+468 ;;=Z47.1^^65^805^1
+469 ;;^UTILITY(U,$J,358.3,19890,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,19890,1,3,0)
+472 ;;=3^Aftercare following joint replacement surgery
+473 ;;^UTILITY(U,$J,358.3,19890,1,4,0)
+474 ;;=4^Z47.1
+475 ;;^UTILITY(U,$J,358.3,19890,2)
+476 ;;=^5063025
+477 ;;^UTILITY(U,$J,358.3,19891,0)
+478 ;;=Z96.662^^65^805^2
+479 ;;^UTILITY(U,$J,358.3,19891,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,19891,1,3,0)
+482 ;;=3^Presence of left artificial ankle joint
+483 ;;^UTILITY(U,$J,358.3,19891,1,4,0)
+484 ;;=4^Z96.662
+485 ;;^UTILITY(U,$J,358.3,19891,2)
+486 ;;=^5063710
+487 ;;^UTILITY(U,$J,358.3,19892,0)
+488 ;;=Z96.622^^65^805^3
+489 ;;^UTILITY(U,$J,358.3,19892,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,19892,1,3,0)
+492 ;;=3^Presence of left artificial elbow joint
+493 ;;^UTILITY(U,$J,358.3,19892,1,4,0)
+494 ;;=4^Z96.622
+495 ;;^UTILITY(U,$J,358.3,19892,2)
+496 ;;=^5063696
+497 ;;^UTILITY(U,$J,358.3,19893,0)
+498 ;;=Z96.642^^65^805^4
+499 ;;^UTILITY(U,$J,358.3,19893,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,19893,1,3,0)
+502 ;;=3^Presence of left artificial hip joint
+503 ;;^UTILITY(U,$J,358.3,19893,1,4,0)
+504 ;;=4^Z96.642
+505 ;;^UTILITY(U,$J,358.3,19893,2)
+506 ;;=^5063702
+507 ;;^UTILITY(U,$J,358.3,19894,0)
+508 ;;=Z96.652^^65^805^5
+509 ;;^UTILITY(U,$J,358.3,19894,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,19894,1,3,0)
+512 ;;=3^Presence of left artificial knee joint
+513 ;;^UTILITY(U,$J,358.3,19894,1,4,0)
+514 ;;=4^Z96.652
+515 ;;^UTILITY(U,$J,358.3,19894,2)
+516 ;;=^5063706
+517 ;;^UTILITY(U,$J,358.3,19895,0)
+518 ;;=Z96.612^^65^805^6
+519 ;;^UTILITY(U,$J,358.3,19895,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,19895,1,3,0)
+522 ;;=3^Presence of left artificial shoulder joint
+523 ;;^UTILITY(U,$J,358.3,19895,1,4,0)
+524 ;;=4^Z96.612
+525 ;;^UTILITY(U,$J,358.3,19895,2)
+526 ;;=^5063693
+527 ;;^UTILITY(U,$J,358.3,19896,0)
+528 ;;=Z96.632^^65^805^7
+529 ;;^UTILITY(U,$J,358.3,19896,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,19896,1,3,0)
+532 ;;=3^Presence of left artificial wrist joint
+533 ;;^UTILITY(U,$J,358.3,19896,1,4,0)
+534 ;;=4^Z96.632
+535 ;;^UTILITY(U,$J,358.3,19896,2)
+536 ;;=^5063699
+537 ;;^UTILITY(U,$J,358.3,19897,0)
+538 ;;=Z96.60^^65^805^14
+539 ;;^UTILITY(U,$J,358.3,19897,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,19897,1,3,0)
+542 ;;=3^Presence of unspecified orthopedic joint implant
+543 ;;^UTILITY(U,$J,358.3,19897,1,4,0)
+544 ;;=4^Z96.60
+545 ;;^UTILITY(U,$J,358.3,19897,2)
+546 ;;=^5063691
+547 ;;^UTILITY(U,$J,358.3,19898,0)
+548 ;;=Z96.661^^65^805^8
+549 ;;^UTILITY(U,$J,358.3,19898,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,19898,1,3,0)
+552 ;;=3^Presence of right artificial ankle joint
+553 ;;^UTILITY(U,$J,358.3,19898,1,4,0)
+554 ;;=4^Z96.661
+555 ;;^UTILITY(U,$J,358.3,19898,2)
+556 ;;=^5063709
+557 ;;^UTILITY(U,$J,358.3,19899,0)
+558 ;;=Z96.621^^65^805^9
+559 ;;^UTILITY(U,$J,358.3,19899,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,19899,1,3,0)
+562 ;;=3^Presence of right artificial elbow joint
+563 ;;^UTILITY(U,$J,358.3,19899,1,4,0)
+564 ;;=4^Z96.621
+565 ;;^UTILITY(U,$J,358.3,19899,2)
+566 ;;=^5063695
+567 ;;^UTILITY(U,$J,358.3,19900,0)
+568 ;;=Z96.641^^65^805^10
+569 ;;^UTILITY(U,$J,358.3,19900,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,19900,1,3,0)
+572 ;;=3^Presence of right artificial hip joint
+573 ;;^UTILITY(U,$J,358.3,19900,1,4,0)
+574 ;;=4^Z96.641
+575 ;;^UTILITY(U,$J,358.3,19900,2)
+576 ;;=^5063701
+577 ;;^UTILITY(U,$J,358.3,19901,0)
+578 ;;=Z96.651^^65^805^11
+579 ;;^UTILITY(U,$J,358.3,19901,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,19901,1,3,0)
+582 ;;=3^Presence of right artificial knee joint
+583 ;;^UTILITY(U,$J,358.3,19901,1,4,0)
+584 ;;=4^Z96.651
+585 ;;^UTILITY(U,$J,358.3,19901,2)
+586 ;;=^5063705
+587 ;;^UTILITY(U,$J,358.3,19902,0)
+588 ;;=Z96.611^^65^805^12
+589 ;;^UTILITY(U,$J,358.3,19902,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,19902,1,3,0)
+592 ;;=3^Presence of right artificial shoulder joint
+593 ;;^UTILITY(U,$J,358.3,19902,1,4,0)
+594 ;;=4^Z96.611
+595 ;;^UTILITY(U,$J,358.3,19902,2)
+596 ;;=^5063692
+597 ;;^UTILITY(U,$J,358.3,19903,0)
+598 ;;=Z96.631^^65^805^13
+599 ;;^UTILITY(U,$J,358.3,19903,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,19903,1,3,0)
+602 ;;=3^Presence of right artificial wrist joint
+603 ;;^UTILITY(U,$J,358.3,19903,1,4,0)
+604 ;;=4^Z96.631
+605 ;;^UTILITY(U,$J,358.3,19903,2)
+606 ;;=^5063698
+607 ;;^UTILITY(U,$J,358.3,19904,0)
+608 ;;=M05.772^^65^806^1
+609 ;;^UTILITY(U,$J,358.3,19904,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,19904,1,3,0)
+612 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Ankle/Foot
+613 ;;^UTILITY(U,$J,358.3,19904,1,4,0)
+614 ;;=4^M05.772
+615 ;;^UTILITY(U,$J,358.3,19904,2)
+616 ;;=^5010020
+617 ;;^UTILITY(U,$J,358.3,19905,0)
+618 ;;=M05.722^^65^806^2
+619 ;;^UTILITY(U,$J,358.3,19905,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,19905,1,3,0)
+622 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Elbow
+623 ;;^UTILITY(U,$J,358.3,19905,1,4,0)
+624 ;;=4^M05.722
+625 ;;^UTILITY(U,$J,358.3,19905,2)
+626 ;;=^5010005
+627 ;;^UTILITY(U,$J,358.3,19906,0)
+628 ;;=M05.742^^65^806^3
+629 ;;^UTILITY(U,$J,358.3,19906,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,19906,1,3,0)
+632 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hand
+633 ;;^UTILITY(U,$J,358.3,19906,1,4,0)
+634 ;;=4^M05.742
+635 ;;^UTILITY(U,$J,358.3,19906,2)
+636 ;;=^5010011
+637 ;;^UTILITY(U,$J,358.3,19907,0)
+638 ;;=M05.752^^65^806^4
+639 ;;^UTILITY(U,$J,358.3,19907,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,19907,1,3,0)
+642 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hip
+643 ;;^UTILITY(U,$J,358.3,19907,1,4,0)
+644 ;;=4^M05.752
+645 ;;^UTILITY(U,$J,358.3,19907,2)
+646 ;;=^5010014
+647 ;;^UTILITY(U,$J,358.3,19908,0)
+648 ;;=M05.752^^65^806^5
+649 ;;^UTILITY(U,$J,358.3,19908,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,19908,1,3,0)
+652 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hip
+653 ;;^UTILITY(U,$J,358.3,19908,1,4,0)
+654 ;;=4^M05.752
+655 ;;^UTILITY(U,$J,358.3,19908,2)
+656 ;;=^5010014
+657 ;;^UTILITY(U,$J,358.3,19909,0)
+658 ;;=M05.762^^65^806^6
+659 ;;^UTILITY(U,$J,358.3,19909,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,19909,1,3,0)
+662 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Knee
+663 ;;^UTILITY(U,$J,358.3,19909,1,4,0)
+664 ;;=4^M05.762
+665 ;;^UTILITY(U,$J,358.3,19909,2)
+666 ;;=^5010017
+667 ;;^UTILITY(U,$J,358.3,19910,0)
+668 ;;=M05.712^^65^806^7
+669 ;;^UTILITY(U,$J,358.3,19910,1,0)
+670 ;;=^358.31IA^4^2
+671 ;;^UTILITY(U,$J,358.3,19910,1,3,0)
+672 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Shoulder
+673 ;;^UTILITY(U,$J,358.3,19910,1,4,0)
+674 ;;=4^M05.712
+675 ;;^UTILITY(U,$J,358.3,19910,2)
+676 ;;=^5010002
+677 ;;^UTILITY(U,$J,358.3,19911,0)
+678 ;;=M05.732^^65^806^8
+679 ;;^UTILITY(U,$J,358.3,19911,1,0)
+680 ;;=^358.31IA^4^2
+681 ;;^UTILITY(U,$J,358.3,19911,1,3,0)
+682 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Wrist
+683 ;;^UTILITY(U,$J,358.3,19911,1,4,0)
+684 ;;=4^M05.732
+685 ;;^UTILITY(U,$J,358.3,19911,2)
+686 ;;=^5010008
+687 ;;^UTILITY(U,$J,358.3,19912,0)
+688 ;;=M05.79^^65^806^9
+689 ;;^UTILITY(U,$J,358.3,19912,1,0)
+690 ;;=^358.31IA^4^2
+691 ;;^UTILITY(U,$J,358.3,19912,1,3,0)
+692 ;;=3^Rheum Arthritis w/ Rheum Factor,Mult Sites