IBDEI0BJ ; ; 01-AUG-2022
;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
Q:'DIFQR(358.5) 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.5)
;;=^IBE(358.5,
;;^UTILITY(U,$J,358.5,0)
;;=IMP/EXP DATA FIELD^358.5I^148^144
;;^UTILITY(U,$J,358.5,1,0)
;;=HEADER^1
;;^UTILITY(U,$J,358.5,1,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,1,2,1,0)
;;=NATIONAL EPILEPSY CENTER OF EXCELLENCE - TELEPHONE^^B^0^0
;;^UTILITY(U,$J,358.5,2,0)
;;=Patient name^2^1
;;^UTILITY(U,$J,358.5,2,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,2,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,3,0)
;;=SSN^2^2
;;^UTILITY(U,$J,358.5,3,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,3,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,4,0)
;;=Age^2^3
;;^UTILITY(U,$J,358.5,4,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,4,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,4,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,5,0)
;;=HEADER^5
;;^UTILITY(U,$J,358.5,5,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,5,2,1,0)
;;=NATIONAL PREVENTIVE HEALTH^^^0^0
;;^UTILITY(U,$J,358.5,6,0)
;;=Patient name^6^1
;;^UTILITY(U,$J,358.5,6,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,6,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,7,0)
;;=SSN^6^2
;;^UTILITY(U,$J,358.5,7,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,7,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,8,0)
;;=Age^6^3
;;^UTILITY(U,$J,358.5,8,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,8,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,8,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,9,0)
;;=HEADER^10
;;^UTILITY(U,$J,358.5,9,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,9,2,1,0)
;;=NATIONAL SLEEP MEDICINE^^^0^0
;;^UTILITY(U,$J,358.5,10,0)
;;=Patient name^11^1
;;^UTILITY(U,$J,358.5,10,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,10,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,11,0)
;;=SSN^11^2
;;^UTILITY(U,$J,358.5,11,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,11,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,12,0)
;;=Age^11^3
;;^UTILITY(U,$J,358.5,12,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,12,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,12,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,13,0)
;;=HEADER^16
;;^UTILITY(U,$J,358.5,13,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,13,2,1,0)
;;=NATIONAL ONCOLOGY/CHEMOTHERAPY INFUSION^^^0^0
;;^UTILITY(U,$J,358.5,14,0)
;;=Patient name^17^1
;;^UTILITY(U,$J,358.5,14,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,14,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,15,0)
;;=SSN^17^2
;;^UTILITY(U,$J,358.5,15,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,15,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,16,0)
;;=Age^17^3
;;^UTILITY(U,$J,358.5,16,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,16,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,16,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,17,0)
;;=HEADER^20
;;^UTILITY(U,$J,358.5,17,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,17,2,1,0)
;;=NATIONAL NEUROLOGY^^^0^0
;;^UTILITY(U,$J,358.5,18,0)
;;=Patient name^21^1
;;^UTILITY(U,$J,358.5,18,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,18,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,19,0)
;;=SSN^21^2
;;^UTILITY(U,$J,358.5,19,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,19,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,20,0)
;;=Age^21^3
;;^UTILITY(U,$J,358.5,20,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,20,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,20,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,21,0)
;;=HEADER^24
;;^UTILITY(U,$J,358.5,21,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,21,2,1,0)
;;=NATIONAL ADULT DAY HEALTH CARE VISIT-NURSE^^^0^0
;;^UTILITY(U,$J,358.5,22,0)
;;=Patient name^25^1
;;^UTILITY(U,$J,358.5,22,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,22,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,23,0)
;;=SSN^25^2
;;^UTILITY(U,$J,358.5,23,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,23,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,24,0)
;;=Age^25^3
;;^UTILITY(U,$J,358.5,24,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,24,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,24,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,25,0)
;;=HEADER^29
;;^UTILITY(U,$J,358.5,25,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,25,2,1,0)
;;=NATIONAL BLIND REHAB^^^0^0
;;^UTILITY(U,$J,358.5,26,0)
;;=Patient name^30^1
;;^UTILITY(U,$J,358.5,26,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,26,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,27,0)
;;=SSN^30^2
;;^UTILITY(U,$J,358.5,27,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,27,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,28,0)
;;=Age^30^3
;;^UTILITY(U,$J,358.5,28,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,28,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,28,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,29,0)
;;=HEADER^33
;;^UTILITY(U,$J,358.5,29,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,29,2,1,0)
;;=NATIONAL CARDIOLOGY^^^0^0
;;^UTILITY(U,$J,358.5,30,0)
;;=Patient name^34^1
;;^UTILITY(U,$J,358.5,30,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,30,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,31,0)
;;=SSN^34^2
;;^UTILITY(U,$J,358.5,31,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,31,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,32,0)
;;=Age^34^3
;;^UTILITY(U,$J,358.5,32,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,32,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,32,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,33,0)
;;=HEADER^39
;;^UTILITY(U,$J,358.5,33,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,33,2,1,0)
;;=NATIONAL CHIROPRACTIC^^^0^0
;;^UTILITY(U,$J,358.5,34,0)
;;=Patient name^40^1
;;^UTILITY(U,$J,358.5,34,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,34,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,35,0)
;;=SSN^40^2
;;^UTILITY(U,$J,358.5,35,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,35,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,36,0)
;;=Age^40^3
;;^UTILITY(U,$J,358.5,36,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,36,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,36,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,37,0)
;;=HEADER^43
;;^UTILITY(U,$J,358.5,37,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,37,2,1,0)
;;=NATIONAL CLINICAL PHARMACIST^^^0^0
;;^UTILITY(U,$J,358.5,38,0)
;;=Patient name^44^1
;;^UTILITY(U,$J,358.5,38,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,38,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,39,0)
;;=SSN^44^2
;;^UTILITY(U,$J,358.5,39,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,39,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,40,0)
;;=Age^44^3
;;^UTILITY(U,$J,358.5,40,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,40,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,40,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,41,0)
;;=Patient name^48^1
;;^UTILITY(U,$J,358.5,41,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,41,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,42,0)
;;=SSN^48^2
;;^UTILITY(U,$J,358.5,42,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,42,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,43,0)
;;=Age^48^3
;;^UTILITY(U,$J,358.5,43,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,43,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,43,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,44,0)
;;=HEADER^49
;;^UTILITY(U,$J,358.5,44,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,44,2,1,0)
;;=NATIONAL DIABETIC^^B^0^0
;;^UTILITY(U,$J,358.5,45,0)
;;=HEADER^54
;;^UTILITY(U,$J,358.5,45,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,45,2,1,0)
;;=NATIONAL EMERGENCY DEPARTMENT^^^0^0
;;^UTILITY(U,$J,358.5,46,0)
;;=Patient name^55^1
;;^UTILITY(U,$J,358.5,46,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,46,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,47,0)
;;=SSN^55^2
;;^UTILITY(U,$J,358.5,47,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,47,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,48,0)
;;=Age^55^3
;;^UTILITY(U,$J,358.5,48,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,48,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,48,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,49,0)
;;=HEADER^58
;;^UTILITY(U,$J,358.5,49,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,49,2,1,0)
;;=NATIONAL ENDOCRINOLOGY^^^0^0
;;^UTILITY(U,$J,358.5,50,0)
;;=Patient name^59^1
;;^UTILITY(U,$J,358.5,50,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,50,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,51,0)
;;=SSN^59^2
;;^UTILITY(U,$J,358.5,51,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,51,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,52,0)
;;=Age^59^3
;;^UTILITY(U,$J,358.5,52,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,52,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,52,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,53,0)
;;=HEADER^62
;;^UTILITY(U,$J,358.5,53,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,53,2,1,0)
;;=NATIONAL EYE TECHNICIAN^^^0^0
;;^UTILITY(U,$J,358.5,54,0)
;;=Patient name^63^1
;;^UTILITY(U,$J,358.5,54,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,54,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,55,0)
;;=SSN^63^2
;;^UTILITY(U,$J,358.5,55,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,55,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,56,0)
;;=Age^63^3
;;^UTILITY(U,$J,358.5,56,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,56,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,56,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,57,0)
;;=HEADER^66
;;^UTILITY(U,$J,358.5,57,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,57,2,1,0)
;;=NATIONAL EYE^^^0^0
;;^UTILITY(U,$J,358.5,58,0)
;;=Patient name^67^1
;;^UTILITY(U,$J,358.5,58,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,58,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,59,0)
;;=SSN^67^2
;;^UTILITY(U,$J,358.5,59,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,59,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,60,0)
;;=Age^67^3
;;^UTILITY(U,$J,358.5,60,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,60,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,60,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,61,0)
;;=HEADER^72
;;^UTILITY(U,$J,358.5,61,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,61,2,1,0)
;;=NATIONAL GI/HEPATOLOGY^^^0^0
;;^UTILITY(U,$J,358.5,62,0)
;;=Patient name^73^1
;;^UTILITY(U,$J,358.5,62,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,62,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,63,0)
;;=SSN^73^2
;;^UTILITY(U,$J,358.5,63,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,63,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,64,0)
;;=Age^73^3
;;^UTILITY(U,$J,358.5,64,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,64,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,64,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,65,0)
;;=HEADER^76
;;^UTILITY(U,$J,358.5,65,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,65,2,1,0)
;;=NATIONAL HBPC CLINICIAN^^^0^0
;;^UTILITY(U,$J,358.5,66,0)
;;=Patient name^77^1
;;^UTILITY(U,$J,358.5,66,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,66,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,67,0)
;;=SSN^77^2
;;^UTILITY(U,$J,358.5,67,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,67,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,68,0)
;;=Age^77^3
;;^UTILITY(U,$J,358.5,68,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,68,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,68,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,69,0)
;;=Patient name^81^1
;;^UTILITY(U,$J,358.5,69,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,69,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,70,0)
;;=SSN^81^2
;;^UTILITY(U,$J,358.5,70,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,70,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,71,0)
;;=Age^81^3
;;^UTILITY(U,$J,358.5,71,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,71,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,71,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,72,0)
;;=HEADER^83
;;^UTILITY(U,$J,358.5,72,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,72,2,1,0)
;;=NATIONAL HBPC NURSING^^^0^0
;;^UTILITY(U,$J,358.5,73,0)
;;=HEADER^86
;;^UTILITY(U,$J,358.5,73,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,73,2,1,0)
;;=NATIONAL HBPC - REHAB THERAPY^^^0^0
;;^UTILITY(U,$J,358.5,74,0)
;;=Patient name^87^1
;;^UTILITY(U,$J,358.5,74,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,74,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,75,0)
;;=SSN^87^2
;;^UTILITY(U,$J,358.5,75,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,75,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,76,0)
;;=Age^87^3
;;^UTILITY(U,$J,358.5,76,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,76,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,76,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,77,0)
;;=HEADER^90
;;^UTILITY(U,$J,358.5,77,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,77,2,1,0)
;;=NATIONAL INPATIENT^^^0^0
;;^UTILITY(U,$J,358.5,78,0)
;;=Patient name^91^1
;;^UTILITY(U,$J,358.5,78,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,78,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,79,0)
;;=SSN^91^2
;;^UTILITY(U,$J,358.5,79,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,79,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,80,0)
;;=Age^91^3
;;^UTILITY(U,$J,358.5,80,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,80,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,80,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,81,0)
;;=HEADER^95
;;^UTILITY(U,$J,358.5,81,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,81,2,1,0)
;;=NATIONAL MEDICINE^^^0^0
;;^UTILITY(U,$J,358.5,82,0)
;;=Patient name^96^1
;;^UTILITY(U,$J,358.5,82,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,82,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,83,0)
;;=SSN^96^2
;;^UTILITY(U,$J,358.5,83,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,83,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,84,0)
;;=Age^96^3
;;^UTILITY(U,$J,358.5,84,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,84,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,84,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,85,0)
;;=HEADER^99
;;^UTILITY(U,$J,358.5,85,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,85,2,1,0)
;;=NATIONAL NURSING CLINIC ^^^0^0
;;^UTILITY(U,$J,358.5,86,0)
;;=Patient name^100^1
;;^UTILITY(U,$J,358.5,86,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,86,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,87,0)
;;=SSN^100^2
;;^UTILITY(U,$J,358.5,87,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,87,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,88,0)
;;=Age^100^3
;;^UTILITY(U,$J,358.5,88,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,88,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,88,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,89,0)
;;=Patient name^105^1
;;^UTILITY(U,$J,358.5,89,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,89,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,90,0)
;;=SSN^105^2
;;^UTILITY(U,$J,358.5,90,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,90,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,91,0)
;;=Age^105^3
;;^UTILITY(U,$J,358.5,91,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,91,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,91,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,92,0)
;;=HEADER^106
;;^UTILITY(U,$J,358.5,92,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,92,2,1,0)
;;=NATIONAL GYNECOLOGY/OBSTETRICS^^^0^0
;;^UTILITY(U,$J,358.5,93,0)
;;=HEADER^111
;;^UTILITY(U,$J,358.5,93,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,93,2,1,0)
;;=NATIONAL INPATIENT REHAB PHYSIATRY^^^0^0
;;^UTILITY(U,$J,358.5,94,0)
;;=Patient name^112^1
;;^UTILITY(U,$J,358.5,94,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,94,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,95,0)
;;=SSN^112^2
;;^UTILITY(U,$J,358.5,95,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,95,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,96,0)
;;=Age^112^3
;;^UTILITY(U,$J,358.5,96,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,96,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,96,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,97,0)
;;=HEADER^115
;;^UTILITY(U,$J,358.5,97,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,97,2,1,0)
;;=NATIONAL REHAB PHYSIATRY^^^0^0
;;^UTILITY(U,$J,358.5,98,0)
;;=Patient name^116^1
;;^UTILITY(U,$J,358.5,98,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,98,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,99,0)
;;=SSN^116^2
;;^UTILITY(U,$J,358.5,99,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,99,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,100,0)
;;=Age^116^3
;;^UTILITY(U,$J,358.5,100,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,100,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,100,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,101,0)
;;=HEADER^119
;;^UTILITY(U,$J,358.5,101,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,101,2,1,0)
;;=NATIONAL PRIMARY CARE^^^0^0
;;^UTILITY(U,$J,358.5,102,0)
;;=Patient name^120^1
;;^UTILITY(U,$J,358.5,102,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,102,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,103,0)
;;=SSN^120^2
;;^UTILITY(U,$J,358.5,103,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,103,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,104,0)
;;=Age^120^3
;;^UTILITY(U,$J,358.5,104,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,104,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,104,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,105,0)
;;=HEADER^126
;;^UTILITY(U,$J,358.5,105,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,105,2,1,0)
;;=NATIONAL PULMONARY^^^0^0
;;^UTILITY(U,$J,358.5,106,0)
;;=Patient name^127^1
;;^UTILITY(U,$J,358.5,106,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,106,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,107,0)
;;=SSN^127^2
;;^UTILITY(U,$J,358.5,107,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,107,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,108,0)
;;=Age^127^3
;;^UTILITY(U,$J,358.5,108,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,108,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
;;^UTILITY(U,$J,358.5,108,2,2,0)
;;=Age:^^^78^1^1^83^3^2
;;^UTILITY(U,$J,358.5,109,0)
;;=HEADER^129
;;^UTILITY(U,$J,358.5,109,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,109,2,1,0)
;;=NATIONAL SPINAL CORD INJURY^^^0^0
;;^UTILITY(U,$J,358.5,110,0)
;;=Patient name^130^1
;;^UTILITY(U,$J,358.5,110,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,110,2,1,0)
;;=Name:^^^1^1^1^7^30^1
;;^UTILITY(U,$J,358.5,111,0)
;;=SSN^130^2
;;^UTILITY(U,$J,358.5,111,2,0)
;;=^358.52^1^1
;;^UTILITY(U,$J,358.5,111,2,1,0)
;;=SSN:^^^39^1^1^44^15^1
;;^UTILITY(U,$J,358.5,112,0)
;;=Age^130^3
;;^UTILITY(U,$J,358.5,112,2,0)
;;=^358.52^2^2
;;^UTILITY(U,$J,358.5,112,2,1,0)
;;=DOB:^^^60^1^1^65^12^1
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0BJ 19795 printed Dec 13, 2024@01:45:26 Page 2
IBDEI0BJ ; ; 01-AUG-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
+2 if 'DIFQR(358.5)
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.5)
+2 ;;=^IBE(358.5,
+3 ;;^UTILITY(U,$J,358.5,0)
+4 ;;=IMP/EXP DATA FIELD^358.5I^148^144
+5 ;;^UTILITY(U,$J,358.5,1,0)
+6 ;;=HEADER^1
+7 ;;^UTILITY(U,$J,358.5,1,2,0)
+8 ;;=^358.52^1^1
+9 ;;^UTILITY(U,$J,358.5,1,2,1,0)
+10 ;;=NATIONAL EPILEPSY CENTER OF EXCELLENCE - TELEPHONE^^B^0^0
+11 ;;^UTILITY(U,$J,358.5,2,0)
+12 ;;=Patient name^2^1
+13 ;;^UTILITY(U,$J,358.5,2,2,0)
+14 ;;=^358.52^1^1
+15 ;;^UTILITY(U,$J,358.5,2,2,1,0)
+16 ;;=Name:^^^1^1^1^7^30^1
+17 ;;^UTILITY(U,$J,358.5,3,0)
+18 ;;=SSN^2^2
+19 ;;^UTILITY(U,$J,358.5,3,2,0)
+20 ;;=^358.52^1^1
+21 ;;^UTILITY(U,$J,358.5,3,2,1,0)
+22 ;;=SSN:^^^39^1^1^44^15^1
+23 ;;^UTILITY(U,$J,358.5,4,0)
+24 ;;=Age^2^3
+25 ;;^UTILITY(U,$J,358.5,4,2,0)
+26 ;;=^358.52^2^2
+27 ;;^UTILITY(U,$J,358.5,4,2,1,0)
+28 ;;=DOB:^^^60^1^1^65^12^1
+29 ;;^UTILITY(U,$J,358.5,4,2,2,0)
+30 ;;=Age:^^^78^1^1^83^3^2
+31 ;;^UTILITY(U,$J,358.5,5,0)
+32 ;;=HEADER^5
+33 ;;^UTILITY(U,$J,358.5,5,2,0)
+34 ;;=^358.52^1^1
+35 ;;^UTILITY(U,$J,358.5,5,2,1,0)
+36 ;;=NATIONAL PREVENTIVE HEALTH^^^0^0
+37 ;;^UTILITY(U,$J,358.5,6,0)
+38 ;;=Patient name^6^1
+39 ;;^UTILITY(U,$J,358.5,6,2,0)
+40 ;;=^358.52^1^1
+41 ;;^UTILITY(U,$J,358.5,6,2,1,0)
+42 ;;=Name:^^^1^1^1^7^30^1
+43 ;;^UTILITY(U,$J,358.5,7,0)
+44 ;;=SSN^6^2
+45 ;;^UTILITY(U,$J,358.5,7,2,0)
+46 ;;=^358.52^1^1
+47 ;;^UTILITY(U,$J,358.5,7,2,1,0)
+48 ;;=SSN:^^^39^1^1^44^15^1
+49 ;;^UTILITY(U,$J,358.5,8,0)
+50 ;;=Age^6^3
+51 ;;^UTILITY(U,$J,358.5,8,2,0)
+52 ;;=^358.52^2^2
+53 ;;^UTILITY(U,$J,358.5,8,2,1,0)
+54 ;;=DOB:^^^60^1^1^65^12^1
+55 ;;^UTILITY(U,$J,358.5,8,2,2,0)
+56 ;;=Age:^^^78^1^1^83^3^2
+57 ;;^UTILITY(U,$J,358.5,9,0)
+58 ;;=HEADER^10
+59 ;;^UTILITY(U,$J,358.5,9,2,0)
+60 ;;=^358.52^1^1
+61 ;;^UTILITY(U,$J,358.5,9,2,1,0)
+62 ;;=NATIONAL SLEEP MEDICINE^^^0^0
+63 ;;^UTILITY(U,$J,358.5,10,0)
+64 ;;=Patient name^11^1
+65 ;;^UTILITY(U,$J,358.5,10,2,0)
+66 ;;=^358.52^1^1
+67 ;;^UTILITY(U,$J,358.5,10,2,1,0)
+68 ;;=Name:^^^1^1^1^7^30^1
+69 ;;^UTILITY(U,$J,358.5,11,0)
+70 ;;=SSN^11^2
+71 ;;^UTILITY(U,$J,358.5,11,2,0)
+72 ;;=^358.52^1^1
+73 ;;^UTILITY(U,$J,358.5,11,2,1,0)
+74 ;;=SSN:^^^39^1^1^44^15^1
+75 ;;^UTILITY(U,$J,358.5,12,0)
+76 ;;=Age^11^3
+77 ;;^UTILITY(U,$J,358.5,12,2,0)
+78 ;;=^358.52^2^2
+79 ;;^UTILITY(U,$J,358.5,12,2,1,0)
+80 ;;=DOB:^^^60^1^1^65^12^1
+81 ;;^UTILITY(U,$J,358.5,12,2,2,0)
+82 ;;=Age:^^^78^1^1^83^3^2
+83 ;;^UTILITY(U,$J,358.5,13,0)
+84 ;;=HEADER^16
+85 ;;^UTILITY(U,$J,358.5,13,2,0)
+86 ;;=^358.52^1^1
+87 ;;^UTILITY(U,$J,358.5,13,2,1,0)
+88 ;;=NATIONAL ONCOLOGY/CHEMOTHERAPY INFUSION^^^0^0
+89 ;;^UTILITY(U,$J,358.5,14,0)
+90 ;;=Patient name^17^1
+91 ;;^UTILITY(U,$J,358.5,14,2,0)
+92 ;;=^358.52^1^1
+93 ;;^UTILITY(U,$J,358.5,14,2,1,0)
+94 ;;=Name:^^^1^1^1^7^30^1
+95 ;;^UTILITY(U,$J,358.5,15,0)
+96 ;;=SSN^17^2
+97 ;;^UTILITY(U,$J,358.5,15,2,0)
+98 ;;=^358.52^1^1
+99 ;;^UTILITY(U,$J,358.5,15,2,1,0)
+100 ;;=SSN:^^^39^1^1^44^15^1
+101 ;;^UTILITY(U,$J,358.5,16,0)
+102 ;;=Age^17^3
+103 ;;^UTILITY(U,$J,358.5,16,2,0)
+104 ;;=^358.52^2^2
+105 ;;^UTILITY(U,$J,358.5,16,2,1,0)
+106 ;;=DOB:^^^60^1^1^65^12^1
+107 ;;^UTILITY(U,$J,358.5,16,2,2,0)
+108 ;;=Age:^^^78^1^1^83^3^2
+109 ;;^UTILITY(U,$J,358.5,17,0)
+110 ;;=HEADER^20
+111 ;;^UTILITY(U,$J,358.5,17,2,0)
+112 ;;=^358.52^1^1
+113 ;;^UTILITY(U,$J,358.5,17,2,1,0)
+114 ;;=NATIONAL NEUROLOGY^^^0^0
+115 ;;^UTILITY(U,$J,358.5,18,0)
+116 ;;=Patient name^21^1
+117 ;;^UTILITY(U,$J,358.5,18,2,0)
+118 ;;=^358.52^1^1
+119 ;;^UTILITY(U,$J,358.5,18,2,1,0)
+120 ;;=Name:^^^1^1^1^7^30^1
+121 ;;^UTILITY(U,$J,358.5,19,0)
+122 ;;=SSN^21^2
+123 ;;^UTILITY(U,$J,358.5,19,2,0)
+124 ;;=^358.52^1^1
+125 ;;^UTILITY(U,$J,358.5,19,2,1,0)
+126 ;;=SSN:^^^39^1^1^44^15^1
+127 ;;^UTILITY(U,$J,358.5,20,0)
+128 ;;=Age^21^3
+129 ;;^UTILITY(U,$J,358.5,20,2,0)
+130 ;;=^358.52^2^2
+131 ;;^UTILITY(U,$J,358.5,20,2,1,0)
+132 ;;=DOB:^^^60^1^1^65^12^1
+133 ;;^UTILITY(U,$J,358.5,20,2,2,0)
+134 ;;=Age:^^^78^1^1^83^3^2
+135 ;;^UTILITY(U,$J,358.5,21,0)
+136 ;;=HEADER^24
+137 ;;^UTILITY(U,$J,358.5,21,2,0)
+138 ;;=^358.52^1^1
+139 ;;^UTILITY(U,$J,358.5,21,2,1,0)
+140 ;;=NATIONAL ADULT DAY HEALTH CARE VISIT-NURSE^^^0^0
+141 ;;^UTILITY(U,$J,358.5,22,0)
+142 ;;=Patient name^25^1
+143 ;;^UTILITY(U,$J,358.5,22,2,0)
+144 ;;=^358.52^1^1
+145 ;;^UTILITY(U,$J,358.5,22,2,1,0)
+146 ;;=Name:^^^1^1^1^7^30^1
+147 ;;^UTILITY(U,$J,358.5,23,0)
+148 ;;=SSN^25^2
+149 ;;^UTILITY(U,$J,358.5,23,2,0)
+150 ;;=^358.52^1^1
+151 ;;^UTILITY(U,$J,358.5,23,2,1,0)
+152 ;;=SSN:^^^39^1^1^44^15^1
+153 ;;^UTILITY(U,$J,358.5,24,0)
+154 ;;=Age^25^3
+155 ;;^UTILITY(U,$J,358.5,24,2,0)
+156 ;;=^358.52^2^2
+157 ;;^UTILITY(U,$J,358.5,24,2,1,0)
+158 ;;=DOB:^^^60^1^1^65^12^1
+159 ;;^UTILITY(U,$J,358.5,24,2,2,0)
+160 ;;=Age:^^^78^1^1^83^3^2
+161 ;;^UTILITY(U,$J,358.5,25,0)
+162 ;;=HEADER^29
+163 ;;^UTILITY(U,$J,358.5,25,2,0)
+164 ;;=^358.52^1^1
+165 ;;^UTILITY(U,$J,358.5,25,2,1,0)
+166 ;;=NATIONAL BLIND REHAB^^^0^0
+167 ;;^UTILITY(U,$J,358.5,26,0)
+168 ;;=Patient name^30^1
+169 ;;^UTILITY(U,$J,358.5,26,2,0)
+170 ;;=^358.52^1^1
+171 ;;^UTILITY(U,$J,358.5,26,2,1,0)
+172 ;;=Name:^^^1^1^1^7^30^1
+173 ;;^UTILITY(U,$J,358.5,27,0)
+174 ;;=SSN^30^2
+175 ;;^UTILITY(U,$J,358.5,27,2,0)
+176 ;;=^358.52^1^1
+177 ;;^UTILITY(U,$J,358.5,27,2,1,0)
+178 ;;=SSN:^^^39^1^1^44^15^1
+179 ;;^UTILITY(U,$J,358.5,28,0)
+180 ;;=Age^30^3
+181 ;;^UTILITY(U,$J,358.5,28,2,0)
+182 ;;=^358.52^2^2
+183 ;;^UTILITY(U,$J,358.5,28,2,1,0)
+184 ;;=DOB:^^^60^1^1^65^12^1
+185 ;;^UTILITY(U,$J,358.5,28,2,2,0)
+186 ;;=Age:^^^78^1^1^83^3^2
+187 ;;^UTILITY(U,$J,358.5,29,0)
+188 ;;=HEADER^33
+189 ;;^UTILITY(U,$J,358.5,29,2,0)
+190 ;;=^358.52^1^1
+191 ;;^UTILITY(U,$J,358.5,29,2,1,0)
+192 ;;=NATIONAL CARDIOLOGY^^^0^0
+193 ;;^UTILITY(U,$J,358.5,30,0)
+194 ;;=Patient name^34^1
+195 ;;^UTILITY(U,$J,358.5,30,2,0)
+196 ;;=^358.52^1^1
+197 ;;^UTILITY(U,$J,358.5,30,2,1,0)
+198 ;;=Name:^^^1^1^1^7^30^1
+199 ;;^UTILITY(U,$J,358.5,31,0)
+200 ;;=SSN^34^2
+201 ;;^UTILITY(U,$J,358.5,31,2,0)
+202 ;;=^358.52^1^1
+203 ;;^UTILITY(U,$J,358.5,31,2,1,0)
+204 ;;=SSN:^^^39^1^1^44^15^1
+205 ;;^UTILITY(U,$J,358.5,32,0)
+206 ;;=Age^34^3
+207 ;;^UTILITY(U,$J,358.5,32,2,0)
+208 ;;=^358.52^2^2
+209 ;;^UTILITY(U,$J,358.5,32,2,1,0)
+210 ;;=DOB:^^^60^1^1^65^12^1
+211 ;;^UTILITY(U,$J,358.5,32,2,2,0)
+212 ;;=Age:^^^78^1^1^83^3^2
+213 ;;^UTILITY(U,$J,358.5,33,0)
+214 ;;=HEADER^39
+215 ;;^UTILITY(U,$J,358.5,33,2,0)
+216 ;;=^358.52^1^1
+217 ;;^UTILITY(U,$J,358.5,33,2,1,0)
+218 ;;=NATIONAL CHIROPRACTIC^^^0^0
+219 ;;^UTILITY(U,$J,358.5,34,0)
+220 ;;=Patient name^40^1
+221 ;;^UTILITY(U,$J,358.5,34,2,0)
+222 ;;=^358.52^1^1
+223 ;;^UTILITY(U,$J,358.5,34,2,1,0)
+224 ;;=Name:^^^1^1^1^7^30^1
+225 ;;^UTILITY(U,$J,358.5,35,0)
+226 ;;=SSN^40^2
+227 ;;^UTILITY(U,$J,358.5,35,2,0)
+228 ;;=^358.52^1^1
+229 ;;^UTILITY(U,$J,358.5,35,2,1,0)
+230 ;;=SSN:^^^39^1^1^44^15^1
+231 ;;^UTILITY(U,$J,358.5,36,0)
+232 ;;=Age^40^3
+233 ;;^UTILITY(U,$J,358.5,36,2,0)
+234 ;;=^358.52^2^2
+235 ;;^UTILITY(U,$J,358.5,36,2,1,0)
+236 ;;=DOB:^^^60^1^1^65^12^1
+237 ;;^UTILITY(U,$J,358.5,36,2,2,0)
+238 ;;=Age:^^^78^1^1^83^3^2
+239 ;;^UTILITY(U,$J,358.5,37,0)
+240 ;;=HEADER^43
+241 ;;^UTILITY(U,$J,358.5,37,2,0)
+242 ;;=^358.52^1^1
+243 ;;^UTILITY(U,$J,358.5,37,2,1,0)
+244 ;;=NATIONAL CLINICAL PHARMACIST^^^0^0
+245 ;;^UTILITY(U,$J,358.5,38,0)
+246 ;;=Patient name^44^1
+247 ;;^UTILITY(U,$J,358.5,38,2,0)
+248 ;;=^358.52^1^1
+249 ;;^UTILITY(U,$J,358.5,38,2,1,0)
+250 ;;=Name:^^^1^1^1^7^30^1
+251 ;;^UTILITY(U,$J,358.5,39,0)
+252 ;;=SSN^44^2
+253 ;;^UTILITY(U,$J,358.5,39,2,0)
+254 ;;=^358.52^1^1
+255 ;;^UTILITY(U,$J,358.5,39,2,1,0)
+256 ;;=SSN:^^^39^1^1^44^15^1
+257 ;;^UTILITY(U,$J,358.5,40,0)
+258 ;;=Age^44^3
+259 ;;^UTILITY(U,$J,358.5,40,2,0)
+260 ;;=^358.52^2^2
+261 ;;^UTILITY(U,$J,358.5,40,2,1,0)
+262 ;;=DOB:^^^60^1^1^65^12^1
+263 ;;^UTILITY(U,$J,358.5,40,2,2,0)
+264 ;;=Age:^^^78^1^1^83^3^2
+265 ;;^UTILITY(U,$J,358.5,41,0)
+266 ;;=Patient name^48^1
+267 ;;^UTILITY(U,$J,358.5,41,2,0)
+268 ;;=^358.52^1^1
+269 ;;^UTILITY(U,$J,358.5,41,2,1,0)
+270 ;;=Name:^^^1^1^1^7^30^1
+271 ;;^UTILITY(U,$J,358.5,42,0)
+272 ;;=SSN^48^2
+273 ;;^UTILITY(U,$J,358.5,42,2,0)
+274 ;;=^358.52^1^1
+275 ;;^UTILITY(U,$J,358.5,42,2,1,0)
+276 ;;=SSN:^^^39^1^1^44^15^1
+277 ;;^UTILITY(U,$J,358.5,43,0)
+278 ;;=Age^48^3
+279 ;;^UTILITY(U,$J,358.5,43,2,0)
+280 ;;=^358.52^2^2
+281 ;;^UTILITY(U,$J,358.5,43,2,1,0)
+282 ;;=DOB:^^^60^1^1^65^12^1
+283 ;;^UTILITY(U,$J,358.5,43,2,2,0)
+284 ;;=Age:^^^78^1^1^83^3^2
+285 ;;^UTILITY(U,$J,358.5,44,0)
+286 ;;=HEADER^49
+287 ;;^UTILITY(U,$J,358.5,44,2,0)
+288 ;;=^358.52^1^1
+289 ;;^UTILITY(U,$J,358.5,44,2,1,0)
+290 ;;=NATIONAL DIABETIC^^B^0^0
+291 ;;^UTILITY(U,$J,358.5,45,0)
+292 ;;=HEADER^54
+293 ;;^UTILITY(U,$J,358.5,45,2,0)
+294 ;;=^358.52^1^1
+295 ;;^UTILITY(U,$J,358.5,45,2,1,0)
+296 ;;=NATIONAL EMERGENCY DEPARTMENT^^^0^0
+297 ;;^UTILITY(U,$J,358.5,46,0)
+298 ;;=Patient name^55^1
+299 ;;^UTILITY(U,$J,358.5,46,2,0)
+300 ;;=^358.52^1^1
+301 ;;^UTILITY(U,$J,358.5,46,2,1,0)
+302 ;;=Name:^^^1^1^1^7^30^1
+303 ;;^UTILITY(U,$J,358.5,47,0)
+304 ;;=SSN^55^2
+305 ;;^UTILITY(U,$J,358.5,47,2,0)
+306 ;;=^358.52^1^1
+307 ;;^UTILITY(U,$J,358.5,47,2,1,0)
+308 ;;=SSN:^^^39^1^1^44^15^1
+309 ;;^UTILITY(U,$J,358.5,48,0)
+310 ;;=Age^55^3
+311 ;;^UTILITY(U,$J,358.5,48,2,0)
+312 ;;=^358.52^2^2
+313 ;;^UTILITY(U,$J,358.5,48,2,1,0)
+314 ;;=DOB:^^^60^1^1^65^12^1
+315 ;;^UTILITY(U,$J,358.5,48,2,2,0)
+316 ;;=Age:^^^78^1^1^83^3^2
+317 ;;^UTILITY(U,$J,358.5,49,0)
+318 ;;=HEADER^58
+319 ;;^UTILITY(U,$J,358.5,49,2,0)
+320 ;;=^358.52^1^1
+321 ;;^UTILITY(U,$J,358.5,49,2,1,0)
+322 ;;=NATIONAL ENDOCRINOLOGY^^^0^0
+323 ;;^UTILITY(U,$J,358.5,50,0)
+324 ;;=Patient name^59^1
+325 ;;^UTILITY(U,$J,358.5,50,2,0)
+326 ;;=^358.52^1^1
+327 ;;^UTILITY(U,$J,358.5,50,2,1,0)
+328 ;;=Name:^^^1^1^1^7^30^1
+329 ;;^UTILITY(U,$J,358.5,51,0)
+330 ;;=SSN^59^2
+331 ;;^UTILITY(U,$J,358.5,51,2,0)
+332 ;;=^358.52^1^1
+333 ;;^UTILITY(U,$J,358.5,51,2,1,0)
+334 ;;=SSN:^^^39^1^1^44^15^1
+335 ;;^UTILITY(U,$J,358.5,52,0)
+336 ;;=Age^59^3
+337 ;;^UTILITY(U,$J,358.5,52,2,0)
+338 ;;=^358.52^2^2
+339 ;;^UTILITY(U,$J,358.5,52,2,1,0)
+340 ;;=DOB:^^^60^1^1^65^12^1
+341 ;;^UTILITY(U,$J,358.5,52,2,2,0)
+342 ;;=Age:^^^78^1^1^83^3^2
+343 ;;^UTILITY(U,$J,358.5,53,0)
+344 ;;=HEADER^62
+345 ;;^UTILITY(U,$J,358.5,53,2,0)
+346 ;;=^358.52^1^1
+347 ;;^UTILITY(U,$J,358.5,53,2,1,0)
+348 ;;=NATIONAL EYE TECHNICIAN^^^0^0
+349 ;;^UTILITY(U,$J,358.5,54,0)
+350 ;;=Patient name^63^1
+351 ;;^UTILITY(U,$J,358.5,54,2,0)
+352 ;;=^358.52^1^1
+353 ;;^UTILITY(U,$J,358.5,54,2,1,0)
+354 ;;=Name:^^^1^1^1^7^30^1
+355 ;;^UTILITY(U,$J,358.5,55,0)
+356 ;;=SSN^63^2
+357 ;;^UTILITY(U,$J,358.5,55,2,0)
+358 ;;=^358.52^1^1
+359 ;;^UTILITY(U,$J,358.5,55,2,1,0)
+360 ;;=SSN:^^^39^1^1^44^15^1
+361 ;;^UTILITY(U,$J,358.5,56,0)
+362 ;;=Age^63^3
+363 ;;^UTILITY(U,$J,358.5,56,2,0)
+364 ;;=^358.52^2^2
+365 ;;^UTILITY(U,$J,358.5,56,2,1,0)
+366 ;;=DOB:^^^60^1^1^65^12^1
+367 ;;^UTILITY(U,$J,358.5,56,2,2,0)
+368 ;;=Age:^^^78^1^1^83^3^2
+369 ;;^UTILITY(U,$J,358.5,57,0)
+370 ;;=HEADER^66
+371 ;;^UTILITY(U,$J,358.5,57,2,0)
+372 ;;=^358.52^1^1
+373 ;;^UTILITY(U,$J,358.5,57,2,1,0)
+374 ;;=NATIONAL EYE^^^0^0
+375 ;;^UTILITY(U,$J,358.5,58,0)
+376 ;;=Patient name^67^1
+377 ;;^UTILITY(U,$J,358.5,58,2,0)
+378 ;;=^358.52^1^1
+379 ;;^UTILITY(U,$J,358.5,58,2,1,0)
+380 ;;=Name:^^^1^1^1^7^30^1
+381 ;;^UTILITY(U,$J,358.5,59,0)
+382 ;;=SSN^67^2
+383 ;;^UTILITY(U,$J,358.5,59,2,0)
+384 ;;=^358.52^1^1
+385 ;;^UTILITY(U,$J,358.5,59,2,1,0)
+386 ;;=SSN:^^^39^1^1^44^15^1
+387 ;;^UTILITY(U,$J,358.5,60,0)
+388 ;;=Age^67^3
+389 ;;^UTILITY(U,$J,358.5,60,2,0)
+390 ;;=^358.52^2^2
+391 ;;^UTILITY(U,$J,358.5,60,2,1,0)
+392 ;;=DOB:^^^60^1^1^65^12^1
+393 ;;^UTILITY(U,$J,358.5,60,2,2,0)
+394 ;;=Age:^^^78^1^1^83^3^2
+395 ;;^UTILITY(U,$J,358.5,61,0)
+396 ;;=HEADER^72
+397 ;;^UTILITY(U,$J,358.5,61,2,0)
+398 ;;=^358.52^1^1
+399 ;;^UTILITY(U,$J,358.5,61,2,1,0)
+400 ;;=NATIONAL GI/HEPATOLOGY^^^0^0
+401 ;;^UTILITY(U,$J,358.5,62,0)
+402 ;;=Patient name^73^1
+403 ;;^UTILITY(U,$J,358.5,62,2,0)
+404 ;;=^358.52^1^1
+405 ;;^UTILITY(U,$J,358.5,62,2,1,0)
+406 ;;=Name:^^^1^1^1^7^30^1
+407 ;;^UTILITY(U,$J,358.5,63,0)
+408 ;;=SSN^73^2
+409 ;;^UTILITY(U,$J,358.5,63,2,0)
+410 ;;=^358.52^1^1
+411 ;;^UTILITY(U,$J,358.5,63,2,1,0)
+412 ;;=SSN:^^^39^1^1^44^15^1
+413 ;;^UTILITY(U,$J,358.5,64,0)
+414 ;;=Age^73^3
+415 ;;^UTILITY(U,$J,358.5,64,2,0)
+416 ;;=^358.52^2^2
+417 ;;^UTILITY(U,$J,358.5,64,2,1,0)
+418 ;;=DOB:^^^60^1^1^65^12^1
+419 ;;^UTILITY(U,$J,358.5,64,2,2,0)
+420 ;;=Age:^^^78^1^1^83^3^2
+421 ;;^UTILITY(U,$J,358.5,65,0)
+422 ;;=HEADER^76
+423 ;;^UTILITY(U,$J,358.5,65,2,0)
+424 ;;=^358.52^1^1
+425 ;;^UTILITY(U,$J,358.5,65,2,1,0)
+426 ;;=NATIONAL HBPC CLINICIAN^^^0^0
+427 ;;^UTILITY(U,$J,358.5,66,0)
+428 ;;=Patient name^77^1
+429 ;;^UTILITY(U,$J,358.5,66,2,0)
+430 ;;=^358.52^1^1
+431 ;;^UTILITY(U,$J,358.5,66,2,1,0)
+432 ;;=Name:^^^1^1^1^7^30^1
+433 ;;^UTILITY(U,$J,358.5,67,0)
+434 ;;=SSN^77^2
+435 ;;^UTILITY(U,$J,358.5,67,2,0)
+436 ;;=^358.52^1^1
+437 ;;^UTILITY(U,$J,358.5,67,2,1,0)
+438 ;;=SSN:^^^39^1^1^44^15^1
+439 ;;^UTILITY(U,$J,358.5,68,0)
+440 ;;=Age^77^3
+441 ;;^UTILITY(U,$J,358.5,68,2,0)
+442 ;;=^358.52^2^2
+443 ;;^UTILITY(U,$J,358.5,68,2,1,0)
+444 ;;=DOB:^^^60^1^1^65^12^1
+445 ;;^UTILITY(U,$J,358.5,68,2,2,0)
+446 ;;=Age:^^^78^1^1^83^3^2
+447 ;;^UTILITY(U,$J,358.5,69,0)
+448 ;;=Patient name^81^1
+449 ;;^UTILITY(U,$J,358.5,69,2,0)
+450 ;;=^358.52^1^1
+451 ;;^UTILITY(U,$J,358.5,69,2,1,0)
+452 ;;=Name:^^^1^1^1^7^30^1
+453 ;;^UTILITY(U,$J,358.5,70,0)
+454 ;;=SSN^81^2
+455 ;;^UTILITY(U,$J,358.5,70,2,0)
+456 ;;=^358.52^1^1
+457 ;;^UTILITY(U,$J,358.5,70,2,1,0)
+458 ;;=SSN:^^^39^1^1^44^15^1
+459 ;;^UTILITY(U,$J,358.5,71,0)
+460 ;;=Age^81^3
+461 ;;^UTILITY(U,$J,358.5,71,2,0)
+462 ;;=^358.52^2^2
+463 ;;^UTILITY(U,$J,358.5,71,2,1,0)
+464 ;;=DOB:^^^60^1^1^65^12^1
+465 ;;^UTILITY(U,$J,358.5,71,2,2,0)
+466 ;;=Age:^^^78^1^1^83^3^2
+467 ;;^UTILITY(U,$J,358.5,72,0)
+468 ;;=HEADER^83
+469 ;;^UTILITY(U,$J,358.5,72,2,0)
+470 ;;=^358.52^1^1
+471 ;;^UTILITY(U,$J,358.5,72,2,1,0)
+472 ;;=NATIONAL HBPC NURSING^^^0^0
+473 ;;^UTILITY(U,$J,358.5,73,0)
+474 ;;=HEADER^86
+475 ;;^UTILITY(U,$J,358.5,73,2,0)
+476 ;;=^358.52^1^1
+477 ;;^UTILITY(U,$J,358.5,73,2,1,0)
+478 ;;=NATIONAL HBPC - REHAB THERAPY^^^0^0
+479 ;;^UTILITY(U,$J,358.5,74,0)
+480 ;;=Patient name^87^1
+481 ;;^UTILITY(U,$J,358.5,74,2,0)
+482 ;;=^358.52^1^1
+483 ;;^UTILITY(U,$J,358.5,74,2,1,0)
+484 ;;=Name:^^^1^1^1^7^30^1
+485 ;;^UTILITY(U,$J,358.5,75,0)
+486 ;;=SSN^87^2
+487 ;;^UTILITY(U,$J,358.5,75,2,0)
+488 ;;=^358.52^1^1
+489 ;;^UTILITY(U,$J,358.5,75,2,1,0)
+490 ;;=SSN:^^^39^1^1^44^15^1
+491 ;;^UTILITY(U,$J,358.5,76,0)
+492 ;;=Age^87^3
+493 ;;^UTILITY(U,$J,358.5,76,2,0)
+494 ;;=^358.52^2^2
+495 ;;^UTILITY(U,$J,358.5,76,2,1,0)
+496 ;;=DOB:^^^60^1^1^65^12^1
+497 ;;^UTILITY(U,$J,358.5,76,2,2,0)
+498 ;;=Age:^^^78^1^1^83^3^2
+499 ;;^UTILITY(U,$J,358.5,77,0)
+500 ;;=HEADER^90
+501 ;;^UTILITY(U,$J,358.5,77,2,0)
+502 ;;=^358.52^1^1
+503 ;;^UTILITY(U,$J,358.5,77,2,1,0)
+504 ;;=NATIONAL INPATIENT^^^0^0
+505 ;;^UTILITY(U,$J,358.5,78,0)
+506 ;;=Patient name^91^1
+507 ;;^UTILITY(U,$J,358.5,78,2,0)
+508 ;;=^358.52^1^1
+509 ;;^UTILITY(U,$J,358.5,78,2,1,0)
+510 ;;=Name:^^^1^1^1^7^30^1
+511 ;;^UTILITY(U,$J,358.5,79,0)
+512 ;;=SSN^91^2
+513 ;;^UTILITY(U,$J,358.5,79,2,0)
+514 ;;=^358.52^1^1
+515 ;;^UTILITY(U,$J,358.5,79,2,1,0)
+516 ;;=SSN:^^^39^1^1^44^15^1
+517 ;;^UTILITY(U,$J,358.5,80,0)
+518 ;;=Age^91^3
+519 ;;^UTILITY(U,$J,358.5,80,2,0)
+520 ;;=^358.52^2^2
+521 ;;^UTILITY(U,$J,358.5,80,2,1,0)
+522 ;;=DOB:^^^60^1^1^65^12^1
+523 ;;^UTILITY(U,$J,358.5,80,2,2,0)
+524 ;;=Age:^^^78^1^1^83^3^2
+525 ;;^UTILITY(U,$J,358.5,81,0)
+526 ;;=HEADER^95
+527 ;;^UTILITY(U,$J,358.5,81,2,0)
+528 ;;=^358.52^1^1
+529 ;;^UTILITY(U,$J,358.5,81,2,1,0)
+530 ;;=NATIONAL MEDICINE^^^0^0
+531 ;;^UTILITY(U,$J,358.5,82,0)
+532 ;;=Patient name^96^1
+533 ;;^UTILITY(U,$J,358.5,82,2,0)
+534 ;;=^358.52^1^1
+535 ;;^UTILITY(U,$J,358.5,82,2,1,0)
+536 ;;=Name:^^^1^1^1^7^30^1
+537 ;;^UTILITY(U,$J,358.5,83,0)
+538 ;;=SSN^96^2
+539 ;;^UTILITY(U,$J,358.5,83,2,0)
+540 ;;=^358.52^1^1
+541 ;;^UTILITY(U,$J,358.5,83,2,1,0)
+542 ;;=SSN:^^^39^1^1^44^15^1
+543 ;;^UTILITY(U,$J,358.5,84,0)
+544 ;;=Age^96^3
+545 ;;^UTILITY(U,$J,358.5,84,2,0)
+546 ;;=^358.52^2^2
+547 ;;^UTILITY(U,$J,358.5,84,2,1,0)
+548 ;;=DOB:^^^60^1^1^65^12^1
+549 ;;^UTILITY(U,$J,358.5,84,2,2,0)
+550 ;;=Age:^^^78^1^1^83^3^2
+551 ;;^UTILITY(U,$J,358.5,85,0)
+552 ;;=HEADER^99
+553 ;;^UTILITY(U,$J,358.5,85,2,0)
+554 ;;=^358.52^1^1
+555 ;;^UTILITY(U,$J,358.5,85,2,1,0)
+556 ;;=NATIONAL NURSING CLINIC ^^^0^0
+557 ;;^UTILITY(U,$J,358.5,86,0)
+558 ;;=Patient name^100^1
+559 ;;^UTILITY(U,$J,358.5,86,2,0)
+560 ;;=^358.52^1^1
+561 ;;^UTILITY(U,$J,358.5,86,2,1,0)
+562 ;;=Name:^^^1^1^1^7^30^1
+563 ;;^UTILITY(U,$J,358.5,87,0)
+564 ;;=SSN^100^2
+565 ;;^UTILITY(U,$J,358.5,87,2,0)
+566 ;;=^358.52^1^1
+567 ;;^UTILITY(U,$J,358.5,87,2,1,0)
+568 ;;=SSN:^^^39^1^1^44^15^1
+569 ;;^UTILITY(U,$J,358.5,88,0)
+570 ;;=Age^100^3
+571 ;;^UTILITY(U,$J,358.5,88,2,0)
+572 ;;=^358.52^2^2
+573 ;;^UTILITY(U,$J,358.5,88,2,1,0)
+574 ;;=DOB:^^^60^1^1^65^12^1
+575 ;;^UTILITY(U,$J,358.5,88,2,2,0)
+576 ;;=Age:^^^78^1^1^83^3^2
+577 ;;^UTILITY(U,$J,358.5,89,0)
+578 ;;=Patient name^105^1
+579 ;;^UTILITY(U,$J,358.5,89,2,0)
+580 ;;=^358.52^1^1
+581 ;;^UTILITY(U,$J,358.5,89,2,1,0)
+582 ;;=Name:^^^1^1^1^7^30^1
+583 ;;^UTILITY(U,$J,358.5,90,0)
+584 ;;=SSN^105^2
+585 ;;^UTILITY(U,$J,358.5,90,2,0)
+586 ;;=^358.52^1^1
+587 ;;^UTILITY(U,$J,358.5,90,2,1,0)
+588 ;;=SSN:^^^39^1^1^44^15^1
+589 ;;^UTILITY(U,$J,358.5,91,0)
+590 ;;=Age^105^3
+591 ;;^UTILITY(U,$J,358.5,91,2,0)
+592 ;;=^358.52^2^2
+593 ;;^UTILITY(U,$J,358.5,91,2,1,0)
+594 ;;=DOB:^^^60^1^1^65^12^1
+595 ;;^UTILITY(U,$J,358.5,91,2,2,0)
+596 ;;=Age:^^^78^1^1^83^3^2
+597 ;;^UTILITY(U,$J,358.5,92,0)
+598 ;;=HEADER^106
+599 ;;^UTILITY(U,$J,358.5,92,2,0)
+600 ;;=^358.52^1^1
+601 ;;^UTILITY(U,$J,358.5,92,2,1,0)
+602 ;;=NATIONAL GYNECOLOGY/OBSTETRICS^^^0^0
+603 ;;^UTILITY(U,$J,358.5,93,0)
+604 ;;=HEADER^111
+605 ;;^UTILITY(U,$J,358.5,93,2,0)
+606 ;;=^358.52^1^1
+607 ;;^UTILITY(U,$J,358.5,93,2,1,0)
+608 ;;=NATIONAL INPATIENT REHAB PHYSIATRY^^^0^0
+609 ;;^UTILITY(U,$J,358.5,94,0)
+610 ;;=Patient name^112^1
+611 ;;^UTILITY(U,$J,358.5,94,2,0)
+612 ;;=^358.52^1^1
+613 ;;^UTILITY(U,$J,358.5,94,2,1,0)
+614 ;;=Name:^^^1^1^1^7^30^1
+615 ;;^UTILITY(U,$J,358.5,95,0)
+616 ;;=SSN^112^2
+617 ;;^UTILITY(U,$J,358.5,95,2,0)
+618 ;;=^358.52^1^1
+619 ;;^UTILITY(U,$J,358.5,95,2,1,0)
+620 ;;=SSN:^^^39^1^1^44^15^1
+621 ;;^UTILITY(U,$J,358.5,96,0)
+622 ;;=Age^112^3
+623 ;;^UTILITY(U,$J,358.5,96,2,0)
+624 ;;=^358.52^2^2
+625 ;;^UTILITY(U,$J,358.5,96,2,1,0)
+626 ;;=DOB:^^^60^1^1^65^12^1
+627 ;;^UTILITY(U,$J,358.5,96,2,2,0)
+628 ;;=Age:^^^78^1^1^83^3^2
+629 ;;^UTILITY(U,$J,358.5,97,0)
+630 ;;=HEADER^115
+631 ;;^UTILITY(U,$J,358.5,97,2,0)
+632 ;;=^358.52^1^1
+633 ;;^UTILITY(U,$J,358.5,97,2,1,0)
+634 ;;=NATIONAL REHAB PHYSIATRY^^^0^0
+635 ;;^UTILITY(U,$J,358.5,98,0)
+636 ;;=Patient name^116^1
+637 ;;^UTILITY(U,$J,358.5,98,2,0)
+638 ;;=^358.52^1^1
+639 ;;^UTILITY(U,$J,358.5,98,2,1,0)
+640 ;;=Name:^^^1^1^1^7^30^1
+641 ;;^UTILITY(U,$J,358.5,99,0)
+642 ;;=SSN^116^2
+643 ;;^UTILITY(U,$J,358.5,99,2,0)
+644 ;;=^358.52^1^1
+645 ;;^UTILITY(U,$J,358.5,99,2,1,0)
+646 ;;=SSN:^^^39^1^1^44^15^1
+647 ;;^UTILITY(U,$J,358.5,100,0)
+648 ;;=Age^116^3
+649 ;;^UTILITY(U,$J,358.5,100,2,0)
+650 ;;=^358.52^2^2
+651 ;;^UTILITY(U,$J,358.5,100,2,1,0)
+652 ;;=DOB:^^^60^1^1^65^12^1
+653 ;;^UTILITY(U,$J,358.5,100,2,2,0)
+654 ;;=Age:^^^78^1^1^83^3^2
+655 ;;^UTILITY(U,$J,358.5,101,0)
+656 ;;=HEADER^119
+657 ;;^UTILITY(U,$J,358.5,101,2,0)
+658 ;;=^358.52^1^1
+659 ;;^UTILITY(U,$J,358.5,101,2,1,0)
+660 ;;=NATIONAL PRIMARY CARE^^^0^0
+661 ;;^UTILITY(U,$J,358.5,102,0)
+662 ;;=Patient name^120^1
+663 ;;^UTILITY(U,$J,358.5,102,2,0)
+664 ;;=^358.52^1^1
+665 ;;^UTILITY(U,$J,358.5,102,2,1,0)
+666 ;;=Name:^^^1^1^1^7^30^1
+667 ;;^UTILITY(U,$J,358.5,103,0)
+668 ;;=SSN^120^2
+669 ;;^UTILITY(U,$J,358.5,103,2,0)
+670 ;;=^358.52^1^1
+671 ;;^UTILITY(U,$J,358.5,103,2,1,0)
+672 ;;=SSN:^^^39^1^1^44^15^1
+673 ;;^UTILITY(U,$J,358.5,104,0)
+674 ;;=Age^120^3
+675 ;;^UTILITY(U,$J,358.5,104,2,0)
+676 ;;=^358.52^2^2
+677 ;;^UTILITY(U,$J,358.5,104,2,1,0)
+678 ;;=DOB:^^^60^1^1^65^12^1
+679 ;;^UTILITY(U,$J,358.5,104,2,2,0)
+680 ;;=Age:^^^78^1^1^83^3^2
+681 ;;^UTILITY(U,$J,358.5,105,0)
+682 ;;=HEADER^126
+683 ;;^UTILITY(U,$J,358.5,105,2,0)
+684 ;;=^358.52^1^1
+685 ;;^UTILITY(U,$J,358.5,105,2,1,0)
+686 ;;=NATIONAL PULMONARY^^^0^0
+687 ;;^UTILITY(U,$J,358.5,106,0)
+688 ;;=Patient name^127^1
+689 ;;^UTILITY(U,$J,358.5,106,2,0)
+690 ;;=^358.52^1^1
+691 ;;^UTILITY(U,$J,358.5,106,2,1,0)
+692 ;;=Name:^^^1^1^1^7^30^1
+693 ;;^UTILITY(U,$J,358.5,107,0)
+694 ;;=SSN^127^2
+695 ;;^UTILITY(U,$J,358.5,107,2,0)
+696 ;;=^358.52^1^1
+697 ;;^UTILITY(U,$J,358.5,107,2,1,0)
+698 ;;=SSN:^^^39^1^1^44^15^1
+699 ;;^UTILITY(U,$J,358.5,108,0)
+700 ;;=Age^127^3
+701 ;;^UTILITY(U,$J,358.5,108,2,0)
+702 ;;=^358.52^2^2
+703 ;;^UTILITY(U,$J,358.5,108,2,1,0)
+704 ;;=DOB:^^^60^1^1^65^12^1
+705 ;;^UTILITY(U,$J,358.5,108,2,2,0)
+706 ;;=Age:^^^78^1^1^83^3^2
+707 ;;^UTILITY(U,$J,358.5,109,0)
+708 ;;=HEADER^129
+709 ;;^UTILITY(U,$J,358.5,109,2,0)
+710 ;;=^358.52^1^1
+711 ;;^UTILITY(U,$J,358.5,109,2,1,0)
+712 ;;=NATIONAL SPINAL CORD INJURY^^^0^0
+713 ;;^UTILITY(U,$J,358.5,110,0)
+714 ;;=Patient name^130^1
+715 ;;^UTILITY(U,$J,358.5,110,2,0)
+716 ;;=^358.52^1^1
+717 ;;^UTILITY(U,$J,358.5,110,2,1,0)
+718 ;;=Name:^^^1^1^1^7^30^1
+719 ;;^UTILITY(U,$J,358.5,111,0)
+720 ;;=SSN^130^2
+721 ;;^UTILITY(U,$J,358.5,111,2,0)
+722 ;;=^358.52^1^1
+723 ;;^UTILITY(U,$J,358.5,111,2,1,0)
+724 ;;=SSN:^^^39^1^1^44^15^1
+725 ;;^UTILITY(U,$J,358.5,112,0)
+726 ;;=Age^130^3
+727 ;;^UTILITY(U,$J,358.5,112,2,0)
+728 ;;=^358.52^2^2
+729 ;;^UTILITY(U,$J,358.5,112,2,1,0)
+730 ;;=DOB:^^^60^1^1^65^12^1