PXRMCDUE ;SLC/PKR - Custom date due calculation routines. ;02/04/2011
Source file <PXRMCDUE.m>
Package | Total | Call Graph |
---|---|---|
Clinical Reminders | 4 | ($$FULLDATE,$$NEWDATE)^PXRMDATE $$VFREQ^PXRMINTR POSTFIX^PXRMSTAC AWRITE^PXRMUTIL |
VA Fileman | 2 | EN^DDIOL UPDATE^DIE |
Kernel | 1 | $$UP^XLFSTR |
Package | Total | Caller Graph |
---|---|---|
Clinical Reminders | 4 | PXRMDATE PXRMOUTC PXRMP18I PXRMPTL |
Name | Comments | DBIA/ICR reference |
---|---|---|
CDBUILD(STRING,DA) | ;Given a custom date due string build the data
|
|
MINDATE(NARGS,DLIST) | ;Return the minimum date from a list of dates in DLIST.
|
|
CDKILL(X,DA) | ;
|
|
TEXT | ;Custom Date Due help text.
|
|
PARSE(STRING,FUNCTION,NARGS,FILIST,FREQLIST,OPLIST) | ;Parse a custom date due
|
|
VFUN(FUNCTION) | ;Make sure FUNCTION is a valid function.
|
|
VCDUE(STRING,DA) | ;Make sure a custom date due string is valid.
|
|
MAXDATE(NARGS,DLIST) | ;Return the maximum date from a list of dates in DLIST.
|
|
RANKDATE(NARGS,DLIST) | ;Return the first non-zero date from the list of dates
|
|
CDUEDATE(DEFARR,FIEVAL) | ;Do the custom date due calculation and return
|
|
XHELP | ;Executable help for custom date due.
|
|
OUTPUT(CDUEDATA,DEFARR) | ;Build the custom date due output text.
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PXD(811.9 - [#811.9] | CDKILL+5!, OUTPUT+4, VCDUE+14 |
^TMP( | CDUEDATE+22* |
Name | Line Occurrences |
---|---|
$$MAXDATE | CDUEDATE+13 |
$$MINDATE | CDUEDATE+13 |
$$RANKDATE | CDUEDATE+13 |
$$VFUN | VCDUE+9 |
PARSE | CDBUILD+11, VCDUE+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CDUEDATA | OUTPUT~, OUTPUT+2, OUTPUT+3, OUTPUT+8 |
CDUEFI | OUTPUT+1~, OUTPUT+2*, OUTPUT+4, OUTPUT+7 |
DA | CDBUILD~, CDBUILD+12, CDBUILD+14, CDBUILD+17, CDKILL~, CDKILL+5, VCDUE~, VCDUE+5, VCDUE+14 |
DATE | CDUEDATE+2~, CDUEDATE+10*, CDUEDATE+11*, CDUEDATE+12, CDUEDATE+21*, CDUEDATE+22, MINDATE+2~, MINDATE+5*, RANKDATE+2~, RANKDATE+3* , RANKDATE+4*, RANKDATE+5 |
DDUE | CDUEDATE+2~, CDUEDATE+14*, CDUEDATE+15, CDUEDATE+23 |
DEFARR | CDUEDATE~, OUTPUT~ |
DEFARR("IEN" | OUTPUT+4 |
DEFARR(46 | CDUEDATE+3, CDUEDATE+4 |
DEFARR(47 | CDUEDATE+6, CDUEDATE+17 |
>> DIUTIL | CDBUILD+5, CDKILL+2, VCDUE+2 |
DLIST | CDUEDATE+2~, CDUEDATE+13, MAXDATE~, MINDATE~, RANKDATE~ |
DLIST( | CDUEDATE+12*, MAXDATE+3, MINDATE+5, RANKDATE+4 |
DONE | XHELP+1~, XHELP+2*, XHELP+3, XHELP+5* |
ENTRY | OUTPUT+1~, OUTPUT+5*, OUTPUT+6 |
FDA | CDBUILD+8~ |
FDA( | CDBUILD+13*, CDBUILD+18*, CDBUILD+19*, CDBUILD+20* |
FI | CDUEDATE+2~, CDUEDATE+7*, CDUEDATE+10, CDUEDATE+18*, CDUEDATE+21, CDUEDATE+22 |
FIEVAL | CDUEDATE~ |
FIEVAL( | CDUEDATE+10, CDUEDATE+21 |
FILIST | CDBUILD+8~, CDBUILD+11, PARSE~, VCDUE+7~, VCDUE+8 |
FILIST( | CDBUILD+18, PARSE+14*, VCDUE+14, VCDUE+15 |
FINAME | OUTPUT+1~, OUTPUT+6*, OUTPUT+7 |
FREQ | CDUEDATE+2~, CDUEDATE+8*, CDUEDATE+12, CDUEDATE+19*, CDUEDATE+22 |
FREQLIST | CDBUILD+8~, CDBUILD+11, PARSE~, VCDUE+7~, VCDUE+8 |
FREQLIST( | CDBUILD+19, PARSE+15*, VCDUE+22, VCDUE+23 |
FUNCTION | CDBUILD+8~, CDBUILD+11, CDBUILD+13, CDUEDATE+2~, CDUEDATE+3*, CDUEDATE+13, PARSE~, PARSE+8*, VCDUE+7~, VCDUE+8 , VCDUE+9, VCDUE+11, VFUN~, VFUN+1, VFUN+2, VFUN+3 |
IENB | CDBUILD+8~, CDBUILD+14*, CDBUILD+16*, CDBUILD+17 |
IENS | CDBUILD+8~, CDBUILD+12*, CDBUILD+13, CDBUILD+17*, CDBUILD+18, CDBUILD+19, CDBUILD+20 |
IND | CDBUILD+8~, CDBUILD+15*, CDBUILD+18, CDBUILD+19, CDBUILD+20, CDUEDATE+2~, CDUEDATE+5*, CDUEDATE+6, CDUEDATE+12, CDUEDATE+16* , CDUEDATE+17, MAXDATE+1~, MAXDATE+3*, MINDATE+2~, MINDATE+5*, PARSE+5~, PARSE+10*, PARSE+11, PARSE+13, PARSE+14 , PARSE+15, RANKDATE+2~, RANKDATE+4*, VCDUE+7~, VCDUE+13*, VCDUE+14, VCDUE+15, VCDUE+18, VCDUE+22, VCDUE+23 , XHELP+1~, XHELP+3* |
INDS | MAXDATE+1~, MAXDATE+2*, MAXDATE+3*, MAXDATE+4, MINDATE+2~, MINDATE+3*, MINDATE+5*, MINDATE+7, RANKDATE+2~, RANKDATE+3* , RANKDATE+4*, RANKDATE+5 |
MAXDATE | MAXDATE+1~, MAXDATE+2*, MAXDATE+3*, MAXDATE+4 |
MINDATE | MINDATE+2~, MINDATE+4*, MINDATE+5*, MINDATE+6*, MINDATE+7 |
MSG | CDBUILD+8~, CDBUILD+22 |
NARGS | CDBUILD+9~, CDBUILD+11, CDBUILD+13, CDBUILD+15, CDUEDATE+2~, CDUEDATE+4*, CDUEDATE+5, CDUEDATE+13, MAXDATE~, MAXDATE+3 , MINDATE~, MINDATE+5, PARSE~, PARSE+9*, PARSE+12*, PARSE+14, PARSE+15, PARSE+16, RANKDATE~, RANKDATE+4 , VCDUE+7~, VCDUE+8, VCDUE+13 |
OPER | PARSE+5~, PARSE+6*, PARSE+7, PARSE+11 |
OPLIST | CDBUILD+9~, CDBUILD+11, PARSE~, VCDUE+7~, VCDUE+8 |
OPLIST( | CDBUILD+20, PARSE+16*, VCDUE+18 |
PFSTACK | CDBUILD+9~, PARSE+5~, PARSE+7 |
PFSTACK( | PARSE+11, PARSE+13, PARSE+14, PARSE+15 |
PFSTACK(0 | PARSE+10 |
PFSTACK(1 | PARSE+8 |
PM | CDUEDATE+2~, CDUEDATE+9*, CDUEDATE+12, CDUEDATE+20*, CDUEDATE+22, OUTPUT+1~, OUTPUT+3*, OUTPUT+8, PARSE+5~, PARSE+13* , PARSE+14, PARSE+15, PARSE+16 |
>> PXRMEXCH | CDBUILD+7, CDKILL+4, VCDUE+4 |
>> PXRMITEM | CDUEDATE+22 |
>> PXRMPID | CDUEDATE+22 |
STRING | CDBUILD~, CDBUILD+10*, CDBUILD+11, PARSE~, PARSE+7, VCDUE~, VCDUE+6, VCDUE+8 |
TEMP | CDUEDATE+2~, CDUEDATE+6*, CDUEDATE+7, CDUEDATE+8, CDUEDATE+9, CDUEDATE+13*, CDUEDATE+14, CDUEDATE+16, CDUEDATE+17*, CDUEDATE+18 , CDUEDATE+19, CDUEDATE+20 |
TEXT | OUTPUT+1~, OUTPUT+7*, OUTPUT+8*, OUTPUT+9, VCDUE+7~, VCDUE+11*, VCDUE+12, VCDUE+15*, VCDUE+16, VCDUE+19* , VCDUE+20, VCDUE+23*, VCDUE+24, XHELP+1~, XHELP+4*, XHELP+5, XHELP+6 |
U | CDUEDATE+3, CDUEDATE+4, CDUEDATE+7, CDUEDATE+8, CDUEDATE+9, CDUEDATE+14, CDUEDATE+16, CDUEDATE+18, CDUEDATE+19, CDUEDATE+20 , CDUEDATE+22, MAXDATE+4, MINDATE+7, OUTPUT+2, OUTPUT+3, OUTPUT+4, OUTPUT+6, OUTPUT+8, RANKDATE+5 |
VALID | VCDUE+7~, VCDUE+9*, VCDUE+10, VCDUE+17*, VCDUE+21*, VCDUE+25*, VCDUE+26 |
VPTR | OUTPUT+1~, OUTPUT+4*, OUTPUT+5 |
X | CDKILL~ |
Name | Field # of Occurrence |
---|---|
$T(TEXT+IND | XHELP+4 |