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

Package: Beneficiary Travel

Global: ^DGBT(392.2


Information

FileMan FileNo FileMan Filename Package
392.2 BENEFICIARY TRAVEL CERTIFICATION Beneficiary Travel

Description

Directly Accessed By Routines, Total: 9

Package Total Routines
Beneficiary Travel 5 ^DGBT(392.2    ALTERNATE INCOME    DGBTE1    DGBTEE1    DGBTEF    
Income Verification Match 2 IVMCQ    IVMCUC    
Registration 2 DGRTRIG    VAFHLZBT    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Beneficiary Travel 1 DGBTEF    
Enrollment Application System 1 EASBTBUL    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Beneficiary Travel 1 BENEFICIARY TRAVEL CLAIM(#392)[5]    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Kernel 2 STATE(#5)[15]    NEW PERSON(#200)[5]    
Registration 1 PATIENT(#2)[2]    

Fields, Total: 15

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

  • INPUT TRANSFORM:  S %DT="ESXR" D ^%DT S X=Y K:Y<1 X I $D(X) S DINUM=9999999.99999-X
  • LAST EDITED:  SEP 13, 2005
  • HELP-PROMPT:  Enter the date of annual certification. Future dates are not allowed.
  • DESCRIPTION:  
    This field contains the date of annual income certification used in the Beneficial Travel Claim process.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  392.2^B
    1)= S ^DGBT(392.2,"B",$E(X,1,30),DA)=""
    2)= K ^DGBT(392.2,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  392.2^IVM01^MUMPS
    1)= D BT^IVMCUC(DA)
    2)= D BT^IVMCUC(DA)
    Used to log DCD defined events for nightly transmission to HEC.
  • CROSS-REFERENCE:  392.2^AENR01^MUMPS
    1)= D E3922^DGRTRIG(DA)
    2)= D E3922^DGRTRIG(DA)
    3)= DO NOT DELETE
    This cross-reference is used to notify HEC of changes that may affect enrollment.
2 NAME 0;2 POINTER TO PATIENT FILE (#2)
************************REQUIRED FIELD************************
PATIENT(#2)

  • LAST EDITED:  OCT 14, 1997
  • DESCRIPTION:  
    This field points to the patient file and contains the IFN for the patient related to this Beneficiary Travel certification date.
  • CROSS-REFERENCE:  392.2^C
    1)= S ^DGBT(392.2,"C",$E(X,1,30),DA)=""
    2)= K ^DGBT(392.2,"C",$E(X,1,30),DA)
  • CROSS-REFERENCE:  392.2^IVM2^MUMPS
    1)= D BT^IVMCUC(DA)
    2)= D BT^IVMCUC(DA)
    Used to log DCD defined events for nightly transmission to HEC.
3 ELIGIBLE 0;3 SET
************************REQUIRED FIELD************************
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  FEB 27, 1989
  • DESCRIPTION:  
    This field is a set of codes (yes or no) indicating whether this person is eligible for Beneficiary Travel.
4 AMOUNT CERTIFIED 0;4 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>100000)!(X<0) X
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 100000, 2 Decimal Digits. Enter the patient's annual income for the previous year.
  • DESCRIPTION:  
    This field is to be used to record the annual income reported by the patient.
5 EDITED BY 0;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  OCT 17, 1990
  • DESCRIPTION:  
    This field is a pointer to the new person file and contains the IFN of the person who last edited this Beneficiary Travel Certification date/time.
6 LAST EDITED 0;6 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 14, 1989
  • DESCRIPTION:  
    This field contains the date this Beneficiary Travel Certification entry was last edited on.
11 ADDRESS LINE [1] A;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>35!($L(X)<3) X
  • LAST EDITED:  MAR 02, 1989
  • HELP-PROMPT:  ANSWER MUST BE 3-35 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the first line of the address associated with this Beneficiary Travel Certification date/time.
12 ADDRESS LINE [2] A;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  MAR 02, 1989
  • HELP-PROMPT:  ANSWER MUST BE 3-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the second line of the address associated with this Beneficiary Travel Certification date/time.
13 ADDRESS LINE [3] A;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  MAR 02, 1989
  • HELP-PROMPT:  ANSWER MUST BE 3-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the third line of the address associated with this Beneficiary Travel Certifiction date/time.
14 CITY A;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2)!'(X'?1P.E) X I $D(X) D UP^DGBTHELP
  • LAST EDITED:  OCT 30, 2001
  • HELP-PROMPT:  ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the free text 2-30 character name of the City associated with this Beneficiary Travel Certification date/time.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
15 STATE A;5 POINTER TO STATE FILE (#5) STATE(#5)

  • LAST EDITED:  MAR 02, 1989
  • DESCRIPTION:  
    This field points to the State File and contains the IFN of the State associated with this Beneficiary Travel Certification date/time.
16 ZIP A;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<5) X I $D(X) D ZIPIN^VAFADDR
  • OUTPUT TRANSFORM:  D ZIPOUT^VAFADDR
  • LAST EDITED:  MAR 01, 1993
  • HELP-PROMPT:  Answer must be 5 digit or 9 digit zip code.
  • DESCRIPTION:  
    This field contains the 5-digit zip code associated with this Beneficiary Travel Certification date/time.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
17 COUNTY CODE A;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3)!'(X?3N) X
  • LAST EDITED:  MAR 02, 1989
  • HELP-PROMPT:  ANSWER MUST BE 3 NUMERIC CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains three numeric characters in length for the County Code associated with this Beneficiary Travel Certification date/time.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
18 MEANS TEST STATUS A;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<1) X
  • LAST EDITED:  MAR 02, 1989
  • HELP-PROMPT:  ANSWER MUST BE 1-2 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the Means Test Status associated with this Beneficiary Travel Certification date/time.
19 PRIMARY ELIGIBILITY A;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  MAR 02, 1989
  • HELP-PROMPT:  ANSWER MUST BE 3-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the primary eligibility associated with this Beneficiary Travel Certification date/time.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #6015
  • Enrollment Application System
    		•  DATE CERTIFIED (.01).
    Access: Read w/Fileman

    ELIGIBLE (3).
    Access: Read w/Fileman

    		 Routine EASBTBUL does not use the 'C' cross reference.It calls $$FIND1 in routine DIC to find the IFN. SIFN=$$FIND1~DIC(392.2,"","MXQ",DFN, "","","ERR")

    External References

    Name Field # of Occurrence
    ^%DT .01+1, 6+1
    UP^DGBTHELP 14+1
    E3922^DGRTRIG .01(XREF 3S), .01(XREF 3K)
    Y^DIQ ID2+1
    BT^IVMCUC .01(XREF 2S), .01(XREF 2K), 2(XREF 2S), 2(XREF 2K)
    ZIPIN^VAFADDR 16+1
    ZIPOUT^VAFADDR 16OT+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(2 ID2+1
    ^DGBT(392.2 - [#392.2] .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K)
    ^DPT - [#2] ID2+1

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID2+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT .01+1*, 6+1*
    %I ID2+1*!
    >> C ID2+1*
    >> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), 2(XREF 1S), 2(XREF 1K), 2(XREF 2S), 2(XREF 2K)
    >> DIC ID2+1, ID3+1
    >> DINUM .01+1*
    U ID2+1
    X .01+1*!, .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K), 4+1*!, 6+1*!, 11+1!, 12+1!, 13+1!
    , 14+1!, 16+1!, 17+1!, 18+1!, 19+1!
    >> Y ID2+1*, .01+1, 6+1, 16OT+1
    >> Y(0 16OT+1*
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All