IBDEI05F ; ; 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,13104,1,3,0)
;;=3^LUQ Abdominal Rigidity
;;^UTILITY(U,$J,358.3,13104,1,4,0)
;;=4^R19.32
;;^UTILITY(U,$J,358.3,13104,2)
;;=^5019268
;;^UTILITY(U,$J,358.3,13105,0)
;;=R19.33^^53^579^55
;;^UTILITY(U,$J,358.3,13105,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13105,1,3,0)
;;=3^RLQ Abdominal Rigidity
;;^UTILITY(U,$J,358.3,13105,1,4,0)
;;=4^R19.33
;;^UTILITY(U,$J,358.3,13105,2)
;;=^5019269
;;^UTILITY(U,$J,358.3,13106,0)
;;=R19.34^^53^579^33
;;^UTILITY(U,$J,358.3,13106,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13106,1,3,0)
;;=3^LLQ Abdominal Rigidity
;;^UTILITY(U,$J,358.3,13106,1,4,0)
;;=4^R19.34
;;^UTILITY(U,$J,358.3,13106,2)
;;=^5134176
;;^UTILITY(U,$J,358.3,13107,0)
;;=R19.35^^53^579^49
;;^UTILITY(U,$J,358.3,13107,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13107,1,3,0)
;;=3^Periumbilic Abdominal Rigidity
;;^UTILITY(U,$J,358.3,13107,1,4,0)
;;=4^R19.35
;;^UTILITY(U,$J,358.3,13107,2)
;;=^5019270
;;^UTILITY(U,$J,358.3,13108,0)
;;=R19.36^^53^579^23
;;^UTILITY(U,$J,358.3,13108,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13108,1,3,0)
;;=3^Epigastric Abdominal Rigidity
;;^UTILITY(U,$J,358.3,13108,1,4,0)
;;=4^R19.36
;;^UTILITY(U,$J,358.3,13108,2)
;;=^5019271
;;^UTILITY(U,$J,358.3,13109,0)
;;=R19.37^^53^579^2
;;^UTILITY(U,$J,358.3,13109,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13109,1,3,0)
;;=3^Abdominal Rigidity,Generalized
;;^UTILITY(U,$J,358.3,13109,1,4,0)
;;=4^R19.37
;;^UTILITY(U,$J,358.3,13109,2)
;;=^5019272
;;^UTILITY(U,$J,358.3,13110,0)
;;=R18.8^^53^579^10
;;^UTILITY(U,$J,358.3,13110,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13110,1,3,0)
;;=3^Ascites NEC
;;^UTILITY(U,$J,358.3,13110,1,4,0)
;;=4^R18.8
;;^UTILITY(U,$J,358.3,13110,2)
;;=^5019253
;;^UTILITY(U,$J,358.3,13111,0)
;;=R79.89^^53^579^4
;;^UTILITY(U,$J,358.3,13111,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13111,1,3,0)
;;=3^Abnormal Blood Chemistry Findings
;;^UTILITY(U,$J,358.3,13111,1,4,0)
;;=4^R79.89
;;^UTILITY(U,$J,358.3,13111,2)
;;=^5019593
;;^UTILITY(U,$J,358.3,13112,0)
;;=R94.5^^53^579^7
;;^UTILITY(U,$J,358.3,13112,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13112,1,3,0)
;;=3^Abnormal Liver Function Studies
;;^UTILITY(U,$J,358.3,13112,1,4,0)
;;=4^R94.5
;;^UTILITY(U,$J,358.3,13112,2)
;;=^5019742
;;^UTILITY(U,$J,358.3,13113,0)
;;=R09.01^^53^579^11
;;^UTILITY(U,$J,358.3,13113,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13113,1,3,0)
;;=3^Asphyxia
;;^UTILITY(U,$J,358.3,13113,1,4,0)
;;=4^R09.01
;;^UTILITY(U,$J,358.3,13113,2)
;;=^11005
;;^UTILITY(U,$J,358.3,13114,0)
;;=R63.6^^53^579^68
;;^UTILITY(U,$J,358.3,13114,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13114,1,3,0)
;;=3^Underweight
;;^UTILITY(U,$J,358.3,13114,1,4,0)
;;=4^R63.6
;;^UTILITY(U,$J,358.3,13114,2)
;;=^322007
;;^UTILITY(U,$J,358.3,13115,0)
;;=R05.9^^53^579^18
;;^UTILITY(U,$J,358.3,13115,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13115,1,3,0)
;;=3^Cough,Unspecified
;;^UTILITY(U,$J,358.3,13115,1,4,0)
;;=4^R05.9
;;^UTILITY(U,$J,358.3,13115,2)
;;=^5161232
;;^UTILITY(U,$J,358.3,13116,0)
;;=G43.909^^53^580^11
;;^UTILITY(U,$J,358.3,13116,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13116,1,3,0)
;;=3^Migraine,Unspec
;;^UTILITY(U,$J,358.3,13116,1,4,0)
;;=4^G43.909
;;^UTILITY(U,$J,358.3,13116,2)
;;=^5003909
;;^UTILITY(U,$J,358.3,13117,0)
;;=H92.01^^53^580^19
;;^UTILITY(U,$J,358.3,13117,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13117,1,3,0)
;;=3^Otalgia,Right Ear
;;^UTILITY(U,$J,358.3,13117,1,4,0)
;;=4^H92.01
;;^UTILITY(U,$J,358.3,13117,2)
;;=^5006945
;;^UTILITY(U,$J,358.3,13118,0)
;;=H92.02^^53^580^18
;;^UTILITY(U,$J,358.3,13118,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13118,1,3,0)
;;=3^Otalgia,Left Ear
;;^UTILITY(U,$J,358.3,13118,1,4,0)
;;=4^H92.02
;;^UTILITY(U,$J,358.3,13118,2)
;;=^5006946
;;^UTILITY(U,$J,358.3,13119,0)
;;=H92.03^^53^580^17
;;^UTILITY(U,$J,358.3,13119,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13119,1,3,0)
;;=3^Otalgia,Bilateral
;;^UTILITY(U,$J,358.3,13119,1,4,0)
;;=4^H92.03
;;^UTILITY(U,$J,358.3,13119,2)
;;=^5006947
;;^UTILITY(U,$J,358.3,13120,0)
;;=R68.84^^53^580^8
;;^UTILITY(U,$J,358.3,13120,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13120,1,3,0)
;;=3^Jaw Pain
;;^UTILITY(U,$J,358.3,13120,1,4,0)
;;=4^R68.84
;;^UTILITY(U,$J,358.3,13120,2)
;;=^5019556
;;^UTILITY(U,$J,358.3,13121,0)
;;=N48.89^^53^580^21
;;^UTILITY(U,$J,358.3,13121,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13121,1,3,0)
;;=3^Penile Pain
;;^UTILITY(U,$J,358.3,13121,1,4,0)
;;=4^N48.89
;;^UTILITY(U,$J,358.3,13121,2)
;;=^88018
;;^UTILITY(U,$J,358.3,13122,0)
;;=R10.2^^53^580^20
;;^UTILITY(U,$J,358.3,13122,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13122,1,3,0)
;;=3^Pelvic/Perineal Pain
;;^UTILITY(U,$J,358.3,13122,1,4,0)
;;=4^R10.2
;;^UTILITY(U,$J,358.3,13122,2)
;;=^5019209
;;^UTILITY(U,$J,358.3,13123,0)
;;=M54.2^^53^580^1
;;^UTILITY(U,$J,358.3,13123,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13123,1,3,0)
;;=3^Cervicalgia
;;^UTILITY(U,$J,358.3,13123,1,4,0)
;;=4^M54.2
;;^UTILITY(U,$J,358.3,13123,2)
;;=^5012304
;;^UTILITY(U,$J,358.3,13124,0)
;;=M25.50^^53^580^9
;;^UTILITY(U,$J,358.3,13124,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13124,1,3,0)
;;=3^Joint Pain,Unspec Joint
;;^UTILITY(U,$J,358.3,13124,1,4,0)
;;=4^M25.50
;;^UTILITY(U,$J,358.3,13124,2)
;;=^5011601
;;^UTILITY(U,$J,358.3,13125,0)
;;=M60.9^^53^580^16
;;^UTILITY(U,$J,358.3,13125,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13125,1,3,0)
;;=3^Myositis,Unspec
;;^UTILITY(U,$J,358.3,13125,1,4,0)
;;=4^M60.9
;;^UTILITY(U,$J,358.3,13125,2)
;;=^5012409
;;^UTILITY(U,$J,358.3,13126,0)
;;=M79.7^^53^580^3
;;^UTILITY(U,$J,358.3,13126,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13126,1,3,0)
;;=3^Fibromyalgia
;;^UTILITY(U,$J,358.3,13126,1,4,0)
;;=4^M79.7
;;^UTILITY(U,$J,358.3,13126,2)
;;=^46261
;;^UTILITY(U,$J,358.3,13127,0)
;;=M79.671^^53^580^5
;;^UTILITY(U,$J,358.3,13127,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13127,1,3,0)
;;=3^Foot Pain,Right Foot
;;^UTILITY(U,$J,358.3,13127,1,4,0)
;;=4^M79.671
;;^UTILITY(U,$J,358.3,13127,2)
;;=^5013350
;;^UTILITY(U,$J,358.3,13128,0)
;;=M79.672^^53^580^4
;;^UTILITY(U,$J,358.3,13128,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13128,1,3,0)
;;=3^Foot Pain,Left Foot
;;^UTILITY(U,$J,358.3,13128,1,4,0)
;;=4^M79.672
;;^UTILITY(U,$J,358.3,13128,2)
;;=^5013351
;;^UTILITY(U,$J,358.3,13129,0)
;;=N23.^^53^580^22
;;^UTILITY(U,$J,358.3,13129,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13129,1,3,0)
;;=3^Renal Colic,Unspec
;;^UTILITY(U,$J,358.3,13129,1,4,0)
;;=4^N23.
;;^UTILITY(U,$J,358.3,13129,2)
;;=^5015615
;;^UTILITY(U,$J,358.3,13130,0)
;;=R10.13^^53^580^2
;;^UTILITY(U,$J,358.3,13130,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13130,1,3,0)
;;=3^Epigastric Pain
;;^UTILITY(U,$J,358.3,13130,1,4,0)
;;=4^R10.13
;;^UTILITY(U,$J,358.3,13130,2)
;;=^5019208
;;^UTILITY(U,$J,358.3,13131,0)
;;=N50.812^^53^580^24
;;^UTILITY(U,$J,358.3,13131,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13131,1,3,0)
;;=3^Testicular Pain,Left Side
;;^UTILITY(U,$J,358.3,13131,1,4,0)
;;=4^N50.812
;;^UTILITY(U,$J,358.3,13131,2)
;;=^5138928
;;^UTILITY(U,$J,358.3,13132,0)
;;=N50.811^^53^580^25
;;^UTILITY(U,$J,358.3,13132,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13132,1,3,0)
;;=3^Testicular Pain,Right Side
;;^UTILITY(U,$J,358.3,13132,1,4,0)
;;=4^N50.811
;;^UTILITY(U,$J,358.3,13132,2)
;;=^5138927
;;^UTILITY(U,$J,358.3,13133,0)
;;=N50.82^^53^580^23
;;^UTILITY(U,$J,358.3,13133,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13133,1,3,0)
;;=3^Scrotal Pain
;;^UTILITY(U,$J,358.3,13133,1,4,0)
;;=4^N50.82
;;^UTILITY(U,$J,358.3,13133,2)
;;=^5138930
;;^UTILITY(U,$J,358.3,13134,0)
;;=M79.10^^53^580^15
;;^UTILITY(U,$J,358.3,13134,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13134,1,3,0)
;;=3^Myalgia,Unspec Site
;;^UTILITY(U,$J,358.3,13134,1,4,0)
;;=4^M79.10
;;^UTILITY(U,$J,358.3,13134,2)
;;=^5157394
;;^UTILITY(U,$J,358.3,13135,0)
;;=M79.11^^53^580^13
;;^UTILITY(U,$J,358.3,13135,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13135,1,3,0)
;;=3^Myalgia,Mastication Muscle
;;^UTILITY(U,$J,358.3,13135,1,4,0)
;;=4^M79.11
;;^UTILITY(U,$J,358.3,13135,2)
;;=^5157395
;;^UTILITY(U,$J,358.3,13136,0)
;;=M79.12^^53^580^12
;;^UTILITY(U,$J,358.3,13136,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13136,1,3,0)
;;=3^Myalgia,Auxiliary Muscles,Head/Neck
;;^UTILITY(U,$J,358.3,13136,1,4,0)
;;=4^M79.12
;;^UTILITY(U,$J,358.3,13136,2)
;;=^5157396
;;^UTILITY(U,$J,358.3,13137,0)
;;=M79.18^^53^580^14
;;^UTILITY(U,$J,358.3,13137,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13137,1,3,0)
;;=3^Myalgia,Oth Site
;;^UTILITY(U,$J,358.3,13137,1,4,0)
;;=4^M79.18
;;^UTILITY(U,$J,358.3,13137,2)
;;=^5157397
;;^UTILITY(U,$J,358.3,13138,0)
;;=Z79.891^^53^580^10
;;^UTILITY(U,$J,358.3,13138,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13138,1,3,0)
;;=3^Long Term Opiate/Opioid Analgesic Use
;;^UTILITY(U,$J,358.3,13138,1,4,0)
;;=4^Z79.891
;;^UTILITY(U,$J,358.3,13138,2)
;;=^5063342
;;^UTILITY(U,$J,358.3,13139,0)
;;=R51.0^^53^580^6
;;^UTILITY(U,$J,358.3,13139,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13139,1,3,0)
;;=3^Headache w/ Orthostatic Component,NEC
;;^UTILITY(U,$J,358.3,13139,1,4,0)
;;=4^R51.0
;;^UTILITY(U,$J,358.3,13139,2)
;;=^5159305
;;^UTILITY(U,$J,358.3,13140,0)
;;=R51.9^^53^580^7
;;^UTILITY(U,$J,358.3,13140,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13140,1,3,0)
;;=3^Headache,Unspecified
;;^UTILITY(U,$J,358.3,13140,1,4,0)
;;=4^R51.9
;;^UTILITY(U,$J,358.3,13140,2)
;;=^5159306
;;^UTILITY(U,$J,358.3,13141,0)
;;=D49.6^^53^581^2
;;^UTILITY(U,$J,358.3,13141,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13141,1,3,0)
;;=3^Brain Mass,Unspec
;;^UTILITY(U,$J,358.3,13141,1,4,0)
;;=4^D49.6
;;^UTILITY(U,$J,358.3,13141,2)
;;=^5002276
;;^UTILITY(U,$J,358.3,13142,0)
;;=E07.9^^53^581^28
;;^UTILITY(U,$J,358.3,13142,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13142,1,3,0)
;;=3^Thyroid Mass
;;^UTILITY(U,$J,358.3,13142,1,4,0)
;;=4^E07.9
;;^UTILITY(U,$J,358.3,13142,2)
;;=^5002502
;;^UTILITY(U,$J,358.3,13143,0)
;;=N28.9^^53^581^22
;;^UTILITY(U,$J,358.3,13143,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13143,1,3,0)
;;=3^Kidney Mass
;;^UTILITY(U,$J,358.3,13143,1,4,0)
;;=4^N28.9
;;^UTILITY(U,$J,358.3,13143,2)
;;=^5015630
;;^UTILITY(U,$J,358.3,13144,0)
;;=N48.89^^53^581^26
;;^UTILITY(U,$J,358.3,13144,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13144,1,3,0)
;;=3^Penile Mass
;;^UTILITY(U,$J,358.3,13144,1,4,0)
;;=4^N48.89
;;^UTILITY(U,$J,358.3,13144,2)
;;=^88018
;;^UTILITY(U,$J,358.3,13145,0)
;;=N94.89^^53^581^29
;;^UTILITY(U,$J,358.3,13145,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13145,1,3,0)
;;=3^Uterine Mass
;;^UTILITY(U,$J,358.3,13145,1,4,0)
;;=4^N94.89
;;^UTILITY(U,$J,358.3,13145,2)
;;=^5015925
;;^UTILITY(U,$J,358.3,13146,0)
;;=R29.898^^53^581^21
;;^UTILITY(U,$J,358.3,13146,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13146,1,3,0)
;;=3^Joint Mass,Unspec Joint
;;^UTILITY(U,$J,358.3,13146,1,4,0)
;;=4^R29.898
;;^UTILITY(U,$J,358.3,13146,2)
;;=^5019319
;;^UTILITY(U,$J,358.3,13147,0)
;;=M89.9^^53^581^1
;;^UTILITY(U,$J,358.3,13147,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13147,1,3,0)
;;=3^Bone Mass
;;^UTILITY(U,$J,358.3,13147,1,4,0)
;;=4^M89.9
;;^UTILITY(U,$J,358.3,13147,2)
;;=^5015119
;;^UTILITY(U,$J,358.3,13148,0)
;;=M94.9^^53^581^20
;;^UTILITY(U,$J,358.3,13148,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13148,1,3,0)
;;=3^Cartilage Mass
;;^UTILITY(U,$J,358.3,13148,1,4,0)
;;=4^M94.9
;;^UTILITY(U,$J,358.3,13148,2)
;;=^5015366
;;^UTILITY(U,$J,358.3,13149,0)
;;=R22.9^^53^581^27
;;^UTILITY(U,$J,358.3,13149,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13149,1,3,0)
;;=3^Skin Mass
;;^UTILITY(U,$J,358.3,13149,1,4,0)
;;=4^R22.9
;;^UTILITY(U,$J,358.3,13149,2)
;;=^5019292
;;^UTILITY(U,$J,358.3,13150,0)
;;=R22.1^^53^581^25
;;^UTILITY(U,$J,358.3,13150,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13150,1,3,0)
;;=3^Neck Mass
;;^UTILITY(U,$J,358.3,13150,1,4,0)
;;=4^R22.1
;;^UTILITY(U,$J,358.3,13150,2)
;;=^5019285
;;^UTILITY(U,$J,358.3,13151,0)
;;=R59.9^^53^581^24
;;^UTILITY(U,$J,358.3,13151,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13151,1,3,0)
;;=3^Lymph Node Mass
;;^UTILITY(U,$J,358.3,13151,1,4,0)
;;=4^R59.9
;;^UTILITY(U,$J,358.3,13151,2)
;;=^5019531
;;^UTILITY(U,$J,358.3,13152,0)
;;=R22.2^^53^581^23
;;^UTILITY(U,$J,358.3,13152,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13152,1,3,0)
;;=3^Lung/Chest Mass
;;^UTILITY(U,$J,358.3,13152,1,4,0)
;;=4^R22.2
;;^UTILITY(U,$J,358.3,13152,2)
;;=^5019286
;;^UTILITY(U,$J,358.3,13153,0)
;;=N63.0^^53^581^19
;;^UTILITY(U,$J,358.3,13153,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13153,1,3,0)
;;=3^Breast Mass/Lump
;;^UTILITY(U,$J,358.3,13153,1,4,0)
;;=4^N63.0
;;^UTILITY(U,$J,358.3,13153,2)
;;=^5151518
;;^UTILITY(U,$J,358.3,13154,0)
;;=N63.32^^53^581^3
;;^UTILITY(U,$J,358.3,13154,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13154,1,3,0)
;;=3^Breast Lump,Axillary Tail,Left
;;^UTILITY(U,$J,358.3,13154,1,4,0)
;;=4^N63.32
;;^UTILITY(U,$J,358.3,13154,2)
;;=^5151530
;;^UTILITY(U,$J,358.3,13155,0)
;;=N63.31^^53^581^4
;;^UTILITY(U,$J,358.3,13155,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13155,1,3,0)
;;=3^Breast Lump,Axillary Tail,Right
;;^UTILITY(U,$J,358.3,13155,1,4,0)
;;=4^N63.31
;;^UTILITY(U,$J,358.3,13155,2)
;;=^5151529
;;^UTILITY(U,$J,358.3,13156,0)
;;=N63.24^^53^581^5
;;^UTILITY(U,$J,358.3,13156,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13156,1,3,0)
;;=3^Breast Lump,Lower Inner Quadrant,Left
;;^UTILITY(U,$J,358.3,13156,1,4,0)
;;=4^N63.24
;;^UTILITY(U,$J,358.3,13156,2)
;;=^5151528
;;^UTILITY(U,$J,358.3,13157,0)
;;=N63.23^^53^581^7
;;^UTILITY(U,$J,358.3,13157,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13157,1,3,0)
;;=3^Breast Lump,Lower Outer Quadrant,Left
;;^UTILITY(U,$J,358.3,13157,1,4,0)
;;=4^N63.23
;;^UTILITY(U,$J,358.3,13157,2)
;;=^5151527
;;^UTILITY(U,$J,358.3,13158,0)
;;=N63.20^^53^581^11
;;^UTILITY(U,$J,358.3,13158,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13158,1,3,0)
;;=3^Breast Lump,Unspec Quadrant,Left
;;^UTILITY(U,$J,358.3,13158,1,4,0)
;;=4^N63.20
;;^UTILITY(U,$J,358.3,13158,2)
;;=^5151524
;;^UTILITY(U,$J,358.3,13159,0)
;;=N63.22^^53^581^15
;;^UTILITY(U,$J,358.3,13159,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13159,1,3,0)
;;=3^Breast Lump,Upper Inner Quadrant,Left
;;^UTILITY(U,$J,358.3,13159,1,4,0)
;;=4^N63.22
;;^UTILITY(U,$J,358.3,13159,2)
;;=^5151526
;;^UTILITY(U,$J,358.3,13160,0)
;;=N63.21^^53^581^17
;;^UTILITY(U,$J,358.3,13160,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13160,1,3,0)
;;=3^Breast Lump,Upper Outer Quadrant,Left
;;^UTILITY(U,$J,358.3,13160,1,4,0)
;;=4^N63.21
;;^UTILITY(U,$J,358.3,13160,2)
;;=^5151525
;;^UTILITY(U,$J,358.3,13161,0)
;;=N63.14^^53^581^6
;;^UTILITY(U,$J,358.3,13161,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13161,1,3,0)
;;=3^Breast Lump,Lower Inner Quadrant,Right
;;^UTILITY(U,$J,358.3,13161,1,4,0)
;;=4^N63.14
;;^UTILITY(U,$J,358.3,13161,2)
;;=^5151523
;;^UTILITY(U,$J,358.3,13162,0)
;;=N63.13^^53^581^8
;;^UTILITY(U,$J,358.3,13162,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13162,1,3,0)
;;=3^Breast Lump,Lower Outer Quadrant,Right
;;^UTILITY(U,$J,358.3,13162,1,4,0)
;;=4^N63.13
;;^UTILITY(U,$J,358.3,13162,2)
;;=^5151522
;;^UTILITY(U,$J,358.3,13163,0)
;;=N63.10^^53^581^12
;;^UTILITY(U,$J,358.3,13163,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13163,1,3,0)
;;=3^Breast Lump,Unspec Quadrant,Right
;;^UTILITY(U,$J,358.3,13163,1,4,0)
;;=4^N63.10
;;^UTILITY(U,$J,358.3,13163,2)
;;=^5151519
;;^UTILITY(U,$J,358.3,13164,0)
;;=N63.12^^53^581^16
;;^UTILITY(U,$J,358.3,13164,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13164,1,3,0)
;;=3^Breast Lump,Upper Inner Quadrant,Right
;;^UTILITY(U,$J,358.3,13164,1,4,0)
;;=4^N63.12
;;^UTILITY(U,$J,358.3,13164,2)
;;=^5151521
;;^UTILITY(U,$J,358.3,13165,0)
;;=N63.11^^53^581^18
;;^UTILITY(U,$J,358.3,13165,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13165,1,3,0)
;;=3^Breast Lump,Upper Outer Quadrant,Right
;;^UTILITY(U,$J,358.3,13165,1,4,0)
;;=4^N63.11
;;^UTILITY(U,$J,358.3,13165,2)
;;=^5151520
;;^UTILITY(U,$J,358.3,13166,0)
;;=N63.42^^53^581^9
;;^UTILITY(U,$J,358.3,13166,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13166,1,3,0)
;;=3^Breast Lump,Subareaolar,Left
;;^UTILITY(U,$J,358.3,13166,1,4,0)
;;=4^N63.42
;;^UTILITY(U,$J,358.3,13166,2)
;;=^5151532
;;^UTILITY(U,$J,358.3,13167,0)
;;=N63.41^^53^581^10
;;^UTILITY(U,$J,358.3,13167,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13167,1,3,0)
;;=3^Breast Lump,Subareolar,Right
;;^UTILITY(U,$J,358.3,13167,1,4,0)
;;=4^N63.41
;;^UTILITY(U,$J,358.3,13167,2)
;;=^5151531
;;^UTILITY(U,$J,358.3,13168,0)
;;=N63.15^^53^581^13
;;^UTILITY(U,$J,358.3,13168,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13168,1,3,0)
;;=3^Breast Lump,Unspec,Overlapping Quadrants,Right Breast
;;^UTILITY(U,$J,358.3,13168,1,4,0)
;;=4^N63.15
;;^UTILITY(U,$J,358.3,13168,2)
;;=^5158108
;;^UTILITY(U,$J,358.3,13169,0)
;;=N63.25^^53^581^14
;;^UTILITY(U,$J,358.3,13169,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13169,1,3,0)
;;=3^Breast Lump,Unspec,Overlapping Quadrants,Left Breast
;;^UTILITY(U,$J,358.3,13169,1,4,0)
;;=4^N63.25
;;^UTILITY(U,$J,358.3,13169,2)
;;=^5158109
;;^UTILITY(U,$J,358.3,13170,0)
;;=T81.72XA^^53^582^29
;;^UTILITY(U,$J,358.3,13170,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13170,1,3,0)
;;=3^Complic,Vein s/p Procedure,Init Encntr
;;^UTILITY(U,$J,358.3,13170,1,4,0)
;;=4^T81.72XA
;;^UTILITY(U,$J,358.3,13170,2)
;;=^5054650
;;^UTILITY(U,$J,358.3,13171,0)
;;=T82.817A^^53^582^50
;;^UTILITY(U,$J,358.3,13171,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13171,1,3,0)
;;=3^Embol of Cardiac Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13171,1,4,0)
;;=4^T82.817A
;;^UTILITY(U,$J,358.3,13171,2)
;;=^5054914
;;^UTILITY(U,$J,358.3,13172,0)
;;=T80.0XXA^^53^582^1
;;^UTILITY(U,$J,358.3,13172,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13172,1,3,0)
;;=3^Air Embol s/p Infsn/Trnsfsn/Therapeut Inj,Init Encntr
;;^UTILITY(U,$J,358.3,13172,1,4,0)
;;=4^T80.0XXA
;;^UTILITY(U,$J,358.3,13172,2)
;;=^5054344
;;^UTILITY(U,$J,358.3,13173,0)
;;=T81.718A^^53^582^21
;;^UTILITY(U,$J,358.3,13173,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13173,1,3,0)
;;=3^Complic,Artery s/p Procedure,Init Encntr
;;^UTILITY(U,$J,358.3,13173,1,4,0)
;;=4^T81.718A
;;^UTILITY(U,$J,358.3,13173,2)
;;=^5054644
;;^UTILITY(U,$J,358.3,13174,0)
;;=J95.811^^53^582^218
;;^UTILITY(U,$J,358.3,13174,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13174,1,3,0)
;;=3^Postproc Pneumothorax
;;^UTILITY(U,$J,358.3,13174,1,4,0)
;;=4^J95.811
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI05F 19748 printed Sep 23, 2025@19:17:58 Page 2
IBDEI05F ; ; 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,13104,1,3,0)
+2 ;;=3^LUQ Abdominal Rigidity
+3 ;;^UTILITY(U,$J,358.3,13104,1,4,0)
+4 ;;=4^R19.32
+5 ;;^UTILITY(U,$J,358.3,13104,2)
+6 ;;=^5019268
+7 ;;^UTILITY(U,$J,358.3,13105,0)
+8 ;;=R19.33^^53^579^55
+9 ;;^UTILITY(U,$J,358.3,13105,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,13105,1,3,0)
+12 ;;=3^RLQ Abdominal Rigidity
+13 ;;^UTILITY(U,$J,358.3,13105,1,4,0)
+14 ;;=4^R19.33
+15 ;;^UTILITY(U,$J,358.3,13105,2)
+16 ;;=^5019269
+17 ;;^UTILITY(U,$J,358.3,13106,0)
+18 ;;=R19.34^^53^579^33
+19 ;;^UTILITY(U,$J,358.3,13106,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,13106,1,3,0)
+22 ;;=3^LLQ Abdominal Rigidity
+23 ;;^UTILITY(U,$J,358.3,13106,1,4,0)
+24 ;;=4^R19.34
+25 ;;^UTILITY(U,$J,358.3,13106,2)
+26 ;;=^5134176
+27 ;;^UTILITY(U,$J,358.3,13107,0)
+28 ;;=R19.35^^53^579^49
+29 ;;^UTILITY(U,$J,358.3,13107,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,13107,1,3,0)
+32 ;;=3^Periumbilic Abdominal Rigidity
+33 ;;^UTILITY(U,$J,358.3,13107,1,4,0)
+34 ;;=4^R19.35
+35 ;;^UTILITY(U,$J,358.3,13107,2)
+36 ;;=^5019270
+37 ;;^UTILITY(U,$J,358.3,13108,0)
+38 ;;=R19.36^^53^579^23
+39 ;;^UTILITY(U,$J,358.3,13108,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,13108,1,3,0)
+42 ;;=3^Epigastric Abdominal Rigidity
+43 ;;^UTILITY(U,$J,358.3,13108,1,4,0)
+44 ;;=4^R19.36
+45 ;;^UTILITY(U,$J,358.3,13108,2)
+46 ;;=^5019271
+47 ;;^UTILITY(U,$J,358.3,13109,0)
+48 ;;=R19.37^^53^579^2
+49 ;;^UTILITY(U,$J,358.3,13109,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,13109,1,3,0)
+52 ;;=3^Abdominal Rigidity,Generalized
+53 ;;^UTILITY(U,$J,358.3,13109,1,4,0)
+54 ;;=4^R19.37
+55 ;;^UTILITY(U,$J,358.3,13109,2)
+56 ;;=^5019272
+57 ;;^UTILITY(U,$J,358.3,13110,0)
+58 ;;=R18.8^^53^579^10
+59 ;;^UTILITY(U,$J,358.3,13110,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,13110,1,3,0)
+62 ;;=3^Ascites NEC
+63 ;;^UTILITY(U,$J,358.3,13110,1,4,0)
+64 ;;=4^R18.8
+65 ;;^UTILITY(U,$J,358.3,13110,2)
+66 ;;=^5019253
+67 ;;^UTILITY(U,$J,358.3,13111,0)
+68 ;;=R79.89^^53^579^4
+69 ;;^UTILITY(U,$J,358.3,13111,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,13111,1,3,0)
+72 ;;=3^Abnormal Blood Chemistry Findings
+73 ;;^UTILITY(U,$J,358.3,13111,1,4,0)
+74 ;;=4^R79.89
+75 ;;^UTILITY(U,$J,358.3,13111,2)
+76 ;;=^5019593
+77 ;;^UTILITY(U,$J,358.3,13112,0)
+78 ;;=R94.5^^53^579^7
+79 ;;^UTILITY(U,$J,358.3,13112,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,13112,1,3,0)
+82 ;;=3^Abnormal Liver Function Studies
+83 ;;^UTILITY(U,$J,358.3,13112,1,4,0)
+84 ;;=4^R94.5
+85 ;;^UTILITY(U,$J,358.3,13112,2)
+86 ;;=^5019742
+87 ;;^UTILITY(U,$J,358.3,13113,0)
+88 ;;=R09.01^^53^579^11
+89 ;;^UTILITY(U,$J,358.3,13113,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,13113,1,3,0)
+92 ;;=3^Asphyxia
+93 ;;^UTILITY(U,$J,358.3,13113,1,4,0)
+94 ;;=4^R09.01
+95 ;;^UTILITY(U,$J,358.3,13113,2)
+96 ;;=^11005
+97 ;;^UTILITY(U,$J,358.3,13114,0)
+98 ;;=R63.6^^53^579^68
+99 ;;^UTILITY(U,$J,358.3,13114,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,13114,1,3,0)
+102 ;;=3^Underweight
+103 ;;^UTILITY(U,$J,358.3,13114,1,4,0)
+104 ;;=4^R63.6
+105 ;;^UTILITY(U,$J,358.3,13114,2)
+106 ;;=^322007
+107 ;;^UTILITY(U,$J,358.3,13115,0)
+108 ;;=R05.9^^53^579^18
+109 ;;^UTILITY(U,$J,358.3,13115,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,13115,1,3,0)
+112 ;;=3^Cough,Unspecified
+113 ;;^UTILITY(U,$J,358.3,13115,1,4,0)
+114 ;;=4^R05.9
+115 ;;^UTILITY(U,$J,358.3,13115,2)
+116 ;;=^5161232
+117 ;;^UTILITY(U,$J,358.3,13116,0)
+118 ;;=G43.909^^53^580^11
+119 ;;^UTILITY(U,$J,358.3,13116,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,13116,1,3,0)
+122 ;;=3^Migraine,Unspec
+123 ;;^UTILITY(U,$J,358.3,13116,1,4,0)
+124 ;;=4^G43.909
+125 ;;^UTILITY(U,$J,358.3,13116,2)
+126 ;;=^5003909
+127 ;;^UTILITY(U,$J,358.3,13117,0)
+128 ;;=H92.01^^53^580^19
+129 ;;^UTILITY(U,$J,358.3,13117,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,13117,1,3,0)
+132 ;;=3^Otalgia,Right Ear
+133 ;;^UTILITY(U,$J,358.3,13117,1,4,0)
+134 ;;=4^H92.01
+135 ;;^UTILITY(U,$J,358.3,13117,2)
+136 ;;=^5006945
+137 ;;^UTILITY(U,$J,358.3,13118,0)
+138 ;;=H92.02^^53^580^18
+139 ;;^UTILITY(U,$J,358.3,13118,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,13118,1,3,0)
+142 ;;=3^Otalgia,Left Ear
+143 ;;^UTILITY(U,$J,358.3,13118,1,4,0)
+144 ;;=4^H92.02
+145 ;;^UTILITY(U,$J,358.3,13118,2)
+146 ;;=^5006946
+147 ;;^UTILITY(U,$J,358.3,13119,0)
+148 ;;=H92.03^^53^580^17
+149 ;;^UTILITY(U,$J,358.3,13119,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,13119,1,3,0)
+152 ;;=3^Otalgia,Bilateral
+153 ;;^UTILITY(U,$J,358.3,13119,1,4,0)
+154 ;;=4^H92.03
+155 ;;^UTILITY(U,$J,358.3,13119,2)
+156 ;;=^5006947
+157 ;;^UTILITY(U,$J,358.3,13120,0)
+158 ;;=R68.84^^53^580^8
+159 ;;^UTILITY(U,$J,358.3,13120,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,13120,1,3,0)
+162 ;;=3^Jaw Pain
+163 ;;^UTILITY(U,$J,358.3,13120,1,4,0)
+164 ;;=4^R68.84
+165 ;;^UTILITY(U,$J,358.3,13120,2)
+166 ;;=^5019556
+167 ;;^UTILITY(U,$J,358.3,13121,0)
+168 ;;=N48.89^^53^580^21
+169 ;;^UTILITY(U,$J,358.3,13121,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,13121,1,3,0)
+172 ;;=3^Penile Pain
+173 ;;^UTILITY(U,$J,358.3,13121,1,4,0)
+174 ;;=4^N48.89
+175 ;;^UTILITY(U,$J,358.3,13121,2)
+176 ;;=^88018
+177 ;;^UTILITY(U,$J,358.3,13122,0)
+178 ;;=R10.2^^53^580^20
+179 ;;^UTILITY(U,$J,358.3,13122,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,13122,1,3,0)
+182 ;;=3^Pelvic/Perineal Pain
+183 ;;^UTILITY(U,$J,358.3,13122,1,4,0)
+184 ;;=4^R10.2
+185 ;;^UTILITY(U,$J,358.3,13122,2)
+186 ;;=^5019209
+187 ;;^UTILITY(U,$J,358.3,13123,0)
+188 ;;=M54.2^^53^580^1
+189 ;;^UTILITY(U,$J,358.3,13123,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,13123,1,3,0)
+192 ;;=3^Cervicalgia
+193 ;;^UTILITY(U,$J,358.3,13123,1,4,0)
+194 ;;=4^M54.2
+195 ;;^UTILITY(U,$J,358.3,13123,2)
+196 ;;=^5012304
+197 ;;^UTILITY(U,$J,358.3,13124,0)
+198 ;;=M25.50^^53^580^9
+199 ;;^UTILITY(U,$J,358.3,13124,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,13124,1,3,0)
+202 ;;=3^Joint Pain,Unspec Joint
+203 ;;^UTILITY(U,$J,358.3,13124,1,4,0)
+204 ;;=4^M25.50
+205 ;;^UTILITY(U,$J,358.3,13124,2)
+206 ;;=^5011601
+207 ;;^UTILITY(U,$J,358.3,13125,0)
+208 ;;=M60.9^^53^580^16
+209 ;;^UTILITY(U,$J,358.3,13125,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,13125,1,3,0)
+212 ;;=3^Myositis,Unspec
+213 ;;^UTILITY(U,$J,358.3,13125,1,4,0)
+214 ;;=4^M60.9
+215 ;;^UTILITY(U,$J,358.3,13125,2)
+216 ;;=^5012409
+217 ;;^UTILITY(U,$J,358.3,13126,0)
+218 ;;=M79.7^^53^580^3
+219 ;;^UTILITY(U,$J,358.3,13126,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,13126,1,3,0)
+222 ;;=3^Fibromyalgia
+223 ;;^UTILITY(U,$J,358.3,13126,1,4,0)
+224 ;;=4^M79.7
+225 ;;^UTILITY(U,$J,358.3,13126,2)
+226 ;;=^46261
+227 ;;^UTILITY(U,$J,358.3,13127,0)
+228 ;;=M79.671^^53^580^5
+229 ;;^UTILITY(U,$J,358.3,13127,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,13127,1,3,0)
+232 ;;=3^Foot Pain,Right Foot
+233 ;;^UTILITY(U,$J,358.3,13127,1,4,0)
+234 ;;=4^M79.671
+235 ;;^UTILITY(U,$J,358.3,13127,2)
+236 ;;=^5013350
+237 ;;^UTILITY(U,$J,358.3,13128,0)
+238 ;;=M79.672^^53^580^4
+239 ;;^UTILITY(U,$J,358.3,13128,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,13128,1,3,0)
+242 ;;=3^Foot Pain,Left Foot
+243 ;;^UTILITY(U,$J,358.3,13128,1,4,0)
+244 ;;=4^M79.672
+245 ;;^UTILITY(U,$J,358.3,13128,2)
+246 ;;=^5013351
+247 ;;^UTILITY(U,$J,358.3,13129,0)
+248 ;;=N23.^^53^580^22
+249 ;;^UTILITY(U,$J,358.3,13129,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,13129,1,3,0)
+252 ;;=3^Renal Colic,Unspec
+253 ;;^UTILITY(U,$J,358.3,13129,1,4,0)
+254 ;;=4^N23.
+255 ;;^UTILITY(U,$J,358.3,13129,2)
+256 ;;=^5015615
+257 ;;^UTILITY(U,$J,358.3,13130,0)
+258 ;;=R10.13^^53^580^2
+259 ;;^UTILITY(U,$J,358.3,13130,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,13130,1,3,0)
+262 ;;=3^Epigastric Pain
+263 ;;^UTILITY(U,$J,358.3,13130,1,4,0)
+264 ;;=4^R10.13
+265 ;;^UTILITY(U,$J,358.3,13130,2)
+266 ;;=^5019208
+267 ;;^UTILITY(U,$J,358.3,13131,0)
+268 ;;=N50.812^^53^580^24
+269 ;;^UTILITY(U,$J,358.3,13131,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,13131,1,3,0)
+272 ;;=3^Testicular Pain,Left Side
+273 ;;^UTILITY(U,$J,358.3,13131,1,4,0)
+274 ;;=4^N50.812
+275 ;;^UTILITY(U,$J,358.3,13131,2)
+276 ;;=^5138928
+277 ;;^UTILITY(U,$J,358.3,13132,0)
+278 ;;=N50.811^^53^580^25
+279 ;;^UTILITY(U,$J,358.3,13132,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,13132,1,3,0)
+282 ;;=3^Testicular Pain,Right Side
+283 ;;^UTILITY(U,$J,358.3,13132,1,4,0)
+284 ;;=4^N50.811
+285 ;;^UTILITY(U,$J,358.3,13132,2)
+286 ;;=^5138927
+287 ;;^UTILITY(U,$J,358.3,13133,0)
+288 ;;=N50.82^^53^580^23
+289 ;;^UTILITY(U,$J,358.3,13133,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,13133,1,3,0)
+292 ;;=3^Scrotal Pain
+293 ;;^UTILITY(U,$J,358.3,13133,1,4,0)
+294 ;;=4^N50.82
+295 ;;^UTILITY(U,$J,358.3,13133,2)
+296 ;;=^5138930
+297 ;;^UTILITY(U,$J,358.3,13134,0)
+298 ;;=M79.10^^53^580^15
+299 ;;^UTILITY(U,$J,358.3,13134,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,13134,1,3,0)
+302 ;;=3^Myalgia,Unspec Site
+303 ;;^UTILITY(U,$J,358.3,13134,1,4,0)
+304 ;;=4^M79.10
+305 ;;^UTILITY(U,$J,358.3,13134,2)
+306 ;;=^5157394
+307 ;;^UTILITY(U,$J,358.3,13135,0)
+308 ;;=M79.11^^53^580^13
+309 ;;^UTILITY(U,$J,358.3,13135,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,13135,1,3,0)
+312 ;;=3^Myalgia,Mastication Muscle
+313 ;;^UTILITY(U,$J,358.3,13135,1,4,0)
+314 ;;=4^M79.11
+315 ;;^UTILITY(U,$J,358.3,13135,2)
+316 ;;=^5157395
+317 ;;^UTILITY(U,$J,358.3,13136,0)
+318 ;;=M79.12^^53^580^12
+319 ;;^UTILITY(U,$J,358.3,13136,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,13136,1,3,0)
+322 ;;=3^Myalgia,Auxiliary Muscles,Head/Neck
+323 ;;^UTILITY(U,$J,358.3,13136,1,4,0)
+324 ;;=4^M79.12
+325 ;;^UTILITY(U,$J,358.3,13136,2)
+326 ;;=^5157396
+327 ;;^UTILITY(U,$J,358.3,13137,0)
+328 ;;=M79.18^^53^580^14
+329 ;;^UTILITY(U,$J,358.3,13137,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,13137,1,3,0)
+332 ;;=3^Myalgia,Oth Site
+333 ;;^UTILITY(U,$J,358.3,13137,1,4,0)
+334 ;;=4^M79.18
+335 ;;^UTILITY(U,$J,358.3,13137,2)
+336 ;;=^5157397
+337 ;;^UTILITY(U,$J,358.3,13138,0)
+338 ;;=Z79.891^^53^580^10
+339 ;;^UTILITY(U,$J,358.3,13138,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,13138,1,3,0)
+342 ;;=3^Long Term Opiate/Opioid Analgesic Use
+343 ;;^UTILITY(U,$J,358.3,13138,1,4,0)
+344 ;;=4^Z79.891
+345 ;;^UTILITY(U,$J,358.3,13138,2)
+346 ;;=^5063342
+347 ;;^UTILITY(U,$J,358.3,13139,0)
+348 ;;=R51.0^^53^580^6
+349 ;;^UTILITY(U,$J,358.3,13139,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,13139,1,3,0)
+352 ;;=3^Headache w/ Orthostatic Component,NEC
+353 ;;^UTILITY(U,$J,358.3,13139,1,4,0)
+354 ;;=4^R51.0
+355 ;;^UTILITY(U,$J,358.3,13139,2)
+356 ;;=^5159305
+357 ;;^UTILITY(U,$J,358.3,13140,0)
+358 ;;=R51.9^^53^580^7
+359 ;;^UTILITY(U,$J,358.3,13140,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,13140,1,3,0)
+362 ;;=3^Headache,Unspecified
+363 ;;^UTILITY(U,$J,358.3,13140,1,4,0)
+364 ;;=4^R51.9
+365 ;;^UTILITY(U,$J,358.3,13140,2)
+366 ;;=^5159306
+367 ;;^UTILITY(U,$J,358.3,13141,0)
+368 ;;=D49.6^^53^581^2
+369 ;;^UTILITY(U,$J,358.3,13141,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,13141,1,3,0)
+372 ;;=3^Brain Mass,Unspec
+373 ;;^UTILITY(U,$J,358.3,13141,1,4,0)
+374 ;;=4^D49.6
+375 ;;^UTILITY(U,$J,358.3,13141,2)
+376 ;;=^5002276
+377 ;;^UTILITY(U,$J,358.3,13142,0)
+378 ;;=E07.9^^53^581^28
+379 ;;^UTILITY(U,$J,358.3,13142,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,13142,1,3,0)
+382 ;;=3^Thyroid Mass
+383 ;;^UTILITY(U,$J,358.3,13142,1,4,0)
+384 ;;=4^E07.9
+385 ;;^UTILITY(U,$J,358.3,13142,2)
+386 ;;=^5002502
+387 ;;^UTILITY(U,$J,358.3,13143,0)
+388 ;;=N28.9^^53^581^22
+389 ;;^UTILITY(U,$J,358.3,13143,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,13143,1,3,0)
+392 ;;=3^Kidney Mass
+393 ;;^UTILITY(U,$J,358.3,13143,1,4,0)
+394 ;;=4^N28.9
+395 ;;^UTILITY(U,$J,358.3,13143,2)
+396 ;;=^5015630
+397 ;;^UTILITY(U,$J,358.3,13144,0)
+398 ;;=N48.89^^53^581^26
+399 ;;^UTILITY(U,$J,358.3,13144,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,13144,1,3,0)
+402 ;;=3^Penile Mass
+403 ;;^UTILITY(U,$J,358.3,13144,1,4,0)
+404 ;;=4^N48.89
+405 ;;^UTILITY(U,$J,358.3,13144,2)
+406 ;;=^88018
+407 ;;^UTILITY(U,$J,358.3,13145,0)
+408 ;;=N94.89^^53^581^29
+409 ;;^UTILITY(U,$J,358.3,13145,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,13145,1,3,0)
+412 ;;=3^Uterine Mass
+413 ;;^UTILITY(U,$J,358.3,13145,1,4,0)
+414 ;;=4^N94.89
+415 ;;^UTILITY(U,$J,358.3,13145,2)
+416 ;;=^5015925
+417 ;;^UTILITY(U,$J,358.3,13146,0)
+418 ;;=R29.898^^53^581^21
+419 ;;^UTILITY(U,$J,358.3,13146,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,13146,1,3,0)
+422 ;;=3^Joint Mass,Unspec Joint
+423 ;;^UTILITY(U,$J,358.3,13146,1,4,0)
+424 ;;=4^R29.898
+425 ;;^UTILITY(U,$J,358.3,13146,2)
+426 ;;=^5019319
+427 ;;^UTILITY(U,$J,358.3,13147,0)
+428 ;;=M89.9^^53^581^1
+429 ;;^UTILITY(U,$J,358.3,13147,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,13147,1,3,0)
+432 ;;=3^Bone Mass
+433 ;;^UTILITY(U,$J,358.3,13147,1,4,0)
+434 ;;=4^M89.9
+435 ;;^UTILITY(U,$J,358.3,13147,2)
+436 ;;=^5015119
+437 ;;^UTILITY(U,$J,358.3,13148,0)
+438 ;;=M94.9^^53^581^20
+439 ;;^UTILITY(U,$J,358.3,13148,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,13148,1,3,0)
+442 ;;=3^Cartilage Mass
+443 ;;^UTILITY(U,$J,358.3,13148,1,4,0)
+444 ;;=4^M94.9
+445 ;;^UTILITY(U,$J,358.3,13148,2)
+446 ;;=^5015366
+447 ;;^UTILITY(U,$J,358.3,13149,0)
+448 ;;=R22.9^^53^581^27
+449 ;;^UTILITY(U,$J,358.3,13149,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,13149,1,3,0)
+452 ;;=3^Skin Mass
+453 ;;^UTILITY(U,$J,358.3,13149,1,4,0)
+454 ;;=4^R22.9
+455 ;;^UTILITY(U,$J,358.3,13149,2)
+456 ;;=^5019292
+457 ;;^UTILITY(U,$J,358.3,13150,0)
+458 ;;=R22.1^^53^581^25
+459 ;;^UTILITY(U,$J,358.3,13150,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,13150,1,3,0)
+462 ;;=3^Neck Mass
+463 ;;^UTILITY(U,$J,358.3,13150,1,4,0)
+464 ;;=4^R22.1
+465 ;;^UTILITY(U,$J,358.3,13150,2)
+466 ;;=^5019285
+467 ;;^UTILITY(U,$J,358.3,13151,0)
+468 ;;=R59.9^^53^581^24
+469 ;;^UTILITY(U,$J,358.3,13151,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,13151,1,3,0)
+472 ;;=3^Lymph Node Mass
+473 ;;^UTILITY(U,$J,358.3,13151,1,4,0)
+474 ;;=4^R59.9
+475 ;;^UTILITY(U,$J,358.3,13151,2)
+476 ;;=^5019531
+477 ;;^UTILITY(U,$J,358.3,13152,0)
+478 ;;=R22.2^^53^581^23
+479 ;;^UTILITY(U,$J,358.3,13152,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,13152,1,3,0)
+482 ;;=3^Lung/Chest Mass
+483 ;;^UTILITY(U,$J,358.3,13152,1,4,0)
+484 ;;=4^R22.2
+485 ;;^UTILITY(U,$J,358.3,13152,2)
+486 ;;=^5019286
+487 ;;^UTILITY(U,$J,358.3,13153,0)
+488 ;;=N63.0^^53^581^19
+489 ;;^UTILITY(U,$J,358.3,13153,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,13153,1,3,0)
+492 ;;=3^Breast Mass/Lump
+493 ;;^UTILITY(U,$J,358.3,13153,1,4,0)
+494 ;;=4^N63.0
+495 ;;^UTILITY(U,$J,358.3,13153,2)
+496 ;;=^5151518
+497 ;;^UTILITY(U,$J,358.3,13154,0)
+498 ;;=N63.32^^53^581^3
+499 ;;^UTILITY(U,$J,358.3,13154,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,13154,1,3,0)
+502 ;;=3^Breast Lump,Axillary Tail,Left
+503 ;;^UTILITY(U,$J,358.3,13154,1,4,0)
+504 ;;=4^N63.32
+505 ;;^UTILITY(U,$J,358.3,13154,2)
+506 ;;=^5151530
+507 ;;^UTILITY(U,$J,358.3,13155,0)
+508 ;;=N63.31^^53^581^4
+509 ;;^UTILITY(U,$J,358.3,13155,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,13155,1,3,0)
+512 ;;=3^Breast Lump,Axillary Tail,Right
+513 ;;^UTILITY(U,$J,358.3,13155,1,4,0)
+514 ;;=4^N63.31
+515 ;;^UTILITY(U,$J,358.3,13155,2)
+516 ;;=^5151529
+517 ;;^UTILITY(U,$J,358.3,13156,0)
+518 ;;=N63.24^^53^581^5
+519 ;;^UTILITY(U,$J,358.3,13156,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,13156,1,3,0)
+522 ;;=3^Breast Lump,Lower Inner Quadrant,Left
+523 ;;^UTILITY(U,$J,358.3,13156,1,4,0)
+524 ;;=4^N63.24
+525 ;;^UTILITY(U,$J,358.3,13156,2)
+526 ;;=^5151528
+527 ;;^UTILITY(U,$J,358.3,13157,0)
+528 ;;=N63.23^^53^581^7
+529 ;;^UTILITY(U,$J,358.3,13157,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,13157,1,3,0)
+532 ;;=3^Breast Lump,Lower Outer Quadrant,Left
+533 ;;^UTILITY(U,$J,358.3,13157,1,4,0)
+534 ;;=4^N63.23
+535 ;;^UTILITY(U,$J,358.3,13157,2)
+536 ;;=^5151527
+537 ;;^UTILITY(U,$J,358.3,13158,0)
+538 ;;=N63.20^^53^581^11
+539 ;;^UTILITY(U,$J,358.3,13158,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,13158,1,3,0)
+542 ;;=3^Breast Lump,Unspec Quadrant,Left
+543 ;;^UTILITY(U,$J,358.3,13158,1,4,0)
+544 ;;=4^N63.20
+545 ;;^UTILITY(U,$J,358.3,13158,2)
+546 ;;=^5151524
+547 ;;^UTILITY(U,$J,358.3,13159,0)
+548 ;;=N63.22^^53^581^15
+549 ;;^UTILITY(U,$J,358.3,13159,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,13159,1,3,0)
+552 ;;=3^Breast Lump,Upper Inner Quadrant,Left
+553 ;;^UTILITY(U,$J,358.3,13159,1,4,0)
+554 ;;=4^N63.22
+555 ;;^UTILITY(U,$J,358.3,13159,2)
+556 ;;=^5151526
+557 ;;^UTILITY(U,$J,358.3,13160,0)
+558 ;;=N63.21^^53^581^17
+559 ;;^UTILITY(U,$J,358.3,13160,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,13160,1,3,0)
+562 ;;=3^Breast Lump,Upper Outer Quadrant,Left
+563 ;;^UTILITY(U,$J,358.3,13160,1,4,0)
+564 ;;=4^N63.21
+565 ;;^UTILITY(U,$J,358.3,13160,2)
+566 ;;=^5151525
+567 ;;^UTILITY(U,$J,358.3,13161,0)
+568 ;;=N63.14^^53^581^6
+569 ;;^UTILITY(U,$J,358.3,13161,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,13161,1,3,0)
+572 ;;=3^Breast Lump,Lower Inner Quadrant,Right
+573 ;;^UTILITY(U,$J,358.3,13161,1,4,0)
+574 ;;=4^N63.14
+575 ;;^UTILITY(U,$J,358.3,13161,2)
+576 ;;=^5151523
+577 ;;^UTILITY(U,$J,358.3,13162,0)
+578 ;;=N63.13^^53^581^8
+579 ;;^UTILITY(U,$J,358.3,13162,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,13162,1,3,0)
+582 ;;=3^Breast Lump,Lower Outer Quadrant,Right
+583 ;;^UTILITY(U,$J,358.3,13162,1,4,0)
+584 ;;=4^N63.13
+585 ;;^UTILITY(U,$J,358.3,13162,2)
+586 ;;=^5151522
+587 ;;^UTILITY(U,$J,358.3,13163,0)
+588 ;;=N63.10^^53^581^12
+589 ;;^UTILITY(U,$J,358.3,13163,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,13163,1,3,0)
+592 ;;=3^Breast Lump,Unspec Quadrant,Right
+593 ;;^UTILITY(U,$J,358.3,13163,1,4,0)
+594 ;;=4^N63.10
+595 ;;^UTILITY(U,$J,358.3,13163,2)
+596 ;;=^5151519
+597 ;;^UTILITY(U,$J,358.3,13164,0)
+598 ;;=N63.12^^53^581^16
+599 ;;^UTILITY(U,$J,358.3,13164,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,13164,1,3,0)
+602 ;;=3^Breast Lump,Upper Inner Quadrant,Right
+603 ;;^UTILITY(U,$J,358.3,13164,1,4,0)
+604 ;;=4^N63.12
+605 ;;^UTILITY(U,$J,358.3,13164,2)
+606 ;;=^5151521
+607 ;;^UTILITY(U,$J,358.3,13165,0)
+608 ;;=N63.11^^53^581^18
+609 ;;^UTILITY(U,$J,358.3,13165,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,13165,1,3,0)
+612 ;;=3^Breast Lump,Upper Outer Quadrant,Right
+613 ;;^UTILITY(U,$J,358.3,13165,1,4,0)
+614 ;;=4^N63.11
+615 ;;^UTILITY(U,$J,358.3,13165,2)
+616 ;;=^5151520
+617 ;;^UTILITY(U,$J,358.3,13166,0)
+618 ;;=N63.42^^53^581^9
+619 ;;^UTILITY(U,$J,358.3,13166,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,13166,1,3,0)
+622 ;;=3^Breast Lump,Subareaolar,Left
+623 ;;^UTILITY(U,$J,358.3,13166,1,4,0)
+624 ;;=4^N63.42
+625 ;;^UTILITY(U,$J,358.3,13166,2)
+626 ;;=^5151532
+627 ;;^UTILITY(U,$J,358.3,13167,0)
+628 ;;=N63.41^^53^581^10
+629 ;;^UTILITY(U,$J,358.3,13167,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,13167,1,3,0)
+632 ;;=3^Breast Lump,Subareolar,Right
+633 ;;^UTILITY(U,$J,358.3,13167,1,4,0)
+634 ;;=4^N63.41
+635 ;;^UTILITY(U,$J,358.3,13167,2)
+636 ;;=^5151531
+637 ;;^UTILITY(U,$J,358.3,13168,0)
+638 ;;=N63.15^^53^581^13
+639 ;;^UTILITY(U,$J,358.3,13168,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,13168,1,3,0)
+642 ;;=3^Breast Lump,Unspec,Overlapping Quadrants,Right Breast
+643 ;;^UTILITY(U,$J,358.3,13168,1,4,0)
+644 ;;=4^N63.15
+645 ;;^UTILITY(U,$J,358.3,13168,2)
+646 ;;=^5158108
+647 ;;^UTILITY(U,$J,358.3,13169,0)
+648 ;;=N63.25^^53^581^14
+649 ;;^UTILITY(U,$J,358.3,13169,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,13169,1,3,0)
+652 ;;=3^Breast Lump,Unspec,Overlapping Quadrants,Left Breast
+653 ;;^UTILITY(U,$J,358.3,13169,1,4,0)
+654 ;;=4^N63.25
+655 ;;^UTILITY(U,$J,358.3,13169,2)
+656 ;;=^5158109
+657 ;;^UTILITY(U,$J,358.3,13170,0)
+658 ;;=T81.72XA^^53^582^29
+659 ;;^UTILITY(U,$J,358.3,13170,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,13170,1,3,0)
+662 ;;=3^Complic,Vein s/p Procedure,Init Encntr
+663 ;;^UTILITY(U,$J,358.3,13170,1,4,0)
+664 ;;=4^T81.72XA
+665 ;;^UTILITY(U,$J,358.3,13170,2)
+666 ;;=^5054650
+667 ;;^UTILITY(U,$J,358.3,13171,0)
+668 ;;=T82.817A^^53^582^50
+669 ;;^UTILITY(U,$J,358.3,13171,1,0)
+670 ;;=^358.31IA^4^2
+671 ;;^UTILITY(U,$J,358.3,13171,1,3,0)
+672 ;;=3^Embol of Cardiac Prosthetic Device/Implant/Graft,Init Encntr
+673 ;;^UTILITY(U,$J,358.3,13171,1,4,0)
+674 ;;=4^T82.817A
+675 ;;^UTILITY(U,$J,358.3,13171,2)
+676 ;;=^5054914
+677 ;;^UTILITY(U,$J,358.3,13172,0)
+678 ;;=T80.0XXA^^53^582^1
+679 ;;^UTILITY(U,$J,358.3,13172,1,0)
+680 ;;=^358.31IA^4^2
+681 ;;^UTILITY(U,$J,358.3,13172,1,3,0)
+682 ;;=3^Air Embol s/p Infsn/Trnsfsn/Therapeut Inj,Init Encntr
+683 ;;^UTILITY(U,$J,358.3,13172,1,4,0)
+684 ;;=4^T80.0XXA
+685 ;;^UTILITY(U,$J,358.3,13172,2)
+686 ;;=^5054344
+687 ;;^UTILITY(U,$J,358.3,13173,0)
+688 ;;=T81.718A^^53^582^21
+689 ;;^UTILITY(U,$J,358.3,13173,1,0)
+690 ;;=^358.31IA^4^2
+691 ;;^UTILITY(U,$J,358.3,13173,1,3,0)
+692 ;;=3^Complic,Artery s/p Procedure,Init Encntr
+693 ;;^UTILITY(U,$J,358.3,13173,1,4,0)
+694 ;;=4^T81.718A
+695 ;;^UTILITY(U,$J,358.3,13173,2)
+696 ;;=^5054644
+697 ;;^UTILITY(U,$J,358.3,13174,0)
+698 ;;=J95.811^^53^582^218
+699 ;;^UTILITY(U,$J,358.3,13174,1,0)
+700 ;;=^358.31IA^4^2
+701 ;;^UTILITY(U,$J,358.3,13174,1,3,0)
+702 ;;=3^Postproc Pneumothorax
+703 ;;^UTILITY(U,$J,358.3,13174,1,4,0)
+704 ;;=4^J95.811
