STANDARD DATA DICTIONARY #356.94 -- INPATIENT PROVIDERS FILE                                                      3/24/25    PAGE 1
STORED IN ^IBT(356.94,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file is to allow the claims tracking module store the admitting physician.  In addition, the attending and resident providers
can be identified in this file.  If attending and resident providers are entered then they are assume to be entered completely for
an episode of care being tracked.  If no provider other than admitting physician is entered then the providers and attending from
MAS will be considered to the the correct providers.  Because QM data may be extracting this data on the national roll-up, it is
necessary to correctly identify the attending physician.  
 
Per VHA Directive 10-93-142, this file definition should not be modified.  


              DD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: ADMISSION MOVEMENT (#.02)[R], PROVIDER (#.03)
      "WRITE": N Y S Y=$G(^(0)) W "   ",$P($G(^DPT(+$P($G(^DGPM(+$P(Y,U,2),0)),U,3),0)),U)

CROSS
REFERENCED BY: ADMISSION MOVEMENT(ADG), PROVIDER(ADG1), TYPE PROVIDER(ADG2), ADMISSION MOVEMENT(ADGPM), PROVIDER(ADGPM1), 
               ADMISSION MOVEMENT(ATP), TYPE PROVIDER(ATP1), DATE OF CHANGE(B), ADMISSION MOVEMENT(C), PROVIDER(D)



356.94,.01    DATE OF CHANGE         0;1 DATE (Required)

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X K:'$$DTCHK^IBTRE5($G(DA),$G(X)) X
              LAST EDITED:      FEB 22, 1994 
              HELP-PROMPT:      Enter the date the is provider assumes responsibility for the patient.  It can not be before the 
                                admission date or after the discharge date or if not discharged, more than 7 days into the future. 
              DESCRIPTION:      This is the first day that this provider is responsible for care for the patient.  Enter the date
                                that the provider assumes responsibility.  For claims tracking purposes the provider will be
                                resonsible for the care from this date (inclusive) until another provider assumes responsibility
                                for the same level.  
                                 
                                The date must not be before the admission date or after the discharge date.  If a current
                                inpatient, it can not be more than 7 days into the future.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  356.94^B 
                                1)= S ^IBT(356.94,"B",$E(X,1,30),DA)=""
                                2)= K ^IBT(356.94,"B",$E(X,1,30),DA)


356.94,.02    ADMISSION MOVEMENT     0;2 POINTER TO PATIENT MOVEMENT FILE (#405) (Required)

              INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      FEB 22, 1994 
              DESCRIPTION:
                                This is the admission movement that the provider is responsible for.  

              SCREEN:           S DIC("S")="I $P(^(0),U,2)=1"
              EXPLANATION:      Must be an admission movement.
              CROSS-REFERENCE:  356.94^C 
                                1)= S ^IBT(356.94,"C",$E(X,1,30),DA)=""
                                2)= K ^IBT(356.94,"C",$E(X,1,30),DA)
                                Regular cross reference of all inpatient provider entries by the admission movement.  


              CROSS-REFERENCE:  356.94^ADG^MUMPS 
                                1)= S:$P(^IBT(356.94,DA,0),U,4)=3&($P(^(0),U,3)) ^IBT(356.94,"ADG",X,+$P(^(0),U,3),DA)=""
                                2)= K ^IBT(356.94,"ADG",X,+$P(^IBT(356.94,DA,0),U,3),DA)
                                Cross reference of all admitting provider entries by admission movement, by provider.  


              CROSS-REFERENCE:  356.94^ADGPM^MUMPS 
                                1)= S:$P(^IBT(356.94,DA,0),U,3) ^IBT(356.94,"ADGPM",X,+$P(^(0),U,3),DA)=""
                                2)= K ^IBT(356.94,"ADGPM",X,+$P(^IBT(356.94,DA,0),U,3),DA)
                                Cross reference of all inpatient provider entries by patient movement, by provider.  


              CROSS-REFERENCE:  356.94^ATP^MUMPS 
                                1)= S:$P(^IBT(356.94,DA,0),U,4) ^IBT(356.94,"ATP",X,+$P(^(0),U,4),DA)=""
                                2)= K ^IBT(356.94,"ATP",X,+$P(^IBT(356.94,DA,0),U,4),DA)
                                Cross reference of all inpatient provider entries by admission movement by type of provider.  



356.94,.03    PROVIDER               0;3 POINTER TO NEW PERSON FILE (#200)

              INPUT TRANSFORM:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P(^(0),U,1),+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      FEB 22, 1994 
              DESCRIPTION:
                                Enter the name of the provider who is responsible for care of this patient.  

              SCREEN:           S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P(^(0),U,1),+Y))"
              EXPLANATION:      Must be a provder.
              CROSS-REFERENCE:  356.94^D 
                                1)= S ^IBT(356.94,"D",$E(X,1,30),DA)=""
                                2)= K ^IBT(356.94,"D",$E(X,1,30),DA)
                                Regular cross-reference of all inpatient provider entries by provider.  


              CROSS-REFERENCE:  356.94^ADG1^MUMPS 
                                1)= S:$P(^IBT(356.94,DA,0),U,4)=3&($P(^(0),U,2)) ^IBT(356.94,"ADG",+$P(^(0),U,2),X,DA)=""
                                2)= K ^IBT(356.94,"ADG",+$P(^IBT(356.94,DA,0),U,2),X,DA)
                                Cross reference of all admitting provider entries by admission movement, by provider.  


              CROSS-REFERENCE:  356.94^ADGPM1^MUMPS 
                                1)= S:$P(^IBT(356.94,DA,0),U,2) ^IBT(356.94,"ADGPM",+$P(^(0),U,2),X,DA)=""
                                2)= K ^IBT(356.94,"ADGPM",+$P(^IBT(356.94,DA,0),U,2),X,DA)
                                Cross reference of all inpatient provider entries by patient movement, by provider.  



356.94,.04    TYPE PROVIDER          0;4 SET (Required)

                                '1' FOR ATTENDING; 
                                '2' FOR PROVIDER; 
                                '3' FOR ADMITTING; 
              LAST EDITED:      FEB 22, 1994 
              DESCRIPTION:      Enter whether this physician is an attending physician, admitting physician, or the daily care
                                provider (or resident).  
                                 
                                It may be that the admitting physician is different from either the attending or provider.  If the
                                admission to acure care does not meet UR criteria, it is important to track the admitting
                                physician.  
                                 
                                The attending physician is the physician responsible for the care of the patient, more than one
                                physician may be the attending.  
                                 
                                The provider is the physician directly providing patient care.  In affiliated hospitals this can be
                                a resident or intern who is not necessarily responsible (the attending is responsible).  
                                 
                                Because UR reviews are done every day, it is important to be able to accurately track attendings
                                and providers related to care that does not meet critea.  
                                 

              SCREEN:           S DIC("S")="I $$DICS^IBTRE5(Y)"
              EXPLANATION:      Only one admitting physician allowed.
              CROSS-REFERENCE:  356.94^ADG2^MUMPS 
                                1)= S:X=3&($P(^IBT(356.94,DA,0),U,2))&($P(^(0),U,3)) ^IBT(356.94,"ADG",+$P(^(0),U,2),+$P(^(0),U,3),
                                DA)=""

                                2)= K ^IBT(356.94,"ADG",+$P(^IBT(356.94,DA,0),U,2),+$P(^(0),U,3),DA)
                                Cross reference of all admitting provider entries by admission movement, by provider.  


              CROSS-REFERENCE:  356.94^ATP1^MUMPS 
                                1)= S:$P(^IBT(356.94,DA,0),U,2) ^IBT(356.94,"ATP",+$P(^(0),U,2),X,DA)=""
                                2)= K ^IBT(356.94,"ATP",+$P(^IBT(356.94,DA,0),U,2),X,DA)
                                Cross reference of all inpatient provider entries by admission movement by type of provider.  




      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 PROVIDER (#.03)

PATIENT MOVEMENT (#405)           ADMISSION MOVEMENT (#.02)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):