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

Package: Surgery

Routine: SROAWL


Information

SROAWL ;BIR/ADM - REPORT OF MONTHLY CASE WORKLOAD TOTALS ;02/12/07

Source Information

Source file <SROAWL.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Surgery 4 ^SROAWL1  $$INST^SROUTL0  $$SITE^SROVAR  ^SRSKILL  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 3 ^%DT  NOW^%DTC  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROA MONTHLY WORKLOAD REPORT  

Entry Points

Name Comments DBIA/ICR reference
TASK ; automatic transmission of workload report called by nightly process
RUN ; entry point when queued
PRT
GETDT
TRAN
STOP
TWO
MONTH ; get name of month
START
QUE ; queue transmission of report to national database
IO
DT2
DATE
END
DIV

External References

Name Field # of Occurrence
^%DT QUE+1
NOW^%DTC TASK+1
^%ZIS IO
^%ZISC END+2
^%ZTLOAD IO+1, QUE+2
^DIR START+3, DATE+1, DATE+4, TRAN+2, PRT+1, END, TWO+3, DT2+2
^SROAWL1 RUN+1, TASK+4
$$INST^SROUTL0 DIV+2
$$SITE^SROVAR TASK+3
^SRSKILL END+2, STOP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Report of Monthly Case Workload Totals",!!
  • Line Location: START+0
Function Call: WRITE
  • Prompt: @IOF,"This option provides a report of the monthly risk assessment surgical case",!,"workload totals which include the following categories:",!
  • Line Location: START+5
Function Call: WRITE
  • Prompt: ?5,"1. All cases performed",!,?5,"2. Eligible cases",!,?5,"3. Eligible cases meeting exclusion criteria"
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !,?5,"4. Assessed cases",!,?5,"5. Not logged eligible cases"
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !,?5,"6. Cardiac cases",!,?5,"7. Non-cardiac cases",!,?5,"8. Assessed cases per day (based on 20 days/month)"
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !!,"The second part of this report provides the total number of incomplete",!,"assessments remaining for the month selected and the prior 12 months."
  • Line Location: START+9
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+0
Function Call: WRITE
  • Prompt: !
  • Line Location: TRAN+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PRT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: IO+0
Function Call: WRITE
  • Prompt: !
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !
  • Line Location: TWO+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DT2+0
Function Call: WRITE
  • Prompt: !!,"Ending date must not be earlier than starting date!"
  • Line Location: DT2+4
Routine Call
  • DIR
  • Line Location:
    • START+3
    • DATE+1
    • DATE+4
    • TRAN+2
    • PRT+1
    • END
    • TWO+3
    • DT2+2
Routine Call
  • %ZIS
  • Line Location:
    • IO

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRO(133 - [#133] DIV, TASK+2, TASK+4*
^TMP("SRM" END+1!

Label References

Name Line Occurrences
DATE DATE+2
DIV DT2+5
DT2 DT2+3
END START, START+3, DATE+1, DATE+2, DIV+2, TRAN+2, PRT+1, IO, IO+1, TWO+3
, DT2+2, QUE+1, QUE+2
GETDT DATE, TWO+4, TASK+1
IO DIV+3, TRAN+3
MONTH DATE+3, GETDT
QUE PRT+2
STOP TASK+2
TRAN DIV+1
TWO START+4, DT2+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % TASK+1
%DT QUE+1!*
%DT("A" QUE+1*
%DT("B" QUE+1*
%DT(0 QUE+1*
>> %I(2 TASK+1
%ZIS IO!*
%ZIS("A" IO*
DIR START+1!, START+3!, DATE!, DATE+4!, TRAN!, PRT!, END!, TWO+1!, DT2!
DIR("?" DATE*, DATE+1*, TRAN+1*, TRAN+2*, PRT*, PRT+1*, TWO+2*, TWO+3*, DT2+1*, DT2+2*
DIR("A" START+1*, START+2*, DATE*, DATE+4*, TRAN*, TRAN+1*, PRT*, END*, TWO+1*, DT2*
DIR("B" START+2*, DATE*, DATE+4*, TRAN+1*, PRT*, TWO+2*, DT2*
DIR(0 START+3*, DATE*, DATE+4*, TRAN+2*, PRT+1*, END*, TWO+2*, DT2*
DT TWO, GETDT
>> DTOUT START+3, DATE+1, DATE+4, TRAN+2, PRT+1, TWO+3, DT2+2
>> DUOUT START+3, DATE+1, DATE+4, TRAN+2, PRT+1, TWO+3, DT2+2
IO("Q" IO!, IO+1!
IOF START, START+5, END+1, END+2
IOST END, END+1
POP IO!
>> SRCNT DIV*, DIV+1
>> SRD DATE+3, TWO*, GETDT*, TASK+1, TASK+2
>> SRDAY TASK+1*
SRDT DATE+2*, DATE+3, DATE+5!, TWO+4*, DT2+4, TASK+1*, TASK+4
SREDT DT2+3*, DT2+4!
>> SRINST SROAWL+2*, DIV+2*, DIV+3, TASK+3*
SRINSTP SROAWL+2~*, DIV+2*, TASK+3*
>> SRL TASK+2*
>> SRM DATE, DATE+4, TWO*, TWO+2, DT2, MONTH+1*
>> SRNOW TASK+1*
>> SRP SROAWL+2*, PRT*, PRT+1*, PRT+2, TASK+3*
>> SRS TASK+2*, TASK+4*
SRSEL SROAWL+2~, START+4*, DIV+1, DIV+3, IO+3, TASK+3*
>> SRSITE("DIV" SROAWL+2
>> SRSITE("SITE" SROAWL+2
>> SRSOUT SROAWL+2*, START, START+3*, DATE+1*, DATE+2, DATE+4*, TRAN+2*, PRT+1*, IO*, IO+1*
, END, TWO+3*, DT2+2*, QUE+1*
>> SRT SROAWL+2*, PRT*, TASK+3*
SRTN END+2!, STOP!
>> SRY DATE, DATE+3*, DATE+4, TWO*, DT2, GETDT*
>> X DIV*, TWO*, GETDT*, TASK+3*
>> Y START+4, DATE+1, DATE+2, DATE+3, DATE+5, TRAN+3, PRT+1, TWO+3, TWO+4, DT2+2
, DT2+3, QUE+1, QUE+2
>> Z DATE+3*, GETDT*, MONTH+1
>> ZTDESC IO+1*, QUE+2*
>> ZTDTH QUE+2*
>> ZTIO QUE+2*
>> ZTQUEUED END+1
>> ZTREQ END+1*
>> ZTRTN IO+1*, QUE+2*
>> ZTSAVE("SRDT" IO+2*, QUE+2*
>> ZTSAVE("SREDT" IO+3*
>> ZTSAVE("SRINST" IO+2*, QUE+2*
>> ZTSAVE("SRINSTP" IO+2*, QUE+2*
>> ZTSAVE("SRP" IO+2*, QUE+2*
>> ZTSAVE("SRSEL" IO+2*, QUE+2*
>> ZTSAVE("SRSTATN" QUE+2*
>> ZTSAVE("SRT" IO+2*, QUE+2*
>> ZTSTOP END+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All