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

Package: Registration

Routine: DGPPRP2


Information

DGPPRP2 ;LIB/MKN - PRESUMPTIVE PSYCHOSIS STATISTICAL REPORT ;08/02/2019

Source Information

Source file <DGPPRP2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMADD,$$FMTE)^XLFDT  
VA FileMan 2 GETS^DIQ  ^DIR  
Registration 1 ($$DTFRMTO,$$GETDEFD)^DGPPRP1  

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
Registration 1 DG PRESUMP. PSYCH. STATS  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point from Menu Option: PRESUMPTIVE PSYCHOSIS STATISTICAL REPORT
SELDATES ;
DQ ;
PRINT ;Print out results
SET ;
HELP ;
OUT ; KILL RETURN ARRAY QUIT

External References

Name Field # of Occurrence
^%ZIS SELDATES+7
HOME^%ZIS SELDATES+11
^%ZISC OUT+1
^%ZTLOAD SELDATES+11
$$DTFRMTO^DGPPRP1 SELDATES+2
$$GETDEFD^DGPPRP1 SELDATES+1
GETS^DIQ SET+2
^DIR SELDATES+12
$$FMADD^XLFDT DQ+1
$$FMTE^XLFDT PRINT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There is no record of patch DG*5.3*977 being installed!",!!
  • Line Location: SELDATES+1
Function Call: WRITE
  • Prompt: !!,"Report compilation has started with task# ",ZTSK,".",!
  • Line Location: SELDATES+12
Function Call: READ
  • Formatting: !!?8
  • Prompt: "End of the Report...Press Enter to Continue"
  • Variable: X
  • Timeout: DTIME
  • Line Location: DQ+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DQ+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !!,$J(" ",80-$L(DGX)\2),DGX
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !,$J(" ",80-$L(DGHDRDT)\2),DGHDRDT,!
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: $J(" ",80-$L(DGX)\2),DGX
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !!,"Patients registered under different Presumptive Psychosis Categories",!,DASH
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !!,DGX
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !,DASH,!!,"TOTAL NUMBER OF PATIENTS REGISTERED UNDER PRESUMPTIVE PSYCHOSIS AUTHORITY: ",$FN(+$G(@DGTEMP@(0)),",")
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: "This report reflects the number of Veterans registered under Presumptive"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"Psychosis authority, not necessarily treated."
  • Line Location: HELP+2
Routine Call
  • %ZIS
  • Line Location:
    • SELDATES+7
Routine Call
  • %ZIS
  • Line Location:
    • SELDATES+11
Routine Call
  • DIR
  • Line Location:
    • SELDATES+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" PRINT+7
^DD(2 PRINT+2
^DGPP(33.1 - [#33.1] DQ+1, DQ+2, DQ+3, DQ+4
^TMP("DGPPRP2" SELDATES+5

Label References

Name Line Occurrences
HELP PRINT+5, PRINT+14
OUT DQ+6
PRINT DQ+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EN+1~, SELDATES+7*
%ZIS("B" SELDATES+7*
DASH PRINT+1~, PRINT+2*, PRINT+9, PRINT+13
DFN EN+1~, DQ+4*, SET+2, SET+3
DFNS SET+1~, SET+2*, SET+3
DGCAT EN+1~, DQ+2*, DQ+3, DQ+5, PRINT+1~, PRINT+10*, PRINT+11, PRINT+12, SET+3
DGCATL PRINT+1~
DGCATL( PRINT+3*, PRINT+10, PRINT+11
DGDIV EN+1~, SET+3
DGDT EN+1~, SELDATES+2*, SELDATES+3, SELDATES+4, DQ+1*, DQ+2, DQ+3, SET+3
DGDTDEF EN+1~, SELDATES+1*
DGDTF EN+1~, SELDATES+4*, DQ+1, PRINT+4
DGDTT EN+1~, SELDATES+4*, DQ+1, PRINT+4
DGHDRDT EN+1~, PRINT+4*, PRINT+7
DGI EN+1~, PRINT+3*, SET+3
DGOUT SET+1~
DGOUT(2 SET+3
DGSTD EN+1~, SET+3
DGTEMP EN+1~, SELDATES+5*, DQ+5, PRINT+12, PRINT+13, SET+3, OUT+2
DGX PRINT+1~, PRINT+2*, PRINT+3, PRINT+6*, PRINT+7*, PRINT+8, PRINT+11*, PRINT+12*
DGY EN+1~, PRINT+3*
DIR SELDATES+12!
DIR(0 SELDATES+12*
DT PRINT+7
DTIME DQ+7
IENDFN EN+1~, DQ+3*, DQ+4
IO("Q" SELDATES+7!, SELDATES+8
IOF DQ+7, PRINT+5
IOP SELDATES+7!
IOST DQ+7
POP EN+1~, SELDATES+7
U SELDATES+4, DQ+4, PRINT+2, SET+3
X EN+1~, DQ+7*
Y PRINT+1~, PRINT+7*
ZTDESC EN+1~, SELDATES+9*
ZTRTN EN+1~, SELDATES+9*
ZTSAVE EN+1~
ZTSAVE("DGDTFRM" SELDATES+10*
ZTSAVE("DGDTFRMT" SELDATES+10*
ZTSAVE("DGDTTO" SELDATES+10*
ZTSAVE("DGRTYP" SELDATES+10*
ZTSAVE("ZTREQ" SELDATES+10*
ZTSK EN+1~, SELDATES+12
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