Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

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

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
  • Variable: NURLS
  • Timeout: DTIME
  • 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
  • Variable: X
  • Timeout: DTIME
  • Line Location: MORHELP+4
Info |  Source |  Entry Points |  Interaction Calls