IBDEI08O ; ; 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,21164,1,2,0)
;;=2^97602
;;^UTILITY(U,$J,358.3,21164,1,3,0)
;;=3^WOUND CARE, NON-SELECTIVE DEBRIDEMENT
;;^UTILITY(U,$J,358.3,21165,0)
;;=51701^^69^869^11^^^^1
;;^UTILITY(U,$J,358.3,21165,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21165,1,2,0)
;;=2^51701
;;^UTILITY(U,$J,358.3,21165,1,3,0)
;;=3^INSERT CATHETER FOR RESIDUAL URINE
;;^UTILITY(U,$J,358.3,21166,0)
;;=51702^^69^869^12^^^^1
;;^UTILITY(U,$J,358.3,21166,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21166,1,2,0)
;;=2^51702
;;^UTILITY(U,$J,358.3,21166,1,3,0)
;;=3^INSERT FOLEY CATH
;;^UTILITY(U,$J,358.3,21167,0)
;;=51798^^69^869^18^^^^1
;;^UTILITY(U,$J,358.3,21167,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21167,1,2,0)
;;=2^51798
;;^UTILITY(U,$J,358.3,21167,1,3,0)
;;=3^US FOR RESID URINE
;;^UTILITY(U,$J,358.3,21168,0)
;;=96360^^69^869^5^^^^1
;;^UTILITY(U,$J,358.3,21168,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21168,1,2,0)
;;=2^96360
;;^UTILITY(U,$J,358.3,21168,1,3,0)
;;=3^HYDRATION,IV,1ST HOUR
;;^UTILITY(U,$J,358.3,21169,0)
;;=96361^^69^869^6^^^^1
;;^UTILITY(U,$J,358.3,21169,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21169,1,2,0)
;;=2^96361
;;^UTILITY(U,$J,358.3,21169,1,3,0)
;;=3^HYDRATION,IV,EA ADDL HOUR
;;^UTILITY(U,$J,358.3,21170,0)
;;=96365^^69^869^9^^^^1
;;^UTILITY(U,$J,358.3,21170,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21170,1,2,0)
;;=2^96365
;;^UTILITY(U,$J,358.3,21170,1,3,0)
;;=3^INFUSION,IV UP TO 1 HOUR
;;^UTILITY(U,$J,358.3,21171,0)
;;=96366^^69^869^10^^^^1
;;^UTILITY(U,$J,358.3,21171,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21171,1,2,0)
;;=2^96366
;;^UTILITY(U,$J,358.3,21171,1,3,0)
;;=3^INFUSION,IV EA ADD HR
;;^UTILITY(U,$J,358.3,21172,0)
;;=36593^^69^869^2^^^^1
;;^UTILITY(U,$J,358.3,21172,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21172,1,2,0)
;;=2^36593
;;^UTILITY(U,$J,358.3,21172,1,3,0)
;;=3^DECLOT BY THROMBOLYTIC AGENT,VAD/CATH
;;^UTILITY(U,$J,358.3,21173,0)
;;=76937^^69^869^17^^^^1
;;^UTILITY(U,$J,358.3,21173,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21173,1,2,0)
;;=2^76937
;;^UTILITY(U,$J,358.3,21173,1,3,0)
;;=3^US GUIDANCE FOR VASCULAR ACCESS SITES
;;^UTILITY(U,$J,358.3,21174,0)
;;=96374^^69^869^7^^^^1
;;^UTILITY(U,$J,358.3,21174,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21174,1,2,0)
;;=2^96374
;;^UTILITY(U,$J,358.3,21174,1,3,0)
;;=3^IV PUSH,1ST HR
;;^UTILITY(U,$J,358.3,21175,0)
;;=96375^^69^869^8^^^^1
;;^UTILITY(U,$J,358.3,21175,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21175,1,2,0)
;;=2^96375
;;^UTILITY(U,$J,358.3,21175,1,3,0)
;;=3^IV PUSH,EA ADDL HR
;;^UTILITY(U,$J,358.3,21176,0)
;;=17000^^69^870^15^^^^1
;;^UTILITY(U,$J,358.3,21176,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21176,1,2,0)
;;=2^17000
;;^UTILITY(U,$J,358.3,21176,1,3,0)
;;=3^DESTR BEN LES, ANY METHOD, 1ST LES
;;^UTILITY(U,$J,358.3,21177,0)
;;=17003^^69^870^16^^^^1
;;^UTILITY(U,$J,358.3,21177,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21177,1,2,0)
;;=2^17003
;;^UTILITY(U,$J,358.3,21177,1,3,0)
;;=3^DESTR BEN LES, ANY METHOD,EA ADDL LES (2-14)
;;^UTILITY(U,$J,358.3,21178,0)
;;=17004^^69^870^17^^^^1
;;^UTILITY(U,$J,358.3,21178,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21178,1,2,0)
;;=2^17004
;;^UTILITY(U,$J,358.3,21178,1,3,0)
;;=3^DESTR BEN LES,15 OR MORE
;;^UTILITY(U,$J,358.3,21179,0)
;;=10060^^69^870^22^^^^1
;;^UTILITY(U,$J,358.3,21179,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21179,1,2,0)
;;=2^10060
;;^UTILITY(U,$J,358.3,21179,1,3,0)
;;=3^I&D ABSCESS
;;^UTILITY(U,$J,358.3,21180,0)
;;=10061^^69^870^23^^^^1
;;^UTILITY(U,$J,358.3,21180,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21180,1,2,0)
;;=2^10061
;;^UTILITY(U,$J,358.3,21180,1,3,0)
;;=3^I&D COMPLICATED ABSCESS
;;^UTILITY(U,$J,358.3,21181,0)
;;=12001^^69^870^40^^^^1
;;^UTILITY(U,$J,358.3,21181,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21181,1,2,0)
;;=2^12001
;;^UTILITY(U,$J,358.3,21181,1,3,0)
;;=3^SUTURE SIMPLE WOUND,TRUNK/EXT 2.5 CM OR <
;;^UTILITY(U,$J,358.3,21182,0)
;;=12002^^69^870^41^^^^1
;;^UTILITY(U,$J,358.3,21182,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21182,1,2,0)
;;=2^12002
;;^UTILITY(U,$J,358.3,21182,1,3,0)
;;=3^SUTURE SIMPLE WOUND,TRUNK/EXT 2.6-7.5 CM
;;^UTILITY(U,$J,358.3,21183,0)
;;=11042^^69^870^14^^^^1
;;^UTILITY(U,$J,358.3,21183,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21183,1,2,0)
;;=2^11042
;;^UTILITY(U,$J,358.3,21183,1,3,0)
;;=3^DEBRIDEMENT, SKIN & SUBCU. TISSUE,1ST 20SQ CM
;;^UTILITY(U,$J,358.3,21184,0)
;;=20550^^69^870^26^^^^1
;;^UTILITY(U,$J,358.3,21184,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21184,1,2,0)
;;=2^20550
;;^UTILITY(U,$J,358.3,21184,1,3,0)
;;=3^INJECTION,TENDON SHEATH,LIGAMENT,GANGLION CYST
;;^UTILITY(U,$J,358.3,21185,0)
;;=20551^^69^870^25^^^^1
;;^UTILITY(U,$J,358.3,21185,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21185,1,2,0)
;;=2^20551
;;^UTILITY(U,$J,358.3,21185,1,3,0)
;;=3^INJECTION,TENDON ORIGIN/INSERTION
;;^UTILITY(U,$J,358.3,21186,0)
;;=20552^^69^870^27^^^^1
;;^UTILITY(U,$J,358.3,21186,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21186,1,2,0)
;;=2^20552
;;^UTILITY(U,$J,358.3,21186,1,3,0)
;;=3^INJECTION,TRIGGER POINT, 1 OR 2 MUSCLE GROUPS
;;^UTILITY(U,$J,358.3,21187,0)
;;=20600^^69^870^10^^^^1
;;^UTILITY(U,$J,358.3,21187,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21187,1,2,0)
;;=2^20600
;;^UTILITY(U,$J,358.3,21187,1,3,0)
;;=3^ARTHROCENTESIS,SMALL JT W/O US GUIDANCE
;;^UTILITY(U,$J,358.3,21188,0)
;;=20605^^69^870^6^^^^1
;;^UTILITY(U,$J,358.3,21188,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21188,1,2,0)
;;=2^20605
;;^UTILITY(U,$J,358.3,21188,1,3,0)
;;=3^ARTHROCENTESIS,INTERMEDIATE JT W/O US GUIDANCE
;;^UTILITY(U,$J,358.3,21189,0)
;;=20610^^69^870^8^^^^1
;;^UTILITY(U,$J,358.3,21189,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21189,1,2,0)
;;=2^20610
;;^UTILITY(U,$J,358.3,21189,1,3,0)
;;=3^ARTHROCENTESIS,MAJOR JT W/O US GUIDANCE
;;^UTILITY(U,$J,358.3,21190,0)
;;=92950^^69^870^11^^^^1
;;^UTILITY(U,$J,358.3,21190,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21190,1,2,0)
;;=2^92950
;;^UTILITY(U,$J,358.3,21190,1,3,0)
;;=3^CPR
;;^UTILITY(U,$J,358.3,21191,0)
;;=11055^^69^870^46^^^^1
;;^UTILITY(U,$J,358.3,21191,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21191,1,2,0)
;;=2^11055
;;^UTILITY(U,$J,358.3,21191,1,3,0)
;;=3^TRIM CORN/CALLOUS, ONE
;;^UTILITY(U,$J,358.3,21192,0)
;;=11056^^69^870^44^^^^1
;;^UTILITY(U,$J,358.3,21192,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21192,1,2,0)
;;=2^11056
;;^UTILITY(U,$J,358.3,21192,1,3,0)
;;=3^TRIM CORN/CALLOUS, 2 TO 4
;;^UTILITY(U,$J,358.3,21193,0)
;;=11057^^69^870^45^^^^1
;;^UTILITY(U,$J,358.3,21193,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21193,1,2,0)
;;=2^11057
;;^UTILITY(U,$J,358.3,21193,1,3,0)
;;=3^TRIM CORN/CALLOUS, 5 OR MORE
;;^UTILITY(U,$J,358.3,21194,0)
;;=12011^^69^870^38^^^^1
;;^UTILITY(U,$J,358.3,21194,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21194,1,2,0)
;;=2^12011
;;^UTILITY(U,$J,358.3,21194,1,3,0)
;;=3^SUTURE SIMPLE WOUND,FACE,2.5 CM OR <
;;^UTILITY(U,$J,358.3,21195,0)
;;=97597^^69^870^12^^^^1
;;^UTILITY(U,$J,358.3,21195,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21195,1,2,0)
;;=2^97597
;;^UTILITY(U,$J,358.3,21195,1,3,0)
;;=3^DEBRIDEMENT OPEN WND 1ST 20SQ CM
;;^UTILITY(U,$J,358.3,21196,0)
;;=97598^^69^870^13^^^^1
;;^UTILITY(U,$J,358.3,21196,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21196,1,2,0)
;;=2^97598
;;^UTILITY(U,$J,358.3,21196,1,3,0)
;;=3^DEBRIDEMENT OPEN WND EA ADDL 20SQ CM
;;^UTILITY(U,$J,358.3,21197,0)
;;=11200^^69^870^35^^^^1
;;^UTILITY(U,$J,358.3,21197,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21197,1,2,0)
;;=2^11200
;;^UTILITY(U,$J,358.3,21197,1,3,0)
;;=3^REMOVAL SKIN TAGS,UP TO 15 LESIONS
;;^UTILITY(U,$J,358.3,21198,0)
;;=11201^^69^870^34^^^^1
;;^UTILITY(U,$J,358.3,21198,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21198,1,2,0)
;;=2^11201
;;^UTILITY(U,$J,358.3,21198,1,3,0)
;;=3^REMOVAL SKIN TAGS,EA ADDL 10 LESIONS
;;^UTILITY(U,$J,358.3,21199,0)
;;=10030^^69^870^24^^^^1
;;^UTILITY(U,$J,358.3,21199,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21199,1,2,0)
;;=2^10030
;;^UTILITY(U,$J,358.3,21199,1,3,0)
;;=3^IMAGE GUIDED COLLEC BY CATH,ABSCESS
;;^UTILITY(U,$J,358.3,21200,0)
;;=20604^^69^870^9^^^^1
;;^UTILITY(U,$J,358.3,21200,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21200,1,2,0)
;;=2^20604
;;^UTILITY(U,$J,358.3,21200,1,3,0)
;;=3^ARTHROCENTESIS,SMALL JT W/ US GUIDANCE
;;^UTILITY(U,$J,358.3,21201,0)
;;=20606^^69^870^5^^^^1
;;^UTILITY(U,$J,358.3,21201,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21201,1,2,0)
;;=2^20606
;;^UTILITY(U,$J,358.3,21201,1,3,0)
;;=3^ARTHROCENTESIS,INTERMEDIATE JT W/ US GUIDANCE
;;^UTILITY(U,$J,358.3,21202,0)
;;=20611^^69^870^7^^^^1
;;^UTILITY(U,$J,358.3,21202,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21202,1,2,0)
;;=2^20611
;;^UTILITY(U,$J,358.3,21202,1,3,0)
;;=3^ARTHROCENTESIS,MAJOR JT W/ US GUIDANCE
;;^UTILITY(U,$J,358.3,21203,0)
;;=10021^^69^870^20^^^^1
;;^UTILITY(U,$J,358.3,21203,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21203,1,2,0)
;;=2^10021
;;^UTILITY(U,$J,358.3,21203,1,3,0)
;;=3^FNA BX W/O GUIDANCE,1ST LESION
;;^UTILITY(U,$J,358.3,21204,0)
;;=11300^^69^870^36^^^^1
;;^UTILITY(U,$J,358.3,21204,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21204,1,2,0)
;;=2^11300
;;^UTILITY(U,$J,358.3,21204,1,3,0)
;;=3^SHAVE EPIDERMAL LESION,TRUNK/EXT,0.5 CM OR <
;;^UTILITY(U,$J,358.3,21205,0)
;;=11301^^69^870^37^^^^1
;;^UTILITY(U,$J,358.3,21205,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21205,1,2,0)
;;=2^11301
;;^UTILITY(U,$J,358.3,21205,1,3,0)
;;=3^SHAVE EPIDERMAL LESION,TRUNK/EXT,0.6-1.0 CM
;;^UTILITY(U,$J,358.3,21206,0)
;;=12013^^69^870^39^^^^1
;;^UTILITY(U,$J,358.3,21206,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21206,1,2,0)
;;=2^12013
;;^UTILITY(U,$J,358.3,21206,1,3,0)
;;=3^SUTURE SIMPLE WOUND,FACE,2.6-5.0 CM
;;^UTILITY(U,$J,358.3,21207,0)
;;=69209^^69^870^32^^^^1
;;^UTILITY(U,$J,358.3,21207,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21207,1,2,0)
;;=2^69209
;;^UTILITY(U,$J,358.3,21207,1,3,0)
;;=3^REMOVAL IMPACTED CERUMEN/IRRIGATE/LAVAGE
;;^UTILITY(U,$J,358.3,21208,0)
;;=69210^^69^870^33^^^^1
;;^UTILITY(U,$J,358.3,21208,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21208,1,2,0)
;;=2^69210
;;^UTILITY(U,$J,358.3,21208,1,3,0)
;;=3^REMOVAL IMPACTED CERUMEN/REQ INSTRUMENTS
;;^UTILITY(U,$J,358.3,21209,0)
;;=97810^^69^870^3^^^^1
;;^UTILITY(U,$J,358.3,21209,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21209,1,2,0)
;;=2^97810
;;^UTILITY(U,$J,358.3,21209,1,3,0)
;;=3^ACUPUNCTURE,1/+ NEEDLES W/O STIM,1ST 15 MIN
;;^UTILITY(U,$J,358.3,21210,0)
;;=97811^^69^870^4^^^^1
;;^UTILITY(U,$J,358.3,21210,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21210,1,2,0)
;;=2^97811
;;^UTILITY(U,$J,358.3,21210,1,3,0)
;;=3^ACUPUNCTURE,1/+ NEEDLES W/O STIM,EA ADDL 15 MIN
;;^UTILITY(U,$J,358.3,21211,0)
;;=97813^^69^870^1^^^^1
;;^UTILITY(U,$J,358.3,21211,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21211,1,2,0)
;;=2^97813
;;^UTILITY(U,$J,358.3,21211,1,3,0)
;;=3^ACUPUNCTURE,1/+ NEEDLES W/ STIM,1ST 15 MIN
;;^UTILITY(U,$J,358.3,21212,0)
;;=97814^^69^870^2^^^^1
;;^UTILITY(U,$J,358.3,21212,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21212,1,2,0)
;;=2^97814
;;^UTILITY(U,$J,358.3,21212,1,3,0)
;;=3^ACUPUNCTURE,1/+ NEEDLES W/ STIM,EA ADDL 15 MIN
;;^UTILITY(U,$J,358.3,21213,0)
;;=10004^^69^870^21^^^^1
;;^UTILITY(U,$J,358.3,21213,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21213,1,2,0)
;;=2^10004
;;^UTILITY(U,$J,358.3,21213,1,3,0)
;;=3^FNA BX W/O GUIDANCE,EA ADDL LESION
;;^UTILITY(U,$J,358.3,21214,0)
;;=11104^^69^870^30^^^^1
;;^UTILITY(U,$J,358.3,21214,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21214,1,2,0)
;;=2^11104
;;^UTILITY(U,$J,358.3,21214,1,3,0)
;;=3^PUNCH BX,SKIN,1ST LESION
;;^UTILITY(U,$J,358.3,21215,0)
;;=11105^^69^870^31^^^^1
;;^UTILITY(U,$J,358.3,21215,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21215,1,2,0)
;;=2^11105
;;^UTILITY(U,$J,358.3,21215,1,3,0)
;;=3^PUNCH BX,SKIN,EA ADDL LESION
;;^UTILITY(U,$J,358.3,21216,0)
;;=11102^^69^870^42^^^^1
;;^UTILITY(U,$J,358.3,21216,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21216,1,2,0)
;;=2^11102
;;^UTILITY(U,$J,358.3,21216,1,3,0)
;;=3^TANGENTIAL BX,SKIN,1ST LESION
;;^UTILITY(U,$J,358.3,21217,0)
;;=11103^^69^870^43^^^^1
;;^UTILITY(U,$J,358.3,21217,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21217,1,2,0)
;;=2^11103
;;^UTILITY(U,$J,358.3,21217,1,3,0)
;;=3^TANGENTIAL BX,SKIN,EA ADDL LESION
;;^UTILITY(U,$J,358.3,21218,0)
;;=17110^^69^870^18^^^^1
;;^UTILITY(U,$J,358.3,21218,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21218,1,2,0)
;;=2^17110
;;^UTILITY(U,$J,358.3,21218,1,3,0)
;;=3^DESTR LASER SURG,ELECTRO SURG,NOT SKIN TAGS,1-14
;;^UTILITY(U,$J,358.3,21219,0)
;;=17111^^69^870^19^^^^1
;;^UTILITY(U,$J,358.3,21219,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21219,1,2,0)
;;=2^17111
;;^UTILITY(U,$J,358.3,21219,1,3,0)
;;=3^DESTR LASER SURG,ELECTRO SURG,NOT SKIN TAGS,15+
;;^UTILITY(U,$J,358.3,21220,0)
;;=M0076^^69^870^29^^^^1
;;^UTILITY(U,$J,358.3,21220,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21220,1,2,0)
;;=2^M0076
;;^UTILITY(U,$J,358.3,21220,1,3,0)
;;=3^PROLOTHERAPY
;;^UTILITY(U,$J,358.3,21221,0)
;;=G9770^^69^870^28^^^^1
;;^UTILITY(U,$J,358.3,21221,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21221,1,2,0)
;;=2^G9770
;;^UTILITY(U,$J,358.3,21221,1,3,0)
;;=3^PERIPHERAL NERVE BLOCK
;;^UTILITY(U,$J,358.3,21222,0)
;;=29105^^69^871^2^^^^1
;;^UTILITY(U,$J,358.3,21222,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21222,1,2,0)
;;=2^29105
;;^UTILITY(U,$J,358.3,21222,1,3,0)
;;=3^LONG ARM SPLINT
;;^UTILITY(U,$J,358.3,21223,0)
;;=29125^^69^871^4^^^^1
;;^UTILITY(U,$J,358.3,21223,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21223,1,2,0)
;;=2^29125
;;^UTILITY(U,$J,358.3,21223,1,3,0)
;;=3^SHORT ARM SPLINT; STATIC
;;^UTILITY(U,$J,358.3,21224,0)
;;=29126^^69^871^3^^^^1
;;^UTILITY(U,$J,358.3,21224,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21224,1,2,0)
;;=2^29126
;;^UTILITY(U,$J,358.3,21224,1,3,0)
;;=3^SHORT ARM SPLINT; DYNAMIC
;;^UTILITY(U,$J,358.3,21225,0)
;;=29130^^69^871^1^^^^1
;;^UTILITY(U,$J,358.3,21225,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21225,1,2,0)
;;=2^29130
;;^UTILITY(U,$J,358.3,21225,1,3,0)
;;=3^FINGER SPLINT
;;^UTILITY(U,$J,358.3,21226,0)
;;=99078^^69^872^3^^^^1
;;^UTILITY(U,$J,358.3,21226,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21226,1,2,0)
;;=2^99078
;;^UTILITY(U,$J,358.3,21226,1,3,0)
;;=3^GROUP HEALTH EDUCATION
;;^UTILITY(U,$J,358.3,21227,0)
;;=G0109^^69^872^1^^^^1
;;^UTILITY(U,$J,358.3,21227,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21227,1,2,0)
;;=2^G0109
;;^UTILITY(U,$J,358.3,21227,1,3,0)
;;=3^DIAB MGMT TRN,GRP,EA 30MIN
;;^UTILITY(U,$J,358.3,21228,0)
;;=98960^^69^872^4^^^^1
;;^UTILITY(U,$J,358.3,21228,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21228,1,2,0)
;;=2^98960
;;^UTILITY(U,$J,358.3,21228,1,3,0)
;;=3^SELF-MGMT EDUC/TRAIN,1 PT,EA 30MIN
;;^UTILITY(U,$J,358.3,21229,0)
;;=98961^^69^872^5^^^^1
;;^UTILITY(U,$J,358.3,21229,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21229,1,2,0)
;;=2^98961
;;^UTILITY(U,$J,358.3,21229,1,3,0)
;;=3^SELF-MGMT EDUC/TRAIN,2-4 PT,EA 30MIN
;;^UTILITY(U,$J,358.3,21230,0)
;;=98962^^69^872^6^^^^1
;;^UTILITY(U,$J,358.3,21230,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21230,1,2,0)
;;=2^98962
;;^UTILITY(U,$J,358.3,21230,1,3,0)
;;=3^SELF-MGMT EDUC/TRAIN,5-8 PT,EA 30MIN
;;^UTILITY(U,$J,358.3,21231,0)
;;=G0108^^69^872^2^^^^1
;;^UTILITY(U,$J,358.3,21231,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21231,1,2,0)
;;=2^G0108
;;^UTILITY(U,$J,358.3,21231,1,3,0)
;;=3^DIAB MGMT TRN,INDIV,EA 30MIN
;;^UTILITY(U,$J,358.3,21232,0)
;;=95115^^69^873^1^^^^1
;;^UTILITY(U,$J,358.3,21232,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21232,1,2,0)
;;=2^95115
;;^UTILITY(U,$J,358.3,21232,1,3,0)
;;=3^ALLERGY SHOT,SINGLE
;;^UTILITY(U,$J,358.3,21233,0)
;;=95117^^69^873^2^^^^1
;;^UTILITY(U,$J,358.3,21233,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21233,1,2,0)
;;=2^95117
;;^UTILITY(U,$J,358.3,21233,1,3,0)
;;=3^ALLERGY SHOT,2 OR MORE
;;^UTILITY(U,$J,358.3,21234,0)
;;=93005^^69^874^1^^^^1
;;^UTILITY(U,$J,358.3,21234,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21234,1,2,0)
;;=2^93005
;;^UTILITY(U,$J,358.3,21234,1,3,0)
;;=3^EKG,TRACING ONLY,NO RPT
;;^UTILITY(U,$J,358.3,21235,0)
;;=99406^^69^875^3^^^^1
;;^UTILITY(U,$J,358.3,21235,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21235,1,2,0)
;;=2^99406
;;^UTILITY(U,$J,358.3,21235,1,3,0)
;;=3^BEHAV CHNG TOBACCO USE 3-10 MIN
;;^UTILITY(U,$J,358.3,21236,0)
;;=99407^^69^875^4^^^^1
;;^UTILITY(U,$J,358.3,21236,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21236,1,2,0)
;;=2^99407
;;^UTILITY(U,$J,358.3,21236,1,3,0)
;;=3^BEHAV CHNG TOBACCO USE > 10 MIN
;;^UTILITY(U,$J,358.3,21237,0)
;;=99408^^69^875^1^^^^1
;;^UTILITY(U,$J,358.3,21237,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21237,1,2,0)
;;=2^99408
;;^UTILITY(U,$J,358.3,21237,1,3,0)
;;=3^BEHAV CHNG ALC/SUBS ABUSE 15-30 MIN
;;^UTILITY(U,$J,358.3,21238,0)
;;=99409^^69^875^2^^^^1
;;^UTILITY(U,$J,358.3,21238,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21238,1,2,0)
;;=2^99409
;;^UTILITY(U,$J,358.3,21238,1,3,0)
;;=3^BEHAV CHNG ALC/SUBS ABUSE > 30 MIN
;;^UTILITY(U,$J,358.3,21239,0)
;;=96160^^69^876^2^^^^1
;;^UTILITY(U,$J,358.3,21239,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21239,1,2,0)
;;=2^96160
;;^UTILITY(U,$J,358.3,21239,1,3,0)
;;=3^HLTH RISK ASSMT,PATIENT-FOCUSED
;;^UTILITY(U,$J,358.3,21240,0)
;;=96161^^69^876^1^^^^1
;;^UTILITY(U,$J,358.3,21240,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21240,1,2,0)
;;=2^96161
;;^UTILITY(U,$J,358.3,21240,1,3,0)
;;=3^HLTH RISK ASSMT,CAREGIVER-FOCUSED
;;^UTILITY(U,$J,358.3,21241,0)
;;=G0101^^69^877^11^^^^1
;;^UTILITY(U,$J,358.3,21241,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21241,1,2,0)
;;=2^G0101
;;^UTILITY(U,$J,358.3,21241,1,3,0)
;;=3^PELVIC EXAM & CLIN BREAST SCRN
;;^UTILITY(U,$J,358.3,21242,0)
;;=Q0091^^69^877^10^^^^1
;;^UTILITY(U,$J,358.3,21242,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21242,1,2,0)
;;=2^Q0091
;;^UTILITY(U,$J,358.3,21242,1,3,0)
;;=3^PAP SMEAR
;;^UTILITY(U,$J,358.3,21243,0)
;;=Q0111^^69^877^14^^^^1
;;^UTILITY(U,$J,358.3,21243,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21243,1,2,0)
;;=2^Q0111
;;^UTILITY(U,$J,358.3,21243,1,3,0)
;;=3^WET MOUNTS/ W PREPARATIONS
;;^UTILITY(U,$J,358.3,21244,0)
;;=83986^^69^877^7^^^^1
;;^UTILITY(U,$J,358.3,21244,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21244,1,2,0)
;;=2^83986
;;^UTILITY(U,$J,358.3,21244,1,3,0)
;;=3^FEMEXAM PH & AMINES TEST CARD
;;^UTILITY(U,$J,358.3,21245,0)
;;=58100^^69^877^6^^^^1
;;^UTILITY(U,$J,358.3,21245,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21245,1,2,0)
;;=2^58100
;;^UTILITY(U,$J,358.3,21245,1,3,0)
;;=3^ENDOMETRIAL BIOPSY
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI08O 19784 printed Dec 13, 2024@01:43:49 Page 2
IBDEI08O ; ; 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,21164,1,2,0)
+2 ;;=2^97602
+3 ;;^UTILITY(U,$J,358.3,21164,1,3,0)
+4 ;;=3^WOUND CARE, NON-SELECTIVE DEBRIDEMENT
+5 ;;^UTILITY(U,$J,358.3,21165,0)
+6 ;;=51701^^69^869^11^^^^1
+7 ;;^UTILITY(U,$J,358.3,21165,1,0)
+8 ;;=^358.31IA^3^2
+9 ;;^UTILITY(U,$J,358.3,21165,1,2,0)
+10 ;;=2^51701
+11 ;;^UTILITY(U,$J,358.3,21165,1,3,0)
+12 ;;=3^INSERT CATHETER FOR RESIDUAL URINE
+13 ;;^UTILITY(U,$J,358.3,21166,0)
+14 ;;=51702^^69^869^12^^^^1
+15 ;;^UTILITY(U,$J,358.3,21166,1,0)
+16 ;;=^358.31IA^3^2
+17 ;;^UTILITY(U,$J,358.3,21166,1,2,0)
+18 ;;=2^51702
+19 ;;^UTILITY(U,$J,358.3,21166,1,3,0)
+20 ;;=3^INSERT FOLEY CATH
+21 ;;^UTILITY(U,$J,358.3,21167,0)
+22 ;;=51798^^69^869^18^^^^1
+23 ;;^UTILITY(U,$J,358.3,21167,1,0)
+24 ;;=^358.31IA^3^2
+25 ;;^UTILITY(U,$J,358.3,21167,1,2,0)
+26 ;;=2^51798
+27 ;;^UTILITY(U,$J,358.3,21167,1,3,0)
+28 ;;=3^US FOR RESID URINE
+29 ;;^UTILITY(U,$J,358.3,21168,0)
+30 ;;=96360^^69^869^5^^^^1
+31 ;;^UTILITY(U,$J,358.3,21168,1,0)
+32 ;;=^358.31IA^3^2
+33 ;;^UTILITY(U,$J,358.3,21168,1,2,0)
+34 ;;=2^96360
+35 ;;^UTILITY(U,$J,358.3,21168,1,3,0)
+36 ;;=3^HYDRATION,IV,1ST HOUR
+37 ;;^UTILITY(U,$J,358.3,21169,0)
+38 ;;=96361^^69^869^6^^^^1
+39 ;;^UTILITY(U,$J,358.3,21169,1,0)
+40 ;;=^358.31IA^3^2
+41 ;;^UTILITY(U,$J,358.3,21169,1,2,0)
+42 ;;=2^96361
+43 ;;^UTILITY(U,$J,358.3,21169,1,3,0)
+44 ;;=3^HYDRATION,IV,EA ADDL HOUR
+45 ;;^UTILITY(U,$J,358.3,21170,0)
+46 ;;=96365^^69^869^9^^^^1
+47 ;;^UTILITY(U,$J,358.3,21170,1,0)
+48 ;;=^358.31IA^3^2
+49 ;;^UTILITY(U,$J,358.3,21170,1,2,0)
+50 ;;=2^96365
+51 ;;^UTILITY(U,$J,358.3,21170,1,3,0)
+52 ;;=3^INFUSION,IV UP TO 1 HOUR
+53 ;;^UTILITY(U,$J,358.3,21171,0)
+54 ;;=96366^^69^869^10^^^^1
+55 ;;^UTILITY(U,$J,358.3,21171,1,0)
+56 ;;=^358.31IA^3^2
+57 ;;^UTILITY(U,$J,358.3,21171,1,2,0)
+58 ;;=2^96366
+59 ;;^UTILITY(U,$J,358.3,21171,1,3,0)
+60 ;;=3^INFUSION,IV EA ADD HR
+61 ;;^UTILITY(U,$J,358.3,21172,0)
+62 ;;=36593^^69^869^2^^^^1
+63 ;;^UTILITY(U,$J,358.3,21172,1,0)
+64 ;;=^358.31IA^3^2
+65 ;;^UTILITY(U,$J,358.3,21172,1,2,0)
+66 ;;=2^36593
+67 ;;^UTILITY(U,$J,358.3,21172,1,3,0)
+68 ;;=3^DECLOT BY THROMBOLYTIC AGENT,VAD/CATH
+69 ;;^UTILITY(U,$J,358.3,21173,0)
+70 ;;=76937^^69^869^17^^^^1
+71 ;;^UTILITY(U,$J,358.3,21173,1,0)
+72 ;;=^358.31IA^3^2
+73 ;;^UTILITY(U,$J,358.3,21173,1,2,0)
+74 ;;=2^76937
+75 ;;^UTILITY(U,$J,358.3,21173,1,3,0)
+76 ;;=3^US GUIDANCE FOR VASCULAR ACCESS SITES
+77 ;;^UTILITY(U,$J,358.3,21174,0)
+78 ;;=96374^^69^869^7^^^^1
+79 ;;^UTILITY(U,$J,358.3,21174,1,0)
+80 ;;=^358.31IA^3^2
+81 ;;^UTILITY(U,$J,358.3,21174,1,2,0)
+82 ;;=2^96374
+83 ;;^UTILITY(U,$J,358.3,21174,1,3,0)
+84 ;;=3^IV PUSH,1ST HR
+85 ;;^UTILITY(U,$J,358.3,21175,0)
+86 ;;=96375^^69^869^8^^^^1
+87 ;;^UTILITY(U,$J,358.3,21175,1,0)
+88 ;;=^358.31IA^3^2
+89 ;;^UTILITY(U,$J,358.3,21175,1,2,0)
+90 ;;=2^96375
+91 ;;^UTILITY(U,$J,358.3,21175,1,3,0)
+92 ;;=3^IV PUSH,EA ADDL HR
+93 ;;^UTILITY(U,$J,358.3,21176,0)
+94 ;;=17000^^69^870^15^^^^1
+95 ;;^UTILITY(U,$J,358.3,21176,1,0)
+96 ;;=^358.31IA^3^2
+97 ;;^UTILITY(U,$J,358.3,21176,1,2,0)
+98 ;;=2^17000
+99 ;;^UTILITY(U,$J,358.3,21176,1,3,0)
+100 ;;=3^DESTR BEN LES, ANY METHOD, 1ST LES
+101 ;;^UTILITY(U,$J,358.3,21177,0)
+102 ;;=17003^^69^870^16^^^^1
+103 ;;^UTILITY(U,$J,358.3,21177,1,0)
+104 ;;=^358.31IA^3^2
+105 ;;^UTILITY(U,$J,358.3,21177,1,2,0)
+106 ;;=2^17003
+107 ;;^UTILITY(U,$J,358.3,21177,1,3,0)
+108 ;;=3^DESTR BEN LES, ANY METHOD,EA ADDL LES (2-14)
+109 ;;^UTILITY(U,$J,358.3,21178,0)
+110 ;;=17004^^69^870^17^^^^1
+111 ;;^UTILITY(U,$J,358.3,21178,1,0)
+112 ;;=^358.31IA^3^2
+113 ;;^UTILITY(U,$J,358.3,21178,1,2,0)
+114 ;;=2^17004
+115 ;;^UTILITY(U,$J,358.3,21178,1,3,0)
+116 ;;=3^DESTR BEN LES,15 OR MORE
+117 ;;^UTILITY(U,$J,358.3,21179,0)
+118 ;;=10060^^69^870^22^^^^1
+119 ;;^UTILITY(U,$J,358.3,21179,1,0)
+120 ;;=^358.31IA^3^2
+121 ;;^UTILITY(U,$J,358.3,21179,1,2,0)
+122 ;;=2^10060
+123 ;;^UTILITY(U,$J,358.3,21179,1,3,0)
+124 ;;=3^I&D ABSCESS
+125 ;;^UTILITY(U,$J,358.3,21180,0)
+126 ;;=10061^^69^870^23^^^^1
+127 ;;^UTILITY(U,$J,358.3,21180,1,0)
+128 ;;=^358.31IA^3^2
+129 ;;^UTILITY(U,$J,358.3,21180,1,2,0)
+130 ;;=2^10061
+131 ;;^UTILITY(U,$J,358.3,21180,1,3,0)
+132 ;;=3^I&D COMPLICATED ABSCESS
+133 ;;^UTILITY(U,$J,358.3,21181,0)
+134 ;;=12001^^69^870^40^^^^1
+135 ;;^UTILITY(U,$J,358.3,21181,1,0)
+136 ;;=^358.31IA^3^2
+137 ;;^UTILITY(U,$J,358.3,21181,1,2,0)
+138 ;;=2^12001
+139 ;;^UTILITY(U,$J,358.3,21181,1,3,0)
+140 ;;=3^SUTURE SIMPLE WOUND,TRUNK/EXT 2.5 CM OR <
+141 ;;^UTILITY(U,$J,358.3,21182,0)
+142 ;;=12002^^69^870^41^^^^1
+143 ;;^UTILITY(U,$J,358.3,21182,1,0)
+144 ;;=^358.31IA^3^2
+145 ;;^UTILITY(U,$J,358.3,21182,1,2,0)
+146 ;;=2^12002
+147 ;;^UTILITY(U,$J,358.3,21182,1,3,0)
+148 ;;=3^SUTURE SIMPLE WOUND,TRUNK/EXT 2.6-7.5 CM
+149 ;;^UTILITY(U,$J,358.3,21183,0)
+150 ;;=11042^^69^870^14^^^^1
+151 ;;^UTILITY(U,$J,358.3,21183,1,0)
+152 ;;=^358.31IA^3^2
+153 ;;^UTILITY(U,$J,358.3,21183,1,2,0)
+154 ;;=2^11042
+155 ;;^UTILITY(U,$J,358.3,21183,1,3,0)
+156 ;;=3^DEBRIDEMENT, SKIN & SUBCU. TISSUE,1ST 20SQ CM
+157 ;;^UTILITY(U,$J,358.3,21184,0)
+158 ;;=20550^^69^870^26^^^^1
+159 ;;^UTILITY(U,$J,358.3,21184,1,0)
+160 ;;=^358.31IA^3^2
+161 ;;^UTILITY(U,$J,358.3,21184,1,2,0)
+162 ;;=2^20550
+163 ;;^UTILITY(U,$J,358.3,21184,1,3,0)
+164 ;;=3^INJECTION,TENDON SHEATH,LIGAMENT,GANGLION CYST
+165 ;;^UTILITY(U,$J,358.3,21185,0)
+166 ;;=20551^^69^870^25^^^^1
+167 ;;^UTILITY(U,$J,358.3,21185,1,0)
+168 ;;=^358.31IA^3^2
+169 ;;^UTILITY(U,$J,358.3,21185,1,2,0)
+170 ;;=2^20551
+171 ;;^UTILITY(U,$J,358.3,21185,1,3,0)
+172 ;;=3^INJECTION,TENDON ORIGIN/INSERTION
+173 ;;^UTILITY(U,$J,358.3,21186,0)
+174 ;;=20552^^69^870^27^^^^1
+175 ;;^UTILITY(U,$J,358.3,21186,1,0)
+176 ;;=^358.31IA^3^2
+177 ;;^UTILITY(U,$J,358.3,21186,1,2,0)
+178 ;;=2^20552
+179 ;;^UTILITY(U,$J,358.3,21186,1,3,0)
+180 ;;=3^INJECTION,TRIGGER POINT, 1 OR 2 MUSCLE GROUPS
+181 ;;^UTILITY(U,$J,358.3,21187,0)
+182 ;;=20600^^69^870^10^^^^1
+183 ;;^UTILITY(U,$J,358.3,21187,1,0)
+184 ;;=^358.31IA^3^2
+185 ;;^UTILITY(U,$J,358.3,21187,1,2,0)
+186 ;;=2^20600
+187 ;;^UTILITY(U,$J,358.3,21187,1,3,0)
+188 ;;=3^ARTHROCENTESIS,SMALL JT W/O US GUIDANCE
+189 ;;^UTILITY(U,$J,358.3,21188,0)
+190 ;;=20605^^69^870^6^^^^1
+191 ;;^UTILITY(U,$J,358.3,21188,1,0)
+192 ;;=^358.31IA^3^2
+193 ;;^UTILITY(U,$J,358.3,21188,1,2,0)
+194 ;;=2^20605
+195 ;;^UTILITY(U,$J,358.3,21188,1,3,0)
+196 ;;=3^ARTHROCENTESIS,INTERMEDIATE JT W/O US GUIDANCE
+197 ;;^UTILITY(U,$J,358.3,21189,0)
+198 ;;=20610^^69^870^8^^^^1
+199 ;;^UTILITY(U,$J,358.3,21189,1,0)
+200 ;;=^358.31IA^3^2
+201 ;;^UTILITY(U,$J,358.3,21189,1,2,0)
+202 ;;=2^20610
+203 ;;^UTILITY(U,$J,358.3,21189,1,3,0)
+204 ;;=3^ARTHROCENTESIS,MAJOR JT W/O US GUIDANCE
+205 ;;^UTILITY(U,$J,358.3,21190,0)
+206 ;;=92950^^69^870^11^^^^1
+207 ;;^UTILITY(U,$J,358.3,21190,1,0)
+208 ;;=^358.31IA^3^2
+209 ;;^UTILITY(U,$J,358.3,21190,1,2,0)
+210 ;;=2^92950
+211 ;;^UTILITY(U,$J,358.3,21190,1,3,0)
+212 ;;=3^CPR
+213 ;;^UTILITY(U,$J,358.3,21191,0)
+214 ;;=11055^^69^870^46^^^^1
+215 ;;^UTILITY(U,$J,358.3,21191,1,0)
+216 ;;=^358.31IA^3^2
+217 ;;^UTILITY(U,$J,358.3,21191,1,2,0)
+218 ;;=2^11055
+219 ;;^UTILITY(U,$J,358.3,21191,1,3,0)
+220 ;;=3^TRIM CORN/CALLOUS, ONE
+221 ;;^UTILITY(U,$J,358.3,21192,0)
+222 ;;=11056^^69^870^44^^^^1
+223 ;;^UTILITY(U,$J,358.3,21192,1,0)
+224 ;;=^358.31IA^3^2
+225 ;;^UTILITY(U,$J,358.3,21192,1,2,0)
+226 ;;=2^11056
+227 ;;^UTILITY(U,$J,358.3,21192,1,3,0)
+228 ;;=3^TRIM CORN/CALLOUS, 2 TO 4
+229 ;;^UTILITY(U,$J,358.3,21193,0)
+230 ;;=11057^^69^870^45^^^^1
+231 ;;^UTILITY(U,$J,358.3,21193,1,0)
+232 ;;=^358.31IA^3^2
+233 ;;^UTILITY(U,$J,358.3,21193,1,2,0)
+234 ;;=2^11057
+235 ;;^UTILITY(U,$J,358.3,21193,1,3,0)
+236 ;;=3^TRIM CORN/CALLOUS, 5 OR MORE
+237 ;;^UTILITY(U,$J,358.3,21194,0)
+238 ;;=12011^^69^870^38^^^^1
+239 ;;^UTILITY(U,$J,358.3,21194,1,0)
+240 ;;=^358.31IA^3^2
+241 ;;^UTILITY(U,$J,358.3,21194,1,2,0)
+242 ;;=2^12011
+243 ;;^UTILITY(U,$J,358.3,21194,1,3,0)
+244 ;;=3^SUTURE SIMPLE WOUND,FACE,2.5 CM OR <
+245 ;;^UTILITY(U,$J,358.3,21195,0)
+246 ;;=97597^^69^870^12^^^^1
+247 ;;^UTILITY(U,$J,358.3,21195,1,0)
+248 ;;=^358.31IA^3^2
+249 ;;^UTILITY(U,$J,358.3,21195,1,2,0)
+250 ;;=2^97597
+251 ;;^UTILITY(U,$J,358.3,21195,1,3,0)
+252 ;;=3^DEBRIDEMENT OPEN WND 1ST 20SQ CM
+253 ;;^UTILITY(U,$J,358.3,21196,0)
+254 ;;=97598^^69^870^13^^^^1
+255 ;;^UTILITY(U,$J,358.3,21196,1,0)
+256 ;;=^358.31IA^3^2
+257 ;;^UTILITY(U,$J,358.3,21196,1,2,0)
+258 ;;=2^97598
+259 ;;^UTILITY(U,$J,358.3,21196,1,3,0)
+260 ;;=3^DEBRIDEMENT OPEN WND EA ADDL 20SQ CM
+261 ;;^UTILITY(U,$J,358.3,21197,0)
+262 ;;=11200^^69^870^35^^^^1
+263 ;;^UTILITY(U,$J,358.3,21197,1,0)
+264 ;;=^358.31IA^3^2
+265 ;;^UTILITY(U,$J,358.3,21197,1,2,0)
+266 ;;=2^11200
+267 ;;^UTILITY(U,$J,358.3,21197,1,3,0)
+268 ;;=3^REMOVAL SKIN TAGS,UP TO 15 LESIONS
+269 ;;^UTILITY(U,$J,358.3,21198,0)
+270 ;;=11201^^69^870^34^^^^1
+271 ;;^UTILITY(U,$J,358.3,21198,1,0)
+272 ;;=^358.31IA^3^2
+273 ;;^UTILITY(U,$J,358.3,21198,1,2,0)
+274 ;;=2^11201
+275 ;;^UTILITY(U,$J,358.3,21198,1,3,0)
+276 ;;=3^REMOVAL SKIN TAGS,EA ADDL 10 LESIONS
+277 ;;^UTILITY(U,$J,358.3,21199,0)
+278 ;;=10030^^69^870^24^^^^1
+279 ;;^UTILITY(U,$J,358.3,21199,1,0)
+280 ;;=^358.31IA^3^2
+281 ;;^UTILITY(U,$J,358.3,21199,1,2,0)
+282 ;;=2^10030
+283 ;;^UTILITY(U,$J,358.3,21199,1,3,0)
+284 ;;=3^IMAGE GUIDED COLLEC BY CATH,ABSCESS
+285 ;;^UTILITY(U,$J,358.3,21200,0)
+286 ;;=20604^^69^870^9^^^^1
+287 ;;^UTILITY(U,$J,358.3,21200,1,0)
+288 ;;=^358.31IA^3^2
+289 ;;^UTILITY(U,$J,358.3,21200,1,2,0)
+290 ;;=2^20604
+291 ;;^UTILITY(U,$J,358.3,21200,1,3,0)
+292 ;;=3^ARTHROCENTESIS,SMALL JT W/ US GUIDANCE
+293 ;;^UTILITY(U,$J,358.3,21201,0)
+294 ;;=20606^^69^870^5^^^^1
+295 ;;^UTILITY(U,$J,358.3,21201,1,0)
+296 ;;=^358.31IA^3^2
+297 ;;^UTILITY(U,$J,358.3,21201,1,2,0)
+298 ;;=2^20606
+299 ;;^UTILITY(U,$J,358.3,21201,1,3,0)
+300 ;;=3^ARTHROCENTESIS,INTERMEDIATE JT W/ US GUIDANCE
+301 ;;^UTILITY(U,$J,358.3,21202,0)
+302 ;;=20611^^69^870^7^^^^1
+303 ;;^UTILITY(U,$J,358.3,21202,1,0)
+304 ;;=^358.31IA^3^2
+305 ;;^UTILITY(U,$J,358.3,21202,1,2,0)
+306 ;;=2^20611
+307 ;;^UTILITY(U,$J,358.3,21202,1,3,0)
+308 ;;=3^ARTHROCENTESIS,MAJOR JT W/ US GUIDANCE
+309 ;;^UTILITY(U,$J,358.3,21203,0)
+310 ;;=10021^^69^870^20^^^^1
+311 ;;^UTILITY(U,$J,358.3,21203,1,0)
+312 ;;=^358.31IA^3^2
+313 ;;^UTILITY(U,$J,358.3,21203,1,2,0)
+314 ;;=2^10021
+315 ;;^UTILITY(U,$J,358.3,21203,1,3,0)
+316 ;;=3^FNA BX W/O GUIDANCE,1ST LESION
+317 ;;^UTILITY(U,$J,358.3,21204,0)
+318 ;;=11300^^69^870^36^^^^1
+319 ;;^UTILITY(U,$J,358.3,21204,1,0)
+320 ;;=^358.31IA^3^2
+321 ;;^UTILITY(U,$J,358.3,21204,1,2,0)
+322 ;;=2^11300
+323 ;;^UTILITY(U,$J,358.3,21204,1,3,0)
+324 ;;=3^SHAVE EPIDERMAL LESION,TRUNK/EXT,0.5 CM OR <
+325 ;;^UTILITY(U,$J,358.3,21205,0)
+326 ;;=11301^^69^870^37^^^^1
+327 ;;^UTILITY(U,$J,358.3,21205,1,0)
+328 ;;=^358.31IA^3^2
+329 ;;^UTILITY(U,$J,358.3,21205,1,2,0)
+330 ;;=2^11301
+331 ;;^UTILITY(U,$J,358.3,21205,1,3,0)
+332 ;;=3^SHAVE EPIDERMAL LESION,TRUNK/EXT,0.6-1.0 CM
+333 ;;^UTILITY(U,$J,358.3,21206,0)
+334 ;;=12013^^69^870^39^^^^1
+335 ;;^UTILITY(U,$J,358.3,21206,1,0)
+336 ;;=^358.31IA^3^2
+337 ;;^UTILITY(U,$J,358.3,21206,1,2,0)
+338 ;;=2^12013
+339 ;;^UTILITY(U,$J,358.3,21206,1,3,0)
+340 ;;=3^SUTURE SIMPLE WOUND,FACE,2.6-5.0 CM
+341 ;;^UTILITY(U,$J,358.3,21207,0)
+342 ;;=69209^^69^870^32^^^^1
+343 ;;^UTILITY(U,$J,358.3,21207,1,0)
+344 ;;=^358.31IA^3^2
+345 ;;^UTILITY(U,$J,358.3,21207,1,2,0)
+346 ;;=2^69209
+347 ;;^UTILITY(U,$J,358.3,21207,1,3,0)
+348 ;;=3^REMOVAL IMPACTED CERUMEN/IRRIGATE/LAVAGE
+349 ;;^UTILITY(U,$J,358.3,21208,0)
+350 ;;=69210^^69^870^33^^^^1
+351 ;;^UTILITY(U,$J,358.3,21208,1,0)
+352 ;;=^358.31IA^3^2
+353 ;;^UTILITY(U,$J,358.3,21208,1,2,0)
+354 ;;=2^69210
+355 ;;^UTILITY(U,$J,358.3,21208,1,3,0)
+356 ;;=3^REMOVAL IMPACTED CERUMEN/REQ INSTRUMENTS
+357 ;;^UTILITY(U,$J,358.3,21209,0)
+358 ;;=97810^^69^870^3^^^^1
+359 ;;^UTILITY(U,$J,358.3,21209,1,0)
+360 ;;=^358.31IA^3^2
+361 ;;^UTILITY(U,$J,358.3,21209,1,2,0)
+362 ;;=2^97810
+363 ;;^UTILITY(U,$J,358.3,21209,1,3,0)
+364 ;;=3^ACUPUNCTURE,1/+ NEEDLES W/O STIM,1ST 15 MIN
+365 ;;^UTILITY(U,$J,358.3,21210,0)
+366 ;;=97811^^69^870^4^^^^1
+367 ;;^UTILITY(U,$J,358.3,21210,1,0)
+368 ;;=^358.31IA^3^2
+369 ;;^UTILITY(U,$J,358.3,21210,1,2,0)
+370 ;;=2^97811
+371 ;;^UTILITY(U,$J,358.3,21210,1,3,0)
+372 ;;=3^ACUPUNCTURE,1/+ NEEDLES W/O STIM,EA ADDL 15 MIN
+373 ;;^UTILITY(U,$J,358.3,21211,0)
+374 ;;=97813^^69^870^1^^^^1
+375 ;;^UTILITY(U,$J,358.3,21211,1,0)
+376 ;;=^358.31IA^3^2
+377 ;;^UTILITY(U,$J,358.3,21211,1,2,0)
+378 ;;=2^97813
+379 ;;^UTILITY(U,$J,358.3,21211,1,3,0)
+380 ;;=3^ACUPUNCTURE,1/+ NEEDLES W/ STIM,1ST 15 MIN
+381 ;;^UTILITY(U,$J,358.3,21212,0)
+382 ;;=97814^^69^870^2^^^^1
+383 ;;^UTILITY(U,$J,358.3,21212,1,0)
+384 ;;=^358.31IA^3^2
+385 ;;^UTILITY(U,$J,358.3,21212,1,2,0)
+386 ;;=2^97814
+387 ;;^UTILITY(U,$J,358.3,21212,1,3,0)
+388 ;;=3^ACUPUNCTURE,1/+ NEEDLES W/ STIM,EA ADDL 15 MIN
+389 ;;^UTILITY(U,$J,358.3,21213,0)
+390 ;;=10004^^69^870^21^^^^1
+391 ;;^UTILITY(U,$J,358.3,21213,1,0)
+392 ;;=^358.31IA^3^2
+393 ;;^UTILITY(U,$J,358.3,21213,1,2,0)
+394 ;;=2^10004
+395 ;;^UTILITY(U,$J,358.3,21213,1,3,0)
+396 ;;=3^FNA BX W/O GUIDANCE,EA ADDL LESION
+397 ;;^UTILITY(U,$J,358.3,21214,0)
+398 ;;=11104^^69^870^30^^^^1
+399 ;;^UTILITY(U,$J,358.3,21214,1,0)
+400 ;;=^358.31IA^3^2
+401 ;;^UTILITY(U,$J,358.3,21214,1,2,0)
+402 ;;=2^11104
+403 ;;^UTILITY(U,$J,358.3,21214,1,3,0)
+404 ;;=3^PUNCH BX,SKIN,1ST LESION
+405 ;;^UTILITY(U,$J,358.3,21215,0)
+406 ;;=11105^^69^870^31^^^^1
+407 ;;^UTILITY(U,$J,358.3,21215,1,0)
+408 ;;=^358.31IA^3^2
+409 ;;^UTILITY(U,$J,358.3,21215,1,2,0)
+410 ;;=2^11105
+411 ;;^UTILITY(U,$J,358.3,21215,1,3,0)
+412 ;;=3^PUNCH BX,SKIN,EA ADDL LESION
+413 ;;^UTILITY(U,$J,358.3,21216,0)
+414 ;;=11102^^69^870^42^^^^1
+415 ;;^UTILITY(U,$J,358.3,21216,1,0)
+416 ;;=^358.31IA^3^2
+417 ;;^UTILITY(U,$J,358.3,21216,1,2,0)
+418 ;;=2^11102
+419 ;;^UTILITY(U,$J,358.3,21216,1,3,0)
+420 ;;=3^TANGENTIAL BX,SKIN,1ST LESION
+421 ;;^UTILITY(U,$J,358.3,21217,0)
+422 ;;=11103^^69^870^43^^^^1
+423 ;;^UTILITY(U,$J,358.3,21217,1,0)
+424 ;;=^358.31IA^3^2
+425 ;;^UTILITY(U,$J,358.3,21217,1,2,0)
+426 ;;=2^11103
+427 ;;^UTILITY(U,$J,358.3,21217,1,3,0)
+428 ;;=3^TANGENTIAL BX,SKIN,EA ADDL LESION
+429 ;;^UTILITY(U,$J,358.3,21218,0)
+430 ;;=17110^^69^870^18^^^^1
+431 ;;^UTILITY(U,$J,358.3,21218,1,0)
+432 ;;=^358.31IA^3^2
+433 ;;^UTILITY(U,$J,358.3,21218,1,2,0)
+434 ;;=2^17110
+435 ;;^UTILITY(U,$J,358.3,21218,1,3,0)
+436 ;;=3^DESTR LASER SURG,ELECTRO SURG,NOT SKIN TAGS,1-14
+437 ;;^UTILITY(U,$J,358.3,21219,0)
+438 ;;=17111^^69^870^19^^^^1
+439 ;;^UTILITY(U,$J,358.3,21219,1,0)
+440 ;;=^358.31IA^3^2
+441 ;;^UTILITY(U,$J,358.3,21219,1,2,0)
+442 ;;=2^17111
+443 ;;^UTILITY(U,$J,358.3,21219,1,3,0)
+444 ;;=3^DESTR LASER SURG,ELECTRO SURG,NOT SKIN TAGS,15+
+445 ;;^UTILITY(U,$J,358.3,21220,0)
+446 ;;=M0076^^69^870^29^^^^1
+447 ;;^UTILITY(U,$J,358.3,21220,1,0)
+448 ;;=^358.31IA^3^2
+449 ;;^UTILITY(U,$J,358.3,21220,1,2,0)
+450 ;;=2^M0076
+451 ;;^UTILITY(U,$J,358.3,21220,1,3,0)
+452 ;;=3^PROLOTHERAPY
+453 ;;^UTILITY(U,$J,358.3,21221,0)
+454 ;;=G9770^^69^870^28^^^^1
+455 ;;^UTILITY(U,$J,358.3,21221,1,0)
+456 ;;=^358.31IA^3^2
+457 ;;^UTILITY(U,$J,358.3,21221,1,2,0)
+458 ;;=2^G9770
+459 ;;^UTILITY(U,$J,358.3,21221,1,3,0)
+460 ;;=3^PERIPHERAL NERVE BLOCK
+461 ;;^UTILITY(U,$J,358.3,21222,0)
+462 ;;=29105^^69^871^2^^^^1
+463 ;;^UTILITY(U,$J,358.3,21222,1,0)
+464 ;;=^358.31IA^3^2
+465 ;;^UTILITY(U,$J,358.3,21222,1,2,0)
+466 ;;=2^29105
+467 ;;^UTILITY(U,$J,358.3,21222,1,3,0)
+468 ;;=3^LONG ARM SPLINT
+469 ;;^UTILITY(U,$J,358.3,21223,0)
+470 ;;=29125^^69^871^4^^^^1
+471 ;;^UTILITY(U,$J,358.3,21223,1,0)
+472 ;;=^358.31IA^3^2
+473 ;;^UTILITY(U,$J,358.3,21223,1,2,0)
+474 ;;=2^29125
+475 ;;^UTILITY(U,$J,358.3,21223,1,3,0)
+476 ;;=3^SHORT ARM SPLINT; STATIC
+477 ;;^UTILITY(U,$J,358.3,21224,0)
+478 ;;=29126^^69^871^3^^^^1
+479 ;;^UTILITY(U,$J,358.3,21224,1,0)
+480 ;;=^358.31IA^3^2
+481 ;;^UTILITY(U,$J,358.3,21224,1,2,0)
+482 ;;=2^29126
+483 ;;^UTILITY(U,$J,358.3,21224,1,3,0)
+484 ;;=3^SHORT ARM SPLINT; DYNAMIC
+485 ;;^UTILITY(U,$J,358.3,21225,0)
+486 ;;=29130^^69^871^1^^^^1
+487 ;;^UTILITY(U,$J,358.3,21225,1,0)
+488 ;;=^358.31IA^3^2
+489 ;;^UTILITY(U,$J,358.3,21225,1,2,0)
+490 ;;=2^29130
+491 ;;^UTILITY(U,$J,358.3,21225,1,3,0)
+492 ;;=3^FINGER SPLINT
+493 ;;^UTILITY(U,$J,358.3,21226,0)
+494 ;;=99078^^69^872^3^^^^1
+495 ;;^UTILITY(U,$J,358.3,21226,1,0)
+496 ;;=^358.31IA^3^2
+497 ;;^UTILITY(U,$J,358.3,21226,1,2,0)
+498 ;;=2^99078
+499 ;;^UTILITY(U,$J,358.3,21226,1,3,0)
+500 ;;=3^GROUP HEALTH EDUCATION
+501 ;;^UTILITY(U,$J,358.3,21227,0)
+502 ;;=G0109^^69^872^1^^^^1
+503 ;;^UTILITY(U,$J,358.3,21227,1,0)
+504 ;;=^358.31IA^3^2
+505 ;;^UTILITY(U,$J,358.3,21227,1,2,0)
+506 ;;=2^G0109
+507 ;;^UTILITY(U,$J,358.3,21227,1,3,0)
+508 ;;=3^DIAB MGMT TRN,GRP,EA 30MIN
+509 ;;^UTILITY(U,$J,358.3,21228,0)
+510 ;;=98960^^69^872^4^^^^1
+511 ;;^UTILITY(U,$J,358.3,21228,1,0)
+512 ;;=^358.31IA^3^2
+513 ;;^UTILITY(U,$J,358.3,21228,1,2,0)
+514 ;;=2^98960
+515 ;;^UTILITY(U,$J,358.3,21228,1,3,0)
+516 ;;=3^SELF-MGMT EDUC/TRAIN,1 PT,EA 30MIN
+517 ;;^UTILITY(U,$J,358.3,21229,0)
+518 ;;=98961^^69^872^5^^^^1
+519 ;;^UTILITY(U,$J,358.3,21229,1,0)
+520 ;;=^358.31IA^3^2
+521 ;;^UTILITY(U,$J,358.3,21229,1,2,0)
+522 ;;=2^98961
+523 ;;^UTILITY(U,$J,358.3,21229,1,3,0)
+524 ;;=3^SELF-MGMT EDUC/TRAIN,2-4 PT,EA 30MIN
+525 ;;^UTILITY(U,$J,358.3,21230,0)
+526 ;;=98962^^69^872^6^^^^1
+527 ;;^UTILITY(U,$J,358.3,21230,1,0)
+528 ;;=^358.31IA^3^2
+529 ;;^UTILITY(U,$J,358.3,21230,1,2,0)
+530 ;;=2^98962
+531 ;;^UTILITY(U,$J,358.3,21230,1,3,0)
+532 ;;=3^SELF-MGMT EDUC/TRAIN,5-8 PT,EA 30MIN
+533 ;;^UTILITY(U,$J,358.3,21231,0)
+534 ;;=G0108^^69^872^2^^^^1
+535 ;;^UTILITY(U,$J,358.3,21231,1,0)
+536 ;;=^358.31IA^3^2
+537 ;;^UTILITY(U,$J,358.3,21231,1,2,0)
+538 ;;=2^G0108
+539 ;;^UTILITY(U,$J,358.3,21231,1,3,0)
+540 ;;=3^DIAB MGMT TRN,INDIV,EA 30MIN
+541 ;;^UTILITY(U,$J,358.3,21232,0)
+542 ;;=95115^^69^873^1^^^^1
+543 ;;^UTILITY(U,$J,358.3,21232,1,0)
+544 ;;=^358.31IA^3^2
+545 ;;^UTILITY(U,$J,358.3,21232,1,2,0)
+546 ;;=2^95115
+547 ;;^UTILITY(U,$J,358.3,21232,1,3,0)
+548 ;;=3^ALLERGY SHOT,SINGLE
+549 ;;^UTILITY(U,$J,358.3,21233,0)
+550 ;;=95117^^69^873^2^^^^1
+551 ;;^UTILITY(U,$J,358.3,21233,1,0)
+552 ;;=^358.31IA^3^2
+553 ;;^UTILITY(U,$J,358.3,21233,1,2,0)
+554 ;;=2^95117
+555 ;;^UTILITY(U,$J,358.3,21233,1,3,0)
+556 ;;=3^ALLERGY SHOT,2 OR MORE
+557 ;;^UTILITY(U,$J,358.3,21234,0)
+558 ;;=93005^^69^874^1^^^^1
+559 ;;^UTILITY(U,$J,358.3,21234,1,0)
+560 ;;=^358.31IA^3^2
+561 ;;^UTILITY(U,$J,358.3,21234,1,2,0)
+562 ;;=2^93005
+563 ;;^UTILITY(U,$J,358.3,21234,1,3,0)
+564 ;;=3^EKG,TRACING ONLY,NO RPT
+565 ;;^UTILITY(U,$J,358.3,21235,0)
+566 ;;=99406^^69^875^3^^^^1
+567 ;;^UTILITY(U,$J,358.3,21235,1,0)
+568 ;;=^358.31IA^3^2
+569 ;;^UTILITY(U,$J,358.3,21235,1,2,0)
+570 ;;=2^99406
+571 ;;^UTILITY(U,$J,358.3,21235,1,3,0)
+572 ;;=3^BEHAV CHNG TOBACCO USE 3-10 MIN
+573 ;;^UTILITY(U,$J,358.3,21236,0)
+574 ;;=99407^^69^875^4^^^^1
+575 ;;^UTILITY(U,$J,358.3,21236,1,0)
+576 ;;=^358.31IA^3^2
+577 ;;^UTILITY(U,$J,358.3,21236,1,2,0)
+578 ;;=2^99407
+579 ;;^UTILITY(U,$J,358.3,21236,1,3,0)
+580 ;;=3^BEHAV CHNG TOBACCO USE > 10 MIN
+581 ;;^UTILITY(U,$J,358.3,21237,0)
+582 ;;=99408^^69^875^1^^^^1
+583 ;;^UTILITY(U,$J,358.3,21237,1,0)
+584 ;;=^358.31IA^3^2
+585 ;;^UTILITY(U,$J,358.3,21237,1,2,0)
+586 ;;=2^99408
+587 ;;^UTILITY(U,$J,358.3,21237,1,3,0)
+588 ;;=3^BEHAV CHNG ALC/SUBS ABUSE 15-30 MIN
+589 ;;^UTILITY(U,$J,358.3,21238,0)
+590 ;;=99409^^69^875^2^^^^1
+591 ;;^UTILITY(U,$J,358.3,21238,1,0)
+592 ;;=^358.31IA^3^2
+593 ;;^UTILITY(U,$J,358.3,21238,1,2,0)
+594 ;;=2^99409
+595 ;;^UTILITY(U,$J,358.3,21238,1,3,0)
+596 ;;=3^BEHAV CHNG ALC/SUBS ABUSE > 30 MIN
+597 ;;^UTILITY(U,$J,358.3,21239,0)
+598 ;;=96160^^69^876^2^^^^1
+599 ;;^UTILITY(U,$J,358.3,21239,1,0)
+600 ;;=^358.31IA^3^2
+601 ;;^UTILITY(U,$J,358.3,21239,1,2,0)
+602 ;;=2^96160
+603 ;;^UTILITY(U,$J,358.3,21239,1,3,0)
+604 ;;=3^HLTH RISK ASSMT,PATIENT-FOCUSED
+605 ;;^UTILITY(U,$J,358.3,21240,0)
+606 ;;=96161^^69^876^1^^^^1
+607 ;;^UTILITY(U,$J,358.3,21240,1,0)
+608 ;;=^358.31IA^3^2
+609 ;;^UTILITY(U,$J,358.3,21240,1,2,0)
+610 ;;=2^96161
+611 ;;^UTILITY(U,$J,358.3,21240,1,3,0)
+612 ;;=3^HLTH RISK ASSMT,CAREGIVER-FOCUSED
+613 ;;^UTILITY(U,$J,358.3,21241,0)
+614 ;;=G0101^^69^877^11^^^^1
+615 ;;^UTILITY(U,$J,358.3,21241,1,0)
+616 ;;=^358.31IA^3^2
+617 ;;^UTILITY(U,$J,358.3,21241,1,2,0)
+618 ;;=2^G0101
+619 ;;^UTILITY(U,$J,358.3,21241,1,3,0)
+620 ;;=3^PELVIC EXAM & CLIN BREAST SCRN
+621 ;;^UTILITY(U,$J,358.3,21242,0)
+622 ;;=Q0091^^69^877^10^^^^1
+623 ;;^UTILITY(U,$J,358.3,21242,1,0)
+624 ;;=^358.31IA^3^2
+625 ;;^UTILITY(U,$J,358.3,21242,1,2,0)
+626 ;;=2^Q0091
+627 ;;^UTILITY(U,$J,358.3,21242,1,3,0)
+628 ;;=3^PAP SMEAR
+629 ;;^UTILITY(U,$J,358.3,21243,0)
+630 ;;=Q0111^^69^877^14^^^^1
+631 ;;^UTILITY(U,$J,358.3,21243,1,0)
+632 ;;=^358.31IA^3^2
+633 ;;^UTILITY(U,$J,358.3,21243,1,2,0)
+634 ;;=2^Q0111
+635 ;;^UTILITY(U,$J,358.3,21243,1,3,0)
+636 ;;=3^WET MOUNTS/ W PREPARATIONS
+637 ;;^UTILITY(U,$J,358.3,21244,0)
+638 ;;=83986^^69^877^7^^^^1
+639 ;;^UTILITY(U,$J,358.3,21244,1,0)
+640 ;;=^358.31IA^3^2
+641 ;;^UTILITY(U,$J,358.3,21244,1,2,0)
+642 ;;=2^83986
+643 ;;^UTILITY(U,$J,358.3,21244,1,3,0)
+644 ;;=3^FEMEXAM PH & AMINES TEST CARD
+645 ;;^UTILITY(U,$J,358.3,21245,0)
+646 ;;=58100^^69^877^6^^^^1
+647 ;;^UTILITY(U,$J,358.3,21245,1,0)
+648 ;;=^358.31IA^3^2
+649 ;;^UTILITY(U,$J,358.3,21245,1,2,0)
+650 ;;=2^58100
+651 ;;^UTILITY(U,$J,358.3,21245,1,3,0)
+652 ;;=3^ENDOMETRIAL BIOPSY