IVMPTRN4 ;ALB/SEK,TDM - SEND RE-TRANSMISSIONS TO THE IVM CENTER ; 8/15/08 10:29am
Source file <IVMPTRN4.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENTRY | ; Check if message transmission has not been acknowledged for the
; following date range (IVMDMT3 through IVM14) where: ; IVMDMT3 - First Date Checked ; IVM14 - Last Date Checked |
|
| ENTRYQ | ||
| MAILMSGN | ; Get Mailman message number related to this transmission
|
|
| MSGN(IVMDT) | ; Find the mailman message number for an HL7 message
; Input: IVMDT -- The date/time (301.6;.02) the msg was sent ; Output: Pointer to the message in file #773, or zero if not found |
|
| MSGNQ | ||
| MMN(Y) | ; Do look-up on file #772 and find mail message number.
; Input: Y -- Message Control ID ; Output: Mail Message Number |
|
| MMNQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^HL(772 - [#772] | MMN+4 |
| ^HLMA - [#773] | MAILMSGN+7 |
| ^HLMA("AC" | MAILMSGN+8 |
| ^HLMA("B" | MMN+5 |
| ^IVM(301.5 - [#301.5] | MAILMSGN+28 |
| ^IVM(301.6 - [#301.6] | ENTRY+20, MAILMSGN+22, MSGN+4 |
| ^IVM(301.9 - [#301.9] | ENTRY+6 |
| ^ORD(101 - [#101] | ENTRY+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | MAILMSGN+28*, MAILMSGN+29, MAILMSGN+36 |
| DT | ENTRY+5 |
| EVENTS | MAILMSGN+24~, MAILMSGN+33*, MAILMSGN+36 |
| HL | ENTRY+10~, ENTRY+13 |
| HLEID | ENTRY+10~, ENTRY+11*, ENTRY+12*, ENTRY+13 |
| >> HLMTN | ENTRY+13* |
| IVM14 | ENTRY+5*, ENTRY+7, ENTRYQ! |
| >> IVM3015P | MAILMSGN+27*, MAILMSGN+28 |
| >> IVMCT | MAILMSGN+36 |
| >> IVMDA | MAILMSGN+22*, MAILMSGN+26, MAILMSGN+39 |
| IVMDAT | ENTRY+20*, ENTRYQ!, MAILMSGN+1, MAILMSGN+22 |
| IVMDT | MAILMSGN+28*, MAILMSGN+29, MAILMSGN+30, MAILMSGN+31, MSGN~, MSGN+4 |
| IVMDTM3 | ENTRY+5*, ENTRY+20, ENTRYQ! |
| IVMDTMST | ENTRY+6*, ENTRY+7*, ENTRY+20, ENTRYQ! |
| IVMEVENT | ENTRY+25~, ENTRY+27* |
| >> IVMGTOT | MAILMSGN+36 |
| >> IVMIY | MAILMSGN+28* |
| IVMMAILF | ENTRYQ!, MAILMSGN+9, MAILMSGN+18* |
| >> IVMMAILN | MAILMSGN+1*, MAILMSGN+3, MAILMSGN+7, MAILMSGN+8, MAILMSGN+11 |
| IVMMSG | MSGN+3~*, MSGN+5*, MSGNQ |
| >> IVMMTDT | MAILMSGN+30*, MAILMSGN+31*, MAILMSGN+36 |
| >> IVMNODE | MAILMSGN+28* |
| >> IVMQUERY | MAILMSGN+36 |
| >> IVMQUERY( | MAILMSGN+40! |
| >> IVMQUERY("LTD" | MAILMSGN+21! |
| >> IVMQUERY("OVIS" | MAILMSGN+21! |
| >> IVMTEXT(1 | MAILMSGN+11* |
| >> IVMTEXT(2 | MAILMSGN+12* |
| >> IVMTEXT(3 | MAILMSGN+13* |
| >> IVMTEXT(4 | MAILMSGN+14* |
| >> IVMTEXT(5 | MAILMSGN+15* |
| >> IVMTEXT(6 | MAILMSGN+16* |
| IVMTLOG | MAILMSGN+24~, MAILMSGN+26 |
| IVMTLOG("EVENTS" | MAILMSGN+33 |
| IVMTLOG("PAT" | MAILMSGN+27 |
| SLLN | MAILMSGN+6~, MAILMSGN+7*, MAILMSGN+8 |
| X | MSGN+3~, MSGN+4*, MSGN+5 |
| >> XMSUB | MAILMSGN+10* |
| Y | MMN~, MMN+4*, MMN+5 |
| Z | MAILMSGN+40*, MMN+3~*, MMN+5*, MMNQ |
