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

Package: Surgery

Routine: SROVER3


Information

SROVER3 ;BIR/ADM - Case Coding and Verification ;07/26/07

Source Information

Source file <SROVER3.m>

Call Graph

Call Graph Total: 12

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  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Surgery 2 SROVER1  SROVER2  

Entry Points

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

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*
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