SDRRUTL ;10N20/MAH - UTILITIES FOR RECALL REMINDERS ;FEB 04, 2016
Source file <SDRRUTL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ASKDIV(SDRRDIV) | ;
|
|
ASKSTOP(SDRRSC,SDRRST,SDRRND) | ;
|
|
ASKCLIN(SDRRCLIN,SDRRDIV,SDRRST,SDRRND) | ;
|
|
DELIM() | ;
|
|
REVERSE(SDRRST,SDRRND) | ; Given starting and ending dates return reverse starting and ending dates
|
|
DRANGE(SDRRST,SDRRND,SDRRSTX,SDRRNDX,SDRRABORT,SDRRMIN,SDRRMAX,SDRRFUTR) | ;
; Set SDRRFUTR=1 if dates in the future are OK. |
|
ASKDATE(SDRRST,SDRRSTX,SDRRABORT,SDRRMIN,SDRRMAX,SDRRFUTR) | ;
|
|
FYRANGE(SDRRST,SDRRND,SDRRSTX,SDRRNDX,SDRRABORT,SDRRMIN,SDRRMAX) | ;
|
|
ASKFY(SDRRMIN,SDRRMAX,SDRRDEF,SDRRPRMPT) | ; Function asks user which FY.
|
|
FY(SDRRDT) | ; Pass in a date (default = today's date),
; and this function returns what FY we are in, ; followed by the FY start date and FY end date. ; ie. S X=$$FY^SDRRUTL(3050208) results in X="FY 2005^3041000^3051000" |
|
ASKMON(SDRRMON) | ; Function asks user which month.
; SDRRMON - (optional) default month |
|
MON(SDRRDT) | ; Pass in a date (default = today's date),
; and this function returns the first and last dates of the month. |
|
BDAY | ;
|
|
SCREEN() | ;SD*571 for new RRs, screen provider for key and status
|
|
MSG1 | ;SD*571 print Inactive provider warning message to user
|
|
MSG2 | ;SD*571 print Security Key warning message to user
|
|
FDA | ;SD*571 insure original provider pointer is back in 403.5 record
|
|
SCREEN1() | ; SD*582 screen clinic for add/edits - don't allow if clinic
; type is not clinic OR ; already inactive OR ; scheduled to be inactivated on OR ; before recall date OR not being reactivated until after selected recall date. |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DIC(40.7 - [#40.7] | Classic Fileman Calls |
^DG(40.8 - [#40.8] | Classic Fileman Calls |
^SC - [#44] | GET1^DIQ |