Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 33.02

Package: Registration

OTH ELIGIBILITY PATIENT(#33)-->33.02

Sub-Field: 33.02


Information

Parent File Name Number Package
OTH ELIGIBILITY PATIENT(#33) ELIGIBILITY CHANGES 33.02 Registration

Details

Field # Name Loc Type Details
.01 ELIGIBILITY CHANGE DATE/TIME 0;1 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  AUG 13, 2020
  • HELP-PROMPT:  Enter the date of this eligibility change.
  • DESCRIPTION:  
    Date of the eligibility change.
  • CROSS-REFERENCE:  33.02^B
    1)= S ^DGOTH(33,DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^DGOTH(33,DA(1),2,"B",$E(X,1,30),DA)
  • FIELD INDEX:  F (#209) REGULAR IR LOOKUP & SORTING WHOLE FILE (#33)
    Short Descr: Eligibility Code modification
    Description: This cross-reference will capture the date/time of the eligibility code changes for a patient.
    Set Logic: S ^DGOTH(33,"F",X,DA(1),DA)=""
    Kill Logic: K ^DGOTH(33,"F",X,DA(1),DA)
    Whole Kill: K ^DGOTH(33,"F")
    X(1): ELIGIBILITY CHANGE DATE/TIME (33.02,.01) (Subscr 1) (forwards)
.02 ELIGIBILITY CODE 0;2 POINTER TO ELIGIBILITY CODE FILE (#8) ELIGIBILITY CODE(#8)

  • LAST EDITED:  JUN 27, 2019
  • HELP-PROMPT:  Select eligibility code.
  • DESCRIPTION:  
    New eligibility code for this patient.
.03 ELIGIBILITY FACTOR TYPE 0;3 SET
  • 'OTH-90' FOR EMERGENT MH OTH;
  • 'OTH-EXT' FOR EXTENDED MH OTH;

  • LAST EDITED:  SEP 04, 2019
  • HELP-PROMPT:  Select eligibility factor type.
  • DESCRIPTION:  
    Eligibility factor type for OTH eligibilities.
  • TECHNICAL DESCR:  
    Same set of codes as field 2/.5501
  • FIELD INDEX:  E (#1566) REGULAR IR LOOKUP & SORTING WHOLE FILE (#33)
    Short Descr: Index on field 33.02/.03
    Description: Index on ELIGIBILITY FACTOR TYPE field (33.02/.03)
    Set Logic: S ^DGOTH(33,"E",X,DA(1),DA)=""
    Kill Logic: K ^DGOTH(33,"E",X,DA(1),DA)
    Whole Kill: K ^DGOTH(33,"E")
    X(1): ELIGIBILITY FACTOR TYPE (33.02,.03) (Subscr 1) (forwards)
.04 ELIG CHANGE REASON 0;4 SET
************************REQUIRED FIELD************************
  • '0' FOR INITIAL REGISTRATION;
  • '1' FOR UPDATE;

  • LAST EDITED:  MAY 29, 2019
  • HELP-PROMPT:  Select reason for this eligibility change.
  • DESCRIPTION:  
    Reason for this eligibility change.
.05 FACILITY 0;5 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • LAST EDITED:  JUN 18, 2019
  • HELP-PROMPT:  Select facility where this eligibility change was made.
  • DESCRIPTION:  
    Facility where this eligibility change was made. This field being blank means that change originated from Enrollment System.
.06 ENTERED BY 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<5) X
    MAXIMUM LENGTH: 60
  • LAST EDITED:  MAR 07, 2019
  • HELP-PROMPT:  Answer must be 5-60 characters in length.
  • DESCRIPTION:  
    Name of the person who changed eligibility for this patient.
.07 FACILITY 0;7 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • LAST EDITED:  MAR 07, 2019
  • HELP-PROMPT:  Select facility where this eligibility change was made.
  • DESCRIPTION:  
    Facility where this eligibility change was made. This field being blank means that change originated from Enrollment System.
Info |  Details