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

Package: Mental Health

Routine: YSAST


Information

YSAST ;ALB/ASF/692/DCL-ASI TIME FUNCTION ;7/30/96 11:20

Source Information

Source file <YSAST.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA FileMan 2 HLP^DDSUTL  $$GET^DDSVAL  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health 1 ^YSTX(604  

Entry Points

Name Comments DBIA/ICR reference
X(X)
A
DNE
ERR
CNV(X) ; Convert Start/Stop to minutes AFTER MIDNIGHT RETURN startmin^stopmin
MIL(X,Y) ; Convert from AM/PM to 2400
; X=time Y: 0=Mid=0,1=Mid=2400 Output: Y=time in 2400
DVAL051 ;
DVAL052 ;
HELP ; Time Help
HLP ;

External References

Name Field # of Occurrence
HLP^DDSUTL DVAL051+8, DVAL052+8, HLP+5
$$GET^DDSVAL DVAL051+2, DVAL052+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: DVAL051+6
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: DVAL052+6
Function Call: WRITE
  • Prompt: !?5,"Time may be entered as 8A or 8a, 8:00A, 8:15A, 8:15AM or military"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !?5,"time: 0800, 1300; or MID or 12M for midnight; NOON or 12N for noon."
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !?5,"Time must be in quarter hours; e.g., 8A or 8:15A or 8:30A or 8:45A.",!
  • Line Location: HELP+3

Label References

Name Line Occurrences
$$CNV DVAL051+4, DVAL052+4
$$MIL CNV+4, CNV+5
A X+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNX CNV+2~, CNV+4*, CNV+5, CNV+6
>> DA DVAL051+2, DVAL052+2
>> DDSERROR DVAL051+7*, DVAL052+7*
>> DIE DVAL051+2, DVAL052+2
X X~, X+2*, X+3*, X+4*, X+5*, X+6, X+7, X+8*, X+9, X+10*
, X+11*, A, A+1*, A+2, A+4*, A+5, ERR!, CNV~, CNV+4*, CNV+5*
, MIL~, MIL+2, MIL+3, DVAL051+4, DVAL052+4
X1 X+1~, X+5*, X+6*, X+8*, X+10, X+11, A+1*, A+2*, A+4, DNE!
, ERR!
Y CNV+2~, CNV+4*, CNV+5*, CNV+6*, CNV+7, MIL~, MIL+2*, MIL+3*, MIL+4*, MIL+5
YSAS DVAL051+1~, DVAL051+2*, DVAL051+3, DVAL051+4*, DVAL051+5, DVAL052+1~, DVAL052+2*, DVAL052+3, DVAL052+4*, DVAL052+5
, HLP+1~, HLP+5
YSAS(1 HLP+2*
YSAS(2 HLP+3*
YSAS(3 HLP+4*
>> YSASI0 DVAL051+8, DVAL052+8
>> YSASI1 DVAL051+8, DVAL052+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All