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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: SROALNO

Package: Surgery

Routine: SROALNO


Information

SROALNO ;B'HAM ISC/MAM - SELECT CASE WITHOUT ASSESS ; 2 MAR 1992 3:35 pm

Source Information

Source file <SROALNO.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Surgery 7 ^SRCUSS  ^SRONEW  ^SROP1  ^SROPDEL  SEL^SROPER  EN2^SROVAR  ^SRSKILL  
Kernel 1 T0^%ZOSV  

Entry Points

Name Comments DBIA/ICR reference
OPT
CASE
END
HELP
LIST ; list cases
OTHER ; other operations
RT ; start RT logging
ENTER ; edit or delete
LOOP ; break procedures
HDR ; print heading

External References

Name Field # of Occurrence
T0^%ZOSV RT+1
^SRCUSS ENTER+5
^SRONEW OPT+2
^SROP1 CASE+2
^SROPDEL ENTER+4
SEL^SROPER LIST+6
EN2^SROVAR ENTER+5
^SRSKILL END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SROALNO+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: OPT+0
Function Call: WRITE
  • Prompt: !!,"Enter the number corresponding to the surgical case for which you will be",!,"creating a surgical risk assessment."
  • Line Location: OPT+1
Function Call: WRITE
  • Prompt: @IOF,!,?1,VADM(1)_" "_VA("PID"),!!,?1
  • Line Location: ENTER+1
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: ENTER+2
Function Call: WRITE
  • Prompt: @IOF,!,?1,VADM(1)_" "_VA("PID"),!
  • Line Location: LIST+6
Function Call: WRITE
  • Prompt: !,CNT_". "
  • Line Location: LIST+8
Function Call: WRITE
  • Prompt: $E(SRSDATE,4,5)_"-"_$E(SRSDATE,6,7)_"-"_$E(SRSDATE,2,3)
  • Line Location: CASE+0
Function Call: WRITE
  • Prompt: ?14,SROPS(1)
  • Line Location: CASE+3
Function Call: WRITE
  • Prompt: !,?14,SROPS(2)
  • Line Location: CASE+3
Function Call: WRITE
  • Prompt: !,?14,SROPS(2)
  • Line Location: CASE+3
Function Call: WRITE
  • Prompt: !,?14,SROPS(4)
  • Condition for execution: $D(SROPS(4))
  • Line Location: CASE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: CASE+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !!,"Enter RETURN or '1' to enter or edit information contained within one of the",!,"options found under the Operations Menu. If you want to display a two screen",!,"overview of this case, enter '2'."
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: " To delete this case from your records,",!,"enter '3'. Please note that deleting a case will remove EVERYTHING pertaining",!,"to this operative procedure.",!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: @IOF,!,?1,VADM(1)_" "_VA("PID")
  • Line Location: HDR+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] ENTER+1, LIST+1, LIST+2, LIST+3, LIST+4, LIST+5, LIST+7, CASE+1, OTHER+1, OTHER+2
^SRF("ADT" SROALNO+2

Label References

Name Line Occurrences
CASE ENTER+1
END OPT, ENTER+2, ENTER+4, ENTER+5
ENTER ENTER+3
HDR LIST+6
HELP ENTER+3
LIST SROALNO+2
LOOP CASE+2
OPT OPT+1
OTHER CASE+1
RT ENTER+5

Naked Globals

Name Field # of Occurrence
^( LIST+2
^(30 LIST+3
^(31 LIST+4
^(37 LIST+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CNT SROALNO+2*, OPT+2, LIST+6*, LIST+7*, LIST+8, CASE+4
>> DA ENTER+5*
>> DFN SROALNO+2
>> DIE ENTER+5*
DR ENTER+5!*
DTIME OPT, ENTER+2, HELP+2
>> I SROALNO+2*, CASE+1*
IOF ENTER+1, LIST+6, END, HDR+1
IOSL LIST+6
>> LOOP LOOP+1*
>> M CASE+2*, LOOP+1
MM CASE+2!, LOOP+1*
MMM CASE+2!, LOOP+1*
>> Q3("VIEW" ENTER+5*!
>> SRBACK LIST+6*
>> SRCASE( OPT+1, OPT+3, CASE+4*
>> SRCASE(1 LIST+6
>> SRDT SROALNO+2*, LIST+6*, CASE+4
>> SRLONG OTHER+1*, OTHER+2
>> SROP SROALNO+2*, ENTER+1*, LIST+1, LIST+2, LIST+3, LIST+4, LIST+5, LIST+6*, LIST+7, CASE+1
, CASE+4, OTHER+1, OTHER+2
>> SROPER CASE+1*, CASE+2*, OTHER+1, OTHER+3*, LOOP+1*
>> SROPERS OTHER+1*, OTHER+2*, OTHER+3
SROPS CASE+2!
SROPS( LOOP+1*
SROPS(1 CASE+2*, CASE+3
SROPS(2 CASE+3
SROPS(3 CASE+3
SROPS(4 CASE+3
>> SROTHER CASE+1*, OTHER+1*, OTHER+2
SRSCAN LIST+2*!, LIST+3, LIST+4
>> SRSDATE ENTER+1*, LIST+7*, CASE
>> SRSOUT SROALNO+2, OPT*, ENTER+2*, LIST+6
SRTN SROALNO+2, SROALNO+3, OPT+3*, ENTER+1, ENTER+5, LIST+6, END!
>> ST ENTER+5*
>> VA("PID" ENTER+1, LIST+6, HDR+1
>> VADM(1 ENTER+1, LIST+6, HDR+1
>> X OPT*, OPT+1, OPT+2, OPT+3, ENTER+2*, ENTER+3*, ENTER+4, ENTER+5, HELP+2*
>> XRTL RT+1
>> XRTN RT+1*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All