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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: DGFFP03

Package: Registration

Routine: DGFFP03


Information

DGFFP03 ; ALB/SCK - FUGITIVE FELON PROGRAM VISIT REPORT ; 11/14/2002

Source Information

Source file <DGFFP03.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMADD,$$FMTE,$$NOW)^XLFDT  
Registration 4 ($$PAUSE,GETDT)^DGFFP02  $$LASTACT^DGFFPLM  (IN5,INP,SDA)^VADPT  PID^VADPT6  
VA FileMan 2 $$GET1^DIQ  ^DIR  

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: 3

Package Total Caller Graph
Registration 2 DGFFP STATUS REPORT  DGFFPLM1  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
QUE ;
START ;
EXIT
RPT ;
GETALL ; Retrieve entire list of patient to print
GETLST(DGBEG,DGEND) ; Retrieve list of patients with the Fugitive Felon Flag set within specified date range
PRINT(DGBEG,DGEND) ; Print report
INPT(DGBEG,DGEND) ;
OUTP(DGBEG,DGEND) ;
SCHED(DGBEG,DGEND) ;
PRNFUT(TMPARY) ;
PRNSCRP(DFN) ; Print Active Script Information
PRNINP(DFN) ; Print Inpatient Information
PRNRCNT(DFN) ; Print most recent activity
PRNAPT(DFN) ; Print Future Appointment information
GETAPT(DFN,TEMP) ; Sort Clinic appointments by clinic
GETFUADM(DFN,TMPARY) ; Get future scheduled admissions
HDR(DGBEG,DGEND) ;
INPHDR ;
OUTHDR ;
FUHDR ;

External References

Name Field # of Occurrence
^%ZIS QUE+14
HOME^%ZIS EXIT
^%ZISC QUE+16, RPT+12
^%ZTLOAD START+5
$$PAUSE^DGFFP02 INPT+18, OUTP+18
GETDT^DGFFP02 QUE+10
$$LASTACT^DGFFPLM PRNRCNT+3
$$GET1^DIQ GETALL+7, GETLST+10, SCHED+8, PRNFUT+7, PRNSCRP+3
^DIR QUE+7
IN5^VADPT PRNINP+4
INP^VADPT GETALL+6, GETLST+9
SDA^VADPT GETAPT+3
PID^VADPT6 INPT+11, OUTP+11, SCHED+17
$$FMADD^XLFDT GETLST+3
$$FMTE^XLFDT PRNFUT+5, PRNINP+6, PRNAPT+11, HDR+9, HDR+13
$$NOW^XLFDT START+1, HDR+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$CHAR(7)
  • Line Location: QUE+12
Function Call: WRITE
  • Prompt: !?5,">> This report requires a 132-column printer"
  • Line Location: QUE+13
Function Call: WRITE
  • Prompt: !!?5,"Report canceled"
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !!?5,"Report Queued"
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !!,"No Patients Found"
  • Line Location: INPT+6
Function Call: WRITE
  • Prompt: !,TXT
  • Line Location: INPT+12
Function Call: WRITE
  • Prompt: !
  • Line Location: INPT+16
Function Call: WRITE
  • Prompt: !!,"No Patients Found"
  • Line Location: OUTP+6
Function Call: WRITE
  • Prompt: !,TXT
  • Line Location: OUTP+12
Function Call: WRITE
  • Prompt: !
  • Line Location: OUTP+16
Function Call: WRITE
  • Prompt: !,TXT
  • Line Location: SCHED+18
Function Call: WRITE
  • Prompt: !?40,$$FMTE^XLFDT(DGDT,"1P")
  • Line Location: PRNFUT+5
Function Call: WRITE
  • Prompt: ?80,$$GET1^DIQ(42,DGWARD,.01)
  • Line Location: PRNFUT+7
Function Call: WRITE
  • Prompt: ?110,$S(DGSCRPT>0:DGSCRPT,1:"None")
  • Line Location: PRNSCRP+4
Function Call: WRITE
  • Prompt: ?40,$P(DGIN(2),U,2)
  • Line Location: PRNINP+5
Function Call: WRITE
  • Prompt: ?55,$$FMTE^XLFDT($P(DGIN(3),U,1),"D")
  • Line Location: PRNINP+6
Function Call: WRITE
  • Prompt: ?70,$P(DGIN(6),U,2)
  • Line Location: PRNINP+7
Function Call: WRITE
  • Prompt: ?80,$P(DGIN(5),U,2)
  • Line Location: PRNINP+8
Function Call: WRITE
  • Prompt: !?3,">> "_DGLAST
  • Line Location: PRNRCNT+5
Function Call: WRITE
  • Prompt: !?40,DGCLN
  • Line Location: PRNAPT+8
Function Call: WRITE
  • Prompt: ?70,$$FMTE^XLFDT(DGDT,"1P"),!
  • Line Location: PRNAPT+11
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?SPACE,TXT
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !?SPACE,TXT
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: !?SPACE,TXT
  • Line Location: HDR+15
Function Call: WRITE
  • Prompt: !?SPACE,TXT
  • Line Location: HDR+19
Function Call: WRITE
  • Prompt: !?SPACE,TXT
  • Line Location: INPHDR+5
Function Call: WRITE
  • Prompt: !!,"Patient Name",?40,"Movement",?55,"Date",?70,"Room/Bed",?80,"Ward",?110,"Active Scripts?"
  • Line Location: INPHDR+7
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: INPHDR+8
Function Call: WRITE
  • Prompt: !?SPACE,TXT
  • Line Location: OUTHDR+5
Function Call: WRITE
  • Prompt: !!,"Patient Name",?40,"Clinic",?70,"Appt. D/T",?110,"Active Scripts?"
  • Line Location: OUTHDR+7
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: OUTHDR+8
Function Call: WRITE
  • Prompt: !?SPACE,TXT
  • Line Location: FUHDR+5
Function Call: WRITE
  • Prompt: !!,"Patient Name",?40,"Scheduled Admission",?80,"Ward",?110,"Active Scripts?"
  • Line Location: FUHDR+7
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: FUHDR+8
Routine Call
  • %ZIS
  • Line Location:
    • QUE+14
Routine Call
  • %ZIS
  • Line Location:
    • EXIT
Routine Call
  • DIR
  • Line Location:
    • QUE+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DIC(42 - [#42] GET1^DIQ
^PS(55 - [#55] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGS(41.1 - [#41.1] GETFUADM+4, GETFUADM+5
^DPT - [#2] GETLST+6
^DPT("AXFFP" GETALL+4, GETLST+5, SCHED+7
^TMP("DGFFP" RPT+5!, RPT+11!, GETALL+7*, GETLST+10*, INPT+6, INPT+8, INPT+10, OUTP+6, OUTP+8, OUTP+10
, SCHED+8*, SCHED+11, SCHED+13

Label References

Name Line Occurrences
EXIT QUE+14
FUHDR SCHED+4
GETALL RPT+8
GETAPT PRNAPT+5
GETFUADM SCHED+15
GETLST RPT+7
HDR INPT+3, INPT+19, OUTP+3, OUTP+19, SCHED+3
INPHDR INPT+4, INPT+19, OUTP+19
INPT PRINT+2
OUTHDR OUTP+4
OUTP PRINT+3
PRINT RPT+10
PRNAPT OUTP+15
PRNFUT SCHED+21
PRNINP INPT+13
PRNRCNT INPT+15, OUTP+14, SCHED+20
PRNSCRP INPT+14, OUTP+13, SCHED+19
RPT QUE+16
SCHED PRINT+4
START QUE+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS QUE+1~, QUE+14*
DFN GETALL+1~, GETALL+5*, GETLST+1~, GETLST+8*, INPT+1~, INPT+9*, INPT+10*, INPT+13, INPT+14, INPT+15
, OUTP+1~, OUTP+9*, OUTP+10*, OUTP+13, OUTP+14, OUTP+15, SCHED+1~, SCHED+6*, SCHED+7*, SCHED+8
, SCHED+12*, SCHED+13*, SCHED+15, SCHED+19, SCHED+20, PRNSCRP~, PRNSCRP+3, PRNINP~, PRNRCNT~, PRNRCNT+3
, PRNAPT~, PRNAPT+5, GETAPT~, GETFUADM~, GETFUADM+4
DGABRT INPT+1~, INPT+8, INPT+10, INPT+18*, OUTP+1~, OUTP+8, OUTP+10, OUTP+18*, SCHED+1~, SCHED+11
, SCHED+13
DGAPT INPT+1~, OUTP+1~, SCHED+1~, GETAPT+1~, GETAPT+4*, GETAPT+6, GETAPT+7, GETAPT+8
DGBEG QUE+1~, QUE+9*, QUE+10, RPT+7, RPT+10, GETLST~, GETLST+7, PRINT~, PRINT+2, PRINT+3
, PRINT+4, INPT~, INPT+3, INPT+19, OUTP~, OUTP+3, OUTP+19, SCHED~, SCHED+3, HDR~
, HDR+8, HDR+9
DGCLN PRNAPT+1~, PRNAPT+6*, PRNAPT+7*, PRNAPT+8, PRNAPT+10
DGDFN GETALL+1~, GETALL+3*, GETALL+4*, GETALL+5, GETALL+7, GETLST+1~, GETLST+4*, GETLST+5*, GETLST+6, GETLST+8
, GETLST+10
DGDT PRNFUT+1~, PRNFUT+3*, PRNFUT+4*, PRNFUT+5, PRNFUT+6, PRNAPT+1~, PRNAPT+9*, PRNAPT+10*, PRNAPT+11
DGEND QUE+1~, QUE+9*, QUE+10, RPT+7, RPT+10, GETLST~, GETLST+3*, GETLST+7, PRINT~, PRINT+2
, PRINT+3, PRINT+4, INPT~, INPT+3, INPT+19, OUTP~, OUTP+3, OUTP+19, SCHED~, SCHED+3
, HDR~, HDR+9
DGFFP GETLST+1~, GETLST+6*, GETLST+7
DGIEN GETFUADM+1~, GETFUADM+3*, GETFUADM+4*, GETFUADM+5
DGIN PRNINP+1~
DGIN(2 PRNINP+5
DGIN(3 PRNINP+6
DGIN(5 PRNINP+8
DGIN(6 PRNINP+7
DGINP GETALL+1~, GETALL+8!, GETLST+1~, GETLST+11!
DGINP(1 GETALL+7, GETLST+10
DGLAST PRNRCNT+1~, PRNRCNT+3*, PRNRCNT+4, PRNRCNT+5
DGNAME INPT+1~, INPT+7*, INPT+8*, INPT+10, INPT+12, OUTP+1~, OUTP+7*, OUTP+8*, OUTP+10, OUTP+12
, SCHED+1~, SCHED+10*, SCHED+11*, SCHED+13, SCHED+18
DGNODE GETFUADM+1~, GETFUADM+5*, GETFUADM+6
DGRTN PRNAPT+1~
DGSCRPT PRNSCRP+1~, PRNSCRP+3*, PRNSCRP+4
DGSTAT INPT+1~, OUTP+1~, SCHED+1~
DGTMP QUE+1~
DGWARD PRNFUT+1~, PRNFUT+6*, PRNFUT+7
DIR QUE+1~, QUE+7!
DIR("?" QUE+4*, QUE+5*, QUE+6*
DIR("A" QUE+3*
DIR("B" QUE+3*
DIR(0 QUE+3*
DIRUT QUE+1~, QUE+8
IO RPT+3
IO("Q" QUE+15
IOF HDR+3
IOM HDR+5, HDR+10, HDR+14, HDR+18, INPHDR+4, INPHDR+8, OUTHDR+4, OUTHDR+8, FUHDR+4, FUHDR+8
IOSL INPT+17, OUTP+17
IOST HDR+3
LINE PRNAPT+1~, GETAPT+1~, GETAPT+5*, GETAPT+6*, GETAPT+7, HDR+1~, INPHDR+1~, INPHDR+8*, OUTHDR+1~, OUTHDR+8*
, FUHDR+1~, FUHDR+8*
PAGE RPT+1~, RPT+4*, HDR+3, HDR+17, HDR+20*
>> POP QUE+14
>> RSLT PRNAPT+7, PRNAPT+10
SPACE HDR+1~, HDR+5*, HDR+6, HDR+10*, HDR+11, HDR+14*, HDR+15, HDR+18*, HDR+19, INPHDR+1~
, INPHDR+4*, INPHDR+5, OUTHDR+1~, OUTHDR+4*, OUTHDR+5, FUHDR+1~, FUHDR+4*, FUHDR+5
TEMP PRNAPT+1~, PRNAPT+3*, PRNAPT+4, PRNAPT+5, PRNAPT+7, PRNAPT+10, PRNAPT+12, GETAPT~, GETAPT+7
TMPARY SCHED+1~, SCHED+14*, SCHED+15, SCHED+16, SCHED+21, SCHED+22, PRNFUT~, PRNFUT+4, PRNFUT+6, GETFUADM~
, GETFUADM+6
TXT INPT+1~, INPT+12*, OUTP+1~, OUTP+12*, SCHED+1~, SCHED+18*, HDR+1~, HDR+4*, HDR+5, HDR+6
, HDR+9*, HDR+10, HDR+11, HDR+13*, HDR+14, HDR+15, HDR+17*, HDR+18, HDR+19, INPHDR+1~
, INPHDR+3*, INPHDR+4, INPHDR+5, OUTHDR+1~, OUTHDR+3*, OUTHDR+4, OUTHDR+5, FUHDR+1~, FUHDR+3*, FUHDR+4
, FUHDR+5
U GETLST+6, PRNFUT+6, PRNINP+5, PRNINP+6, PRNINP+7, PRNINP+8, GETAPT+7, GETFUADM+6
VA INPT+1~, OUTP+1~, SCHED+1~
VA("BID" INPT+12, OUTP+12, SCHED+18
VAROOT GETALL+1~, GETALL+5*, GETLST+1~, GETLST+8*, PRNINP+1~, PRNINP+3*, GETAPT+1~
VASD GETAPT+1~
Y QUE+1~, QUE+9
ZTDESC QUE+1~, START+3*
ZTDTH QUE+1~, START+1*
ZTIO QUE+1~
ZTRTN QUE+1~, START+4*
ZTSAVE QUE+1~
ZTSAVE("DGBEG" START+2*
ZTSAVE("DGEND" START+2*
>> ZTSK START+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All