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 |  Pointer To FileMan Files |  Fields |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^SDASE

Package: Registration

Global: ^SDASE


Information

FileMan FileNo FileMan Filename Package
40.15 OPC ERRORS Registration

Description

Directly Accessed By Routines, Total: 3

Package Total Routines
Registration 3 ^SDASE    FIELD NAME    VISIT DATE MESSAGE    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Registration 2 MEDICAL CENTER DIVISION(#40.8)[.02, #40.152(2), #40.16(4)]
PATIENT(#2)[.01]    

Fields, Total: 5

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

  • INPUT TRANSFORM:  S DINUM=X
  • LAST EDITED:  JAN 05, 1984
  • DESCRIPTION:  
    This field contains the pointer value of the patient file.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  40.15^B
    1)= S ^SDASE("B",$E(X,1,30),DA)=""
    2)= K ^SDASE("B",$E(X,1,30),DA)
.02 FACILITY 0;2 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8) MEDICAL CENTER DIVISION(#40.8)

  • LAST EDITED:  MAY 17, 1988
  • DESCRIPTION:  
    This field contains the pointer value of the Medical Center Division.
  • CROSS-REFERENCE:  40.15^AF
    1)= S ^SDASE("AF",$E(X,1,30),DA)=""
    2)= K ^SDASE("AF",$E(X,1,30),DA)
.09 SSN COMPUTED

  • MUMPS CODE:  X ^DD(40.15,.09,9.2) S X=$P(Y(40.15,.09,101),U,9) S D0=Y(40.15,.09,2)
    9.2 = S Y(40.15,.09,2)=$S($D(D0):D0,1:""),Y(40.15,.09,1)=$S($D(^SDASE(D0,0)):^(0),1:""),D0=$P(Y(40.15,.09,1),U,1) S:'$D(^DPT(+D0,0)) D0=-1 S Y(40.15,.09,101)=$S($D(^DPT(D0,0)):^(0),1:"")
  • ALGORITHM:  NAME:SSN
  • DESCRIPTION:  This field stores the 9 digit social security number of the patient who has been identified as having missing data and requires editing the OPC ERROR in order for the workload to be transmitted to the Austin DPC.
1 FIELD NAME 1;0 Multiple #40.16 40.16

  • DESCRIPTION:  
    This contains the name of the field that needs to be corrected.
2 VISIT DATE MESSAGE MSG;0 Multiple #40.152 40.152

  • DESCRIPTION:  
    This field contains the error message related to the visit date.

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(40.15 .09+1
^DPT - [#2] .09OF9.2+1
^SDASE - [#40.15] .09OF9.2+1
^SDASE("AF" .02(XREF 1S), .02(XREF 1K)
^SDASE("B" .01(XREF 1S), .01(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 .09OF9.2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D0 .09+1*, .09OF9.2+1*
>> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K)
>> DINUM .01+1*
U .09+1, .09OF9.2+1
>> X .01+1, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .09+1*
>> Y( .09+1, .09OF9.2+1*
Info |  Desc |  Directly Accessed By Routines |  Pointer To FileMan Files |  Fields |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All