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

Package: Surgery

Routine: SROAT2T


Information

SROAT2T ;B'HAM ISC/MAM - ATTENDING SURGEON CUMULATIVE ; [ 05/11/04 2:33 PM ]

Source Information

Source file <SROAT2T.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA FileMan 1 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 SROATT2  

Entry Points

Name Comments DBIA/ICR reference
PRINT
HDR ; print heading
BREAK
SPEC ; SPECIALTIES

External References

Name Field # of Occurrence
Y^DIQ PRINT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?1,"TOTAL CASES",?16,"ATTENDING CODE",!,?1,"-----------",?16,"--------------"
  • Line Location: SROAT2T+3
Function Call: WRITE
  • Prompt: !!,?1,$J(^TMP("SRTOT",$J),6),?16,"TOTAL CASES FROM "_$E(SRSD,4,5)_"/"_$E(SRSD,6,7)_"/"_$E(SRSD,2,3)_" TO "_$E(SRED,4,5)_"/"_$E(SRED,6,7)_"/"_$E(SRED,2,3)
  • Line Location: SROAT2T+5
Function Call: WRITE
  • Prompt: !,?1,$J($S(PRINT=1:^TMP("SRTC",$J,CODE),1:^TMP("SRTOT",$J,SRSS,CODE)),6),?16,SRCODE
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?(80-$L(SRINST)\2),SRINST,?76,"PAGE",!,?32,"SURGICAL SERVICE",?78,SRPAGE,!,?22,"ATTENDING SURGEON CUMULATIVE REPORT"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(80-$L(SRFRTO)\2),SRFRTO
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?30,"DATE PRINTED: ",SRPRINT,!!,?8,"REVIEWED BY: ",?53,"DATE REVIEWED: "
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+5
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: BREAK+0
Function Call: WRITE
  • Prompt: !!,"Enter RETURN if you want to display the totals for each specialty, or '^' to",!,"exit from this report."
  • Line Location: BREAK+1
Function Call: WRITE
  • Prompt: !!,?(80-$L(SRSSN)\2),SRSSN,!!,?1,"TOTAL CASES",?16,"ATTENDING/RES SUP CODE",!,?1,"-----------",?16,"--------------"
  • Line Location: SPEC+3
Function Call: WRITE
  • Prompt: !!,?1,$J(^TMP("SRTOT",$J,SRSS),6),?16,"TOTAL CASES FOR THIS SPECIALTY"
  • Line Location: SPEC+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(130 PRINT+1
^TMP("SRTC" SROAT2T+4, PRINT+2
^TMP("SRTOT" SROAT2T+5, SROAT2T+7, PRINT+2, SPEC+1, SPEC+4, SPEC+5

Label References

Name Line Occurrences
BREAK SROAT2T+6, BREAK+1, SPEC+6
HDR SROAT2T+3, SPEC+3
PRINT SROAT2T+4, SPEC+4
SPEC SROAT2T+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C PRINT+1*
>> CODE SROAT2T+4*, PRINT, PRINT+1, PRINT+2, SPEC+4*
DTIME BREAK
>> HDR SROAT2T+4*
>> I SROAT2T+4*
IOF HDR+1
IOST SROAT2T+6, HDR+4, SPEC+6
>> LINE HDR+5*
>> PRINT SROAT2T+4*, SROAT2T+7*, PRINT+2
>> SRCODE PRINT*, PRINT+1*, PRINT+2
>> SRED SROAT2T+5
>> SRFRTO HDR+3
>> SRINST HDR+2
>> SRPAGE SROAT2T+2*, HDR+2, HDR+5*
>> SRPRINT HDR+4
>> SRSD SROAT2T+5
>> SRSOUT SROAT2T+3, SROAT2T+6, SROAT2T+7, BREAK*, SPEC+6
>> SRSS SROAT2T+7*, PRINT+2, SPEC+1, SPEC+2, SPEC+4, SPEC+5
>> SRSSN SPEC+2*, SPEC+3
>> TOTAL SPEC+1*
>> X BREAK*, BREAK+1
>> Y PRINT+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All