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

Package: Nursing Service

Routine: NURCCPU2


Information

NURCCPU2 ;HIRMFO/RD/RM-NURSING CARE PLAN UTILITIES (cont.) ;10/30/90

Source Information

Source file <NURCCPU2.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ; DISCONTINUE ANY ORDERS FOR A PARTICULAR LIST OF ACTIVE INTERVENTIONS
; UPDATES STATUS (#1) SUBFIELD OF THE ORDER INFO (#4) FIELD OF THE
; NURS CARE PLAN (#216.8) FILE
YNDC
CHOOSE
Q1 ;
CHECK
GETLIS ;
REPRINT ;
REPRT ;
EN2 ; IF SELECT ORDERABLE, PUT INFO IN ORDER INFO FIELD (#4) OF THE NURS
; CARE PLAN (#216.8) FILE
Q2 ;
FILE ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Do you wish to discontinue any order(s)"
  • Line Location: YNDC+0
Function Call: WRITE
  • Prompt: !?5,$C(7),"Answer Yes if want to discontinue some of the above orders",!?5,"else answer No."
  • Line Location: YNDC+1
Function Call: READ
  • Variable: NURSDISC
  • Timeout: DTIME
  • Line Location: CHOOSE+0
Function Call: WRITE
  • Prompt: !?5,$C(7),"Please enter numeric selection or up-arrow to quit. ",!,?5,"Format: { 1 } or { 1,2,3,...} or { 2-7 } or { 2,3,7-9 } or { ^ } to quit"
  • Line Location: CHOOSE+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: REPRINT+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: REPRT+1
Function Call: WRITE
  • Prompt: !?5,$J(NUR1,2),". "
  • Line Location: REPRT+2

FileMan Files Accessed Via FileMan Db Call

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