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

Package: Registration

Global: ^DGS(41.42


Information

FileMan FileNo FileMan Filename Package
41.42 PRE-REGISTRATION CALL LIST Registration

Description

Directly Accessed By Routines, Total: 7

Package Total Routines
Registration 6 DGPREBJ    DGPREBJ1    DGPREP0    DGPREP4    ^DGS(41.42    DGPREP1    
VA Point of Service 1 VPSRPC3    

Accessed By FileMan Db Calls, Total: 5

Package Total Routines
Registration 4 DGPREBJ    DGPREBJ1    DGPREP1    DGPREP4    
VA Point of Service 1 VPSRPC3    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Registration 2 MEDICAL CENTER DIVISION(#40.8)[.1]    PATIENT(#2)[.01]    
Scheduling 1 HOSPITAL LOCATION(#44)[5]    

Fields, Total: 9

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

  • LAST EDITED:  DEC 09, 1996
  • HELP-PROMPT:  Enter patient name in 'Last,First Middle' format
  • DESCRIPTION:  
    Patient to call for pre-registration. Pointer to the PATIENT FILE, #2.
  • CROSS-REFERENCE:  41.42^B
    1)= S ^DGS(41.42,"B",$E(X,1,30),DA)=""
    2)= K ^DGS(41.42,"B",$E(X,1,30),DA)
.1 DIVISION 0;2 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8) MEDICAL CENTER DIVISION(#40.8)

  • LAST EDITED:  DEC 17, 1996
  • HELP-PROMPT:  Enter the Division the patient has an appointment in.
  • DESCRIPTION:  
    This is the Division the APPT CLINIC, Field #5, is associated with.
  • CROSS-REFERENCE:  41.42^C
    1)= S ^DGS(41.42,"C",$E(X,1,30),DA)=""
    2)= K ^DGS(41.42,"C",$E(X,1,30),DA)
    Cross-ref by division
1 SSN 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>14!($L(X)<3) X
  • LAST EDITED:  JAN 07, 1997
  • HELP-PROMPT:  Enter as First initial of Lastname and last four of SSN
  • DESCRIPTION:  
    This field is the first initial of the patients last name and the last four of the patients SSN. This field will normally be filled in by a background job. Entry appears in a List Manager screen.
2 PHONE 1;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  DEC 09, 1996
  • HELP-PROMPT:  Enter the patients residence phone, or emergency contact phone.
  • DESCRIPTION:  Telephone number at which patient will be called for the pre-registration process. If the patients has a residence phone number, the residence number is loaded. If there is no residence number on file, then the patients
    Emergency Phone number is loaded. If there is no emergency phone number, then tbe string 'NO PHONE' is entered.
  • TECHNICAL DESCR:  
    This field should be filled in by the background job that purges and adds new entries to this file.
3 LAST UPDATED 0;5 DATE

  • INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 16, 1996
  • HELP-PROMPT:  Enter the date the patient was last called.
  • DESCRIPTION:  
    Date/time field showing the date and time the last attempt was made to call this patient. This field is loaded from the PRE_REGISTRATION CALL LOG File, #41.43.
4 CALLED 0;6 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  DEC 09, 1996
  • HELP-PROMPT:  Enter 'Y' if the patient was called, otherwise enter 'N'.
  • DESCRIPTION:  Indicates whether the patient was called or not. When 'Y'es, the patient has been called and his information updtaed. If 'N'o, then either the patient has not been reached, or he has been called, but his information was
    not updated.
5 APPT CLINIC 0;7 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • INPUT TRANSFORM:  S DIC("S")="I $P($G(^SC(Y,0)),U,3)=""C""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 07, 1997
  • HELP-PROMPT:  Enter the clinic the patients appointment is in.
  • DESCRIPTION:  
    Pointer to the HOSPITAL LOCATION File, #44. This is the clinic the patients appointment is in.
  • TECHNICAL DESCR:  
    This entry is screened so only hospital location types of 'C' are allowed.
  • SCREEN:  S DIC("S")="I $P($G(^SC(Y,0)),U,3)=""C"""
  • EXPLANATION:  HOSPITAL LOCATION Type must = 'C' for clinic.
6 APPT DATE/TIME 0;8 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 23, 1997
  • HELP-PROMPT:  Enter date and time of patients appointment.
  • DESCRIPTION:  
    The date and time of the patients appointment for the clinic specified in field #5.
7 MEDICAL SERVICE 1;1 SET
  • 'M' FOR MEDICINE;
  • 'S' FOR SURGERY;
  • 'P' FOR PSYCHIATRY;
  • 'R' FOR REHAB MEDICINE;
  • 'N' FOR NEUROLOGY;
  • '0' FOR NONE;

  • LAST EDITED:  JAN 07, 1997
  • HELP-PROMPT:  Select the appropriate service from the list below.
  • DESCRIPTION:  This field mirrors the set of codes in the SERVICE Field, #9, of the HOSPITAL LOCATION File, #44. These are:
    M:MEDICINE
    S:SURGERY
    P:PSYCHIATRY
    R:REHAB MEDICINE
    N:NEUROLOGY
    0:NONE

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #5817
  • VA Point of Service
    		•  DIVISION (.1).
    Access: Read w/Fileman

    LAST UPDATED (3).
    Access: Write w/Fileman

    CALLED (4).
    Access: Write w/Fileman

    (PATIENT(B) CROSS-REFERENCE).
    Access: Read w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT 3+1, 6+1
    ^DIC 5+1

    Global Variables Directly Accessed

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

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 3+1*, 6+1*
    >> DA .01(XREF 1S), .01(XREF 1K), .1(XREF 1S), .1(XREF 1K)
    DIC 5+1!*
    DIC("S" 5+1*, 5SCR+1*
    >> DIE 5+1
    X .01(XREF 1S), .01(XREF 1K), .1(XREF 1S), .1(XREF 1K), 1+1!, 2+1!, 3+1*!, 5+1*!, 6+1*!
    >> Y 3+1, 5+1, 6+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All