Ì i 2
main
[urn]
*(M)MJA[mja]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 8 URN L mja
edi.q.disp 10 FREE L VAL=IF{@edi.q.type=0 "STD";"JIT"}
edi.q.type 3 PINT R *(M)MJA[mja]|8
end.date 8 DATE L *(M)MJA[mja]|4
end.time 4 HHMM L *(M)MJA[mja]|5
number.sent 4 PINT R *(M)MJA[mja]|6
program 15 FREE L MM.EDI.PROGRAM *(M)MJA[mja]|0
start.date 8 DATE L *(M)MJA[mja]|2
start.time 4 HHMM L *(M)MJA[mja]|3
status 7 CHOICE L *(M)MJA[mja]|1
xo.msg.status 12 FREE L VAL=@MIS.XO.MSG.status[@xo.msg.urn]
xo.msg.urn 8 PINT R MIS.XO.MSG *(M)MJA[mja]|7
Ì i 2
send.file
[urn, send.file.seq.no]
*(M)MJA[mja]XMT[mjaX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
send.file.seq.no 6 PINT R mjaX
send.file.record 200 FREE L *(M)MJA[mja]XMT[mjaX]|0
Ì i 2
send.po.list
[urn, send.po]
*(M)MJA[mja]XPO[mp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
send.po 30 URN L MM.PO mp
send.entire.po 1 YN L *(M)MJA[mja]XPO[mp]|0
send.po.last.line 4 PINT R *(M)MJA[mja]XPO[mp]|1
send.po.tot 11 DEC4 R *(M)MJA[mja]XPO[mp]|2
send.po.value 11 SMONEY R VAL=(@p.MM.EDI.send.po.tot:2D)
Ì i 2
send.po.lines
[urn,send.po, send.po.line]
*(M)MJA[mja]XPO[mp]L[mjaL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
send.po.line 4 PINT R mjaL
send.po.line.tot.ord.us 7 INT R *(M)MJA[mja]XPO[mp]L[mjaL]|0
Ì i 2
vendors
[urn, vendor]
*(M)MJA[mja]V[gr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
vendor 11 FREE L MIS.VEN gr
vendor.name 35 FREE L VAL=@MIS.VEN.name
Index Files Subscripts/Physical Base
qt.x [edi.q.type,urn]
?(M)MJAQT[mjQT,mja]
|
|
| | | |