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

Package: Surgery

Routine: SROCMPS


Information

SROCMPS ;BIR/MAM - ENTER/EDIT OCCURRENCES ;06/17/04 6:55 AM

Source Information

Source file <SROCMPS.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Surgery 7 (,HDR)^SROAUTL  EN^SROCCAT  ^SROCMPED  (EXIT,SRA)^SROES  ($$ICDC,$$ICDSTR)^SROICD  ^SROPS  ^SRSKILL  
VA FileMan 4 EN^DDIOL  FILE^DICN  ^DIE  ^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: 5

Package Total Caller Graph
Surgery 5 SRO INTRAOP COMP  SRO POSTOP COMP  SROACOM  SROVER1  ^SRO(136.5  

Entry Points

Name Comments DBIA/ICR reference
INTRA
POST
EDIT
SEL
END
LIST ; list existing occurrences
NEW ; enter new occurrences
ICD
DESC ; output occurrence category description when doing lookup
PRESS
CO() ; called by screen on post-op occurrence category field

External References

Name Field # of Occurrence
EN^DDIOL DESC+3, DESC+4
FILE^DICN NEW+6
^DIE ICD+5
^DIR NEW+2, PRESS
^SROAUTL POST+3
HDR^SROAUTL EDIT+2, NEW+1
EN^SROCCAT END
^SROCMPED EDIT+1, SEL+1, SEL+3
EXIT^SROES END
SRA^SROES POST+2
$$ICDC^SROICD ICD+6
$$ICDSTR^SROICD ICD+5
^SROPS POST+1
^SRSKILL END+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: POST+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SEL+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SEL+2
Function Call: WRITE
  • Prompt: !!,"Select the number corresponding to the occurrence you want to update, or",!,"enter 'NEW' to add another occurrence. ",!!,"Press RETURN to continue "
  • Line Location: SEL+2
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !,CNT_". ",?5,SRCMP,!,?5,"Category: "_SRCAT,!
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: !,"There are no "_$S(SRTYPE=10:"Intraoperative",1:"Postoperative")_" Occurrences entered for this case.",!!
  • Line Location: NEW+1
Function Call: WRITE
  • Prompt: !!,"Since you have selected one of the 'OTHER' occurrence categories, an ICD",!,"Diagnosis Code should be entered for this occurrence."
  • Line Location: ICD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PRESS+0
Routine Call
  • DIE
  • Line Location:
    • ICD+5
Routine Call
  • DIR
  • Line Location:
    • NEW+2
    • PRESS

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] EDIT+1, EDIT+2, LIST+1, NEW+1, NEW+5*, NEW+9*, NEW+10*, CO+3
^SRO(136.5 - [#136.5] LIST+1, DESC+2

Label References

Name Line Occurrences
EDIT EDIT+1, SEL+1, SEL+2, SEL+3
END POST+1, EDIT, EDIT+1, SEL, SEL+1
ICD NEW+8
LIST EDIT+2
NEW EDIT+1, SEL+1
PRESS NEW+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CNT EDIT+2*, SEL, LIST+1*, LIST+2
>> COMP EDIT+2*, LIST+1
DA NEW+6!, ICD+3~, ICD+4*, ICD+5!
DA(1 NEW+6*, ICD+4*, CO+2
DD NEW+6!
DIC NEW+6!*
DIC(0 NEW+6*
DIE ICD+3~, ICD+4*
DINUM NEW+6!
DIR NEW+2!, PRESS!
DIR("A" NEW+2*, PRESS*
DIR(0 NEW+2*, PRESS*
>> DLAYGO NEW+6*
DO NEW+6!
DR ICD+3~, ICD+5*!
DTIME SEL, SEL+2, END+1
>> DTOUT PRESS
>> DUOUT NEW+2, ICD+5
>> I POST+3*
IOF POST+1, END+2
>> SRC(0 LIST+1*
>> SRCAT LIST+1*, LIST+2
>> SRCMP LIST+1*, LIST+2
SRCOM NEW+3!*, NEW+6, NEW+8, ICD+6*
SRCOMP EDIT!
SRCOMP( SEL+2, SEL+3, LIST+1*
SRDA NEW+7~*, NEW+9, NEW+10, NEW+11!, ICD+3~, ICD+4*
>> SRDD NEW+2*, NEW+6
SRENTRY SEL+1!, SEL+3*, NEW+6*
>> SRICD NEW+8*, NEW+10, ICD+6*
>> SRLINE POST+3*
>> SRNAME POST+3*
>> SRNEW EDIT*, NEW+3*
>> SROVER END+2
SRPOINT NEW+3!*, NEW+9
SRSCR CO+1~*, CO+4*
>> SRSOUT POST+1*, EDIT, EDIT+1, SEL*, SEL+1, END+1, NEW+2*, NEW+8, PRESS*
>> SRSUPCPT POST+3*
SRTN POST+1, EDIT+1, EDIT+2, END!, LIST+1, NEW+1, NEW+5, NEW+6, NEW+9, NEW+10
, ICD, ICD+4, ICD+5, CO+2
SRTN1 POST+1*, END!
>> SRTY INTRA*, POST*, ICD+5
>> SRTYPDD INTRA*, POST*, NEW+5
SRTYPE INTRA*, POST*, EDIT+1, EDIT+2, LIST+1, NEW+1, NEW+2, NEW+5, NEW+6, NEW+9
, NEW+10, ICD+4, CO+1~, CO+3*, CO+4
SRX DESC+1~, DESC+2*, CO+1~, CO+2*, CO+3
SRY DESC+1~, DESC+2*
SRZ DESC+1~, DESC+3
SRZ( DESC+2*
SRZ(0 DESC+3
U CO+3
>> VA("PID" POST+3
>> VADM(1 POST+3
X SEL*, SEL+1, SEL+2*, SEL+3, END+1*, NEW+2!, NEW+6*, ICD+6
>> Y NEW+2, NEW+3, NEW+6, NEW+7, ICD+4, DESC+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All