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

Package: Surgery

Routine: SROQD1


Information

SROQD1 ;BIR/ADM - CASES WITH DEATHS WITHIN 30 DAYS ;01/29/98

Source Information

Source file <SROQD1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Surgery 2 ^SROSTOP  PROC^SROUTL  
VA FileMan 1 ^DIR  

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
Surgery 1 SROQD  

Entry Points

Name Comments DBIA/ICR reference
NAT ; loop through national specialties
IP ; loop through index procedures
NEW ; print national specialty or index procedure category
PATS ; print patient list
CASE ; print case information
PAGE
HDR ; print heading
SUM ; print total for specialty or index procedure
SUM1 ; print grand total for all specialties or index procedures
PRESS

External References

Name Field # of Occurrence
^DIR PRESS
^SROSTOP HDR+1
PROC^SROUTL CASE+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,">>> "_SRNATNM_" <<<",!
  • Line Location: NEW+2
Function Call: WRITE
  • Prompt: ?44,SRPROC(I),!
  • Line Location: CASE+8
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(IOM-$L(SRINST)\2),SRINST
  • Condition for execution: $E(IOST)="P"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(IOM-$L(SRRPT)\2),SRRPT,?(IOM-10),$J("PAGE "_SRPAGE,9),!,?(IOM-$L(SRFRTO)\2),SRFRTO,!,?(IOM-$L(SRPRINT)\2),SRPRINT
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,"OP DATE",?12,"PATIENT NAME",?44,"DATE OF DEATH",?60,"LOCAL SPECIALTY",?102,"IN/OUT",?111,"DEATH RELATED"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"CASE #",?12,"PATIENT ID# (AGE)",?44,"PROCEDURE(S)"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,">>> "_SRNATNM_" <<< * * Continued from previous page * *"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !!,"TOTAL DEATHS FOR "_SRNATNM_": "_SRDNAT,!
  • Line Location: SUM+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SUM+2
Function Call: WRITE
  • Prompt: !!,"TOTAL FOR ALL "_$S(SRSEL=2:"SPECIALTIES",1:"INDEX PROCEDURES")_": "_SRDTOT
  • Line Location: SUM1+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRESS+0
Routine Call
  • DIR
  • Line Location:
    • PRESS

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(45.3 - [#45.3] NAT+1, NAT+2
^SRF - [#130] CASE+4
^SRO(137.45 - [#137.45] CASE+7
^TMP("SR" CASE+4
^TMP("SRIP" IP+1
^TMP("SRPAT" CASE+2
^TMP("SRSEC" NAT+2, NAT+3, IP+1, PATS+1, CASE+4

Label References

Name Line Occurrences
CASE PATS+1
HDR NAT+1, IP+1, PAGE
NEW PATS+1
PAGE NEW+1, CASE+1, SUM+1, SUM1+1
PATS NAT+1, NAT+2, NAT+3, IP+1
PRESS PAGE+1
SUM PATS+2
SUM1 NAT+4, IP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN PATS+1*, CASE+2, CASE+4
DIR PRESS!
DIR(0 PRESS*
>> DTOUT PRESS
>> DUOUT PRESS
>> I CASE+8*, HDR+5*, SUM+2*
IOF HDR+2
IOM HDR+2, HDR+5, SUM+2
IOSL NEW+1, CASE+1, SUM+1, SUM1+1
IOST PAGE, HDR+2
>> SR CASE+4*, CASE+7
>> SRAGE CASE+2*, CASE+8
>> SRDD CASE+2*, CASE+3*, CASE+8
>> SRDNAT NAT+1*, NAT+2*, NAT+3*, IP+1*, CASE+1*, SUM+2
>> SRDTOT CASE+1*, SUM1+2
>> SRFRTO HDR+2
>> SRHALT HDR+1
>> SRHDR PAGE, HDR+5*
>> SRINST HDR+2
>> SRIOSTAT CASE+5*, CASE+8
>> SRL CASE+7*
>> SRNAT NAT+1*, NAT+2*, NAT+3*, IP+1*, PATS+1, CASE+4
>> SRNATNM NAT+1*, NAT+2*, NAT+3*, IP+1*, NEW+1*, NEW+2, HDR+6, SUM+2
>> SRNM PATS+1*, CASE+2, CASE+4, CASE+8
>> SRPAGE HDR+2, HDR+5*
>> SRPRINT HDR+2
>> SRPROC( CASE+8
>> SRREL CASE+6*, CASE+8
>> SRRPT HDR+2
>> SRSD CASE+4*, CASE+8
>> SRSEL SUM1+2
>> SRSNM NAT+2*, IP+1*, NEW+2*, HDR+6
>> SRSOUT NAT+2, NAT+4, IP+1, IP+2, NEW+1, PATS+1, PATS+2, CASE+1, PAGE+1, HDR+1*
, SUM+1, SUM1+1, PRESS*
>> SRSPEC NAT+1
>> SRSS CASE+7*, CASE+8
>> SRSSN CASE+2*, CASE+8
>> SRSUPCPT CASE+7*
>> SRTN CASE+4*, CASE+8
>> SRX CASE+4*, CASE+5, CASE+6
>> SRZ CASE+2*
>> X CASE+3*, CASE+4*, CASE+7*
>> X1 CASE+2*
>> X2 CASE+2*
>> Y CASE+5*, CASE+6*
>> ZTQUEUED HDR+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All