©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
PSUV3 ;BIR/CFL - Create mailman messages ;10 JUL 1999
Source file <PSUV3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETDIV | ;get division name
|
|
| VARS | ; Setup variables for contents
|
|
| EN(PSUMSGT) | ;
|
|
| SETCNT | ;Set message count and line count
|
|
| XMD | ;
|
|
| NODATA | ;Send "No data to report" message
|
|
| AMIS | ;AMIS SUMMARY
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^XTMP( | EN+4, EN+7, XMD+5!, XMD+7, XMD+10*, XMD+12*, XMD+14*, XMD+18, NODATA+2* |
| ^XTMP("PSU_" | EN+5, NODATA+4*, SETCNT+3*, SETCNT+4*, GETDIV+3* |
| Name | Line Occurrences |
|---|---|
| AMIS | EN+5 |
| GETDIV | EN+8, EN+10, VARS+2 |
| NODATA | EN+4 |
| SETCNT | EN+9 |
| XMD | EN+9, NODATA+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> D | GETDIV+1* |
| >> DIC | GETDIV+1* |
| >> DIC(0 | GETDIV+1* |
| DUZ | VARS+6 |
| >> I | XMD+11*, XMD+12, XMD+14 |
| >> NONE | EN+2*, VARS+10, NODATA+3* |
| >> PSUAIS | EN+2*, NODATA+2* |
| >> PSUDIV | EN+6*, EN+7*, XMD+7, VARS+3, NODATA+1*, NODATA+2, SETCNT+1, SETCNT+2, SETCNT+3, SETCNT+4 , GETDIV+1, GETDIV+3 |
| >> PSUDIVNM | VARS+3, GETDIV+2*, GETDIV+3 |
| >> PSUDUZ | EN+9 |
| >> PSUIVSUB | EN+4, EN+7, XMD+5, XMD+7, XMD+10, XMD+12, XMD+14, XMD+18, NODATA+2 |
| >> PSUJOB | EN+5, NODATA+4, SETCNT+3, SETCNT+4, GETDIV+3 |
| PSULC | XMD+2~, XMD+7*, XMD+9* |
| >> PSUM | XMD+18*, VARS+1*, VARS+3 |
| >> PSUMASF | EN+9 |
| PSUMAX | XMD+2~, XMD+3*, XMD+4*, XMD+9 |
| PSUMC | XMD+2~, XMD+6*, XMD+9*, XMD+10, XMD+12, XMD+14, XMD+18, VARS+1, VARS+3, VARS+11 |
| >> PSUMLC | XMD+6*, XMD+8*, XMD+9*, XMD+10, XMD+12, XMD+13*, XMD+14 |
| >> PSUMON | VARS+3 |
| >> PSUMSG("L" | VARS+12*, SETCNT+2 |
| >> PSUMSG("M" | VARS+11*, SETCNT+1 |
| PSUMSGT | EN~ |
| PSUMSGT( | SETCNT+1*, SETCNT+2*, SETCNT+3, SETCNT+4 |
| PSUMSGT("L" | EN+3* |
| PSUMSGT("M" | EN+3* |
| >> PSUNOREC | EN+2* |
| >> PSUOPTN | SETCNT+3, SETCNT+4 |
| >> PSUPBMG | EN+9 |
| >> PSUSMRY | EN+8 |
| >> PSUSNDR | NODATA+1 |
| PSUTLC | XMD+2~, XMD+17*, XMD+18*, VARS+10*, VARS+12 |
| PSUTMC | XMD+2~ |
| >> PSUXMYH | VARS+7, NODATA+5* |
| >> PSUXMYS1 | NODATA+5 |
| >> X | XMD+7*, XMD+10, XMD+11, XMD+12, XMD+14, XMD+18*, GETDIV+1*, GETDIV+2* |
| >> XMCHAN | VARS+5* |
| >> XMDUZ | VARS+6* |
| >> XMSUB | VARS+3* |
| >> XMTEXT | VARS+4* |
| >> XMY | VARS+7* |
| >> Y | GETDIV+2 |
| >> Z | EN+6*, XMD+11* |