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

Package: Surgery

Routine: SROALSL


Information

SROALSL ;BIR/ADM - SUMMARY LIST OF ASSESSED CASES ;11/13/07

Source Information

Source file <SROALSL.m>

Entry Points

Name Comments DBIA/ICR reference
UTL ; set up TMP global
SRSS ;
SRASP
EXCL ; add excluded cases
PAGE
HDR ; print heading
TOT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$E(SRNM,1,30),?37,$J($P(SRX,"^",2),5),?48,$J($P(SRX,"^",3),5),?60,$J($P(SRX,"^",4),5),?72,$J($P(SRX,"^",5),5)
  • Line Location: SRSS+3
Function Call: WRITE
  • Prompt: !,$E(SRSPEC,1,30),?37,$J($P(SRX,"^",2),5),?48,$J($P(SRX,"^",3),5),?60,$J($P(SRX,"^",4),5),?72,$J($P(SRX,"^",5),5)
  • Line Location: SRASP+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PAGE+1
Function Call: WRITE
  • Prompt: !!,"If you want to continue the listing, press the 'Enter' key.",!,"Type '^' to return to the menu."
  • Line Location: PAGE+2
Function Call: WRITE
  • Prompt: @IOF,!,?(80-$L(SRTITLE)\2),SRTITLE,?70,$J("PAGE "_SRPAGE,9)
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?(80-$L(SRINST)\2),SRINST
  • Condition for execution: $E(IOST)="P"
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?(80-$L(SRFRTO)\2),SRFRTO
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!,"SURGICAL SPECIALTY",?33,"INCOMPLETE | COMPLETE | TRANSMITTED | EXCLUDED",!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,"TOTAL FOR ALL SPECIALTIES: ",?37,$J(SRINC,5),?48,$J(SRCOM,5),?60,$J(SRTR,5),?72,$J(SREX,5)
  • Line Location: TOT+0
Info |  Source |  Entry Points |  Interaction Calls