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
Print Page as PDF
Routine: SROAPS2

Package: Surgery

Routine: SROAPS2


Information

SROAPS2 ;BIR/MAM - PREOP INFO (PAGE 2) ;07/18/2011

Source Information

Source file <SROAPS2.m>

Entry Points

Name Comments DBIA/ICR reference
PRE2
OUT(SRFLD,SRY) ; get data in output form

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: SROAPS2+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SROAPS2+3
Function Call: WRITE
  • Prompt: !,"1. RENAL:",?(38-$L($P(SRAO(1),"^"))),$P(SRAO(1),"^"),?40,"3. NUTRITIONAL/IMMUNE/OTHER:",?(79-$L($P(SRAO(3),"^"))),$P(SRAO(3),"^")
  • Line Location: PRE2+29
Function Call: WRITE
  • Prompt: !," A. Acute Renal Failure:",?(38-$L($P(SRAO("1A"),"^"))),$P(SRAO("1A"),"^"),?40," A. Disseminated Cancer:",?(79-$L($P(SRAO("3A"),"^"))),$P(SRAO("3A"),"^")
  • Line Location: PRE2+30
Function Call: WRITE
  • Prompt: !," B. Currently on Dialysis:",?(38-$L($P(SRAO("1B"),"^"))),$P(SRAO("1B"),"^"),?40," B. Open Wound:",?(79-$L($P(SRAO("3B"),"^"))),$P(SRAO("3B"),"^")
  • Line Location: PRE2+31
Function Call: WRITE
  • Prompt: !,?40," C. Steroid Use for Chronic Cond.:",?(79-$L($P(SRAO("3C"),"^"))),$P(SRAO("3C"),"^")
  • Line Location: PRE2+32
Function Call: WRITE
  • Prompt: !,?40," D. Weight Loss > 10%:",?(79-$L($P(SRAO("3D"),"^"))),$P(SRAO("3D"),"^")
  • Line Location: PRE2+33
Function Call: WRITE
  • Prompt: !,"2. CENTRAL NERVOUS SYSTEM:",?(38-$L($P(SRAO(2),"^"))),$P(SRAO(2),"^"),?40," E. Bleeding Disorders:",?(79-$L($P(SRAO("3E"),"^"))),$P(SRAO("3E"),"^")
  • Line Location: PRE2+34
Function Call: WRITE
  • Prompt: !," A. Impaired Sensorium: ",?(38-$L($P(SRAO("2A"),"^"))),$P(SRAO("2A"),"^"),?40," F. Bleed Due To Med:",?(79-$L($P(SRAO("3F"),"^"))),$P(SRAO("3F"),"^")
  • Line Location: PRE2+35
Function Call: WRITE
  • Prompt: !," B. Coma:",?(38-$L($P(SRAO("2B"),"^"))),$P(SRAO("2B"),"^"),?40," G. Transfusion > 4 RBC Units:",?(79-$L($P(SRAO("3G"),"^"))),$P(SRAO("3G"),"^")
  • Line Location: PRE2+36
Function Call: WRITE
  • Prompt: !," C. Hemiplegia:",?(38-$L($P(SRAO("2C"),"^"))),$P(SRAO("2C"),"^"),?40," H. Chemo for Malig Last 90 Days:",?(79-$L($P(SRAO("3H"),"^"))),$P(SRAO("3H"),"^")
  • Line Location: PRE2+37
Function Call: WRITE
  • Prompt: !," D. CVD Repair/Obstruct:",?(38-$L($P(SRAO("2D"),"^"))),$P(SRAO("2D"),"^"),?40," I. Radiotherapy W/I 90 Days:",?(79-$L($P(SRAO("3I"),"^"))),$P(SRAO("3I"),"^")
  • Line Location: PRE2+38
Function Call: WRITE
  • Prompt: !," E. History of CVD:",?(38-$L($P(SRAO("2E"),"^"))),$P(SRAO("2E"),"^"),?40," J. Preoperative Sepsis:",?(79-$L($P(SRAO("3J"),"^"))),$P(SRAO("3J"),"^")
  • Line Location: PRE2+39
Function Call: WRITE
  • Prompt: !," F. Tumor Involving CNS:",?(38-$L($P(SRAO("2F"),"^"))),$P(SRAO("2F"),"^"),?40," K. Pregnancy:",?(79-$L($P(SRAO("3K"),"^"))),$P(SRAO("3K"),"^")
  • Line Location: PRE2+40
Function Call: WRITE
  • Prompt: !," G. Impaired Cognitive Function:",?(38-$L($P(SRAO("2G"),"^"))),$P(SRAO("2G"),"^")
  • Line Location: PRE2+41
Function Call: WRITE
  • Prompt: ?40," L. History of Cancer:",?(79-$L($P(SRAO("3L"),"^"))),$P(SRAO("3L"),"^")
  • Line Location: PRE2+42
Function Call: WRITE
  • Prompt: !,?40," M. History of Radiation Therapy:",?(79-$L($P(SRAO("3M"),"^"))),$P(SRAO("3M"),"^")
  • Line Location: PRE2+43
Function Call: WRITE
  • Prompt: !,?40," N. Num of Prior Surg in Same OP:",?(79-$L($P(SRAO("3N"),"^"))),$P(SRAO("3N"),"^")
  • Line Location: PRE2+44
Info |  Source |  Entry Points |  Interaction Calls