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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ANSEAV1

Package: Nursing Acuity

Routine: ANSEAV1


Information

ANSEAV1 ;IHS/OIRM/DSD/CSC - ENTER/EDIT ACUITY DATA; [ 02/25/98 10:32 AM ]

Source Information

Source file <ANSEAV1.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Nursing Acuity 1 HEAD^ANSEAV  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Nursing Acuity 2 ANSEA1  ANSEAV  

Entry Points

Name Comments DBIA/ICR reference
DISP
HEAD
SB1
AREA
3 ;;1^DAY;;2^EVENING;;3^NIGHT
A1
CARH
A2
2 ;;1^DAY;;2^NIGHT
SUBH

External References

Name Field # of Occurrence
HEAD^ANSEAV HEAD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$P(X,","),", ",$P(X,",",2,99)
  • Line Location: A1+3
Function Call: WRITE
  • Prompt: " (",X,")"
  • Line Location: A1+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: A1+8
Function Call: WRITE
  • Prompt: !!,"Adj. Factors: "
  • Line Location: A1+11
Function Call: WRITE
  • Prompt: "None Listed"
  • Line Location: A1+12
Function Call: WRITE
  • Prompt: !!,"Total Weight: "
  • Line Location: A1+17
Function Call: WRITE
  • Prompt: @ANSRVON
  • Condition for execution: IOST["C-"
  • Line Location: A1+18
Function Call: WRITE
  • Prompt: " ",T,@ANSSPAC
  • Line Location: A1+18
Function Call: WRITE
  • Prompt: @ANSRVOF
  • Condition for execution: IOST["C-"
  • Line Location: A1+18
Function Call: WRITE
  • Prompt: ?25,"Nursing Care Level: "
  • Line Location: A1+20
Function Call: WRITE
  • Prompt: L," - ",X
  • Line Location: A1+21
Function Call: WRITE
  • Prompt: @ANSRVON
  • Condition for execution: IOST["C-"
  • Line Location: A1+22
Function Call: WRITE
  • Prompt: L," - ",X,@ANSSPAC
  • Line Location: A1+22
Function Call: WRITE
  • Prompt: @ANSRVOF
  • Condition for execution: IOST["C-"
  • Line Location: A1+22
Function Call: WRITE
  • Prompt: !
  • Line Location: SB1+0
Function Call: WRITE
  • Prompt: S
  • Line Location: SB1+2
Function Call: WRITE
  • Prompt: ?40,$J(S,2)
  • Line Location: SB1+5
Function Call: WRITE
  • Prompt: " ",$P(X,U),"(",$P(X,U,2)," levs)"
  • Line Location: AREA+1
Function Call: WRITE
  • Prompt: ?30
  • Line Location: AREA+2
Function Call: WRITE
  • Prompt: L
  • Line Location: AREA+5
Function Call: WRITE
  • Prompt: ?6,"Care Area",?25,"Current Level",?46,"Care Area",?67,"Current Level"
  • Line Location: CARH+0
Function Call: WRITE
  • Prompt: !,"-----------------------",?25,"-------------",?40,"-------------------------",?67,"-------------"
  • Line Location: CARH+1
Function Call: WRITE
  • Prompt: !!,?3,Y
  • Line Location: SUBH+2
Function Call: WRITE
  • Prompt: ?22,Y," Shift"
  • Line Location: SUBH+4
Function Call: WRITE
  • Prompt: ?45,"Unit ",Z
  • Line Location: SUBH+7
Function Call: WRITE
  • Prompt: "-",$P(^(0),U)
  • Line Location: SUBH+12
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ANSD(51.1 - [#9009051.1] A1+14, A1+15, A1+16
^ANSD(59 - [#9009059] AREA+1
^ANSD(59.1 - [#9009059.1] SUBH+5, SUBH+6, SUBH+9, SUBH+10, SUBH+12
^ANSD(59.3 - [#9009059.3] A2
^AUPNPAT - [#9000001] A1+4
^DD("DD" SUBH+1
^DPT - [#2] A1+1, A1+2

Label References

Name Line Occurrences
A2 A1+13
AREA SB1+3, SB1+6
CARH A1+9
HEAD A1, DISP
SB1 A1+10
SUBH A1+6, DISP

Naked Globals

Name Field # of Occurrence
^(0 A1+16, A2, SUBH+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ANSAF A1+12, A1+13
>> ANSCL AREA+4
>> ANSDFN A1+1, A1+2, A1+4
>> ANSDT SUBH
>> ANSDX SUBH+8, SUBH+11
>> ANSPAR SUBH+3
>> ANSRVOF A1+18, A1+22, A2+5
>> ANSRVON A1+18, A1+22, A2+3
>> ANSS SUBH+3*
>> ANSSH SUBH+4
>> ANSSITE A1+4
>> ANSSPAC A1+18, A1+22, A2+4
>> ANSTOT AREA+7*
>> ANSUN SUBH+5, SUBH+6, SUBH+9, SUBH+10, SUBH+12
>> I A1+10*, A1+13*, SB1+1, A2+2
IOST A1+18, A1+22, A2+3, A2+5
>> L A1+14*, A1+15, A1+16*, A1+21, A1+22, AREA+4*, AREA+5, AREA+6*, AREA+7, A2*
, A2+1
>> S SB1+1*, SB1+2, SB1+4*, SB1+5, AREA+1, AREA+4, A2*, A2+6
>> T A1+7*, A1+14, A1+18, A1+19, AREA+7*
U A1+2, A1+4, A1+13, A1+16, AREA+1, AREA+4, AREA+6, A2, SUBH+3, SUBH+4
, SUBH+6, SUBH+8, SUBH+10, SUBH+11, SUBH+12
X A1+2*, A1+3, A1+4*, A1+5, A1+13*, A1+16*, A1+21, A1+22, AREA~, AREA+1*
, AREA+6, A2*, A2+4, SUBH+4*
>> Y SUBH*, SUBH+2, SUBH+3*, SUBH+4*, SUBH+8*, SUBH+9, SUBH+10, SUBH+11*, SUBH+12
>> Z SUBH+6*, SUBH+7

Marked Items

Name Field # of Occurrence
$T(@ANSS SUBH+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All