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 |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: DGODNSM

Package: Registration

Routine: DGODNSM


Information

DGODNSM ;ALB/EG - INPATIENT WORKLOAD SUMMARY ; 2/28/89 1600

Source Information

Source file <DGODNSM.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Registration 1 (TOT,TOT1)^DGODOSM1  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGODNP2  

Entry Points

Name Comments DBIA/ICR reference
END
HDR
LEG ;
PRI
REM ;remaining patients
HD ;;

External References

Name Field # of Occurrence
TOT^DGODOSM1 DGODNSM+15
TOT1^DGODOSM1 DGODNSM+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,?((IOM-$L(HR))/2),HR,?IOM-20,T2,!
  • Line Location: DGODNSM+4
Function Call: WRITE
  • Prompt: !,?1,"DATE RANGE: FROM "
  • Line Location: DGODNSM+5
Function Call: WRITE
  • Prompt: Y," TO "
  • Line Location: DGODNSM+5
Function Call: WRITE
  • Prompt: Y," TO "
  • Line Location: DGODNSM+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DGODNSM+13
Function Call: WRITE
  • Prompt: !
  • Line Location: DGODNSM+15
Function Call: WRITE
  • Prompt: !,$P($T(LEG+I),";;",2)
  • Line Location: DGODNSM+15
Function Call: READ
  • Timeout: DTIME
  • Variable: ZRT
  • Line Location: PRI+1
Function Call: WRITE
  • Prompt: !,?1,$P(A(I),U,2),?7,$P(A(I),U,1)
  • Line Location: PRI+2
Function Call: WRITE
  • Prompt: ?30,^UTILITY("DGOD",$J,"T",K,I,1),?40,^(2),?50,^(3),?60,^(4),?70,^(5),?80,^(6),?90,^(7)
  • Line Location: PRI+3
Function Call: WRITE
  • Prompt: ?100,^UTILITY("DGOD",$J,"T",K,I,"R")
  • Line Location: PRI+4
Function Call: WRITE
  • Prompt: ?110,"("_$J(^UTILITY("DGOD",$J,"T",K,I,"R")/^UTILITY("DGOD",$J,"T",K,"R")*100,2,2)_")",!
  • Line Location: PRI+5
Function Call: WRITE
  • Prompt: !,?1,$P($T(HD+2),";;",2)," ON "_T2,!
  • Line Location: REM+1
Function Call: WRITE
  • Prompt: !,?1,X,?20,Z(X)
  • Line Location: REM+2
Function Call: WRITE
  • Prompt: !
  • Line Location: REM+3
Function Call: WRITE
  • Prompt: !,?1,HDR1,!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,?1,"FACILITY",?30,"AS",?40,"AN",?50,"B0",?60,"C0",?70,"N0",?80,"X0",?90,"U0",?100,"TOTAL",?110,"%",!
  • Line Location: HDR+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DGODNSM+5
^UTILITY("DGOD" DGODNSM+4*, DGODNSM+6*, DGODNSM+7*, DGODNSM+8*, DGODNSM+9*, DGODNSM+10*, DGODNSM+11*, DGODNSM+12*, DGODNSM+14*, PRI
, PRI+3, PRI+4, PRI+5

Label References

Name Line Occurrences
HDR DGODNSM+13, PRI+1
PRI DGODNSM+13
REM DGODNSM+3, DGODNSM+15

Naked Globals

Name Field # of Occurrence
^(2 PRI+3
^(3 PRI+3
^(4 PRI+3
^(5 PRI+3
^(6 PRI+3
^(7 PRI+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A END!
A( DGODNSM+9, DGODNSM+10, PRI+2
A(1 DGODNSM+3
A1X DGODNSM+3*, DGODNSM+9, END!
A2 DGODNSM+6, DGODNSM+8, DGODNSM+9, DGODNSM+10, DGODNSM+11, DGODNSM+12, DGODNSM+13, END!
DGBD DGODNSM+5, END!
DGDV DGODNSM+9*, DGODNSM+10*, END!
>> DGJB DGODNSM+9, DGODNSM+10
DGMT DGODNSM+9*, DGODNSM+10*, DGODNSM+11*, END!
DGND DGODNSM+5, END!
>> DGTN DGODNSM+6, DGODNSM+8, DGODNSM+9, DGODNSM+10, DGODNSM+11, DGODNSM+12, DGODNSM+13, DGODNSM+14
DTIME PRI+1
HDR1 END!, HDR*
HR DGODNSM+4*, END!
I DGODNSM+6*, DGODNSM+8*, DGODNSM+9*, DGODNSM+10*, DGODNSM+11*, DGODNSM+12*, DGODNSM+13*, DGODNSM+15*, END!, PRI
, PRI+2, PRI+3, PRI+4, PRI+5, REM+2*
IO PRI+1
IO(0 PRI+1
IOF DGODNSM+4
IOM DGODNSM+4, PRI+1
IOSL PRI+1
IOST PRI+1
J DGODNSM+6*, DGODNSM+7*, DGODNSM+14*, END!
K DGODNSM+6*, DGODNSM+8*, DGODNSM+9*, DGODNSM+10*, DGODNSM+11*, DGODNSM+12*, DGODNSM+13*, DGODNSM+14*, END!, PRI
, PRI+3, PRI+4, PRI+5
T2 DGODNSM+4, END!, REM+1
U DGODNSM+3, DGODNSM+9, DGODNSM+10, PRI+1, PRI+2
X END!, REM+2*
Y DGODNSM+5*, END!
Z END!
Z( REM+2
>> ZRT PRI+1*
>> ZRT1 PRI+1*

Marked Items

Name Field # of Occurrence
$T(HD+2 REM+1
$T(HD+K HDR
$T(LEG+I DGODNSM+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All