Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: IBDEI04M

IBDEI04M.m

Go to the documentation of this file.
IBDEI04M ; ; 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,11160,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11160,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Ankle w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11160,1,4,0)
 ;;=4^L97.318
 ;;^UTILITY(U,$J,358.3,11160,2)
 ;;=^5151453
 ;;^UTILITY(U,$J,358.3,11161,0)
 ;;=L97.211^^48^507^90
 ;;^UTILITY(U,$J,358.3,11161,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11161,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Calf Limited to Brkdwn Skin
 ;;^UTILITY(U,$J,358.3,11161,1,4,0)
 ;;=4^L97.211
 ;;^UTILITY(U,$J,358.3,11161,2)
 ;;=^5009500
 ;;^UTILITY(U,$J,358.3,11162,0)
 ;;=L97.212^^48^507^92
 ;;^UTILITY(U,$J,358.3,11162,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11162,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Calf w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11162,1,4,0)
 ;;=4^L97.212
 ;;^UTILITY(U,$J,358.3,11162,2)
 ;;=^5009501
 ;;^UTILITY(U,$J,358.3,11163,0)
 ;;=L97.213^^48^507^94
 ;;^UTILITY(U,$J,358.3,11163,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11163,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Calf w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11163,1,4,0)
 ;;=4^L97.213
 ;;^UTILITY(U,$J,358.3,11163,2)
 ;;=^5009502
 ;;^UTILITY(U,$J,358.3,11164,0)
 ;;=L97.214^^48^507^95
 ;;^UTILITY(U,$J,358.3,11164,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11164,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Calf w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11164,1,4,0)
 ;;=4^L97.214
 ;;^UTILITY(U,$J,358.3,11164,2)
 ;;=^5009503
 ;;^UTILITY(U,$J,358.3,11165,0)
 ;;=L97.215^^48^507^93
 ;;^UTILITY(U,$J,358.3,11165,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11165,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Calf w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11165,1,4,0)
 ;;=4^L97.215
 ;;^UTILITY(U,$J,358.3,11165,2)
 ;;=^5151442
 ;;^UTILITY(U,$J,358.3,11166,0)
 ;;=L97.216^^48^507^91
 ;;^UTILITY(U,$J,358.3,11166,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11166,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Calf w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11166,1,4,0)
 ;;=4^L97.216
 ;;^UTILITY(U,$J,358.3,11166,2)
 ;;=^5151443
 ;;^UTILITY(U,$J,358.3,11167,0)
 ;;=L97.218^^48^507^96
 ;;^UTILITY(U,$J,358.3,11167,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11167,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Calf w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11167,1,4,0)
 ;;=4^L97.218
 ;;^UTILITY(U,$J,358.3,11167,2)
 ;;=^5151444
 ;;^UTILITY(U,$J,358.3,11168,0)
 ;;=L97.511^^48^507^99
 ;;^UTILITY(U,$J,358.3,11168,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11168,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Foot,Oth Part Limited to Brkdwn Skin
 ;;^UTILITY(U,$J,358.3,11168,1,4,0)
 ;;=4^L97.511
 ;;^UTILITY(U,$J,358.3,11168,2)
 ;;=^5009545
 ;;^UTILITY(U,$J,358.3,11169,0)
 ;;=L97.512^^48^507^100
 ;;^UTILITY(U,$J,358.3,11169,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11169,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Foot,Oth Part w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11169,1,4,0)
 ;;=4^L97.512
 ;;^UTILITY(U,$J,358.3,11169,2)
 ;;=^5009546
 ;;^UTILITY(U,$J,358.3,11170,0)
 ;;=L97.513^^48^507^101
 ;;^UTILITY(U,$J,358.3,11170,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11170,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Foot,Oth Part w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11170,1,4,0)
 ;;=4^L97.513
 ;;^UTILITY(U,$J,358.3,11170,2)
 ;;=^5009547
 ;;^UTILITY(U,$J,358.3,11171,0)
 ;;=L97.514^^48^507^102
 ;;^UTILITY(U,$J,358.3,11171,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11171,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Foot,Oth Part w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11171,1,4,0)
 ;;=4^L97.514
 ;;^UTILITY(U,$J,358.3,11171,2)
 ;;=^5009548
 ;;^UTILITY(U,$J,358.3,11172,0)
 ;;=L97.515^^48^507^103
 ;;^UTILITY(U,$J,358.3,11172,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11172,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Foot,Oth Part w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11172,1,4,0)
 ;;=4^L97.515
 ;;^UTILITY(U,$J,358.3,11172,2)
 ;;=^5151469
 ;;^UTILITY(U,$J,358.3,11173,0)
 ;;=L97.516^^48^507^104
 ;;^UTILITY(U,$J,358.3,11173,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11173,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Foot,Oth Part w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11173,1,4,0)
 ;;=4^L97.516
 ;;^UTILITY(U,$J,358.3,11173,2)
 ;;=^5151470
 ;;^UTILITY(U,$J,358.3,11174,0)
 ;;=L97.518^^48^507^105
 ;;^UTILITY(U,$J,358.3,11174,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11174,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Foot,Oth Part w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11174,1,4,0)
 ;;=4^L97.518
 ;;^UTILITY(U,$J,358.3,11174,2)
 ;;=^5151471
 ;;^UTILITY(U,$J,358.3,11175,0)
 ;;=L97.411^^48^507^106
 ;;^UTILITY(U,$J,358.3,11175,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11175,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Heel & Midft Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,11175,1,4,0)
 ;;=4^L97.411
 ;;^UTILITY(U,$J,358.3,11175,2)
 ;;=^5009530
 ;;^UTILITY(U,$J,358.3,11176,0)
 ;;=L97.412^^48^507^107
 ;;^UTILITY(U,$J,358.3,11176,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11176,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Heel & Midft w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11176,1,4,0)
 ;;=4^L97.412
 ;;^UTILITY(U,$J,358.3,11176,2)
 ;;=^5009531
 ;;^UTILITY(U,$J,358.3,11177,0)
 ;;=L97.413^^48^507^108
 ;;^UTILITY(U,$J,358.3,11177,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11177,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Heel & Midft w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11177,1,4,0)
 ;;=4^L97.413
 ;;^UTILITY(U,$J,358.3,11177,2)
 ;;=^5009532
 ;;^UTILITY(U,$J,358.3,11178,0)
 ;;=L97.414^^48^507^109
 ;;^UTILITY(U,$J,358.3,11178,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11178,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Heel & Midft w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11178,1,4,0)
 ;;=4^L97.414
 ;;^UTILITY(U,$J,358.3,11178,2)
 ;;=^5009533
 ;;^UTILITY(U,$J,358.3,11179,0)
 ;;=L97.415^^48^507^110
 ;;^UTILITY(U,$J,358.3,11179,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11179,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Heel & Midft w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11179,1,4,0)
 ;;=4^L97.415
 ;;^UTILITY(U,$J,358.3,11179,2)
 ;;=^5151460
 ;;^UTILITY(U,$J,358.3,11180,0)
 ;;=L97.416^^48^507^111
 ;;^UTILITY(U,$J,358.3,11180,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11180,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Heel & Midft w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11180,1,4,0)
 ;;=4^L97.416
 ;;^UTILITY(U,$J,358.3,11180,2)
 ;;=^5151461
 ;;^UTILITY(U,$J,358.3,11181,0)
 ;;=L97.418^^48^507^112
 ;;^UTILITY(U,$J,358.3,11181,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11181,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Heel & Midft w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11181,1,4,0)
 ;;=4^L97.418
 ;;^UTILITY(U,$J,358.3,11181,2)
 ;;=^5151462
 ;;^UTILITY(U,$J,358.3,11182,0)
 ;;=L97.911^^48^507^114
 ;;^UTILITY(U,$J,358.3,11182,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11182,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt LL Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,11182,1,4,0)
 ;;=4^L97.911
 ;;^UTILITY(U,$J,358.3,11182,2)
 ;;=^5133679
 ;;^UTILITY(U,$J,358.3,11183,0)
 ;;=L97.912^^48^507^116
 ;;^UTILITY(U,$J,358.3,11183,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11183,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt LL w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11183,1,4,0)
 ;;=4^L97.912
 ;;^UTILITY(U,$J,358.3,11183,2)
 ;;=^5133681
 ;;^UTILITY(U,$J,358.3,11184,0)
 ;;=L97.913^^48^507^118
 ;;^UTILITY(U,$J,358.3,11184,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11184,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt LL w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11184,1,4,0)
 ;;=4^L97.913
 ;;^UTILITY(U,$J,358.3,11184,2)
 ;;=^5133683
 ;;^UTILITY(U,$J,358.3,11185,0)
 ;;=L97.914^^48^507^119
 ;;^UTILITY(U,$J,358.3,11185,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11185,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt LL w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11185,1,4,0)
 ;;=4^L97.914
 ;;^UTILITY(U,$J,358.3,11185,2)
 ;;=^5133685
 ;;^UTILITY(U,$J,358.3,11186,0)
 ;;=L97.915^^48^507^117
 ;;^UTILITY(U,$J,358.3,11186,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11186,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt LL w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11186,1,4,0)
 ;;=4^L97.915
 ;;^UTILITY(U,$J,358.3,11186,2)
 ;;=^5151487
 ;;^UTILITY(U,$J,358.3,11187,0)
 ;;=L97.916^^48^507^115
 ;;^UTILITY(U,$J,358.3,11187,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11187,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt LL w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11187,1,4,0)
 ;;=4^L97.916
 ;;^UTILITY(U,$J,358.3,11187,2)
 ;;=^5151488
 ;;^UTILITY(U,$J,358.3,11188,0)
 ;;=L97.918^^48^507^120
 ;;^UTILITY(U,$J,358.3,11188,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11188,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt LL w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11188,1,4,0)
 ;;=4^L97.918
 ;;^UTILITY(U,$J,358.3,11188,2)
 ;;=^5151489
 ;;^UTILITY(U,$J,358.3,11189,0)
 ;;=L97.111^^48^507^122
 ;;^UTILITY(U,$J,358.3,11189,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11189,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Thigh Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,11189,1,4,0)
 ;;=4^L97.111
 ;;^UTILITY(U,$J,358.3,11189,2)
 ;;=^5009485
 ;;^UTILITY(U,$J,358.3,11190,0)
 ;;=L97.112^^48^507^124
 ;;^UTILITY(U,$J,358.3,11190,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11190,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Thigh w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11190,1,4,0)
 ;;=4^L97.112
 ;;^UTILITY(U,$J,358.3,11190,2)
 ;;=^5009486
 ;;^UTILITY(U,$J,358.3,11191,0)
 ;;=L97.113^^48^507^126
 ;;^UTILITY(U,$J,358.3,11191,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11191,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Thigh w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11191,1,4,0)
 ;;=4^L97.113
 ;;^UTILITY(U,$J,358.3,11191,2)
 ;;=^5009487
 ;;^UTILITY(U,$J,358.3,11192,0)
 ;;=L97.114^^48^507^127
 ;;^UTILITY(U,$J,358.3,11192,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11192,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Thigh w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11192,1,4,0)
 ;;=4^L97.114
 ;;^UTILITY(U,$J,358.3,11192,2)
 ;;=^5009488
 ;;^UTILITY(U,$J,358.3,11193,0)
 ;;=L97.115^^48^507^125
 ;;^UTILITY(U,$J,358.3,11193,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11193,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Thigh w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11193,1,4,0)
 ;;=4^L97.115
 ;;^UTILITY(U,$J,358.3,11193,2)
 ;;=^5151433
 ;;^UTILITY(U,$J,358.3,11194,0)
 ;;=L97.116^^48^507^123
 ;;^UTILITY(U,$J,358.3,11194,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11194,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Thigh w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11194,1,4,0)
 ;;=4^L97.116
 ;;^UTILITY(U,$J,358.3,11194,2)
 ;;=^5151434
 ;;^UTILITY(U,$J,358.3,11195,0)
 ;;=L97.118^^48^507^128
 ;;^UTILITY(U,$J,358.3,11195,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11195,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Thigh w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11195,1,4,0)
 ;;=4^L97.118
 ;;^UTILITY(U,$J,358.3,11195,2)
 ;;=^5151435
 ;;^UTILITY(U,$J,358.3,11196,0)
 ;;=B00.9^^48^508^30
 ;;^UTILITY(U,$J,358.3,11196,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11196,1,3,0)
 ;;=3^Herpes Simplex Infection NOS
 ;;^UTILITY(U,$J,358.3,11196,1,4,0)
 ;;=4^B00.9
 ;;^UTILITY(U,$J,358.3,11196,2)
 ;;=^5000480
 ;;^UTILITY(U,$J,358.3,11197,0)
 ;;=K59.00^^48^508^13
 ;;^UTILITY(U,$J,358.3,11197,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11197,1,3,0)
 ;;=3^Constipation,Unspec
 ;;^UTILITY(U,$J,358.3,11197,1,4,0)
 ;;=4^K59.00
 ;;^UTILITY(U,$J,358.3,11197,2)
 ;;=^323537
 ;;^UTILITY(U,$J,358.3,11198,0)
 ;;=R42.^^48^508^21
 ;;^UTILITY(U,$J,358.3,11198,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11198,1,3,0)
 ;;=3^Dizziness and Giddiness
 ;;^UTILITY(U,$J,358.3,11198,1,4,0)
 ;;=4^R42.
 ;;^UTILITY(U,$J,358.3,11198,2)
 ;;=^5019450
 ;;^UTILITY(U,$J,358.3,11199,0)
 ;;=G47.00^^48^508^31
 ;;^UTILITY(U,$J,358.3,11199,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11199,1,3,0)
 ;;=3^Insomnia,Unspec
 ;;^UTILITY(U,$J,358.3,11199,1,4,0)
 ;;=4^G47.00
 ;;^UTILITY(U,$J,358.3,11199,2)
 ;;=^332924
 ;;^UTILITY(U,$J,358.3,11200,0)
 ;;=G47.30^^48^508^44
 ;;^UTILITY(U,$J,358.3,11200,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11200,1,3,0)
 ;;=3^Sleep Apnea,Unspec
 ;;^UTILITY(U,$J,358.3,11200,1,4,0)
 ;;=4^G47.30
 ;;^UTILITY(U,$J,358.3,11200,2)
 ;;=^5003977
 ;;^UTILITY(U,$J,358.3,11201,0)
 ;;=R50.9^^48^508^27
 ;;^UTILITY(U,$J,358.3,11201,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11201,1,3,0)
 ;;=3^Fever,Unspec
 ;;^UTILITY(U,$J,358.3,11201,1,4,0)
 ;;=4^R50.9
 ;;^UTILITY(U,$J,358.3,11201,2)
 ;;=^5019512
 ;;^UTILITY(U,$J,358.3,11202,0)
 ;;=R50.82^^48^508^37
 ;;^UTILITY(U,$J,358.3,11202,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11202,1,3,0)
 ;;=3^Postprocedural Fever
 ;;^UTILITY(U,$J,358.3,11202,1,4,0)
 ;;=4^R50.82
 ;;^UTILITY(U,$J,358.3,11202,2)
 ;;=^5019509
 ;;^UTILITY(U,$J,358.3,11203,0)
 ;;=R50.83^^48^508^38
 ;;^UTILITY(U,$J,358.3,11203,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11203,1,3,0)
 ;;=3^Postvaccination Fever
 ;;^UTILITY(U,$J,358.3,11203,1,4,0)
 ;;=4^R50.83
 ;;^UTILITY(U,$J,358.3,11203,2)
 ;;=^5019510
 ;;^UTILITY(U,$J,358.3,11204,0)
 ;;=R68.83^^48^508^11
 ;;^UTILITY(U,$J,358.3,11204,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11204,1,3,0)
 ;;=3^Chills w/o Fever
 ;;^UTILITY(U,$J,358.3,11204,1,4,0)
 ;;=4^R68.83
 ;;^UTILITY(U,$J,358.3,11204,2)
 ;;=^5019555
 ;;^UTILITY(U,$J,358.3,11205,0)
 ;;=R53.81^^48^508^32
 ;;^UTILITY(U,$J,358.3,11205,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11205,1,3,0)
 ;;=3^Malaise NOS
 ;;^UTILITY(U,$J,358.3,11205,1,4,0)
 ;;=4^R53.81
 ;;^UTILITY(U,$J,358.3,11205,2)
 ;;=^5019518
 ;;^UTILITY(U,$J,358.3,11206,0)
 ;;=R53.83^^48^508^26
 ;;^UTILITY(U,$J,358.3,11206,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11206,1,3,0)
 ;;=3^Fatigue NOS
 ;;^UTILITY(U,$J,358.3,11206,1,4,0)
 ;;=4^R53.83
 ;;^UTILITY(U,$J,358.3,11206,2)
 ;;=^5019520
 ;;^UTILITY(U,$J,358.3,11207,0)
 ;;=G93.3^^48^508^39
 ;;^UTILITY(U,$J,358.3,11207,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11207,1,3,0)
 ;;=3^Postviral Fatigue Syndrome
 ;;^UTILITY(U,$J,358.3,11207,1,4,0)
 ;;=4^G93.3
 ;;^UTILITY(U,$J,358.3,11207,2)
 ;;=^5004181
 ;;^UTILITY(U,$J,358.3,11208,0)
 ;;=R53.1^^48^508^51
 ;;^UTILITY(U,$J,358.3,11208,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11208,1,3,0)
 ;;=3^Weakness
 ;;^UTILITY(U,$J,358.3,11208,1,4,0)
 ;;=4^R53.1
 ;;^UTILITY(U,$J,358.3,11208,2)
 ;;=^5019516
 ;;^UTILITY(U,$J,358.3,11209,0)
 ;;=R60.9^^48^508^24
 ;;^UTILITY(U,$J,358.3,11209,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11209,1,3,0)
 ;;=3^Edema,Unspec
 ;;^UTILITY(U,$J,358.3,11209,1,4,0)
 ;;=4^R60.9
 ;;^UTILITY(U,$J,358.3,11209,2)
 ;;=^5019534
 ;;^UTILITY(U,$J,358.3,11210,0)
 ;;=R60.1^^48^508^22
 ;;^UTILITY(U,$J,358.3,11210,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11210,1,3,0)
 ;;=3^Edema,Generalized
 ;;^UTILITY(U,$J,358.3,11210,1,4,0)
 ;;=4^R60.1
 ;;^UTILITY(U,$J,358.3,11210,2)
 ;;=^5019533
 ;;^UTILITY(U,$J,358.3,11211,0)
 ;;=R60.0^^48^508^23
 ;;^UTILITY(U,$J,358.3,11211,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11211,1,3,0)
 ;;=3^Edema,Localized
 ;;^UTILITY(U,$J,358.3,11211,1,4,0)
 ;;=4^R60.0
 ;;^UTILITY(U,$J,358.3,11211,2)
 ;;=^5019532
 ;;^UTILITY(U,$J,358.3,11212,0)
 ;;=R63.4^^48^508^6
 ;;^UTILITY(U,$J,358.3,11212,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11212,1,3,0)
 ;;=3^Abnormal Weight Loss
 ;;^UTILITY(U,$J,358.3,11212,1,4,0)
 ;;=4^R63.4
 ;;^UTILITY(U,$J,358.3,11212,2)
 ;;=^5019542
 ;;^UTILITY(U,$J,358.3,11213,0)
 ;;=R63.6^^48^508^48
 ;;^UTILITY(U,$J,358.3,11213,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11213,1,3,0)
 ;;=3^Underweight
 ;;^UTILITY(U,$J,358.3,11213,1,4,0)
 ;;=4^R63.6
 ;;^UTILITY(U,$J,358.3,11213,2)
 ;;=^322007
 ;;^UTILITY(U,$J,358.3,11214,0)
 ;;=R07.9^^48^508^10
 ;;^UTILITY(U,$J,358.3,11214,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11214,1,3,0)
 ;;=3^Chest Pain,Unspec
 ;;^UTILITY(U,$J,358.3,11214,1,4,0)
 ;;=4^R07.9
 ;;^UTILITY(U,$J,358.3,11214,2)
 ;;=^5019201
 ;;^UTILITY(U,$J,358.3,11215,0)
 ;;=R10.9^^48^508^5
 ;;^UTILITY(U,$J,358.3,11215,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11215,1,3,0)
 ;;=3^Abdominal Pain,Unspec
 ;;^UTILITY(U,$J,358.3,11215,1,4,0)
 ;;=4^R10.9
 ;;^UTILITY(U,$J,358.3,11215,2)
 ;;=^5019230
 ;;^UTILITY(U,$J,358.3,11216,0)
 ;;=R10.11^^48^508^4
 ;;^UTILITY(U,$J,358.3,11216,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11216,1,3,0)
 ;;=3^Abdominal Pain,RUQ
 ;;^UTILITY(U,$J,358.3,11216,1,4,0)
 ;;=4^R10.11
 ;;^UTILITY(U,$J,358.3,11216,2)
 ;;=^5019206
 ;;^UTILITY(U,$J,358.3,11217,0)
 ;;=R10.12^^48^508^2
 ;;^UTILITY(U,$J,358.3,11217,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11217,1,3,0)
 ;;=3^Abdominal Pain,LUQ
 ;;^UTILITY(U,$J,358.3,11217,1,4,0)
 ;;=4^R10.12
 ;;^UTILITY(U,$J,358.3,11217,2)
 ;;=^5019207
 ;;^UTILITY(U,$J,358.3,11218,0)
 ;;=R10.13^^48^508^25
 ;;^UTILITY(U,$J,358.3,11218,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11218,1,3,0)
 ;;=3^Epigastric Pain
 ;;^UTILITY(U,$J,358.3,11218,1,4,0)
 ;;=4^R10.13
 ;;^UTILITY(U,$J,358.3,11218,2)
 ;;=^5019208
 ;;^UTILITY(U,$J,358.3,11219,0)
 ;;=R10.2^^48^508^35
 ;;^UTILITY(U,$J,358.3,11219,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11219,1,3,0)
 ;;=3^Pelvic and Perineal Pain
 ;;^UTILITY(U,$J,358.3,11219,1,4,0)
 ;;=4^R10.2
 ;;^UTILITY(U,$J,358.3,11219,2)
 ;;=^5019209
 ;;^UTILITY(U,$J,358.3,11220,0)
 ;;=R10.31^^48^508^3
 ;;^UTILITY(U,$J,358.3,11220,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11220,1,3,0)
 ;;=3^Abdominal Pain,RLQ
 ;;^UTILITY(U,$J,358.3,11220,1,4,0)
 ;;=4^R10.31
 ;;^UTILITY(U,$J,358.3,11220,2)
 ;;=^5019211
 ;;^UTILITY(U,$J,358.3,11221,0)
 ;;=R10.32^^48^508^1
 ;;^UTILITY(U,$J,358.3,11221,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11221,1,3,0)
 ;;=3^Abdominal Pain,LLQ
 ;;^UTILITY(U,$J,358.3,11221,1,4,0)
 ;;=4^R10.32
 ;;^UTILITY(U,$J,358.3,11221,2)
 ;;=^5019212
 ;;^UTILITY(U,$J,358.3,11222,0)
 ;;=R10.33^^48^508^36
 ;;^UTILITY(U,$J,358.3,11222,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11222,1,3,0)
 ;;=3^Periumbilical Pain
 ;;^UTILITY(U,$J,358.3,11222,1,4,0)
 ;;=4^R10.33
 ;;^UTILITY(U,$J,358.3,11222,2)
 ;;=^5019213
 ;;^UTILITY(U,$J,358.3,11223,0)
 ;;=R11.0^^48^508^33
 ;;^UTILITY(U,$J,358.3,11223,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11223,1,3,0)
 ;;=3^Nausea
 ;;^UTILITY(U,$J,358.3,11223,1,4,0)
 ;;=4^R11.0
 ;;^UTILITY(U,$J,358.3,11223,2)
 ;;=^5019231
 ;;^UTILITY(U,$J,358.3,11224,0)
 ;;=R11.11^^48^508^50
 ;;^UTILITY(U,$J,358.3,11224,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11224,1,3,0)
 ;;=3^Vomiting w/o Nausea
 ;;^UTILITY(U,$J,358.3,11224,1,4,0)
 ;;=4^R11.11
 ;;^UTILITY(U,$J,358.3,11224,2)
 ;;=^5019233
 ;;^UTILITY(U,$J,358.3,11225,0)
 ;;=R11.12^^48^508^40
 ;;^UTILITY(U,$J,358.3,11225,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11225,1,3,0)
 ;;=3^Projectile Vomiting
 ;;^UTILITY(U,$J,358.3,11225,1,4,0)
 ;;=4^R11.12
 ;;^UTILITY(U,$J,358.3,11225,2)
 ;;=^5019234
 ;;^UTILITY(U,$J,358.3,11226,0)
 ;;=R11.13^^48^508^49
 ;;^UTILITY(U,$J,358.3,11226,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11226,1,3,0)
 ;;=3^Vomiting of Fecal Matter
 ;;^UTILITY(U,$J,358.3,11226,1,4,0)
 ;;=4^R11.13
 ;;^UTILITY(U,$J,358.3,11226,2)
 ;;=^5019235
 ;;^UTILITY(U,$J,358.3,11227,0)
 ;;=R11.14^^48^508^9