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

Package: Surgery

Routine: SROAEX


Information

SROAEX ;BIR/MAM - EXCLUSION CRITERIA ;03/22/07

Source Information

Source file <SROAEX.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Surgery 6 TSTAT^SRO1L1  (HDR,NCODE)^SROAUTL  (CPTS,DISP)^SROAUTL0  DELETE^SRONASS  TECH^SROPRIN  ^SRSKILL  
VA FileMan 4 ^DIE  EN1^DIK  ($$GET1,Y)^DIQ  ^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: 2

Package Total Caller Graph
Surgery 2 SRO1L1  SRONASS  

Entry Points

Name Comments DBIA/ICR reference
START
ASK
END
HELP
AQ ; update transmission status
RANGE ; range of numbers
ONE ; edit one item
RET
CRITERIA ; expand set of codes for exclusion criteria
UPANES
REASON

External References

Name Field # of Occurrence
^DIE ONE+4, UPANES, REASON+2
EN1^DIK AQ+1
$$GET1^DIQ START+11
Y^DIQ CRITERIA+1
^DIR RET, REASON
TSTAT^SRO1L1 START+6, ASK+4
HDR^SROAUTL START+6, ASK+4, RANGE+1
NCODE^SROAUTL SROAEX+2
CPTS^SROAUTL0 START+9
DISP^SROAUTL0 ONE+2
DELETE^SRONASS REASON+1
TECH^SROPRIN START+5
^SRSKILL END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"1. Exclusion Criteria: ",?35,$P(SRAO(1),"^"),!,"2. Surgical Priority:",?35,$P(SRAO(2),"^"),!,"3. Surgical Specialty:",?35,$P(SRAO(3),"^")
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !,"4. CPT Codes (view only):"
  • Line Location: START+9
Function Call: WRITE
  • Prompt: !,"5. Principal Anesthesia Technique: "_$P(SRAO(5),"^"),!,"6. Robotic Assistance (Y/N): ",?35,$$GET1^DIQ(130,SRTN_",",2006,"E"),!!
  • Line Location: START+11
Function Call: WRITE
  • Prompt: "-"
  • Line Location: START+11
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: ASK+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
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-5) to update the information in that field. (For"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !," example, enter '2' to update Surgical Priority)"
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !!,"3. Enter a range of numbers (1-5) separated by a ':' to enter a range of"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !," information. (For example, enter '1:2' to update the Exclusion Criteria "
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !," and Surgical Priority)"
  • Line Location: HELP+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: RANGE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: RET+0
Function Call: WRITE
  • Prompt: !
  • Line Location: REASON+0
Routine Call
  • DIE
  • Line Location:
    • ONE+4
    • UPANES
    • REASON+2
Routine Call
  • DIR
  • Line Location:
    • RET
    • REASON

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(130 CRITERIA+1
^SRF - [#130] START+1, START+7, CRITERIA+2
^SRO(136 - [#136] START+4
^SRO(137.45 - [#137.45] START+3

Label References

Name Line Occurrences
AQ ASK+5, ASK+6, END
CRITERIA START+1
END START, ASK, ASK+1, ASK+3
HELP ASK+1, ASK+3
ONE ASK+6, RANGE+1
RANGE ASK+5
REASON ONE+1
RET START, HELP+6
START ASK+1, ASK+3, ASK+5, ASK+6
UPANES ONE+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C CRITERIA+1*
>> CURLEY RANGE+1*
DA AQ+1!*, ONE+4*, UPANES!*, REASON+2!*
DIE ONE+4!*, UPANES!*, REASON+2!*
DIK AQ+1!*
DIK(1 AQ+1*
DIR RET!, REASON!
DIR("A" REASON*
DIR("B" REASON*
DIR(0 RET*, REASON*
DR ONE+4!*, UPANES!*, REASON+2!*
DR(2 UPANES*
DTIME ASK
>> DTOUT RET, REASON
>> DUOUT RET, REASON
>> EMILY ASK+6*, RANGE+1*, ONE+1, ONE+2, ONE+3, ONE+4
>> I START+10*
IOF END, HELP
>> LINE START+11*
>> MOE CRITERIA+2*
>> NYUK START+1, CRITERIA+1*
>> SHEMP START+3*, RANGE+1*, CRITERIA+2*
>> SR(0 START+1*, START+2, START+3
SRA START!
>> SRACLR SROAEX+2*, START*
SRAO START!
SRAO( ASK+1, ASK+6, ONE+4
SRAO(1 START+1*, START+8, REASON
SRAO(2 START+2*, START+8
SRAO(3 START+3*, START+8
SRAO(4 START*
SRAO(5 START+5*, START+11
SRAO(6 START+7*
SRCSTAT SROAEX+2~, START+4*
SRL START+9~*
SRPROC START+9~
SRPROC( START+10
>> SRSOUT SROAEX+2*, START, ASK+1, ASK+3, RANGE+1, ONE+4*, RET*, REASON*, REASON+1*
>> SRTECH START+5*
>> SRTN START+1, START+4, START+7, START+11, AQ+1, ONE+4, CRITERIA+2, UPANES, REASON+2
>> X START+2*, ASK*, ASK+1*, ASK+2*, ASK+3, ASK+5, ASK+6, RANGE+1, REASON+1
>> Y START+1*, ASK+3*, ONE+4, CRITERIA+1, REASON+2
>> Z ASK+3*
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