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 |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^IBE(352.1

Package: Integrated Billing

Global: ^IBE(352.1


Information

FileMan FileNo FileMan Filename Package
352.1 BILLABLE APPOINTMENT TYPE Integrated Billing

Description

Directly Accessed By Routines, Total: 5

Package Total Routines
Integrated Billing 4 ^IBE(352.1    ^IBE(399.6    IB20P318    IBEFUNC    
Scheduling 1 SD53P491    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Integrated Billing 1 IB20P318    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Scheduling 1 APPOINTMENT TYPE(#409.1)[.02]    

Fields, Total: 6

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

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 21, 1991
  • HELP-PROMPT:  Type a Number between 1 and 99, 0 Decimal Digits
  • DESCRIPTION:  
    This is a unique number for each entry.
  • CROSS-REFERENCE:  352.1^B
    1)= S ^IBE(352.1,"B",$E(X,1,30),DA)=""
    2)= K ^IBE(352.1,"B",$E(X,1,30),DA)
.02 APPOINTMENT TYPE 0;2 POINTER TO APPOINTMENT TYPE FILE (#409.1)
************************REQUIRED FIELD************************
APPOINTMENT TYPE(#409.1)

  • LAST EDITED:  OCT 22, 1991
  • DESCRIPTION:  
    This is the MAS Appointment type.
  • CROSS-REFERENCE:  352.1^AIVDT1^MUMPS
    1)= I $P(^IBE(352.1,DA,0),U,3) S ^IBE(352.1,"AIVDT",X,-$P(^(0),U,3),DA)=""
    2)= I $P(^IBE(352.1,DA,0),U,3) K ^IBE(352.1,"AIVDT",X,-$P(^(0),U,3),DA)
    Used to find most recent entry for appointment type.
  • CROSS-REFERENCE:  352.1^C
    1)= S ^IBE(352.1,"C",$E(X,1,30),DA)=""
    2)= K ^IBE(352.1,"C",$E(X,1,30),DA)
.03 EFFECTIVE DATE 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 22, 1991
  • DESCRIPTION:  Every Appointment type has certain billing characteristics that may change over time. For example, an appointment type may not be billable for Category C Means Test billing one year but may the next depending on
    legislation.
    It is only necessary to add a new effective date for an appointment type if the characteristics need to be time sensitive.
    UNEDITABLE
  • CROSS-REFERENCE:  352.1^AIVDT2^MUMPS
    1)= I $P(^IBE(352.1,DA,0),U,2) S ^IBE(352.1,"AIVDT",$P(^(0),U,2),-X,DA)=""
    2)= I $P(^IBE(352.1,DA,0),U,2) K ^IBE(352.1,"AIVDT",$P(^(0),U,2),-X,DA)
    Used to find most recent entry for an appointment type.
  • CROSS-REFERENCE:  352.1^D
    1)= S ^IBE(352.1,"D",$E(X,1,30),DA)=""
    2)= K ^IBE(352.1,"D",$E(X,1,30),DA)
.04 IGNORE MEANS TEST 0;4 SET
************************REQUIRED FIELD************************
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 21, 1991
  • DESCRIPTION:  
    Set this field to 'YES' if this appointment type should NOT be billed for Category C means test billing.
.05 PRINT ON INSURANCE REPORT 0;5 SET
************************REQUIRED FIELD************************
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 21, 1991
  • DESCRIPTION:  
    Set this field to 'YES' if you would like this appointment type to show up on the list of Veterans with insurance and outpatient visits.
.06 DISPLAY ON INPUT SCREEN 0;6 SET
************************REQUIRED FIELD************************
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 21, 1991
  • DESCRIPTION:  
    Set this field to 'YES' if you would like this appointment type to be displayed as a potential billable visit on the outpatient visit screen when creating a third party bill.

Found Entries, Total: 11

NUMBER: 1    NUMBER: 2    NUMBER: 3    NUMBER: 4    NUMBER: 5    NUMBER: 6    NUMBER: 7    NUMBER: 8    
NUMBER: 9    NUMBER: 10    NUMBER: 11    

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #5029
  • Scheduling
  • => '11^11^2880101^0^1^1' Entire node accessed todetermine validity.

    External References

    Name Field # of Occurrence
    ^%DT .03+1
    Y^DIQ ID.02+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(409.1 ID.02+1
    ^IBE(352.1 - [#352.1] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K)
    ^SD(409.1 - [#409.1] ID.02+1

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID.02+1, ID.03+1, .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT .03+1*
    %I ID.02+1*!
    >> C ID.02+1*
    >> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K)
    >> DIC ID.02+1
    U ID.02+1, ID.03+1, .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K)
    X .01+1!, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .03+1*!, .03(XREF 1S), .03(XREF 1K)
    .03(XREF 2S), .03(XREF 2K)
    >> Y ID.02+1*, .03+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All