STANDARD DATA DICTIONARY #355.92 -- FACILITY BILLING ID FILE                                                      3/24/25    PAGE 1
STORED IN ^IBA(355.92,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains one record for each facility id that an insurance company assigns to a facility.  Each record can be for an
insurance company and any combination of the patient status and form type.  There must be only one record for each combination.  



CROSS
REFERENCED BY: CARE UNITS(AC), INSURANCE COMPANY(B)

INDEXED BY:    INSURANCE COMPANY & DIVISION (AID), INSURANCE COMPANY & INDEX VALUE CARE UNIT & FORM TYPE APPLIED TO & INDEX VALUE
               DIVISION & PROVIDER ID TYPE (AUNIQ)




355.92,.01    INSURANCE COMPANY      0;1 POINTER TO INSURANCE COMPANY FILE (#36) (Required)

              LAST EDITED:      MAR 07, 2006 
              HELP-PROMPT:      Enter the name of the insurance company that is providing the id. 
              DESCRIPTION:
                                This is the insurance company that is providing the facility id.  

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

              CROSS-REFERENCE:  ^^TRIGGER^355.92^.1 
                                1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^IBA(355.92,D0,0)):^(0),1:"") S X=$P(Y(1),U
                                ,10)="" I X S X=DIV S Y(1)=$S($D(^IBA(355.92,D0,0)):^(0),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S 
                                X=DIV S X="*N/A*" X ^DD(355.92,.01,1,2,1.4)

                                1.4)= S DIH=$G(^IBA(355.92,DIV(0),0)),DIV=X S $P(^(0),U,10)=DIV,DIH=355.92,DIG=.1 D ^DICR

                                2)= Q
                                3)= This field is trigger on a new entry to the file and can not be edited.
                                CREATE CONDITION)= INDEX VALUE CARE UNIT=""
                                CREATE VALUE)= "*N/A*"
                                DELETE VALUE)= NO EFFECT
                                FIELD)= INDE

              CROSS-REFERENCE:  ^^TRIGGER^355.92^.11 
                                1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^IBA(355.92,D0,0)):^(0),1:"") S X=$P(Y(1),U
                                ,11)="" I X S X=DIV S Y(1)=$S($D(^IBA(355.92,D0,0)):^(0),1:"") S X=$P(Y(1),U,11),X=X S DIU=X K Y S 
                                X=DIV S X="*N/A*" X ^DD(355.92,.01,1,3,1.4)

                                1.4)= S DIH=$G(^IBA(355.92,DIV(0),0)),DIV=X S $P(^(0),U,11)=DIV,DIH=355.92,DIG=.11 D ^DICR

                                2)= Q
                                3)= This field is trigger on a new entry to the file and can not be edited.
                                CREATE CONDITION)= INDEX VALUE DIVISION=""
                                CREATE VALUE)= "*N/A*"
                                DELETE VALUE)= NO EFFECT
                                FIELD)= INDEX VALUE DIVISION

              RECORD INDEXES:   AID (#413), AUNIQ (#674)

355.92,.03    CARE UNITS             0;3 POINTER TO IB PROVIDER ID CARE UNIT FILE (#355.95)

              LAST EDITED:      MAR 21, 2006 
              DESCRIPTION:      This is the care unit for which this ID is being defined.  Care Units are only used for Billing
                                Provider Secondary ID #2 .  

              CROSS-REFERENCE:  ^^TRIGGER^355.92^.1 
                                1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S X=Y(0),X=X I X S X=DIV S Y(1)=$S($D(^IBA(355.92,D0,0))
                                :^(0),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=DIV,X=X X ^DD(355.92,.03,1,1,1.4)

                                1.4)= S DIH=$G(^IBA(355.92,DIV(0),0)),DIV=X S $P(^(0),U,10)=DIV,DIH=355.92,DIG=.1 D ^DICR

                                2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBA(355.92,D0,0)):^(0),1:"") S X=$P(Y(1),U,10),X=X 
                                S DIU=X K Y S X=DIV S X="*N/A*" S DIH=$G(^IBA(355.92,DIV(0),0)),DIV=X S $P(^(0),U,10)=DIV,DIH=355.9
                                2,DIG=.1 D ^DICR

                                CREATE CONDITION)= INTERNAL(CARE UNITS)
                                CREATE VALUE)= INTERNAL(CARE UNITS)
                                DELETE VALUE)= "*N/A*"
                                FIELD)= IND

              CROSS-REFERENCE:  355.92^AC 
                                1)= S ^IBA(355.92,"AC",$E(X,1,30),DA)=""
                                2)= K ^IBA(355.92,"AC",$E(X,1,30),DA)
                                This cross reference will determine whether a care unit is in use before it can be deleted 



355.92,.04    FORM TYPE APPLIED TO   0;4 SET (Required)

                                '0' FOR BOTH UB-04 AND CMS-1500 FORMS; 
                                '1' FOR UB-04 FORMS ONLY; 
                                '2' FOR CMS-1500 ONLY; 
                                '3' FOR PRESCRIPTION ONLY; 
              LAST EDITED:      JAN 16, 2007 
              HELP-PROMPT:      Select one or both forms that the facility id will apply to. 
              DESCRIPTION:      This designates whether the id number is to be used for just UB-04 form types, just CMS-1500 form
                                types or both form types.  

              RECORD INDEXES:   AUNIQ (#674)

355.92,.05    DIVISION               0;5 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8)

              LAST EDITED:      DEC 27, 2005 
              HELP-PROMPT:      Enter the specific division this id will be used for. 
              DESCRIPTION:
                                This designates which division this id number should be used for.  

              CROSS-REFERENCE:  ^^TRIGGER^355.92^.11 
                                1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S X=Y(0),X=X I X S X=DIV S Y(1)=$S($D(^IBA(355.92,D0,0))
                                :^(0),1:"") S X=$P(Y(1),U,11),X=X S DIU=X K Y S X=DIV S X=DIV,X=X X ^DD(355.92,.05,1,1,1.4)

                                1.4)= S DIH=$G(^IBA(355.92,DIV(0),0)),DIV=X S $P(^(0),U,11)=DIV,DIH=355.92,DIG=.11 D ^DICR

                                2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBA(355.92,D0,0)):^(0),1:"") S X=$P(Y(1),U,11),X=X 
                                S DIU=X K Y S X=DIV S X="*N/A*" S DIH=$G(^IBA(355.92,DIV(0),0)),DIV=X S $P(^(0),U,11)=DIV,DIH=355.9
                                2,DIG=.11 D ^DICR

                                CREATE CONDITION)= INTERNAL(DIVISION)
                                CREATE VALUE)= INTERNAL(DIVISION)
                                DELETE VALUE)= "*N/A*"
                                FIELD)= INDEX VALUE DIVISION

              RECORD INDEXES:   AID (#413)

355.92,.06    PROVIDER ID TYPE       0;6 POINTER TO IB PROVIDER ID # TYPE FILE (#355.97) (Required)

              INPUT TRANSFORM:  S DIC("S")="I $$FACID^IBCEP7(Y)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      MAY 12, 2004 
              HELP-PROMPT:      Enter the type of id # being recorded. 
              DESCRIPTION:
                                This is the indicator of what type of id is being recorded.  

              SCREEN:           S DIC("S")="I $$FACID^IBCEP7(Y)"
              EXPLANATION:      Must be a valid type for SUB2 record in EDI claim flat file
              RECORD INDEXES:   AUNIQ (#674)

355.92,.07    PROVIDER ID            0;7 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
              LAST EDITED:      MAY 11, 2004 
              HELP-PROMPT:      Answer must be 1-20 characters in length. 
              DESCRIPTION:
                                This is the facility ID that will be reported for the provider id type for the insurance co.  


355.92,.08    ID TYPE FLAG           0;8 SET

                                'E' FOR ELECTRONIC PLAN TYPE; 
                                'A' FOR ADDITIONAL IDS; 
                                'LF' FOR VA LAB/FACILITY ID; 
              LAST EDITED:      MAR 09, 2006 
              DESCRIPTION:
                                This is the flag that enables the code to tell the 3 types of IDs in this file apart. 


355.92,.1     INDEX VALUE CARE UNIT  0;10 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      DEC 30, 2005 
              HELP-PROMPT:      Answer must be 1-30 characters in length 
              DESCRIPTION:      This field contains the value for the care unit or '*N/A*' if no care unit is selected.  This is to
                                assure uniqueness in the records in the file even if the care unit is blank.  

              TECHNICAL DESCR:
                                Triggered on entry of the record by the .01 field to *N/A* 

              WRITE AUTHORITY:  ^
              NOTES:            TRIGGERED by the INSURANCE COMPANY field of the FACILITY BILLING ID File 
                                TRIGGERED by the CARE UNITS field of the FACILITY BILLING ID File 

              RECORD INDEXES:   AUNIQ (#674)

355.92,.11    INDEX VALUE DIVISION   0;11 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      DEC 30, 2005 
              HELP-PROMPT:      Answer must be 1-30 characters in length. 
              DESCRIPTION:      This field contains the value for the division or '*N/A*' if no division is selected.  This is to
                                assure uniqueness in the records in the file even if the division is blank.  

              TECHNICAL DESCR:
                                Triggered on entry of the record by the .01 field to *N/A* 

              WRITE AUTHORITY:  ^
              NOTES:            TRIGGERED by the INSURANCE COMPANY field of the FACILITY BILLING ID File 
                                TRIGGERED by the DIVISION field of the FACILITY BILLING ID File 

              RECORD INDEXES:   AUNIQ (#674)


      FILES POINTED TO                      FIELDS

IB PROVIDER ID # TYPE (#355.97)   PROVIDER ID TYPE (#.06)

IB PROVIDER ID CARE UNIT 
                   (#355.95)      CARE UNITS (#.03)

INSURANCE COMPANY (#36)           INSURANCE COMPANY (#.01)

MEDICAL CENTER DIVISION (#40.8)   DIVISION (#.05)


File #355.92

  Record Indexes:

  AID (#413)    RECORD    MUMPS    IR    ACTION
      Short Descr:  Xref by insurance co and division
        Set Logic:  S ^IBA(355.92,"AID",+X(1),+X(2),DA)=""
       Kill Logic:  K ^IBA(355.92,"AID",+X(1),+X(2),DA)
       Whole Kill:  K ^IBA(355.92,"AID")
             X(1):  INSURANCE COMPANY  (355.92,.01)  (forwards)
                      Transform (Display):   
             X(2):  DIVISION  (355.92,.05)  (forwards)
                      Transform (Display):   

  AUNIQ (#674)    RECORD    MUMPS    IR    SORTING ONLY
      Short Descr:  Xref by ins co,care unit,form type,division,prov id type
      Description:  This cross reference allows edits to the additonal provider id's to be replicated to linked insurance
                    companies.  
        Set Logic:  S ^IBA(355.92,"AUNIQ",X(1),$E(X(2),1,30),X(3),X(4),X(5),DA)=""
         Set Cond:  S X=0 I X(1)]"",X(2)]"",X(3)]"",X(4)]"",X(5)]"",$P($G(^IBA(355.92,DA,0)),U,8)="A" S X=1
       Kill Logic:  K ^IBA(355.92,"AUNIQ",X(1),$E(X(2),1,30),X(3),X(4),X(5),DA)
        Kill Cond:  S X=0 I X(1)]"",X(2)]"",X(3)]"",X(4)]"",X(5)]"" S X=1
       Whole Kill:  K ^IBA(355.92,"AUNIQ")
             X(1):  INSURANCE COMPANY  (355.92,.01)  (forwards)
             X(2):  INDEX VALUE CARE UNIT  (355.92,.1)  (Len 30)  (forwards)
             X(3):  FORM TYPE APPLIED TO  (355.92,.04)  (forwards)
             X(4):  INDEX VALUE DIVISION  (355.92,.11)  (forwards)
             X(5):  PROVIDER ID TYPE  (355.92,.06)  (forwards)


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):