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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: NURSHIGH

Package: Nursing Service

Routine: NURSHIGH


Information

NURSHIGH ;HIRMFO/JH-LIST STAFF HIGHEST DEGREES ;4/21/94

Source Information

Source file <NURSHIGH.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 ^%ZIS  ^%ZTLOAD  
Nursing Service 2 ^NURSKILL  CLOSE^NURSUT1  
VA Fileman 1 NOW^%DTC  

Entry Points

Name Comments DBIA/ICR reference
QUEUE
EN1
MSG1
START

External References

Name Field # of Occurrence
NOW^%DTC START
^%ZIS QUEUE
^%ZTLOAD QUEUE+1
^NURSKILL START+33
CLOSE^NURSUT1 START+33

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !?10,"***STAFF'S NURSING AND ACADERMIC DEGREES***",?67,NDATE,!!,"STAFF NAME",?26,"SSN",?38,"DEGREE,CODE,PRIORITY",!,"---------",?26,"---",?38,"--------------------",!
  • Line Location: START+14
Function Call: WRITE
  • Prompt: !,NURANAM,?26,NURASSN
  • Line Location: START+16
Function Call: WRITE
  • Prompt: ?38,$P(^TMP($J,NURANAM,NURASSN,DA,II),U),?($X+2),$P(^(II),U,3),?($X+2),$P(^(II),U,4),!
  • Line Location: START+19
Function Call: WRITE
  • Prompt: !,"--HIGHEST NURSING DEGREE--",?40,"--HIGHEST ACADERMIC DEGREE--"
  • Line Location: START+22
Function Call: WRITE
  • Prompt: !,NURANUR,?40,NURAACA,!,NURASTR
  • Line Location: START+23
Function Call: WRITE
  • Prompt: !,^TMP("NURERR",$J,DA(1))
  • Line Location: START+30
Function Call: WRITE
  • Prompt: !?19,"( NOTIFY YOUR IRM PERSONNEL. )"
  • Line Location: START+32
Routine Call
  • %ZIS
  • Line Location:
    • QUEUE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^NURSF(210 - [#210] EN1, START+1, START+2, START+3, START+4, START+6
^NURSF(212.1 - [#212.1] EN1, START+4, START+7, START+8
^TMP("NURERR" START!, START+29, START+30, START+32, START+33!, MSG1*
^TMP("NURHIGH" START!, START+9*, START+21, START+33!
^TMP($J START!, START+4*, START+13, START+15, START+16, START+17, START+18, START+19, START+33!
^VA(200 - [#200] START+1, START+4

Label References

Name Line Occurrences
MSG1 START+1
QUEUE EN1+1

Naked Globals

Name Field # of Occurrence
^( START+19, START+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %I(1 START
>> %I(2 START
>> %I(3 START
%ZIS QUEUE*!
%ZIS("B" QUEUE*
>> DA START+2*, START+3, START+4, START+6, START+9, START+17*, START+18, START+19, START+21
>> DA(1 START+1*, START+2, START+4, START+29*, START+30, MSG1
>> I START+3*, START+15*, START+16*, START+17*, START+18*
>> II START+3*, START+4, START+18*, START+19
IO("C" QUEUE+1!
IO("Q" QUEUE!, QUEUE+1!
IOM START, QUEUE+1
ION QUEUE+1
>> IOP QUEUE*
IOSL QUEUE+1
IOST QUEUE+1
>> NDATE START*, START+14
>> NURAACA START+6*, START+8*, START+9, START+21*, START+23
>> NURAH START+4*
>> NURAHIGH START+6*, START+7, START+8
>> NURANAM START+15*, START+16, START+17, START+18, START+19
>> NURANUR START+6*, START+7*, START+9, START+21*, START+23
>> NURASSN START+4*, START+16*, START+17, START+18, START+19
>> NURASTR START*, START+23
>> NUROUT START*, START+1, MSG1*
>> POP QUEUE, QUEUE+1*
U START+4, START+6, START+7, START+8, START+9, START+19, START+21
>> ZTDESC EN1+1*
>> ZTIO QUEUE+1*
>> ZTRTN EN1+1*
>> ZTSK QUEUE+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All