Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: SRTPRK2

Package: Surgery

Routine: SRTPRK2


Information

SRTPRK2 ;BIR/SJA - PRINT KIDNEY-OUTCOME/DONOR INFORMATION ;04/21/08

Source Information

Source file <SRTPRK2.m>

Entry Points

Name Comments DBIA/ICR reference
DONOR ; print donor information

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $E(IOST)="P"
  • Line Location: SRTPRK2+5
Function Call: WRITE
  • Prompt: !,?28,"OUTCOME INFORMATION",!
  • Line Location: SRTPRK2+5
Function Call: WRITE
  • Prompt: !,"Bleeding/Transfusions:",?30,$P(SRAO(1),"^"),?45,"Superficial Incisional SSI:",?76,$P(SRAO(8),"^")
  • Line Location: SRTPRK2+9
Function Call: WRITE
  • Prompt: !,"Pneumonia:",?30,$P(SRAO(2),"^"),?45,"Deep Incisional SSI:",?76,$P(SRAO(9),"^")
  • Line Location: SRTPRK2+10
Function Call: WRITE
  • Prompt: !,"On Ventilator >48 hours:",?30,$P(SRAO(3),"^"),?45,"Systemic Sepsis:",?76,$P(SRAO(10),"^")
  • Line Location: SRTPRK2+11
Function Call: WRITE
  • Prompt: !,"Cardiac Arrest Requiring CPR:",?30,$E($P(SRAO(4),"^"),1,13),?45,"Return to Surgery w/i 30 Days:",?76,$P(SRAO(11),"^")
  • Line Location: SRTPRK2+12
Function Call: WRITE
  • Prompt: !,"Myocardial Infarction:",?30,$P(SRAO(5),"^"),?45,"Operative Death:",?76,$P(SRAO(12),"^")
  • Line Location: SRTPRK2+13
Function Call: WRITE
  • Prompt: !,"Stroke/CVA:",?30,$P(SRAO(6),"^"),?45,"Graft Failure Date:",?66,$P(SRAO(13),"^")
  • Line Location: SRTPRK2+14
Function Call: WRITE
  • Prompt: !,"Coma >= 24 hr:",?30,$P(SRAO(7),"^")
  • Line Location: SRTPRK2+15
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $E(IOST)="P"
  • Line Location: DONOR+2
Function Call: WRITE
  • Prompt: !,?28,"DONOR INFORMATION",!
  • Line Location: DONOR+2
Function Call: WRITE
  • Prompt: !,"Donor Gender:",?17,$P(SRAO(2),"^")
  • Line Location: DONOR+13
Function Call: WRITE
  • Prompt: !,"Donor Height:",?17,$P(SRAO(3),"^")
  • Line Location: DONOR+14
Function Call: WRITE
  • Prompt: !,"Donor Weight:",?17,$P(SRAO(4),"^")
  • Line Location: DONOR+15
Function Call: WRITE
  • Prompt: !,"Donor DOB:",?17,$P(SRAO(5),"^"),?45,"Donor HLA-A: ",$P(SRAO(13),"^")
  • Line Location: DONOR+16
Function Call: WRITE
  • Prompt: !,"Donor Age:",?17,$P(SRAO(6),"^"),?45,"Donor HLA-B: ",$P(SRAO(14),"^")
  • Line Location: DONOR+17
Function Call: WRITE
  • Prompt: !,"ABO Blood Type:",?17,$P(SRAO(7),"^"),?45,"Donor HLA-C: ",$P(SRAO(15),"^")
  • Line Location: DONOR+18
Function Call: WRITE
  • Prompt: !,"Donor CMV:",?17,$P(SRAO(8),"^"),?45,"Donor HLA-DR: ",$P(SRAO(16),"^")
  • Line Location: DONOR+19
Function Call: WRITE
  • Prompt: !,"Substance Abuse:",?17,$P(SRAO(9),"^"),?45,"Donor HLA-BW: ",$P(SRAO(17),"^")
  • Line Location: DONOR+20
Function Call: WRITE
  • Prompt: !,"Deceased Donor:",?17,$P($P(SRAO(10),"^"),"("),?45,"Donor HLA-DQ: ",$P(SRAO(18),"^")
  • Line Location: DONOR+21
Function Call: WRITE
  • Prompt: !,"Living Donor:",?17,$P(SRAO(11),"^")
  • Line Location: DONOR+22
Function Call: WRITE
  • Prompt: !,"With Malignancy:",?17,$P(SRAO(12),"^")
  • Line Location: DONOR+23

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SRT - [#139.5] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call