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

Package: Surgery

Routine: SRTPLST


Information

SRTPLST ;BIR/SJA - LIST ASSESSMENTS ;04/11/08

Source Information

Source file <SRTPLST.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Registration 1 DEM^VADPT  
Surgery 1 ^SRTPLSTP  
VA FileMan 1 D^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 SRTPLS  

Entry Points

Name Comments DBIA/ICR reference
PRT ; print assessments
PAGE
HDR ; print heading
MANDIV(SRINST,CASE) ;a boolean divisional call for managerial reports

External References

Name Field # of Occurrence
D^DIQ PRT+7
^SRTPLSTP SRTPLST+2
DEM^VADPT PRT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,SRVACO,?16,SRANM_" ("_VA("PID")_")",?51,SRDT,?68,$S(Y="T":"TRANSMITTED",Y="C":"COMPLETE",Y="I":"INCOMPLETE",1:""),!,$S($P(SRA(0),"^",3):$P(SRA(0),"^",3),1:"N/A")
  • Line Location: PRT+9
Function Call: WRITE
  • Prompt: ?16,$S(Y="LI":"LIVER",Y="LU":"LUNG",Y="K":"KIDNEY",Y="H":"HEART",1:"")
  • Line Location: PRT+10
Function Call: WRITE
  • Prompt: !,LINE1
  • Line Location: PRT+11
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PAGE+0
Function Call: WRITE
  • Prompt: !!,"If you want to continue listing incomplete assessments, enter <RET>. Enter",!,"'^' to return to the menu."
  • Line Location: PAGE+1
Function Call: WRITE
  • Prompt: @IOF,!!,?(80-$L(X)\2),X
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(80-$L(SRFRTO)\2),SRFRTO
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,"VACO ID",?16,"PATIENT",?51,"TRANSPLANT DATE",?68,"STATUS",!,"SURGERY CASE #",?16,"ORGAN TYPE"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: HDR+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRO(133 - [#133] MANDIV+2
^SRT - [#139.5] SRTPLST+4, SRTPLST+5, PRT+1, PRT+2, PRT+4, MANDIV+1, MANDIV+6
^SRT("AC" SRTPLST+4

Label References

Name Line Occurrences
$$MANDIV SRTPLST+5
HDR SRTPLST+3
PAGE PRT+3, PAGE+1
PRT SRTPLST+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CASE MANDIV~, MANDIV+1, MANDIV+6
>> DFN PRT+4*
DTIME PAGE
I PRT+5~
IOF HDR+2
IOSL PRT+3
IOST SRTPLST+2
>> LINE SRTPLST+3*, HDR+1*, HDR+5
>> LINE1 SRTPLST+3*, PRT+11
>> SR("RA" SRTPLST+4*, SRTPLST+5, PRT+4*, PRT+8, PRT+10
>> SRA(0 PRT+4*, PRT+7, PRT+9
>> SRANM PRT+5*, PRT+6*, PRT+9
>> SRASSN PRT+5*
>> SRAST SRTPLST+5
SRDIV MANDIV+5~, MANDIV+6*, MANDIV+7
>> SRDT PRT+7*, PRT+9
>> SRED SRTPLST+4
>> SRFRTO HDR+3
SRINST MANDIV~, MANDIV+3, MANDIV+4, MANDIV+7
>> SRINSTP SRTPLST+5
SROR MANDIV+5~
>> SRSD SRTPLST+4*
>> SRSOUT SRTPLST+3*, SRTPLST+4, PRT+3, PAGE*
>> SRTPP SRTPLST+4*, SRTPLST+5, PRT+1, PRT+2, PRT+4
>> SRTYPE PRT+2
>> SRVACO PRT+4*, PRT+9
U MANDIV+6
>> VA("PID" PRT+5, PRT+9
VADM PRT+5!
VADM(1 PRT+5
>> X PAGE*, PAGE+1, HDR+1*, HDR+2
>> Y PRT+7*, PRT+8*, PRT+9, PRT+10*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All