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

Package: Surgery

Routine: SROTRPT0


Information

SROTRPT0 ;B'HAM ISC/MAM - TISSUE EXAM (CONT.) ; 16 JULY 1990 1:30 PM

Source Information

Source file <SROTRPT0.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Surgery 2 ^SROSTOP  $$SITE^SROVAR  
VA Fileman 2 D^DIQ  ^DIWP  
Registration 1 DEM^VADPT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROTRPT  

Entry Points

Name Comments DBIA/ICR reference
OTHER ; other operations
HDR ; print heading
LOOP ; break procedure if greater than 70 characters
OPS

External References

Name Field # of Occurrence
D^DIQ SROTRPT0+6
^DIWP OPS+5, OPS+12
^SROSTOP HDR+1
$$SITE^SROVAR SROTRPT0+2
DEM^VADPT SROTRPT0+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "SURGERY CASE # "_SRTN,!
  • Line Location: OPS+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OPS+2
Function Call: WRITE
  • Prompt: !,?3,SRSPEC
  • Line Location: OPS+3
Function Call: WRITE
  • Prompt: !
  • Line Location: OPS+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OPS+4
Function Call: WRITE
  • Prompt: !
  • Line Location: OPS+6
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OPS+6
Function Call: WRITE
  • Prompt: !,"Operative Procedure(s):",!,?3,SROP(1)
  • Line Location: OPS+8
Function Call: WRITE
  • Prompt: !,?3,SROP(2)
  • Line Location: OPS+8
Function Call: WRITE
  • Prompt: !,?3,SROP(2)
  • Line Location: OPS+8
Function Call: WRITE
  • Prompt: !,?3,SROP(2)
  • Line Location: OPS+8
Function Call: WRITE
  • Prompt: !
  • Line Location: OPS+9
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OPS+9
Function Call: WRITE
  • Prompt: !,"Preoperative Diagnosis: ",!,?3,SRPRE,!
  • Line Location: OPS+11
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OPS+11
Function Call: WRITE
  • Prompt: !
  • Line Location: OPS+13
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OPS+13
Function Call: WRITE
  • Prompt: !,"Postoperative Diagnosis:",?50,"Signature and Title",!,?3,SRPOST,?50,SRSURG,!
  • Line Location: OPS+14
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OPS+14
Function Call: WRITE
  • Prompt: !,"Attending "_$S(SRNONOR:"Provider",1:"Surgeon")_": ",SRATT,!
  • Line Location: OPS+15
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OPS+15
Function Call: WRITE
  • Prompt: !,?30,"PATHOLOGY REPORT",!
  • Line Location: OPS+17
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OPS+17
Function Call: WRITE
  • Prompt: !,"Name of Laboratory",?50,"Accession Number(s)",!!
  • Line Location: OPS+18
Function Call: WRITE
  • Prompt: "-"
  • Line Location: OPS+18
Function Call: WRITE
  • Prompt: !,"Gross Description, Histologic Examination and Diagnosis"
  • Line Location: OPS+20
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?5,"MEDICAL RECORD |",?43,"TISSUE EXAMINATION",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] SROTRPT0+2
^DPT - [#2] SROTRPT0+5
^SC - [#44] SROTRPT0+7
^SRF - [#130] SROTRPT0+2, SROTRPT0+3, SROTRPT0+8, SROTRPT0+9, SROTRPT0+10, SROTRPT0+11, OPS, OPS+3, OPS+5, OPS+12
, OPS+15, OTHER+1, OTHER+2
^SRS - [#131.7] SROTRPT0+7
^UTILITY($J OPS+5!, OPS+12!
^VA(200 - [#200] SROTRPT0+11, OPS+15

Label References

Name Line Occurrences
HDR OPS+2, OPS+7, OPS+10, OPS+16, OPS+19
LOOP OPS+1
OTHER OPS

Naked Globals

Name Field # of Occurrence
^( SROTRPT0+5
^(33 SROTRPT0+8
^(34 SROTRPT0+8
^(8 SROTRPT0+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN SROTRPT0+3*, SROTRPT0+5
>> DIWF OPS+5*, OPS+12*
>> DIWL OPS+5*, OPS+12*
>> DIWR OPS+5*, OPS+12*
DTIME HDR+2
>> I OPS*, OPS+3*, OPS+5*, OPS+12*
IO SROTRPT0+2
IOF HDR+3
IOSL OPS+7, OPS+10, OPS+16, OPS+19
IOST HDR+2
>> LINE OPS+2*, OPS+4*, OPS+6*, OPS+9*, OPS+11*, OPS+13*, OPS+14*, OPS+15*, OPS+17*, OPS+18*
, HDR+3*, HDR+4*
>> LOOP LOOP+1*
>> M OPS+1*, LOOP+1
MM OPS+1!, LOOP+1*
MMM OPS+1!, LOOP+1*
>> OPER OPS*, OTHER+1*, OTHER+2
>> SR(0 SROTRPT0+3*
SRAPROV SROTRPT0+10*, OPS+15!
>> SRATT OPS+15*
>> SRDATE SROTRPT0+3*, SROTRPT0+6*, OPS+2
>> SRFIND OPS+12*
>> SRH OPS+5*
>> SRHALT HDR+1
>> SRHDR SROTRPT0+2*, SROTRPT0+3*, HDR+2, HDR+3*
>> SRINST SROTRPT0+2*
>> SRLONG OTHER+1*, OTHER+2
>> SRNON SROTRPT0+9*, SROTRPT0+10
SRNONOR SROTRPT0+9*, SROTRPT0+10*, SROTRPT0+11, OPS+15!
>> SROOM SROTRPT0+5*
SROP OPS+1!
SROP( LOOP+1*
SROP(1 OPS+1*, OPS+8
SROP(2 OPS+8
SROP(3 OPS+8
SROP(4 OPS+8
>> SROPER OPS*, OPS+1*, OTHER+1, OTHER+3*, LOOP+1*
>> SROPERS OTHER+1*, OTHER+2*, OTHER+3
>> SROR SROTRPT0+3*, SROTRPT0+7*, OPS+2
>> SRPOST SROTRPT0+8*, SROTRPT0+10*, OPS+14
>> SRPRE SROTRPT0+8*, SROTRPT0+10*, OPS+11
>> SRPROV SROTRPT0+10*, SROTRPT0+11
>> SRSOUT OPS+7, OPS+10, OPS+16, OPS+19, HDR+1*, HDR+2*
>> SRSPEC OPS+3*
>> SRSURG SROTRPT0+11*, OPS+14
>> SRTN SROTRPT0+2, SROTRPT0+3, SROTRPT0+8, SROTRPT0+9, SROTRPT0+10, SROTRPT0+11, OPS, OPS+2, OPS+3, OPS+5
, OPS+12, OPS+15, OTHER+1, OTHER+2
>> SRWARD SROTRPT0+5*
>> X SROTRPT0+2*, OPS+3*, OPS+5*, OPS+12*, HDR+2*
>> Y SROTRPT0+6*
>> ZTQUEUED HDR+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All