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 |