Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  Found Entries  | All
Print Page as PDF
Global: ^IBE(365.021

Package: Integrated Billing

Global: ^IBE(365.021


Information

FileMan FileNo FileMan Filename Package
365.021 X12 271 CONTACT QUALIFIER Integrated Billing

Description

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
Integrated Billing 4 IBCNEHL2    IBCNES4    IBRFIHL2    IBTRH5C    

Pointed To By FileMan Files, Total: 4

Package Total FileMan Files
Integrated Billing 3 HEALTH CARE CLAIM RFAI (277)(#368)[102.01, 102.02, 102.03, 116.01, 116.02, 116.03]    IIV RESPONSE(#365)[#365.03(.02), #365.03(.04), #365.03(.06), #365.26(.04)]    HCS REVIEW TRANSMISSION(#356.22)[19.01, 19.02, 19.03, #356.2213(.07), #356.2213(.08), #356.2213(.09), #356.22168(.07), #356.22168(.08), #356.22168(.09)]    
Registration 1 PATIENT(#2)[#2.3226(.04)]    

Fields, Total: 5

Field # Name Loc Type Details
.01 CODE 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
    MAXIMUM LENGTH: 30
  • LAST EDITED:  MAR 24, 2023
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This field is controlled by the Financial Service Center (FSC) and is associated with their table: X12_COMMUNICATION_NUMBER.
  • CROSS-REFERENCE:  365.021^B
    1)= S ^IBE(365.021,"B",$E(X,1,30),DA)=""
    2)= K ^IBE(365.021,"B",$E(X,1,30),DA)
    Standard "B" cross-reference
.02 DESCRIPTION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>90!($L(X)<1) X
    MAXIMUM LENGTH: 90
  • LAST EDITED:  MAR 13, 2023
  • HELP-PROMPT:  Answer must be 1-90 characters in length.
  • DESCRIPTION:  
    This field is controlled by the Financial Service Center (FSC) and is associated with their table: X12_COMMUNICATION_NUMBER.
  • CROSS-REFERENCE:  365.021^C^MUMPS
    1)= S ^IBE(365.021,"C",$$UP^XLFSTR($E(X,1,30)),DA)=""
    2)= K ^IBE(365.021,"C",$$UP^XLFSTR($E(X,1,30)),DA)
    This index provides a lookup by Description.
  • CROSS-REFERENCE:  ^^TRIGGER^365.021^.04
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(365.021,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(365.021,.02,1,2,1.4)
    1.4)= S DIH=$G(^IBE(365.021,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=365.021,DIG=.04 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(365.021,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(365.021,.02,1,2,2.4)
    2.4)= S DIH=$G(^IBE(365.021,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=365.021,DIG=.04 D ^DICR
    CREATE VALUE)= NOW
    DELETE VALUE)= NOW
    FIELD)= DATE LAST EDITED
    Update the 'DATE LAST EDITED' whenever the Description is changed.
.03 INACTIVE? 0;3 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  JUN 03, 2002
  • DESCRIPTION:  
    This field will be marked inactive if a code is determined to no longer be used by X.12.
.04 DATE LAST EDITED 0;4 DATE

  • INPUT TRANSFORM:  S %DT="ESTR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 13, 2023
  • HELP-PROMPT:  Enter the date and time the DESCRIPTION was last edited.
  • DESCRIPTION:  
    The date and time that the DESCRIPTION for this entry was last edited.
  • NOTES:  TRIGGERED by the DESCRIPTION field of the X12 271 CONTACT QUALIFIER File
.05 FSC CONTROLLED 0;5 SET (BOOLEAN Data Type)
  • This field indicates whether or not this file is controlled by FSC.

  • LAST EDITED:  FEB 13, 2023
  • HELP-PROMPT:  Enter 1 if FSC controlled or 0 is not.
  • DESCRIPTION:  
    This field indicates whether or not this file is controlled by FSC.

Found Entries, Total: 8

CODE: ED    CODE: EM    CODE: FX    CODE: TE    CODE: EX    CODE: HP    CODE: WP    CODE: UR    
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  Found Entries  | All