Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: NURSCUTL

Package: Nursing Service

Routine: NURSCUTL


Information

NURSCUTL ;HIRMFO/MD-RM-UTILITY ROUTINE FOR NURSING CLINICAL ;6/6/96

Source Information

Source file <NURSCUTL.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Nursing Service 2 EN5^NURSCUTL  EN4^NURSUT1  
Registration 1 INP^VADPT  
VA FileMan 1 ^DIC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 21

Package Total Caller Graph
Nursing Service 21 NURAAU1  NURACE0  NURACE7  NURACEW0  NURACHDC  NURAMB1  NURARCR0  NURARCRW  
NURARNCT  NURARWL2  NURCAS0  NURCES01  NURCPP0  NURCUT0  NURCVUT0  ^NURSA(214.7  
NURCVED0  NURSCPLC  NURSCPLD  NURSCPLE  NURSCUTL  

Entry Points

Name Comments DBIA/ICR reference
SETXREF ; SET UP ADT INTERFACE IN PATIENT FILE
Q2
DUPCLAS(DATEX,DFN) ; CHECK FOR DUPLICATE ENTRY IN NURS CLASSIFICATION (#214.6)
; FILE. IF A DUPLICATE EXISTS A ONE IS RETURNED OTHERWISE
; A ZERO IS RETURNED
EN2 ; LOOKUP OF THE LATEST PATIENT CLASSIFICATION FROM 214.6 FILE
; FLAG NURSCLAS("CL") = $S(1:CHECK CURR. LOC. = CLAS. LOC.,0:ELSE,
; 2:GET FIRST CLASS WHERE CURR.LOC=CLASS.LOC NURSCLASS("WARD")=CURR.LOC)
EN3 ; MUMPS "AA" XREF FOR FILE 214.7
; THE NURSDFN, NURSA, AND NURSR VARIABLES ARE KILLED IN THE XREF
EN4 ; SCREEN FOR CLASSIFICATION DATE FIELDS
EN5 ; LOOKUP ON THE PATIENT FILE FOR PATIENT NAME
EN6 ; FIND THE CURRENT ADMISSION FOR THE PATIENT (DFN IS PATIENT IEN)
EN7 ; POC ENTRY POINT FOR PATIENT LOOK-UP
GC
A5
KILLXREF ; DELETE ADT INTERFACE IN PATIENT FILE

External References

Name Field # of Occurrence
^DIC A5
EN5^NURSCUTL EN7+2
EN4^NURSUT1 EN7+1
INP^VADPT EN6+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Select PATIENT NAME: "
  • Line Location: EN5+1
Function Call: WRITE
  • Prompt: !
  • Line Location: A5+2
Function Call: WRITE
  • Prompt: !!,"Set up 'trigger' in Patient File to create Nursing Patient entries"
  • Line Location: SETXREF+1
Function Call: WRITE
  • Prompt: !!,"Kill 'triggers' in Patient File that creates Nursing entries."
  • Line Location: KILLXREF+1
Routine Call
  • DIC
  • Line Location:
    • A5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(2 SETXREF+2, SETXREF+3, SETXREF+4*, SETXREF+5*, KILLXREF+2!, KILLXREF+3!
^DIC(214.8 EN7+1
^NURSA(214.6 - [#214.6] GC, GC+1, GC+3, GC+5, GC+6, EN4+1, DUPCLAS+3
^NURSA(214.7 - [#214.7] EN3+3, EN4+1
^NURSF(214 - [#214] EN2+4, GC+4, A5+1

Label References

Name Line Occurrences
A5 EN5+1
EN5 A5+4
GC GC+4
Q2 GC, GC+5, GC+6

Naked Globals

Name Field # of Occurrence
^(0 GC+3, GC+4, GC+5, EN3+3, EN4+1, SETXREF+2, KILLXREF+2
^(1 SETXREF+4*
^(2 SETXREF+4*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHKVAR GC+1*, GC+3*, Q2*!
>> DA EN3+3, EN4+1, SETXREF+2*, SETXREF+3*, SETXREF+4
DATEX DUPCLAS~, DUPCLAS+3
DFN EN2+4, GC, GC+1, GC+4, EN5+2*, A5+2*, EN7+1, EN7+2, EN7+3*, DUPCLAS~
, DUPCLAS+3
DIC EN5+2!, A5*, A5+2!
DTIME EN5+1
>> DUPCLAS DUPCLAS+3*, DUPCLAS+4
>> NACT A5+1, A5+3, EN7+1
>> NASK EN5+1, A5+2, EN7+1
NURBEDSW EN7+1*, EN7+2, EN7+3!
>> NURQUIT EN7+1*, EN7+3*
>> NURSA EN3+2*
>> NURSADM GC+4, EN6+4*, EN6+5*
NURSCLAS EN2+3*, GC+2*, GC+3*, GC+4, GC+5, GC+6, GC+7*, Q2!*
NURSCLAS("CL" EN2+4, GC, GC+3, GC+5, GC+6
NURSCLAS("D" GC+1!*, GC+3
NURSCLAS("DATE" EN2+3*, GC
NURSCLAS("WARD" EN2+4*, GC+3, GC+6
NURSCLAS(0 EN2+3*, GC*, GC+1
NURSCOMP GC+4*, GC+5, GC+6, Q2!
>> NURSDFN EN3+2*, EN3+3*
>> NURSI SETXREF+2*, KILLXREF+2*
NURSMAS EN6+3*, EN6+4!, EN6+5!
>> NURSR EN3+2*, EN3+3*
>> NWARD GC+5
>> RPTDATE GC+5
U EN2+4, GC+3, GC+5, EN3+3, EN4+1
>> VAIN(1 EN6+5
>> VAIN(4 EN6+3
>> VAIN(7 GC+4
>> X EN5+1*, EN5+2, A5*, A5+3
>> Y EN4+1, A5, A5+1*, A5+2, A5+3, EN7+1*, EN7+2*, EN7+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All