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

Package: Surgery

Routine: SRTPTRAN


Information

SRTPTRAN ;BIR/SJA - TRANSPLANT DATA ENTRY ;02/27/08

Source Information

Source file <SRTPTRAN.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Surgery 5 ^SRSKILL  DISP^SRTPASS  ^SRTPCOM  (,HDR)^SRTPSS  (,DEL)^SRTPVAN  
VA FileMan 2 ^DIE  ^DIR  
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 SR TRANSPLANT ENTER/EDIT  

Entry Points

Name Comments DBIA/ICR reference
ENTER ; edit, delete, complete, or change indicator
END
HELP ;
TRANS

External References

Name Field # of Occurrence
^DIE TRANS+3
^DIR TRANS+1
^SRSKILL END
DISP^SRTPASS ENTER+4
^SRTPCOM ENTER+10
^SRTPSS SRTPTRAN+3
HDR^SRTPSS ENTER+3
^SRTPVAN ENTER+11
DEL^SRTPVAN ENTER+9
DEM^VADPT ENTER+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,?1,SRANM,!!
  • Line Location: ENTER+4
Function Call: WRITE
  • Prompt: !!,"1. Enter Transplant Assessment Information",!,"2. Delete Transplant Assessment Entry",!,"3. Update Transplant Assessment Status to 'COMPLETE'"
  • Line Location: ENTER+5
Function Call: WRITE
  • Prompt: !,"4. Change VA/Non-VA Transplant Indicator"
  • Line Location: ENTER+6
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ENTER+7
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ENTER+9
Function Call: WRITE
  • Prompt: !!,"Press <RET> to continue "
  • Line Location: ENTER+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ENTER+9
Function Call: WRITE
  • Prompt: !!,"Enter <RET> or '1' to enter or edit information related to this ",!,"Assessment entry. If you want to delete the Assessment, enter '2'."
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"Enter '3' to update the status of this Assessment to 'COMPLETE'.",!,"Enter '4' to change the Assessment type from VA to Non-VA or vice versa"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !!,"Press <RET> to continue "
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !!,"This assessment has a status of "_$S($P(SR("RA"),"^")="T":"TRANSMITTED.",1:"COMPLETED."),!
  • Line Location: TRANS+0
Function Call: WRITE
  • Prompt: !!,"The Assessment Status has been changed to 'INCOMPLETE'."
  • Line Location: TRANS+4
Routine Call
  • DIE
  • Line Location:
    • TRANS+3
Routine Call
  • DIR
  • Line Location:
    • TRANS+1

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
@( ENTER+12
END ENTER+2, ENTER+7, ENTER+9, ENTER+10, ENTER+11
ENTER ENTER+8
HELP ENTER+8
TRANS ENTER+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA TRANS+3!*
>> DFN ENTER+3*
DIE TRANS+3!*
DIR TRANS+1!
DIR("A" TRANS+1*
DIR("B" TRANS+1*
DIR(0 TRANS+1*
DR TRANS+3!*
DTIME ENTER+7, ENTER+9, HELP+3
>> DTOUT TRANS+1
>> DUOUT TRANS+1
IOF ENTER+4, ENTER+9, END
SR SRTPTRAN+2~
SR("RA" SRTPTRAN+4*, ENTER+2, TRANS
>> SRANM ENTER+3*, ENTER+4
SRASS ENTER+2!, ENTER+4*, ENTER+7!
>> SRNEW ENTER+1
SRNOVA SRTPTRAN+2~, SRTPTRAN+4*
>> SRPRINT ENTER+1
>> SRSDATE ENTER+4*
>> SRSOUT SRTPTRAN+3, ENTER+2*, ENTER+7*, END*, TRANS+1*
SRTN ENTER+7!, ENTER+9!
SRTPP SRTPTRAN+2!, SRTPTRAN+3, SRTPTRAN+4, ENTER+2!, ENTER+3, ENTER+4, ENTER+9!, END!, TRANS+3
>> SRTTYPE SRTPTRAN+4*, ENTER+12
SRVA SRTPTRAN+2~, SRTPTRAN+4*
>> SRYN ENTER+2, TRANS+1*, TRANS+2*
>> VA("PID" ENTER+3
>> VADM(1 ENTER+3
>> X ENTER+7*, ENTER+8*, ENTER+9*, ENTER+10, ENTER+11, ENTER+12, HELP+3*
>> Y TRANS+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All