Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call