Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^DGCR(399.3

Package: Integrated Billing

Global: ^DGCR(399.3


Information

FileMan FileNo FileMan Filename Package
399.3 RATE TYPE Integrated Billing

Description

Directly Accessed By Routines, Total: 38

Package Total Routines
Integrated Billing 38 IB20PT7    IBCA    IBCA1    IBCB    IBCBB    IBCBB1    IBCD2    IBCD5
IBCF    IBCF10    IBCF11    IBCF12    IBCF31    IBCF32    IBCF34    IBCNQ
IBCNQ1    IBCONS1    IBCOPV    IBCSC3    IBCU    IBCU3    IBCU41    IBCU61
IBCU64    IBOA31    IBOAMS    IBOBL    IBOCPDS    IBOLK1    IBOMBL    IBOMTP1
IBORT    IBORT1    IBOSTUS1    IBPUDEL    ^DGCR(399    ^DGCR(399.3    

Accessed By FileMan Db Calls, Total: 5

Package Total Routines
Integrated Billing 5 IB20PT7    IBCA    IBCMENU    IBOAMS    IBOTR    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Integrated Billing 1 BILL/CLAIMS(#399)[.07]    

Fields, Total: 10

Field # Name Loc Type Details
.001 NUMBER NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  Enter the internal file number of this entry.
  • DESCRIPTION:  
    This is the internal file number of this entry.
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1)!'(X'?1P.E) X
  • HELP-PROMPT:  Enter the 1-30 character name/description of this rate type.
  • DESCRIPTION:  
    This is the name/description of this rate type.
  • DELETE TEST:  .01,0)= I 1 W !,"Deletion of Rate Types not allowed. Use the Inactive field."
  • CROSS-REFERENCE:  399.3^B
    1)= S ^DGCR(399.3,"B",$E(X,1,30),DA)=""
    2)= K ^DGCR(399.3,"B",$E(X,1,30),DA)
.02 BILL NAME 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1)!'(X'?1P.E) X
  • HELP-PROMPT:  Enter the 1-30 character text which you want to appear on the UB form each time a bill of this rate type is printed.
  • DESCRIPTION:  
    This is the text which will appear on the UB claim form each time a bill of this rate type is printed.
.03 INACTIVE 0;3 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  APR 05, 1989
  • HELP-PROMPT:  Enter the code which indicates whether or not you would like to inactivate this rate type.
  • DESCRIPTION:  
    This indicates whether or not this code has been inactivated.
.04 ABBREVIATION 0;4 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>8!($L(X)<2)!'(X?1A.ANP) X
  • HELP-PROMPT:  Enter the 2-8 character abbreviation of the name of this rate type which will appear on all of the billing outputs.
  • DESCRIPTION:  
    This defines the abbreviation of the name of this rate type which will appear on all of the billing outputs.
.05 IS THIS A THIRD PARTY BILL? 0;5 SET
************************REQUIRED FIELD************************
  • '0' FOR NO;
  • '1' FOR YES;

  • HELP-PROMPT:  Enter '1' or 'Yes' if this is a third party bill or '0' or 'No' if a bill of this rate type is not a third party bill.
  • DESCRIPTION:  
    This allows the user to determine whether or not a bill of this rate type is a third party bill.
.06 ACCOUNTS RECEIVABLE CATEGORY 0;6 POINTER ** TO AN UNDEFINED FILE **
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,7)>9" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 17, 1993
  • HELP-PROMPT:  Select the 'Accounts Receivable Category' which corresponds to this rate type.
  • DESCRIPTION:  
    This points to the corresponding Accounts Receivable category.
  • SCREEN:  S DIC("S")="I $P(^(0),U,7)>9"
  • EXPLANATION:  Only Accounts Receivable categories may be selected
  • CROSS-REFERENCE:  ^^TRIGGER^399.3^.07
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DGCR(399.3,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X=DIV D ARCAT^IBCU X ^DD(399.3,.06,1,1,1.4)
    1.4)= S DIH=$S($D(^DGCR(399.3,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=399.3,DIG=.07 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DGCR(399.3,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X="" X ^DD(399.3,.06,1,1,2.4)
    2.4)= S DIH=$S($D(^DGCR(399.3,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=399.3,DIG=.07 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    CREATE VALUE)= D ARCAT^IBCU
    DELETE VALUE)= S X=""
    FIELD)= #.07
    This triggers the correct value for WHO's RESPONSIBLE for any AR Category that is entered.
.07 WHO'S RESPONSIBLE 0;7 SET
  • 'p' FOR PATIENT;
  • 'i' FOR INSURER;
  • 'o' FOR OTHER (INSTITUTION);

  • LAST EDITED:  FEB 14, 1990
  • HELP-PROMPT:  Enter the Expected debtor for this rate type.
  • DESCRIPTION:  This field is triggered when an Accounts Receivable Category is entered. It is used to provide consistency between packages so the the debtor for the bill is from the correct file. Debtors can be from the Patient file,
    the Insurance Company file, or the Institution file.
    UNEDITABLE
  • NOTES:  TRIGGERED by the ACCOUNTS RECEIVABLE CATEGORY field of the RATE TYPE File
.08 REIMBURSABLE INSURANCE? 0;8 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  APR 06, 1992
  • HELP-PROMPT:  Answer '1' or 'YES' if you want the Medicare statement to print on all UB bills of this Rate Type.
  • DESCRIPTION:  This field should be answered 'YES' if this is a Reimbursable Insurance rate type, all other rate types should be answered 'NO'. This field will be used to determine if a bill is reimbursable Insurance.
    Primarily, this field will be used by the bill print option to determine if the 7 line statement that begins "For your information..." should be printed on the UB claim form. (Only applies to the UB form types.)
.09 NSC STATEMENT ON UB BILLS 0;9 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 20, 1994
  • HELP-PROMPT:  Enter '1' or 'YES' if you want the statement "The undersigned certifies that treatment rendered is not for a service connected disablility." to print on UB bills of this rate type.
  • DESCRIPTION:  The statement "The undersigned certifies that treatment rendered is not for a service connected disablity." will be printed on UB claim forms of this Rate Type if this field is answered 'YES'.
    This field should be answered 'YES' for all rate types where the bill can only be for NSC care.

Found Entries, Total: 13

NAME: CHAMPVA    NAME: CHAMPVA REIMB. INS.    NAME: CRIME VICTIM    NAME: DENTAL    NAME: HUMANITARIAN    NAME: INTERAGENCY    NAME: MEANS TEST/CAT. C    NAME: MEDICARE ESRD    
NAME: NO FAULT INS.    NAME: REIMBURSABLE INS.    NAME: SHARING AGREEMENT    NAME: TORT FEASOR    NAME: WORKERS' COMP.    

ICR, Total: 2

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #3822
  • ACCOUNTS RECEIVABLE
  • E Claims Management Engine
  • NAME (.01).
    Access: Direct Global Read & w/Fileman

    ICR #4118
  • ACCOUNTS RECEIVABLE
  • BILL RESULTING FROM (.11).
    Access: Write w/Fileman

    External References

    Name Field # of Occurrence
    ^DIC .06+1
    ^DICR .06(XREF 1n1.4), .06(XREF 1n2.4)
    ARCAT^IBCU .06(XREF 1S)

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD( .06(XREF 1n1.4), .06(XREF 1n2.4)
    ^DD(399.3 .06(XREF 1S), .06(XREF 1K)
    ^DGCR(399.3 - [#399.3] .01(XREF 1S), .01(XREF 1K), .06(XREF 1S), .06(XREF 1n1.4), .06(XREF 1K), .06(XREF 1n2.4)

    Naked Globals

    Name Field # of Occurrence
    ^(0 .06(XREF 1S), .06(XREF 1n1.4), .06(XREF 1K), .06(XREF 1n2.4)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> D0 .06(XREF 1S), .06(XREF 1K)
    >> DA .01(XREF 1S), .01(XREF 1K), .06(XREF 1S), .06(XREF 1K)
    DIC ID.07+1, .06+1!*
    DIC("S" .06+1*, .06SCR+1*
    >> DIE .06+1
    >> DIG .06(XREF 1n1.4), .06(XREF 1n2.4)
    >> DIH .06(XREF 1n1.4), .06(XREF 1n2.4)
    >> DIU .06(XREF 1S), .06(XREF 1K)
    DIV .06(XREF 1S), .06(XREF 1n1.4), .06(XREF 1K), .06(XREF 1n2.4)
    DIV(0 .06(XREF 1S), .06(XREF 1n1.4), .06(XREF 1K), .06(XREF 1n2.4)
    U .06(XREF 1S), .06(XREF 1n1.4), .06(XREF 1K), .06(XREF 1n2.4)
    X .001+1!, .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .04+1!, .06+1*!, .06(XREF 1S), .06(XREF 1n1.4), .06(XREF 1K)
    .06(XREF 1n2.4)
    Y .06+1, .06(XREF 1S), .06(XREF 1K)
    Y(1 .06(XREF 1S), .06(XREF 1K)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All