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

Package: Nursing Service

Routine: NURSCPLD


Information

NURSCPLD ;HIRMFO/RM-DISCHARGE MODULE TO DISCHARGE PATIENT FROM NURSING ;SEPTEMBER 1986

Source Information

Source file <NURSCPLD.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ;
LOCATE ; SELECT AND VALIDATE PATIENT
DISCONT ;
DISQUES
DISQUES1 ;
DISEDIT ; EDIT DISCHARGE DATE
ERRSTAT ;
QUIT ; KILL LOCAL VARIABLES

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: LOCATE+1
Function Call: WRITE
  • Prompt: !,"PATIENT HAS ALREADY BEEN DISCHARGED FROM THE NURSING SYSTEM.",!,"DO YOU WANT TO CHANGE THE DISCHARGE DATE? NO//"
  • Line Location: DISQUES+0
Function Call: WRITE
  • Prompt: !,"ANSWER YES OR NO"
  • Line Location: DISQUES+2
Function Call: WRITE
  • Prompt: !,VADM(1)," is discharged from the Nursing System."
  • Line Location: DISQUES1+5
Function Call: WRITE
  • Prompt: !!,*7,"THIS PATIENT IS NOT ADMITTED CURRENTLY IN THE NURSING SYSTEM - CANNOT DISCHARGE"
  • Line Location: ERRSTAT+1

FileMan Files Accessed Via FileMan Db Call

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