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

Package: Surgery

Routine: SROAOP


Information

SROAOP ;BIR/MAM - ENTER OPERATION INFO ;06/25/10

Source Information

Source file <SROAOP.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Surgery 8 ^SROAOP1  ^SROAOP2  (,HDR)^SROAUTL  (CPTS,DISP)^SROAUTL0  ^SROERR0  ^SROTHER  ($$LOCK,UNLOCK)^SROUTL  ^SRSKILL  
VA FileMan 3 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: 1

Package Total Caller Graph
Surgery 1 SROA OPERATION DATA  

Entry Points

Name Comments DBIA/ICR reference
START
ASK
END
HELP
PRESS
RANGE ; range of numbers
ONE ; edit one item
RET
CONCUR ; concurrent case information
CC ; list concurrent procedure
LOOP ; break procedures
ANES

External References

Name Field # of Occurrence
FILE^DICN ANES+3
^DIE ONE+6, ANES+5, ANES+6
^DIR PRESSANES+2
^SROAOP1 START
^SROAOP2 END
^SROAUTL SROAOP+3, ONE+7
HDR^SROAUTL ASK+5, ONE+5, CONCUR+3
CPTS^SROAUTL0 CC+2
DISP^SROAUTL0 ONE+1
^SROERR0 END+1
^SROTHER ONE+3
$$LOCK^SROUTL ASK+9, RANGE+1
UNLOCK^SROUTL ASK+9, RANGE+1
^SRSKILL END+2

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SROAOP+2
Function Call: WRITE
  • Prompt: !!,"A Surgery Risk Assessment must be selected prior to using this option.",!!,"Press <RET> to continue "
  • Line Location: SROAOP+2
Function Call: READ
  • Variable: SRASEL
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
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 information."
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!,"2. Enter a number (1-"_SRN_") to update the information in that field. (For"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !," example, enter '2' to update Principal Operation.)"
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !!,"3. Enter a range of numbers (1-"_SRN_") separated by a ':' to enter a range of"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !," information. (For example, enter '6:8' to update PGY of Primary Surgeon,"
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !," Surgical Priority and Wound Classification.)",!
  • Line Location: HELP+6
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RET+0
Function Call: WRITE
  • Prompt: !,"Concurrent Procedure: An additional operative procedure performed by a"
  • Line Location: CONCUR+4
Function Call: WRITE
  • Prompt: !,"different surgical team (i.e., a different specialty/service) under the"
  • Line Location: CONCUR+5
Function Call: WRITE
  • Prompt: !,"same anesthetic which has a CPT code different from that of the Principal"
  • Line Location: CONCUR+6
Function Call: WRITE
  • Prompt: !,"Operative Procedure (e.g., fixation of a femur fracture in a patient"
  • Line Location: CONCUR+7
Function Call: WRITE
  • Prompt: !,"undergoing a laparotomy for trauma). This field should be verified and,"
  • Line Location: CONCUR+8
Function Call: WRITE
  • Prompt: !,"if need be, report discrepancies to the official CPT coder for surgery."
  • Line Location: CONCUR+9
Function Call: WRITE
  • Prompt: !!,"Concurrent Procedure: ",?22,SROPS(1)
  • Line Location: CONCUR+10
Function Call: WRITE
  • Prompt: !,?22,SROPS(2)
  • Line Location: CONCUR+10
Function Call: WRITE
  • Prompt: !,?22,SROPS(2)
  • Line Location: CONCUR+10
Function Call: WRITE
  • Prompt: !,?22,SROPS(2)
  • Line Location: CONCUR+10
Function Call: WRITE
  • Prompt: !!,?22,SRCSTAT
  • Line Location: CONCUR+11
Function Call: WRITE
  • Prompt: !!,"Press ENTER to continue "
  • Line Location: CONCUR+12
Routine Call
  • DIE
  • Line Location:
    • ONE+6
    • ANES+5
    • ANES+6
Routine Call
  • DIR
  • Line Location:
    • PRESS
    • ANES+2

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] CONCUR+2, CC+4, ANES+1
^SRO(136 - [#136] CC+1

Label References

Name Line Occurrences
ANES ONE+2
CC CONCUR+10
CONCUR ONE+4
END SROAOP+2, STARTASKASK+1, ASK+2, ASK+4
HELP ASK+2, ASK+4
LOOP CC+7
ONE ASK+9, RANGE+2
RANGE ASK+6
START ASK+2, ASK+4, ASK+6, ASK+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CON CONCUR+2*, CONCUR+10, CC+1, CC+2, CC+4
>> CURLEY RANGE+2*
DA ONE+6*, ANES+5!*, ANES+6!*
DA(1 ANES+3*, ANES+5*
DD ANES+3!
DIC ANES+3*!
DIC(0 ANES+3*
DIE ONE+6!*, ANES+5!*, ANES+6!*
DIR PRESS!, ANES+2!
DIR("A" ANES+2*
DIR(0 PRESS*, ANES+2*
DO ANES+3!
DR ONE+6!*, ANES+5!*, ANES+6!*
DR(2 ANES+6*
DTIME SROAOP+2, ASKRETCONCUR+12
>> DTOUT PRESSANES+2
>> DUOUT PRESSANES+2
>> EMILY ASK+8*, RANGE+2*, ONE+1, ONE+2, ONE+3, ONE+4, ONE+5, ONE+6, ONE+7
>> I CONCUR+1*, CC+4*
IOF END+2, HELP
>> LOOP LOOP+1*
>> M CC+7*, LOOP+1
MM ASK+5*, CC+6!, LOOP+1*
MMM CC+6!, CC+7, LOOP+1*
>> SHEMP RANGE+2*
SRACON START!
SRANE ANES~, ANES+2*, ANES+3
>> SRAO( ASK+2, ASK+7, ONE+6
>> SRAO(10 ANES+1
SRAOTH START!
>> SRASEL ASK*, ASK+1, ASK+2*, ASK+3*, ASK+4, ASK+5, ASK+6, ASK+7, ASK+8, RANGE+2
ONE+5
SRCSTAT CONCUR+1~, CONCUR+11, CC+1*, CC+3!
>> SRDOC ASK+5, ONE+5
>> SRHDR( ASK+5*, ONE+5*
SRL CC+1~, CC+2*
>> SRLINE CONCUR+1*
>> SRN ASK+2*, ASK+3, ASK+4, HELP+2, HELP+4
SRNEW ANES~, ANES+4*, ANES+5
>> SROERR END+1*
>> SROPER CC+4*, CC+5*, CC+6, CC+7*, LOOP+1*
SROPS CC+6!
SROPS( LOOP+1*
SROPS(1 CONCUR+10, CC+6*
SROPS(2 CONCUR+10
SROPS(3 CONCUR+10
SROPS(4 CONCUR+10
>> SRPAGE ONE+5*, CONCUR+3*
SRPROC CONCUR+1~
SRPROC( CC+4
SRPROC(1 CC+3*
>> SRSOUT SROAOP+3*, START, ASK*, ASK+2, ASK+4, END, PRESS*, RANGE+2, ONE+6*, RET*
>> SRSUPCPT SROAOP+3*
SRTN SROAOP+2, ASK+9, END+1, RANGE+1, ONE+6, CONCUR+2, CC+1~, CC+2*, ANES+1, ANES+3
ANES+5, ANES+6
SRZ CC+1~
>> X SROAOP+2*, RET*, CONCUR+12*, ANES+3*
>> Y ASK+4*, ONE+6, ANES+2, ANES+3, ANES+4
>> Z ASK+4*
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