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

Package: Nursing Service

Routine: NURACEW


Information

NURACEW ;HIRMFO/RM,MD,FT-CLASSIFY PATIENTS ON A GIVEN WARD ;8/14/96 09:57

Source Information

Source file <NURACEW.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ;
EN2 ; ENTRY FROM OPTION NURAPC-REVWRD
EDIT ; SELECT WARD TO BE SEARCHED
BGNRPT ; VALIDATE EACH PATIENT REGISTERED ON WARD
READNXT ; GET NEXT PATIENT
QUIT ;KILL LOCAL VARIABLES
CHKENTR ;ASK TO CLASSIFY ON THE WARD
CHKCONT ;
CHKCONT1 ;
CHKCONT2 ;
QUIT2 ; KILL THE REST OF THE VARIABLES

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"**** NO PATIENTS REGISTERED ON WARD ",NPWARD," ****"
  • Line Location: EDIT+5
Function Call: WRITE
  • Prompt: !,"Begin updating patient classifications."
  • Line Location: CHKENTR+3
Function Call: WRITE
  • Prompt: !!,$P(NURSTABL(TCNT),"^",2),?$X+10,ROOMTABL(TCNT)," OK? YES// "
  • Line Location: CHKCONT1+1
Function Call: WRITE
  • Prompt: !,"ANSWER YES OR NO"
  • Line Location: CHKCONT1+5
Function Call: WRITE
  • Prompt: !!,"Do you wish to stop looping through names? YES//"
  • Line Location: CHKCONT2+1
Function Call: WRITE
  • Prompt: !,"ANSWER YES OR NO"
  • Line Location: CHKCONT2+4
Function Call: WRITE
  • Prompt: !!,?16,"**** ROUTINE FINISHED ****",!!
  • Line Location: QUIT2+1

FileMan Files Accessed Via FileMan Db Call

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