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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SRO1L1

Package: Surgery

Routine: SRO1L1


Information

SRO1L1 ;BIR/ADM - UPDATE 1-LINER CASE, CONTINUED ;02/14/07

Source Information

Source file <SRO1L1.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Surgery 8 ^SROAEX  (HDR,NCODE)^SROAUTL  (CPTS,DISP)^SROAUTL0  SSPRIN^SROCPT  (EXIT,SRA)^SROES  TECH^SROPRIN  ^SROTHER  ($$LOCK,UNLOCK)^SROUTL  
VA Fileman 4 ^DIE  EN1^DIK  EN^DIQ1  ^DIR  
DRG Grouper 1 $$CPT^ICPTCOD  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Surgery 2 SRO1L  SROAEX  

Entry Points

Name Comments DBIA/ICR reference
END
HELP
EDIT
ONE ; edit one item
TSTAT ; transmission status
RANGE ; range of numbers
PRESS
UPANES
SEL
PROC

External References

Name Field # of Occurrence
^DIE ONE+4, UPANES
EN1^DIK EDIT+16
EN^DIQ1 EDIT+7
^DIR PRESS
$$CPT^ICPTCOD EDIT+3
^SROAEX EDIT
HDR^SROAUTL EDIT+2
NCODE^SROAUTL SRO1L1+2
CPTS^SROAUTL0 PROC
DISP^SROAUTL0 ONE+2
SSPRIN^SROCPT EDIT+3
EXIT^SROES END
SRA^SROES SRO1L1+4
TECH^SROPRIN EDIT+2
^SROTHER ONE+3
$$LOCK^SROUTL SRO1L1+3
UNLOCK^SROUTL END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$J(I,2)_". "_$P(SRAO(I),"^")_":"
  • Line Location: EDIT+9
Function Call: WRITE
  • Prompt: !!
  • Line Location: EDIT+14
Function Call: WRITE
  • Prompt: "-"
  • Line Location: EDIT+14
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: SEL+5
Function Call: WRITE
  • Prompt: @IOF,!!!!,"Enter the number or range of numbers you want to edit. Examples of proper"
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !,"responses are listed below.",!!,"1. Enter 'A' to update all items."
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!,"2. Enter a number (1-"_SRX_") to update an individual item. (For example,"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !," enter '1' to update "_$P(SRAO(1),"^")_")"
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !!,"3. Enter a range of numbers (1-"_SRX_") separated by a ':' to enter a range"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !," of items. (For example, enter '1:4' to update items 1, 2, 3 and 4.)",!
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: PRESS+0
Routine Call
  • DIE
  • Line Location:
    • ONE+4
    • UPANES
Routine Call
  • DIR
  • Line Location:
    • PRESS

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SRF - [#130] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] EDIT, EDIT+3, EDIT+8, TSTAT+1
^SRO(136 - [#136] EDIT+1

Label References

Name Line Occurrences
EDIT EDIT+17
END EDIT
HELP SEL+1, SEL+2
ONE SEL+5, RANGE+1
PROC EDIT+10
RANGE SEL+4
SEL EDIT+15
TSTAT EDIT+2
UPANES ONE+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CURLEY RANGE+1*
DA EDIT+7!*, EDIT+16!*, ONE+4*, UPANES!*
DIC EDIT+7!*
DIE ONE+4!*, UPANES!*
DIK EDIT+16!*
DIK(1 EDIT+16*
DIQ EDIT+7!*
DIQ(0 EDIT+7*
DIR PRESS!
DIR(0 PRESS*
DR EDIT+7!*, ONE+4!*, UPANES!*
DR(2 UPANES*
DTIME SEL
>> DTOUT PRESS
>> DUOUT PRESS
>> EMILY SEL+5*, RANGE+1*, ONE+1, ONE+2, ONE+3, ONE+4
I EDIT+9*, EDIT+10, EDIT+11, EDIT+12~*, EDIT+14*, PROC~, PROC+1*
IOF HELP
J EDIT+12~*
>> SHEMP RANGE+1*
SR905 TSTAT+1~*, TSTAT+2
>> SRA EDIT*
>> SRAO( EDIT+9, EDIT+11, SEL+1, SEL+5, ONE+4
>> SRAO(1 EDIT+5*, HELP+3
>> SRAO(2 EDIT+5*
>> SRAO(3 EDIT+5*
>> SRAO(4 EDIT+5*
>> SRAO(5 EDIT+6*
>> SRAO(6 EDIT+6*
>> SRAO(7 EDIT+6*
>> SRAO(8 EDIT+6*
>> SRAO(9 EDIT+6*
>> SRCPT EDIT+3*, EDIT+8
SRCSTAT SRO1L1+3~, EDIT+1*
>> SRDR EDIT+4*, EDIT+7
SREXT EDIT+13!
SREXT(1 EDIT+11*, EDIT+12*, EDIT+13
SREXT(2 EDIT+12*, EDIT+13
>> SRHDR( TSTAT+2*
SRL PROC~*
SRLCK SRO1L1+3~*, END
SRPROC PROC~
SRPROC( PROC+1
>> SRQ EDIT+4*
>> SRR EDIT+2*, EDIT+17, SEL+1*, SEL+2*, SEL+4*, SEL+5*
>> SRSOUT SRO1L1+2*, SEL*, PRESS*, RANGE+1, ONE+4*
>> SRSUPCPT SRO1L1+2*
>> SRTECH EDIT+8
>> SRTN SRO1L1+3, EDIT, EDIT+1, EDIT+3, EDIT+7, EDIT+8, EDIT+11, EDIT+16, END, ONE+4
, UPANES, TSTAT+1
>> SRX EDIT+15*, SEL+2, SEL+3, HELP+2, HELP+4
SRY EDIT+7!
SRY(130 EDIT+8*, EDIT+11
X EDIT+3*, EDIT+12~*, SEL*, SEL+1*, SEL+2, SEL+3*, SEL+4, SEL+5, RANGE+1
Y EDIT+3*, EDIT+12~*, SEL+2*, ONE+4
>> Z SEL+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All