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

Package: Surgery

Routine: SRSWL11


Information

SRSWL11 ;B'HAM ISC/MAM - WAITING LIST, EXTENDED-ALL ; 17 OCT 1989 7:35 AM

Source Information

Source file <SRSWL11.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Surgery 3 ^SROSTOP  ^SRSKILL  OUT^SRSWL3  
VA Fileman 2 NOW^%DTC  D^DIQ  
Registration 1 DEM^VADPT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SRSWLST  

Entry Points

Name Comments DBIA/ICR reference
END ;
HDR ; print heading
BEG ; entry when queued
PRINT ; print information
PAGE ; end of page
LOOP ; break operation if greater than 59 characters
MORE

External References

Name Field # of Occurrence
NOW^%DTC BEG+2
^%ZIS SRSWL11+2
^%ZISC END+4
^%ZTLOAD SRSWL11+3
D^DIQ BEG+2, PRINT+3
^SROSTOP HDR+1
^SRSKILL END+4
OUT^SRSWL3 PRINT+4
DEM^VADPT MORE+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SRSWL11+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BEG+6
Function Call: WRITE
  • Prompt: !
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: END+3
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: PAGE+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"Surgery Waiting List sorted by Patient",!,"Surgical Specialty is "_SRSNM,!,"Printed "_SRTIME,!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+2
Routine Call
  • %ZIS
  • Line Location:
    • SRSWL11+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRO(133.8 - [#133.8] BEG+5, PRINT+3, MORE
^SRO(137.45 - [#137.45] MORE
^TMP("SR" BEG+1!, BEG+8, END+2!, MORE+1*

Label References

Name Line Occurrences
END SRSWL11+3
HDR BEG+6, PAGE+2
MORE BEG+5
PAGE PRINT+2
PRINT BEG+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % BEG+2
%ZIS SRSWL11+2!*
%ZIS("A" SRSWL11+2*
>> DFN BEG+3*, PRINT+3*, MORE+1*
DTIME END+3, PAGE+1
IO BEG+2
IO("Q" SRSWL11+2!, SRSWL11+3!
IOF BEG+6, END+1, END+3, HDR+2
IOP SRSWL11+2!
IOSL PRINT+2
IOST END+1, PAGE+1
>> LINE HDR+2*
>> LOOP LOOP+1*
>> M LOOP+1
>> MM LOOP+1*
>> MMM LOOP+1*
POP SRSWL11+2!
>> SR BEG+3*, BEG+8*, PRINT+1
>> SRDT PRINT+3*
>> SRHALT HDR+1
>> SRHDR BEG+2*, BEG+3*, PRINT+2*, HDR+3*
>> SRNAME BEG+3*, MORE*, MORE+1
>> SROFN PRINT+1*, PRINT+3
>> SROPER PRINT+3*, LOOP+1*
>> SROPS( LOOP+1*
>> SRRECNO BEG+3*, BEG+5*, MORE, MORE+1
>> SRSDPT BEG+3*, PRINT+1*, MORE+1*
>> SRSNM MORE+1, HDR+2
>> SRSOUT BEG+2*, BEG+8, END+1*, END+3, PRINT+2, PAGE+1*, HDR+1*
>> SRSS PRINT+1*, PRINT+3
>> SRSUB BEG+3*, BEG+5*, MORE+1
>> SRTIME BEG+2*, HDR+2
SRTN END+4!
>> SRW BEG+3*, BEG+5*, PRINT+3*, MORE+1
>> SS BEG+3*, BEG+8*, PRINT+1
>> ST BEG+3*, BEG+8*, PRINT+1
>> VA("PID" MORE+1
>> VADM(1 MORE+1
>> X END+3*, PAGE+1*
>> Y BEG+2*, PRINT+3*
>> ZTDESC SRSWL11+3*
>> ZTQUEUED END+2, HDR+1
>> ZTREQ END+2*
>> ZTRTN SRSWL11+3*
>> ZTSTOP END+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All