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

Package: Surgery

Routine: SROCMPS


Information

SROCMPS ;BIR/MAM - ENTER/EDIT OCCURRENCES ;06/17/04 6:55 AM

Source Information

Source file <SROCMPS.m>

Entry Points

Name Comments DBIA/ICR reference
INTRA
POST
EDIT
SEL
END
LIST ; list existing occurrences
NEW ; enter new occurrences
ICD
DESC ; output occurrence category description when doing lookup
PRESS
CO() ; called by screen on post-op occurrence category field

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: POST+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SEL+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SEL+2
Function Call: WRITE
  • Prompt: !!,"Select the number corresponding to the occurrence you want to update, or",!,"enter 'NEW' to add another occurrence. ",!!,"Press RETURN to continue "
  • Line Location: SEL+2
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !,CNT_". ",?5,SRCMP,!,?5,"Category: "_SRCAT,!
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: !,"There are no "_$S(SRTYPE=10:"Intraoperative",1:"Postoperative")_" Occurrences entered for this case.",!!
  • Line Location: NEW+1
Function Call: WRITE
  • Prompt: !!,"Since you have selected one of the 'OTHER' occurrence categories, an ICD",!,"Diagnosis Code should be entered for this occurrence."
  • Line Location: ICD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PRESS+0
Info |  Source |  Entry Points |  Interaction Calls