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  | All
Print Page as PDF
Routine: DGPMTSO3

Package: Registration

Routine: DGPMTSO3


Information

DGPMTSO3 ;ALB/LM - TREATING SPECIALTY INPATIENT COUNTS BY TS ;2-2-93

Source Information

Source file <DGPMTSO3.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Registration 1 HEAD^DGPMTSO  

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 DGPMTSO  

Entry Points

Name Comments DBIA/ICR reference
START
DIV
END
TREAT
DGTS
SV
INFO
LINE
SUB
TOTAL
SUBHEAD ;

External References

Name Field # of Occurrence
HEAD^DGPMTSO START+3, DIV, DIV+3, SV, INFO+4, SUB

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"DIVISION: ",$S($D(^DG(40.8,DIV,0)):$P(^(0),"^"),1:"EMPTY")
  • Line Location: DIV+0
Function Call: WRITE
  • Prompt: !?63
  • Line Location: DIV+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: DIV+4
Function Call: WRITE
  • Prompt: !!?69,"TOTAL = ",$J($P(TOTAL,"^",1),4),?89,$J($P(TOTAL,"^",2),4),?97,$J($P(TOTAL,"^",3),4),?105,$J($P(TOTAL,"^",4),4),?114,$J($P(TOTAL,"^",5),4),?124,$J($P(TOTAL,"^",6),4)
  • Line Location: DIV+5
Function Call: WRITE
  • Prompt: !?66
  • Line Location: SUB+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SUB+3
Function Call: WRITE
  • Prompt: !!?66,"SUBCOUNT = ",$J($P(SUBCOUNT,"^",1),4),?89,$J($P(SUBCOUNT,"^",2),4),?97,$J($P(SUBCOUNT,"^",3),4),?105,$J($P(SUBCOUNT,"^",4),4),?114,$J($P(SUBCOUNT,"^",5),4),?124,$J($P(SUBCOUNT,"^",6),4),!
  • Line Location: SUB+4
Function Call: WRITE
  • Prompt: !!!,"DIVISION",!?3,"FACILITY TREATING SPECIALTY",?35,"ABBRV",?43,"TREATING SPECIALTY SERVICE",?76,"PATIENTS",?89,"PASS",?99,"AA",?107,"UA",?114,"ASIH",?122,"PTS REM",!
  • Line Location: SUBHEAD+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SUBHEAD+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] DIV
^DIC(45.7 - [#45.7] INFO
^TMP($J DIV, TREAT, DGTS, SV, INFO+1, SUB+1

Label References

Name Line Occurrences
DGTS TREAT
END DIV+2
INFO SV
SUB DIV
SUBHEAD START+4, DIV, DIV+3, SV, INFO+4
SV DGTS
TREAT DIV

Naked Globals

Name Field # of Occurrence
^(0 DIV

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABBRV END!, INFO*, LINE
DGTS END!, DGTS*, SV, INFO, INFO+1
DGTS1 END!, DGTS*
DIV DIV*, END!, TREAT, DGTS, SV, INFO+1, SUB+1
DIV1 DIV*, END!
>> END DIV, DIV+2, DIV+3, TREAT, DGTS, SV, INFO+4, SUB, SUBHEAD+1
I END!
INFO END!, INFO+1*, INFO+2*, LINE
IOM DIV+4, SUB+3, SUBHEAD+3
IOSL DIV, DIV+3, SV, INFO+4, SUB
L DIV+4*, END!, SUB+3*, SUBHEAD+3*
PAGE START+2*, END!
PTCTS START, DIV+6*, END!
REPORT START+1*, END!
SERVICE END!
SUBCOUNT END!, SUB+1*, SUB+2*, SUB+4, TOTAL, TOTAL+1, TOTAL+2, TOTAL+3, TOTAL+4
SV END!, SV*, INFO+1, LINE
SV1 END!, SV*
TOTAL START+2*, DIV+5, END!, TOTAL*, TOTAL+1*, TOTAL+2*, TOTAL+3*, TOTAL+4*, TOTAL+5*
TREAT END!, TREAT*, DGTS, SV, INFO+1, LINE
TREAT1 END!, TREAT*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All