©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ADEPX ;IHS/HQW/MJL - DENTAL REPORT EXPORTS [ 03/24/1999 8:35 AM ]
Source file <ADEPX.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FILE(ADEFN) | ;
|
|
| END | ;K ^TMP("ADEP",ADEU)
|
|
| ZIS | ||
| HFS() | ;RETURNS U-DELIMITED LIST OF HFS DEVICES
|
|
| Z1 | ||
| OUT | ;W !
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZIS(1 - [#3.5] | HFS+5, HFS+6, HFS+7, HFS+8 |
| ^AUTTSITE(1 | FILE+17, FILE+19 |
| ^TMP("ADEP" | END+1, OUT+2, OUT+3 |
| Name | Line Occurrences |
|---|---|
| $$FILE | ADEPX+7 |
| $$HFS | ADEPX+9 |
| OUT | ADEPX+18 |
| Z1 | Z1+5 |
| ZIS | ADEPX+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZIS("IOPAR" | Z1+1* |
| ADECNT | ZIS~, ZIS+1*, Z1, Z1+4*, Z1+5, HFS+3~, HFS+4*, HFS+9* |
| >> ADEDAT | OUT+3*, OUT+4, OUT+5, OUT+6 |
| ADEFN | ADEPX+7*, Z1+1, FILE~, FILE+13*, FILE+14*, FILE+21*, FILE+23 |
| ADEHFS | ADEPX+9*, Z1, Z1+5, HFS+3~, HFS+4*, HFS+9*, HFS+10 |
| ADEIO | HFS+3~, HFS+8*, HFS+9 |
| >> ADEJ | OUT+4*, OUT+5, OUT+6 |
| ADEOS | FILE+12~, FILE+17*, FILE+18, FILE+19, FILE+21 |
| ADEPATH | FILE+12~, FILE+18*, FILE+19*, FILE+20*, FILE+21 |
| >> ADEU | ADEPX+11*, END+1, OUT+2, OUT+3 |
| ADEX | OUT+1*, OUT+2*, OUT+3, HFS+3~, HFS+4*, HFS+5*, HFS+6, HFS+7, HFS+8 |
| IO | ADEPX+17 |
| >> IOP | Z1* |
| >> POP | Z1+3 |
| U | ADEPX+5*, OUT+4, OUT+5, OUT+6, Z1, Z1+5, FILE+17, FILE+19, HFS+7, HFS+8 , HFS+9 |