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

Package: Registration

Global: ^DGS(43.5


Information

FileMan FileNo FileMan Filename Package
43.5 G&L CORRECTIONS Registration

Description

Directly Accessed By Routines, Total: 8

Package Total Routines
Registration 7 ^DGS(43.5    DGPMBSAB    DGPMBSAR    DGPMBSR    DGPMGL1    DGPMGLC    DGPMGLP    
Local Area Programs 1 AZAXDPM2    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Registration 2 DGPMBSAR    DGPMBSR    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Registration 2 G&L TYPE OF CHANGE(#43.61)[.02]    VA PATIENT(#2)[.05]    
Kernel 1 NEW PERSON(#200)[.07]    

Fields, Total: 10

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

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 21, 1985
  • DESCRIPTION:  
    The change was made to the patient movement on this date.
  • CROSS-REFERENCE:  43.5^B
    1)= S ^DGS(43.5,"B",$E(X,1,30),DA)=""
    2)= K ^DGS(43.5,"B",$E(X,1,30),DA)
.02 TYPE OF CHANGE 0;2 POINTER TO G&L TYPE OF CHANGE FILE (#43.61) G&L TYPE OF CHANGE(#43.61)

  • LAST EDITED:  APR 23, 1993
  • HELP-PROMPT:  Select the type of change that best fits from the G&L Type of Change File.
  • DESCRIPTION:  
    The type of change (e.g. admission/discharge/transfer, treating specialty entered/deleted/edited or changes to the ward or movement type) made to patient movement.
.03 OLD VALUE 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>32!($L(X)<1) X
  • LAST EDITED:  JAN 07, 1985
  • HELP-PROMPT:  ANSWER MUST BE 1-32 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the old value prior to change made to the patient movement.
.04 NEW VALUE 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>32!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-32 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the new value after the change was made to the patient movement.
.05 PATIENT 0;5 POINTER TO VA PATIENT FILE (#2) VA PATIENT(#2)

  • LAST EDITED:  JAN 08, 1985
  • DESCRIPTION:  
    This field contains the IFN for the patient involved.
  • CROSS-REFERENCE:  43.5^C
    1)= S ^DGS(43.5,"C",$E(X,1,30),DA)=""
    2)= K ^DGS(43.5,"C",$E(X,1,30),DA)
.06 ADMISSION THIS APPLIES TO 0;6 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 12, 1985
  • DESCRIPTION:  
    This field contains the admission date/time that changes relates to.
.07 ENTRY PERSON 0;7 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  OCT 17, 1990
  • DESCRIPTION:  
    This field contains the IFN of the person who made the change to the patient movement.
.08 EARLIEST DATE TO CORRECT 0;8 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 13, 1985
  • DESCRIPTION:  
    This field contains the earliest date needed for recalc of the G&L/BSR based on the change made to this patient movement.
  • CROSS-REFERENCE:  43.5^AGL
    1)= S ^DGS(43.5,"AGL",$E(X,1,30),DA)=""
    2)= K ^DGS(43.5,"AGL",$E(X,1,30),DA)
.09 TRANSFER DATE 0;9 DATE

  • INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 26, 1986
  • DESCRIPTION:  
    This field contains the transfer date change made to this patient movement.
10 RECALCULATION DATE 10;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 12, 1985
  • DESCRIPTION:  
    This field contains the date recalculation was done for this change to the patient movement.

External References

Name Field # of Occurrence
^%DT .01+1, .06+1, .08+1, .09+1, 10+1
Y^DIQ ID.02+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(43.61 ID.02+1
^DG(43.61 - [#43.61] ID.02+1
^DGS(43.5 - [#43.5] .01(XREF 1S), .01(XREF 1K), .05(XREF 1S), .05(XREF 1K), .08(XREF 1S), .08(XREF 1K)
^DPT - [#2] ID.05+1

Naked Globals

Name Field # of Occurrence
^(0 ID.02+1, ID.05+1, ID.06+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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