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

IBDEI07E.m

Go to the documentation of this file. 
  1. IBDEI07E ; ; 01-AUG-2022
  1.  ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
  1.  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
  1. Q Q
  1.  ;;^UTILITY(U,$J,358.3,18006,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18006,1,2,0)
  1.  ;;=2^59430
  1.  ;;^UTILITY(U,$J,358.3,18006,1,3,0)
  1.  ;;=3^POST PARTUM CARE ONLY
  1.  ;;^UTILITY(U,$J,358.3,18007,0)
  1.  ;;=99401^^60^725^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18007,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18007,1,2,0)
  1.  ;;=2^99401
  1.  ;;^UTILITY(U,$J,358.3,18007,1,3,0)
  1.  ;;=3^PREVENTIVE COUNSELING INDIV,15MIN
  1.  ;;^UTILITY(U,$J,358.3,18008,0)
  1.  ;;=99402^^60^725^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18008,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18008,1,2,0)
  1.  ;;=2^99402
  1.  ;;^UTILITY(U,$J,358.3,18008,1,3,0)
  1.  ;;=3^PREVENTIVE COUNSELING INDIV,30MIN
  1.  ;;^UTILITY(U,$J,358.3,18009,0)
  1.  ;;=99403^^60^725^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18009,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18009,1,2,0)
  1.  ;;=2^99403
  1.  ;;^UTILITY(U,$J,358.3,18009,1,3,0)
  1.  ;;=3^PREVENTIVE COUNSELING INDIV,45MIN
  1.  ;;^UTILITY(U,$J,358.3,18010,0)
  1.  ;;=99395^^60^726^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18010,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18010,1,2,0)
  1.  ;;=2^99395
  1.  ;;^UTILITY(U,$J,358.3,18010,1,3,0)
  1.  ;;=3^PREV VISIT EST AGE 18-39
  1.  ;;^UTILITY(U,$J,358.3,18011,0)
  1.  ;;=99396^^60^726^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18011,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18011,1,2,0)
  1.  ;;=2^99396
  1.  ;;^UTILITY(U,$J,358.3,18011,1,3,0)
  1.  ;;=3^PREV VISIT EST AGE 40-64
  1.  ;;^UTILITY(U,$J,358.3,18012,0)
  1.  ;;=99397^^60^726^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18012,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18012,1,2,0)
  1.  ;;=2^99397
  1.  ;;^UTILITY(U,$J,358.3,18012,1,3,0)
  1.  ;;=3^PREV VISIT EST 65 & OVER
  1.  ;;^UTILITY(U,$J,358.3,18013,0)
  1.  ;;=99385^^60^727^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18013,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18013,1,2,0)
  1.  ;;=2^99385
  1.  ;;^UTILITY(U,$J,358.3,18013,1,3,0)
  1.  ;;=3^PREV VISIT NEW AGE 18-39
  1.  ;;^UTILITY(U,$J,358.3,18014,0)
  1.  ;;=99386^^60^727^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18014,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18014,1,2,0)
  1.  ;;=2^99386
  1.  ;;^UTILITY(U,$J,358.3,18014,1,3,0)
  1.  ;;=3^PREV VISIT NEW AGE 40-64
  1.  ;;^UTILITY(U,$J,358.3,18015,0)
  1.  ;;=99387^^60^727^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18015,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18015,1,2,0)
  1.  ;;=2^99387
  1.  ;;^UTILITY(U,$J,358.3,18015,1,3,0)
  1.  ;;=3^PREV VISIT NEW 65 & OVER
  1.  ;;^UTILITY(U,$J,358.3,18016,0)
  1.  ;;=A4247^^60^728^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18016,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18016,1,2,0)
  1.  ;;=2^A4247
  1.  ;;^UTILITY(U,$J,358.3,18016,1,3,0)
  1.  ;;=3^BETADINE/IODINE SWABS/WIPES,BOX
  1.  ;;^UTILITY(U,$J,358.3,18017,0)
  1.  ;;=A4332^^60^728^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18017,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18017,1,2,0)
  1.  ;;=2^A4332
  1.  ;;^UTILITY(U,$J,358.3,18017,1,3,0)
  1.  ;;=3^LUBE STERILE PACKET
  1.  ;;^UTILITY(U,$J,358.3,18018,0)
  1.  ;;=A4208^^60^728^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18018,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18018,1,2,0)
  1.  ;;=2^A4208
  1.  ;;^UTILITY(U,$J,358.3,18018,1,3,0)
  1.  ;;=3^3 CC STERILE SYRINGE & NEEDLE
  1.  ;;^UTILITY(U,$J,358.3,18019,0)
  1.  ;;=99354^^60^729^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18019,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18019,1,2,0)
  1.  ;;=2^99354
  1.  ;;^UTILITY(U,$J,358.3,18019,1,3,0)
  1.  ;;=3^Prolng Svc Outpt/Obsv 30-74 min
  1.  ;;^UTILITY(U,$J,358.3,18020,0)
  1.  ;;=99355^^60^729^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18020,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18020,1,2,0)
  1.  ;;=2^99355
  1.  ;;^UTILITY(U,$J,358.3,18020,1,3,0)
  1.  ;;=3^Prolng Svc Outpt/Obsv,Ea Addl 30 min
  1.  ;;^UTILITY(U,$J,358.3,18021,0)
  1.  ;;=99356^^60^729^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18021,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18021,1,2,0)
  1.  ;;=2^99356
  1.  ;;^UTILITY(U,$J,358.3,18021,1,3,0)
  1.  ;;=3^Prolng Svc Inpt 30-74 min
  1.  ;;^UTILITY(U,$J,358.3,18022,0)
  1.  ;;=99357^^60^729^4^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18022,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18022,1,2,0)
  1.  ;;=2^99357
  1.  ;;^UTILITY(U,$J,358.3,18022,1,3,0)
  1.  ;;=3^Prolng Svc Inpt,Ea Addl 30 min
  1.  ;;^UTILITY(U,$J,358.3,18023,0)
  1.  ;;=99358^^60^729^5^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18023,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18023,1,2,0)
  1.  ;;=2^99358
  1.  ;;^UTILITY(U,$J,358.3,18023,1,3,0)
  1.  ;;=3^Prolng Svc w/o Pt 30-74 min
  1.  ;;^UTILITY(U,$J,358.3,18024,0)
  1.  ;;=99359^^60^729^6^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18024,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18024,1,2,0)
  1.  ;;=2^99359
  1.  ;;^UTILITY(U,$J,358.3,18024,1,3,0)
  1.  ;;=3^Prolng Svc w/o Pt,Ea Addl 30 min
  1.  ;;^UTILITY(U,$J,358.3,18025,0)
  1.  ;;=99415^^60^729^7^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18025,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18025,1,2,0)
  1.  ;;=2^99415
  1.  ;;^UTILITY(U,$J,358.3,18025,1,3,0)
  1.  ;;=3^Prolng Clin Staff Svc 45-74 min
  1.  ;;^UTILITY(U,$J,358.3,18026,0)
  1.  ;;=99416^^60^729^8^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18026,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18026,1,2,0)
  1.  ;;=2^99416
  1.  ;;^UTILITY(U,$J,358.3,18026,1,3,0)
  1.  ;;=3^Prolng Clin Staff Svc,Ea Addl 30 min
  1.  ;;^UTILITY(U,$J,358.3,18027,0)
  1.  ;;=99417^^60^729^9^^^^1
  1.  ;;^UTILITY(U,$J,358.3,18027,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,18027,1,2,0)
  1.  ;;=2^99417
  1.  ;;^UTILITY(U,$J,358.3,18027,1,3,0)
  1.  ;;=3^Prolng Clin Staff Svc,Ea 15 min;Only w/ 99205/99215
  1.  ;;^UTILITY(U,$J,358.3,18028,0)
  1.  ;;=99202^^61^730^1
  1.  ;;^UTILITY(U,$J,358.3,18028,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18028,1,1,0)
  1.  ;;=1^SF MDM or 15-29 mins
  1.  ;;^UTILITY(U,$J,358.3,18028,1,2,0)
  1.  ;;=2^99202
  1.  ;;^UTILITY(U,$J,358.3,18029,0)
  1.  ;;=99203^^61^730^2
  1.  ;;^UTILITY(U,$J,358.3,18029,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18029,1,1,0)
  1.  ;;=1^Low Complex MDM or 30-44 mins
  1.  ;;^UTILITY(U,$J,358.3,18029,1,2,0)
  1.  ;;=2^99203
  1.  ;;^UTILITY(U,$J,358.3,18030,0)
  1.  ;;=99204^^61^730^3
  1.  ;;^UTILITY(U,$J,358.3,18030,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18030,1,1,0)
  1.  ;;=1^Mod Complex MDM or 45-59 mins
  1.  ;;^UTILITY(U,$J,358.3,18030,1,2,0)
  1.  ;;=2^99204
  1.  ;;^UTILITY(U,$J,358.3,18031,0)
  1.  ;;=99205^^61^730^4
  1.  ;;^UTILITY(U,$J,358.3,18031,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18031,1,1,0)
  1.  ;;=1^High Complex MDM or 60-74 mins
  1.  ;;^UTILITY(U,$J,358.3,18031,1,2,0)
  1.  ;;=2^99205
  1.  ;;^UTILITY(U,$J,358.3,18032,0)
  1.  ;;=99211^^61^731^1
  1.  ;;^UTILITY(U,$J,358.3,18032,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18032,1,1,0)
  1.  ;;=1^Nurse Visit (no MD seen)
  1.  ;;^UTILITY(U,$J,358.3,18032,1,2,0)
  1.  ;;=2^99211
  1.  ;;^UTILITY(U,$J,358.3,18033,0)
  1.  ;;=99212^^61^731^2
  1.  ;;^UTILITY(U,$J,358.3,18033,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18033,1,1,0)
  1.  ;;=1^SF MDM or 10-19 mins
  1.  ;;^UTILITY(U,$J,358.3,18033,1,2,0)
  1.  ;;=2^99212
  1.  ;;^UTILITY(U,$J,358.3,18034,0)
  1.  ;;=99213^^61^731^3
  1.  ;;^UTILITY(U,$J,358.3,18034,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18034,1,1,0)
  1.  ;;=1^Low Complex MDM or 20-29 mins
  1.  ;;^UTILITY(U,$J,358.3,18034,1,2,0)
  1.  ;;=2^99213
  1.  ;;^UTILITY(U,$J,358.3,18035,0)
  1.  ;;=99214^^61^731^4
  1.  ;;^UTILITY(U,$J,358.3,18035,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18035,1,1,0)
  1.  ;;=1^Mod Complex MDM or 30-39 mins
  1.  ;;^UTILITY(U,$J,358.3,18035,1,2,0)
  1.  ;;=2^99214
  1.  ;;^UTILITY(U,$J,358.3,18036,0)
  1.  ;;=99215^^61^731^5
  1.  ;;^UTILITY(U,$J,358.3,18036,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18036,1,1,0)
  1.  ;;=1^High Complex MDM or 40-54 mins
  1.  ;;^UTILITY(U,$J,358.3,18036,1,2,0)
  1.  ;;=2^99215
  1.  ;;^UTILITY(U,$J,358.3,18037,0)
  1.  ;;=99024^^61^731^6
  1.  ;;^UTILITY(U,$J,358.3,18037,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18037,1,1,0)
  1.  ;;=1^Post Op Visit in Global
  1.  ;;^UTILITY(U,$J,358.3,18037,1,2,0)
  1.  ;;=2^99024
  1.  ;;^UTILITY(U,$J,358.3,18038,0)
  1.  ;;=99241^^61^732^1
  1.  ;;^UTILITY(U,$J,358.3,18038,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18038,1,1,0)
  1.  ;;=1^Prob Focused Exam
  1.  ;;^UTILITY(U,$J,358.3,18038,1,2,0)
  1.  ;;=2^99241
  1.  ;;^UTILITY(U,$J,358.3,18039,0)
  1.  ;;=99242^^61^732^2
  1.  ;;^UTILITY(U,$J,358.3,18039,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18039,1,1,0)
  1.  ;;=1^Exp Prob Focused Exam
  1.  ;;^UTILITY(U,$J,358.3,18039,1,2,0)
  1.  ;;=2^99242
  1.  ;;^UTILITY(U,$J,358.3,18040,0)
  1.  ;;=99243^^61^732^3
  1.  ;;^UTILITY(U,$J,358.3,18040,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18040,1,1,0)
  1.  ;;=1^Detailed Exam
  1.  ;;^UTILITY(U,$J,358.3,18040,1,2,0)
  1.  ;;=2^99243
  1.  ;;^UTILITY(U,$J,358.3,18041,0)
  1.  ;;=99244^^61^732^4
  1.  ;;^UTILITY(U,$J,358.3,18041,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18041,1,1,0)
  1.  ;;=1^Comprehensive,Moderate
  1.  ;;^UTILITY(U,$J,358.3,18041,1,2,0)
  1.  ;;=2^99244
  1.  ;;^UTILITY(U,$J,358.3,18042,0)
  1.  ;;=99245^^61^732^5
  1.  ;;^UTILITY(U,$J,358.3,18042,1,0)
  1.  ;;=^358.31IA^2^2
  1.  ;;^UTILITY(U,$J,358.3,18042,1,1,0)
  1.  ;;=1^Comprehensive,High
  1.  ;;^UTILITY(U,$J,358.3,18042,1,2,0)
  1.  ;;=2^99245
  1.  ;;^UTILITY(U,$J,358.3,18043,0)
  1.  ;;=O01.9^^62^733^15
  1.  ;;^UTILITY(U,$J,358.3,18043,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18043,1,3,0)
  1.  ;;=3^Hydatidiform mole, unspecified
  1.  ;;^UTILITY(U,$J,358.3,18043,1,4,0)
  1.  ;;=4^O01.9
  1.  ;;^UTILITY(U,$J,358.3,18043,2)
  1.  ;;=^5015977
  1.  ;;^UTILITY(U,$J,358.3,18044,0)
  1.  ;;=O02.81^^62^733^16
  1.  ;;^UTILITY(U,$J,358.3,18044,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18044,1,3,0)
  1.  ;;=3^Inapprop chg quantitav hCG in early pregnancy
  1.  ;;^UTILITY(U,$J,358.3,18044,1,4,0)
  1.  ;;=4^O02.81
  1.  ;;^UTILITY(U,$J,358.3,18044,2)
  1.  ;;=^340611
  1.  ;;^UTILITY(U,$J,358.3,18045,0)
  1.  ;;=O02.1^^62^733^17
  1.  ;;^UTILITY(U,$J,358.3,18045,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18045,1,3,0)
  1.  ;;=3^Missed abortion
  1.  ;;^UTILITY(U,$J,358.3,18045,1,4,0)
  1.  ;;=4^O02.1
  1.  ;;^UTILITY(U,$J,358.3,18045,2)
  1.  ;;=^1259
  1.  ;;^UTILITY(U,$J,358.3,18046,0)
  1.  ;;=O08.7^^62^733^56
  1.  ;;^UTILITY(U,$J,358.3,18046,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18046,1,3,0)
  1.  ;;=3^Venous comp following an ectopic and molar pregnancy NEC
  1.  ;;^UTILITY(U,$J,358.3,18046,1,4,0)
  1.  ;;=4^O08.7
  1.  ;;^UTILITY(U,$J,358.3,18046,2)
  1.  ;;=^5016042
  1.  ;;^UTILITY(U,$J,358.3,18047,0)
  1.  ;;=O08.81^^62^733^13
  1.  ;;^UTILITY(U,$J,358.3,18047,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18047,1,3,0)
  1.  ;;=3^Cardiac arrest following an ectopic and molar pregnancy
  1.  ;;^UTILITY(U,$J,358.3,18047,1,4,0)
  1.  ;;=4^O08.81
  1.  ;;^UTILITY(U,$J,358.3,18047,2)
  1.  ;;=^5016043
  1.  ;;^UTILITY(U,$J,358.3,18048,0)
  1.  ;;=O08.83^^62^733^55
  1.  ;;^UTILITY(U,$J,358.3,18048,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18048,1,3,0)
  1.  ;;=3^Urinary tract infection fol an ectopic and molar pregnancy
  1.  ;;^UTILITY(U,$J,358.3,18048,1,4,0)
  1.  ;;=4^O08.83
  1.  ;;^UTILITY(U,$J,358.3,18048,2)
  1.  ;;=^5016045
  1.  ;;^UTILITY(U,$J,358.3,18049,0)
  1.  ;;=O08.89^^62^733^14
  1.  ;;^UTILITY(U,$J,358.3,18049,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18049,1,3,0)
  1.  ;;=3^Complications following an ectopic and molar pregnancy NEC
  1.  ;;^UTILITY(U,$J,358.3,18049,1,4,0)
  1.  ;;=4^O08.89
  1.  ;;^UTILITY(U,$J,358.3,18049,2)
  1.  ;;=^5016046
  1.  ;;^UTILITY(U,$J,358.3,18050,0)
  1.  ;;=O20.0^^62^733^54
  1.  ;;^UTILITY(U,$J,358.3,18050,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18050,1,3,0)
  1.  ;;=3^Threatened abortion
  1.  ;;^UTILITY(U,$J,358.3,18050,1,4,0)
  1.  ;;=4^O20.0
  1.  ;;^UTILITY(U,$J,358.3,18050,2)
  1.  ;;=^1287
  1.  ;;^UTILITY(U,$J,358.3,18051,0)
  1.  ;;=O44.01^^62^733^21
  1.  ;;^UTILITY(U,$J,358.3,18051,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18051,1,3,0)
  1.  ;;=3^Placenta Previa,Complete w/o Hemorrhage,1st Trimester
  1.  ;;^UTILITY(U,$J,358.3,18051,1,4,0)
  1.  ;;=4^O44.01
  1.  ;;^UTILITY(U,$J,358.3,18051,2)
  1.  ;;=^5017437
  1.  ;;^UTILITY(U,$J,358.3,18052,0)
  1.  ;;=O44.02^^62^733^22
  1.  ;;^UTILITY(U,$J,358.3,18052,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18052,1,3,0)
  1.  ;;=3^Placenta Previa,Complete w/o Hemorrhage,2nd Trimester
  1.  ;;^UTILITY(U,$J,358.3,18052,1,4,0)
  1.  ;;=4^O44.02
  1.  ;;^UTILITY(U,$J,358.3,18052,2)
  1.  ;;=^5017438
  1.  ;;^UTILITY(U,$J,358.3,18053,0)
  1.  ;;=O44.03^^62^733^23
  1.  ;;^UTILITY(U,$J,358.3,18053,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18053,1,3,0)
  1.  ;;=3^Placenta Previa,Complete w/o Hemorrhage,3rd Trimester
  1.  ;;^UTILITY(U,$J,358.3,18053,1,4,0)
  1.  ;;=4^O44.03
  1.  ;;^UTILITY(U,$J,358.3,18053,2)
  1.  ;;=^5017439
  1.  ;;^UTILITY(U,$J,358.3,18054,0)
  1.  ;;=O44.11^^62^733^18
  1.  ;;^UTILITY(U,$J,358.3,18054,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18054,1,3,0)
  1.  ;;=3^Placenta Previa,Complete w/ Hemorrhage,1st Trimester
  1.  ;;^UTILITY(U,$J,358.3,18054,1,4,0)
  1.  ;;=4^O44.11
  1.  ;;^UTILITY(U,$J,358.3,18054,2)
  1.  ;;=^5017441
  1.  ;;^UTILITY(U,$J,358.3,18055,0)
  1.  ;;=O44.12^^62^733^19
  1.  ;;^UTILITY(U,$J,358.3,18055,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18055,1,3,0)
  1.  ;;=3^Placenta Previa,Complete w/ Hemorrhage,2nd Trimester
  1.  ;;^UTILITY(U,$J,358.3,18055,1,4,0)
  1.  ;;=4^O44.12
  1.  ;;^UTILITY(U,$J,358.3,18055,2)
  1.  ;;=^5017442
  1.  ;;^UTILITY(U,$J,358.3,18056,0)
  1.  ;;=O44.13^^62^733^20
  1.  ;;^UTILITY(U,$J,358.3,18056,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18056,1,3,0)
  1.  ;;=3^Placenta Previa,Complete w/ Hemorrhage,3rd Trimester
  1.  ;;^UTILITY(U,$J,358.3,18056,1,4,0)
  1.  ;;=4^O44.13
  1.  ;;^UTILITY(U,$J,358.3,18056,2)
  1.  ;;=^5017443
  1.  ;;^UTILITY(U,$J,358.3,18057,0)
  1.  ;;=O45.8X1^^62^733^48
  1.  ;;^UTILITY(U,$J,358.3,18057,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18057,1,3,0)
  1.  ;;=3^Prem separtn of placenta, first trimester NEC
  1.  ;;^UTILITY(U,$J,358.3,18057,1,4,0)
  1.  ;;=4^O45.8X1
  1.  ;;^UTILITY(U,$J,358.3,18057,2)
  1.  ;;=^5017459
  1.  ;;^UTILITY(U,$J,358.3,18058,0)
  1.  ;;=O45.8X2^^62^733^49
  1.  ;;^UTILITY(U,$J,358.3,18058,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18058,1,3,0)
  1.  ;;=3^Prem separtn of placenta, second trimester NEC
  1.  ;;^UTILITY(U,$J,358.3,18058,1,4,0)
  1.  ;;=4^O45.8X2
  1.  ;;^UTILITY(U,$J,358.3,18058,2)
  1.  ;;=^5017460
  1.  ;;^UTILITY(U,$J,358.3,18059,0)
  1.  ;;=O45.8X3^^62^733^50
  1.  ;;^UTILITY(U,$J,358.3,18059,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18059,1,3,0)
  1.  ;;=3^Prem separtn of placenta, third trimester NEC
  1.  ;;^UTILITY(U,$J,358.3,18059,1,4,0)
  1.  ;;=4^O45.8X3
  1.  ;;^UTILITY(U,$J,358.3,18059,2)
  1.  ;;=^5017461
  1.  ;;^UTILITY(U,$J,358.3,18060,0)
  1.  ;;=O45.91^^62^733^51
  1.  ;;^UTILITY(U,$J,358.3,18060,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18060,1,3,0)
  1.  ;;=3^Prem separtn of placenta, unsp, first trimester
  1.  ;;^UTILITY(U,$J,358.3,18060,1,4,0)
  1.  ;;=4^O45.91
  1.  ;;^UTILITY(U,$J,358.3,18060,2)
  1.  ;;=^5017464
  1.  ;;^UTILITY(U,$J,358.3,18061,0)
  1.  ;;=O45.92^^62^733^52
  1.  ;;^UTILITY(U,$J,358.3,18061,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18061,1,3,0)
  1.  ;;=3^Prem separtn of placenta, unsp, second trimester
  1.  ;;^UTILITY(U,$J,358.3,18061,1,4,0)
  1.  ;;=4^O45.92
  1.  ;;^UTILITY(U,$J,358.3,18061,2)
  1.  ;;=^5017465
  1.  ;;^UTILITY(U,$J,358.3,18062,0)
  1.  ;;=O45.93^^62^733^53
  1.  ;;^UTILITY(U,$J,358.3,18062,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18062,1,3,0)
  1.  ;;=3^Prem separtn of placenta, unsp, third trimester
  1.  ;;^UTILITY(U,$J,358.3,18062,1,4,0)
  1.  ;;=4^O45.93
  1.  ;;^UTILITY(U,$J,358.3,18062,2)
  1.  ;;=^5017466
  1.  ;;^UTILITY(U,$J,358.3,18063,0)
  1.  ;;=O45.001^^62^733^39
  1.  ;;^UTILITY(U,$J,358.3,18063,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18063,1,3,0)
  1.  ;;=3^Prem separtn of placenta w coag defect, unsp, first tri
  1.  ;;^UTILITY(U,$J,358.3,18063,1,4,0)
  1.  ;;=4^O45.001
  1.  ;;^UTILITY(U,$J,358.3,18063,2)
  1.  ;;=^5017444
  1.  ;;^UTILITY(U,$J,358.3,18064,0)
  1.  ;;=O45.002^^62^733^40
  1.  ;;^UTILITY(U,$J,358.3,18064,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18064,1,3,0)
  1.  ;;=3^Prem separtn of placenta w coag defect, unsp, second tri
  1.  ;;^UTILITY(U,$J,358.3,18064,1,4,0)
  1.  ;;=4^O45.002
  1.  ;;^UTILITY(U,$J,358.3,18064,2)
  1.  ;;=^5017445
  1.  ;;^UTILITY(U,$J,358.3,18065,0)
  1.  ;;=O45.003^^62^733^41
  1.  ;;^UTILITY(U,$J,358.3,18065,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18065,1,3,0)
  1.  ;;=3^Prem separtn of placenta w coag defect, unsp, third tri
  1.  ;;^UTILITY(U,$J,358.3,18065,1,4,0)
  1.  ;;=4^O45.003
  1.  ;;^UTILITY(U,$J,358.3,18065,2)
  1.  ;;=^5017446
  1.  ;;^UTILITY(U,$J,358.3,18066,0)
  1.  ;;=O45.011^^62^733^36
  1.  ;;^UTILITY(U,$J,358.3,18066,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18066,1,3,0)
  1.  ;;=3^Prem separtn of placenta w afibrinogenemia, first trimester
  1.  ;;^UTILITY(U,$J,358.3,18066,1,4,0)
  1.  ;;=4^O45.011
  1.  ;;^UTILITY(U,$J,358.3,18066,2)
  1.  ;;=^5017448
  1.  ;;^UTILITY(U,$J,358.3,18067,0)
  1.  ;;=O45.012^^62^733^37
  1.  ;;^UTILITY(U,$J,358.3,18067,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18067,1,3,0)
  1.  ;;=3^Prem separtn of placenta w afibrinogenemia, second trimester
  1.  ;;^UTILITY(U,$J,358.3,18067,1,4,0)
  1.  ;;=4^O45.012
  1.  ;;^UTILITY(U,$J,358.3,18067,2)
  1.  ;;=^5017449
  1.  ;;^UTILITY(U,$J,358.3,18068,0)
  1.  ;;=O45.013^^62^733^38
  1.  ;;^UTILITY(U,$J,358.3,18068,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18068,1,3,0)
  1.  ;;=3^Prem separtn of placenta w afibrinogenemia, third trimester
  1.  ;;^UTILITY(U,$J,358.3,18068,1,4,0)
  1.  ;;=4^O45.013
  1.  ;;^UTILITY(U,$J,358.3,18068,2)
  1.  ;;=^5017450
  1.  ;;^UTILITY(U,$J,358.3,18069,0)
  1.  ;;=O45.021^^62^733^42
  1.  ;;^UTILITY(U,$J,358.3,18069,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18069,1,3,0)
  1.  ;;=3^Prem separtn of placenta w dissem intravasc coag, first tri
  1.  ;;^UTILITY(U,$J,358.3,18069,1,4,0)
  1.  ;;=4^O45.021
  1.  ;;^UTILITY(U,$J,358.3,18069,2)
  1.  ;;=^5017452
  1.  ;;^UTILITY(U,$J,358.3,18070,0)
  1.  ;;=O45.022^^62^733^43
  1.  ;;^UTILITY(U,$J,358.3,18070,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18070,1,3,0)
  1.  ;;=3^Prem separtn of placenta w dissem intravasc coag, second tri
  1.  ;;^UTILITY(U,$J,358.3,18070,1,4,0)
  1.  ;;=4^O45.022
  1.  ;;^UTILITY(U,$J,358.3,18070,2)
  1.  ;;=^5017453
  1.  ;;^UTILITY(U,$J,358.3,18071,0)
  1.  ;;=O45.023^^62^733^44
  1.  ;;^UTILITY(U,$J,358.3,18071,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18071,1,3,0)
  1.  ;;=3^Prem separtn of placenta w dissem intravasc coag, third tri
  1.  ;;^UTILITY(U,$J,358.3,18071,1,4,0)
  1.  ;;=4^O45.023
  1.  ;;^UTILITY(U,$J,358.3,18071,2)
  1.  ;;=^5017454
  1.  ;;^UTILITY(U,$J,358.3,18072,0)
  1.  ;;=O45.091^^62^733^45
  1.  ;;^UTILITY(U,$J,358.3,18072,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18072,1,3,0)
  1.  ;;=3^Prem separtn of placenta w oth coag defect, first trimester
  1.  ;;^UTILITY(U,$J,358.3,18072,1,4,0)
  1.  ;;=4^O45.091
  1.  ;;^UTILITY(U,$J,358.3,18072,2)
  1.  ;;=^5017456
  1.  ;;^UTILITY(U,$J,358.3,18073,0)
  1.  ;;=O45.092^^62^733^46
  1.  ;;^UTILITY(U,$J,358.3,18073,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18073,1,3,0)
  1.  ;;=3^Prem separtn of placenta w oth coag defect, second trimester
  1.  ;;^UTILITY(U,$J,358.3,18073,1,4,0)
  1.  ;;=4^O45.092
  1.  ;;^UTILITY(U,$J,358.3,18073,2)
  1.  ;;=^5017457
  1.  ;;^UTILITY(U,$J,358.3,18074,0)
  1.  ;;=O45.093^^62^733^47
  1.  ;;^UTILITY(U,$J,358.3,18074,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18074,1,3,0)
  1.  ;;=3^Prem separtn of placenta w oth coag defect, third trimester
  1.  ;;^UTILITY(U,$J,358.3,18074,1,4,0)
  1.  ;;=4^O45.093
  1.  ;;^UTILITY(U,$J,358.3,18074,2)
  1.  ;;=^5017458
  1.  ;;^UTILITY(U,$J,358.3,18075,0)
  1.  ;;=O46.001^^62^733^4
  1.  ;;^UTILITY(U,$J,358.3,18075,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18075,1,3,0)
  1.  ;;=3^Antepartum hemorrhage w coag defect, unsp, first trimester
  1.  ;;^UTILITY(U,$J,358.3,18075,1,4,0)
  1.  ;;=4^O46.001
  1.  ;;^UTILITY(U,$J,358.3,18075,2)
  1.  ;;=^5017467
  1.  ;;^UTILITY(U,$J,358.3,18076,0)
  1.  ;;=O46.002^^62^733^5
  1.  ;;^UTILITY(U,$J,358.3,18076,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18076,1,3,0)
  1.  ;;=3^Antepartum hemorrhage w coag defect, unsp, second trimester
  1.  ;;^UTILITY(U,$J,358.3,18076,1,4,0)
  1.  ;;=4^O46.002
  1.  ;;^UTILITY(U,$J,358.3,18076,2)
  1.  ;;=^5017468
  1.  ;;^UTILITY(U,$J,358.3,18077,0)
  1.  ;;=O46.003^^62^733^6
  1.  ;;^UTILITY(U,$J,358.3,18077,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18077,1,3,0)
  1.  ;;=3^Antepartum hemorrhage w coag defect, unsp, third trimester
  1.  ;;^UTILITY(U,$J,358.3,18077,1,4,0)
  1.  ;;=4^O46.003
  1.  ;;^UTILITY(U,$J,358.3,18077,2)
  1.  ;;=^5017469
  1.  ;;^UTILITY(U,$J,358.3,18078,0)
  1.  ;;=O46.011^^62^733^1
  1.  ;;^UTILITY(U,$J,358.3,18078,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,18078,1,3,0)
  1.  ;;=3^Antepartum hemorrhage w afibrinogenemia, first trimester
  1.  ;;^UTILITY(U,$J,358.3,18078,1,4,0)
  1.  ;;=4^O46.011