STANDARD DATA DICTIONARY #409.39 -- EWL CLEAN-UP FILE                                                             6/27/25    PAGE 1
STORED IN ^SDWL(409.39,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                     (VERSION 5.3)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @

CROSS
REFERENCED BY: PATIENT(B)



409.39,.01    PATIENT                0;1 POINTER TO PATIENT FILE (#2) (Required)

              LAST EDITED:      AUG 31, 2007 
              DESCRIPTION:
                                Pointer to the PATIENT file (#2). 

              CROSS-REFERENCE:  409.39^B 
                                1)= S ^SDWL(409.39,"B",$E(X,1,30),DA)=""
                                2)= K ^SDWL(409.39,"B",$E(X,1,30),DA)


409.39,1      TREATING FACILITY CAL  0;2 SET

                                'N' FOR NEW; 
                                'E' FOR ESTABLISHED; 
                                'P' FOR PRIOR; 
                                'U' FOR UNKNOWN; 
              LAST EDITED:      AUG 10, 2007 
              DESCRIPTION:      This field stores the calculation computed for the ORGINATION DATE in the EWL PATIENT file (#409.3)
                                and a valid date, (if found) in the TREATING FACILITY FILE (#391.91).  


409.39,2      ENROLL API CAL         0;3 SET

                                'N' FOR NEW; 
                                'E' FOR EST; 
                                'P' FOR PRIOR; 
                                'U' FOR UNKNOWN; 
              LAST EDITED:      AUG 10, 2007 
              DESCRIPTION:
                                This field contains the result of the ENROLLMENT API ($$ENROLL^EASWTAPI) computation.  


409.39,3      VSSC DATA CAL          0;4 SET

                                'N' FOR NEW; 
                                'E' FOR EST; 
                                'P' FOR PRIOR; 
                                'U' FOR UNKNOWN; 
              LAST EDITED:      AUG 10, 2007 
              DESCRIPTION:
                                This field contain the computation computed from the VSSC data import file.  


409.39,4      CURRENT CAL EWL FILE   0;5 SET

                                'N' FOR NEW; 
                                'E' FOR EST; 
                                'P' FOR PRIOR; 
                                'U' FOR UNKNOWN; 
              LAST EDITED:      AUG 10, 2007 
              DESCRIPTION:
                                This field contains the extracted EWL ENROLLEE STATUS from the EWL PATIENT file (409.3).  


409.39,5      TF DATE USED           0;6 DATE

              INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      AUG 10, 2007 
              DESCRIPTION:
                                Date used from the TREATING FACILITY file (#391.91) to determine the TREATING FACILITY calculation.  


409.39,6      ENROLLEE API DATE USED 0;7 DATE

              INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      AUG 10, 2007 
              DESCRIPTION:
                                Date used from the ENROLLMENT API to determine the EWL ENROLLEE STATUS.  


409.39,7      VSSC DATE USED         0;8 DATE

              INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      AUG 10, 2007 
              DESCRIPTION:
                                Date used from the VSSC to determine the EWL ENROLLEE STATUS.  


409.39,8      EWL ORIG DATE          0;9 DATE

              INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      AUG 10, 2007 
              DESCRIPTION:
                                Date extracted from the EWL PATIENT FILE (409.3) ORIGINATION DATE.  


409.39,8.1    NEW CAL STATUS         0;11 SET

                                'N' FOR NEW; 
                                'U' FOR UNDETERMINED; 
                                'P' FOR PRIOR; 
                                'E' FOR ESTABLISHED; 
              LAST EDITED:      AUG 10, 2007 
              DESCRIPTION:
                                This field contains the new calculated EWL ENROLLEE STATUS.  


409.39,9      EWL IEN                0;10 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 10, 2007 
              HELP-PROMPT:      Type a Number between 0 and 999999999999, 0 Decimal Digits 
              DESCRIPTION:
                                This field contains the internal IEN of the EWL PATIENT file (409.3).  



      FILES POINTED TO                      FIELDS

PATIENT (#2)                      PATIENT (#.01)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):
PATCH 486 PRINT TEMPLATE      AUG 10, 2007@12:23  USER #0                                  (S/C) EWL Enrolle Status Clean-up Report
PATCH 525 PRINT TEMPLATE      AUG 10, 2007@12:23  USER #0                                 (S/C) EWL Enrollee Status Clean-up Report

SORT TEMPLATE(S):
PATCH 486 SORT TEMPLATE       AUG 10, 2007@11:02  USER #0    
SORT BY: ]NUMBER// (NUMBER not null)
     Sort template for the EWL Enrollee Clean-up report.

PATCH 525 SORT TEMPLATE       AUG 10, 2007@11:02  USER #0    
SORT BY: ]NUMBER// (NUMBER not null)
     Sort template for the EWL Enrollee Status Clean-up report.


FORM(S)/BLOCK(S):