IBDEI08J ; ; 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,20814,1,3,0)
;;=3^Dizziness
;;^UTILITY(U,$J,358.3,20814,1,4,0)
;;=4^R42.
;;^UTILITY(U,$J,358.3,20814,2)
;;=^5019450
;;^UTILITY(U,$J,358.3,20815,0)
;;=G57.11^^68^852^26
;;^UTILITY(U,$J,358.3,20815,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20815,1,3,0)
;;=3^Meralgia Paresthetica,Right Lower Limb
;;^UTILITY(U,$J,358.3,20815,1,4,0)
;;=4^G57.11
;;^UTILITY(U,$J,358.3,20815,2)
;;=^5004042
;;^UTILITY(U,$J,358.3,20816,0)
;;=G57.12^^68^852^25
;;^UTILITY(U,$J,358.3,20816,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20816,1,3,0)
;;=3^Meralgia Paresthetica,Left Lower Limb
;;^UTILITY(U,$J,358.3,20816,1,4,0)
;;=4^G57.12
;;^UTILITY(U,$J,358.3,20816,2)
;;=^5004043
;;^UTILITY(U,$J,358.3,20817,0)
;;=G43.901^^68^852^27
;;^UTILITY(U,$J,358.3,20817,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20817,1,3,0)
;;=3^Migraine w/ Status Migrainosus
;;^UTILITY(U,$J,358.3,20817,1,4,0)
;;=4^G43.901
;;^UTILITY(U,$J,358.3,20817,2)
;;=^5003908
;;^UTILITY(U,$J,358.3,20818,0)
;;=M79.601^^68^852^42
;;^UTILITY(U,$J,358.3,20818,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20818,1,3,0)
;;=3^Pain,Arm,Right
;;^UTILITY(U,$J,358.3,20818,1,4,0)
;;=4^M79.601
;;^UTILITY(U,$J,358.3,20818,2)
;;=^5013325
;;^UTILITY(U,$J,358.3,20819,0)
;;=M79.602^^68^852^41
;;^UTILITY(U,$J,358.3,20819,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20819,1,3,0)
;;=3^Pain,Arm,Left
;;^UTILITY(U,$J,358.3,20819,1,4,0)
;;=4^M79.602
;;^UTILITY(U,$J,358.3,20819,2)
;;=^5013326
;;^UTILITY(U,$J,358.3,20820,0)
;;=M25.511^^68^852^56
;;^UTILITY(U,$J,358.3,20820,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20820,1,3,0)
;;=3^Pain,Shoulder,Right
;;^UTILITY(U,$J,358.3,20820,1,4,0)
;;=4^M25.511
;;^UTILITY(U,$J,358.3,20820,2)
;;=^5011602
;;^UTILITY(U,$J,358.3,20821,0)
;;=M25.512^^68^852^55
;;^UTILITY(U,$J,358.3,20821,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20821,1,3,0)
;;=3^Pain,Shoulder,Left
;;^UTILITY(U,$J,358.3,20821,1,4,0)
;;=4^M25.512
;;^UTILITY(U,$J,358.3,20821,2)
;;=^5011603
;;^UTILITY(U,$J,358.3,20822,0)
;;=M25.521^^68^852^44
;;^UTILITY(U,$J,358.3,20822,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20822,1,3,0)
;;=3^Pain,Elbow,Right
;;^UTILITY(U,$J,358.3,20822,1,4,0)
;;=4^M25.521
;;^UTILITY(U,$J,358.3,20822,2)
;;=^5011605
;;^UTILITY(U,$J,358.3,20823,0)
;;=M25.522^^68^852^43
;;^UTILITY(U,$J,358.3,20823,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20823,1,3,0)
;;=3^Pain,Elbow,Left
;;^UTILITY(U,$J,358.3,20823,1,4,0)
;;=4^M25.522
;;^UTILITY(U,$J,358.3,20823,2)
;;=^5011606
;;^UTILITY(U,$J,358.3,20824,0)
;;=M25.531^^68^852^58
;;^UTILITY(U,$J,358.3,20824,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20824,1,3,0)
;;=3^Pain,Wrist,Right
;;^UTILITY(U,$J,358.3,20824,1,4,0)
;;=4^M25.531
;;^UTILITY(U,$J,358.3,20824,2)
;;=^5011608
;;^UTILITY(U,$J,358.3,20825,0)
;;=M25.532^^68^852^57
;;^UTILITY(U,$J,358.3,20825,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20825,1,3,0)
;;=3^Pain,Wrist,Left
;;^UTILITY(U,$J,358.3,20825,1,4,0)
;;=4^M25.532
;;^UTILITY(U,$J,358.3,20825,2)
;;=^5011609
;;^UTILITY(U,$J,358.3,20826,0)
;;=M79.641^^68^852^48
;;^UTILITY(U,$J,358.3,20826,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20826,1,3,0)
;;=3^Pain,Hand,Right
;;^UTILITY(U,$J,358.3,20826,1,4,0)
;;=4^M79.641
;;^UTILITY(U,$J,358.3,20826,2)
;;=^5013338
;;^UTILITY(U,$J,358.3,20827,0)
;;=M79.642^^68^852^47
;;^UTILITY(U,$J,358.3,20827,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20827,1,3,0)
;;=3^Pain,Hand,Left
;;^UTILITY(U,$J,358.3,20827,1,4,0)
;;=4^M79.642
;;^UTILITY(U,$J,358.3,20827,2)
;;=^5013339
;;^UTILITY(U,$J,358.3,20828,0)
;;=M79.604^^68^852^54
;;^UTILITY(U,$J,358.3,20828,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20828,1,3,0)
;;=3^Pain,Leg,Right
;;^UTILITY(U,$J,358.3,20828,1,4,0)
;;=4^M79.604
;;^UTILITY(U,$J,358.3,20828,2)
;;=^5013328
;;^UTILITY(U,$J,358.3,20829,0)
;;=M79.605^^68^852^53
;;^UTILITY(U,$J,358.3,20829,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20829,1,3,0)
;;=3^Pain,Leg,Left
;;^UTILITY(U,$J,358.3,20829,1,4,0)
;;=4^M79.605
;;^UTILITY(U,$J,358.3,20829,2)
;;=^5013329
;;^UTILITY(U,$J,358.3,20830,0)
;;=M25.551^^68^852^50
;;^UTILITY(U,$J,358.3,20830,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20830,1,3,0)
;;=3^Pain,Hip,Right
;;^UTILITY(U,$J,358.3,20830,1,4,0)
;;=4^M25.551
;;^UTILITY(U,$J,358.3,20830,2)
;;=^5011611
;;^UTILITY(U,$J,358.3,20831,0)
;;=M25.552^^68^852^49
;;^UTILITY(U,$J,358.3,20831,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20831,1,3,0)
;;=3^Pain,Hip,Left
;;^UTILITY(U,$J,358.3,20831,1,4,0)
;;=4^M25.552
;;^UTILITY(U,$J,358.3,20831,2)
;;=^5011612
;;^UTILITY(U,$J,358.3,20832,0)
;;=M25.561^^68^852^52
;;^UTILITY(U,$J,358.3,20832,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20832,1,3,0)
;;=3^Pain,Knee,Right
;;^UTILITY(U,$J,358.3,20832,1,4,0)
;;=4^M25.561
;;^UTILITY(U,$J,358.3,20832,2)
;;=^5011614
;;^UTILITY(U,$J,358.3,20833,0)
;;=M25.562^^68^852^51
;;^UTILITY(U,$J,358.3,20833,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20833,1,3,0)
;;=3^Pain,Knee,Left
;;^UTILITY(U,$J,358.3,20833,1,4,0)
;;=4^M25.562
;;^UTILITY(U,$J,358.3,20833,2)
;;=^5011615
;;^UTILITY(U,$J,358.3,20834,0)
;;=M25.571^^68^852^40
;;^UTILITY(U,$J,358.3,20834,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20834,1,3,0)
;;=3^Pain,Ankle,Right
;;^UTILITY(U,$J,358.3,20834,1,4,0)
;;=4^M25.571
;;^UTILITY(U,$J,358.3,20834,2)
;;=^5011617
;;^UTILITY(U,$J,358.3,20835,0)
;;=M25.572^^68^852^39
;;^UTILITY(U,$J,358.3,20835,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20835,1,3,0)
;;=3^Pain,Ankle,Left
;;^UTILITY(U,$J,358.3,20835,1,4,0)
;;=4^M25.572
;;^UTILITY(U,$J,358.3,20835,2)
;;=^5011618
;;^UTILITY(U,$J,358.3,20836,0)
;;=M79.671^^68^852^46
;;^UTILITY(U,$J,358.3,20836,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20836,1,3,0)
;;=3^Pain,Foot,Right
;;^UTILITY(U,$J,358.3,20836,1,4,0)
;;=4^M79.671
;;^UTILITY(U,$J,358.3,20836,2)
;;=^5013350
;;^UTILITY(U,$J,358.3,20837,0)
;;=M79.672^^68^852^45
;;^UTILITY(U,$J,358.3,20837,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20837,1,3,0)
;;=3^Pain,Foot,Left
;;^UTILITY(U,$J,358.3,20837,1,4,0)
;;=4^M79.672
;;^UTILITY(U,$J,358.3,20837,2)
;;=^5013351
;;^UTILITY(U,$J,358.3,20838,0)
;;=M54.31^^68^852^68
;;^UTILITY(U,$J,358.3,20838,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20838,1,3,0)
;;=3^Sciatica,Right
;;^UTILITY(U,$J,358.3,20838,1,4,0)
;;=4^M54.31
;;^UTILITY(U,$J,358.3,20838,2)
;;=^5012306
;;^UTILITY(U,$J,358.3,20839,0)
;;=M54.32^^68^852^67
;;^UTILITY(U,$J,358.3,20839,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20839,1,3,0)
;;=3^Sciatica,Left
;;^UTILITY(U,$J,358.3,20839,1,4,0)
;;=4^M54.32
;;^UTILITY(U,$J,358.3,20839,2)
;;=^5012307
;;^UTILITY(U,$J,358.3,20840,0)
;;=G44.201^^68^852^72
;;^UTILITY(U,$J,358.3,20840,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20840,1,3,0)
;;=3^Tension Headache,Intractable
;;^UTILITY(U,$J,358.3,20840,1,4,0)
;;=4^G44.201
;;^UTILITY(U,$J,358.3,20840,2)
;;=^5003935
;;^UTILITY(U,$J,358.3,20841,0)
;;=G50.0^^68^852^78
;;^UTILITY(U,$J,358.3,20841,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20841,1,3,0)
;;=3^Trigeminal Neuralgia
;;^UTILITY(U,$J,358.3,20841,1,4,0)
;;=4^G50.0
;;^UTILITY(U,$J,358.3,20841,2)
;;=^121978
;;^UTILITY(U,$J,358.3,20842,0)
;;=M79.10^^68^852^30
;;^UTILITY(U,$J,358.3,20842,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20842,1,3,0)
;;=3^Myalga,Unspec Site
;;^UTILITY(U,$J,358.3,20842,1,4,0)
;;=4^M79.10
;;^UTILITY(U,$J,358.3,20842,2)
;;=^5157394
;;^UTILITY(U,$J,358.3,20843,0)
;;=M79.11^^68^852^32
;;^UTILITY(U,$J,358.3,20843,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20843,1,3,0)
;;=3^Myalgia,Mastication Muscle
;;^UTILITY(U,$J,358.3,20843,1,4,0)
;;=4^M79.11
;;^UTILITY(U,$J,358.3,20843,2)
;;=^5157395
;;^UTILITY(U,$J,358.3,20844,0)
;;=M79.12^^68^852^31
;;^UTILITY(U,$J,358.3,20844,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20844,1,3,0)
;;=3^Myalgia,Auxiliary Muscles,Head/Neck
;;^UTILITY(U,$J,358.3,20844,1,4,0)
;;=4^M79.12
;;^UTILITY(U,$J,358.3,20844,2)
;;=^5157396
;;^UTILITY(U,$J,358.3,20845,0)
;;=M79.18^^68^852^33
;;^UTILITY(U,$J,358.3,20845,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20845,1,3,0)
;;=3^Myalgia,Other Site
;;^UTILITY(U,$J,358.3,20845,1,4,0)
;;=4^M79.18
;;^UTILITY(U,$J,358.3,20845,2)
;;=^5157397
;;^UTILITY(U,$J,358.3,20846,0)
;;=R51.0^^68^852^20
;;^UTILITY(U,$J,358.3,20846,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20846,1,3,0)
;;=3^Headache w/ Orthostatic Component
;;^UTILITY(U,$J,358.3,20846,1,4,0)
;;=4^R51.0
;;^UTILITY(U,$J,358.3,20846,2)
;;=^5159305
;;^UTILITY(U,$J,358.3,20847,0)
;;=R51.9^^68^852^21
;;^UTILITY(U,$J,358.3,20847,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20847,1,3,0)
;;=3^Headache,Unspec
;;^UTILITY(U,$J,358.3,20847,1,4,0)
;;=4^R51.9
;;^UTILITY(U,$J,358.3,20847,2)
;;=^5159306
;;^UTILITY(U,$J,358.3,20848,0)
;;=T20.20XS^^68^852^4
;;^UTILITY(U,$J,358.3,20848,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20848,1,3,0)
;;=3^Burn 2nd Degree of Head,Face,Neck,Unspec Site,Sequela
;;^UTILITY(U,$J,358.3,20848,1,4,0)
;;=4^T20.20XS
;;^UTILITY(U,$J,358.3,20848,2)
;;=^5046707
;;^UTILITY(U,$J,358.3,20849,0)
;;=T20.30XS^^68^852^5
;;^UTILITY(U,$J,358.3,20849,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20849,1,3,0)
;;=3^Burn 3rd Degree of Head,Face,Neck,Unspec Site,Sequela
;;^UTILITY(U,$J,358.3,20849,1,4,0)
;;=4^T20.30XS
;;^UTILITY(U,$J,358.3,20849,2)
;;=^5046740
;;^UTILITY(U,$J,358.3,20850,0)
;;=Z47.1^^68^853^1
;;^UTILITY(U,$J,358.3,20850,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20850,1,3,0)
;;=3^Aftercare following joint replacement surgery
;;^UTILITY(U,$J,358.3,20850,1,4,0)
;;=4^Z47.1
;;^UTILITY(U,$J,358.3,20850,2)
;;=^5063025
;;^UTILITY(U,$J,358.3,20851,0)
;;=Z96.662^^68^853^2
;;^UTILITY(U,$J,358.3,20851,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20851,1,3,0)
;;=3^Presence of left artificial ankle joint
;;^UTILITY(U,$J,358.3,20851,1,4,0)
;;=4^Z96.662
;;^UTILITY(U,$J,358.3,20851,2)
;;=^5063710
;;^UTILITY(U,$J,358.3,20852,0)
;;=Z96.622^^68^853^3
;;^UTILITY(U,$J,358.3,20852,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20852,1,3,0)
;;=3^Presence of left artificial elbow joint
;;^UTILITY(U,$J,358.3,20852,1,4,0)
;;=4^Z96.622
;;^UTILITY(U,$J,358.3,20852,2)
;;=^5063696
;;^UTILITY(U,$J,358.3,20853,0)
;;=Z96.642^^68^853^4
;;^UTILITY(U,$J,358.3,20853,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20853,1,3,0)
;;=3^Presence of left artificial hip joint
;;^UTILITY(U,$J,358.3,20853,1,4,0)
;;=4^Z96.642
;;^UTILITY(U,$J,358.3,20853,2)
;;=^5063702
;;^UTILITY(U,$J,358.3,20854,0)
;;=Z96.652^^68^853^5
;;^UTILITY(U,$J,358.3,20854,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20854,1,3,0)
;;=3^Presence of left artificial knee joint
;;^UTILITY(U,$J,358.3,20854,1,4,0)
;;=4^Z96.652
;;^UTILITY(U,$J,358.3,20854,2)
;;=^5063706
;;^UTILITY(U,$J,358.3,20855,0)
;;=Z96.612^^68^853^6
;;^UTILITY(U,$J,358.3,20855,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20855,1,3,0)
;;=3^Presence of left artificial shoulder joint
;;^UTILITY(U,$J,358.3,20855,1,4,0)
;;=4^Z96.612
;;^UTILITY(U,$J,358.3,20855,2)
;;=^5063693
;;^UTILITY(U,$J,358.3,20856,0)
;;=Z96.632^^68^853^7
;;^UTILITY(U,$J,358.3,20856,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20856,1,3,0)
;;=3^Presence of left artificial wrist joint
;;^UTILITY(U,$J,358.3,20856,1,4,0)
;;=4^Z96.632
;;^UTILITY(U,$J,358.3,20856,2)
;;=^5063699
;;^UTILITY(U,$J,358.3,20857,0)
;;=Z96.60^^68^853^14
;;^UTILITY(U,$J,358.3,20857,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20857,1,3,0)
;;=3^Presence of unspecified orthopedic joint implant
;;^UTILITY(U,$J,358.3,20857,1,4,0)
;;=4^Z96.60
;;^UTILITY(U,$J,358.3,20857,2)
;;=^5063691
;;^UTILITY(U,$J,358.3,20858,0)
;;=Z96.661^^68^853^8
;;^UTILITY(U,$J,358.3,20858,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20858,1,3,0)
;;=3^Presence of right artificial ankle joint
;;^UTILITY(U,$J,358.3,20858,1,4,0)
;;=4^Z96.661
;;^UTILITY(U,$J,358.3,20858,2)
;;=^5063709
;;^UTILITY(U,$J,358.3,20859,0)
;;=Z96.621^^68^853^9
;;^UTILITY(U,$J,358.3,20859,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20859,1,3,0)
;;=3^Presence of right artificial elbow joint
;;^UTILITY(U,$J,358.3,20859,1,4,0)
;;=4^Z96.621
;;^UTILITY(U,$J,358.3,20859,2)
;;=^5063695
;;^UTILITY(U,$J,358.3,20860,0)
;;=Z96.641^^68^853^10
;;^UTILITY(U,$J,358.3,20860,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20860,1,3,0)
;;=3^Presence of right artificial hip joint
;;^UTILITY(U,$J,358.3,20860,1,4,0)
;;=4^Z96.641
;;^UTILITY(U,$J,358.3,20860,2)
;;=^5063701
;;^UTILITY(U,$J,358.3,20861,0)
;;=Z96.651^^68^853^11
;;^UTILITY(U,$J,358.3,20861,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20861,1,3,0)
;;=3^Presence of right artificial knee joint
;;^UTILITY(U,$J,358.3,20861,1,4,0)
;;=4^Z96.651
;;^UTILITY(U,$J,358.3,20861,2)
;;=^5063705
;;^UTILITY(U,$J,358.3,20862,0)
;;=Z96.611^^68^853^12
;;^UTILITY(U,$J,358.3,20862,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20862,1,3,0)
;;=3^Presence of right artificial shoulder joint
;;^UTILITY(U,$J,358.3,20862,1,4,0)
;;=4^Z96.611
;;^UTILITY(U,$J,358.3,20862,2)
;;=^5063692
;;^UTILITY(U,$J,358.3,20863,0)
;;=Z96.631^^68^853^13
;;^UTILITY(U,$J,358.3,20863,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20863,1,3,0)
;;=3^Presence of right artificial wrist joint
;;^UTILITY(U,$J,358.3,20863,1,4,0)
;;=4^Z96.631
;;^UTILITY(U,$J,358.3,20863,2)
;;=^5063698
;;^UTILITY(U,$J,358.3,20864,0)
;;=M05.772^^68^854^1
;;^UTILITY(U,$J,358.3,20864,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20864,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Ankle/Foot
;;^UTILITY(U,$J,358.3,20864,1,4,0)
;;=4^M05.772
;;^UTILITY(U,$J,358.3,20864,2)
;;=^5010020
;;^UTILITY(U,$J,358.3,20865,0)
;;=M05.722^^68^854^2
;;^UTILITY(U,$J,358.3,20865,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20865,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Elbow
;;^UTILITY(U,$J,358.3,20865,1,4,0)
;;=4^M05.722
;;^UTILITY(U,$J,358.3,20865,2)
;;=^5010005
;;^UTILITY(U,$J,358.3,20866,0)
;;=M05.742^^68^854^3
;;^UTILITY(U,$J,358.3,20866,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20866,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hand
;;^UTILITY(U,$J,358.3,20866,1,4,0)
;;=4^M05.742
;;^UTILITY(U,$J,358.3,20866,2)
;;=^5010011
;;^UTILITY(U,$J,358.3,20867,0)
;;=M05.752^^68^854^4
;;^UTILITY(U,$J,358.3,20867,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20867,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hip
;;^UTILITY(U,$J,358.3,20867,1,4,0)
;;=4^M05.752
;;^UTILITY(U,$J,358.3,20867,2)
;;=^5010014
;;^UTILITY(U,$J,358.3,20868,0)
;;=M05.752^^68^854^5
;;^UTILITY(U,$J,358.3,20868,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20868,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hip
;;^UTILITY(U,$J,358.3,20868,1,4,0)
;;=4^M05.752
;;^UTILITY(U,$J,358.3,20868,2)
;;=^5010014
;;^UTILITY(U,$J,358.3,20869,0)
;;=M05.762^^68^854^6
;;^UTILITY(U,$J,358.3,20869,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20869,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Knee
;;^UTILITY(U,$J,358.3,20869,1,4,0)
;;=4^M05.762
;;^UTILITY(U,$J,358.3,20869,2)
;;=^5010017
;;^UTILITY(U,$J,358.3,20870,0)
;;=M05.712^^68^854^7
;;^UTILITY(U,$J,358.3,20870,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20870,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Shoulder
;;^UTILITY(U,$J,358.3,20870,1,4,0)
;;=4^M05.712
;;^UTILITY(U,$J,358.3,20870,2)
;;=^5010002
;;^UTILITY(U,$J,358.3,20871,0)
;;=M05.732^^68^854^8
;;^UTILITY(U,$J,358.3,20871,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20871,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Lt Wrist
;;^UTILITY(U,$J,358.3,20871,1,4,0)
;;=4^M05.732
;;^UTILITY(U,$J,358.3,20871,2)
;;=^5010008
;;^UTILITY(U,$J,358.3,20872,0)
;;=M05.79^^68^854^9
;;^UTILITY(U,$J,358.3,20872,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20872,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Mult Sites
;;^UTILITY(U,$J,358.3,20872,1,4,0)
;;=4^M05.79
;;^UTILITY(U,$J,358.3,20872,2)
;;=^5010022
;;^UTILITY(U,$J,358.3,20873,0)
;;=M05.771^^68^854^11
;;^UTILITY(U,$J,358.3,20873,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20873,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Rt Ankle/Foot
;;^UTILITY(U,$J,358.3,20873,1,4,0)
;;=4^M05.771
;;^UTILITY(U,$J,358.3,20873,2)
;;=^5010019
;;^UTILITY(U,$J,358.3,20874,0)
;;=M05.721^^68^854^12
;;^UTILITY(U,$J,358.3,20874,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20874,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Rt Elbow
;;^UTILITY(U,$J,358.3,20874,1,4,0)
;;=4^M05.721
;;^UTILITY(U,$J,358.3,20874,2)
;;=^5010004
;;^UTILITY(U,$J,358.3,20875,0)
;;=M05.741^^68^854^13
;;^UTILITY(U,$J,358.3,20875,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20875,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Rt Hand
;;^UTILITY(U,$J,358.3,20875,1,4,0)
;;=4^M05.741
;;^UTILITY(U,$J,358.3,20875,2)
;;=^5010010
;;^UTILITY(U,$J,358.3,20876,0)
;;=M05.751^^68^854^14
;;^UTILITY(U,$J,358.3,20876,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20876,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Rt Hip
;;^UTILITY(U,$J,358.3,20876,1,4,0)
;;=4^M05.751
;;^UTILITY(U,$J,358.3,20876,2)
;;=^5010013
;;^UTILITY(U,$J,358.3,20877,0)
;;=M05.761^^68^854^15
;;^UTILITY(U,$J,358.3,20877,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20877,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Rt Knee
;;^UTILITY(U,$J,358.3,20877,1,4,0)
;;=4^M05.761
;;^UTILITY(U,$J,358.3,20877,2)
;;=^5010016
;;^UTILITY(U,$J,358.3,20878,0)
;;=M05.711^^68^854^16
;;^UTILITY(U,$J,358.3,20878,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20878,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Rt Shoulder
;;^UTILITY(U,$J,358.3,20878,1,4,0)
;;=4^M05.711
;;^UTILITY(U,$J,358.3,20878,2)
;;=^5010001
;;^UTILITY(U,$J,358.3,20879,0)
;;=M05.731^^68^854^17
;;^UTILITY(U,$J,358.3,20879,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20879,1,3,0)
;;=3^Rheum Arthritis w/ Rheum Factor,Rt Wrist
;;^UTILITY(U,$J,358.3,20879,1,4,0)
;;=4^M05.731
;;^UTILITY(U,$J,358.3,20879,2)
;;=^5010007
;;^UTILITY(U,$J,358.3,20880,0)
;;=M06.072^^68^854^18
;;^UTILITY(U,$J,358.3,20880,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20880,1,3,0)
;;=3^Rheum Arthritis w/o Rheum Factor,Lt Ankle/Foot
;;^UTILITY(U,$J,358.3,20880,1,4,0)
;;=4^M06.072
;;^UTILITY(U,$J,358.3,20880,2)
;;=^5010067
;;^UTILITY(U,$J,358.3,20881,0)
;;=M06.022^^68^854^19
;;^UTILITY(U,$J,358.3,20881,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20881,1,3,0)
;;=3^Rheum Arthritis w/o Rheum Factor,Lt Elbow
;;^UTILITY(U,$J,358.3,20881,1,4,0)
;;=4^M06.022
;;^UTILITY(U,$J,358.3,20881,2)
;;=^5010052
;;^UTILITY(U,$J,358.3,20882,0)
;;=M06.042^^68^854^20
;;^UTILITY(U,$J,358.3,20882,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,20882,1,3,0)
;;=3^Rheum Arthritis w/o Rheum Factor,Lt Hand
;;^UTILITY(U,$J,358.3,20882,1,4,0)
;;=4^M06.042
;;^UTILITY(U,$J,358.3,20882,2)
;;=^5010058
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI08J 19764 printed Dec 13, 2024@01:43:45 Page 2
IBDEI08J ; ; 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,20814,1,3,0)
+2 ;;=3^Dizziness
+3 ;;^UTILITY(U,$J,358.3,20814,1,4,0)
+4 ;;=4^R42.
+5 ;;^UTILITY(U,$J,358.3,20814,2)
+6 ;;=^5019450
+7 ;;^UTILITY(U,$J,358.3,20815,0)
+8 ;;=G57.11^^68^852^26
+9 ;;^UTILITY(U,$J,358.3,20815,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,20815,1,3,0)
+12 ;;=3^Meralgia Paresthetica,Right Lower Limb
+13 ;;^UTILITY(U,$J,358.3,20815,1,4,0)
+14 ;;=4^G57.11
+15 ;;^UTILITY(U,$J,358.3,20815,2)
+16 ;;=^5004042
+17 ;;^UTILITY(U,$J,358.3,20816,0)
+18 ;;=G57.12^^68^852^25
+19 ;;^UTILITY(U,$J,358.3,20816,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,20816,1,3,0)
+22 ;;=3^Meralgia Paresthetica,Left Lower Limb
+23 ;;^UTILITY(U,$J,358.3,20816,1,4,0)
+24 ;;=4^G57.12
+25 ;;^UTILITY(U,$J,358.3,20816,2)
+26 ;;=^5004043
+27 ;;^UTILITY(U,$J,358.3,20817,0)
+28 ;;=G43.901^^68^852^27
+29 ;;^UTILITY(U,$J,358.3,20817,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,20817,1,3,0)
+32 ;;=3^Migraine w/ Status Migrainosus
+33 ;;^UTILITY(U,$J,358.3,20817,1,4,0)
+34 ;;=4^G43.901
+35 ;;^UTILITY(U,$J,358.3,20817,2)
+36 ;;=^5003908
+37 ;;^UTILITY(U,$J,358.3,20818,0)
+38 ;;=M79.601^^68^852^42
+39 ;;^UTILITY(U,$J,358.3,20818,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,20818,1,3,0)
+42 ;;=3^Pain,Arm,Right
+43 ;;^UTILITY(U,$J,358.3,20818,1,4,0)
+44 ;;=4^M79.601
+45 ;;^UTILITY(U,$J,358.3,20818,2)
+46 ;;=^5013325
+47 ;;^UTILITY(U,$J,358.3,20819,0)
+48 ;;=M79.602^^68^852^41
+49 ;;^UTILITY(U,$J,358.3,20819,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,20819,1,3,0)
+52 ;;=3^Pain,Arm,Left
+53 ;;^UTILITY(U,$J,358.3,20819,1,4,0)
+54 ;;=4^M79.602
+55 ;;^UTILITY(U,$J,358.3,20819,2)
+56 ;;=^5013326
+57 ;;^UTILITY(U,$J,358.3,20820,0)
+58 ;;=M25.511^^68^852^56
+59 ;;^UTILITY(U,$J,358.3,20820,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,20820,1,3,0)
+62 ;;=3^Pain,Shoulder,Right
+63 ;;^UTILITY(U,$J,358.3,20820,1,4,0)
+64 ;;=4^M25.511
+65 ;;^UTILITY(U,$J,358.3,20820,2)
+66 ;;=^5011602
+67 ;;^UTILITY(U,$J,358.3,20821,0)
+68 ;;=M25.512^^68^852^55
+69 ;;^UTILITY(U,$J,358.3,20821,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,20821,1,3,0)
+72 ;;=3^Pain,Shoulder,Left
+73 ;;^UTILITY(U,$J,358.3,20821,1,4,0)
+74 ;;=4^M25.512
+75 ;;^UTILITY(U,$J,358.3,20821,2)
+76 ;;=^5011603
+77 ;;^UTILITY(U,$J,358.3,20822,0)
+78 ;;=M25.521^^68^852^44
+79 ;;^UTILITY(U,$J,358.3,20822,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,20822,1,3,0)
+82 ;;=3^Pain,Elbow,Right
+83 ;;^UTILITY(U,$J,358.3,20822,1,4,0)
+84 ;;=4^M25.521
+85 ;;^UTILITY(U,$J,358.3,20822,2)
+86 ;;=^5011605
+87 ;;^UTILITY(U,$J,358.3,20823,0)
+88 ;;=M25.522^^68^852^43
+89 ;;^UTILITY(U,$J,358.3,20823,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,20823,1,3,0)
+92 ;;=3^Pain,Elbow,Left
+93 ;;^UTILITY(U,$J,358.3,20823,1,4,0)
+94 ;;=4^M25.522
+95 ;;^UTILITY(U,$J,358.3,20823,2)
+96 ;;=^5011606
+97 ;;^UTILITY(U,$J,358.3,20824,0)
+98 ;;=M25.531^^68^852^58
+99 ;;^UTILITY(U,$J,358.3,20824,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,20824,1,3,0)
+102 ;;=3^Pain,Wrist,Right
+103 ;;^UTILITY(U,$J,358.3,20824,1,4,0)
+104 ;;=4^M25.531
+105 ;;^UTILITY(U,$J,358.3,20824,2)
+106 ;;=^5011608
+107 ;;^UTILITY(U,$J,358.3,20825,0)
+108 ;;=M25.532^^68^852^57
+109 ;;^UTILITY(U,$J,358.3,20825,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,20825,1,3,0)
+112 ;;=3^Pain,Wrist,Left
+113 ;;^UTILITY(U,$J,358.3,20825,1,4,0)
+114 ;;=4^M25.532
+115 ;;^UTILITY(U,$J,358.3,20825,2)
+116 ;;=^5011609
+117 ;;^UTILITY(U,$J,358.3,20826,0)
+118 ;;=M79.641^^68^852^48
+119 ;;^UTILITY(U,$J,358.3,20826,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,20826,1,3,0)
+122 ;;=3^Pain,Hand,Right
+123 ;;^UTILITY(U,$J,358.3,20826,1,4,0)
+124 ;;=4^M79.641
+125 ;;^UTILITY(U,$J,358.3,20826,2)
+126 ;;=^5013338
+127 ;;^UTILITY(U,$J,358.3,20827,0)
+128 ;;=M79.642^^68^852^47
+129 ;;^UTILITY(U,$J,358.3,20827,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,20827,1,3,0)
+132 ;;=3^Pain,Hand,Left
+133 ;;^UTILITY(U,$J,358.3,20827,1,4,0)
+134 ;;=4^M79.642
+135 ;;^UTILITY(U,$J,358.3,20827,2)
+136 ;;=^5013339
+137 ;;^UTILITY(U,$J,358.3,20828,0)
+138 ;;=M79.604^^68^852^54
+139 ;;^UTILITY(U,$J,358.3,20828,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,20828,1,3,0)
+142 ;;=3^Pain,Leg,Right
+143 ;;^UTILITY(U,$J,358.3,20828,1,4,0)
+144 ;;=4^M79.604
+145 ;;^UTILITY(U,$J,358.3,20828,2)
+146 ;;=^5013328
+147 ;;^UTILITY(U,$J,358.3,20829,0)
+148 ;;=M79.605^^68^852^53
+149 ;;^UTILITY(U,$J,358.3,20829,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,20829,1,3,0)
+152 ;;=3^Pain,Leg,Left
+153 ;;^UTILITY(U,$J,358.3,20829,1,4,0)
+154 ;;=4^M79.605
+155 ;;^UTILITY(U,$J,358.3,20829,2)
+156 ;;=^5013329
+157 ;;^UTILITY(U,$J,358.3,20830,0)
+158 ;;=M25.551^^68^852^50
+159 ;;^UTILITY(U,$J,358.3,20830,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,20830,1,3,0)
+162 ;;=3^Pain,Hip,Right
+163 ;;^UTILITY(U,$J,358.3,20830,1,4,0)
+164 ;;=4^M25.551
+165 ;;^UTILITY(U,$J,358.3,20830,2)
+166 ;;=^5011611
+167 ;;^UTILITY(U,$J,358.3,20831,0)
+168 ;;=M25.552^^68^852^49
+169 ;;^UTILITY(U,$J,358.3,20831,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,20831,1,3,0)
+172 ;;=3^Pain,Hip,Left
+173 ;;^UTILITY(U,$J,358.3,20831,1,4,0)
+174 ;;=4^M25.552
+175 ;;^UTILITY(U,$J,358.3,20831,2)
+176 ;;=^5011612
+177 ;;^UTILITY(U,$J,358.3,20832,0)
+178 ;;=M25.561^^68^852^52
+179 ;;^UTILITY(U,$J,358.3,20832,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,20832,1,3,0)
+182 ;;=3^Pain,Knee,Right
+183 ;;^UTILITY(U,$J,358.3,20832,1,4,0)
+184 ;;=4^M25.561
+185 ;;^UTILITY(U,$J,358.3,20832,2)
+186 ;;=^5011614
+187 ;;^UTILITY(U,$J,358.3,20833,0)
+188 ;;=M25.562^^68^852^51
+189 ;;^UTILITY(U,$J,358.3,20833,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,20833,1,3,0)
+192 ;;=3^Pain,Knee,Left
+193 ;;^UTILITY(U,$J,358.3,20833,1,4,0)
+194 ;;=4^M25.562
+195 ;;^UTILITY(U,$J,358.3,20833,2)
+196 ;;=^5011615
+197 ;;^UTILITY(U,$J,358.3,20834,0)
+198 ;;=M25.571^^68^852^40
+199 ;;^UTILITY(U,$J,358.3,20834,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,20834,1,3,0)
+202 ;;=3^Pain,Ankle,Right
+203 ;;^UTILITY(U,$J,358.3,20834,1,4,0)
+204 ;;=4^M25.571
+205 ;;^UTILITY(U,$J,358.3,20834,2)
+206 ;;=^5011617
+207 ;;^UTILITY(U,$J,358.3,20835,0)
+208 ;;=M25.572^^68^852^39
+209 ;;^UTILITY(U,$J,358.3,20835,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,20835,1,3,0)
+212 ;;=3^Pain,Ankle,Left
+213 ;;^UTILITY(U,$J,358.3,20835,1,4,0)
+214 ;;=4^M25.572
+215 ;;^UTILITY(U,$J,358.3,20835,2)
+216 ;;=^5011618
+217 ;;^UTILITY(U,$J,358.3,20836,0)
+218 ;;=M79.671^^68^852^46
+219 ;;^UTILITY(U,$J,358.3,20836,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,20836,1,3,0)
+222 ;;=3^Pain,Foot,Right
+223 ;;^UTILITY(U,$J,358.3,20836,1,4,0)
+224 ;;=4^M79.671
+225 ;;^UTILITY(U,$J,358.3,20836,2)
+226 ;;=^5013350
+227 ;;^UTILITY(U,$J,358.3,20837,0)
+228 ;;=M79.672^^68^852^45
+229 ;;^UTILITY(U,$J,358.3,20837,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,20837,1,3,0)
+232 ;;=3^Pain,Foot,Left
+233 ;;^UTILITY(U,$J,358.3,20837,1,4,0)
+234 ;;=4^M79.672
+235 ;;^UTILITY(U,$J,358.3,20837,2)
+236 ;;=^5013351
+237 ;;^UTILITY(U,$J,358.3,20838,0)
+238 ;;=M54.31^^68^852^68
+239 ;;^UTILITY(U,$J,358.3,20838,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,20838,1,3,0)
+242 ;;=3^Sciatica,Right
+243 ;;^UTILITY(U,$J,358.3,20838,1,4,0)
+244 ;;=4^M54.31
+245 ;;^UTILITY(U,$J,358.3,20838,2)
+246 ;;=^5012306
+247 ;;^UTILITY(U,$J,358.3,20839,0)
+248 ;;=M54.32^^68^852^67
+249 ;;^UTILITY(U,$J,358.3,20839,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,20839,1,3,0)
+252 ;;=3^Sciatica,Left
+253 ;;^UTILITY(U,$J,358.3,20839,1,4,0)
+254 ;;=4^M54.32
+255 ;;^UTILITY(U,$J,358.3,20839,2)
+256 ;;=^5012307
+257 ;;^UTILITY(U,$J,358.3,20840,0)
+258 ;;=G44.201^^68^852^72
+259 ;;^UTILITY(U,$J,358.3,20840,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,20840,1,3,0)
+262 ;;=3^Tension Headache,Intractable
+263 ;;^UTILITY(U,$J,358.3,20840,1,4,0)
+264 ;;=4^G44.201
+265 ;;^UTILITY(U,$J,358.3,20840,2)
+266 ;;=^5003935
+267 ;;^UTILITY(U,$J,358.3,20841,0)
+268 ;;=G50.0^^68^852^78
+269 ;;^UTILITY(U,$J,358.3,20841,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,20841,1,3,0)
+272 ;;=3^Trigeminal Neuralgia
+273 ;;^UTILITY(U,$J,358.3,20841,1,4,0)
+274 ;;=4^G50.0
+275 ;;^UTILITY(U,$J,358.3,20841,2)
+276 ;;=^121978
+277 ;;^UTILITY(U,$J,358.3,20842,0)
+278 ;;=M79.10^^68^852^30
+279 ;;^UTILITY(U,$J,358.3,20842,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,20842,1,3,0)
+282 ;;=3^Myalga,Unspec Site
+283 ;;^UTILITY(U,$J,358.3,20842,1,4,0)
+284 ;;=4^M79.10
+285 ;;^UTILITY(U,$J,358.3,20842,2)
+286 ;;=^5157394
+287 ;;^UTILITY(U,$J,358.3,20843,0)
+288 ;;=M79.11^^68^852^32
+289 ;;^UTILITY(U,$J,358.3,20843,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,20843,1,3,0)
+292 ;;=3^Myalgia,Mastication Muscle
+293 ;;^UTILITY(U,$J,358.3,20843,1,4,0)
+294 ;;=4^M79.11
+295 ;;^UTILITY(U,$J,358.3,20843,2)
+296 ;;=^5157395
+297 ;;^UTILITY(U,$J,358.3,20844,0)
+298 ;;=M79.12^^68^852^31
+299 ;;^UTILITY(U,$J,358.3,20844,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,20844,1,3,0)
+302 ;;=3^Myalgia,Auxiliary Muscles,Head/Neck
+303 ;;^UTILITY(U,$J,358.3,20844,1,4,0)
+304 ;;=4^M79.12
+305 ;;^UTILITY(U,$J,358.3,20844,2)
+306 ;;=^5157396
+307 ;;^UTILITY(U,$J,358.3,20845,0)
+308 ;;=M79.18^^68^852^33
+309 ;;^UTILITY(U,$J,358.3,20845,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,20845,1,3,0)
+312 ;;=3^Myalgia,Other Site
+313 ;;^UTILITY(U,$J,358.3,20845,1,4,0)
+314 ;;=4^M79.18
+315 ;;^UTILITY(U,$J,358.3,20845,2)
+316 ;;=^5157397
+317 ;;^UTILITY(U,$J,358.3,20846,0)
+318 ;;=R51.0^^68^852^20
+319 ;;^UTILITY(U,$J,358.3,20846,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,20846,1,3,0)
+322 ;;=3^Headache w/ Orthostatic Component
+323 ;;^UTILITY(U,$J,358.3,20846,1,4,0)
+324 ;;=4^R51.0
+325 ;;^UTILITY(U,$J,358.3,20846,2)
+326 ;;=^5159305
+327 ;;^UTILITY(U,$J,358.3,20847,0)
+328 ;;=R51.9^^68^852^21
+329 ;;^UTILITY(U,$J,358.3,20847,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,20847,1,3,0)
+332 ;;=3^Headache,Unspec
+333 ;;^UTILITY(U,$J,358.3,20847,1,4,0)
+334 ;;=4^R51.9
+335 ;;^UTILITY(U,$J,358.3,20847,2)
+336 ;;=^5159306
+337 ;;^UTILITY(U,$J,358.3,20848,0)
+338 ;;=T20.20XS^^68^852^4
+339 ;;^UTILITY(U,$J,358.3,20848,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,20848,1,3,0)
+342 ;;=3^Burn 2nd Degree of Head,Face,Neck,Unspec Site,Sequela
+343 ;;^UTILITY(U,$J,358.3,20848,1,4,0)
+344 ;;=4^T20.20XS
+345 ;;^UTILITY(U,$J,358.3,20848,2)
+346 ;;=^5046707
+347 ;;^UTILITY(U,$J,358.3,20849,0)
+348 ;;=T20.30XS^^68^852^5
+349 ;;^UTILITY(U,$J,358.3,20849,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,20849,1,3,0)
+352 ;;=3^Burn 3rd Degree of Head,Face,Neck,Unspec Site,Sequela
+353 ;;^UTILITY(U,$J,358.3,20849,1,4,0)
+354 ;;=4^T20.30XS
+355 ;;^UTILITY(U,$J,358.3,20849,2)
+356 ;;=^5046740
+357 ;;^UTILITY(U,$J,358.3,20850,0)
+358 ;;=Z47.1^^68^853^1
+359 ;;^UTILITY(U,$J,358.3,20850,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,20850,1,3,0)
+362 ;;=3^Aftercare following joint replacement surgery
+363 ;;^UTILITY(U,$J,358.3,20850,1,4,0)
+364 ;;=4^Z47.1
+365 ;;^UTILITY(U,$J,358.3,20850,2)
+366 ;;=^5063025
+367 ;;^UTILITY(U,$J,358.3,20851,0)
+368 ;;=Z96.662^^68^853^2
+369 ;;^UTILITY(U,$J,358.3,20851,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,20851,1,3,0)
+372 ;;=3^Presence of left artificial ankle joint
+373 ;;^UTILITY(U,$J,358.3,20851,1,4,0)
+374 ;;=4^Z96.662
+375 ;;^UTILITY(U,$J,358.3,20851,2)
+376 ;;=^5063710
+377 ;;^UTILITY(U,$J,358.3,20852,0)
+378 ;;=Z96.622^^68^853^3
+379 ;;^UTILITY(U,$J,358.3,20852,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,20852,1,3,0)
+382 ;;=3^Presence of left artificial elbow joint
+383 ;;^UTILITY(U,$J,358.3,20852,1,4,0)
+384 ;;=4^Z96.622
+385 ;;^UTILITY(U,$J,358.3,20852,2)
+386 ;;=^5063696
+387 ;;^UTILITY(U,$J,358.3,20853,0)
+388 ;;=Z96.642^^68^853^4
+389 ;;^UTILITY(U,$J,358.3,20853,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,20853,1,3,0)
+392 ;;=3^Presence of left artificial hip joint
+393 ;;^UTILITY(U,$J,358.3,20853,1,4,0)
+394 ;;=4^Z96.642
+395 ;;^UTILITY(U,$J,358.3,20853,2)
+396 ;;=^5063702
+397 ;;^UTILITY(U,$J,358.3,20854,0)
+398 ;;=Z96.652^^68^853^5
+399 ;;^UTILITY(U,$J,358.3,20854,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,20854,1,3,0)
+402 ;;=3^Presence of left artificial knee joint
+403 ;;^UTILITY(U,$J,358.3,20854,1,4,0)
+404 ;;=4^Z96.652
+405 ;;^UTILITY(U,$J,358.3,20854,2)
+406 ;;=^5063706
+407 ;;^UTILITY(U,$J,358.3,20855,0)
+408 ;;=Z96.612^^68^853^6
+409 ;;^UTILITY(U,$J,358.3,20855,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,20855,1,3,0)
+412 ;;=3^Presence of left artificial shoulder joint
+413 ;;^UTILITY(U,$J,358.3,20855,1,4,0)
+414 ;;=4^Z96.612
+415 ;;^UTILITY(U,$J,358.3,20855,2)
+416 ;;=^5063693
+417 ;;^UTILITY(U,$J,358.3,20856,0)
+418 ;;=Z96.632^^68^853^7
+419 ;;^UTILITY(U,$J,358.3,20856,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,20856,1,3,0)
+422 ;;=3^Presence of left artificial wrist joint
+423 ;;^UTILITY(U,$J,358.3,20856,1,4,0)
+424 ;;=4^Z96.632
+425 ;;^UTILITY(U,$J,358.3,20856,2)
+426 ;;=^5063699
+427 ;;^UTILITY(U,$J,358.3,20857,0)
+428 ;;=Z96.60^^68^853^14
+429 ;;^UTILITY(U,$J,358.3,20857,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,20857,1,3,0)
+432 ;;=3^Presence of unspecified orthopedic joint implant
+433 ;;^UTILITY(U,$J,358.3,20857,1,4,0)
+434 ;;=4^Z96.60
+435 ;;^UTILITY(U,$J,358.3,20857,2)
+436 ;;=^5063691
+437 ;;^UTILITY(U,$J,358.3,20858,0)
+438 ;;=Z96.661^^68^853^8
+439 ;;^UTILITY(U,$J,358.3,20858,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,20858,1,3,0)
+442 ;;=3^Presence of right artificial ankle joint
+443 ;;^UTILITY(U,$J,358.3,20858,1,4,0)
+444 ;;=4^Z96.661
+445 ;;^UTILITY(U,$J,358.3,20858,2)
+446 ;;=^5063709
+447 ;;^UTILITY(U,$J,358.3,20859,0)
+448 ;;=Z96.621^^68^853^9
+449 ;;^UTILITY(U,$J,358.3,20859,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,20859,1,3,0)
+452 ;;=3^Presence of right artificial elbow joint
+453 ;;^UTILITY(U,$J,358.3,20859,1,4,0)
+454 ;;=4^Z96.621
+455 ;;^UTILITY(U,$J,358.3,20859,2)
+456 ;;=^5063695
+457 ;;^UTILITY(U,$J,358.3,20860,0)
+458 ;;=Z96.641^^68^853^10
+459 ;;^UTILITY(U,$J,358.3,20860,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,20860,1,3,0)
+462 ;;=3^Presence of right artificial hip joint
+463 ;;^UTILITY(U,$J,358.3,20860,1,4,0)
+464 ;;=4^Z96.641
+465 ;;^UTILITY(U,$J,358.3,20860,2)
+466 ;;=^5063701
+467 ;;^UTILITY(U,$J,358.3,20861,0)
+468 ;;=Z96.651^^68^853^11
+469 ;;^UTILITY(U,$J,358.3,20861,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,20861,1,3,0)
+472 ;;=3^Presence of right artificial knee joint
+473 ;;^UTILITY(U,$J,358.3,20861,1,4,0)
+474 ;;=4^Z96.651
+475 ;;^UTILITY(U,$J,358.3,20861,2)
+476 ;;=^5063705
+477 ;;^UTILITY(U,$J,358.3,20862,0)
+478 ;;=Z96.611^^68^853^12
+479 ;;^UTILITY(U,$J,358.3,20862,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,20862,1,3,0)
+482 ;;=3^Presence of right artificial shoulder joint
+483 ;;^UTILITY(U,$J,358.3,20862,1,4,0)
+484 ;;=4^Z96.611
+485 ;;^UTILITY(U,$J,358.3,20862,2)
+486 ;;=^5063692
+487 ;;^UTILITY(U,$J,358.3,20863,0)
+488 ;;=Z96.631^^68^853^13
+489 ;;^UTILITY(U,$J,358.3,20863,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,20863,1,3,0)
+492 ;;=3^Presence of right artificial wrist joint
+493 ;;^UTILITY(U,$J,358.3,20863,1,4,0)
+494 ;;=4^Z96.631
+495 ;;^UTILITY(U,$J,358.3,20863,2)
+496 ;;=^5063698
+497 ;;^UTILITY(U,$J,358.3,20864,0)
+498 ;;=M05.772^^68^854^1
+499 ;;^UTILITY(U,$J,358.3,20864,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,20864,1,3,0)
+502 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Ankle/Foot
+503 ;;^UTILITY(U,$J,358.3,20864,1,4,0)
+504 ;;=4^M05.772
+505 ;;^UTILITY(U,$J,358.3,20864,2)
+506 ;;=^5010020
+507 ;;^UTILITY(U,$J,358.3,20865,0)
+508 ;;=M05.722^^68^854^2
+509 ;;^UTILITY(U,$J,358.3,20865,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,20865,1,3,0)
+512 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Elbow
+513 ;;^UTILITY(U,$J,358.3,20865,1,4,0)
+514 ;;=4^M05.722
+515 ;;^UTILITY(U,$J,358.3,20865,2)
+516 ;;=^5010005
+517 ;;^UTILITY(U,$J,358.3,20866,0)
+518 ;;=M05.742^^68^854^3
+519 ;;^UTILITY(U,$J,358.3,20866,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,20866,1,3,0)
+522 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hand
+523 ;;^UTILITY(U,$J,358.3,20866,1,4,0)
+524 ;;=4^M05.742
+525 ;;^UTILITY(U,$J,358.3,20866,2)
+526 ;;=^5010011
+527 ;;^UTILITY(U,$J,358.3,20867,0)
+528 ;;=M05.752^^68^854^4
+529 ;;^UTILITY(U,$J,358.3,20867,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,20867,1,3,0)
+532 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hip
+533 ;;^UTILITY(U,$J,358.3,20867,1,4,0)
+534 ;;=4^M05.752
+535 ;;^UTILITY(U,$J,358.3,20867,2)
+536 ;;=^5010014
+537 ;;^UTILITY(U,$J,358.3,20868,0)
+538 ;;=M05.752^^68^854^5
+539 ;;^UTILITY(U,$J,358.3,20868,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,20868,1,3,0)
+542 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Hip
+543 ;;^UTILITY(U,$J,358.3,20868,1,4,0)
+544 ;;=4^M05.752
+545 ;;^UTILITY(U,$J,358.3,20868,2)
+546 ;;=^5010014
+547 ;;^UTILITY(U,$J,358.3,20869,0)
+548 ;;=M05.762^^68^854^6
+549 ;;^UTILITY(U,$J,358.3,20869,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,20869,1,3,0)
+552 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Knee
+553 ;;^UTILITY(U,$J,358.3,20869,1,4,0)
+554 ;;=4^M05.762
+555 ;;^UTILITY(U,$J,358.3,20869,2)
+556 ;;=^5010017
+557 ;;^UTILITY(U,$J,358.3,20870,0)
+558 ;;=M05.712^^68^854^7
+559 ;;^UTILITY(U,$J,358.3,20870,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,20870,1,3,0)
+562 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Shoulder
+563 ;;^UTILITY(U,$J,358.3,20870,1,4,0)
+564 ;;=4^M05.712
+565 ;;^UTILITY(U,$J,358.3,20870,2)
+566 ;;=^5010002
+567 ;;^UTILITY(U,$J,358.3,20871,0)
+568 ;;=M05.732^^68^854^8
+569 ;;^UTILITY(U,$J,358.3,20871,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,20871,1,3,0)
+572 ;;=3^Rheum Arthritis w/ Rheum Factor,Lt Wrist
+573 ;;^UTILITY(U,$J,358.3,20871,1,4,0)
+574 ;;=4^M05.732
+575 ;;^UTILITY(U,$J,358.3,20871,2)
+576 ;;=^5010008
+577 ;;^UTILITY(U,$J,358.3,20872,0)
+578 ;;=M05.79^^68^854^9
+579 ;;^UTILITY(U,$J,358.3,20872,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,20872,1,3,0)
+582 ;;=3^Rheum Arthritis w/ Rheum Factor,Mult Sites
+583 ;;^UTILITY(U,$J,358.3,20872,1,4,0)
+584 ;;=4^M05.79
+585 ;;^UTILITY(U,$J,358.3,20872,2)
+586 ;;=^5010022
+587 ;;^UTILITY(U,$J,358.3,20873,0)
+588 ;;=M05.771^^68^854^11
+589 ;;^UTILITY(U,$J,358.3,20873,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,20873,1,3,0)
+592 ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Ankle/Foot
+593 ;;^UTILITY(U,$J,358.3,20873,1,4,0)
+594 ;;=4^M05.771
+595 ;;^UTILITY(U,$J,358.3,20873,2)
+596 ;;=^5010019
+597 ;;^UTILITY(U,$J,358.3,20874,0)
+598 ;;=M05.721^^68^854^12
+599 ;;^UTILITY(U,$J,358.3,20874,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,20874,1,3,0)
+602 ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Elbow
+603 ;;^UTILITY(U,$J,358.3,20874,1,4,0)
+604 ;;=4^M05.721
+605 ;;^UTILITY(U,$J,358.3,20874,2)
+606 ;;=^5010004
+607 ;;^UTILITY(U,$J,358.3,20875,0)
+608 ;;=M05.741^^68^854^13
+609 ;;^UTILITY(U,$J,358.3,20875,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,20875,1,3,0)
+612 ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Hand
+613 ;;^UTILITY(U,$J,358.3,20875,1,4,0)
+614 ;;=4^M05.741
+615 ;;^UTILITY(U,$J,358.3,20875,2)
+616 ;;=^5010010
+617 ;;^UTILITY(U,$J,358.3,20876,0)
+618 ;;=M05.751^^68^854^14
+619 ;;^UTILITY(U,$J,358.3,20876,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,20876,1,3,0)
+622 ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Hip
+623 ;;^UTILITY(U,$J,358.3,20876,1,4,0)
+624 ;;=4^M05.751
+625 ;;^UTILITY(U,$J,358.3,20876,2)
+626 ;;=^5010013
+627 ;;^UTILITY(U,$J,358.3,20877,0)
+628 ;;=M05.761^^68^854^15
+629 ;;^UTILITY(U,$J,358.3,20877,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,20877,1,3,0)
+632 ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Knee
+633 ;;^UTILITY(U,$J,358.3,20877,1,4,0)
+634 ;;=4^M05.761
+635 ;;^UTILITY(U,$J,358.3,20877,2)
+636 ;;=^5010016
+637 ;;^UTILITY(U,$J,358.3,20878,0)
+638 ;;=M05.711^^68^854^16
+639 ;;^UTILITY(U,$J,358.3,20878,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,20878,1,3,0)
+642 ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Shoulder
+643 ;;^UTILITY(U,$J,358.3,20878,1,4,0)
+644 ;;=4^M05.711
+645 ;;^UTILITY(U,$J,358.3,20878,2)
+646 ;;=^5010001
+647 ;;^UTILITY(U,$J,358.3,20879,0)
+648 ;;=M05.731^^68^854^17
+649 ;;^UTILITY(U,$J,358.3,20879,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,20879,1,3,0)
+652 ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Wrist
+653 ;;^UTILITY(U,$J,358.3,20879,1,4,0)
+654 ;;=4^M05.731
+655 ;;^UTILITY(U,$J,358.3,20879,2)
+656 ;;=^5010007
+657 ;;^UTILITY(U,$J,358.3,20880,0)
+658 ;;=M06.072^^68^854^18
+659 ;;^UTILITY(U,$J,358.3,20880,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,20880,1,3,0)
+662 ;;=3^Rheum Arthritis w/o Rheum Factor,Lt Ankle/Foot
+663 ;;^UTILITY(U,$J,358.3,20880,1,4,0)
+664 ;;=4^M06.072
+665 ;;^UTILITY(U,$J,358.3,20880,2)
+666 ;;=^5010067
+667 ;;^UTILITY(U,$J,358.3,20881,0)
+668 ;;=M06.022^^68^854^19
+669 ;;^UTILITY(U,$J,358.3,20881,1,0)
+670 ;;=^358.31IA^4^2
+671 ;;^UTILITY(U,$J,358.3,20881,1,3,0)
+672 ;;=3^Rheum Arthritis w/o Rheum Factor,Lt Elbow
+673 ;;^UTILITY(U,$J,358.3,20881,1,4,0)
+674 ;;=4^M06.022
+675 ;;^UTILITY(U,$J,358.3,20881,2)
+676 ;;=^5010052
+677 ;;^UTILITY(U,$J,358.3,20882,0)
+678 ;;=M06.042^^68^854^20
+679 ;;^UTILITY(U,$J,358.3,20882,1,0)
+680 ;;=^358.31IA^4^2
+681 ;;^UTILITY(U,$J,358.3,20882,1,3,0)
+682 ;;=3^Rheum Arthritis w/o Rheum Factor,Lt Hand
+683 ;;^UTILITY(U,$J,358.3,20882,1,4,0)
+684 ;;=4^M06.042
+685 ;;^UTILITY(U,$J,358.3,20882,2)
+686 ;;=^5010058
