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 |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^DGMT(408.41

Package: Registration

Global: ^DGMT(408.41


Information

FileMan FileNo FileMan Filename Package
408.41 MEANS TEST CHANGES Registration

Description

Directly Accessed By Routines, Total: 6

Package Total Routines
Registration 3 ^DGMT(408.41    DGMTAUD    DGMTAUD2    
Income Verification Match 2 IVMCMD    IVMUM8    
Enrollment Application System 1 EASUM8    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Registration 1 DGMTAUD    

Pointer To FileMan Files, Total: 6

Package Total FileMan Files
Registration 3 MEANS TEST CHANGES TYPE(#408.42)[.02]    INCOME PERSON(#408.13)[.1]    PATIENT(#2)[.04]    
Enrollment Application System 2 TYPE OF TEST(#408.33)[.019]    ANNUAL MEANS TEST(#408.31)[.03]    
Kernel 1 NEW PERSON(#200)[.07]    

Fields, Total: 11

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

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 11, 1992
  • HELP-PROMPT:  Enter the date/time a change was made to a means test.
  • DESCRIPTION:  
    Date change was made to a means test in file 408.31.
  • CROSS-REFERENCE:  408.41^B
    1)= S ^DGMT(408.41,"B",$E(X,1,30),DA)=""
    2)= K ^DGMT(408.41,"B",$E(X,1,30),DA)
.019 TYPE OF TEST 0;19 POINTER TO TYPE OF TEST FILE (#408.33)
************************REQUIRED FIELD************************
TYPE OF TEST(#408.33)

  • LAST EDITED:  DEC 30, 1992
  • HELP-PROMPT:  Enter the type of test associated with the financial test change.
  • DESCRIPTION:  
    This field is a pointer to the type of test file, 408.33.
  • CROSS-REFERENCE:  408.41^AM2^MUMPS
    1)= S:$P(^DGMT(408.41,DA,0),U,3)&($P(^(0),U,4)) ^DGMT(408.41,"AM",X,+$P(^(0),U,4),+$P(^(0),U,3),DA)=""
    2)= K ^DGMT(408.41,"AM",X,+$P(^DGMT(408.41,DA,0),U,4),+$P(^(0),U,3),DA)
    Sets AM cross-reference - fields involved are Type of Test (.019), Patient (.04) and Means Test (.03).
.02 TYPE OF CHANGE 0;2 POINTER TO MEANS TEST CHANGES TYPE FILE (#408.42)
************************REQUIRED FIELD************************
MEANS TEST CHANGES TYPE(#408.42)

  • INPUT TRANSFORM:  S DIC("S")="I '$P(^(0),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  FEB 11, 1992
  • HELP-PROMPT:  Enter the type of change for the means test.
  • DESCRIPTION:  
    The Type of Change field identifies the reason why an entry was made into this file.
  • SCREEN:  S DIC("S")="I '$P(^(0),U,2)"
  • EXPLANATION:  Screen out those change types which have been inactivated.
.03 MEANS TEST 0;3 POINTER TO ANNUAL MEANS TEST FILE (#408.31)
************************REQUIRED FIELD************************
ANNUAL MEANS TEST(#408.31)

  • INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^DGMT(408.41,D0,0),U,4)=$P(^DGMT(408.31,Y,0),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 26, 1993
  • HELP-PROMPT:  Enter the means test which was changed.
  • DESCRIPTION:  
    This field contains the means test which was acted upon.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^DGMT(408.41,D0,0),U,4)=$P(^DGMT(408.31,Y,0),U,2)"
  • EXPLANATION:  Display all means tests for a patient
  • CROSS-REFERENCE:  408.41^D
    1)= S ^DGMT(408.41,"D",$E(X,1,30),DA)=""
    2)= K ^DGMT(408.41,"D",$E(X,1,30),DA)
    Regular cross-reference for look-up/sort by means test date
  • CROSS-REFERENCE:  408.41^AM1^MUMPS
    1)= S:$P(^DGMT(408.41,DA,0),U,4)&$P(^(0),U,19) ^DGMT(408.41,"AM",+$P(^(0),U,19),+$P(^(0),U,4),X,DA)=""
    2)= K ^DGMT(408.41,"AM",+$P(^DGMT(408.41,DA,0),U,19),+$P(^(0),U,4),X,DA)
    Sets AM cross-reference - fields involved are Type of Test (.019), Patient (.04) and Means Test (.03).
.04 PATIENT 0;4 POINTER TO PATIENT FILE (#2)
************************REQUIRED FIELD************************
PATIENT(#2)

  • LAST EDITED:  JAN 26, 1993
  • HELP-PROMPT:  Enter the patient associated with the changed means test.
  • DESCRIPTION:  
    This field contains the patient associated with the means test.
  • CROSS-REFERENCE:  408.41^C
    1)= S ^DGMT(408.41,"C",$E(X,1,30),DA)=""
    2)= K ^DGMT(408.41,"C",$E(X,1,30),DA)
    Regular cross-reference for look-up/sort by patient
  • CROSS-REFERENCE:  408.41^AM^MUMPS
    1)= S:$P(^DGMT(408.41,DA,0),U,3)&($P(^(0),U,19)) ^DGMT(408.41,"AM",+$P(^(0),U,19),X,+$P(^(0),U,3),DA)=""
    2)= K ^DGMT(408.41,"AM",+$P(^DGMT(408.41,DA,0),U,19),X,+$P(^(0),U,3),DA)
    Sets AM cross-reference - fields involved are Type of Test (.019), Patient (.04) and Means Test (.03).
.05 OLD VALUE 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  APR 01, 1992
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • DESCRIPTION:  
    This field contains the value of the means test category, prior to its change in the ANNUAL MEANS TEST file (# 408.31).
.06 NEW VALUE 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  APR 01, 1992
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • DESCRIPTION:  
    This field contains the value of the means test category, after its change in the ANNUAL MEANS TEST file (# 408.31).
.07 EDITED BY 0;7 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  FEB 11, 1992
  • HELP-PROMPT:  Enter the name of the user who edited the means test.
  • DESCRIPTION:  
    This field contains the name of the person who entered/updated the means test.
.08 OLD SOURCE OF INCOME TEST 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  MAY 10, 1994
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This field contains the source of income test prior to its change in the ANNUAL MEANS TEST file (# 408.31).
.09 NEW SOURCE OF INCOME TEST 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  MAY 10, 1994
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This field contains the source of income test after its change in the ANNUAL MEANS TEST file (# 408.31).
.1 INCOME PERSON 0;10 POINTER TO INCOME PERSON FILE (#408.13) INCOME PERSON(#408.13)

  • LAST EDITED:  DEC 20, 1994
  • HELP-PROMPT:  Enter an Income Person
  • DESCRIPTION:  
    This field will hold the pointer value of the dependent when a name, DOB, SSN or SEX change is audited.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #1188
  • Income Verification Match
  • MEANS TEST (.03).
    Access: Direct Global Read & w/Fileman

    INCOME PERSON (.1).
    Access: Direct Global Read & w/Fileman

    When all records for the specific Means Test are found,then a check of the income person field can be done.When an IVM Means Test is deleted, any demographicentries in this file must be restored to 408.12 & 408.13.

    External References

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

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(2 ID.04+1
    ^DD(408.31 ID.03+1
    ^DGMT(408.31 - [#408.31] ID.03+1
    ^DGMT(408.41 - [#408.41] .01(XREF 1S), .01(XREF 1K), .019(XREF 1S), .019(XREF 1K), .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K), .04(XREF 1S), .04(XREF 1K)
    .04(XREF 2S), .04(XREF 2K)
    ^DPT - [#2] ID.04+1

    Naked Globals

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

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

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