ASDHS ; IHS/ADC/PDW/ENM - HS BY CLINIC ; [ 03/25/1999 11:48 AM ]
Source file <ASDHS.m>
| Package | Total | Call Graph | 
|---|---|---|
| Scheduling | 3 | ROUT^SDDIV END^SDROUT1 (DIV,DT)^SDUTL | 
| IHS Changes To Scheduling | 2 | (GO,GOT)^ASDHS1 $$DIV^ASDUT | 
| Registration | 2 | ZIS^DGUTQ CLINIC^VAUTOMA | 
| VA Fileman | 2 | ^%DT ^DIR | 
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 | 
| Package | Total | Caller Graph | 
|---|---|---|
| IHS Changes To Scheduling | 1 | ASDAIU1 | 
| Scheduling | 1 | SD IHS HS BY CLINIC | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SORT | ; -- ask user for sort option | |
| END | ; -- eoj | |
| START | ;EP; loop thru clinics and appts to get patients | |
| A5 | ; | |
| CLIN | ; -- sorts by clinic | |
| CHECK2 | ; -- checks if clinic belongs to prin clinic chosen | |
| CHECK | ; -- checks out clinic (active?, in division?, etc.) | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^SC - [#44] | START+7, START+10, START+11, START+12, CLIN+5, CLIN+6, CLIN+7, CHECK+1, CHECK2+2, CHECK2+3 | 
| ^UTILITY("SDHS" | START+2! | 
| Name | Line Occurrences | 
|---|---|
| CHECK | START+7, CLIN+3 | 
| CHECK2 | START+8 | 
| CLIN | START+4 | 
| END | ASDHS+3, SORT+7, SORT+10, SORT+13, SORT+22 | 
| START | A5+6 | 
| Name | Field # of Occurrence | 
|---|---|
| ^("I" | CHECK+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> %DT | SORT+12* | 
| >> %DT("A" | SORT+12*, SORT+13! | 
| %I | END+2! | 
| ADGDEV | A5+3*, A5+4! | 
| ALL | END+1! | 
| ASDT | START+1~, START+9*, START+10*, START+11, START+12, CLIN+4*, CLIN+5*, CLIN+6, CLIN+7 | 
| ASDX | START+1~, START+6*, START+7*, START+10, START+11, START+12, CLIN+3*, CLIN+5, CLIN+6, CLIN+7 , CHECK+1, CHECK2+2 | 
| ASDY | START+1~, START+11*, START+12, CLIN+6*, CLIN+7 | 
| >> ASDZ | CLIN+1*, CLIN+2*, CLIN+3 | 
| C | END+2! | 
| >> DGPGM | A5+2* | 
| DIR | SORT+2!, SORT+7!, SORT+15! | 
| DIR("?" | SORT+4*, SORT+5*, SORT+6*, SORT+17*, SORT+18*, SORT+19*, SORT+20*, SORT+21*, SORT+22* | 
| DIR("A" | SORT+3*, SORT+16* | 
| DIR("B" | SORT+2*, SORT+15* | 
| DIR(0 | SORT+2*, SORT+15* | 
| >> DIRUT | SORT+7, SORT+22 | 
| DIV | ASDHS+3*, SORT+9, END+1!, CHECK+1 | 
| DT | SORT+11 | 
| I | END+2! | 
| IO | START+2 | 
| IO("Q" | A5+6 | 
| ORD | END+1! | 
| ORDER | SORT+1*, SORT+7*, END+1!, START+4 | 
| >> POP | A5+5 | 
| RMSEL | END+1! | 
| >> SDATE | SORT+13*, START+9, START+10, CLIN+4, CLIN+5, CHECK+1 | 
| SDEF | END+2! | 
| SDIQ | ASDHS+4*, END+1! | 
| SDREP | ASDHS+4*, END+1! | 
| SDSP | END+1! | 
| SDSTART | ASDHS+4*, END+1! | 
| SDX | ASDHS+4*, END+2! | 
| SDZAI | SORT+23*, START+13!, CLIN+8! | 
| SDZEF | SORT+23*, START+13!, CLIN+8! | 
| SDZMP | SORT+23*, START+13!, CLIN+8! | 
| U | START+12, CLIN+7, CHECK+1, CHECK2+2, CHECK2+3 | 
| V | END+2! | 
| >> VAR | A5+1* | 
| VAUTC | START+4, START+8, START+13!, CLIN+8! | 
| VAUTC( | CLIN+2, CLIN+3, CHECK2+3 | 
| VAUTD | SORT+9*, START+13!, CLIN+8! | 
| >> VAUTNI | SORT+10* | 
| X | END+2!, CHECK2+1~, CHECK2+2*, CHECK2+3 | 
| Y | ASDHS+3, SORT+7, SORT+10, SORT+13, SORT+23, END+2! |