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: 11

Package Total Routines
Beneficiary Travel 5 DGBTE1    DGBTEE1    DGBTEF    MONETARY AWARD(S)    ^DGBT(392.2    
Registration 3 DESCRIPTION (VERSIONED)    DGRTRIG    VAFHLZBT    
Income Verification Match 2 IVMCQ    IVMCUC    

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, .01+1, 6+1
    UP^DGBTHELP 14+1, 14+1
    E3922^DGRTRIG .01(XREF 3S), .01(XREF 3K), .01(XREF 3S), .01(XREF 3K)
    Y^DIQ ID2+1, ID2+1
    BT^IVMCUC .01(XREF 2S), .01(XREF 2K), 2(XREF 2S), 2(XREF 2K), .01(XREF 2S), .01(XREF 2K), 2(XREF 2S), 2(XREF 2K)
    ZIPIN^VAFADDR 16+1, 16+1
    ZIPOUT^VAFADDR 16OT+1, 16OT+1

    Global Variables Directly Accessed

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

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID2+1, ID2+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT .01+1*, 6+1*, .01+1*, 6+1*
    %I ID2+1*!, ID2+1*!
    >> C ID2+1*, 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)
    .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, ID2+1, ID3+1
    >> DINUM .01+1*, .01+1*
    U ID2+1, 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!, .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, ID2+1*, .01+1, 6+1, 16OT+1
    >> Y(0 16OT+1*, 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