IBDEI05N ; ; 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,13638,1,3,0)
;;=3^Sciatica,Left Side
;;^UTILITY(U,$J,358.3,13638,1,4,0)
;;=4^M54.32
;;^UTILITY(U,$J,358.3,13638,2)
;;=^5012307
;;^UTILITY(U,$J,358.3,13639,0)
;;=M54.9^^53^587^8
;;^UTILITY(U,$J,358.3,13639,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13639,1,3,0)
;;=3^Dorsalgia,Unspec
;;^UTILITY(U,$J,358.3,13639,1,4,0)
;;=4^M54.9
;;^UTILITY(U,$J,358.3,13639,2)
;;=^5012314
;;^UTILITY(U,$J,358.3,13640,0)
;;=M54.89^^53^587^7
;;^UTILITY(U,$J,358.3,13640,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13640,1,3,0)
;;=3^Dorsalgia NEC
;;^UTILITY(U,$J,358.3,13640,1,4,0)
;;=4^M54.89
;;^UTILITY(U,$J,358.3,13640,2)
;;=^5012313
;;^UTILITY(U,$J,358.3,13641,0)
;;=M75.51^^53^587^5
;;^UTILITY(U,$J,358.3,13641,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13641,1,3,0)
;;=3^Bursitis,Right Shoulder
;;^UTILITY(U,$J,358.3,13641,1,4,0)
;;=4^M75.51
;;^UTILITY(U,$J,358.3,13641,2)
;;=^5133690
;;^UTILITY(U,$J,358.3,13642,0)
;;=M75.52^^53^587^4
;;^UTILITY(U,$J,358.3,13642,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13642,1,3,0)
;;=3^Bursitis,Left Shoulder
;;^UTILITY(U,$J,358.3,13642,1,4,0)
;;=4^M75.52
;;^UTILITY(U,$J,358.3,13642,2)
;;=^5133691
;;^UTILITY(U,$J,358.3,13643,0)
;;=M75.101^^53^587^53
;;^UTILITY(U,$J,358.3,13643,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13643,1,3,0)
;;=3^Rotator Cuff Tear/Rupture,Right Shoulder
;;^UTILITY(U,$J,358.3,13643,1,4,0)
;;=4^M75.101
;;^UTILITY(U,$J,358.3,13643,2)
;;=^5013242
;;^UTILITY(U,$J,358.3,13644,0)
;;=M75.102^^53^587^52
;;^UTILITY(U,$J,358.3,13644,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13644,1,3,0)
;;=3^Rotator Cuff Tear/Rupture,Left Shoulder
;;^UTILITY(U,$J,358.3,13644,1,4,0)
;;=4^M75.102
;;^UTILITY(U,$J,358.3,13644,2)
;;=^5013243
;;^UTILITY(U,$J,358.3,13645,0)
;;=M79.7^^53^587^10
;;^UTILITY(U,$J,358.3,13645,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13645,1,3,0)
;;=3^Fibromyalgia
;;^UTILITY(U,$J,358.3,13645,1,4,0)
;;=4^M79.7
;;^UTILITY(U,$J,358.3,13645,2)
;;=^46261
;;^UTILITY(U,$J,358.3,13646,0)
;;=M54.10^^53^587^49
;;^UTILITY(U,$J,358.3,13646,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13646,1,3,0)
;;=3^Radiculopathy,Site Unspec
;;^UTILITY(U,$J,358.3,13646,1,4,0)
;;=4^M54.10
;;^UTILITY(U,$J,358.3,13646,2)
;;=^5012295
;;^UTILITY(U,$J,358.3,13647,0)
;;=M79.2^^53^587^17
;;^UTILITY(U,$J,358.3,13647,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13647,1,3,0)
;;=3^Neuralgia and Neuritis,Unspec
;;^UTILITY(U,$J,358.3,13647,1,4,0)
;;=4^M79.2
;;^UTILITY(U,$J,358.3,13647,2)
;;=^5013322
;;^UTILITY(U,$J,358.3,13648,0)
;;=M79.89^^53^587^72
;;^UTILITY(U,$J,358.3,13648,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13648,1,3,0)
;;=3^Soft Tissue Disorders
;;^UTILITY(U,$J,358.3,13648,1,4,0)
;;=4^M79.89
;;^UTILITY(U,$J,358.3,13648,2)
;;=^5013357
;;^UTILITY(U,$J,358.3,13649,0)
;;=M88.9^^53^587^18
;;^UTILITY(U,$J,358.3,13649,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13649,1,3,0)
;;=3^Osteitis Deformans,Unspec Bone
;;^UTILITY(U,$J,358.3,13649,1,4,0)
;;=4^M88.9
;;^UTILITY(U,$J,358.3,13649,2)
;;=^5014899
;;^UTILITY(U,$J,358.3,13650,0)
;;=M81.0^^53^587^21
;;^UTILITY(U,$J,358.3,13650,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13650,1,3,0)
;;=3^Osteoporosis,Age-Related w/o Current Fx
;;^UTILITY(U,$J,358.3,13650,1,4,0)
;;=4^M81.0
;;^UTILITY(U,$J,358.3,13650,2)
;;=^5013555
;;^UTILITY(U,$J,358.3,13651,0)
;;=M84.40XA^^53^587^23
;;^UTILITY(U,$J,358.3,13651,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13651,1,3,0)
;;=3^Patholog Fx,Unspec Site,Init Encntr for Fx
;;^UTILITY(U,$J,358.3,13651,1,4,0)
;;=4^M84.40XA
;;^UTILITY(U,$J,358.3,13651,2)
;;=^5013794
;;^UTILITY(U,$J,358.3,13652,0)
;;=M84.40XD^^53^587^24
;;^UTILITY(U,$J,358.3,13652,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13652,1,3,0)
;;=3^Patholog Fx,Unspec Site,Subsq Encntr for Fx w/ Routine Healing
;;^UTILITY(U,$J,358.3,13652,1,4,0)
;;=4^M84.40XD
;;^UTILITY(U,$J,358.3,13652,2)
;;=^5013795
;;^UTILITY(U,$J,358.3,13653,0)
;;=M84.40XG^^53^587^25
;;^UTILITY(U,$J,358.3,13653,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13653,1,3,0)
;;=3^Patholog Fx,Unspec Site,Subsq Encntr for Fx w/ Delay Healing
;;^UTILITY(U,$J,358.3,13653,1,4,0)
;;=4^M84.40XG
;;^UTILITY(U,$J,358.3,13653,2)
;;=^5013796
;;^UTILITY(U,$J,358.3,13654,0)
;;=M84.40XK^^53^587^26
;;^UTILITY(U,$J,358.3,13654,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13654,1,3,0)
;;=3^Patholog Fx,Unspec Site,Subsq Encntr for Fx w/ Nonunion
;;^UTILITY(U,$J,358.3,13654,1,4,0)
;;=4^M84.40XK
;;^UTILITY(U,$J,358.3,13654,2)
;;=^5013797
;;^UTILITY(U,$J,358.3,13655,0)
;;=M84.40XP^^53^587^27
;;^UTILITY(U,$J,358.3,13655,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13655,1,3,0)
;;=3^Patholog Fx,Unspec Site,Subsq Encntr for Fx w/ Malunion
;;^UTILITY(U,$J,358.3,13655,1,4,0)
;;=4^M84.40XP
;;^UTILITY(U,$J,358.3,13655,2)
;;=^5013798
;;^UTILITY(U,$J,358.3,13656,0)
;;=M84.40XS^^53^587^28
;;^UTILITY(U,$J,358.3,13656,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13656,1,3,0)
;;=3^Patholog Fx,Unspec Site,Subsq Encntr for Fx w/ Sequela
;;^UTILITY(U,$J,358.3,13656,1,4,0)
;;=4^M84.40XS
;;^UTILITY(U,$J,358.3,13656,2)
;;=^5013799
;;^UTILITY(U,$J,358.3,13657,0)
;;=M85.80^^53^587^3
;;^UTILITY(U,$J,358.3,13657,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13657,1,3,0)
;;=3^Bone Density/Structure Disorders,Unspec Site
;;^UTILITY(U,$J,358.3,13657,1,4,0)
;;=4^M85.80
;;^UTILITY(U,$J,358.3,13657,2)
;;=^5014473
;;^UTILITY(U,$J,358.3,13658,0)
;;=M54.50^^53^587^15
;;^UTILITY(U,$J,358.3,13658,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13658,1,3,0)
;;=3^Low Back Pain,Unspec
;;^UTILITY(U,$J,358.3,13658,1,4,0)
;;=4^M54.50
;;^UTILITY(U,$J,358.3,13658,2)
;;=^5161215
;;^UTILITY(U,$J,358.3,13659,0)
;;=M54.51^^53^587^16
;;^UTILITY(U,$J,358.3,13659,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13659,1,3,0)
;;=3^Low Back Pain,Vertebrogenic
;;^UTILITY(U,$J,358.3,13659,1,4,0)
;;=4^M54.51
;;^UTILITY(U,$J,358.3,13659,2)
;;=^5161216
;;^UTILITY(U,$J,358.3,13660,0)
;;=M54.59^^53^587^14
;;^UTILITY(U,$J,358.3,13660,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13660,1,3,0)
;;=3^Low Back Pain,Other
;;^UTILITY(U,$J,358.3,13660,1,4,0)
;;=4^M54.59
;;^UTILITY(U,$J,358.3,13660,2)
;;=^5161217
;;^UTILITY(U,$J,358.3,13661,0)
;;=G40.909^^53^588^5
;;^UTILITY(U,$J,358.3,13661,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13661,1,3,0)
;;=3^Epilepsy,Not Intractable w/o Status Epilepticus
;;^UTILITY(U,$J,358.3,13661,1,4,0)
;;=4^G40.909
;;^UTILITY(U,$J,358.3,13661,2)
;;=^5003865
;;^UTILITY(U,$J,358.3,13662,0)
;;=G40.919^^53^588^4
;;^UTILITY(U,$J,358.3,13662,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13662,1,3,0)
;;=3^Epilepsy,Intractable w/o Status Epilepticus
;;^UTILITY(U,$J,358.3,13662,1,4,0)
;;=4^G40.919
;;^UTILITY(U,$J,358.3,13662,2)
;;=^5003867
;;^UTILITY(U,$J,358.3,13663,0)
;;=G62.9^^53^588^8
;;^UTILITY(U,$J,358.3,13663,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13663,1,3,0)
;;=3^Polyneuropathy,Unspec
;;^UTILITY(U,$J,358.3,13663,1,4,0)
;;=4^G62.9
;;^UTILITY(U,$J,358.3,13663,2)
;;=^5004079
;;^UTILITY(U,$J,358.3,13664,0)
;;=G60.9^^53^588^6
;;^UTILITY(U,$J,358.3,13664,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13664,1,3,0)
;;=3^Hereditary/Idiopathic Neuropathy,Unspec
;;^UTILITY(U,$J,358.3,13664,1,4,0)
;;=4^G60.9
;;^UTILITY(U,$J,358.3,13664,2)
;;=^5004071
;;^UTILITY(U,$J,358.3,13665,0)
;;=I63.50^^53^588^1
;;^UTILITY(U,$J,358.3,13665,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13665,1,3,0)
;;=3^Cerebral Infarction d/t Occlusion/Stenosis of Cerebral Artery
;;^UTILITY(U,$J,358.3,13665,1,4,0)
;;=4^I63.50
;;^UTILITY(U,$J,358.3,13665,2)
;;=^5007343
;;^UTILITY(U,$J,358.3,13666,0)
;;=G45.9^^53^588^12
;;^UTILITY(U,$J,358.3,13666,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13666,1,3,0)
;;=3^Transient Cerebral Ischemic Attack,Unspec
;;^UTILITY(U,$J,358.3,13666,1,4,0)
;;=4^G45.9
;;^UTILITY(U,$J,358.3,13666,2)
;;=^5003959
;;^UTILITY(U,$J,358.3,13667,0)
;;=R55.^^53^588^11
;;^UTILITY(U,$J,358.3,13667,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13667,1,3,0)
;;=3^Syncope and Collapse
;;^UTILITY(U,$J,358.3,13667,1,4,0)
;;=4^R55.
;;^UTILITY(U,$J,358.3,13667,2)
;;=^116707
;;^UTILITY(U,$J,358.3,13668,0)
;;=R56.00^^53^588^10
;;^UTILITY(U,$J,358.3,13668,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13668,1,3,0)
;;=3^Simple Febrile Convulsions
;;^UTILITY(U,$J,358.3,13668,1,4,0)
;;=4^R56.00
;;^UTILITY(U,$J,358.3,13668,2)
;;=^5019522
;;^UTILITY(U,$J,358.3,13669,0)
;;=R56.1^^53^588^9
;;^UTILITY(U,$J,358.3,13669,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13669,1,3,0)
;;=3^Post Traumatic Seizures
;;^UTILITY(U,$J,358.3,13669,1,4,0)
;;=4^R56.1
;;^UTILITY(U,$J,358.3,13669,2)
;;=^5019523
;;^UTILITY(U,$J,358.3,13670,0)
;;=R56.9^^53^588^2
;;^UTILITY(U,$J,358.3,13670,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13670,1,3,0)
;;=3^Convulsions,Unspec
;;^UTILITY(U,$J,358.3,13670,1,4,0)
;;=4^R56.9
;;^UTILITY(U,$J,358.3,13670,2)
;;=^5019524
;;^UTILITY(U,$J,358.3,13671,0)
;;=R42.^^53^588^3
;;^UTILITY(U,$J,358.3,13671,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13671,1,3,0)
;;=3^Dizziness and Giddiness
;;^UTILITY(U,$J,358.3,13671,1,4,0)
;;=4^R42.
;;^UTILITY(U,$J,358.3,13671,2)
;;=^5019450
;;^UTILITY(U,$J,358.3,13672,0)
;;=R25.1^^53^588^13
;;^UTILITY(U,$J,358.3,13672,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13672,1,3,0)
;;=3^Tremor,Unspec
;;^UTILITY(U,$J,358.3,13672,1,4,0)
;;=4^R25.1
;;^UTILITY(U,$J,358.3,13672,2)
;;=^5019300
;;^UTILITY(U,$J,358.3,13673,0)
;;=R20.2^^53^588^7
;;^UTILITY(U,$J,358.3,13673,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13673,1,3,0)
;;=3^Paresthesia of Skin
;;^UTILITY(U,$J,358.3,13673,1,4,0)
;;=4^R20.2
;;^UTILITY(U,$J,358.3,13673,2)
;;=^5019280
;;^UTILITY(U,$J,358.3,13674,0)
;;=C02.9^^53^589^63
;;^UTILITY(U,$J,358.3,13674,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13674,1,3,0)
;;=3^Malig Neop of Tongue,Unspec
;;^UTILITY(U,$J,358.3,13674,1,4,0)
;;=4^C02.9
;;^UTILITY(U,$J,358.3,13674,2)
;;=^5000891
;;^UTILITY(U,$J,358.3,13675,0)
;;=C06.9^^53^589^52
;;^UTILITY(U,$J,358.3,13675,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13675,1,3,0)
;;=3^Malig Neop of Mouth,Unspec
;;^UTILITY(U,$J,358.3,13675,1,4,0)
;;=4^C06.9
;;^UTILITY(U,$J,358.3,13675,2)
;;=^5000901
;;^UTILITY(U,$J,358.3,13676,0)
;;=C10.9^^53^589^54
;;^UTILITY(U,$J,358.3,13676,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13676,1,3,0)
;;=3^Malig Neop of Oropharynx,Unspec
;;^UTILITY(U,$J,358.3,13676,1,4,0)
;;=4^C10.9
;;^UTILITY(U,$J,358.3,13676,2)
;;=^5000909
;;^UTILITY(U,$J,358.3,13677,0)
;;=C11.9^^53^589^53
;;^UTILITY(U,$J,358.3,13677,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13677,1,3,0)
;;=3^Malig Neop of Nasopharynx,Unspec
;;^UTILITY(U,$J,358.3,13677,1,4,0)
;;=4^C11.9
;;^UTILITY(U,$J,358.3,13677,2)
;;=^5000911
;;^UTILITY(U,$J,358.3,13678,0)
;;=C15.9^^53^589^42
;;^UTILITY(U,$J,358.3,13678,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13678,1,3,0)
;;=3^Malig Neop of Esophagus,Unspec
;;^UTILITY(U,$J,358.3,13678,1,4,0)
;;=4^C15.9
;;^UTILITY(U,$J,358.3,13678,2)
;;=^5000919
;;^UTILITY(U,$J,358.3,13679,0)
;;=C16.9^^53^589^61
;;^UTILITY(U,$J,358.3,13679,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13679,1,3,0)
;;=3^Malig Neop of Stomach,Unspec
;;^UTILITY(U,$J,358.3,13679,1,4,0)
;;=4^C16.9
;;^UTILITY(U,$J,358.3,13679,2)
;;=^5000923
;;^UTILITY(U,$J,358.3,13680,0)
;;=C17.9^^53^589^60
;;^UTILITY(U,$J,358.3,13680,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13680,1,3,0)
;;=3^Malig Neop of Small Intestine,Unspec
;;^UTILITY(U,$J,358.3,13680,1,4,0)
;;=4^C17.9
;;^UTILITY(U,$J,358.3,13680,2)
;;=^5000926
;;^UTILITY(U,$J,358.3,13681,0)
;;=C18.9^^53^589^39
;;^UTILITY(U,$J,358.3,13681,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13681,1,3,0)
;;=3^Malig Neop of Colon,Unspec
;;^UTILITY(U,$J,358.3,13681,1,4,0)
;;=4^C18.9
;;^UTILITY(U,$J,358.3,13681,2)
;;=^5000929
;;^UTILITY(U,$J,358.3,13682,0)
;;=C20.^^53^589^58
;;^UTILITY(U,$J,358.3,13682,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13682,1,3,0)
;;=3^Malig Neop of Rectum
;;^UTILITY(U,$J,358.3,13682,1,4,0)
;;=4^C20.
;;^UTILITY(U,$J,358.3,13682,2)
;;=^267090
;;^UTILITY(U,$J,358.3,13683,0)
;;=C21.0^^53^589^35
;;^UTILITY(U,$J,358.3,13683,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13683,1,3,0)
;;=3^Malig Neop of Anus,Unspec
;;^UTILITY(U,$J,358.3,13683,1,4,0)
;;=4^C21.0
;;^UTILITY(U,$J,358.3,13683,2)
;;=^5000930
;;^UTILITY(U,$J,358.3,13684,0)
;;=C22.8^^53^589^49
;;^UTILITY(U,$J,358.3,13684,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13684,1,3,0)
;;=3^Malig Neop of Liver,Primary
;;^UTILITY(U,$J,358.3,13684,1,4,0)
;;=4^C22.8
;;^UTILITY(U,$J,358.3,13684,2)
;;=^5000939
;;^UTILITY(U,$J,358.3,13685,0)
;;=C22.0^^53^589^27
;;^UTILITY(U,$J,358.3,13685,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13685,1,3,0)
;;=3^Liver Cell Carcinoma
;;^UTILITY(U,$J,358.3,13685,1,4,0)
;;=4^C22.0
;;^UTILITY(U,$J,358.3,13685,2)
;;=^5000933
;;^UTILITY(U,$J,358.3,13686,0)
;;=C22.2^^53^589^20
;;^UTILITY(U,$J,358.3,13686,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13686,1,3,0)
;;=3^Hepatoblastoma
;;^UTILITY(U,$J,358.3,13686,1,4,0)
;;=4^C22.2
;;^UTILITY(U,$J,358.3,13686,2)
;;=^5000935
;;^UTILITY(U,$J,358.3,13687,0)
;;=C22.7^^53^589^26
;;^UTILITY(U,$J,358.3,13687,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13687,1,3,0)
;;=3^Liver Carcinomas NEC
;;^UTILITY(U,$J,358.3,13687,1,4,0)
;;=4^C22.7
;;^UTILITY(U,$J,358.3,13687,2)
;;=^5000938
;;^UTILITY(U,$J,358.3,13688,0)
;;=C23.^^53^589^46
;;^UTILITY(U,$J,358.3,13688,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13688,1,3,0)
;;=3^Malig Neop of Gallbladder
;;^UTILITY(U,$J,358.3,13688,1,4,0)
;;=4^C23.
;;^UTILITY(U,$J,358.3,13688,2)
;;=^267098
;;^UTILITY(U,$J,358.3,13689,0)
;;=C24.0^^53^589^43
;;^UTILITY(U,$J,358.3,13689,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13689,1,3,0)
;;=3^Malig Neop of Extrahepatic Bile Duct
;;^UTILITY(U,$J,358.3,13689,1,4,0)
;;=4^C24.0
;;^UTILITY(U,$J,358.3,13689,2)
;;=^5000940
;;^UTILITY(U,$J,358.3,13690,0)
;;=C24.1^^53^589^34
;;^UTILITY(U,$J,358.3,13690,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13690,1,3,0)
;;=3^Malig Neop of Ampulla of Vater
;;^UTILITY(U,$J,358.3,13690,1,4,0)
;;=4^C24.1
;;^UTILITY(U,$J,358.3,13690,2)
;;=^267100
;;^UTILITY(U,$J,358.3,13691,0)
;;=C25.9^^53^589^55
;;^UTILITY(U,$J,358.3,13691,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13691,1,3,0)
;;=3^Malig Neop of Pancreas,Unspec
;;^UTILITY(U,$J,358.3,13691,1,4,0)
;;=4^C25.9
;;^UTILITY(U,$J,358.3,13691,2)
;;=^5000946
;;^UTILITY(U,$J,358.3,13692,0)
;;=C31.9^^53^589^33
;;^UTILITY(U,$J,358.3,13692,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13692,1,3,0)
;;=3^Malig Neop of Accessory Sinus,Unspec
;;^UTILITY(U,$J,358.3,13692,1,4,0)
;;=4^C31.9
;;^UTILITY(U,$J,358.3,13692,2)
;;=^5000953
;;^UTILITY(U,$J,358.3,13693,0)
;;=C32.9^^53^589^48
;;^UTILITY(U,$J,358.3,13693,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13693,1,3,0)
;;=3^Malig Neop of Larynx,Unspec
;;^UTILITY(U,$J,358.3,13693,1,4,0)
;;=4^C32.9
;;^UTILITY(U,$J,358.3,13693,2)
;;=^5000956
;;^UTILITY(U,$J,358.3,13694,0)
;;=C34.90^^53^589^38
;;^UTILITY(U,$J,358.3,13694,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13694,1,3,0)
;;=3^Malig Neop of Bronchus/Lung,Unspec
;;^UTILITY(U,$J,358.3,13694,1,4,0)
;;=4^C34.90
;;^UTILITY(U,$J,358.3,13694,2)
;;=^5000966
;;^UTILITY(U,$J,358.3,13695,0)
;;=C38.4^^53^589^56
;;^UTILITY(U,$J,358.3,13695,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13695,1,3,0)
;;=3^Malig Neop of Pleura
;;^UTILITY(U,$J,358.3,13695,1,4,0)
;;=4^C38.4
;;^UTILITY(U,$J,358.3,13695,2)
;;=^267140
;;^UTILITY(U,$J,358.3,13696,0)
;;=C49.9^^53^589^40
;;^UTILITY(U,$J,358.3,13696,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13696,1,3,0)
;;=3^Malig Neop of Connective/Soft Tissue,Unspec
;;^UTILITY(U,$J,358.3,13696,1,4,0)
;;=4^C49.9
;;^UTILITY(U,$J,358.3,13696,2)
;;=^5001136
;;^UTILITY(U,$J,358.3,13697,0)
;;=C43.9^^53^589^59
;;^UTILITY(U,$J,358.3,13697,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13697,1,3,0)
;;=3^Malig Neop of Skin,Unspec
;;^UTILITY(U,$J,358.3,13697,1,4,0)
;;=4^C43.9
;;^UTILITY(U,$J,358.3,13697,2)
;;=^5001015
;;^UTILITY(U,$J,358.3,13698,0)
;;=C50.911^^53^589^45
;;^UTILITY(U,$J,358.3,13698,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13698,1,3,0)
;;=3^Malig Neop of Female Breast,Right
;;^UTILITY(U,$J,358.3,13698,1,4,0)
;;=4^C50.911
;;^UTILITY(U,$J,358.3,13698,2)
;;=^5001195
;;^UTILITY(U,$J,358.3,13699,0)
;;=C50.912^^53^589^44
;;^UTILITY(U,$J,358.3,13699,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13699,1,3,0)
;;=3^Malig Neop of Female Breast,Left
;;^UTILITY(U,$J,358.3,13699,1,4,0)
;;=4^C50.912
;;^UTILITY(U,$J,358.3,13699,2)
;;=^5001196
;;^UTILITY(U,$J,358.3,13700,0)
;;=C50.921^^53^589^51
;;^UTILITY(U,$J,358.3,13700,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13700,1,3,0)
;;=3^Malig Neop of Male Breast,Right
;;^UTILITY(U,$J,358.3,13700,1,4,0)
;;=4^C50.921
;;^UTILITY(U,$J,358.3,13700,2)
;;=^5001198
;;^UTILITY(U,$J,358.3,13701,0)
;;=C50.922^^53^589^50
;;^UTILITY(U,$J,358.3,13701,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13701,1,3,0)
;;=3^Malig Neop of Male Breast,Left
;;^UTILITY(U,$J,358.3,13701,1,4,0)
;;=4^C50.922
;;^UTILITY(U,$J,358.3,13701,2)
;;=^5133340
;;^UTILITY(U,$J,358.3,13702,0)
;;=C46.9^^53^589^25
;;^UTILITY(U,$J,358.3,13702,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13702,1,3,0)
;;=3^Kaposi's Sarcoma,Unspec
;;^UTILITY(U,$J,358.3,13702,1,4,0)
;;=4^C46.9
;;^UTILITY(U,$J,358.3,13702,2)
;;=^5001108
;;^UTILITY(U,$J,358.3,13703,0)
;;=C61.^^53^589^57
;;^UTILITY(U,$J,358.3,13703,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13703,1,3,0)
;;=3^Malig Neop of Prostate
;;^UTILITY(U,$J,358.3,13703,1,4,0)
;;=4^C61.
;;^UTILITY(U,$J,358.3,13703,2)
;;=^267239
;;^UTILITY(U,$J,358.3,13704,0)
;;=C62.10^^53^589^41
;;^UTILITY(U,$J,358.3,13704,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13704,1,3,0)
;;=3^Malig Neop of Descended Testis,Unspec
;;^UTILITY(U,$J,358.3,13704,1,4,0)
;;=4^C62.10
;;^UTILITY(U,$J,358.3,13704,2)
;;=^5001233
;;^UTILITY(U,$J,358.3,13705,0)
;;=C62.90^^53^589^62
;;^UTILITY(U,$J,358.3,13705,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13705,1,3,0)
;;=3^Malig Neop of Testis,Unspec
;;^UTILITY(U,$J,358.3,13705,1,4,0)
;;=4^C62.90
;;^UTILITY(U,$J,358.3,13705,2)
;;=^5001236
;;^UTILITY(U,$J,358.3,13706,0)
;;=C67.9^^53^589^36
;;^UTILITY(U,$J,358.3,13706,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13706,1,3,0)
;;=3^Malig Neop of Bladder,Unspec
;;^UTILITY(U,$J,358.3,13706,1,4,0)
;;=4^C67.9
;;^UTILITY(U,$J,358.3,13706,2)
;;=^5001263
;;^UTILITY(U,$J,358.3,13707,0)
;;=C64.9^^53^589^47
;;^UTILITY(U,$J,358.3,13707,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13707,1,3,0)
;;=3^Malig Neop of Kidney,Except Renal Pelvis,Unspec
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI05N 19821 printed Dec 13, 2024@01:42:07 Page 2
IBDEI05N ; ; 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,13638,1,3,0)
+2 ;;=3^Sciatica,Left Side
+3 ;;^UTILITY(U,$J,358.3,13638,1,4,0)
+4 ;;=4^M54.32
+5 ;;^UTILITY(U,$J,358.3,13638,2)
+6 ;;=^5012307
+7 ;;^UTILITY(U,$J,358.3,13639,0)
+8 ;;=M54.9^^53^587^8
+9 ;;^UTILITY(U,$J,358.3,13639,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,13639,1,3,0)
+12 ;;=3^Dorsalgia,Unspec
+13 ;;^UTILITY(U,$J,358.3,13639,1,4,0)
+14 ;;=4^M54.9
+15 ;;^UTILITY(U,$J,358.3,13639,2)
+16 ;;=^5012314
+17 ;;^UTILITY(U,$J,358.3,13640,0)
+18 ;;=M54.89^^53^587^7
+19 ;;^UTILITY(U,$J,358.3,13640,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,13640,1,3,0)
+22 ;;=3^Dorsalgia NEC
+23 ;;^UTILITY(U,$J,358.3,13640,1,4,0)
+24 ;;=4^M54.89
+25 ;;^UTILITY(U,$J,358.3,13640,2)
+26 ;;=^5012313
+27 ;;^UTILITY(U,$J,358.3,13641,0)
+28 ;;=M75.51^^53^587^5
+29 ;;^UTILITY(U,$J,358.3,13641,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,13641,1,3,0)
+32 ;;=3^Bursitis,Right Shoulder
+33 ;;^UTILITY(U,$J,358.3,13641,1,4,0)
+34 ;;=4^M75.51
+35 ;;^UTILITY(U,$J,358.3,13641,2)
+36 ;;=^5133690
+37 ;;^UTILITY(U,$J,358.3,13642,0)
+38 ;;=M75.52^^53^587^4
+39 ;;^UTILITY(U,$J,358.3,13642,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,13642,1,3,0)
+42 ;;=3^Bursitis,Left Shoulder
+43 ;;^UTILITY(U,$J,358.3,13642,1,4,0)
+44 ;;=4^M75.52
+45 ;;^UTILITY(U,$J,358.3,13642,2)
+46 ;;=^5133691
+47 ;;^UTILITY(U,$J,358.3,13643,0)
+48 ;;=M75.101^^53^587^53
+49 ;;^UTILITY(U,$J,358.3,13643,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,13643,1,3,0)
+52 ;;=3^Rotator Cuff Tear/Rupture,Right Shoulder
+53 ;;^UTILITY(U,$J,358.3,13643,1,4,0)
+54 ;;=4^M75.101
+55 ;;^UTILITY(U,$J,358.3,13643,2)
+56 ;;=^5013242
+57 ;;^UTILITY(U,$J,358.3,13644,0)
+58 ;;=M75.102^^53^587^52
+59 ;;^UTILITY(U,$J,358.3,13644,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,13644,1,3,0)
+62 ;;=3^Rotator Cuff Tear/Rupture,Left Shoulder
+63 ;;^UTILITY(U,$J,358.3,13644,1,4,0)
+64 ;;=4^M75.102
+65 ;;^UTILITY(U,$J,358.3,13644,2)
+66 ;;=^5013243
+67 ;;^UTILITY(U,$J,358.3,13645,0)
+68 ;;=M79.7^^53^587^10
+69 ;;^UTILITY(U,$J,358.3,13645,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,13645,1,3,0)
+72 ;;=3^Fibromyalgia
+73 ;;^UTILITY(U,$J,358.3,13645,1,4,0)
+74 ;;=4^M79.7
+75 ;;^UTILITY(U,$J,358.3,13645,2)
+76 ;;=^46261
+77 ;;^UTILITY(U,$J,358.3,13646,0)
+78 ;;=M54.10^^53^587^49
+79 ;;^UTILITY(U,$J,358.3,13646,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,13646,1,3,0)
+82 ;;=3^Radiculopathy,Site Unspec
+83 ;;^UTILITY(U,$J,358.3,13646,1,4,0)
+84 ;;=4^M54.10
+85 ;;^UTILITY(U,$J,358.3,13646,2)
+86 ;;=^5012295
+87 ;;^UTILITY(U,$J,358.3,13647,0)
+88 ;;=M79.2^^53^587^17
+89 ;;^UTILITY(U,$J,358.3,13647,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,13647,1,3,0)
+92 ;;=3^Neuralgia and Neuritis,Unspec
+93 ;;^UTILITY(U,$J,358.3,13647,1,4,0)
+94 ;;=4^M79.2
+95 ;;^UTILITY(U,$J,358.3,13647,2)
+96 ;;=^5013322
+97 ;;^UTILITY(U,$J,358.3,13648,0)
+98 ;;=M79.89^^53^587^72
+99 ;;^UTILITY(U,$J,358.3,13648,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,13648,1,3,0)
+102 ;;=3^Soft Tissue Disorders
+103 ;;^UTILITY(U,$J,358.3,13648,1,4,0)
+104 ;;=4^M79.89
+105 ;;^UTILITY(U,$J,358.3,13648,2)
+106 ;;=^5013357
+107 ;;^UTILITY(U,$J,358.3,13649,0)
+108 ;;=M88.9^^53^587^18
+109 ;;^UTILITY(U,$J,358.3,13649,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,13649,1,3,0)
+112 ;;=3^Osteitis Deformans,Unspec Bone
+113 ;;^UTILITY(U,$J,358.3,13649,1,4,0)
+114 ;;=4^M88.9
+115 ;;^UTILITY(U,$J,358.3,13649,2)
+116 ;;=^5014899
+117 ;;^UTILITY(U,$J,358.3,13650,0)
+118 ;;=M81.0^^53^587^21
+119 ;;^UTILITY(U,$J,358.3,13650,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,13650,1,3,0)
+122 ;;=3^Osteoporosis,Age-Related w/o Current Fx
+123 ;;^UTILITY(U,$J,358.3,13650,1,4,0)
+124 ;;=4^M81.0
+125 ;;^UTILITY(U,$J,358.3,13650,2)
+126 ;;=^5013555
+127 ;;^UTILITY(U,$J,358.3,13651,0)
+128 ;;=M84.40XA^^53^587^23
+129 ;;^UTILITY(U,$J,358.3,13651,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,13651,1,3,0)
+132 ;;=3^Patholog Fx,Unspec Site,Init Encntr for Fx
+133 ;;^UTILITY(U,$J,358.3,13651,1,4,0)
+134 ;;=4^M84.40XA
+135 ;;^UTILITY(U,$J,358.3,13651,2)
+136 ;;=^5013794
+137 ;;^UTILITY(U,$J,358.3,13652,0)
+138 ;;=M84.40XD^^53^587^24
+139 ;;^UTILITY(U,$J,358.3,13652,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,13652,1,3,0)
+142 ;;=3^Patholog Fx,Unspec Site,Subsq Encntr for Fx w/ Routine Healing
+143 ;;^UTILITY(U,$J,358.3,13652,1,4,0)
+144 ;;=4^M84.40XD
+145 ;;^UTILITY(U,$J,358.3,13652,2)
+146 ;;=^5013795
+147 ;;^UTILITY(U,$J,358.3,13653,0)
+148 ;;=M84.40XG^^53^587^25
+149 ;;^UTILITY(U,$J,358.3,13653,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,13653,1,3,0)
+152 ;;=3^Patholog Fx,Unspec Site,Subsq Encntr for Fx w/ Delay Healing
+153 ;;^UTILITY(U,$J,358.3,13653,1,4,0)
+154 ;;=4^M84.40XG
+155 ;;^UTILITY(U,$J,358.3,13653,2)
+156 ;;=^5013796
+157 ;;^UTILITY(U,$J,358.3,13654,0)
+158 ;;=M84.40XK^^53^587^26
+159 ;;^UTILITY(U,$J,358.3,13654,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,13654,1,3,0)
+162 ;;=3^Patholog Fx,Unspec Site,Subsq Encntr for Fx w/ Nonunion
+163 ;;^UTILITY(U,$J,358.3,13654,1,4,0)
+164 ;;=4^M84.40XK
+165 ;;^UTILITY(U,$J,358.3,13654,2)
+166 ;;=^5013797
+167 ;;^UTILITY(U,$J,358.3,13655,0)
+168 ;;=M84.40XP^^53^587^27
+169 ;;^UTILITY(U,$J,358.3,13655,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,13655,1,3,0)
+172 ;;=3^Patholog Fx,Unspec Site,Subsq Encntr for Fx w/ Malunion
+173 ;;^UTILITY(U,$J,358.3,13655,1,4,0)
+174 ;;=4^M84.40XP
+175 ;;^UTILITY(U,$J,358.3,13655,2)
+176 ;;=^5013798
+177 ;;^UTILITY(U,$J,358.3,13656,0)
+178 ;;=M84.40XS^^53^587^28
+179 ;;^UTILITY(U,$J,358.3,13656,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,13656,1,3,0)
+182 ;;=3^Patholog Fx,Unspec Site,Subsq Encntr for Fx w/ Sequela
+183 ;;^UTILITY(U,$J,358.3,13656,1,4,0)
+184 ;;=4^M84.40XS
+185 ;;^UTILITY(U,$J,358.3,13656,2)
+186 ;;=^5013799
+187 ;;^UTILITY(U,$J,358.3,13657,0)
+188 ;;=M85.80^^53^587^3
+189 ;;^UTILITY(U,$J,358.3,13657,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,13657,1,3,0)
+192 ;;=3^Bone Density/Structure Disorders,Unspec Site
+193 ;;^UTILITY(U,$J,358.3,13657,1,4,0)
+194 ;;=4^M85.80
+195 ;;^UTILITY(U,$J,358.3,13657,2)
+196 ;;=^5014473
+197 ;;^UTILITY(U,$J,358.3,13658,0)
+198 ;;=M54.50^^53^587^15
+199 ;;^UTILITY(U,$J,358.3,13658,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,13658,1,3,0)
+202 ;;=3^Low Back Pain,Unspec
+203 ;;^UTILITY(U,$J,358.3,13658,1,4,0)
+204 ;;=4^M54.50
+205 ;;^UTILITY(U,$J,358.3,13658,2)
+206 ;;=^5161215
+207 ;;^UTILITY(U,$J,358.3,13659,0)
+208 ;;=M54.51^^53^587^16
+209 ;;^UTILITY(U,$J,358.3,13659,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,13659,1,3,0)
+212 ;;=3^Low Back Pain,Vertebrogenic
+213 ;;^UTILITY(U,$J,358.3,13659,1,4,0)
+214 ;;=4^M54.51
+215 ;;^UTILITY(U,$J,358.3,13659,2)
+216 ;;=^5161216
+217 ;;^UTILITY(U,$J,358.3,13660,0)
+218 ;;=M54.59^^53^587^14
+219 ;;^UTILITY(U,$J,358.3,13660,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,13660,1,3,0)
+222 ;;=3^Low Back Pain,Other
+223 ;;^UTILITY(U,$J,358.3,13660,1,4,0)
+224 ;;=4^M54.59
+225 ;;^UTILITY(U,$J,358.3,13660,2)
+226 ;;=^5161217
+227 ;;^UTILITY(U,$J,358.3,13661,0)
+228 ;;=G40.909^^53^588^5
+229 ;;^UTILITY(U,$J,358.3,13661,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,13661,1,3,0)
+232 ;;=3^Epilepsy,Not Intractable w/o Status Epilepticus
+233 ;;^UTILITY(U,$J,358.3,13661,1,4,0)
+234 ;;=4^G40.909
+235 ;;^UTILITY(U,$J,358.3,13661,2)
+236 ;;=^5003865
+237 ;;^UTILITY(U,$J,358.3,13662,0)
+238 ;;=G40.919^^53^588^4
+239 ;;^UTILITY(U,$J,358.3,13662,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,13662,1,3,0)
+242 ;;=3^Epilepsy,Intractable w/o Status Epilepticus
+243 ;;^UTILITY(U,$J,358.3,13662,1,4,0)
+244 ;;=4^G40.919
+245 ;;^UTILITY(U,$J,358.3,13662,2)
+246 ;;=^5003867
+247 ;;^UTILITY(U,$J,358.3,13663,0)
+248 ;;=G62.9^^53^588^8
+249 ;;^UTILITY(U,$J,358.3,13663,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,13663,1,3,0)
+252 ;;=3^Polyneuropathy,Unspec
+253 ;;^UTILITY(U,$J,358.3,13663,1,4,0)
+254 ;;=4^G62.9
+255 ;;^UTILITY(U,$J,358.3,13663,2)
+256 ;;=^5004079
+257 ;;^UTILITY(U,$J,358.3,13664,0)
+258 ;;=G60.9^^53^588^6
+259 ;;^UTILITY(U,$J,358.3,13664,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,13664,1,3,0)
+262 ;;=3^Hereditary/Idiopathic Neuropathy,Unspec
+263 ;;^UTILITY(U,$J,358.3,13664,1,4,0)
+264 ;;=4^G60.9
+265 ;;^UTILITY(U,$J,358.3,13664,2)
+266 ;;=^5004071
+267 ;;^UTILITY(U,$J,358.3,13665,0)
+268 ;;=I63.50^^53^588^1
+269 ;;^UTILITY(U,$J,358.3,13665,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,13665,1,3,0)
+272 ;;=3^Cerebral Infarction d/t Occlusion/Stenosis of Cerebral Artery
+273 ;;^UTILITY(U,$J,358.3,13665,1,4,0)
+274 ;;=4^I63.50
+275 ;;^UTILITY(U,$J,358.3,13665,2)
+276 ;;=^5007343
+277 ;;^UTILITY(U,$J,358.3,13666,0)
+278 ;;=G45.9^^53^588^12
+279 ;;^UTILITY(U,$J,358.3,13666,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,13666,1,3,0)
+282 ;;=3^Transient Cerebral Ischemic Attack,Unspec
+283 ;;^UTILITY(U,$J,358.3,13666,1,4,0)
+284 ;;=4^G45.9
+285 ;;^UTILITY(U,$J,358.3,13666,2)
+286 ;;=^5003959
+287 ;;^UTILITY(U,$J,358.3,13667,0)
+288 ;;=R55.^^53^588^11
+289 ;;^UTILITY(U,$J,358.3,13667,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,13667,1,3,0)
+292 ;;=3^Syncope and Collapse
+293 ;;^UTILITY(U,$J,358.3,13667,1,4,0)
+294 ;;=4^R55.
+295 ;;^UTILITY(U,$J,358.3,13667,2)
+296 ;;=^116707
+297 ;;^UTILITY(U,$J,358.3,13668,0)
+298 ;;=R56.00^^53^588^10
+299 ;;^UTILITY(U,$J,358.3,13668,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,13668,1,3,0)
+302 ;;=3^Simple Febrile Convulsions
+303 ;;^UTILITY(U,$J,358.3,13668,1,4,0)
+304 ;;=4^R56.00
+305 ;;^UTILITY(U,$J,358.3,13668,2)
+306 ;;=^5019522
+307 ;;^UTILITY(U,$J,358.3,13669,0)
+308 ;;=R56.1^^53^588^9
+309 ;;^UTILITY(U,$J,358.3,13669,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,13669,1,3,0)
+312 ;;=3^Post Traumatic Seizures
+313 ;;^UTILITY(U,$J,358.3,13669,1,4,0)
+314 ;;=4^R56.1
+315 ;;^UTILITY(U,$J,358.3,13669,2)
+316 ;;=^5019523
+317 ;;^UTILITY(U,$J,358.3,13670,0)
+318 ;;=R56.9^^53^588^2
+319 ;;^UTILITY(U,$J,358.3,13670,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,13670,1,3,0)
+322 ;;=3^Convulsions,Unspec
+323 ;;^UTILITY(U,$J,358.3,13670,1,4,0)
+324 ;;=4^R56.9
+325 ;;^UTILITY(U,$J,358.3,13670,2)
+326 ;;=^5019524
+327 ;;^UTILITY(U,$J,358.3,13671,0)
+328 ;;=R42.^^53^588^3
+329 ;;^UTILITY(U,$J,358.3,13671,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,13671,1,3,0)
+332 ;;=3^Dizziness and Giddiness
+333 ;;^UTILITY(U,$J,358.3,13671,1,4,0)
+334 ;;=4^R42.
+335 ;;^UTILITY(U,$J,358.3,13671,2)
+336 ;;=^5019450
+337 ;;^UTILITY(U,$J,358.3,13672,0)
+338 ;;=R25.1^^53^588^13
+339 ;;^UTILITY(U,$J,358.3,13672,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,13672,1,3,0)
+342 ;;=3^Tremor,Unspec
+343 ;;^UTILITY(U,$J,358.3,13672,1,4,0)
+344 ;;=4^R25.1
+345 ;;^UTILITY(U,$J,358.3,13672,2)
+346 ;;=^5019300
+347 ;;^UTILITY(U,$J,358.3,13673,0)
+348 ;;=R20.2^^53^588^7
+349 ;;^UTILITY(U,$J,358.3,13673,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,13673,1,3,0)
+352 ;;=3^Paresthesia of Skin
+353 ;;^UTILITY(U,$J,358.3,13673,1,4,0)
+354 ;;=4^R20.2
+355 ;;^UTILITY(U,$J,358.3,13673,2)
+356 ;;=^5019280
+357 ;;^UTILITY(U,$J,358.3,13674,0)
+358 ;;=C02.9^^53^589^63
+359 ;;^UTILITY(U,$J,358.3,13674,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,13674,1,3,0)
+362 ;;=3^Malig Neop of Tongue,Unspec
+363 ;;^UTILITY(U,$J,358.3,13674,1,4,0)
+364 ;;=4^C02.9
+365 ;;^UTILITY(U,$J,358.3,13674,2)
+366 ;;=^5000891
+367 ;;^UTILITY(U,$J,358.3,13675,0)
+368 ;;=C06.9^^53^589^52
+369 ;;^UTILITY(U,$J,358.3,13675,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,13675,1,3,0)
+372 ;;=3^Malig Neop of Mouth,Unspec
+373 ;;^UTILITY(U,$J,358.3,13675,1,4,0)
+374 ;;=4^C06.9
+375 ;;^UTILITY(U,$J,358.3,13675,2)
+376 ;;=^5000901
+377 ;;^UTILITY(U,$J,358.3,13676,0)
+378 ;;=C10.9^^53^589^54
+379 ;;^UTILITY(U,$J,358.3,13676,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,13676,1,3,0)
+382 ;;=3^Malig Neop of Oropharynx,Unspec
+383 ;;^UTILITY(U,$J,358.3,13676,1,4,0)
+384 ;;=4^C10.9
+385 ;;^UTILITY(U,$J,358.3,13676,2)
+386 ;;=^5000909
+387 ;;^UTILITY(U,$J,358.3,13677,0)
+388 ;;=C11.9^^53^589^53
+389 ;;^UTILITY(U,$J,358.3,13677,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,13677,1,3,0)
+392 ;;=3^Malig Neop of Nasopharynx,Unspec
+393 ;;^UTILITY(U,$J,358.3,13677,1,4,0)
+394 ;;=4^C11.9
+395 ;;^UTILITY(U,$J,358.3,13677,2)
+396 ;;=^5000911
+397 ;;^UTILITY(U,$J,358.3,13678,0)
+398 ;;=C15.9^^53^589^42
+399 ;;^UTILITY(U,$J,358.3,13678,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,13678,1,3,0)
+402 ;;=3^Malig Neop of Esophagus,Unspec
+403 ;;^UTILITY(U,$J,358.3,13678,1,4,0)
+404 ;;=4^C15.9
+405 ;;^UTILITY(U,$J,358.3,13678,2)
+406 ;;=^5000919
+407 ;;^UTILITY(U,$J,358.3,13679,0)
+408 ;;=C16.9^^53^589^61
+409 ;;^UTILITY(U,$J,358.3,13679,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,13679,1,3,0)
+412 ;;=3^Malig Neop of Stomach,Unspec
+413 ;;^UTILITY(U,$J,358.3,13679,1,4,0)
+414 ;;=4^C16.9
+415 ;;^UTILITY(U,$J,358.3,13679,2)
+416 ;;=^5000923
+417 ;;^UTILITY(U,$J,358.3,13680,0)
+418 ;;=C17.9^^53^589^60
+419 ;;^UTILITY(U,$J,358.3,13680,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,13680,1,3,0)
+422 ;;=3^Malig Neop of Small Intestine,Unspec
+423 ;;^UTILITY(U,$J,358.3,13680,1,4,0)
+424 ;;=4^C17.9
+425 ;;^UTILITY(U,$J,358.3,13680,2)
+426 ;;=^5000926
+427 ;;^UTILITY(U,$J,358.3,13681,0)
+428 ;;=C18.9^^53^589^39
+429 ;;^UTILITY(U,$J,358.3,13681,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,13681,1,3,0)
+432 ;;=3^Malig Neop of Colon,Unspec
+433 ;;^UTILITY(U,$J,358.3,13681,1,4,0)
+434 ;;=4^C18.9
+435 ;;^UTILITY(U,$J,358.3,13681,2)
+436 ;;=^5000929
+437 ;;^UTILITY(U,$J,358.3,13682,0)
+438 ;;=C20.^^53^589^58
+439 ;;^UTILITY(U,$J,358.3,13682,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,13682,1,3,0)
+442 ;;=3^Malig Neop of Rectum
+443 ;;^UTILITY(U,$J,358.3,13682,1,4,0)
+444 ;;=4^C20.
+445 ;;^UTILITY(U,$J,358.3,13682,2)
+446 ;;=^267090
+447 ;;^UTILITY(U,$J,358.3,13683,0)
+448 ;;=C21.0^^53^589^35
+449 ;;^UTILITY(U,$J,358.3,13683,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,13683,1,3,0)
+452 ;;=3^Malig Neop of Anus,Unspec
+453 ;;^UTILITY(U,$J,358.3,13683,1,4,0)
+454 ;;=4^C21.0
+455 ;;^UTILITY(U,$J,358.3,13683,2)
+456 ;;=^5000930
+457 ;;^UTILITY(U,$J,358.3,13684,0)
+458 ;;=C22.8^^53^589^49
+459 ;;^UTILITY(U,$J,358.3,13684,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,13684,1,3,0)
+462 ;;=3^Malig Neop of Liver,Primary
+463 ;;^UTILITY(U,$J,358.3,13684,1,4,0)
+464 ;;=4^C22.8
+465 ;;^UTILITY(U,$J,358.3,13684,2)
+466 ;;=^5000939
+467 ;;^UTILITY(U,$J,358.3,13685,0)
+468 ;;=C22.0^^53^589^27
+469 ;;^UTILITY(U,$J,358.3,13685,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,13685,1,3,0)
+472 ;;=3^Liver Cell Carcinoma
+473 ;;^UTILITY(U,$J,358.3,13685,1,4,0)
+474 ;;=4^C22.0
+475 ;;^UTILITY(U,$J,358.3,13685,2)
+476 ;;=^5000933
+477 ;;^UTILITY(U,$J,358.3,13686,0)
+478 ;;=C22.2^^53^589^20
+479 ;;^UTILITY(U,$J,358.3,13686,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,13686,1,3,0)
+482 ;;=3^Hepatoblastoma
+483 ;;^UTILITY(U,$J,358.3,13686,1,4,0)
+484 ;;=4^C22.2
+485 ;;^UTILITY(U,$J,358.3,13686,2)
+486 ;;=^5000935
+487 ;;^UTILITY(U,$J,358.3,13687,0)
+488 ;;=C22.7^^53^589^26
+489 ;;^UTILITY(U,$J,358.3,13687,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,13687,1,3,0)
+492 ;;=3^Liver Carcinomas NEC
+493 ;;^UTILITY(U,$J,358.3,13687,1,4,0)
+494 ;;=4^C22.7
+495 ;;^UTILITY(U,$J,358.3,13687,2)
+496 ;;=^5000938
+497 ;;^UTILITY(U,$J,358.3,13688,0)
+498 ;;=C23.^^53^589^46
+499 ;;^UTILITY(U,$J,358.3,13688,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,13688,1,3,0)
+502 ;;=3^Malig Neop of Gallbladder
+503 ;;^UTILITY(U,$J,358.3,13688,1,4,0)
+504 ;;=4^C23.
+505 ;;^UTILITY(U,$J,358.3,13688,2)
+506 ;;=^267098
+507 ;;^UTILITY(U,$J,358.3,13689,0)
+508 ;;=C24.0^^53^589^43
+509 ;;^UTILITY(U,$J,358.3,13689,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,13689,1,3,0)
+512 ;;=3^Malig Neop of Extrahepatic Bile Duct
+513 ;;^UTILITY(U,$J,358.3,13689,1,4,0)
+514 ;;=4^C24.0
+515 ;;^UTILITY(U,$J,358.3,13689,2)
+516 ;;=^5000940
+517 ;;^UTILITY(U,$J,358.3,13690,0)
+518 ;;=C24.1^^53^589^34
+519 ;;^UTILITY(U,$J,358.3,13690,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,13690,1,3,0)
+522 ;;=3^Malig Neop of Ampulla of Vater
+523 ;;^UTILITY(U,$J,358.3,13690,1,4,0)
+524 ;;=4^C24.1
+525 ;;^UTILITY(U,$J,358.3,13690,2)
+526 ;;=^267100
+527 ;;^UTILITY(U,$J,358.3,13691,0)
+528 ;;=C25.9^^53^589^55
+529 ;;^UTILITY(U,$J,358.3,13691,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,13691,1,3,0)
+532 ;;=3^Malig Neop of Pancreas,Unspec
+533 ;;^UTILITY(U,$J,358.3,13691,1,4,0)
+534 ;;=4^C25.9
+535 ;;^UTILITY(U,$J,358.3,13691,2)
+536 ;;=^5000946
+537 ;;^UTILITY(U,$J,358.3,13692,0)
+538 ;;=C31.9^^53^589^33
+539 ;;^UTILITY(U,$J,358.3,13692,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,13692,1,3,0)
+542 ;;=3^Malig Neop of Accessory Sinus,Unspec
+543 ;;^UTILITY(U,$J,358.3,13692,1,4,0)
+544 ;;=4^C31.9
+545 ;;^UTILITY(U,$J,358.3,13692,2)
+546 ;;=^5000953
+547 ;;^UTILITY(U,$J,358.3,13693,0)
+548 ;;=C32.9^^53^589^48
+549 ;;^UTILITY(U,$J,358.3,13693,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,13693,1,3,0)
+552 ;;=3^Malig Neop of Larynx,Unspec
+553 ;;^UTILITY(U,$J,358.3,13693,1,4,0)
+554 ;;=4^C32.9
+555 ;;^UTILITY(U,$J,358.3,13693,2)
+556 ;;=^5000956
+557 ;;^UTILITY(U,$J,358.3,13694,0)
+558 ;;=C34.90^^53^589^38
+559 ;;^UTILITY(U,$J,358.3,13694,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,13694,1,3,0)
+562 ;;=3^Malig Neop of Bronchus/Lung,Unspec
+563 ;;^UTILITY(U,$J,358.3,13694,1,4,0)
+564 ;;=4^C34.90
+565 ;;^UTILITY(U,$J,358.3,13694,2)
+566 ;;=^5000966
+567 ;;^UTILITY(U,$J,358.3,13695,0)
+568 ;;=C38.4^^53^589^56
+569 ;;^UTILITY(U,$J,358.3,13695,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,13695,1,3,0)
+572 ;;=3^Malig Neop of Pleura
+573 ;;^UTILITY(U,$J,358.3,13695,1,4,0)
+574 ;;=4^C38.4
+575 ;;^UTILITY(U,$J,358.3,13695,2)
+576 ;;=^267140
+577 ;;^UTILITY(U,$J,358.3,13696,0)
+578 ;;=C49.9^^53^589^40
+579 ;;^UTILITY(U,$J,358.3,13696,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,13696,1,3,0)
+582 ;;=3^Malig Neop of Connective/Soft Tissue,Unspec
+583 ;;^UTILITY(U,$J,358.3,13696,1,4,0)
+584 ;;=4^C49.9
+585 ;;^UTILITY(U,$J,358.3,13696,2)
+586 ;;=^5001136
+587 ;;^UTILITY(U,$J,358.3,13697,0)
+588 ;;=C43.9^^53^589^59
+589 ;;^UTILITY(U,$J,358.3,13697,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,13697,1,3,0)
+592 ;;=3^Malig Neop of Skin,Unspec
+593 ;;^UTILITY(U,$J,358.3,13697,1,4,0)
+594 ;;=4^C43.9
+595 ;;^UTILITY(U,$J,358.3,13697,2)
+596 ;;=^5001015
+597 ;;^UTILITY(U,$J,358.3,13698,0)
+598 ;;=C50.911^^53^589^45
+599 ;;^UTILITY(U,$J,358.3,13698,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,13698,1,3,0)
+602 ;;=3^Malig Neop of Female Breast,Right
+603 ;;^UTILITY(U,$J,358.3,13698,1,4,0)
+604 ;;=4^C50.911
+605 ;;^UTILITY(U,$J,358.3,13698,2)
+606 ;;=^5001195
+607 ;;^UTILITY(U,$J,358.3,13699,0)
+608 ;;=C50.912^^53^589^44
+609 ;;^UTILITY(U,$J,358.3,13699,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,13699,1,3,0)
+612 ;;=3^Malig Neop of Female Breast,Left
+613 ;;^UTILITY(U,$J,358.3,13699,1,4,0)
+614 ;;=4^C50.912
+615 ;;^UTILITY(U,$J,358.3,13699,2)
+616 ;;=^5001196
+617 ;;^UTILITY(U,$J,358.3,13700,0)
+618 ;;=C50.921^^53^589^51
+619 ;;^UTILITY(U,$J,358.3,13700,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,13700,1,3,0)
+622 ;;=3^Malig Neop of Male Breast,Right
+623 ;;^UTILITY(U,$J,358.3,13700,1,4,0)
+624 ;;=4^C50.921
+625 ;;^UTILITY(U,$J,358.3,13700,2)
+626 ;;=^5001198
+627 ;;^UTILITY(U,$J,358.3,13701,0)
+628 ;;=C50.922^^53^589^50
+629 ;;^UTILITY(U,$J,358.3,13701,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,13701,1,3,0)
+632 ;;=3^Malig Neop of Male Breast,Left
+633 ;;^UTILITY(U,$J,358.3,13701,1,4,0)
+634 ;;=4^C50.922
+635 ;;^UTILITY(U,$J,358.3,13701,2)
+636 ;;=^5133340
+637 ;;^UTILITY(U,$J,358.3,13702,0)
+638 ;;=C46.9^^53^589^25
+639 ;;^UTILITY(U,$J,358.3,13702,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,13702,1,3,0)
+642 ;;=3^Kaposi's Sarcoma,Unspec
+643 ;;^UTILITY(U,$J,358.3,13702,1,4,0)
+644 ;;=4^C46.9
+645 ;;^UTILITY(U,$J,358.3,13702,2)
+646 ;;=^5001108
+647 ;;^UTILITY(U,$J,358.3,13703,0)
+648 ;;=C61.^^53^589^57
+649 ;;^UTILITY(U,$J,358.3,13703,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,13703,1,3,0)
+652 ;;=3^Malig Neop of Prostate
+653 ;;^UTILITY(U,$J,358.3,13703,1,4,0)
+654 ;;=4^C61.
+655 ;;^UTILITY(U,$J,358.3,13703,2)
+656 ;;=^267239
+657 ;;^UTILITY(U,$J,358.3,13704,0)
+658 ;;=C62.10^^53^589^41
+659 ;;^UTILITY(U,$J,358.3,13704,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,13704,1,3,0)
+662 ;;=3^Malig Neop of Descended Testis,Unspec
+663 ;;^UTILITY(U,$J,358.3,13704,1,4,0)
+664 ;;=4^C62.10
+665 ;;^UTILITY(U,$J,358.3,13704,2)
+666 ;;=^5001233
+667 ;;^UTILITY(U,$J,358.3,13705,0)
+668 ;;=C62.90^^53^589^62
+669 ;;^UTILITY(U,$J,358.3,13705,1,0)
+670 ;;=^358.31IA^4^2
+671 ;;^UTILITY(U,$J,358.3,13705,1,3,0)
+672 ;;=3^Malig Neop of Testis,Unspec
+673 ;;^UTILITY(U,$J,358.3,13705,1,4,0)
+674 ;;=4^C62.90
+675 ;;^UTILITY(U,$J,358.3,13705,2)
+676 ;;=^5001236
+677 ;;^UTILITY(U,$J,358.3,13706,0)
+678 ;;=C67.9^^53^589^36
+679 ;;^UTILITY(U,$J,358.3,13706,1,0)
+680 ;;=^358.31IA^4^2
+681 ;;^UTILITY(U,$J,358.3,13706,1,3,0)
+682 ;;=3^Malig Neop of Bladder,Unspec
+683 ;;^UTILITY(U,$J,358.3,13706,1,4,0)
+684 ;;=4^C67.9
+685 ;;^UTILITY(U,$J,358.3,13706,2)
+686 ;;=^5001263
+687 ;;^UTILITY(U,$J,358.3,13707,0)
+688 ;;=C64.9^^53^589^47
+689 ;;^UTILITY(U,$J,358.3,13707,1,0)
+690 ;;=^358.31IA^4^2
+691 ;;^UTILITY(U,$J,358.3,13707,1,3,0)
+692 ;;=3^Malig Neop of Kidney,Except Renal Pelvis,Unspec