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

Package: Surgery

Routine: SRO1L


Information

SRO1L ;BIR/ADM - Update 1-Liner Cases ; [ 07/7/03 9:05 AM ]

Source Information

Source file <SRO1L.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Surgery 6 ^SRO1L1  ^SROERR0  ^SROP1  ^SROPSEL  ^SROVAR  ^SRSKILL  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Surgery 1 SROA ONE-LINER UPDATE  

Entry Points

Name Comments DBIA/ICR reference
ST
EN2
END
SROPS ; select patient and case
ADT
OPT
LIST ; list cases
CASE
SEL ; select case
OTHER ; other operations
LOOP ; break procedure
HDR ; print heading

External References

Name Field # of Occurrence
^DIR SEL+1, SEL+4
^SRO1L1 EN2+1
^SROERR0 EN2+1
^SROP1 CASE+2
^SROPSEL SROPS+1
^SROVAR ST
^SRSKILL END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN2+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SROPS+2
Function Call: WRITE
  • Prompt: !!,"Case #"_SROP_" is not a valid 1-liner case.",!!,"Press RETURN to continue "
  • Line Location: SROPS+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ADT+2
Function Call: WRITE
  • Prompt: !!,"There are no cases entered for "_VADM(1)_".",!!,"Press RETURN to continue "
  • Line Location: ADT+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: OPT+0
Function Call: WRITE
  • Prompt: !!,"Enter the number of the operation you want to edit."
  • Line Location: OPT+1
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: !
  • Line Location: SEL+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+3
Function Call: WRITE
  • Prompt: @IOF,!,?1,VADM(1)_" "_VA("PID")
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: " * DIED "_$E(X,4,5)_"/"_$E(X,6,7)_"/"_$E(X,2,3)_" *"
  • Condition for execution: X
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+1
Routine Call
  • DIR
  • Line Location:
    • SEL+1
    • SEL+4

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
ADT ADT+1
EN2 EN2+2
END EN2, SROPS+1, ADT+2, OPT
HDR SROPS+1, LIST+7
LIST SROPS+2, ADT
LOOP CASE+2
OPT OPT+1
OTHER CASE+1
SEL LIST+7
SROPS EN2
ST SROPS+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CNT SROPS+1*, ADT*, LIST+8*, CASE+4
>> DFN ADT
DIR SEL+1!, SEL+4!
DIR("A" SEL+1*, SEL+3*, SEL+4*
DIR(0 SEL+1*
DTIME SROPS+2, ADT+2, OPT
>> DTOUT SEL+1, SEL+4
>> DUOUT SEL+1, SEL+4
>> I CASE+1*
IOF EN2+2, END, HDR+1
IOSL LIST+7
>> LOOP LOOP+1*
>> M CASE+2*, LOOP+1
MM CASE+2!, LOOP+1*
MMM CASE+2!, LOOP+1*
SRA LIST+1~*
>> SRBACK ADT*, ADT+1, LIST+7*, SEL+4*
SRCASE SROPS+2!
SRCASE( OPT+1, OPT+2, CASE+4*, SEL+3, SEL+4, SEL+5
SRCASE(1 SROPS+2, SROPS+3, ADT+2
>> SRDT SROPS+1*, ADT*, CASE+4
>> SRLONG OTHER+1*, OTHER+2
>> SROERR EN2+1*
>> SROP SROPS+2, ADT*, LIST+1, LIST+2, LIST+3, LIST+4, LIST+5, LIST+6, LIST+8, 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
>> SRSDATE LIST+8*, CASE
SRSEL SROPS+1~, SROPS+2, SROPS+3
>> SRSITE ST
>> SRSOUT EN2*, SROPS+1, ADT, OPT*, LIST+7, SEL+1*, SEL+4*
SRTN EN2!, EN2+1, END!, SROPS+3*, ADT, ADT+1, OPT+2*, LIST+7, SEL+5*
>> VA("PID" HDR+1
>> VADM(1 ADT+2, HDR+1
>> VADM(6 HDR+1
>> X SROPS+2*, ADT+2*, OPT*, OPT+1, OPT+2, SEL+2, SEL+3, SEL+4, SEL+5, HDR+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All