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

Package: Nursing Service

Routine: NURACE8


Information

NURACE8 ;HIRMFO/RM,FT-PATIENT CLASSIFICATION FACTOR CHECKS ;1/9/97 13:53

Source Information

Source file <NURACE8.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ;VALIDATE EXTENDED CARE FACTORS
EN2 ;VALIDATE PSYCHIATRIC FACTORS
EN3 ; ERROR MESSAGE THAT ACUITY ROUTINE NOT RUN
ASTER ;
ASTER1 ;
EN4 ; PROMPT PRINTED IF UP-ARROWED OUT OF CLASSIFICATION
EN5 ; PRINT INFO FOR ATEC PATIENTS
EN6 ; CLASSIFICATION OF ATEC PATIENTS
Q
EN7 ;VALIDATE EXTENDED CARE FACTORS

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7
  • Line Location: EN3+1
Function Call: WRITE
  • Prompt: !,"*****",?$X+31,"WARNING",?$X+32,"*****"
  • Line Location: EN3+4
Function Call: WRITE
  • Prompt: !,"*****",?$X+20,"NOTIFY NURSING ADP COORDINATOR",?$X+20,"*****"
  • Line Location: EN3+8
Function Call: WRITE
  • Prompt: !,"*****",?$X+8,"TaskMan DID NOT RUN ACUITY ROUTINE (AMIS 1106 UPDATE)",?$X+9,"*****"
  • Line Location: EN3+10
Function Call: WRITE
  • Prompt: !,"*****",?$X+18,"THIS CALL MUST BE MADE IMMEDIATELY",?$X+18,"*****"
  • Line Location: EN3+12
Function Call: WRITE
  • Prompt: $$REPEAT^XLFSTR("*",80)
  • Line Location: ASTER+1
Function Call: WRITE
  • Prompt: !,*7,"*****",?$X+70,"*****"
  • Line Location: ASTER1+1
Function Call: WRITE
  • Prompt: *7,*7,!,"THIS PATIENT'S CLASSIFICATION HAS NOT BEEN UPDATED."
  • Line Location: EN4+1
Function Call: WRITE
  • Prompt: !,?8,"Last user to classify: ",USERX
  • Line Location: EN5+2
Function Call: WRITE
  • Prompt: !,?8,"Last date/time classified: "
  • Line Location: EN5+3
Function Call: WRITE
  • Prompt: Y
  • Line Location: EN5+4
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN6+2
Function Call: WRITE
  • Prompt: !,*7,"ANSWER WITH A NUMBER BETWEEN 1 AND 4"
  • Line Location: EN6+5
Info |  Source |  Entry Points |  Interaction Calls