©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
PXICLN1 ;ISL/dee - Cleanup routine for PX*1.0*1 ;9/3/96
Source file <PXICLN1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ;Send mail messge that job is done. Also send to SLC IRMFO.
|
||
| STOP800 | ;Delete the 800 node from all Stop Code visits
|
|
| QUE | ; Queue job to deleting the 800 node on all Stop Code Visits.
|
|
| PACKAGE | ;Fix the PCE package file entry.
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | QUE+7 |
| ^DIC | PACKAGE+14, PACKAGE+32 |
| FILE^DIE | PACKAGE+47 |
| $$GET1^DIQ | PACKAGE+16, PACKAGE+18, PACKAGE+20, PACKAGE+22, PACKAGE+38, PACKAGE+39, PACKAGE+41, PACKAGE+42, PACKAGE+44, PACKAGE+45 |
| $$PKG2IEN^VSIT | PACKAGE+2, PACKAGE+5 |
| UPD^VSIT | STOP800+11 |
| ^XMD | MAIL+11 |
| BMES^XPDUTL | QUE+2, QUE+9 |
| MES^XPDUTL | QUE+8, QUE+9 |
| FileNo | Call Tags |
|---|---|
| ^DIC(9.4 - [#9.4] | GET1^DIQ |
| 9.49 | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVSIT - [#9000010] | STOP800+3, STOP800+4, STOP800+5, STOP800+7, STOP800+8, STOP800+9, STOP800+10, STOP800+11! |
| ^DD(9.4 | PACKAGE+11, PACKAGE+29 |
| ^DIC(150.9 - [#150.9] | MAIL+9 |
| ^VSIT(150.2 - [#150.2] | MAIL+9 |
| Name | Line Occurrences |
|---|---|
| PACKAGE | PXICLN1+3 |
| QUE | PXICLN1+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DA(1 | PACKAGE+12*, PACKAGE+30* |
| DIC | PACKAGE+8~, PACKAGE+9*, PACKAGE+26~, PACKAGE+27* |
| DIC("P" | PACKAGE+11*, PACKAGE+29* |
| DIC(0 | PACKAGE+10*, PACKAGE+28* |
| DUZ | MAIL+2 |
| PXERROR | PACKAGE+1~ |
| PXFDA | PACKAGE+1~, PACKAGE+47 |
| PXFDA( | PACKAGE+17*, PACKAGE+19*, PACKAGE+21*, PACKAGE+23*, PACKAGE+40*, PACKAGE+43*, PACKAGE+46* |
| PXIVSIT | STOP800+1~, STOP800+2*, STOP800+3*, STOP800+4, STOP800+5, STOP800+7, STOP800+8, STOP800+9, STOP800+10, STOP800+11 |
| PXP22 | PACKAGE+35~, PACKAGE+36*, PACKAGE+38, PACKAGE+40, PACKAGE+41, PACKAGE+43, PACKAGE+44, PACKAGE+46 |
| PXPCE | PACKAGE+1~, PACKAGE+2*, PACKAGE+3, PACKAGE+4, PACKAGE+9, PACKAGE+12 |
| PXPCE22 | PACKAGE+1~, PACKAGE+15*, PACKAGE+24, PACKAGE+36 |
| >> PXPCEC | PACKAGE+3*, PACKAGE+16, PACKAGE+17, PACKAGE+18, PACKAGE+19, PACKAGE+20, PACKAGE+21, PACKAGE+22, PACKAGE+23, PACKAGE+36 |
| PXTEXT | MAIL+1~ |
| PXTEXT(1 | MAIL+5* |
| PXTEXT(2 | MAIL+6* |
| PXTEXT(3 | MAIL+7* |
| PXTEXT(4 | MAIL+8* |
| PXTEXT(5 | MAIL+9* |
| PXV22 | PACKAGE+35~, PACKAGE+37*, PACKAGE+39, PACKAGE+42, PACKAGE+45 |
| PXVT | PACKAGE+1~, PACKAGE+5*, PACKAGE+6, PACKAGE+24, PACKAGE+27, PACKAGE+30 |
| PXVT22 | PACKAGE+1~, PACKAGE+33*, PACKAGE+34, PACKAGE+37 |
| PXVTC | PACKAGE+1~, PACKAGE+6*, PACKAGE+37 |
| VSIT | STOP800+1~, STOP800+6!, STOP800+11 |
| VSIT("AO" | STOP800+8* |
| VSIT("EC" | STOP800+10* |
| VSIT("IEN" | STOP800+11* |
| VSIT("IR" | STOP800+9* |
| VSIT("SC" | STOP800+7* |
| X | PACKAGE+8~, PACKAGE+13*, PACKAGE+26~, PACKAGE+31*, PACKAGE+39*, PACKAGE+40, PACKAGE+42*, PACKAGE+43, PACKAGE+45*, PACKAGE+46 |
| XMSUB | MAIL+1~, MAIL+4* |
| XMTEXT | MAIL+1~, MAIL+10* |
| XMY | MAIL+1~ |
| XMY( | MAIL+2* |
| XMY("G.PCEINSTAL@DOMAIN.NAME" | MAIL+3* |
| Y | PACKAGE+8~, PACKAGE+15, PACKAGE+26~, PACKAGE+33 |
| ZTDESC | QUE+1~, QUE+5* |
| ZTDTH | QUE+1~, QUE+6* |
| ZTIO | QUE+1~, QUE+4* |
| >> ZTQUEUED | MAIL+6 |
| ZTRTN | QUE+1~, QUE+3* |
| ZTSAVE | QUE+1~ |
| ZTSK | QUE+1~, QUE+8, QUE+9 |