HLEVX003 ;O-OIFO/LJA - VistA HL7 Event Monitor Code ;02/04/2004 15:25
Source file <HLEVX003.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EOR | ;HLEVX003 - VistA HL7 Event Monitor Code ;5/30/03 15:25 | |
| REPDINUM | ; Create event log entry(s) for DINUM problems.  (Use the ; condensed report text instead of making one event for every DINUM ; problem.) | |
| RDT(TXT) | ; Strip down TXT to include only DINUM report details... ; Returns LINK & WAY... | 
| Name | Field # of Occurrence | 
|---|---|
| $$LOG^HLEVAPI2 | REPDINUM+28 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^TMP($J | REPDINUM+8!, REPDINUM+11, REPDINUM+12, REPDINUM+19*, REPDINUM+23, REPDINUM+25, REPDINUM+27, REPDINUM+30! | 
| Name | Line Occurrences | 
|---|---|
| $$RDT | REPDINUM+16 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| LINK | REPDINUM+6~, REPDINUM+10*, REPDINUM+13*, REPDINUM+16, REPDINUM+19, REPDINUM+22*, REPDINUM+23*, REPDINUM+25, REPDINUM+27, RDT+7* , RDT+11* | 
| LN | REPDINUM+6~, REPDINUM+10*, REPDINUM+11*, REPDINUM+12 | 
| >> MIENS | REPDINUM+26*, REPDINUM+27* | 
| NO | REPDINUM+6~, REPDINUM+17*, REPDINUM+18 | 
| PROB | REPDINUM+6~, REPDINUM+10*, REPDINUM+13*, REPDINUM+14 | 
| QUIT | REPDINUM+6~, REPDINUM+10*, REPDINUM+11 | 
| TAG | REPDINUM+6~ | 
| TXT | REPDINUM+6~, REPDINUM+12*, REPDINUM+13, REPDINUM+16*, REPDINUM+17, REPDINUM+18, RDT~, RDT+6, RDT+7, RDT+10 , RDT+11, RDT+15*, RDT+16, RDT+18 | 
| TXT(1 | REPDINUM+18*, REPDINUM+19 | 
| WAY | REPDINUM+6~, REPDINUM+10*, REPDINUM+13*, REPDINUM+16, REPDINUM+19, REPDINUM+24*, REPDINUM+25*, REPDINUM+27, RDT+8*, RDT+12* | 
| >> X | REPDINUM+28* |