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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SROINQ

Package: Surgery

Routine: SROINQ


Information

SROINQ ;B'HAM ISC/MAM - OPERATION INQUIRY ; [ 07/20/04 12:44 PM ]

Source Information

Source file <SROINQ.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Surgery 2 ^SRSKILL  MINS^SRSUTL2  
Pharmacy Data Management 1 DATA^PSS50  
Registration 1 DEM^VADPT  
VA FileMan 1 (D,Y)^DIQ  

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 SROMEN-OPINFO  

Entry Points

Name Comments DBIA/ICR reference
ANES
TIME
OPS
ICD9
PRINT ; print inquiry
END
OTHER ; other operations
LOOP ; break procedure if greater than 75 characters
AGT
AGENT ; anesthesia agents

External References

Name Field # of Occurrence
D^DIQ SROINQ+17
Y^DIQ SROINQ+10, SROINQ+12, PRINT+5
DATA^PSS50 AGENT+2
^SRSKILL END
MINS^SRSUTL2 TIME
DEM^VADPT SROINQ+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"OPERATION NOT SELECTED !",!
  • Line Location: SROINQ+5
Function Call: WRITE
  • Prompt: @IOF,!,SRLINE,!,"Patient: "_SRTNM,?50,"Operation Date: "_$P(SRSDATE,"@"),!,"Primary Surgeon: "_SRSUR
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !,"Attending Surgeon: "_SRATT,?50,"Operation Time: "_SRTIME
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: " Minutes",!,"Attending/Res Sup Code: "_SRATCD,!,SRLINE
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,"Operation(s): ",!,SROPS(1)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,SROPS(2)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,SROPS(2)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,SROPS(2)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,SROPS(2)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,?4,SRICD(I)
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,SRLINE,!,"Anesthesia Technique: ",?47,"Anesthetist: ",SRANE
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: Y
  • Condition for execution: Y]""
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !,SRLINE,!,"Wound Classification: ",SRTCC,!,"Intraoperative Blood Loss: ",SRTBL,$S(SRTBL]"":" CC'S",1:""),!,SRLINE
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !!!,"Press RETURN to continue "
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !,?6,SRANE(I,T)
  • Line Location: AGT+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(130 SROINQ+10, SROINQ+12
^DD(130.06 PRINT+5
^SRF - [#130] SROINQ+6, SROINQ+8, SROINQ+10, SROINQ+12, SROINQ+16, SROINQ+17, ANESTIMEOPSICD9+1
OTHER+1, OTHER+2, AGENT+1
^SRO(137.45 - [#137.45] SROINQ+9
^TMP($J AGENT+2!
^VA(200 - [#200] SROINQ+10, SROINQ+11

Label References

Name Line Occurrences
AGENT ANES
AGT PRINT+5
LOOP OPS+1
OTHER OPS

Naked Globals

Name Field # of Occurrence
^( SROINQ+8, ANESAGENT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ANS PRINT+7*
>> C SROINQ+10*, SROINQ+12*, PRINT+5*
>> DFN SROINQ+6*
DTIME PRINT+7
>> I SROINQ+7*, ANES*, OPS*, ICD9+1*, PRINT+4*, PRINT+5*, AGTAGENT+1, AGENT+2
IOF PRINT+1, END
>> J ANES*
>> LOOP LOOP+1*
>> M OPS+1*, LOOP+1
MM OPS+1!, LOOP+1*
MMM OPS+1!, LOOP+1*
>> OPER OPS*, OTHER+1*, OTHER+2
>> Q AGENT+1*, AGENT+2
>> S( SROINQ+8*, SROINQ+10, TIME*
>> S(0 SROINQ+6*, SROINQ+9
>> SRANE SROINQ+10*, SROINQ+11*, SROINQ+15*, PRINT+5
>> SRANE( ANES*, PRINT+5, AGTAGENT+2*
>> SRATCD SROINQ+12*, SROINQ+13*, PRINT+2
>> SRATT SROINQ+10*, PRINT+2
>> SRICD ICD9+1*
>> SRICD( ICD9+1*, PRINT+4
>> SRICD("*" SROINQ+18*, ICD9+1*, PRINT+4
>> SRLINE SROINQ+7*, PRINT+1, PRINT+2, PRINT+4, PRINT+5, PRINT+6
>> SRLONG OTHER+1*, OTHER+2
>> SROPER OPS*, OPS+1*, OTHER+1, OTHER+3*, LOOP+1*
>> SROPERS OTHER+1*, OTHER+2*, OTHER+3
SROPS OPS+1!
SROPS( LOOP+1*
SROPS(1 OPS+1*, PRINT+3
SROPS(2 PRINT+3
SROPS(3 PRINT+3
SROPS(4 PRINT+3
SROPS(5 PRINT+3
>> SRSDATE SROINQ+17*, PRINT+1
>> SRSUR SROINQ+10*, PRINT+1
>> SRTBL TIME*, TIME+1*, PRINT+6
>> SRTCC SROINQ+8*, SROINQ+10*, PRINT+6
>> SRTCMP SROINQ+16*, PRINT+4
>> SRTCMP1 SROINQ+16*, PRINT+4
>> SRTDG TIME*, ICD9*, ICD9+1
>> SRTDG("*" ICD9+2*
>> SRTDG1 ICD9*
>> SRTDG2 ICD9*, ICD9+1, PRINT+4
>> SRTIME TIME*, TIME+1*, PRINT+2
>> SRTN SROINQ+5, SROINQ+6, SROINQ+8, SROINQ+10, SROINQ+12, SROINQ+16, SROINQ+17, ANESTIMEOPS
ICD9+1, OTHER+1, OTHER+2, AGENT+1
>> SRTNM SROINQ+6*, PRINT+1
>> SRTSP SROINQ+9*
>> SSN SROINQ+6*
>> T AGT*, AGENT+1*
U ANESAGENT+1
>> VA("PID" SROINQ+6
>> VADM(1 SROINQ+6
>> X TIME*
>> X1 TIME*
>> Y SROINQ+10*, SROINQ+12*, SROINQ+17*, PRINT+5*
>> Z AGENT+1*, AGENT+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All