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 23, 2025@19:14:56                                                                                                                                                                                                    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