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 |  All
Print Page as PDF
Routine: NURAED4

Package: Nursing Service

Routine: NURAED4


Information

NURAED4 ;HIRMFO/MD/RM-DATA ENTRY FOR POSITION ;10/15/90

Source Information

Source file <NURAED4.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^%DT  D^DIQ  
Kernel 1 EN1^XQH  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Nursing Service 1 NURAED1  

Entry Points

Name Comments DBIA/ICR reference
STST ; SET START DATE FOR POSITION DISPLAY
EDTMAIL ;
PRT
STDT ; SET THE DATE
EDTADD ;
GETNOD ;OBTAIN POINTER TO VA(200
CPDS ; SELECT A DATE IF PAST SELECTED
MORHELP ;

External References

Name Field # of Occurrence
^%DT CPDS+4
D^DIQ CPDS+2
EN1^XQH MORHELP+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"STREET ADDRESS: ",NURSADD1
  • Line Location: EDTADD+4
Function Call: WRITE
  • Prompt: !,"MAILING ADDRESS: ",NURSADD1
  • Line Location: EDTMAIL+5
Function Call: WRITE
  • Prompt: !,"CITY: ",NURSCITY,!,"STATE: ",NURSTATE,?20,"ZIP CODE: ",NURSZIP
  • Line Location: PRT+1
Function Call: READ
  • Timeout: DTIME
  • Variable: NURLS
  • Line Location: STST+1
Function Call: WRITE
  • Prompt: $C(7),!!?4,"ENTER A C TO SEE CURRENT POSITIONS,",!?12,"P TO SEE PAST POSITIONS"
  • Line Location: STST+3
Function Call: WRITE
  • Prompt: $C(7),!!?4,"SELECT A DATE THAT PRECEEDS ALL POSITION START DATES IN THE DESIRED DISPLAY."
  • Line Location: CPDS+3
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: CPDS+5
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: MORHELP+1
Function Call: WRITE
  • Prompt: !!?5,"TO ADD NEW POSITIONS ENTER THE LETTER 'N'."
  • Line Location: MORHELP+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: MORHELP+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] EDTADD+3, EDTMAIL+4
^NURSF(210 - [#210] EDTMAIL+2, EDTMAIL+4, GETNOD+1, CPDS+2
^VA(200 - [#200] EDTADD+1, EDTADD+3

Label References

Name Line Occurrences
CPDS CPDS+5
GETNOD EDTADD+1
PRT EDTADD+4
STDT STST+4
STST STST+3

Naked Globals

Name Field # of Occurrence
^( EDTADD+1, EDTADD+3
^(0 EDTADD+3, EDTMAIL+4, CPDS+2
^(15 EDTMAIL+2, EDTMAIL+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT CPDS+4*!
%DT("A" CPDS+1*
%DT("B" CPDS+2*
%DT(0 CPDS+2*
>> DA EDTMAIL+2, EDTMAIL+4
>> DIRUT MORHELP+2
DT STDT+1
DTIME STST+1, MORHELP+4
ID EDTADD+1, EDTADD+3, PRT+2!, GETNOD+1*
>> NURLS STST+1*, STST+2*, STST+3, STST+4, STDT+1
>> NUROUT STST+1*, CPDS+4*, MORHELP+2*, MORHELP+4*
NURSADD1 EDTADD+3*, EDTADD+4, EDTMAIL+4*, EDTMAIL+5, PRT+2!
NURSADD2 EDTADD+3*, EDTMAIL+4*, PRT, PRT+2!
NURSADD3 EDTADD+3*, EDTMAIL+4*, PRT, PRT+2!
>> NURSASS("" MORHELP+2, MORHELP+3
NURSCITY EDTADD+3*, EDTMAIL+4*, PRT+1, PRT+2!
>> NURSDBA GETNOD+1, CPDS+2
NURSTATE EDTADD+3*, EDTMAIL+4*, PRT+1, PRT+2!
>> NURSTDT STDT+1*
NURSW EDTADD+1!, EDTADD+2*, EDTMAIL+1!, EDTMAIL+3*
NURSZIP EDTADD+3*, EDTMAIL+4*, PRT+1, PRT+2!
U CPDS+2, MORHELP+4
>> X STST+3*, CPDS+4, MORHELP+4*
XQH MORHELP+2*!
>> Y CPDS+2*, CPDS+5, STDT+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All