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

Package: Surgery

Routine: SROWL


Information

SROWL ;B'HAM ISC/MAM - ENTER PATIENT ON WAITING LIST; APRIL 18, 2007@11:55am

Source Information

Source file <SROWL.m>

Entry Points

Name Comments DBIA/ICR reference
ENTER ; enter a patient on the waiting list
PAT
OP
END
PRESS
DEL
HELP
CHK ; check for existing entries for a patient
LIST ; list existing procedures for specialty selected
LOOP ; break procedure if greater than 36 characters
REFPHY
PRMPT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ENTER+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PAT+0
Function Call: WRITE
  • Prompt: !!,"No action taken."
  • Line Location: PAT+0
Function Call: WRITE
  • Prompt: !!,"The records show that "_SRNM_" died on "_Y_".",!
  • Line Location: PAT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: OP+0
Function Call: WRITE
  • Prompt: !!,"No action taken."
  • Line Location: OP+0
Function Call: WRITE
  • Prompt: !
  • Line Location: OP+2
Function Call: WRITE
  • Prompt: @IOF,!,SRNM_" has been entered on the waiting list",!,"for "_SRSSNM
  • Line Location: OP+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PRESS+0
Function Call: WRITE
  • Prompt: @IOF,!,"Classification information is incomplete. No action taken."
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: !!,"Enter RETURN if you want to continue entering a new procedure on the waiting",!,"list for "_SRNM_". If the procedure you are about to enter appears",!,"above, enter 'NO' to quit this option."
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: @IOF,!,"Procedure(s) already entered for "_SRNM,!,"on the Waiting List for "_SRSSNM,!
  • Line Location: CHK+1
Function Call: READ
  • Variable: ECYN
  • Timeout: DTIME
  • Line Location: CHK+3
Function Call: WRITE
  • Prompt: !,SRNM,?40,"Date Entered on List:",?66,SRDT,!,?3,SROP(1),?40,"Tentative Operation Date: ",?66,SROPDT
  • Line Location: LIST+3
Function Call: WRITE
  • Prompt: !,?3,SROP(2)
  • Line Location: LIST+4
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+5
Function Call: READ
  • Formatting: !
  • Prompt: "Is this a VA Physician from this facility? (Y/N): <Y> "
  • Variable: SRCONT
  • Timeout: DTIME
  • Line Location: PRMPT+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SRO(133.8 - [#133.8] Classic Fileman Calls
^VA(200 - [#200] Classic Fileman Calls,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call