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

Package: Surgery

Routine: SROALTS


Information

SROALTS ;BIR/MAM - TRANSMITTED ASSESSMENTS ;01/07/08

Source Information

Source file <SROALTS.m>

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$NODATA^SROUTL0()
  • Line Location: SROALTS+10
Function Call: WRITE
  • Prompt: !,?20,SROPS(SRAO)
  • Line Location: SET+13
Function Call: WRITE
  • Prompt: !,SREX,?20,"CPT Codes: "
  • Line Location: SET+14
Function Call: WRITE
  • Prompt: !
  • Line Location: SET+16
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SET+16
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PAGE+0
Function Call: WRITE
  • Prompt: !!,"If you want to continue listing incomplete assessments, enter <RET>. Enter",!,"'^' to return to the menu."
  • Line Location: PAGE+1
Function Call: WRITE
  • Prompt: @IOF,!,?26,"TRANSMITTED RISK ASSESSMENTS",!,?(80-$L(SRFRTO)\2),SRFRTO,!!,"ASSESSMENT #",?20,"PATIENT",?55,"TRANSMISSION DATE",!,"OPERATION DATE",?20,"OPERATION(S)",?55,"ANESTHESIA TECHNIQUE",!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !!,"** SURGICAL SPECIALTY: ",SRSS," **",!
  • Line Location: SS+2
Info |  Source |  Entry Points |  Interaction Calls