Routine: SROVER3

Package	Total	Call Graph
Surgery	5	(CASDX,COTHADX)^SROADX OTHADXD^SROADX1 SSOTH^SROCPT ASK^SROPCE1 HDR^SROVER2
VA Fileman	4	FILE^DICN ^DIE GETS^DIQ ^DIR
DRG Grouper	2	$$ICDDX^ICDCODE ($$CPT,$$CPTD)^ICPTCOD
Scheduling	1	CL^SDCO21

Package	Total	Caller Graph
Surgery	2	SROVER1 SROVER2

Entry Points

External References

Name	Field # of Occurrence
FILE^DICN	POTH+18, DOTH+29
^DIE	ONE+3, POTH+16, POTH+19, DOTH+25
GETS^DIQ	DOTH+7
^DIR	ASK+1, PRESS, POTH+9, POTH+17, DOTH+19, DOTH+26, DOTH+27
$$ICDDX^ICDCODE	DOTH+4
$$CPT^ICPTCOD	POTH+3
$$CPTD^ICPTCOD	POTH+15
CL^SDCO21	SCEC+1
CASDX^SROADX	ONE+5
COTHADX^SROADX	POTH+16, POTH+19
OTHADXD^SROADX1	POTH+7
SSOTH^SROCPT	POTH+3
ASK^SROPCE1	ONE+4
HDR^SROVER2	ASK+6, POTH+11, PH, DH

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ASK+0
Function Call: WRITE	Prompt: !!,"Enter the number corresponding to the information you want to update. You may",!,"enter 'ALL' to update all the information displayed on this screen, or a" Line Location: HELP+0
Function Call: WRITE	Prompt: !,"range of numbers separated by a ':' to update more than one item." Line Location: HELP+1
Function Call: WRITE	Prompt: ! Line Location: PRESS+0
Function Call: WRITE	Prompt: ! Line Location: RANGE+1
Function Call: WRITE	Prompt: ! Line Location: ONE+3
Function Call: WRITE	Prompt: !,"Other Procedures:",! Line Location: POTH+0
Function Call: WRITE	Prompt: !,CNT_". Enter NEW Other Procedure",! Line Location: POTH+9
Function Call: WRITE	Prompt: !! Line Location: POTH+10
Function Call: WRITE	Prompt: !,?5,SRDES(I) Line Location: POTH+15
Function Call: WRITE	Prompt: ! Line Location: POTH+16
Function Call: WRITE	Prompt: !,"Other Postop Diagnosis:",! Line Location: DOTH+0
Function Call: WRITE	Prompt: ! Line Location: DOTH+9
Function Call: WRITE	Prompt: ?SRCOLSPN,"SC:",$E(ENVARR(130.18,OTH_","_SRTN_",",4,"E")) Line Location: DOTH+10
Function Call: WRITE	Prompt: ?SRCOLSPN,"CV:",$E(ENVARR(130.18,OTH_","_SRTN_",",10,"E")) Line Location: DOTH+11
Function Call: WRITE	Prompt: ?SRCOLSPN,"AO:",$E(ENVARR(130.18,OTH_","_SRTN_",",5,"E")) Line Location: DOTH+12
Function Call: WRITE	Prompt: ?SRCOLSPN,"IR:",$E(ENVARR(130.18,OTH_","_SRTN_",",6,"E")) Line Location: DOTH+13
Function Call: WRITE	Prompt: ?SRCOLSPN,"SWAC:",$E(ENVARR(130.18,OTH_","_SRTN_",",9,"E")) Line Location: DOTH+14
Function Call: WRITE	Prompt: ?SRCOLSPN,"SHAD:",$E(ENVARR(130.18,OTH_","_SRTN_",",11,"E")) Line Location: DOTH+15
Function Call: WRITE	Prompt: ?SRCOLSPN,"MST:",$E(ENVARR(130.18,OTH_","_SRTN_",",7,"E")) Line Location: DOTH+16
Function Call: WRITE	Prompt: ?SRCOLSPN,"H&N:",$E(ENVARR(130.18,OTH_","_SRTN_",",8,"E")) Line Location: DOTH+17
Function Call: WRITE	Prompt: !,CNT_". Enter NEW Other Postop Diagnosis",! Line Location: DOTH+19
Function Call: WRITE	Prompt: !! Line Location: DOTH+20
Routine Call	DIE Line Location: ONE+3 POTH+16 POTH+19 DOTH+25
Routine Call	DIR Line Location: ASK+1 PRESS POTH+9 POTH+17 DOTH+19 DOTH+26 DOTH+27

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(130	POTH+18, DOTH+29
^SRF - [#130]	POTH+1, POTH+2, POTH+3, POTH+15, DOTH+2, DOTH+3, DOTH+4, DOTH+23, SCEC, SCEC+1

Label References

Name	Line Occurrences
$$SCEC	ONE+4, DOTH+1
ASK	ASK+3, ASK+5
DH	DOTH+20, DOTH+26
DOTH	ONE+2, DH
HELP	ASK+3, ASK+5
ONE	ASK+7, RANGE+1
PH	POTH+10, POTH+17
POTH	ONE+1, PH
PRESS	POTH+16, POTH+19
RANGE	ASK+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CNT	POTH+1, POTH+4, POTH+6, POTH+8, POTH+9, POTH+10, POTH+19, DOTH+2, DOTH+5, DOTH+18 , DOTH+19, DOTH+20
>> CPT	POTH+2, POTH+3, POTH+5, POTH+6
>> CPT1	POTH+2, POTH+3, POTH+6, POTH+15*
>> CURLEY	RANGE+1*
DA	ONE+3!, POTH+16!, POTH+19!, DOTH+22!, DOTH+23, DOTH+25!, DOTH+29!
DA(1	POTH+16, POTH+19, DOTH+22, DOTH+28
DD	POTH+18!, DOTH+29!
DFN	SCEC~, SCEC+1*
DIC	POTH+18!, DOTH+29!
DIC("DR"	DOTH+29*
DIC("P"	POTH+18, DOTH+29
DIC(0	POTH+18, DOTH+29
DIE	ONE+3!, POTH+16!, POTH+19!, DOTH+22!, DOTH+25!
DIR	ASK!, ASK+1!, PRESS!, POTH+9!, POTH+16!, POTH+17!, POTH+19!, DOTH+19!, DOTH+22!, DOTH+25! , DOTH+26!, DOTH+27!
DIR("?"	ASK, ASK+1
DIR("A"	ASK, PRESS, POTH+9, POTH+17, DOTH+19, DOTH+26, DOTH+27*
DIR(0	ASK, PRESS, POTH+9, POTH+17, DOTH+19, DOTH+26, DOTH+27*
DO	POTH+18!, DOTH+29!
DR	ONE+3!, POTH+16!, POTH+19!, DOTH+22, DOTH+24*, DOTH+25!, DOTH+29!
DT	SCEC
>> DTOUT	ASK+1, POTH+9, POTH+17, DOTH+19, DOTH+26, DOTH+27
>> DUOUT	ASK+1, POTH+9, POTH+17, DOTH+19, DOTH+26, DOTH+27
>> EMILY	ASK+7, RANGE+1, ONE+1, ONE+2, ONE+3, ONE+4, ONE+5
ENVARR	DOTH+1~
ENVARR(	DOTH+8, DOTH+10, DOTH+11, DOTH+12, DOTH+13, DOTH+14, DOTH+15, DOTH+16, DOTH+17
>> I	POTH+15*
>> OTH	POTH+1, POTH+2, POTH+3, POTH+6, POTH+15, DOTH+2*, DOTH+3, DOTH+5, DOTH+7, DOTH+8 , DOTH+10, DOTH+11, DOTH+12, DOTH+13, DOTH+14, DOTH+15, DOTH+16, DOTH+17
>> OTHER	POTH+2, POTH+4, POTH+6, POTH+19, DOTH+3*, DOTH+5
SCEC	DOTH+1~, DOTH+6, SCEC~, SCEC+2, SCEC+3
>> SHEMP	RANGE+1*
>> SRAO(	ASK+3, ONE+3
>> SRAO(1	SROVER3+5*
>> SRAO(2	SROVER3+5*
>> SRAO(3	SROVER3+5*
>> SRAO(4	SROVER3+5*
>> SRAO(5	SROVER3+5*
>> SRAO(6	SROVER3+5*
>> SRAO(7	SROVER3+5*
>> SRAO(8	SROVER3+5*
SRCL	ONE+4!, DOTH+26!, SCEC+1, SCEC+2
SRCL(1	DOTH+12, DOTH+24
SRCL(2	DOTH+13, DOTH+24
SRCL(3	DOTH+10, DOTH+24
SRCL(4	DOTH+14, DOTH+24
SRCL(5	DOTH+16, DOTH+24
SRCL(6	DOTH+17, DOTH+24
SRCL(7	DOTH+11, DOTH+24
SRCL(8	DOTH+15, DOTH+24
>> SRCODE	DOTH+27, DOTH+29
SRCOLSPN	DOTH+9~, DOTH+10, DOTH+11, DOTH+12, DOTH+13, DOTH+14, DOTH+15, DOTH+16, DOTH+17*
>> SRCPT	POTH+3*
SRCVET	DOTH+22~, DOTH+23*, DOTH+24
>> SRDA	POTH+3, POTH+10, POTH+13, POTH+14, POTH+15, POTH+16, POTH+19, DOTH+20, DOTH+21, DOTH+22
SRDES	POTH+15!, DOTH+4*
SRDES(	POTH+15
SRDES(0	POTH+15
>> SRDIAG	DOTH+3, DOTH+4, DOTH+5
>> SREDIT	ASK+2*
>> SRMSG	SROVER3+5*
>> SRNEW	POTH+17, POTH+18, POTH+19, DOTH+26, DOTH+29
>> SRNON	SROVER3+5
>> SRNUM	DOTH+4*
>> SROVER	SROVER3+5*
SRSDATE	SCEC~*, SCEC+1
SRSEL	POTH+1!, DOTH+2!
SRSEL(	POTH+6, POTH+14, POTH+15, POTH+16, DOTH+5, DOTH+21, DOTH+22
SRSHT	POTH+1~, POTH+3*
>> SRSOUT	ASK+1, ASK+3, ASK+5, RANGE+1, ONE+3, POTH+1, POTH+9, DOTH+2, DOTH+19, DOTH+27*
>> SRTN	ONE+3, POTH+1, POTH+2, POTH+3, POTH+15, POTH+16, POTH+19, DOTH+2, DOTH+3, DOTH+4 , DOTH+7, DOTH+8, DOTH+10, DOTH+11, DOTH+12, DOTH+13, DOTH+14, DOTH+15, DOTH+16, DOTH+17 , DOTH+22, DOTH+23, DOTH+28, SCEC, SCEC+1
U	POTH+2, POTH+3, POTH+14, POTH+15, POTH+16, POTH+18, DOTH+3, DOTH+4, DOTH+21, DOTH+22 , DOTH+27, DOTH+29, SCEC, SCEC+1
>> X	ASK+2, ASK+3, ASK+4, ASK+5, ASK+6, ASK+7, RANGE+1, POTH+2, POTH+3, POTH+15 , POTH+18, DOTH+3, DOTH+4, DOTH+29*
>> Y	ASK+5, ONE+3, POTH+3, POTH+10, POTH+16, POTH+17, POTH+18, POTH+19, DOTH+4*, DOTH+20 , DOTH+26, DOTH+27, DOTH+29
>> Z	ASK+5*

Customize PDF page

Package: Surgery

Routine: SROVER3

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
HELP
DH
ONE	; edit one item
PRESS
RANGE	; range of numbers
POTH
ASK
PH
DOTH
SCEC()