PSOPOST8 ;BIR/EJW-Post install routine - patch PSO*7*129 ;11/14/02
Source file <PSOPOST8.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| MAIL2 | ; | |
| END | ; | |
| GETPT | ; GET PATIENT INFORMATION | |
| RES | ; | |
| GETLIST | ; PROCESS ENTRIES FROM ^XTMP("PSOPOST7" GLOBAL | |
| GETPA | ; | |
| GETIVUD | ; | |
| ; | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD("DILOCKTM" | PSOPOST8+7 | 
| ^DPT - [#2] | GETLIST+5, GETPT+2, GETIVUD+2 | 
| ^PSRX - [#52] | GETLIST+8, GETPA+2 | 
| ^TMP($J | GETLIST+1!, GETLIST+8*, MAIL+10, MAIL+11, MAIL+13, MAIL+16, MAIL+17, GETPA+2*, GETIVUD+3*, END+1! | 
| ^XTMP("PSOPOST7" | PSOPOST8+7, PSOPOST8+12, RES+2, GETLIST+2, GETLIST+3, GETLIST+6, GETLIST+8, GETPA+1, GETPA+2, GETIVUD+1 | 
| ^XTMP("PSOTIMEX" | RES+3*, MAIL+2 | 
| ^XUSEC("PSNMGR" | MAIL+5, MAIL2+2 | 
| Name | Line Occurrences | 
|---|---|
| END | MAIL+20, MAIL2+12 | 
| GETIVUD | GETLIST+4 | 
| GETPA | GETLIST+7 | 
| GETPT | MAIL+12 | 
| MAIL2 | PSOPOST8+11, RES+2 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> % | RES+3, MAIL+1 | 
| CNT | MAIL+9*, MAIL+12*, MAIL+14*, MAIL+15*, MAIL+16*, MAIL+17*, MAIL+18*, END+2! | 
| DFN | MAIL+11*, MAIL+13, MAIL+16, MAIL+17, GETPT+2, END+2! | 
| DIFROM | MAIL+19~, MAIL2+11~ | 
| DT | RES+1* | 
| DUZ | MAIL+4, MAIL2+1 | 
| MSG | PSOPOST8+11*, RES+2*, MAIL2+1, MAIL2+5, MAIL2+8, END+2! | 
| NAM | GETLIST+5*, GETLIST+8, MAIL+10*, MAIL+11, MAIL+13, MAIL+16, MAIL+17, GETPA+2, GETIVUD+2*, GETIVUD+3 , END+2! | 
| PSOCXPDA | MAIL+5*, MAIL2+2*, END+2! | 
| PSODT | GETPA+1*, GETPA+2, END+2! | 
| PSOJOB | GETLIST+2*, GETLIST+3, GETLIST+6, GETLIST+8, GETPA+1, GETPA+2, GETIVUD+1, END+2! | 
| >> PSORX | GETLIST+8*, MAIL+16*, MAIL+17*, GETPA+2* | 
| >> PSORXP | GETLIST+8*, GETPA+2* | 
| PSOSQ | GETLIST+3*, GETLIST+4, GETLIST+5, GETLIST+6, GETLIST+8, MAIL+13*, MAIL+14, MAIL+15, MAIL+16, MAIL+17 , GETPA+1, GETPA+2, GETIVUD+1, GETIVUD+3, END+2! | 
| PSOSQ1 | GETLIST+6*, GETLIST+7, GETLIST+8, GETPA+1, GETPA+2, GETIVUD+1*, GETIVUD+2, GETIVUD+3, END+2! | 
| PSOTEXT | MAIL+6!, MAIL2+3!, END+2! | 
| PSOTEXT( | MAIL+12*, MAIL+14*, MAIL+15*, MAIL+16*, MAIL+17*, MAIL+18* | 
| PSOTEXT(1 | MAIL+6*, MAIL2+4* | 
| PSOTEXT(2 | MAIL+6*, MAIL2+4* | 
| PSOTEXT(3 | MAIL+6*, MAIL2+6*, MAIL2+9* | 
| PSOTEXT(4 | MAIL+7*, MAIL2+7* | 
| PSOTEXT(5 | MAIL+8*, MAIL2+10* | 
| PSOTIMEA | MAIL+2*, MAIL+6, END+2! | 
| PSOTIMEB | MAIL+1*, MAIL+3*, MAIL+6, END+2! | 
| PSOTXT | MAIL+12, GETPT+2*, END+2! | 
| >> VA("BID" | GETPT+2 | 
| XMDUZ | MAIL+4*, MAIL2+1*, END+2! | 
| XMSUB | MAIL+4*, MAIL2+1*, END+2! | 
| XMTEXT | MAIL+19*, MAIL2+11*, END+2! | 
| >> XMY( | MAIL+4*, MAIL+5*, MAIL2+1*, MAIL2+2* | 
| >> Y | MAIL+2*, MAIL+3* | 
| ZTDESC | PSOPOST8+19*! | 
| ZTDTH | PSOPOST8+5*, PSOPOST8+6*, PSOPOST8+8, PSOPOST8+13, PSOPOST8+19! | 
| ZTIO | PSOPOST8+19*! | 
| >> ZTQUEUED | PSOPOST8+6, PSOPOST8+20, END+3 | 
| >> ZTREQ | END+3* | 
| ZTRTN | PSOPOST8+19*! | 
| >> ZTSK | PSOPOST8+20 |