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 |  Local Variables  | All
Print Page as PDF
Global: ^VPS(853.9

Package: VA Point of Service

Global: ^VPS(853.9


Information

FileMan FileNo FileMan Filename Package
853.9 VPS APPOINTMENTS QUEUE VA Point of Service

Description

Directly Accessed By Routines, Total: 5

Package Total Routines
VA Point of Service 4 ^VPS(853.9    APPOINTMENTS    VPSAPPT    VPSAPPT2    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
VA Point of Service 1 VPSAPPT2    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Scheduling 2 HOSPITAL LOCATION(#44)[#853.91(.01)]    APPOINTMENT TYPE(#409.1)[#853.91(3)]    
Registration 1 PATIENT(#2)[#853.91(2)]    

Fields, Total: 4

Field # Name Loc Type Details
.01 QUEUE ID 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1.N) X S:$D(X) DINUM=X
  • LAST EDITED:  JUL 19, 2013
  • HELP-PROMPT:  Type a number between 1 and 9999999999, 0 decimal digits.
  • DESCRIPTION:  
    This field contains a sequential number generated at the time a record is stored in the file. It only serves to create an entry in the file and has no other special meaning.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  853.9^B
    1)= S ^VPS(853.9,"B",$E(X,1,30),DA)=""
    2)= K ^VPS(853.9,"B",$E(X,1,30),DA)
    This cross reference is utilized for identification.
  • FIELD INDEX:  CLINIC (#1219) REGULAR IR LOOKUP & SORTING
    Unique for: Key A (#115), File #853.9
    Short Descr: Uniqueness Index for Key 'A' of File #853.9
    Set Logic: S ^VPS(853.9,"CLINIC",X,DA)=""
    Kill Logic: K ^VPS(853.9,"CLINIC",X,DA)
    Whole Kill: K ^VPS(853.9,"CLINIC")
    X(1): QUEUE ID (853.9,.01) (Subscr 1)
1 APPOINTMENT FROM DATE 0;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 13, 2014
  • HELP-PROMPT:  Enter Appointment From Date or Date/Time.
  • DESCRIPTION:  
    This is the Appointment From Date in which the appointments for the queue was retrieved.
2 APPOINTMENT THROUGH DATE 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 13, 2014
  • HELP-PROMPT:  Enter Appointment Through Date or Date/Time.
  • DESCRIPTION:  
    This is the Appointment Through Date in which the appointments for the queue was retrieved.
10 APPOINTMENTS 1;0 POINTER Multiple #853.91 853.91

  • DESCRIPTION:  
    A list of appointments for the given queue.
  • INDEXED BY:  CLINIC & APPOINTMENT DATE/TIME & PATIENT (C)

External References

Name Field # of Occurrence
^%DT 1+1, 2+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^VPS(853.9 - [#853.9] IXCLINICSL+1*, IXCLINICKL+1!, IXCLINICKEIC+1!, .01(XREF 1S), .01(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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