APCLUTL ; IHS/CMI/LAB - Area Database Utility Routine ;
Source file <APCLUTL.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DEMOCHK(R) | ;EP - check demo pat | |
| LZERO(V,L) | ;EP - left zero fill | |
| LBLK(V,L) | ;EP - left blank fill | |
| RBLK(V,L) | ;EP right blank fill | |
| DEMO(P,T) | ;EP - called to exclude demo patients | |
| RZERO(V,L) | ;ep right zero fill | 
| Name | Field # of Occurrence | 
|---|---|
| ^DIR | DEMOCHK+4 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DIBT( | DEMO+11, DEMO+17 | 
| ^DIBT("B" | DEMO+9, DEMO+15 | 
| ^DPT - [#2] | DEMO+7, DEMO+13 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | DEMO+8~, DEMO+9*, DEMO+10, DEMO+11, DEMO+14~, DEMO+15*, DEMO+16, DEMO+17, RZERO+1~, RZERO+2* , LZERO+1~, LZERO+2*, LBLK+1~, LBLK+2*, RBLK+1~, RBLK+2* | 
| DA | DEMOCHK+1~, DEMOCHK+4! | 
| DIR | DEMOCHK+1~, DEMOCHK+4! | 
| DIR("A" | DEMOCHK+3* | 
| DIR("B" | DEMOCHK+3* | 
| DIR(0 | DEMOCHK+3* | 
| >> DIRUT | DEMOCHK+5 | 
| I | RZERO+1~, RZERO+2*, LZERO+1~, LZERO+2*, LBLK+1~, LBLK+2*, RBLK+1~, RBLK+2* | 
| L | RZERO~, RZERO+2, LZERO~, LZERO+2, LBLK~, LBLK+2, RBLK~, RBLK+2 | 
| P | DEMO~, DEMO+1, DEMO+7, DEMO+11, DEMO+13, DEMO+17 | 
| R | DEMO+4~, DEMO+5*, DEMO+6, DEMO+7*, DEMO+10*, DEMO+11*, DEMO+12, DEMO+13*, DEMO+16*, DEMO+17* , DEMO+18*, DEMOCHK~, DEMOCHK+2*, DEMOCHK+5*, DEMOCHK+6* | 
| T | DEMO~, DEMO+2*, DEMO+3, DEMO+6, DEMO+12 | 
| U | DEMO+7, DEMO+13 | 
| V | RZERO~, RZERO+2*, RZERO+3, LZERO~, LZERO+2*, LZERO+3, LBLK~, LBLK+2*, LBLK+3, RBLK~ , RBLK+2*, RBLK+3 | 
| >> Y | DEMOCHK+6 | 
| >> Z | RZERO+2*, LZERO+2*, LBLK+2*, RBLK+2* |