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

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
EN
END
TX ; transplant assessment transmissions
ED
LIST
RET
PRT
JOB
COMPLT
PRINT
PAGE

External References

Name Field # of Occurrence
^%ZIS COMPLT+6, PRINT+1
^%ZISC ED, END+1, END+2
^%ZTLOAD COMPLT+7, PRINT+2, 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
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+1
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
  • DIE
  • Line Location:
    • COMPLT
    • PRT+2
Routine Call
  • DIR
  • Line Location:
    • SRTPCOM+6
    • SRTPCOM+12
    • COMPLT+4
    • RET
Routine Call
  • %ZIS
  • Line Location:
    • COMPLT+6
    • PRINT+1

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+1, PRINT+2
EN COMPLT+8, PRINT+3
END SRTPCOM+4, SRTPCOM+6, SRTPCOM+7, SRTPCOM+12, SRTPCOM+13, COMPLT+7, COMPLT+8, PRINT
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+1!*
%ZIS("A" COMPLT+6*, PRINT+1*
>> 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+1!, PRINT+2!
IOF ED, LIST, END+1, END+2, TX+3, RET, PAGE+1
IOSL LIST+1
IOST END, END+1, PAGE
POP COMPLT+6!, PRINT+1!
>> 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*
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*, PRINT+1*
, PRINT+2*, LIST+1, LIST+4*, PRT*, PRT+3*, END, RET*
SRTPP SRTPCOM+2, SRTPCOM+3, COMPLT, PRINT, 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+2*, TX+1*
>> ZTDTH TX+1*
>> ZTIO TX+1*
>> ZTREQ JOB*
>> ZTRTN COMPLT+7*, PRINT+2*, TX+1*
>> ZTSAVE("SRRTN" TX+1*
>> ZTSAVE("SRSITE*" COMPLT+7*, PRINT+2*
>> ZTSAVE("SRTPP" COMPLT+7*, PRINT+2*, 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