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

Package: Nursing Service

Routine: NURSCPLU


Information

NURSCPLU ;HIRMFO/RM,FT-Create NURSING FILE AND XREFS ;8/14/96 10:22

Source Information

Source file <NURSCPLU.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Nursing Service 3 EN6^NURSAUTL  (,BADWARD)^NURSAWCK  (EN1,EN2)^NURSCPL  
VA FileMan 3 ^DIC  DT^DICRW  ^DIE  

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

Package Total Caller Graph
Nursing Service 3 NURSPT-WRDACT  NURSPT-WRDINA  NURXPST  

Entry Points

Name Comments DBIA/ICR reference
F1 ; ACTIVIATION PROCESS
F2 ; ACTIVATE PATIENT
F3 ; DEACTIVATION PROCESS
FIRSTIME ; IF NO DATA IN NURS PATIENT (214) FILE INITIALIZE IT
WARDCK ; THIS CHECKS THAT THE NURSE LOCATION WAS ONE SELECTED TO ACTIVATE
WARDSEL ; SELECT WARD TO BE ACTIVATED
DATACK ; CHECK TO SEE IF DATA IN THE 214 FILE
MASCK ; CHECKS TO SEE IF THE MAS WARD IS AN ACTIVATED NURSE LOCATION.
INIT214 ; ENTERS PATIENTS INTO 214 FILE FROM 2 FILE
EN1 ; ENTRY FROM OPTION NURSPT-WRDACT
EN2 ; ENTRY FROM OPTION NURSPT-WRDINA
ACTWARD ; SET WARD STATUS TO ACTIVE
CKMAS ; CHECKS EVERY MAS WARD TO SEE IF CORR. NURSING LOCATION
F10 ;
MAIN ;

External References

Name Field # of Occurrence
^DIC WARDSEL+2
DT^DICRW INIT214+3
^DIE ACTWARD+1
EN6^NURSAUTL F1+1, F3+1
^NURSAWCK CKMAS+3
BADWARD^NURSAWCK CKMAS+4
EN1^NURSCPL FIRSTIME+1, F2+5
EN2^NURSCPL F3+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Checking to see if every MAS Ward has a corresponding NURSING unit"
  • Line Location: CKMAS+1
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: CKMAS+4
Function Call: WRITE
  • Prompt: !!!,$C(7),"Press return to continue: "
  • Line Location: CKMAS+4
Function Call: WRITE
  • Prompt: !!,"Done ... "
  • Line Location: INIT214+4
Function Call: WRITE
  • Prompt: !!,*7,*7,"PATIENT WITH IEN#",DFN," DOES NOT HAVE A RECORD",!,"IN THE PATIENT FILE."
  • Line Location: F2+1
Function Call: WRITE
  • Prompt: !!,*7,*7,$P(^DPT(DFN,0),"^",1)," CANNOT BE ADMITTED INTO",!,"THE NURSING SERVICE BECAUSE OF A PROBLEM WITH THE MAS PATIENT FILE -- NOTIFY MAS"
  • Line Location: F2+2
Routine Call
  • DIE
  • Line Location:
    • ACTWARD+1
Routine Call
  • DIC
  • Line Location:
    • WARDSEL+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^NURSF(211.4 - [#211.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(213.9 - [#213.9] MAIN+1
^DIC(42 - [#42] CKMAS+3, F10+1, MASCK+1
^DPT - [#2] F2+1, F2+2, F2+4, MASCK+1
^DPT("CN" F10+2
^NURSF(211.4 - [#211.4] F1+1, F10+1, MASCK+4
^NURSF(214 - [#214] DATACK+1, F3+1

Label References

Name Line Occurrences
ACTWARD WARDSEL+6
CKMAS MAIN+3
DATACK MAIN+5
F1 INIT214+3
F10 F1+1
F2 F10+2
F3 INIT214+3
FIRSTIME MAIN+6
INIT214 MAIN+8, FIRSTIME+3
MAIN EN1+2
MASCK F2+3
WARDCK MASCK+4
WARDSEL MAIN+7

Naked Globals

Name Field # of Occurrence
^(0 F10+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA ACTWARD+1*, F2+5*, F3+1*
>> DFN F10+2*, F2+1, F2+2, F2+4, F2+5, MASCK+1
DIC WARDSEL+2*!, F2+5*
DIC("A" WARDSEL+2*
DIC("S" WARDSEL+2*
DIC(0 WARDSEL+2*
>> DIE ACTWARD+1*
>> DR ACTWARD+1*
DTIME CKMAS+4
>> NPWARD F1+1*, F3+1*
>> NURSBAD MAIN+3, FIRSTIME+2, CKMAS+3*, CKMAS+4
>> NURSCK DATACK+1*, DATACK+2
>> NURSDATA MAIN+6, FIRSTIME+4*, DATACK+1*, DATACK+2*, INIT214+1, INIT214+2, F2+3
NURSEND MAIN+4*, MAIN+6!, MAIN+7!, MAIN+8!, FIRSTIME+2*, WARDSEL+1*, WARDSEL+2*, WARDSEL+5, WARDSEL+6
>> NURSERR CKMAS+2*, CKMAS+3*
>> NURSI WARDSEL+2*, WARDSEL+3, ACTWARD+1*, WARDCK+1*
>> NURSNOTV F2+3, MASCK+2*, MASCK+4, WARDCK+1*
>> NURSTUS MAIN+2*, INIT214+2, INIT214+3
>> NURSWARD MASCK+1*, MASCK+3, MASCK+4
>> NURSWCK MASCK+4*, WARDCK+1
NURSWRD FIRSTIME+3!, WARDSEL+2, F10+1*, F10+2, F3+1*
NURSWRD( WARDSEL+3*, ACTWARD+1, F1+1, F10+1, F3+1, WARDCK+1
>> NURSY CKMAS+3*, F1+1*, F10+1, F3+1*
>> NURSZ F1+1*, F10+1
>> OUTSW WARDSEL+1*, WARDSEL+2*
U INIT214+3*
>> X EN1+1*, EN2+1*, MAIN+2, WARDSEL+2, CKMAS+3*, CKMAS+4*, F2+4*, F3+1*
>> Y WARDSEL+2, WARDSEL+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