Routine: SRO1L1

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

Package

Total

Call Graph

^SROAEX (HDR,NCODE)^SROAUTL (CPTS,DISP)^SROAUTL0 SSPRIN^SROCPT (EXIT,SRA)^SROES TECH^SROPRIN ^SROTHER ($$LOCK,UNLOCK)^SROUTL

^DIE EN1^DIK EN^DIQ1 ^DIR

$$CPT^ICPTCOD

Package	Total	Caller Graph
Surgery	2	SRO1L SROAEX

Package

Total

Caller Graph

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

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

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

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*

Information