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

Package: Surgery

Routine: SRTPCOM


Information

SRTPCOM ;BIR/SJA - COMPLETE/TRANSMIT/PRINT ASSESSMENT ;09/12/08

Source Information

Source file <SRTPCOM.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Surgery 5 ^SRSKILL  ^SRTPPAS  ^SRTPRACE  ^SRTPSS  CHK^SRTPUTLC  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 2 ^DIE  ^DIR  

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

Package Total Caller Graph
Surgery 8 SRTP PRINT ASSESSMENT  SRTPHRT3  SRTPHRT5  SRTPKID6  SRTPLIV7  SRTPLUN5  SRTPTRAN  SRTPUTL  

Entry Points

Name Comments DBIA/ICR reference
COMPLT
PRINT ; called by the Print Transplant Assessment option
ED
LIST
PRT
EN
END
TX ; transplant assessment transmissions
JOB
RET
PAGE

External References

Name Field # of Occurrence
^%ZIS COMPLT+6, PRINT+2
^%ZISC ED, END+1, END+2
^%ZTLOAD COMPLT+7, PRINT+3, TX+1
^DIE COMPLT, PRT+2
^DIR SRTPCOM+6, SRTPCOM+12, COMPLT+4, RET
^SRSKILL ED, END+2, TX+3
^SRTPPAS EN
^SRTPRACE PRT+1
^SRTPSS PRINT+1
CHK^SRTPUTLC SRTPCOM+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This assessment has a "_$S(Y="C":"'COMPLETE'",1:"'TRANSMITTED'")_" status.",!!,"No action taken."
  • Line Location: SRTPCOM+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SRTPCOM+5
Function Call: WRITE
  • Prompt: !!,"No action taken."
  • Line Location: SRTPCOM+7
Function Call: WRITE
  • Prompt: !
  • Line Location: SRTPCOM+11
Function Call: WRITE
  • Prompt: !!,"No action taken."
  • Line Location: SRTPCOM+13
Function Call: WRITE
  • Prompt: !,"Assessment completed and queued to transmit..."
  • Line Location: COMPLT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: COMPLT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ED+0
Function Call: WRITE
  • Prompt: @IOF,!,"This assessment is missing the following items:",!
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: !,?5,$J(SRCNT,2)_". Hypertension"
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !!,"Queued as task #"_ZTSK
  • Line Location: TX+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TX+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: RET+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RET+0
Function Call: WRITE
  • Prompt: @IOF,!!!
  • Line Location: PAGE+1
Routine Call
  • %ZIS
  • Line Location:
    • COMPLT+6
    • PRINT+2
Routine Call
  • DIE
  • Line Location:
    • COMPLT
    • PRT+2
Routine Call
  • DIR
  • Line Location:
    • SRTPCOM+6
    • SRTPCOM+12
    • COMPLT+4
    • RET

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRT - [#139.5] SRTPCOM+3

Label References

Name Line Occurrences
@( JOB
COMPLT SRTPCOM+10
ED PRINT+2, PRINT+3
EN COMPLT+8, PRINT+4
END SRTPCOM+4, SRTPCOM+6, SRTPCOM+7, SRTPCOM+12, SRTPCOM+13, COMPLT+7, COMPLT+8, PRINT+1
LIST SRTPCOM+9
RET LIST+1, END, TX+3, PAGE
TX COMPLT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS COMPLT+6!*, PRINT+2!*
%ZIS("A" COMPLT+6*, PRINT+2*
>> DA COMPLT*, PRT+2*
DIE COMPLT!*, PRT+2!*
DIR SRTPCOM+5!, SRTPCOM+6!, SRTPCOM+11!, SRTPCOM+12!, COMPLT+2!, COMPLT+4!, RET!
DIR("?" SRTPCOM+6*, SRTPCOM+12*, COMPLT+3*
DIR("A" SRTPCOM+5*, SRTPCOM+11*, COMPLT+2*
DIR("B" SRTPCOM+5*, SRTPCOM+11*, COMPLT+2*
DIR(0 SRTPCOM+5*, SRTPCOM+11*, COMPLT+2*, RET*
DR COMPLT!*, PRT+2!*
>> DTOUT SRTPCOM+6, SRTPCOM+12, COMPLT+4, RET
>> DUOUT SRTPCOM+6, SRTPCOM+12, COMPLT+4, RET
IO EN
IO("Q" COMPLT+6!, COMPLT+7!, PRINT+2!, PRINT+3!
IOF ED, LIST, END+1, END+2, TX+3, RET, PAGE+1
IOSL LIST+1
IOST END, END+1, PAGE
POP COMPLT+6!, PRINT+2!
>> SRA SRTPCOM+3*
>> SRABATCH EN*
>> SRCNT LIST*, LIST+2*, LIST+3*, PRT*
>> SRFLD SRTPCOM+5*, SRTPCOM+9*, SRTPCOM+10*
>> SRMD PRT*, PRT+1, PRT+2
>> SRMDD PRT*
>> SRNOVA SRTPCOM+3*
>> SRODD PRT*
>> SROVER SRTPCOM+3*
>> SRPRINT PRINT+1*
SRRTN TX+1*, TX+3!, JOB
>> SRSFLG SRTPCOM+3*, PRT, PRT+2*
>> SRSOUT SRTPCOM+2*, SRTPCOM+3*, SRTPCOM+6*, SRTPCOM+12*, COMPLT+4*, COMPLT+5*, COMPLT+6*, COMPLT+7*, PRINT+1*, PRINT+2*
, PRINT+3*, LIST+1, LIST+4*, PRT*, PRT+3*, EN*, END, RET*
SRTPP SRTPCOM+2, SRTPCOM+3, COMPLT, PRINT+1, ED!, PRT+2, END+2!
>> SRTYPE SRTPCOM+3*, LIST+2
>> SRVA LIST+2
>> SRX( SRTPCOM+9, SRTPCOM+10, LIST+1, LIST+2, LIST+3, PRT
>> SRZ LIST*, LIST+1*, LIST+2, LIST+3
>> SRZ1 LIST+1*, LIST+2, LIST+3
STATUS COMPLT!
>> Y SRTPCOM+3*, SRTPCOM+4, SRTPCOM+7, SRTPCOM+13, COMPLT+5, PRT+2
>> ZTDESC COMPLT+7*, PRINT+3*, TX+1*
>> ZTDTH TX+1*
>> ZTIO TX+1*
>> ZTREQ JOB*
>> ZTRTN COMPLT+7*, PRINT+3*, TX+1*
>> ZTSAVE("SRRTN" TX+1*
>> ZTSAVE("SRSITE*" COMPLT+7*, PRINT+3*
>> ZTSAVE("SRTPP" COMPLT+7*, PRINT+3*, TX+1*
>> ZTSK TX+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All