SDRRISRU ;10N20/MAH;Recall Reminder Utilities ;01/18/2008 11:32
Source file <SDRRISRU.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 1 | ($$DOW,$$FMADD,$$NOW,$$SCH)^XLFDT |
VA Fileman | 1 | UPDATE^DIE |
Name | Comments | DBIA/ICR reference |
---|---|---|
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 |
|
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) |
|
DELAPPT(SDRRIEN,APPT,CLIN1) | ; Record deleted from Recall List because of appointment.
|
|
DELSET(SDRRIEN,SDRRFDA) | ;
|
|
DELUSER(SDRRIEN) | ; Record deleted by a user.
|
|
DELETE | ; This entry point is invoked by the new style xref A66201 on the .01 field of file 403.5
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HOLIDAY - [#40.5] | YEAR+7 |
^SC - [#44] | OPENSLOT+15, OPENSLOT+17, OPENSLOT+20, OPENSLOT+24, OPENSLOT+27, OPENSLOT+28 |
^SD(403.5 | DELSET+2 |
Name | Line Occurrences |
---|---|
$$AVAIL | OPENSLOT+29 |
DELAPPT | DELETE+2 |
DELSET | DELAPPT+4, DELUSER+5 |
DELUSER | DELETE+3 |
YEAR | OPENSLOT+19 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APPT | DELETE+1, DELETE+2, DELAPPT~, DELAPPT+2 |
CK | OPENSLOT+6~ |
CLIN1 | OPENSLOT+6~, DELETE+1, DELETE+2, DELAPPT~, DELAPPT+3 |
DA | OPENSLOT+6~, DELETE+3 |
DFN | OPENSLOT+6~ |
DT | OPENSLOT+7 |
DUZ | DELUSER+3 |
I | AVAIL+4~, AVAIL+7* |
SDRRCHAR | AVAIL+4~, AVAIL+7*, AVAIL+8, AVAIL+9 |
SDRRCNT | AVAIL+4~, AVAIL+5*, AVAIL+8*, AVAIL+9*, AVAIL+10 |
SDRRDA | OPENSLOT+5~, DELETE+1, DELETE+2 |
SDRRDOW | OPENSLOT+16~, OPENSLOT+17* |
SDRRDT | OPENSLOT+5~, OPENSLOT+21*, OPENSLOT+22*, OPENSLOT+23, OPENSLOT+24, OPENSLOT+26, OPENSLOT+27, YEAR+2~, YEAR+3*, YEAR+4 , YEAR+5*, YEAR+6, YEAR+7 |
SDRRFDA | DELAPPT+1~, DELAPPT+4, DELUSER+1~, DELUSER+5, DELSET~ |
SDRRFDA( | DELAPPT+2*, DELAPPT+3*, DELUSER+2*, DELUSER+3*, DELUSER+4*, DELSET+3*, DELSET+4*, DELSET+5*, DELSET+6*, DELSET+7* , DELSET+8*, DELSET+9*, DELSET+10*, DELSET+11*, DELSET+12*, DELSET+13* |
SDRRFTR | OPENSLOT+6~, DELUSER+4 |
SDRRHOL | OPENSLOT+5~, OPENSLOT+20*, OPENSLOT+23 |
SDRRI | OPENSLOT+16~, OPENSLOT+17*, YEAR+2~, YEAR+4* |
SDRRIEN | OPENSLOT~, OPENSLOT+15, OPENSLOT+17, OPENSLOT+20, OPENSLOT+24, OPENSLOT+27, OPENSLOT+28, DELAPPT~, DELAPPT+4, DELUSER~ , DELUSER+5, DELSET~, DELSET+2 |
SDRRND | OPENSLOT~, OPENSLOT+8, OPENSLOT+9*, OPENSLOT+10*, OPENSLOT+11, OPENSLOT+12*, OPENSLOT+22, YEAR+4 |
SDRRNOAV | OPENSLOT+5~, OPENSLOT+14*, OPENSLOT+17*, OPENSLOT+18 |
SDRRPAT | AVAIL~, AVAIL+6*, AVAIL+7 |
SDRRREC | DELSET+1~, DELSET+2*, DELSET+3, DELSET+4, DELSET+5, DELSET+6, DELSET+7, DELSET+8, DELSET+9, DELSET+10 , DELSET+11, DELSET+12, DELSET+13 |
SDRRST | OPENSLOT~, OPENSLOT+7*, OPENSLOT+9, OPENSLOT+11, OPENSLOT+13*, OPENSLOT+15, OPENSLOT+17, OPENSLOT+21, YEAR+3 |
SDRRT | OPENSLOT+5~, OPENSLOT+26*, OPENSLOT+27, OPENSLOT+28 |
SDRRTOT | OPENSLOT+5~, OPENSLOT+21*, OPENSLOT+29*, OPENSLOT+30 |
SDRRTPDT | OPENSLOT+5~, OPENSLOT+24*, OPENSLOT+25, OPENSLOT+28*, OPENSLOT+29 |
SDRRTPT | OPENSLOT+5~, OPENSLOT+27*, OPENSLOT+28 |
SDRRYEAR | OPENSLOT+19~ |
SDRRYEAR( | OPENSLOT+22, OPENSLOT+23, OPENSLOT+26, YEAR+6*, YEAR+7* |
U | OPENSLOT+20, OPENSLOT+23, YEAR+7, DELSET+3, DELSET+4, DELSET+5, DELSET+6, DELSET+7, DELSET+8, DELSET+9 , DELSET+10, DELSET+11, DELSET+12, DELSET+13 |