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 |  Local Variables |  All
Print Page as PDF
Routine: AMHLETM

Package: Mental Health Social Services

Routine: AMHLETM


Information

AMHLETM ; IHS/CMI/LAB - get time for outpatient visit ;

Source Information

Source file <AMHLETM.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 (,DD)^%DT  

Entry Points

Name Comments DBIA/ICR reference
GETTIME ;
EDTIME

External References

Name Field # of Occurrence
^%DT EDTIME+1
DD^%DT GETTIME+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: $S($D(DTIME):DTIME,1:300)
  • Variable: X
  • Line Location: GETTIME+2
Function Call: WRITE
  • Prompt: $C(7)_$C(7)," Time Required! Enter 1200 or 'D' for a default of 12 if you do not know the time."
  • Line Location: GETTIME+4
Function Call: WRITE
  • Prompt: !,"Enter time of visit, or 'D' for default."
  • Line Location: GETTIME+5
Function Call: WRITE
  • Prompt: " ",X
  • Line Location: GETTIME+6
Function Call: WRITE
  • Prompt: !!,"Invalid time entry, enter time of visit or 1200 for the default."
  • Line Location: EDTIME+1
Function Call: WRITE
  • Prompt: $C(7)_$C(7)
  • Line Location: EDTIME+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EDTIME+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHREC - [#9002011] GETTIME+1

Label References

Name Line Occurrences
GETTIME GETTIME+4, GETTIME+5, EDTIME+1, EDTIME+2, EDTIME+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EDTIME+1*, EDTIME+5!
>> AMHACTN GETTIME+2
>> AMHDATE EDTIME
>> AMHDTIME EDTIME+4*
AMHPROMP GETTIME+2*, EDTIME+5!
>> AMHR GETTIME+1
AMHTIME GETTIME+1*, GETTIME+2, GETTIME+3*, EDTIME*, EDTIME+5!
DTIME GETTIME+2
U GETTIME+1
X GETTIME+2*, GETTIME+4, GETTIME+5, GETTIME+6*, EDTIME*, EDTIME+2, EDTIME+3, EDTIME+5!
Y GETTIME+1*, EDTIME+1, EDTIME+4, EDTIME+5!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All