IBDEI002 ; ; 01-AUG-2022
;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
Q:'DIFQR(358) 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)
;;=^IBE(358,
;;^UTILITY(U,$J,358,0)
;;=IMP/EXP ENCOUNTER FORM^358I^37^36
;;^UTILITY(U,$J,358,1,0)
;;=NATIONAL ECOE TELE FY22-Q4^2^National Epilepsy Center of Excellence Telephone July 2022^1^0^0^1^^133^80^2^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,1,2,0)
;;=^358.02I^1^1
;;^UTILITY(U,$J,358,1,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,2,0)
;;=NATL PREVENTIVE HEALTH FY22-Q4^1^National Preventive Health July 2022^1^0^1^1^^133^80^4^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,2,2,0)
;;=^358.02I^6^6
;;^UTILITY(U,$J,358,2,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,2,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,2,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,2,2,4,0)
;;=2^1
;;^UTILITY(U,$J,358,2,2,5,0)
;;=4^1
;;^UTILITY(U,$J,358,2,2,6,0)
;;=5^1
;;^UTILITY(U,$J,358,3,0)
;;=NATIONAL SLEEP MED FY22-Q4^0^National Sleep Medicine July 2022^1^0^1^1^^133^80^3^0^^1^p^1^2.1
;;^UTILITY(U,$J,358,3,2,0)
;;=^358.02I^2^2
;;^UTILITY(U,$J,358,3,2,1,0)
;;=2^1
;;^UTILITY(U,$J,358,3,2,2,0)
;;=1^1
;;^UTILITY(U,$J,358,4,0)
;;=NATL ONC/CHEMO INF FY22-Q4^0^National Oncology & Chemotherapy Infusion July 2022^1^0^1^1^^133^80^9^1^^1^p^1^3
;;^UTILITY(U,$J,358,4,2,0)
;;=^358.02I^2^2
;;^UTILITY(U,$J,358,4,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,4,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,5,0)
;;=NATIONAL NEUROLOGY FY22-Q4^0^National Neurology July 2022^1^0^1^1^^133^80^7^1^^1^p^1
;;^UTILITY(U,$J,358,6,0)
;;=NATIONAL ADHC FY22-Q4^2^National Adult Day Health Care July 2022 ^1^0^1^1^^133^80^4^1^^1^p^1^3
;;^UTILITY(U,$J,358,7,0)
;;=NATIONAL BLIND REHAB FY22-Q4^0^National Blind Rehab Service July 2022^1^0^0^1^^133^80^3^1^^1^p^1
;;^UTILITY(U,$J,358,7,2,0)
;;=^358.02I^1^1
;;^UTILITY(U,$J,358,7,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,8,0)
;;=NATL CARDIOLOGY/CATH FY22-Q4^1^National Cardiology/Card Cath July 2022^1^0^1^1^^133^80^13^1^^1^p^1^3
;;^UTILITY(U,$J,358,9,0)
;;=NATIONAL CHIROPRACTIC FY22-Q4^2^National Chiropractic July 2022^1^0^1^1^^133^80^4^1^^1^p^1^3
;;^UTILITY(U,$J,358,9,2,0)
;;=^358.02I^1^1
;;^UTILITY(U,$J,358,9,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,10,0)
;;=NATIONAL CLIN PHARM FY22-Q4^2^National Clinical Pharmacist July 2022^1^0^1^1^^133^80^3^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,10,2,0)
;;=^358.02I^1^1
;;^UTILITY(U,$J,358,10,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,11,0)
;;=NATIONAL DIABETES FY22-Q4^2^National Diabetes July 2022^1^0^1^1^^133^80^6^1^^1^p^1^3
;;^UTILITY(U,$J,358,11,2,0)
;;=^358.02I^2^2
;;^UTILITY(U,$J,358,11,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,11,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,12,0)
;;=NATIONAL ED FY22-Q4^1^National Emergency Dept July 2022^1^0^1^1^^133^80^13^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,12,2,0)
;;=^358.02I^6^6
;;^UTILITY(U,$J,358,12,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,12,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,12,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,12,2,4,0)
;;=2^1
;;^UTILITY(U,$J,358,12,2,5,0)
;;=4^1
;;^UTILITY(U,$J,358,12,2,6,0)
;;=5^1
;;^UTILITY(U,$J,358,13,0)
;;=NATIONAL ENDOCRINOLOGY FY22-Q4^0^National Endocrinology July 2022^1^0^1^1^^133^80^4^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,14,0)
;;=NATIONAL EYE TECH FY22-Q4^1^National Eye Technician July 2022^1^0^1^1^^133^80^11^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,14,2,0)
;;=^358.02I^4^4
;;^UTILITY(U,$J,358,14,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,14,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,14,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,14,2,4,0)
;;=4^1
;;^UTILITY(U,$J,358,15,0)
;;=NATIONAL EYE FY22-Q4^1^National Eye July 2022^1^0^1^1^^133^80^13^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,15,2,0)
;;=^358.02I^4^4
;;^UTILITY(U,$J,358,15,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,15,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,15,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,15,2,4,0)
;;=4^1
;;^UTILITY(U,$J,358,16,0)
;;=NATL GI/HEPATOLOGY FY22-Q4^0^National GI and Hepatology July 2022^1^0^0^1^^133^80^11^1^^1^p^1^3
;;^UTILITY(U,$J,358,17,0)
;;=NATL HBPC CLIN FY22-Q4^1^National HBPC Clinician July 2022^1^0^1^1^^133^80^36^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,17,2,0)
;;=^358.02I^4^4
;;^UTILITY(U,$J,358,17,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,17,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,17,2,3,0)
;;=4^1
;;^UTILITY(U,$J,358,17,2,4,0)
;;=4^1
;;^UTILITY(U,$J,358,18,0)
;;=NATL HBPC NURSING FY22-Q4^1^National HBPC Nursing July 2022^1^0^1^1^^133^80^9^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,18,2,0)
;;=^358.02I^4^4
;;^UTILITY(U,$J,358,18,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,18,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,18,2,3,0)
;;=4^1
;;^UTILITY(U,$J,358,18,2,4,0)
;;=4^1
;;^UTILITY(U,$J,358,19,0)
;;=NATL HBPC REHAB FY22-Q4^2^National HBPC Rehab Therapy July 2022 ^1^0^1^1^^133^80^19^1^^1^p^1^3
;;^UTILITY(U,$J,358,19,2,0)
;;=^358.02I^3^3
;;^UTILITY(U,$J,358,19,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,19,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,19,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,20,0)
;;=NATIONAL INPATIENT FY22-Q4^0^National Inpatient July 2022^1^0^1^1^^133^80^16^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,20,2,0)
;;=^358.02I^7^7
;;^UTILITY(U,$J,358,20,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,20,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,20,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,20,2,4,0)
;;=2^1
;;^UTILITY(U,$J,358,20,2,5,0)
;;=4^1
;;^UTILITY(U,$J,358,20,2,6,0)
;;=5^1
;;^UTILITY(U,$J,358,20,2,7,0)
;;=6^1
;;^UTILITY(U,$J,358,21,0)
;;=NATIONAL MEDICINE FY22-Q4^1^National Medicine July 2022^1^0^1^1^^133^80^36^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,21,2,0)
;;=^358.02I^6^6
;;^UTILITY(U,$J,358,21,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,21,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,21,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,21,2,4,0)
;;=2^1
;;^UTILITY(U,$J,358,21,2,5,0)
;;=4^1
;;^UTILITY(U,$J,358,21,2,6,0)
;;=5^1
;;^UTILITY(U,$J,358,22,0)
;;=NATL NURSING CLINIC FY22-Q4^1^National Nursing Clinic July 2022^1^0^1^1^^133^80^10^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,22,2,0)
;;=^358.02I^4^4
;;^UTILITY(U,$J,358,22,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,22,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,22,2,3,0)
;;=4^1
;;^UTILITY(U,$J,358,22,2,4,0)
;;=4^1
;;^UTILITY(U,$J,358,23,0)
;;=NATIONAL OB/GYN FY22-Q4^2^National OB/GYN July 2022^1^0^1^1^^133^80^16^1^^1^p^1^3
;;^UTILITY(U,$J,358,24,0)
;;=NATL PHYSIATRIST INPT FY22-Q4^2^National Inpatient Physiatrist July 2022^1^0^1^1^^133^80^13^1^^1^p^1^3
;;^UTILITY(U,$J,358,24,2,0)
;;=^358.02I^3^3
;;^UTILITY(U,$J,358,24,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,24,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,24,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,25,0)
;;=NATL PHYSIATRIST OTPT FY22-Q4^2^National Outpatient Physiatrist July 2022^1^0^1^1^^133^80^13^1^^1^p^1^3
;;^UTILITY(U,$J,358,25,2,0)
;;=^358.02I^3^3
;;^UTILITY(U,$J,358,25,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,25,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,25,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,26,0)
;;=NATIONAL PRIMARY CARE FY22-Q4^1^National Primary Care June 2022^1^0^1^1^^133^80^37^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,26,2,0)
;;=^358.02I^6^6
;;^UTILITY(U,$J,358,26,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,26,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,26,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,26,2,4,0)
;;=2^1
;;^UTILITY(U,$J,358,26,2,5,0)
;;=4^1
;;^UTILITY(U,$J,358,26,2,6,0)
;;=5^1
;;^UTILITY(U,$J,358,27,0)
;;=NATIONAL PULMONARY FY22-Q4^0^National Pulmonary July 2022^1^0^0^1^^133^80^13^1^^1^p^1
;;^UTILITY(U,$J,358,27,2,0)
;;=^358.02I^2^2
;;^UTILITY(U,$J,358,27,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,27,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,28,0)
;;=NATIONAL SCI FY22-Q4^1^National Spinal Cord Injury July 2022^1^0^1^1^^133^80^6^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,28,2,0)
;;=^358.02I^6^6
;;^UTILITY(U,$J,358,28,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,28,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,28,2,3,0)
;;=3^1
;;^UTILITY(U,$J,358,28,2,4,0)
;;=2^1
;;^UTILITY(U,$J,358,28,2,5,0)
;;=4^1
;;^UTILITY(U,$J,358,28,2,6,0)
;;=5^1
;;^UTILITY(U,$J,358,29,0)
;;=NATIONAL TELEPHONE FY22-Q4^2^National Telephone July 2022^1^0^1^1^^133^80^2^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,29,2,0)
;;=^358.02I^2^2
;;^UTILITY(U,$J,358,29,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,29,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,30,0)
;;=NATIONAL TELE-EYE FY22-Q4^2^National Tele-Eye Exams July 2022^1^0^1^1^^133^80^10^1^^1^p^1^3
;;^UTILITY(U,$J,358,30,2,0)
;;=^358.02I^2^2
;;^UTILITY(U,$J,358,30,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,30,2,2,0)
;;=2^1
;;^UTILITY(U,$J,358,31,0)
;;=NATIONAL ANESTHESIA FY22-Q4^0^National Anesthesia July 2022^1^0^1^1^^133^80^8^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,32,0)
;;=NATL HOSP/PALL INPT FY22-Q4^2^National Inpatient Hospice & Palliative Care July 2022^1^0^1^1^^133^80^6^1^^1^p^1^3
;;^UTILITY(U,$J,358,33,0)
;;=NATL HOSP/PALL OTPT FY22-Q4^2^National Outpatient Hospice & Palliative Care July 2022^1^0^1^1^^133^80^5^1^^1^p^1^3
;;^UTILITY(U,$J,358,34,0)
;;=NATL COVID19 SPLMNTL FY22-Q4^0^National COVID-19 ICD Supplemental Form July 2022^1^0^0^1^^133^80^1^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,35,0)
;;=NATL TEL COVID19 SPMTL FY22-Q4^0^National Telephone COVID-19 Supplemental Form July 2022^1^0^0^1^^133^80^2^1^^1^p^1^2.1
;;^UTILITY(U,$J,358,37,0)
;;=NATL REMOTE MONITORING FY22-Q4^2^National Remote Monitoring July 2022^1^0^1^1^^133^80^1^0^^1^p^1^3
;;^UTILITY(U,$J,358,37,2,0)
;;=^358.02I^2^2
;;^UTILITY(U,$J,358,37,2,1,0)
;;=1^1
;;^UTILITY(U,$J,358,37,2,2,0)
;;=2^1
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI002 9639 printed Sep 02, 2024@18:24:19 Page 2
IBDEI002 ; ; 01-AUG-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
+2 if 'DIFQR(358)
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)
+2 ;;=^IBE(358,
+3 ;;^UTILITY(U,$J,358,0)
+4 ;;=IMP/EXP ENCOUNTER FORM^358I^37^36
+5 ;;^UTILITY(U,$J,358,1,0)
+6 ;;=NATIONAL ECOE TELE FY22-Q4^2^National Epilepsy Center of Excellence Telephone July 2022^1^0^0^1^^133^80^2^1^^1^p^1^2.1
+7 ;;^UTILITY(U,$J,358,1,2,0)
+8 ;;=^358.02I^1^1
+9 ;;^UTILITY(U,$J,358,1,2,1,0)
+10 ;;=1^1
+11 ;;^UTILITY(U,$J,358,2,0)
+12 ;;=NATL PREVENTIVE HEALTH FY22-Q4^1^National Preventive Health July 2022^1^0^1^1^^133^80^4^1^^1^p^1^2.1
+13 ;;^UTILITY(U,$J,358,2,2,0)
+14 ;;=^358.02I^6^6
+15 ;;^UTILITY(U,$J,358,2,2,1,0)
+16 ;;=1^1
+17 ;;^UTILITY(U,$J,358,2,2,2,0)
+18 ;;=2^1
+19 ;;^UTILITY(U,$J,358,2,2,3,0)
+20 ;;=3^1
+21 ;;^UTILITY(U,$J,358,2,2,4,0)
+22 ;;=2^1
+23 ;;^UTILITY(U,$J,358,2,2,5,0)
+24 ;;=4^1
+25 ;;^UTILITY(U,$J,358,2,2,6,0)
+26 ;;=5^1
+27 ;;^UTILITY(U,$J,358,3,0)
+28 ;;=NATIONAL SLEEP MED FY22-Q4^0^National Sleep Medicine July 2022^1^0^1^1^^133^80^3^0^^1^p^1^2.1
+29 ;;^UTILITY(U,$J,358,3,2,0)
+30 ;;=^358.02I^2^2
+31 ;;^UTILITY(U,$J,358,3,2,1,0)
+32 ;;=2^1
+33 ;;^UTILITY(U,$J,358,3,2,2,0)
+34 ;;=1^1
+35 ;;^UTILITY(U,$J,358,4,0)
+36 ;;=NATL ONC/CHEMO INF FY22-Q4^0^National Oncology & Chemotherapy Infusion July 2022^1^0^1^1^^133^80^9^1^^1^p^1^3
+37 ;;^UTILITY(U,$J,358,4,2,0)
+38 ;;=^358.02I^2^2
+39 ;;^UTILITY(U,$J,358,4,2,1,0)
+40 ;;=1^1
+41 ;;^UTILITY(U,$J,358,4,2,2,0)
+42 ;;=2^1
+43 ;;^UTILITY(U,$J,358,5,0)
+44 ;;=NATIONAL NEUROLOGY FY22-Q4^0^National Neurology July 2022^1^0^1^1^^133^80^7^1^^1^p^1
+45 ;;^UTILITY(U,$J,358,6,0)
+46 ;;=NATIONAL ADHC FY22-Q4^2^National Adult Day Health Care July 2022 ^1^0^1^1^^133^80^4^1^^1^p^1^3
+47 ;;^UTILITY(U,$J,358,7,0)
+48 ;;=NATIONAL BLIND REHAB FY22-Q4^0^National Blind Rehab Service July 2022^1^0^0^1^^133^80^3^1^^1^p^1
+49 ;;^UTILITY(U,$J,358,7,2,0)
+50 ;;=^358.02I^1^1
+51 ;;^UTILITY(U,$J,358,7,2,1,0)
+52 ;;=1^1
+53 ;;^UTILITY(U,$J,358,8,0)
+54 ;;=NATL CARDIOLOGY/CATH FY22-Q4^1^National Cardiology/Card Cath July 2022^1^0^1^1^^133^80^13^1^^1^p^1^3
+55 ;;^UTILITY(U,$J,358,9,0)
+56 ;;=NATIONAL CHIROPRACTIC FY22-Q4^2^National Chiropractic July 2022^1^0^1^1^^133^80^4^1^^1^p^1^3
+57 ;;^UTILITY(U,$J,358,9,2,0)
+58 ;;=^358.02I^1^1
+59 ;;^UTILITY(U,$J,358,9,2,1,0)
+60 ;;=1^1
+61 ;;^UTILITY(U,$J,358,10,0)
+62 ;;=NATIONAL CLIN PHARM FY22-Q4^2^National Clinical Pharmacist July 2022^1^0^1^1^^133^80^3^1^^1^p^1^2.1
+63 ;;^UTILITY(U,$J,358,10,2,0)
+64 ;;=^358.02I^1^1
+65 ;;^UTILITY(U,$J,358,10,2,1,0)
+66 ;;=1^1
+67 ;;^UTILITY(U,$J,358,11,0)
+68 ;;=NATIONAL DIABETES FY22-Q4^2^National Diabetes July 2022^1^0^1^1^^133^80^6^1^^1^p^1^3
+69 ;;^UTILITY(U,$J,358,11,2,0)
+70 ;;=^358.02I^2^2
+71 ;;^UTILITY(U,$J,358,11,2,1,0)
+72 ;;=1^1
+73 ;;^UTILITY(U,$J,358,11,2,2,0)
+74 ;;=2^1
+75 ;;^UTILITY(U,$J,358,12,0)
+76 ;;=NATIONAL ED FY22-Q4^1^National Emergency Dept July 2022^1^0^1^1^^133^80^13^1^^1^p^1^2.1
+77 ;;^UTILITY(U,$J,358,12,2,0)
+78 ;;=^358.02I^6^6
+79 ;;^UTILITY(U,$J,358,12,2,1,0)
+80 ;;=1^1
+81 ;;^UTILITY(U,$J,358,12,2,2,0)
+82 ;;=2^1
+83 ;;^UTILITY(U,$J,358,12,2,3,0)
+84 ;;=3^1
+85 ;;^UTILITY(U,$J,358,12,2,4,0)
+86 ;;=2^1
+87 ;;^UTILITY(U,$J,358,12,2,5,0)
+88 ;;=4^1
+89 ;;^UTILITY(U,$J,358,12,2,6,0)
+90 ;;=5^1
+91 ;;^UTILITY(U,$J,358,13,0)
+92 ;;=NATIONAL ENDOCRINOLOGY FY22-Q4^0^National Endocrinology July 2022^1^0^1^1^^133^80^4^1^^1^p^1^2.1
+93 ;;^UTILITY(U,$J,358,14,0)
+94 ;;=NATIONAL EYE TECH FY22-Q4^1^National Eye Technician July 2022^1^0^1^1^^133^80^11^1^^1^p^1^2.1
+95 ;;^UTILITY(U,$J,358,14,2,0)
+96 ;;=^358.02I^4^4
+97 ;;^UTILITY(U,$J,358,14,2,1,0)
+98 ;;=1^1
+99 ;;^UTILITY(U,$J,358,14,2,2,0)
+100 ;;=2^1
+101 ;;^UTILITY(U,$J,358,14,2,3,0)
+102 ;;=3^1
+103 ;;^UTILITY(U,$J,358,14,2,4,0)
+104 ;;=4^1
+105 ;;^UTILITY(U,$J,358,15,0)
+106 ;;=NATIONAL EYE FY22-Q4^1^National Eye July 2022^1^0^1^1^^133^80^13^1^^1^p^1^2.1
+107 ;;^UTILITY(U,$J,358,15,2,0)
+108 ;;=^358.02I^4^4
+109 ;;^UTILITY(U,$J,358,15,2,1,0)
+110 ;;=1^1
+111 ;;^UTILITY(U,$J,358,15,2,2,0)
+112 ;;=2^1
+113 ;;^UTILITY(U,$J,358,15,2,3,0)
+114 ;;=3^1
+115 ;;^UTILITY(U,$J,358,15,2,4,0)
+116 ;;=4^1
+117 ;;^UTILITY(U,$J,358,16,0)
+118 ;;=NATL GI/HEPATOLOGY FY22-Q4^0^National GI and Hepatology July 2022^1^0^0^1^^133^80^11^1^^1^p^1^3
+119 ;;^UTILITY(U,$J,358,17,0)
+120 ;;=NATL HBPC CLIN FY22-Q4^1^National HBPC Clinician July 2022^1^0^1^1^^133^80^36^1^^1^p^1^2.1
+121 ;;^UTILITY(U,$J,358,17,2,0)
+122 ;;=^358.02I^4^4
+123 ;;^UTILITY(U,$J,358,17,2,1,0)
+124 ;;=1^1
+125 ;;^UTILITY(U,$J,358,17,2,2,0)
+126 ;;=2^1
+127 ;;^UTILITY(U,$J,358,17,2,3,0)
+128 ;;=4^1
+129 ;;^UTILITY(U,$J,358,17,2,4,0)
+130 ;;=4^1
+131 ;;^UTILITY(U,$J,358,18,0)
+132 ;;=NATL HBPC NURSING FY22-Q4^1^National HBPC Nursing July 2022^1^0^1^1^^133^80^9^1^^1^p^1^2.1
+133 ;;^UTILITY(U,$J,358,18,2,0)
+134 ;;=^358.02I^4^4
+135 ;;^UTILITY(U,$J,358,18,2,1,0)
+136 ;;=1^1
+137 ;;^UTILITY(U,$J,358,18,2,2,0)
+138 ;;=2^1
+139 ;;^UTILITY(U,$J,358,18,2,3,0)
+140 ;;=4^1
+141 ;;^UTILITY(U,$J,358,18,2,4,0)
+142 ;;=4^1
+143 ;;^UTILITY(U,$J,358,19,0)
+144 ;;=NATL HBPC REHAB FY22-Q4^2^National HBPC Rehab Therapy July 2022 ^1^0^1^1^^133^80^19^1^^1^p^1^3
+145 ;;^UTILITY(U,$J,358,19,2,0)
+146 ;;=^358.02I^3^3
+147 ;;^UTILITY(U,$J,358,19,2,1,0)
+148 ;;=1^1
+149 ;;^UTILITY(U,$J,358,19,2,2,0)
+150 ;;=2^1
+151 ;;^UTILITY(U,$J,358,19,2,3,0)
+152 ;;=3^1
+153 ;;^UTILITY(U,$J,358,20,0)
+154 ;;=NATIONAL INPATIENT FY22-Q4^0^National Inpatient July 2022^1^0^1^1^^133^80^16^1^^1^p^1^2.1
+155 ;;^UTILITY(U,$J,358,20,2,0)
+156 ;;=^358.02I^7^7
+157 ;;^UTILITY(U,$J,358,20,2,1,0)
+158 ;;=1^1
+159 ;;^UTILITY(U,$J,358,20,2,2,0)
+160 ;;=2^1
+161 ;;^UTILITY(U,$J,358,20,2,3,0)
+162 ;;=3^1
+163 ;;^UTILITY(U,$J,358,20,2,4,0)
+164 ;;=2^1
+165 ;;^UTILITY(U,$J,358,20,2,5,0)
+166 ;;=4^1
+167 ;;^UTILITY(U,$J,358,20,2,6,0)
+168 ;;=5^1
+169 ;;^UTILITY(U,$J,358,20,2,7,0)
+170 ;;=6^1
+171 ;;^UTILITY(U,$J,358,21,0)
+172 ;;=NATIONAL MEDICINE FY22-Q4^1^National Medicine July 2022^1^0^1^1^^133^80^36^1^^1^p^1^2.1
+173 ;;^UTILITY(U,$J,358,21,2,0)
+174 ;;=^358.02I^6^6
+175 ;;^UTILITY(U,$J,358,21,2,1,0)
+176 ;;=1^1
+177 ;;^UTILITY(U,$J,358,21,2,2,0)
+178 ;;=2^1
+179 ;;^UTILITY(U,$J,358,21,2,3,0)
+180 ;;=3^1
+181 ;;^UTILITY(U,$J,358,21,2,4,0)
+182 ;;=2^1
+183 ;;^UTILITY(U,$J,358,21,2,5,0)
+184 ;;=4^1
+185 ;;^UTILITY(U,$J,358,21,2,6,0)
+186 ;;=5^1
+187 ;;^UTILITY(U,$J,358,22,0)
+188 ;;=NATL NURSING CLINIC FY22-Q4^1^National Nursing Clinic July 2022^1^0^1^1^^133^80^10^1^^1^p^1^2.1
+189 ;;^UTILITY(U,$J,358,22,2,0)
+190 ;;=^358.02I^4^4
+191 ;;^UTILITY(U,$J,358,22,2,1,0)
+192 ;;=1^1
+193 ;;^UTILITY(U,$J,358,22,2,2,0)
+194 ;;=2^1
+195 ;;^UTILITY(U,$J,358,22,2,3,0)
+196 ;;=4^1
+197 ;;^UTILITY(U,$J,358,22,2,4,0)
+198 ;;=4^1
+199 ;;^UTILITY(U,$J,358,23,0)
+200 ;;=NATIONAL OB/GYN FY22-Q4^2^National OB/GYN July 2022^1^0^1^1^^133^80^16^1^^1^p^1^3
+201 ;;^UTILITY(U,$J,358,24,0)
+202 ;;=NATL PHYSIATRIST INPT FY22-Q4^2^National Inpatient Physiatrist July 2022^1^0^1^1^^133^80^13^1^^1^p^1^3
+203 ;;^UTILITY(U,$J,358,24,2,0)
+204 ;;=^358.02I^3^3
+205 ;;^UTILITY(U,$J,358,24,2,1,0)
+206 ;;=1^1
+207 ;;^UTILITY(U,$J,358,24,2,2,0)
+208 ;;=2^1
+209 ;;^UTILITY(U,$J,358,24,2,3,0)
+210 ;;=3^1
+211 ;;^UTILITY(U,$J,358,25,0)
+212 ;;=NATL PHYSIATRIST OTPT FY22-Q4^2^National Outpatient Physiatrist July 2022^1^0^1^1^^133^80^13^1^^1^p^1^3
+213 ;;^UTILITY(U,$J,358,25,2,0)
+214 ;;=^358.02I^3^3
+215 ;;^UTILITY(U,$J,358,25,2,1,0)
+216 ;;=1^1
+217 ;;^UTILITY(U,$J,358,25,2,2,0)
+218 ;;=2^1
+219 ;;^UTILITY(U,$J,358,25,2,3,0)
+220 ;;=3^1
+221 ;;^UTILITY(U,$J,358,26,0)
+222 ;;=NATIONAL PRIMARY CARE FY22-Q4^1^National Primary Care June 2022^1^0^1^1^^133^80^37^1^^1^p^1^2.1
+223 ;;^UTILITY(U,$J,358,26,2,0)
+224 ;;=^358.02I^6^6
+225 ;;^UTILITY(U,$J,358,26,2,1,0)
+226 ;;=1^1
+227 ;;^UTILITY(U,$J,358,26,2,2,0)
+228 ;;=2^1
+229 ;;^UTILITY(U,$J,358,26,2,3,0)
+230 ;;=3^1
+231 ;;^UTILITY(U,$J,358,26,2,4,0)
+232 ;;=2^1
+233 ;;^UTILITY(U,$J,358,26,2,5,0)
+234 ;;=4^1
+235 ;;^UTILITY(U,$J,358,26,2,6,0)
+236 ;;=5^1
+237 ;;^UTILITY(U,$J,358,27,0)
+238 ;;=NATIONAL PULMONARY FY22-Q4^0^National Pulmonary July 2022^1^0^0^1^^133^80^13^1^^1^p^1
+239 ;;^UTILITY(U,$J,358,27,2,0)
+240 ;;=^358.02I^2^2
+241 ;;^UTILITY(U,$J,358,27,2,1,0)
+242 ;;=1^1
+243 ;;^UTILITY(U,$J,358,27,2,2,0)
+244 ;;=2^1
+245 ;;^UTILITY(U,$J,358,28,0)
+246 ;;=NATIONAL SCI FY22-Q4^1^National Spinal Cord Injury July 2022^1^0^1^1^^133^80^6^1^^1^p^1^2.1
+247 ;;^UTILITY(U,$J,358,28,2,0)
+248 ;;=^358.02I^6^6
+249 ;;^UTILITY(U,$J,358,28,2,1,0)
+250 ;;=1^1
+251 ;;^UTILITY(U,$J,358,28,2,2,0)
+252 ;;=2^1
+253 ;;^UTILITY(U,$J,358,28,2,3,0)
+254 ;;=3^1
+255 ;;^UTILITY(U,$J,358,28,2,4,0)
+256 ;;=2^1
+257 ;;^UTILITY(U,$J,358,28,2,5,0)
+258 ;;=4^1
+259 ;;^UTILITY(U,$J,358,28,2,6,0)
+260 ;;=5^1
+261 ;;^UTILITY(U,$J,358,29,0)
+262 ;;=NATIONAL TELEPHONE FY22-Q4^2^National Telephone July 2022^1^0^1^1^^133^80^2^1^^1^p^1^2.1
+263 ;;^UTILITY(U,$J,358,29,2,0)
+264 ;;=^358.02I^2^2
+265 ;;^UTILITY(U,$J,358,29,2,1,0)
+266 ;;=1^1
+267 ;;^UTILITY(U,$J,358,29,2,2,0)
+268 ;;=2^1
+269 ;;^UTILITY(U,$J,358,30,0)
+270 ;;=NATIONAL TELE-EYE FY22-Q4^2^National Tele-Eye Exams July 2022^1^0^1^1^^133^80^10^1^^1^p^1^3
+271 ;;^UTILITY(U,$J,358,30,2,0)
+272 ;;=^358.02I^2^2
+273 ;;^UTILITY(U,$J,358,30,2,1,0)
+274 ;;=1^1
+275 ;;^UTILITY(U,$J,358,30,2,2,0)
+276 ;;=2^1
+277 ;;^UTILITY(U,$J,358,31,0)
+278 ;;=NATIONAL ANESTHESIA FY22-Q4^0^National Anesthesia July 2022^1^0^1^1^^133^80^8^1^^1^p^1^2.1
+279 ;;^UTILITY(U,$J,358,32,0)
+280 ;;=NATL HOSP/PALL INPT FY22-Q4^2^National Inpatient Hospice & Palliative Care July 2022^1^0^1^1^^133^80^6^1^^1^p^1^3
+281 ;;^UTILITY(U,$J,358,33,0)
+282 ;;=NATL HOSP/PALL OTPT FY22-Q4^2^National Outpatient Hospice & Palliative Care July 2022^1^0^1^1^^133^80^5^1^^1^p^1^3
+283 ;;^UTILITY(U,$J,358,34,0)
+284 ;;=NATL COVID19 SPLMNTL FY22-Q4^0^National COVID-19 ICD Supplemental Form July 2022^1^0^0^1^^133^80^1^1^^1^p^1^2.1
+285 ;;^UTILITY(U,$J,358,35,0)
+286 ;;=NATL TEL COVID19 SPMTL FY22-Q4^0^National Telephone COVID-19 Supplemental Form July 2022^1^0^0^1^^133^80^2^1^^1^p^1^2.1
+287 ;;^UTILITY(U,$J,358,37,0)
+288 ;;=NATL REMOTE MONITORING FY22-Q4^2^National Remote Monitoring July 2022^1^0^1^1^^133^80^1^0^^1^p^1^3
+289 ;;^UTILITY(U,$J,358,37,2,0)
+290 ;;=^358.02I^2^2
+291 ;;^UTILITY(U,$J,358,37,2,1,0)
+292 ;;=1^1
+293 ;;^UTILITY(U,$J,358,37,2,2,0)
+294 ;;=2^1