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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SROQD

Package: Surgery

Routine: SROQD


Information

SROQD ;BIR/ADM - CASES WITH DEATHS WITHIN 30 DAYS ;07/07/2011

Source Information

Source file <SROQD.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Surgery 6 (AC,HDR,PAGE,SUM)^SROQD0  NAT^SROQD1  (DATE,INOUT,PROC)^SROUTL  $$INST^SROUTL0  $$SITE^SROVAR  ^SRSKILL  
VA FileMan 4 NOW^%DTC  ^DIC  $$GET1^DIQ  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  

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

Package Total Caller Graph
Surgery 2 SROQD  SROQD0  

Entry Points

Name Comments DBIA/ICR reference
SEC
IO
EN
END
PRESS
KTMP
PLIST ; print patient list for total cases
TOT
NOTA ; print in or out-patient deaths
PAT ; print new patient information
OP ; print case information
SPEC ; select national specialty

External References

Name Field # of Occurrence
NOW^%DTC EN+4
^%ZIS IO+1
^%ZISC END+2
^%ZTLOAD IO+2
^DIC SPEC+3
$$GET1^DIQ EN+3
^DIR SEC+1, PRESS, SPEC+2
AC^SROQD0 EN+5
HDR^SROQD0 PLIST+1
PAGE^SROQD0 NOTA+4, PAT+2, OP+1
SUM^SROQD0 TOT
NAT^SROQD1 EN+5
DATE^SROUTL SROQD+8
INOUT^SROUTL SEC+3
PROC^SROUTL OP+4
$$INST^SROUTL0 SEC+4
$$SITE^SROVAR EN+3
^SRSKILL END+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,?24,"Deaths Within 30 Days of Surgery"
  • Line Location: SROQD+6
Function Call: WRITE
  • Prompt: !!,"This report lists patients who had surgery within the selected date range",!,"and who died within 30 days of surgery."
  • Line Location: SROQD+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: SEC+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SEC+3
Function Call: WRITE
  • Prompt: !!,"This report is designed to use a 132 column format.",!
  • Line Location: IO+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRESS+0
Function Call: WRITE
  • Prompt: !,SRNAME,!
  • Line Location: NOTA+4
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTA+5
Function Call: WRITE
  • Prompt: "-"
  • Line Location: NOTA+5
Function Call: WRITE
  • Prompt: !,SRNAME,!
  • Line Location: PAT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PAT+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PAT+3
Function Call: WRITE
  • Prompt: ?69,SRPROC(I),!
  • Line Location: OP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: OP+6
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: SPEC+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SPEC+3
Routine Call
  • DIC
  • Line Location:
    • SPEC+3
Routine Call
  • DIR
  • Line Location:
    • SEC+1
    • PRESS
    • SPEC+2
Routine Call
  • %ZIS
  • Line Location:
    • IO+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN, EN+4
^SRF - [#130] NOTA+5
^SRO(137.45 - [#137.45] OP+2
^TMP( KTMP!
^TMP("SR" NOTA+5, PAT+2, OP+2
^TMP("SRPAT" PLIST+2, NOTA+1
^TMP("SRSEC" NOTA+1

Label References

Name Line Occurrences
END SROQD+8, SEC+1, SEC+4, SEC+5, IO+1, IO+2
KTMP EN+1, END
NOTA PLIST+1
OP NOTA+5, PAT+2
PAT PLIST+3
PLIST EN+5
PRESS END+1
SPEC SEC+2
TOT PLIST+1

Naked Globals

Name Field # of Occurrence
^( PLIST+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+4
%ZIS IO+1!*
%ZIS("A" IO+1*
%ZIS("B" IO+1*
>> DFN PLIST+2*, NOTA+1*, NOTA+5, PAT+2, OP+2
DIC SPEC+3!*
DIC("A" SPEC+3*
DIC("S" SPEC+3*
DIC(0 SPEC+3*
DIR SEC!, SEC+1!, PRESS!, SPEC+2!
DIR("?" SPEC+1*
DIR("A" SEC*, SEC+1*, SPEC+2*
DIR("B" SEC+1*, SPEC+2*
DIR(0 SEC+1*, PRESS*, SPEC+2*
>> DTOUT SEC+1, PRESS, SPEC+2
>> DUOUT SEC+1, PRESS, SPEC+2
>> EDATE SROQD+8, EN, OP+1
>> ENDATE EN*, EN+2
>> I KTMP*, NOTA+5*, PAT+3*, OP+5*
IO EN
IO("Q" IO+1!, IO+2!
IOF SROQD+6, SEC+3, END, END+2, SPEC+1
IOM NOTA+5, PAT+3
IOP IO+1!
IOSL NOTA+4, PAT+2, OP+1
IOST END, END+1
POP IO+1!
>> SDATE SROQD+8, EN, OP+1
>> SRAGE PLIST+3*, NOTA+2*, NOTA+3, PAT+1
>> SRCON OP+4*, OP+5, OP+6
SRCTOT EN*, END+2!
>> SRDD PLIST+3*, NOTA+2*, NOTA+3, PAT+1
SRDNAT END+2!
SRDTH END+2!
SRDTOT EN*, END+2!, NOTA+3*, PAT+1*
>> SRED EN*
SRFRTO EN+2*, END+2!
>> SRHDR EN*
SRHDR2 EN*, END+2!, TOT*
>> SRINST SEC+4*, EN+3*
SRINSTP SEC+4~*, EN+3
SRINV END+2!
SRIO SROQD+6*, EN+2, END+2!, PLIST+1, NOTA+1
SRIOSTAT END+2!, OP+3*, OP+5
>> SRL OP+4*
>> SRNAME NOTA+3*, NOTA+4, PAT+1*, PAT+2
SRNAT END+2!
SRNATNM END+2!
>> SRNM PLIST+1*, PLIST+2*, NOTA+1*, NOTA+3, PAT+1
>> SRPAGE EN*
>> SRPRINT EN+4*
>> SRPROC( OP+5
>> SRPROC(1 OP+5
>> SRPROC(2 OP+6
>> SRREL OP+3*, OP+5
SRRPT SEC+3*, EN+1*, END+2!
>> SRSD EN*, NOTA+5*, PAT+2*, OP+1, OP+2
>> SRSDATE OP+2*, OP+5
SRSEL SEC+2*, SEC+3, EN+1, EN+5, END+2!
>> SRSNM EN*, PLIST+3*, NOTA+4*, NOTA+5*, PAT+2*, PAT+3*
>> SRSOUT SROQD+6*, SROQD+8, SEC+1*, SEC+5, IO+1*, IO+2*, EN*, END+1, PRESS*, PLIST+2
, TOT, NOTA+1, NOTA+4, PAT+2, OP+1, SPEC+2*, SPEC+3*
>> SRSPEC SROQD+6*, SPEC+3*
>> SRSPECN SPEC+3*
>> SRSS OP+2*, OP+5
>> SRSSN PLIST+3*, NOTA+2*, NOTA+3, PAT+1
>> SRSUPCPT OP+4*
SRTN END+2!, NOTA+1*, NOTA+5, PAT+2*, OP+2, OP+5
>> SRZ PLIST+2*, PLIST+3, NOTA+1*, NOTA+2, NOTA+5*, OP+2*, OP+3, OP+4
>> STARTDT EN*, EN+2
>> X1 PLIST+3*, NOTA+2*
>> X2 PLIST+3*, NOTA+2*
>> Y SEC+2, EN*, EN+4*, OP+2*, OP+3*, SPEC+3
>> Y(0 SPEC+3
>> ZTDESC IO+2*
>> ZTQUEUED END
>> ZTREQ END*
>> ZTRTN IO+2*
>> ZTSAVE("EDATE" IO+2*
>> ZTSAVE("SDATE" IO+2*
>> ZTSAVE("SRINSTP" IO+2*
>> ZTSAVE("SRIO" IO+2*
>> ZTSAVE("SRSEL" IO+2*
>> ZTSAVE("SRSPEC*" IO+2*
>> ZTSTOP END
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All