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

Package: Nursing Service

Routine: NURAAE0


Information

NURAAE0 ;HIRMFO/RM,MD,FT-EDIT ACUITY TOTALS...AMIS 1106a ;8/14/96 09:35

Source Information

Source file <NURAAE0.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ; ENTRY FROM MENU OPTION NURAAM-ACUEDT
NEXT
NODESEL ; SELECT NODE TO BE EDITED, THIS IS THE DATE PART
SHIFT ; SELECT SHIFT OF RECORD TO BE EDITED
WARD ; SELECT WARD OF NODE
BEDSECT ; SELECT BED SECTION OF NODE
EDIT ; UPDATE ACUITY IN 213.4 amis 10-1106A MANHOURS FILE
QUIT ; KILL LOCAL VARIABLES
MSG

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!,"THIS DATE IS TOO FAR IN THE PAST. CANNOT UPDATE OR EDIT."
  • Line Location: NODESEL+5
Function Call: WRITE
  • Prompt: !,$C(7),"SORRY, CANNOT EDIT FUTURE OR PRESENT DATES."
  • Line Location: NODESEL+6
Function Call: READ
  • Formatting: !!
  • Prompt: "Select Shift(s) (Enter [N]ight [D]AY [E]vening or [A]ll Shifts): "
  • Variable: NURSHFT
  • Timeout: DTIME,!
  • Line Location: SHIFT+1
Function Call: WRITE
  • Prompt: !,"Enter shift selection(s) (i.e., N,D,E - A - ALL - ND - DE etc)."
  • Line Location: SHIFT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: !,$C(7)," ** IMPROPER SHIFT SELECTION **"
  • Line Location: MSG+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^NURSF(211.4 - [#211.4] Classic Fileman Calls
^NURSF(213.3 - [#213.3] Classic Fileman Calls
^NURSA(213.4 - [#213.4] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call