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

Package Total Routines
Registration 4 DESCRIPTION (VERSIONED)    DGMTAUD    ^DGMT(408.41    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, .01+1
    ^DIC .02+1, .03+1, .02+1, .03+1
    Y^DIQ ID.03+1, ID.04+1, ID.03+1, ID.04+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZOSF("TEST" |dd408.13
    ^DD( |dd301.501, |dd350, |dd408.31
    ^DD(2 ID.04+1, |dd408.41, ID.04+1
    ^DD(301.501 |dd301.501
    ^DD(301.511 |dd301.511
    ^DD(350 |dd350
    ^DD(408.13 |dd408.13
    ^DD(408.31 ID.03+1, |dd408.31, |dd408.41, ID.03+1
    ^DD(408.32 |dd408.31
    ^DD(408.33 |dd408.31
    ^DD(408.34 |dd408.31
    ^DG(408.32 - [#408.32] |dd408.31
    ^DG(408.33 - [#408.33] |dd408.31
    ^DG(408.34 - [#408.34] |dd408.31, |dd408.34*!
    ^DGMT(408.31 - [#408.31] ID.03+1, |dd408.31*!, |dd408.31*!, |dd408.31*!, |dd408.41, 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), |dd408.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)
    ^DGPR(408.13 - [#408.13] |dd408.13*!
    ^DPT - [#2] ID.04+1, |dd408.41, ID.04+1
    ^HL(771.3 - [#771.3] |dd301.501
    ^IB - [#350] |dd350, |dd350, |dd350
    ^IB("ABIL" |dd350*!
    ^IB("AC" |dd350*!
    ^IB("ACT" |dd350*!
    ^IB("ACVA" |dd350*!
    ^IB("AD" |dd350*!
    ^IB("AE" |dd350*!
    ^IB("AF" |dd350*!
    ^IB("AFDT" |dd350*!
    ^IB("AH" |dd350*!
    ^IB("AHDT" |dd350*!
    ^IB("AI" |dd350*!
    ^IB("AJ" |dd350*!
    ^IB("APDT" |dd350*!
    ^IB("APTDT" |dd350*!
    ^IB("AT" |dd350*!
    ^IB("B" |dd350*!
    ^IB("C" |dd350*!
    ^IB("D" |dd350*!
    ^IBE(350.1 - [#350.1] |dd350
    ^IBE(350.21 - [#350.21] |dd350
    ^IVM(301.5 - [#301.5] |dd301.5*!, |dd301.501*!, |dd301.511*!
    ^IVM(301.6 - [#301.6] |dd301.6*!, |dd301.6*!
    ^IVM(301.61 - [#301.61] |dd301.61*!
    ^IVM(301.9 - [#301.9] |dd301.9*!, |dd301.9001*!
    ^IVM(301.91 - [#301.91] |dd301.91*!
    ^IVM(301.92 - [#301.92] |dd301.92*!
    ^IVM(301.93 - [#301.93] |dd301.93*!
    ^ORD(101 - [#101] |ptcl
    ^TMP("IVMERR" |list
    ^TMP("IVMLST" |list
    ^TMP("IVMNONUP" |list
    ^TMP("IVMUPLOAD" |list
    ^UTILITY("DGPM" |ptcl

    Naked Globals

    Name Field # of Occurrence
    ^("PRIM" |dd408.31
    ^(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), |dd301.5, |dd301.501*
    , |dd301.511*, |dd301.6, |dd301.9001, |dd301.91, |dd350, |dd408.13*, |dd408.31*, |dd408.31*, |dd408.41, ID.03+1
    , ID.04+1, .019(XREF 1S), .019(XREF 1K), .03(XREF 2S), .03(XREF 2K), .04(XREF 2S), .04(XREF 2K)
    ^(1 |dd350*
    ^(24 |ptcl

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % |dd350~
    >> %DT .01+1*, |dd301.5*, |dd301.501*, |dd301.511*, |dd301.6*, |dd301.61*, |dd301.9*, |dd301.9001*, |dd350*, |dd408.13*
    , |dd408.31*, |dd408.41*, .01+1*
    >> %DT(0 |dd408.31*
    %H |dd350~
    %I ID.03+1*!, ID.04+1*!, |dd350~, |dd408.31*!, |dd408.41*!, ID.03+1*!, ID.04+1*!
    >> C ID.03+1*, ID.04+1*, |dd408.31*, |dd408.41*, ID.03+1*, ID.04+1*
    >> D0 |dd301.501*, |dd301.511*, |dd350*, |dd408.13*, |dd408.31*
    >> D1 |dd301.501*, |dd301.511*
    >> D2 |dd301.511*
    >> 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), |dd301.5, |dd301.501, |dd301.511, |dd301.6, |dd301.6, |dd301.61, |dd301.9, |dd301.9001
    , |dd301.91, |dd301.92, |dd301.93, |dd350, |dd350, |dd350, |dd408.13, |dd408.13, |dd408.31, |dd408.31
    , |dd408.31, |dd408.34, |dd408.41, |ptcl, .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)
    >> DA(1 |dd301.501, |dd301.511, |dd301.9001, |ptcl
    >> DA(2 |dd301.511
    >> DATA( |dd301.6
    >> DFN |ptcl
    DG20NAME |dd408.13*!
    >> DGMTACT |dd408.31
    >> DGMTYPT |dd408.31
    DIC ID.03+1, ID.04+1, .02+1!*, .03+1!*, |dd408.31*!, |dd408.41*!, ID.03+1, ID.04+1, .02+1!*, .03+1!*
    DIC("S" .02+1*, .02SCR+1*, .03+1*, .03SCR+1*, |dd408.31*, |dd408.41*, .02+1*, .02SCR+1*, .03+1*, .03SCR+1*
    >> DIE .02+1, .03+1, |dd408.31, |dd408.41, .02+1, .03+1
    >> DIG |dd301.501*, |dd301.511*, |dd350*, |dd408.13*, |dd408.31*
    >> DIH |dd301.501*, |dd301.511*, |dd350*, |dd408.13*, |dd408.31*
    >> DIU |dd301.501*, |dd301.511*, |dd350*, |dd408.13*, |dd408.31*
    DIV |dd301.501*!, |dd301.511*!, |dd350*!, |dd408.13*!, |dd408.31*!
    DIV(0 |dd301.501*, |dd301.511*, |dd350*, |dd408.13*, |dd408.31*
    DIV(1 |dd301.501*, |dd301.511*
    DIV(2 |dd301.511*
    DT |dd408.13
    DUZ |dd350
    >> I |dd408.13*
    >> I(0 |dd301.501*
    >> I(1 |dd301.501*
    >> IBDUZ |dd350
    IVMX |dd408.13*!
    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), |dd301.5, |dd301.501
    , |dd301.511, |dd301.6, |dd301.91, |dd350, |dd350, |dd408.13, |dd408.31, |dd408.31, |dd408.41, 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!, |dd301.5*!
    , |dd301.5*!, |dd301.501*!, |dd301.511*!, |dd301.6*!, |dd301.6*!, |dd301.61*!, |dd301.9*!, |dd301.9001*!, |dd301.91!, |dd301.92!
    , |dd301.93!, |dd350!, |dd350*!, |dd350*!, |dd350*!, |dd408.13*!, |dd408.13*!, |dd408.31*!, |dd408.31*!, |dd408.31*!
    , |dd408.34!, |dd408.41*!, .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, |dd301.5, |dd301.501!, |dd301.511!, |dd301.6, |dd301.61
    , |dd301.9, |dd301.9001, |dd350!, |dd408.13*!, |dd408.31*!, |dd408.41*, ID.03+1*, ID.04+1*, .01+1, .02+1
    , .03+1
    Y(0 |dd350*, |dd408.13*, |dd408.31*
    Y(1 |dd301.501*, |dd301.511*, |dd350*, |dd408.13*, |dd408.31*
    Y(101 |dd301.501*
    Y(2 |dd408.31*
    Y(3 |dd408.31*
    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