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

Package: Surgery

Routine: SRODLA2


Information

SRODLA2 ;B'HAM ISC/MAM - DELAYS, ALL SPECIALTIES ; [ 04/04/00 11:22 AM ]

Source Information

Source file <SRODLA2.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Surgery 2 (HDR,PAGE)^SRODLAY  $$MANDIV^SROUTL0  
Registration 1 DEM^VADPT  

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 SRODLAY  

Entry Points

Name Comments DBIA/ICR reference
MORE
PRINT ; print case information
OPS
UTIL
SETUT
SP ; get specialty name
CAUSE
OTHER ; other operations
LOOP ; break procedure if greater than 38 characters
COMX
COM

External References

Name Field # of Occurrence
HDR^SRODLAY SRODLA2+6
PAGE^SRODLAY SRODLA2+5, PRINT+1, CAUSE
$$MANDIV^SROUTL0 SRODLA2+4
DEM^VADPT PRINT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No data for selected date range."
  • Line Location: SRODLA2+6
Function Call: WRITE
  • Prompt: !!,$E(SRSDATE,4,5)_"/"_$E(SRSDATE,6,7)_"/"_$E(SRSDATE,2,3),?12,SRNM,?44,SRATT
  • Line Location: OPS+3
Function Call: WRITE
  • Prompt: ?84,SRCOM(1)
  • Condition for execution: $D(SRCOM(1))
  • Line Location: OPS+3
Function Call: WRITE
  • Prompt: !,SRDEL_" MINS.",?14,VA("PID"),?44,SROP(1)
  • Line Location: OPS+4
Function Call: WRITE
  • Prompt: ?84,SRCOM(2)
  • Line Location: OPS+4
Function Call: WRITE
  • Prompt: !
  • Line Location: OPS+5
Function Call: WRITE
  • Prompt: ?44,SROP(J)
  • Condition for execution: $D(SROP(J))
  • Line Location: OPS+5
Function Call: WRITE
  • Prompt: ?84,SRCOM(J+1)
  • Condition for execution: $D(SRCOM(J+1))
  • Line Location: OPS+5
Function Call: WRITE
  • Prompt: !!,?SRCOL,SRCAUS,!,?SRCOL,SRUL
  • Line Location: CAUSE+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] SRODLA2+4, PRINT+2, PRINT+3, OPSOPS+2, UTILUTIL+1, UTIL+2, OTHER+1, OTHER+2
COMXCOM
^SRF("AC" SRODLA2+4
^SRO(132.4 - [#132.4] CAUSE+1
^SRO(137.45 - [#137.45] UTIL+1
^TMP("SR" SRODLA2+2!*, SRODLA2+6, SETUT+2*, SETUT+3*
^TMP("SRF" SRODLA2+2!, SRODLA2+5, MORE+1, SETUT+5*
^TMP("SRT" SRODLA2+2!, SETUT*, SETUT+1*, SETUT+4*
^VA(200 - [#200] PRINT+3

Label References

Name Line Occurrences
CAUSE MOREPRINT+1
COM OPS+2
LOOP OPS+1
MORE SRODLA2+5
OTHER OPS
PRINT MORE+1
SETUT UTIL+2
SP SRODLA2+5
UTIL SRODLA2+4

Naked Globals

Name Field # of Occurrence
^( MORE+1
^(0 UTIL+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CAUSE SRODLA2+5*, MORE+1, UTIL+2*, SETUT+1, SETUT+2, SETUT+3, SETUT+4, SETUT+5, CAUSE+1
>> DFN PRINT+2*
DT SRODLA2+3
>> I COMX+2*, COM+7*
IOSL PRINT+1, CAUSE
>> J OPS+5*
>> K COM+3*, COM+4
>> L COMX+1*, COM+1*
>> LINE CAUSE+1*
>> LOOP LOOP+1*
>> M OPS+1*, LOOP+1, COMX+1*, COMX+2, COM+1*, COM+3, COM+4*, COM+5, COM+6, COM+7
MM OPS+1!, LOOP+1*, COMX+1*, COM+1*, COM+2, COM+3*, COM+5, COM+6
MMM OPS+1!, LOOP+1*, COM+3*
>> OPER OPS*, OTHER+1*, OTHER+2
>> PAGE SRODLA2+2*
>> SPEC SP+1*
>> SRATT PRINT+3*, OPS+3
>> SRCAUS CAUSE+1*, CAUSE+2
>> SRCNT OPS+2*, COMX*, COMX+2*, COM*, COM+7*
>> SRCOL CAUSE+1*, CAUSE+2
SRCOM OPS+2!
SRCOM( OPS+5, COMX*, COMX+2*, COM*, COM+7*
SRCOM(1 OPS+3
SRCOM(2 OPS+4
>> SRD MORE+1*, PRINT+3
>> SRDC PRINT+3*, OPS+2, UTIL+2*, SETUT+5, COMXCOM
>> SRDEL PRINT+3*, OPS+4, UTIL+2*, SETUT+5
>> SRED SRODLA2+3
>> SREDT SRODLA2+3*, SRODLA2+4
>> SRHDR SRODLA2+2*
>> SRINSTP SRODLA2+4
>> SRL OPS+2*, COMXCOM
>> SRLONG OTHER+1*, OTHER+2
>> SRNM PRINT+2*, OPS+3
SROP OPS+1!
SROP( OPS+5, LOOP+1*
SROP(1 OPS+1*, OPS+4
>> SROPER OPS*, OPS+1*, OTHER+1, OTHER+3*, LOOP+1*
>> SROPERS OTHER+1*, OTHER+2*, OTHER+3
>> SRPRINT SRODLA2+3*
>> SRQ COM+1, COM+2*, COM+3*, COM+5*
>> SRSD SRODLA2+3
>> SRSDATE SRODLA2+3*, SRODLA2+4*, MORE*, MORE+1*, OPS+3, SETUT+5
>> SRSOUT SRODLA2+2*, SRODLA2+5, MORE+1, PRINT+1, CAUSE
>> SRSS SRODLA2+5*, MORE+1, UTIL+1*, SETUTSETUT+1, SETUT+4, SETUT+5, SP+1
>> SRTN SRODLA2+4*, MORE+1*, PRINT+2, PRINT+3, OPSOPS+2, UTILUTIL+1, UTIL+2, SETUT+5
OTHER+1, OTHER+2, COMXCOM
>> SRUL CAUSE+1*, CAUSE+2
SRX OPS+2!, COMX*, COMX+1*, COM*, COM+1*, COM+2*, COM+6*
SRX( COMX+1*, COMX+2, COM+1*, COM+3*, COM+5, COM+6*, COM+7
>> SRZ COMX+1*, COM+1*, COM+2, COM+6
>> VA("PID" OPS+4
>> VADM(1 PRINT+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All