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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: DGMUSTAT

Package: Registration

Routine: DGMUSTAT


Information

DGMUSTAT ;KNR/WCS - PREFERRED LANGUAGE RECORD FOR ACTIVE PATIENTS ; July 16, 2014

Source Information

Source file <DGMUSTAT.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DG MEANINGFUL USE LANG STATS  

Entry Points

Name Comments DBIA/ICR reference
GO
PRINT
EN ;*///*
EXIT
HDR

External References

Name Field # of Occurrence
^%ZIS EN+5
HOME^%ZIS EN+1
^%ZTLOAD EN+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,"Preferred Language Record for Active Patients",!!!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: "This program will calculate the number of patients who have designated",!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: "a preferred language in their record at this facility.",!!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: ?12,"Total Count of Patient Records: ",DGPATCNT,!
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: ?4,"Total Patients with preferred language: ",DGTOTPTL,!!
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: ?10,"Total unique preferred languages: ",DGLANGCT,!
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: " % Patient records with preferred language: ",$J(X,0,1)," %",!
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: @IOF,"Preferred Language Record for Active Patients",?(IOM-12),"Page: ",PG,!!
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: "Language",?25,"Count",!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+3
Routine Call
  • %ZIS
  • Line Location:
    • EN+1
Routine Call
  • %ZIS
  • Line Location:
    • EN+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] GO+3, GO+5, GO+6, GO+7
^DPT("SSN" GO+1, GO+2

Label References

Name Line Occurrences
EXIT EN+5, EN+6
HDR PRINT+2, PRINT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EN+5*, EXIT!
DA GO+6*, GO+7, EXIT!
DFN GO+2*, GO+3, GO+5, GO+6, GO+7, EXIT!
DGDATA GO+7*, GO+8, EXIT!
DGDATE GO+5*, GO+6, EXIT!
DGLANG GO!, EXIT!
DGLANG( GO+9*, PRINT+1, PRINT+4, PRINT+5
DGLANGCT PRINT+4*, PRINT+5*, PRINT+7, PRINT+8, PRINT+11, EXIT!
DGLANGNM GO+8*, GO+9, PRINT+1*, PRINT+4*, PRINT+5, EXIT!
DGLANGPT EXIT!
DGPATCNT GO*, GO+4*, PRINT+7, PRINT+9, EXIT!
DGSSN GO+1*, GO+2, EXIT!
DGTOTPTL PRINT+1*, PRINT+7, PRINT+10, EXIT!
DOTS PRINT+3*, PRINT+5, EXIT!
IO PRINT
IO("Q" EN+6
IOF EN+2, HDR+1
IOM HDR+1, HDR+3
ION EN+7
IOSL PRINT+5
PG PRINT*, EXIT!, HDR*, HDR+1
>> POP EN+5
U GO+3, GO+8
X PRINT+7*, PRINT+8*, PRINT+12, EXIT!, HDR+3*
ZTDESC EN+7*, EXIT+1!
ZTIO EN+7*, EXIT+1!
ZTRTN EN+7*, EXIT+1!
ZTSAVE EN+7*, EXIT+1!
ZTSK EN+8, EXIT+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All