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

Package: Surgery

Routine: SRONON


Information

SRONON ;B'HAM ISC/ADM - NON-O.R. PROCEDURE REPORT ; [ 02/18/04 9:55 AM ]

Source Information

Source file <SRONON.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Surgery 5 PRNT^SROESPR  $$STATUS^SROESUTL  SEL^SROPER  ^SROVAR  ^SRSKILL  
VA Fileman 3 ^DIC  D^DIQ  ^DIR  
Registration 1 DEM^VADPT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Surgery 2 SR NON-OR REPORT  SROVER2  

Entry Points

Name Comments DBIA/ICR reference
NON
CODE ; entry point from coding menu
END
LIST ; list case
LAST
SEL
LOOP ; break procedure if greater than 55 characters
DISPLY

External References

Name Field # of Occurrence
^DIC NON
D^DIQ NON+2, LIST+4
^DIR LAST
PRNT^SROESPR DISPLY
$$STATUS^SROESUTL SRONON+12, CODE+4
SEL^SROPER LIST+1
^SROVAR SRONON+7
^SRSKILL END+1
DEM^VADPT NON+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," * * A Procedure Report (Non-OR) will not be created for this procedure. * *"
  • Line Location: DISPLY+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF,!,"Non-O.R. Procedures for "_SRNM_" ("_VA("PID")_")"
  • Line Location: NON+2
Function Call: WRITE
  • Prompt: !," (DIED ON "_Y_")"
  • Line Location: NON+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: !!,"Enter the number corresponding to the procedure for which you want to print",!,"a report."
  • Line Location: SEL+1
Function Call: WRITE
  • Prompt: @IOF,!,?1,"NON-O.R. PROCEDURES FOR "_VADM(1)_" ("_VA("PID")_")",!
  • Line Location: LIST+1
Function Call: WRITE
  • Prompt: !,CNT_".",?4,SRSDATE,?25,SROPS(1)
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: !,?25,SROPS(2)
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: !,?25,SROPS(2)
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: !,?25,SROPS(2)
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+6
Function Call: WRITE
  • Prompt: !
  • Line Location: LAST+0
Routine Call
  • DIC
  • Line Location:
    • NON
Routine Call
  • DIR
  • Line Location:
    • LAST

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] NON+2
^SRF - [#130] SRONON+11, DISPLY, DISPLY+1, LIST+2, CODE+3
^SRF("ANOR" NON+3

Label References

Name Line Occurrences
DISPLY SRONON+13, CODE+5
END SRONON+7, SRONON+8, SRONON+13, NON, SEL, CODE+5
LAST DISPLY+1
LIST NON+3
LOOP LIST+3
NON SRONON+8
SEL SEL+1

Naked Globals

Name Field # of Occurrence
^( NON+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CNT NON+3*, LIST+1*, LIST+2*, LIST+5
>> DFN NON+1*, NON+2, NON+3
DIC NON!*
DIC("A" NON*
DIC(0 NON*
DIR LAST!
DIR(0 LAST*
DTIME SEL
>> I NON+3*
IOF END, NON+2, LIST+1
IOSL LIST+1
>> LOOP LOOP+1*
>> M LIST+3*, LOOP+1
MM LIST+3!, LOOP+1*
MMM LIST+3!, LOOP+1*
>> SRBACK LIST+1*
>> SRCASE( SEL+1, SEL+2, LIST+2*
>> SRCASE(1 LIST+1
>> SRDT LIST+1*
SRDTITL SRONON+9~, SRONON+10*, DISPLY, CODE+1~, CODE+2*
SREXP SRONON+9~, DISPLY+1*, DISPLY+2, CODE+1~
>> SRNM NON+1*, NON+2
>> SROP NON+3*, LIST+1*, LIST+2
>> SROPER LIST+2*, LIST+3*, LOOP+1*
SROPS LIST+3!
SROPS( LOOP+1*
SROPS(1 LIST+3*, LIST+5
SROPS(2 LIST+5
SROPS(3 LIST+5
SROPS(4 LIST+5
>> SRSDATE LIST+2*, LIST+4*, LIST+5
SRSINED SRONON+9~, SRONON+11*, SRONON+12*, DISPLY, DISPLY+1, CODE+1~, CODE+3*, CODE+4*
SRSITE SRONON+7, END+1!
SRSITE("KILL" SRONON+7*, END+1
>> SRSOUT NON*, LIST+1
SRSTAT SRONON+9~, SRONON+12*, CODE+1~, CODE+4*
SRTIU SRONON+9~, SRONON+11*, SRONON+12, DISPLY*, CODE+1~, CODE+3*, CODE+4
SRTN SRONON+8, SRONON+11, DISPLY, DISPLY+1, END+2!, SEL+2*, LIST+1, CODE+3
SRTN("KILL" SRONON+8*, END+2
>> VA("PID" NON+2, LIST+1
>> VADM(1 NON+1, LIST+1
VAIN END+1!
VAINDT END+1!
>> X SEL*, SEL+1, SEL+2
>> Y NON, NON+1, NON+2*, LIST+4*
>> ZTQUEUED END
>> ZTREQ END*
>> ZTSTOP END
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All