Ì € i 2
queue.messages (queue.messages)
[queue.connection, message.id]
&NMXQ[zcCON,zcMID]
Field Name Len Dat Typ J DPM Offset/Local/VAL
message.id 10 PINT R zcMID
ack.code 5 CHOICE L &NMXQ[zcCON,zcMID]A|0
ack.id 10 FREE L &NMXQ[zcCON,zcMID]A|3
ack.time 10 FREE L &NMXQ[zcCON,zcMID]A|1
ack.xfer.path 2 FREE L &NMXQ[zcCON,zcMID]A|4
adm.urn 30 URN L ADM.PAT &NMXQ[zcCON,zcMID]AI|0
dest.dis 20 FREE L VAL=(@NMI.OVX.xfer.vendor[@ack.xfer.path],@NMI.OVX.xfe
VAL=r.module[@ack.xfer.path])
dis.ack.date 8 DATE L VAL=IF{@ack.time %Z.date.in.magic(@ack.time)}
dis.ack.time 4 TIME L VAL=IF{@ack.time @ack.time\86400}
dis.date.queued 8 DATE L VAL=IF{@time.queued %Z.date.in.magic(@time.queued)}
dis.source.id 10 FREE L VAL=IF{"OV"=@NMI.OVX.xfer.with[@source.xfer.path] @sou
VAL=rce.id}
dis.time.queued 4 TIME L VAL=IF{@time.queued @time.queued\86400}
emr.function 30 FREE L &NMXQ[zcCON,zcMID]EMR|0
facility 10 FREE L MIS.FACILITY &NMXQ[zcCON,zcMID]AI|3
message.editor 0 FREE L VAL=%NMI.OVQ.text.ed.shell(^&NMXQ[queue.connection,mes
VAL=sage.id]M,9,15,80,5,"D")
message.key 25 FREE L &NMXQ[zcCON,zcMID]|7
message.length 5 PINT R &NMXQ[zcCON,zcMID]|1
message.type 10 FREE L &NMXQ[zcCON,zcMID]|0
mri.urn 25 URN L MRI.PAT &NMXQ[zcCON,zcMID]AI|1
msg.acct.no 15 FREE L &NMXQ[zcCON,zcMID]MI|0
msg.misc 30 FREE L &NMXQ[zcCON,zcMID]MI|2
msg.unit.no 15 FREE L &NMXQ[zcCON,zcMID]MI|1
segment.terminator 3 FREE L VAL=1
source.dis 20 FREE L VAL=(@NMI.OVX.xfer.vendor[@source.xfer.path],@NMI.OVX.
VAL=xfer.module[@source.xfer.path])
source.id 20 FREE L &NMXQ[zcCON,zcMID]|4
source.seq.no 10 FREE L &NMXQ[zcCON,zcMID]|6
source.time 10 FREE L &NMXQ[zcCON,zcMID]|5
source.xfer.path 2 PINT R &NMXQ[zcCON,zcMID]|3
time.queued 10 FREE L &NMXQ[zcCON,zcMID]|2
Ì € i 2
acknowledgement.comments (comments)
[queue.connection,message.id, comment.queue]
&NMXQ[zcCON,zcMID]A[mcq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
comment.queue 3 FREE L mcq
ack.message 200 FREE L VAL=@comment[1],%NMI.OVQ.reformat.ack.comments(message
VAL=.id),/NMI.OVX.xfer.path^@ack.xfer.path
comment 80 FREE L &NMXQ[zcCON,zcMID]A[mcq]
comment.dis 80 FREE L VAL=@comment:0X
Ì € i 2
message.lines (message.lines)
[queue.connection,message.id, line.no]
&NMXQ[zcCON,zcMID]M[zcL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
line.no 5 URN L zcL
dis.line.subst.controls 80 FREE L VAL=@line~&CTRL.DIS
line 80 FREE L &NMXQ[zcCON,zcMID]M[zcL]
Ì € i 2
message.txns (message.txns)
[queue.connection,message.id, txn.line]
&NMXQ[zcCON,zcMID]T[zcT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
txn.line 5 PINT R zcT
txn.type 10 FREE L &NMXQ[zcCON,zcMID]T[zcT]|0
Ì i 2
temp.detail (temp.detail)
[temp.detail.urn]
/T.DETAIL[tdurn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
temp.detail.urn 5 FREE L tdurn
temp.detail.segment 5 FREE L /T.DETAIL[tdurn]
Ì € i 2
temp.detail.data (temp.detail.data)
[temp.detail.urn, temp.detail.field]
/T.DETAIL[tdurn]D[tdfld]
Field Name Len Dat Typ J DPM Offset/Local/VAL
temp.detail.field 11 FREE L tdfld
temp.detail.field.value 65 FREE L /T.DETAIL[tdurn]D[tdfld]
Ì i 2
xfer.sequence (xfer.sequence)
[xfer.seq.connection,xfer.seq.path,xfer.seq.no,xfer.message.id]
&NMXQS[zcCON,zcPT,zcSEQ,zcMID]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xfer.seq.connection 10 URN L NMI.OVX zcCON
xfer.seq.path 2 PINT R zcPT
xfer.seq.no 10 PINT R zcSEQ
xfer.message.id 10 PINT R zcMID
xfer.time 10 FREE L &NMXQS[zcCON,zcPT,zcSEQ,zcMID]|0
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
msg.acct.index [queue.connection,msg.acct.no,message.id]
msg.acct.index &NMXQA[zcCON,man,zcMID]
msg.misc.index [queue.connection,msg.misc,message.id]
msg.misc.index &NMXQM[zcCON,mm,zcMID]
msg.queue.time.index [queue.connection,time.queued,message.id]
msg.queue.time.index &NMXQT[zcCON,mtq,zcMID]
msg.unit.index [queue.connection,msg.unit.no,message.id]
msg.unit.index &NMXQU[zcCON,mun,zcMID]
|
|
| | | | | |