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

Package: Surgery

Routine: SROALTSP


Information

SROALTSP ;BIR/MAM - TRANSMITTED ASSESSMENTS (PRINTER) ;01/07/08

Source Information

Source file <SROALTSP.m>

Entry Points

Name Comments DBIA/ICR reference
UTL ; write to ^TMP("SRA",$J)
SET ; print assessments
OTHER ; other operations
LOOP ; break procedures
HDR ; print heading
SS ;print surgical specialty
LINE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$NODATA^SROUTL0()
  • Line Location: SROALTSP+8
Function Call: WRITE
  • Prompt: !,?20,SROPS(SRAO)
  • Line Location: SET+12
Function Call: WRITE
  • Prompt: !,SREX,?20,"CPT Codes: "
  • Line Location: SET+13
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?52,"TRANSMITTED RISK ASSESSMENTS",?120,"PAGE "_SRPAGE,!,?(132-$L(SRINST)\2),SRINST,!,?58,"SURGERY SERVICE",?100,"DATE REVIEWED:"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(132-$L(SRFRTO)\2),SRFRTO,?100,"REVIEWED BY:"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,"ASSESSMENT #",?20,"PATIENT",?67,"TRANSMISSION DATE",?107,"ANESTHESIA TECHNIQUE",!,"OPERATION DATE",?20,"OPERATIVE PROCEDURE(S)",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !!,"** SURGICAL SPECIALTY: ",SRSS," **",!
  • Line Location: SS+2
Function Call: WRITE
  • Prompt: !
  • Line Location: LINE+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: LINE+0
Info |  Source |  Entry Points |  Interaction Calls