SDMANA ;BP-CIOFO/KEITH - Make Appointment 'Next Available' functionality ; 30 Nov 99 2:38 PM
Source file <SDMANA.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
IND(SDT,SDAY,SDUR) | ;Compute indicator
|
|
INIT | ;Initialize array for counting patterns
|
|
NAVA(SC,SDT,SDUR) | ;Compute 'next available' indicator
|
|
PAT(SC,SDT) | ;Return pattern for specified date (modified clone of OVR^SDAUT1)
|
|
ACTIVE(X,SDIN,SDRE) | ;Determine if the clinic is active on a given date
|
|
PCNT(X) | ;Count open slots in a pattern
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HOLIDAY - [#40.5] | PAT+22 |
^SC - [#44] | PAT+9, PAT+12, PAT+14, PAT+15, PAT+17, PAT+18, PAT+20, PAT+24, PAT+25, PAT+26 |
Name | Line Occurrences |
---|---|
$$ACTIVE | PAT+10 |
$$IND | NAVA+21, NAVA+23 |
$$PAT | NAVA+21 |
$$PCNT | NAVA+21 |
INIT | NAVA+18 |
Name | Field # of Occurrence |
---|---|
^( | PAT+22 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CT | PCNT+3~, PCNT+4*, PCNT+6*, PCNT+7 |
DT | NAVA+19, NAVA+20 |
I | INIT+3*, PCNT+3~, PCNT+6* |
SC | NAVA~, NAVA+19, NAVA+21, PAT~, PAT+9, PAT+12, PAT+14, PAT+15, PAT+17, PAT+18 , PAT+20, PAT+24, PAT+25, PAT+26 |
SD | NAVA+16~, INIT+1!, INIT+2*, INIT+3 |
SD( | INIT+3*, PCNT+6 |
SDAY | NAVA+16~, NAVA+20*, NAVA+21, NAVA+22*, NAVA+23, IND~, IND+2, PAT+6~, PAT+11*, PAT+26 |
SDD | PAT+6~, PAT+16*, PAT+20 |
SDI | PAT+6~, PAT+12*, PAT+26, INIT+1~ |
SDIN | PAT+6~, PAT+9*, PAT+10, ACTIVE~, ACTIVE+5 |
SDIND | NAVA+16~, NAVA+18*, NAVA+19, NAVA+21*, NAVA+23*, NAVA+25 |
SDJ | PAT+6~, PAT+17! |
SDJ( | PAT+17*, PAT+20 |
SDOUT | NAVA+16~, NAVA+18*, NAVA+20, NAVA+21*, NAVA+23* |
SDRE | PAT+6~, PAT+9*, PAT+10, ACTIVE~, ACTIVE+5 |
SDS | PAT+6~, PAT+24*, PAT+25, PAT+26 |
SDSOH | PAT+6~, PAT+14*, PAT+22 |
SDT | NAVA~, NAVA+18*, NAVA+19, NAVA+21, NAVA+23, IND~, IND+2, PAT~, PAT+7*, PAT+10 , PAT+15, PAT+16, PAT+18, PAT+20, PAT+22, PAT+24, PAT+26 |
SDUR | NAVA~, NAVA+18*, NAVA+21, NAVA+23, IND~, IND+2 |
SDY | PAT+6~, PAT+17*, PAT+20*, PAT+24, PAT+25, PAT+26 |
U | PAT+9, PAT+12, PAT+22, PAT+26 |
X | ACTIVE~, ACTIVE+5, PCNT~, PCNT+4, PCNT+5*, PCNT+6 |