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 |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Routine: PXDATE

Package: PCE Patient Care Encounter

Routine: PXDATE


Information

PXDATE ;SLC/PKR - Routines for dealing with dates. ;12/19/2022

Source Information

Source file <PXDATE.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 2 ^%DT  ^DIR  
Kernel 1 ($$FMADD,$$FMTE,$$NOW)^XLFDT  
PCE Patient Care Encounter 1 $$GETDT^PXDATE  

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: 12

Package Total Caller Graph
PCE Patient Care Encounter 12 PXAIVAL  PXAIVSTV  PXCEHF  PXCEPED  PXCEPOV1  PXCEPRV  PXCESC  PXCESK  
PXCEVIMM  PXCEXAM  PXCPTAPI  PXDATE  

Entry Points

Name Comments DBIA/ICR reference
EVENTDT(DEFAULT,HELP) ;Edit Event Date and Time.
FUTURE(DATE) ;Return 1 if DATE is in the future.
GETDT(REQTIME,BEFORE,AFTER,DEFAULT,PROMPT,HELP) ;General date/time entry
ISLEAP(YEAR) ;Given a 3 digit FileMan year return 1 if it is a leap year,
VFMDATE(X,%DT) ;Is X a valid FileMan date?

External References

Name Field # of Occurrence
^%DT VFMDATE+2
^DIR GETDT+21
$$GETDT^PXDATE EVENTDT+3
$$FMADD^XLFDT GETDT+12, GETDT+13
$$FMTE^XLFDT GETDT+19
$$NOW^XLFDT FUTURE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("PXK" GETDT+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT VFMDATE~
AFTER GETDT~, GETDT+12
AFTERDT GETDT+10~, GETDT+12*, GETDT+15
BEFORE GETDT~, GETDT+13
BEFOREDT GETDT+10~, GETDT+13*, GETDT+15
DATE FUTURE~, FUTURE+1
DEFAULT EVENTDT~, EVENTDT+3, GETDT~, GETDT+19, GETDT+23
DIR GETDT+10~
DIR("??" GETDT+20*
DIR("A" GETDT+18*
DIR("B" GETDT+19*
DIR(0 GETDT+15*, GETDT+17*
DIRUT EVENTDT+1~, EVENTDT+4
EVENTDT EVENTDT+1~, EVENTDT+3*, EVENTDT+4, EVENTDT+5
HELP EVENTDT~, EVENTDT+3, GETDT~, GETDT+20
PROMPT EVENTDT+1~, EVENTDT+2*, EVENTDT+3, GETDT~, GETDT+18
>> PXCEEND EVENTDT+4*
REQTIME GETDT~, GETDT+16*, GETDT+17
U GETDT+11
VISITDT GETDT+10~, GETDT+11*, GETDT+12, GETDT+13
X GETDT+10~, GETDT+22, GETDT+23, VFMDATE~
Y GETDT+10~, GETDT+22*, GETDT+23*, GETDT+24, VFMDATE+1~, VFMDATE+3
YEAR ISLEAP~, ISLEAP+2*, ISLEAP+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Local Variables  | All