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

Package: Surgery

Routine: SRTPRLI2


Information

SRTPRLI2 ;BIR/SJA - PRINT LIVER-RISK ASSESSMENT/OUTCOME INFORMATION ;04/21/08

Source Information

Source file <SRTPRLI2.m>

Entry Points

Name Comments DBIA/ICR reference
RISK
OUTCOME
DONOR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Preop TX Skin Malignancy:",?48,$P(SRAO(1),"^")
  • Line Location: RISK+4
Function Call: WRITE
  • Prompt: !,"Other Pre-TX Malignancy:",?48,$P(SRAO(2),"^")
  • Line Location: RISK+5
Function Call: WRITE
  • Prompt: !,"Ascites:",?48,$P(SRAO(3),"^")
  • Line Location: RISK+6
Function Call: WRITE
  • Prompt: !,"Recipient Substance Abuse:",?48,$P(SRAO(4),"^")
  • Line Location: RISK+7
Function Call: WRITE
  • Prompt: !,"Post TX Prophylaxis - CMV/Anti-Viral Treatment:",?48,$P(SRAO(5),"^")
  • Line Location: RISK+8
Function Call: WRITE
  • Prompt: !,"Post TX Prophylaxis - PCP/Antibiotic Treatment:",?48,$P(SRAO(6),"^")
  • Line Location: RISK+9
Function Call: WRITE
  • Prompt: !,"Hypertension Requiring Meds:",?48,$P(SRAO(7),"^")
  • Line Location: RISK+10
Function Call: WRITE
  • Prompt: !,"Peripheral Vascular Disease:",?48,$P(SRAO(8),"^")
  • Line Location: RISK+11
Function Call: WRITE
  • Prompt: !,"Transfusion >4 RBC Units:",?48,$P(SRAO(9),"^")
  • Line Location: RISK+12
Function Call: WRITE
  • Prompt: !,"Preop Functional Health Status:",?48,$P(SRAO(10),"^")
  • Line Location: RISK+13
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $E(IOST)="P"
  • Line Location: OUTCOME+1
Function Call: WRITE
  • Prompt: !,?28,"OUTCOME INFORMATION",!
  • Line Location: OUTCOME+1
Function Call: WRITE
  • Prompt: !,"Bleeding/Transfusions:",?33,$P(SRAO(1),"^")
  • Line Location: OUTCOME+5
Function Call: WRITE
  • Prompt: !,"Pneumonia:",?33,$P(SRAO(2),"^")
  • Line Location: OUTCOME+6
Function Call: WRITE
  • Prompt: !,"On Ventilator >48 hours:",?33,$P(SRAO(3),"^")
  • Line Location: OUTCOME+7
Function Call: WRITE
  • Prompt: !,"Cardiac Arrest Req. CPR:",?33,$P(SRAO(4),"^")
  • Line Location: OUTCOME+8
Function Call: WRITE
  • Prompt: !,"Myocardial Infarction:",?33,$P(SRAO(5),"^")
  • Line Location: OUTCOME+9
Function Call: WRITE
  • Prompt: !,"Stroke/CVA:",?33,$P(SRAO(6),"^")
  • Line Location: OUTCOME+10
Function Call: WRITE
  • Prompt: !,"Coma >= 24 hr:",?33,$P(SRAO(7),"^")
  • Line Location: OUTCOME+11
Function Call: WRITE
  • Prompt: !,"Superficial Incisional SSI:",?33,$P(SRAO(8),"^")
  • Line Location: OUTCOME+12
Function Call: WRITE
  • Prompt: !,"Deep Incisional SSI:",?33,$P(SRAO(9),"^")
  • Line Location: OUTCOME+13
Function Call: WRITE
  • Prompt: !,"Systemic Sepsis:",?33,$P(SRAO(10),"^")
  • Line Location: OUTCOME+14
Function Call: WRITE
  • Prompt: !,"Return to Surgery < 30 Days:",?33,$P(SRAO(11),"^")
  • Line Location: OUTCOME+15
Function Call: WRITE
  • Prompt: !,"Death within 30 Days:",?33,$P(SRAO(12),"^")
  • Line Location: OUTCOME+16
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $E(IOST)="P"
  • Line Location: DONOR+1
Function Call: WRITE
  • Prompt: !,?28,"DONOR INFORMATION",!
  • Line Location: DONOR+1
Function Call: WRITE
  • Prompt: !,"Donor Gender:",?17,$P(SRAO(2),"^")
  • Line Location: DONOR+12
Function Call: WRITE
  • Prompt: !,"Donor Height:",?17,$P(SRAO(3),"^"),?40,"Donor HLA Typing (#,#,#,#)"
  • Line Location: DONOR+13
Function Call: WRITE
  • Prompt: !,"Donor Weight:",?17,$P(SRAO(4),"^"),?40,"=========================="
  • Line Location: DONOR+14
Function Call: WRITE
  • Prompt: !,"Donor DOB:",?17,$P(SRAO(5),"^"),?40,"Donor HLA-A: ",$P(SRAO(13),"^")
  • Line Location: DONOR+15
Function Call: WRITE
  • Prompt: !,"Donor Age:",?17,$P(SRAO(6),"^"),?40,"Donor HLA-B: ",$P(SRAO(14),"^")
  • Line Location: DONOR+16
Function Call: WRITE
  • Prompt: !,"ABO Blood Type:",?17,$P(SRAO(7),"^"),?40,"Donor HLA-C: ",$P(SRAO(15),"^")
  • Line Location: DONOR+17
Function Call: WRITE
  • Prompt: !,"Donor CMV:",?17,$P(SRAO(8),"^"),?40,"Donor HLA-DR: ",$P(SRAO(16),"^")
  • Line Location: DONOR+18
Function Call: WRITE
  • Prompt: !,"Substance Abuse:",?17,$P(SRAO(9),"^"),?40,"Donor HLA-BW: ",$P(SRAO(17),"^")
  • Line Location: DONOR+19
Function Call: WRITE
  • Prompt: !,"Deceased Donor:",?17,$P($P(SRAO(10),"^"),"("),?40,"Donor HLA-DQ: ",$P(SRAO(18),"^")
  • Line Location: DONOR+20
Function Call: WRITE
  • Prompt: !,"Living Donor:",?17,$P(SRAO(11),"^")
  • Line Location: DONOR+21
Function Call: WRITE
  • Prompt: !,"With Malignancy:",?17,$P(SRAO(12),"^")
  • Line Location: DONOR+22
Function Call: WRITE
  • Prompt: !!
  • 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