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 |  ICR |  Found Entries |  All
Print Page as PDF
Global: ^DGCN(391.91

Package: Registration

Global: ^DGCN(391.91


Information

FileMan FileNo FileMan Filename Package
391.91 TREATING FACILITY LIST Registration

Description

Directly Accessed By Routines, Total: 18

Package Total Routines
Registration 10 DG53800P    DGROUT    VAFCOTFU    VAFCPDAT    VAFCQRY2    VAFCRAUD    VAFCTFMF    VAFCTFU
VAFCTFU1    VAFCTFU2    
Scheduling 5 SDWLE11    SDWLE6    SDWLFUL1    SDWLRP1    SDWLRP4    
Patient Registration MPI 3 AGMP72P3    AGMPHLEU    AGMPHMFN    

Accessed By FileMan Db Calls, Total: 10

Package Total Routines
Registration 6 DG53800P    VAFCOTFU    VAFCPDAT    VAFCQRY2    VAFCTFMF    VAFCTFU    
Patient Registration MPI 4 AGMP72P3    AGMPHLEU    AGMPHLVQ    AGMPHMFN    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Registration 2 VA PATIENT(#2)[.01]    ADT/HL7 EVENT REASON(#391.72)[.07]    
Kernel 1 INSTITUTION(#4)[.02]    

Fields, Total: 6

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

  • LAST EDITED:  DEC 02, 1999
  • HELP-PROMPT:  Enter the patient name, between 1 and 30 characters.
  • DESCRIPTION:  
    This is a pointer to the patient in question that was seen at this treating facility.
  • CROSS-REFERENCE:  391.91^B
    1)= S ^DGCN(391.91,"B",$E(X,1,30),DA)=""
    2)= K ^DGCN(391.91,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  391.91^APAT^MUMPS
    1)= N TMPA S TMPA=$P($G(^DGCN(391.91,DA,0)),U,2) I TMPA S ^DGCN(391.91,"APAT",$E(X,1,30),TMPA,DA)=""
    2)= N TMPA S TMPA=$P($G(^DGCN(391.91,DA,0)),U,2) I TMPA K ^DGCN(391.91,"APAT",$E(X,1,30),TMPA,DA)
    This cross-reference is used to uniquely identify the institutions where the patient has been treated.
  • CROSS-REFERENCE:  391.91^AINST^MUMPS
    1)= N TMPA S TMPA=$P($G(^DGCN(391.91,DA,0)),U,2) I TMPA S ^DGCN(391.91,"AINST",TMPA,$E(X,1,30),DA)=""
    2)= N TMPA S TMPA=$P($G(^DGCN(391.91,DA,0)),U,2) I TMPA K ^DGCN(391.91,"AINST",TMPA,$E(X,1,30),DA)
    This cross-reference is used to uniquely identify the patients for a particular institution.
.02 INSTITUTION 0;2 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • LAST EDITED:  SEP 10, 1996
  • HELP-PROMPT:  Enter the institution where the patient was seen, between 1 and 30 characters.
  • DESCRIPTION:  
    This is the institution where the patient was treated.
    UNEDITABLE
  • CROSS-REFERENCE:  391.91^C
    1)= S ^DGCN(391.91,"C",$E(X,1,30),DA)=""
    2)= K ^DGCN(391.91,"C",$E(X,1,30),DA)
    This is a lookup cross-reference on the institution.
  • CROSS-REFERENCE:  391.91^APAT2^MUMPS
    1)= N TMPA S TMPA=$P($G(^DGCN(391.91,DA,0)),U,1) I TMPA S ^DGCN(391.91,"APAT",TMPA,$E(X,1,30),DA)=""
    2)= N TMPA S TMPA=$P($G(^DGCN(391.91,DA,0)),U,1) I TMPA K ^DGCN(391.91,"APAT",TMPA,$E(X,1,30),DA)
    This cross-reference is used to uniquely identify the institutions at which a patient has been seen.
  • CROSS-REFERENCE:  391.91^AINST2^MUMPS
    1)= N TMPA S TMPA=$P($G(^DGCN(391.91,DA,0)),U,1) I TMPA S ^DGCN(391.91,"AINST",$E(X,1,30),TMPA,DA)=""
    2)= N TMPA S TMPA=$P($G(^DGCN(391.91,DA,0)),U,1) I TMPA K ^DGCN(391.91,"AINST",$E(X,1,30),TMPA,DA)
    This cross-reference is used to uniquely identify the patients for a particular institution.
.03 DATE LAST TREATED 0;3 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 09, 1996
  • HELP-PROMPT:  Enter the date the patient was treated at the facility.
  • DESCRIPTION:  
    This is the date the patient was treated at the facility.
.07 ADT/HL7 EVENT REASON 0;7 POINTER TO ADT/HL7 EVENT REASON FILE (#391.72) ADT/HL7 EVENT REASON(#391.72)

  • LAST EDITED:  DEC 02, 1999
  • HELP-PROMPT:  Enter the reason for the event experienced by the patient at this treating facility.
  • DESCRIPTION:  
    This field tracks the reason for an event experienced by a patient at a given facility.  Some event reasons might be patient admission, patient discharge, etc.
9999999.01 LOCAL ID (DFN) 9999999;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1.N) X
  • LAST EDITED:  JUL 07, 2009
  • HELP-PROMPT:  Type a number between 1 and 9999999999, 0 Decimal Digits
9999999.02 INTEGRATION CONTROL NUMBER 9999999;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1.N) X
  • LAST EDITED:  MAY 13, 2010
  • HELP-PROMPT:  Type a number between 1 and 999999999999, 0 Decimal Digits

ICR, Total: 5

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #2751
  • MASTER PATIENT INDEX VISTA
    		•  INSTITUTION (.02).
    Access: Write w/Fileman

    PATIENT (.01).
    Access: Write w/Fileman

    		 Checking for the existance of the^DGCN(391.91,"APAT",,) so that an additionto the file won't occur if it already exists.Adding an entry to the Treating Facilit file viaFILE^DICN call populating .01 and .02 fields.
    ICR #2911
  • Clinical Information Resource Network
    		•  INSTITUTION (.02).
    Access: Direct Global Read & w/Fileman

    DATE LAST TREATED (.03).
    Access: Direct Global Read & w/Fileman

    ADT/HL7 EVENT REASON (.07).
    Access: Write w/Fileman

    PATIENT (.01).
    Access: Read w/Fileman

    		 This is a M type cross-reference. It builds thecross-reference from PATIENT (#.01) and INSTITUTION (#.02) field data. Thestructure is as follows:^DGCN(391.91,"APAT", PATIENT (#2) file pointer , INSTITUTION (#4) file pointer, internal entry number)=""This is a M type cross-reference. It builds thecross-reference from PATIENT (#.01) and INSTITUTION (#.02) field data. Thestructure is as follows:^DGCN(391.91,"AINST", INSTITUTION (#4) file pointer , PATIENT (#2) filepointer , internal entry number)=""x-ref build from INSTITUTION (#.02) and PATIENT (#.01)fields.
    ICR #4943
  • SPINAL CORD DYSFUNCTION
  • SCHEDULING
    		•  (n/a).
    Access: Direct Global Read & w/Fileman

    INSTITUTION (.02).
    Access: Direct Global Read & w/Fileman

    DATE LAST TREATED (.03).
    Access: Direct Global Read & w/Fileman

    		 B Cross-reference
    ICR #6106
  • VA Point of Service
    		•  PATIENT (.01).
    Access: Read w/Fileman

    SOURCE ID (11).
    Access: Read w/Fileman
    ICR #6284
  • Enterprise Health Management Platform
    		•  PATIENT (.01).
    Access: Direct Global Read & w/Fileman

    INSTITUTION (.02).
    Access: Direct Global Read & w/Fileman

    SOURCE ID TYPE (.09).
    Access: Direct Global Read & w/Fileman

    ASSIGNING AUTHORITY (10).
    Access: Direct Global Read & w/Fileman

    SOURCE ID (11).
    Access: Direct Global Read & w/Fileman

    IDENTIFIER STATUS (12).
    Access: Direct Global Read & w/Fileman
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  All