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 |  All
Print Page as PDF
Global: ^SDWL(409.39

Package: Scheduling

Global: ^SDWL(409.39


Information

FileMan FileNo FileMan Filename Package
409.39 EWL CLEAN-UP Scheduling

Description

Directly Accessed By Routines, Total: 2

Package Total Routines
Scheduling 2 SDWLFUL1    SDWLFUL2    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Scheduling 1 SDWLFUL1    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Registration 1 VA PATIENT(#2)[.01]    

Fields, Total: 11

Field # Name Loc Type Details
.01 PATIENT 0;1 POINTER TO VA PATIENT FILE (#2)
************************REQUIRED FIELD************************
VA PATIENT(#2)

  • 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)
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).
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.
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.
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).
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.
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.
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.
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.
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.
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).
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  All