Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SROPROC

Package: Surgery

Routine: SROPROC


Information

SROPROC ;B'HAM ISC/MAM - ENTER PRINCIPAL OPERATIVE PROCEDURE ; [ 01/22/99 10:24 AM ]

Source Information

Source file <SROPROC.m>

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Surgery 3 SRONEW  SROPER  SRSCHC1  

Entry Points

Name Comments DBIA/ICR reference
WL ; input transform for waiting list procedure
PROC ; check for spaces
CHECK
OP

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Variable: SRSOP
  • Line Location: OP+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: OP+1
Function Call: WRITE
  • Prompt: !!,"The principal operative procedure that you have entered contains a '@'. This",!,"character cannot be contained in your answer."
  • Line Location: OP+2
Function Call: WRITE
  • Prompt: !!,"The principal operative procedure cannot contain a semicolon (;). Please",!,"re-enter the procedure, using commas in place of the semicolons."
  • Line Location: OP+3
Function Call: WRITE
  • Prompt: !!,"Your answer contains a control character. Please re-type the procedure name."
  • Line Location: OP+4
Function Call: WRITE
  • Prompt: !!,"Enter the name of the principal operative procedure for this surgical case.",!,"If there is more than one procedure being performed by this surgical specialty,",!,"you will be prompted for 'OTHER OPERATIVE"
  • Line Location: OP+5
Function Call: WRITE
  • Prompt: " PROCEDURES'. Your answer must be",!,"3 to 135 characters in length."
  • Line Location: OP+6
Function Call: WRITE
  • Prompt: !!,"The name of the principal operative procedure can be up to 135 characters in",!,"length. Please re-enter the procedure name in an abbreviated form."
  • Line Location: OP+8
Function Call: WRITE
  • Prompt: !!,"Your answer must be at least 3 characters in length. Please enter more",!,"information in the procedure name."
  • Line Location: OP+9
Function Call: WRITE
  • Prompt: !!,?5,"The first character must not be a space."
  • Line Location: PROC+1
Function Call: WRITE
  • Prompt: !!,?5,"The procedure that you have entered contains a '@'. This character",!,?5,"cannot be contained in your answer."
  • Line Location: PROC+2
Function Call: WRITE
  • Prompt: !!,?5,"The procedure cannot contain a semicolon (;). Please re-enter the",!,?5,"procedure, using commas in place of the semicolons."
  • Line Location: PROC+3
Function Call: WRITE
  • Prompt: !!,?5,"The procedure that you have entered contains an up-arrow (^).",!,?5,"This character cannot be contained in your answer."
  • Line Location: PROC+4
Function Call: WRITE
  • Prompt: !!,?5,"Your answer contains a control character. Please re-type the procedure",!,?5,"name."
  • Line Location: PROC+5
Function Call: WRITE
  • Prompt: !!,?5,"Answer must contain at least one space in every 31 characters of length."
  • Line Location: PROC+8
Function Call: WRITE
  • Prompt: !,?5,"If you are using a comma (,) to separate information, leave a space after",!,?5,"it. Please re-enter the procedure name."
  • Line Location: PROC+9
Function Call: WRITE
  • Prompt: !!,?5,"Enter the name of the principal operative procedure for this surgical",!,?5,"case. The procedure name must be 3 to 75 characters in length.",!
  • Line Location: WL+1

Label References

Name Line Occurrences
CHECK PROC+7
OP OP+1, OP+2, OP+3, OP+4, OP+6, OP+8, OP+9, OP+10
PROC OP+10, WL+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DTIME OP, OP+1
SRBL PROC+10!, CHECK*, CHECK+1
SRFLG PROC+7*, PROC+10!, CHECK*
SROP PROC+7*, PROC+10!, CHECK, CHECK+1*
>> SRSOP OP*, OP+1, OP+2, OP+3, OP+4, OP+5, OP+6, OP+7*, OP+8, OP+9
, OP+10
>> SRSOUT OP*, OP+1*
X OP+1*, OP+10*, PROC+1!, PROC+2!, PROC+3!, PROC+4!, PROC+5!, PROC+6, PROC+7, PROC+8
, PROC+9, CHECK!, WL+1!, WL+2
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Label References |  Local Variables |  All