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 |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^AFJ(537010

Package: Network Health Exchange

Global: ^AFJ(537010


Information

FileMan FileNo FileMan Filename Package
537010 VAMC NETWORK PATIENT Network Health Exchange

Description

Directly Accessed By Routines, Total: 6

Package Total Routines
Network Health Exchange 6 AFJXPPED    Records Available At    ^AFJ(537010    ^AFJ(537025    AFJXPNHT    AFJXPRE    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Network Health Exchange 2 AFJXPNHT    AFJXPPED    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Lab Service 1 REFERRAL PATIENT(#67)[2.2]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
MailMan 1 DOMAIN(#4.2)[#537010.04(.01)]    

Fields, Total: 5

Field # Name Loc Type Details
.01 Social Security Number 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<9) X
  • LAST EDITED:  FEB 23, 1994
  • HELP-PROMPT:  Answer must be 9-12 characters in length.
  • DESCRIPTION:  
    this field should contain the patient ssn for use to compare the common patients
  • CROSS-REFERENCE:  537010^B
    1)= S ^AFJ(537010,"B",$E(X,1,30),DA)=""
    2)= K ^AFJ(537010,"B",$E(X,1,30),DA)
1 Date of Birth 0;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 02, 1994
2 Patient Name 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  JUL 19, 1994
  • HELP-PROMPT:  Answer must be 1-50 characters in length.
  • CROSS-REFERENCE:  537010^C
    1)= S ^AFJ(537010,"C",$E(X,1,30),DA)=""
    2)= K ^AFJ(537010,"C",$E(X,1,30),DA)
    NAME
3 Records Available At 1;0 POINTER Multiple #537010.04 537010.04
4 Date Entered 2;1 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 20, 1994

External References

Name Field # of Occurrence
^%DT 1+1, 4+1
EN^DDIOL ID2+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AFJ(537010 - [#537010] .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 ID2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 1+1*, 4+1*
>> DA .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K)
U ID2+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1*!, 2+1!, 2(XREF 1S), 2(XREF 1K), 4+1*!
>> Y 1+1, 4+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All