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

Package: Surgery

Routine: SRTPRH1


Information

SRTPRH1 ;BIR/SJA - PRINT HEART RISK ASSESSMENT INFO ;07/20/2011

Source Information

Source file <SRTPRH1.m>

Entry Points

Name Comments DBIA/ICR reference
VA
NONVA
RISK ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $E(IOST)="P"
  • Line Location: SRTPRH1+2
Function Call: WRITE
  • Prompt: !,?28,"RISK ASSESSMENT INFORMATION",!
  • Line Location: SRTPRH1+2
Function Call: WRITE
  • Prompt: !,"Liver Disease:",?30,$P(SRAO(1),"^"),?42,"Pre-TX Other Malignancy:",?71,$P(SRAO(6),"^")
  • Line Location: RISK+5
Function Call: WRITE
  • Prompt: !,"Creatinine on Day of TX:",?30,$P(SRAO(2),"^"),?42,"Non-Compliance:",?71,$P(SRAO(7),"^")
  • Line Location: RISK+6
Function Call: WRITE
  • Prompt: !,"HIV+ (positive):",?30,$P(SRAO(3),"^"),?42,"Recipient Substance Abuse:",?71,$P(SRAO(8),"^")
  • Line Location: RISK+7
Function Call: WRITE
  • Prompt: !,"Active Infection Pre-TX:",?30,$P(SRAO(4),"^"),?42,"Prior Blood Transfusion:",?71,$P(SRAO(9),"^")
  • Line Location: RISK+8
Function Call: WRITE
  • Prompt: !,"Pre-TX Skin Malignancy:",?30,$P(SRAO(5),"^")
  • Line Location: RISK+9

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