Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: VPRDSDAM

Package: Virtual Patient Record

Routine: VPRDSDAM


Information

VPRDSDAM ;SLC/MKB -- Appointment extract ;8/2/11 15:29

Source Information

Source file <VPRDSDAM.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Scheduling 2 $$SDAPI^SDAMA301  $$GETOE^SDOE  
Virtual Patient Record 2 ($$ESC,$$FAC)^VPRD  $$AMIS^VPRDVSIT  
VA FileMan 1 ($$GET1,GETS)^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Virtual Patient Record 1 VPRDJ04  

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,BEG,END,MAX,ID) ; -- find patient's [future] appointments
A ; get one appt
B ; get all [future] appointments
C ; get scheduled admissions
EN1(DATE,APPT) ; -- return an appointment in APPT("attribute")=value
; Expects ^TMP($J,"SDAMA301",DFN,DATE)
SERV(FTS) ; -- Return #42.4 Service for a Facility Treating Specialty
DGS(IFN,ADM) ; -- return a scheduled admission in ADM("attribute")=value
DGIEN(DATE) ; -- find #41.1 ien for DFN and DATE
XML(APPT) ; -- Return appointment as XML
LOOP() ; -- build sub-items string from NAMES and X
ADD(X) ; -- Add a line @VPR@(n)=X

External References

Name Field # of Occurrence
$$GET1^DIQ EN1+13, EN1+15, EN1+17, SERV+2, DGS+7, DGS+8, DGS+10
GETS^DIQ EN1+19
$$SDAPI^SDAMA301 A+7, B+3
$$GETOE^SDOE EN1+9
$$ESC^VPRD XML+5, LOOP+2
$$FAC^VPRD EN1+24, DGS+11
$$AMIS^VPRDVSIT EN1+12, DGS+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SC - [#44] GET1^DIQ,  GETS^DIQ
^DIC(45.7 - [#45.7] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGS(41.1 - [#41.1] C+1, C+2, DGS+2, DGIEN+2
^DIC(42 - [#42] DGS+3
^SC - [#44] DGS+6
^TMP($J A+9!, B+4, B+5, B+9!, EN1+3, EN1+29
^VA(200 - [#200] EN1+23, DGS+12

Label References

Name Line Occurrences
$$DGIEN A+4
$$LOOP XML+6
$$SERV EN1+14, DGS+9
ADD XML+2, XML+3, XML+7
DGS A+5, C+6
EN1 A+8, B+7
XML A+5, A+8, B+8, C+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADM DGS~, DGS+1!
ADM("apptStatus" DGS+14*
ADM("clinicStop" DGS+7*
ADM("dateTime" DGS+4*
ADM("facility" DGS+11*
ADM("id" DGS+4*, DGS+5*
ADM("location" DGS+6*
ADM("patientClass" DGS+13*
ADM("provider" DGS+12*
ADM("service" DGS+9*, DGS+10*
ADM("serviceCategory" DGS+13*
ADM("visitString" DGS+5*
APPT EN1~, EN1+2!, XML~
APPT( XML+3, XML+4
APPT("apptStatus" EN1+27*
APPT("cancelReason" EN1+30*
APPT("cancelled" EN1+8*
APPT("checkIn" EN1+6*
APPT("checkOut" EN1+7*
APPT("clinicStop" EN1+12*
APPT("dateTime" EN1+10*
APPT("facility" EN1+24*
APPT("id" EN1+10*
APPT("location" EN1+11*
APPT("patientClass" EN1+25*
APPT("provider" EN1+23*
APPT("service" EN1+14*, EN1+15*
APPT("serviceCategory" EN1+26*
APPT("type" EN1+4*
APPT("visit" EN1+9*
APPT("visitString" EN1+28*
ATT XML+1~, XML+3*, XML+4, XML+5, XML+6
BEG EN~, EN+3*, EN+5, A+3*, A+4, A+6, A+8, C+5
CLS EN1+2~, EN1+5*, EN1+25, EN1+26
DATE EN1~, EN1+3*, EN1+10, EN1+28, EN1+29, DGS+1~, DGS+3*, DGS+4, DGS+5, DGIEN~
, DGIEN+2
DFN EN~, EN+2*, EN+5, A+9, B+4, B+5, B+9, C+1, EN1+3, EN1+29
, DGIEN+2
DT EN+3, B+6
END EN~, EN+4*, EN+5, A+3*, A+6, C+5
>> FILTER("status" B+2, C+3, C+4
FIRST EN1+18~, EN1+20*, EN1+22
FTS SERV~, SERV+1*, SERV+2
HLOC EN1+2~, EN1+4*, EN1+10, EN1+11, EN1+13, EN1+15, EN1+17, EN1+19, EN1+24, EN1+28
, DGS+1~, DGS+3*, DGS+4, DGS+5, DGS+6, DGS+7, DGS+8, DGS+10, DGS+11
I EN1+18~, EN1+20*, EN1+21*, DGIEN+1~, DGIEN+2*
ID EN~, A+1, A+2, A+3, A+6
IFN DGS~, DGS+2
MAX EN~, EN+4*, B+4, C+1
NAMES XML+1~, XML+6*, LOOP+2
P LOOP+1~, LOOP+2*
PRV EN1+2~, EN1+17*, EN1+21*, EN1+22*, EN1+23
SDOE EN1+2~, EN1+9*
STR LOOP+1~*, LOOP+2*, LOOP+3
STS EN1+2~, EN1+5*, EN1+27
SV EN1+2~, EN1+13*, EN1+14, EN1+15, DGS+1~, DGS+8*, DGS+9, DGS+10
TAG LOOP+1~, LOOP+2*
U B+5, C+3, C+4, C+5, EN1+4, EN1+5, EN1+6, EN1+7, EN1+8, EN1+9
, EN1+12, EN1+23, EN1+30, DGS+3, DGS+6, DGS+12, DGS+14, DGIEN+2, LOOP+2
>> VPR ADD+2
VPRA EN+1~, C+1*, C+2, C+6
VPRCNT EN+1~, B+3*, B+4, B+8*, C+1, C+7*
VPRDT EN+1~, B+3*, B+4*, B+5, B+6, B+7
>> VPRI ADD+1*, ADD+2
VPRITM EN+1~, A+5, A+8, B+7!, B+8, C+6!, C+7
VPRNUM EN+1~, A+7*, B+3*
VPRP EN1+18~
VPRP( EN1+20, EN1+21, EN1+22
VPRSTS EN+1~, B+1*, B+2*, B+6
>> VPRTOTL XML+2*
VPRX EN+1~, A+7, B+3, C+2*, C+3, C+4, C+5
VPRX("FLDS" EN+5*
VPRX("SORT" EN+5*
VPRX(1 EN+5*, A+6*
VPRX(2 A+6*
VPRX(3 B+1*, B+2*
VPRX(4 EN+5*
X EN+1~, A+4*, A+5, B+5*, B+6, C+5*, EN1+2~, EN1+3*, EN1+4, EN1+5
, EN1+6, EN1+7, EN1+8, EN1+9, EN1+12, DGS+1~, DGS+7*, DGS+12*, DGIEN+1~, XML+1~
, XML+4*, XML+5, XML+6, LOOP+2, ADD~, ADD+2
X0 EN1+29~*, EN1+30, DGS+1~, DGS+2*, DGS+3, DGS+12, DGS+14
Y SERV+1~*, SERV+2*, SERV+3, DGIEN+1~*, DGIEN+2*, DGIEN+3, XML+1~, XML+3, XML+4*, XML+5*
, XML+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All