SDRRISRU ;ALB/MAH,BWF,JAS - Recall Reminder Utilities ;NOV 25, 2024
Source file <SDRRISRU.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
OPENSLOT(SDRRIEN,SDRRST,SDRRND) | ; Function returns the number of open (available)
; slots at the clinic during the time period. ; SDRRIEN - IEN of clinic in file #44 ; SDRRST - (optional) start checking on this date (default=today) ; SDRRND - (optional) end of time period (default=last day of month) |
|
AVAIL(SDRRPAT) | ; Given pattern, returns number of available slots.
; Check the pattern for available slots ; 0-9 and j-z = available slots where j=10, k=11...z=26 ; $A(1)=49 $A(9)=57 $A("j")=106 $A("z")=122 |
|
YEAR | ; Set-up 1 year dates
; This array is used for available appointments |
|
DELETE | ; This entry point is invoked by the new style xref A66201 on the .01 field of file 403.5
|
|
DELAPPT(SDRRIEN,APPT,CLIN1) | ; Record deleted from Recall List because of appointment.
|
|
DELUSER(SDRRIEN) | ; Record deleted by a user.
|
|
DELSET(SDRRIEN,SDRRFDA) | ;
|
|
GETAPPT(RECALLIEN) | ;
|
FileNo | Call Tags |
---|---|
^SD(403.5 - [#403.5] | GET1^DIQ, ROOT^DILFD |
^SDEC(409.84 - [#409.84] | GET1^DIQ |