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 |  Pointer To FileMan Files |  Fields
Print Page as PDF
Global: ^IBE(350.5

Package: Integrated Billing

Global: ^IBE(350.5


Information

FileMan FileNo FileMan Filename Package
350.5 BASC LOCALITY MODIFIER Integrated Billing

Description

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Integrated Billing 1 IBECPTE    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Registration 1 MEDICAL CENTER DIVISION(#40.8)[.02]    

Fields, Total: 6

Field # Name Loc Type Details
.01 EFFECTIVE DATE 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 13, 1991
  • DESCRIPTION:  
    The date on which this entries data becomes effective. The data in this entry will override any other entry for this DIVISION that has a previous EFFECTIVE DATE.
  • CROSS-REFERENCE:  350.5^B
    1)= S ^IBE(350.5,"B",$E(X,1,30),DA)=""
    2)= K ^IBE(350.5,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  350.5^AIVDT^MUMPS
    1)= I $P(^IBE(350.5,DA,0),"^",2) S ^IBE(350.5,"AIVDT",$P(^(0),"^",2),-X,DA)=""
    2)= I $P(^IBE(350.5,DA,0),"^",2) K ^IBE(350.5,"AIVDT",$P(^(0),"^",2),-X,DA)
    Used to find the appropriate entry for a division on any particular date.
.02 DIVISION 0;2 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8)
************************REQUIRED FIELD************************
MEDICAL CENTER DIVISION(#40.8)

  • LAST EDITED:  JAN 21, 1992
  • DESCRIPTION:  
    The division that this data applies to.
  • CROSS-REFERENCE:  350.5^C
    1)= S ^IBE(350.5,"C",$E(X,1,30),DA)=""
    2)= K ^IBE(350.5,"C",$E(X,1,30),DA)
  • CROSS-REFERENCE:  350.5^AIVDT1^MUMPS
    1)= I $P(^IBE(350.5,DA,0),"^") S ^IBE(350.5,"AIVDT",X,-$P(^(0),"^"),DA)=""
    2)= I $P(^IBE(350.5,DA,0),"^") K ^IBE(350.5,"AIVDT",X,-$P(^(0),"^"),DA)
    Used to find the correct entry for a division for a particular date.
.04 STATUS 0;4 SET
************************REQUIRED FIELD************************
  • '1' FOR ACTIVE;
  • '0' FOR INACTIVE;

  • LAST EDITED:  JAN 21, 1992
  • DESCRIPTION:  
    The status for this DIVISION on/after this EFFECTIVE DATE.
.05 WAGE PERCENTAGE 0;5 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>1)!(X<0)!(X?.E1"."9N.N) X
  • LAST EDITED:  JUN 10, 2004
  • HELP-PROMPT:  Type a number between 0 and 1, with up to 8 decimal digits. This is the wage component fraction of the Ambulatory Surgery charge.
  • DESCRIPTION:  
    This is the percentage of the rate group unit charge that is the wage component to be used in calculating the ambulatory surgery charge.
  • CROSS-REFERENCE:  ^^TRIGGER^350.5^.06
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(350.5,D0,0)):^(0),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X=DIV S X=1-DIV S DIH=$G(^IBE(350.5,DIV(0),0)),DIV=X S $P(^(0),U,6)=DIV,DIH=350.5,DIG=.06 D ^DICR
    2)= Q
    CREATE VALUE)= 1-WAGE PERCENTAGE
    DELETE VALUE)= NO EFFECT
    FIELD)= NON-WAGE PERCENTAGE
.06 NON-WAGE PERCENTAGE 0;6 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>1)!(X<0)!(X?.E1"."9N.N)!(X'=(1-$P(^IBE(350.5,DA,0),U,5))) X
  • LAST EDITED:  JAN 22, 1992
  • HELP-PROMPT:  Type a Number between 0 and 1, 8 Decimal Digits. Wage and non-wage percentage must total 1.
  • DESCRIPTION:  
    This is the percentage of the rate group unit charge that is the non-wage component to be used in calculating the ambulatory surgery charge.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
    TRIGGERED by the WAGE PERCENTAGE field of the BASC LOCALITY MODIFIER File
.07 LOCALITY RATE MODIFIER 0;7 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."9N.N) X
  • LAST EDITED:  JAN 21, 1992
  • HELP-PROMPT:  Type a Number between 0 and 99, 8 Decimal Digits
  • DESCRIPTION:  This is the Geographic Wage Index that is used to account for wage differences in different localities when calculating the ambulatory surgery charge. It is multiplied by the wage component to get the final geographic wage
    component of the charge.
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields