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 |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SRTPKID4

Package: Surgery

Routine: SRTPKID4


Information

SRTPKID4 ;BIR/SJA - KIDNEY-OUTCOME INFORMATION ;03/04/08

Source Information

Source file <SRTPKID4.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 ^DIE  EN^DIQ1  ^DIR  
Surgery 2 ^SRTPDONR  HDR^SRTPUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SRTPKID3  

Entry Points

Name Comments DBIA/ICR reference
DISP ; display fields
END
HELP
ONE ; edit one item
START
RANGE ; range of numbers
PRESS
OUTNO ; defualt empty outcome fields to "NO"

External References

Name Field # of Occurrence
^DIE ONE+1, OUTNO+3
EN^DIQ1 DISP+3, OUTNO+4
^DIR PRESS
^SRTPDONR START+2
HDR^SRTPUTL START+6, DISP+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: SRTPKID4+2
Function Call: WRITE
  • Prompt: !!,"A Transplant Assessment must be selected prior to using this option.",!!,"Press <RET> to continue "
  • Line Location: SRTPKID4+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: START+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF,!!!!,"Enter the number or range of numbers you want to edit. Examples of proper",!,"responses are listed below."
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !!,"1. Enter 'A' to update all items.",!!,"2. Enter a number (1-"_SRX_") to update the information in that field. (For example,",!," enter '1' to update Bleeding/Transfusions)"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!,"3. Enter a range of numbers (1-"_SRX_") separated by a ':' to enter a range",!," of items. (For example, enter '1:4' to update items 1, 2, 3 and 4.)",!
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PRESS+0
Function Call: WRITE
  • Prompt: !," 1. Bleeding/Transfusions:",?35,$P(SRAO(1),"^")
  • Line Location: DISP+6
Function Call: WRITE
  • Prompt: !," 2. Pneumonia: ",?35,$P(SRAO(2),"^")
  • Line Location: DISP+7
Function Call: WRITE
  • Prompt: !," 3. On Ventilator >48 hours:",?35,$P(SRAO(3),"^")
  • Line Location: DISP+8
Function Call: WRITE
  • Prompt: !," 4. Cardiac Arrest Requiring CPR:",?35,$P(SRAO(4),"^")
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: !," 5. Myocardial Infarction:",?35,$P(SRAO(5),"^")
  • Line Location: DISP+10
Function Call: WRITE
  • Prompt: !," 6. Stroke/CVA: ",?35,$P(SRAO(6),"^")
  • Line Location: DISP+11
Function Call: WRITE
  • Prompt: !," 7. Coma >= 24 hr:",?35,$P(SRAO(7),"^")
  • Line Location: DISP+12
Function Call: WRITE
  • Prompt: !," 8. Superficial Incisional SSI:",?35,$P(SRAO(8),"^")
  • Line Location: DISP+13
Function Call: WRITE
  • Prompt: !," 9. Deep Incisional SSI:",?35,$P(SRAO(9),"^")
  • Line Location: DISP+14
Function Call: WRITE
  • Prompt: !,"10. Systemic Sepsis:",?35,$P(SRAO(10),"^")
  • Line Location: DISP+15
Function Call: WRITE
  • Prompt: !,"11. Return to Surgery w/i 30 Days:",?35,$P(SRAO(11),"^")
  • Line Location: DISP+16
Function Call: WRITE
  • Prompt: !,"12. Operative Death:",?35,$P(SRAO(12),"^")
  • Line Location: DISP+17
Function Call: WRITE
  • Prompt: !,"13. Graft Failure Date:",?35,$P(SRAO(13),"^")
  • Line Location: DISP+18
Function Call: WRITE
  • Prompt: !!,SRLINE
  • Line Location: DISP+19
Routine Call
  • DIE
  • Line Location:
    • ONE+1
    • OUTNO+3
Routine Call
  • DIR
  • Line Location:
    • PRESS

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SRT - [#139.5] Classic Fileman Calls

Label References

Name Line Occurrences
DISP START
END SRTPKID4+2, START+1, START+2, START+3, START+4
HELP START+3, START+4
ONE START+8, RANGE+1
OUTNO DISP+5
RANGE START+7
START START+3, START+4, START+7, START+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA ONE+1*, DISP+3!*, OUTNO+1!, OUTNO+3*!, OUTNO+4!*
DIC DISP+3!*, OUTNO+4!*
DIE ONE+1!*, OUTNO+1!, OUTNO+3*!
DIQ DISP+3!*, OUTNO+4!*
DIQ(0 DISP+3*, OUTNO+4*
DIR PRESS!
DIR("A" PRESS*
DIR(0 PRESS*
DR ONE+1!*, DISP+2!*, DISP+3*!, OUTNO+1!*, OUTNO+2*, OUTNO+3!, OUTNO+4*!
DTIME SRTPKID4+2, START+1
>> DTOUT PRESS
>> DUOUT PRESS
>> I DISP+4*, OUTNO+5*
>> II OUTNO+2*
IOF END, HELP
SRAO DISP+2!
SRAO( START+3, START+8, ONE+1, DISP+4*, OUTNO+2, OUTNO+5*
SRAO(1 DISP+6
SRAO(10 DISP+15
SRAO(11 DISP+16
SRAO(12 DISP+17
SRAO(13 DISP+18
SRAO(2 DISP+7
SRAO(3 DISP+8
SRAO(4 DISP+9
SRAO(5 DISP+10
SRAO(6 DISP+11
SRAO(7 DISP+12
SRAO(8 DISP+13
SRAO(9 DISP+14
>> SRCURL RANGE+1*
>> SRDR DISP+2*, DISP+3, DISP+4, OUTNO+2, OUTNO+4, OUTNO+5
>> SREMIL START+8*, RANGE+1*, ONE+1
>> SRHPG DISP+1*
>> SRLINE DISP+19
>> SRNOMORE RANGE+1*, ONE+1*
>> SRNOVA DISP+1
>> SRPAGE DISP+1*
>> SRSHEMP RANGE+1*
>> SRSOUT START, START+1*, START+3, START+4, PRESS*
>> SRTPP SRTPKID4+2, ONE+1, DISP+3, DISP+4, OUTNO+3, OUTNO+4, OUTNO+5
SRX START+4, START+5, HELP+1, HELP+2, DISP+3!, DISP+4*, OUTNO+4!, OUTNO+5*
SRY DISP+3!, OUTNO+4!
SRY( DISP+4, OUTNO+5
SRZ DISP+3!, DISP+4*, OUTNO+4!, OUTNO+5*
>> X SRTPKID4+2*, START+1*, START+2, START+3*, START+4, START+5*, START+7, START+8, RANGE+1
>> Y START+4*, ONE+1
>> Z START+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All