©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
PXRMPSN ;SLC/PKR - Process PSN protocol events. ;02/10/2011
Source file <PXRMPSN.m>
| Package | Total | Call Graph |
|---|---|---|
| Clinical Reminders | 3 | (DEFLIST,TERMLIST)^PXRMFRPT SEND^PXRMMSG $$STRREP^PXRMUTIL |
| Kernel | 2 | ^%ZTLOAD ($$FMADD,$$NOW)^XLFDT |
| National Drug File | 1 | ($$CLASS2,$$PROD0)^PSNAPIS |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TERM(FILENUM,GBL,FIEN,NL) | ;Search all reminder terms for any
|
|
| DEF(FILENUM,GBL,FIEN,NL) | ;Write out the list of definintions using this
|
|
| ROC(FILENUM,GBL,FIEN,NL) | ;Search all reminder order checks for any
|
|
| EVDRVR | ;Event driver for PSN events.
|
|
| PSNEVENT | ;Handle PSN events. This routine is attached to the PSN NEW CLASS
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PXD(801 - [#801] | ROC+6, ROC+8, ROC+9 |
| ^PXD(811.9 - [#811.9] | DEF+8 |
| ^PXRMD(811.5 - [#811.5] | TERM+9 |
| ^TMP("PSN" | PSNEVENT+9 |
| ^TMP("PXRMXMZ" | DEF+3*, DEF+4*, DEF+5*, DEF+9*, DEF+10*, DEF+13*, EVDRVR+7!, EVDRVR+8*, EVDRVR+9*, EVDRVR+10* , EVDRVR+11*, EVDRVR+12*, EVDRVR+29*, EVDRVR+30*, EVDRVR+31*, EVDRVR+32*, EVDRVR+33*, EVDRVR+41*, EVDRVR+42*, EVDRVR+49* , EVDRVR+50*, EVDRVR+51*, EVDRVR+54!, ROC+4*, ROC+5*, ROC+6*, ROC+10*, ROC+11*, TERM+4*, TERM+5* , TERM+6*, TERM+10*, TERM+11*, TERM+14* |
| ^TMP($J | DEF+5, DEF+7, DEF+12, EVDRVR+7!, EVDRVR+35!, EVDRVR+54!, TERM+6, TERM+8, TERM+13 |
| ^XTMP( | EVDRVR+17, EVDRVR+18, EVDRVR+54!, PSNEVENT+4!, PSNEVENT+8*, PSNEVENT+9* |
| Name | Line Occurrences |
|---|---|
| DEF | EVDRVR+37, EVDRVR+44 |
| ROC | EVDRVR+40 |
| TERM | EVDRVR+39, EVDRVR+46 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DEF | DEF+2~, DEF+8*, DEF+10 |
| DEFL | EVDRVR+4~ |
| DT | PSNEVENT+8 |
| DUZ | EVDRVR+53 |
| EVENT | EVDRVR+17, EVDRVR+18, EVDRVR+54, PSNEVENT+2~, PSNEVENT+3*, PSNEVENT+4, PSNEVENT+8, PSNEVENT+9 |
| FI | DEF+2~, DEF+11*, DEF+12*, DEF+13, TERM+3~, TERM+12*, TERM+13*, TERM+14 |
| FIEN | DEF~, DEF+5, DEF+7, DEF+12, ROC~, ROC+6, ROC+8, TERM~, TERM+6, TERM+8 , TERM+13 |
| FILENUM | DEF~, DEF+5, DEF+7, DEF+12, EVDRVR+4~, ROC~, TERM~, TERM+6, TERM+8, TERM+13 |
| FILES | EVDRVR+4~ |
| GBL | DEF~, EVDRVR+4~, ROC~, TERM~ |
| IEN | DEF+2~, DEF+6*, DEF+7*, DEF+8, DEF+10, DEF+12, ROC+3~, ROC+7*, ROC+8*, ROC+9 , ROC+11, TERM+3~, TERM+7*, TERM+8*, TERM+9, TERM+11, TERM+13 |
| NAME | ROC+3~, ROC+9*, ROC+11 |
| NEWDCIEN | EVDRVR+4~, EVDRVR+20*, EVDRVR+26, EVDRVR+33 |
| NEWDCNAM | EVDRVR+4~, EVDRVR+26*, EVDRVR+28*, EVDRVR+33 |
| NHL | EVDRVR+4~, EVDRVR+14*, EVDRVR+48 |
| NL | DEF~, DEF+3*, DEF+4*, DEF+5*, DEF+9*, DEF+10*, DEF+13*, EVDRVR+4~, EVDRVR+8*, EVDRVR+9* , EVDRVR+10*, EVDRVR+11*, EVDRVR+12*, EVDRVR+14, EVDRVR+29*, EVDRVR+30*, EVDRVR+31*, EVDRVR+32*, EVDRVR+33*, EVDRVR+37 , EVDRVR+39, EVDRVR+40, EVDRVR+41*, EVDRVR+42*, EVDRVR+44, EVDRVR+46, EVDRVR+48, EVDRVR+49*, EVDRVR+50*, EVDRVR+51* , ROC~, ROC+4*, ROC+5*, ROC+6*, ROC+10*, ROC+11*, TERM~, TERM+4*, TERM+5*, TERM+6* , TERM+10*, TERM+11*, TERM+14* |
| OLDDCIEN | EVDRVR+4~, EVDRVR+19*, EVDRVR+25, EVDRVR+32, EVDRVR+36, EVDRVR+37, EVDRVR+38, EVDRVR+39, EVDRVR+40 |
| OLDDCNAM | EVDRVR+4~, EVDRVR+25*, EVDRVR+27*, EVDRVR+32 |
| START | DEF+2~, DEF+6*, DEF+9, DEF+11*, ROC+3~, ROC+7*, ROC+10, ROC+12*, TERM+3~, TERM+7* , TERM+10, TERM+12* |
| SUBJECT | EVDRVR+5~, EVDRVR+52*, EVDRVR+53, PSNEVENT+2~, PSNEVENT+10* |
| TEMP | EVDRVR+5~, EVDRVR+18*, EVDRVR+19, EVDRVR+20, EVDRVR+21, EVDRVR+22 |
| TERM | TERM+3~, TERM+9*, TERM+11 |
| U | DEF+8, EVDRVR+19, EVDRVR+20, EVDRVR+21, EVDRVR+22, EVDRVR+31, PSNEVENT+8, ROC+9, TERM+9 |
| VAGIEN | EVDRVR+5~, EVDRVR+21*, EVDRVR+43, EVDRVR+44, EVDRVR+45, EVDRVR+46 |
| VAGNAM | EVDRVR+5~, EVDRVR+22*, EVDRVR+42 |
| VAPROD | EVDRVR+5~, EVDRVR+24*, EVDRVR+31 |
| VAPRODIEN | EVDRVR+5~, EVDRVR+16*, EVDRVR+17*, EVDRVR+18, EVDRVR+24, EVDRVR+31 |
| >> ZTDESC | PSNEVENT+16* |
| >> ZTDTH | PSNEVENT+17* |
| >> ZTIO | PSNEVENT+18* |
| >> ZTREQ | EVDRVR+6* |
| >> ZTRTN | PSNEVENT+15* |
| ZTSAVE | PSNEVENT+12! |
| ZTSAVE("EVENT" | PSNEVENT+13* |
| ZTSAVE("SUBJECT" | PSNEVENT+14* |