Ì i 2
bkg.ver.input
[bvi.lvl]
/MRVI[mvvUL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bvi.lvl 1 CHOICE L mvvUL
bvi.req 1 YN L /MRVI[mvvUL]|1
bvi.sel 1 YN L /MRVI[mvvUL]|0
Ì € i 2
main
[req.urn]
*(M)MR[mr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
req.urn 30 URN L mr
buyer 10 FREE L MIS.USER *(M)MR[mr]|10
cancel.date 8 DATE L *(M)MR[mr]D|4
close.date 8 DATE L *(M)MR[mr]D|1
dept 15 FREE L MIS.GL.DEPT *(M)MR[mr]|4
dept.invent 15 FREE L VAL=(IF{@MM.PO.REQ.dept;@MM.PO.REQ.inventory})
dollar.tot 11 MONEY R VAL=(@p.req.tot:2D)
id 30 URN L MM.PO.REQ VAL=(@MM.PO.REQ.number_" - "_@MM.PO.REQ.status'=" - ")
inv.ok 1 YN L VAL=IF{%MM.INVENT.security(@inventory,1) "N";"Y"}
inventory 10 FREE L MM.INVENT *(M)MR[mr]|3
ireq.no 10 FREE L *(M)MR[mr]IR|0
last.line 4 PINT R *(M)MR[mr]|8
lvls.grp 10 FREE L *(M)MR[mr]A1|2
lvls.reqd 1 CHOICE L *(M)MR[mr]A1|1
lvls.reqd.disp 1 FREE L VAL=IF{@MM.PO.REQ.lvls.reqd;1}
number 10 FREE L *(M)MR[mr]|1
number.and.status 25 FREE L VAL=(@number_" - "_@status'=" - ")
open.date 8 DATE L *(M)MR[mr]D|0
order.date 8 DATE L *(M)MR[mr]|6
pnumber.and.status 25 FREE L VAL=(@p.number_" - "_@p.status'=" - ")
preq.disp 45 FREE L VAL=(@p.number_" - "_@p.type_" <"_@p.status_"> "
VAL=_%Z.date.out(@p.order.date)'=" - <>")
purch.facility 10 FREE L MIS.PUR.FAC *(M)MR[mr]|14
req.disp 45 FREE L VAL=(@number_" - "_@type_" <"_@status_"> "_%Z.da
VAL=te.out(@order.date)'=" - <>")
req.tax.type 3 CHOICE L *(M)MR[mr]|11
req.tot 11 DEC4 R *(M)MR[mr]|7
resp.user 10 FREE L MIS.USER *(M)MR[mr]|12
status 9 CHOICE L *(M)MR[mr]|5
status.date 8 DATE L VAL=%MM.PO.REQ.find.status.date(req.urn)
tsk.num.ver 10 FREE L *(M)MR[mr]A1|3
tsk.urn 24 FREE L
type 9 CHOICE L *(M)MR[mr]|2
user.ok 1 YN L VAL=IF{%MIS.GL.DEPT.user.ok(@dept) "Y";"N"}
verify.date 8 DATE L *(M)MR[mr]D|2
Ì € i 2
comments
[req.urn, comment.no]
*(M)MR[mr]C[mrCN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
comment.no 2 PINT R mrCN
comment 75 FREE L *(M)MR[mr]C[mrCN]|0
comment.loc 5 CHOICE L *(M)MR[mr]C[mrCN]|1
Ì € i 2
lines
[req.urn, line.no]
*(M)MR[mr]L[mrL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
line.no 4 PINT R mrL
account 25 FREE L MIS.GL.ACCOUNT *(M)MR[mr]L[mrL]I|4
conv.unit.of.pur 10 FREE L *(M)MR[mr]L[mrL]|12
cost.up 10 DEC4 R *(M)MR[mr]L[mrL]|7
cost.up.us 10 DEC4 R VAL=(@cost.up:8D/@req.up.us:4D)
dup.po.line.no 4 PINT R *(M)MR[mr]L[mrL]P|4
dup.po.urn 30 URN L MM.PO *(M)MR[mr]L[mrL]P|3
eoc 7 FREE L MIS.GL.EOC *(M)MR[mr]L[mrL]|2
ireq.line.no 3 PINT R *(M)MR[mr]L[mrL]RP|0
item.category 8 FREE L MM.CATEGORY VAL=@MM.ITEM.category[@item.urn]
item.desc.line2 30 FREE L *(M)MR[mr]L[mrL]A|1
item.description 30 FREE L *(M)MR[mr]L[mrL]A|0
item.name 30 FREE L *(M)MR[mr]L[mrL]A|2
item.no 10 FREE L *(M)MR[mr]L[mrL]|1
item.packaging 40 FREE L VAL=IF{@item.no$5="MISC." @misc.item.packaging;@MM.ITE
VAL=M.package.string}
item.pkg.string 40 FREE L VAL=IF{@item.no$5="MISC." @misc.item.packaging;@MM.ITE
VAL=M.package.string[@item.urn,@pkg.string.ptr]}
item.urn 43 URN L MM.ITEM *(M)MR[mr]L[mrL]|0
line.inventory 10 FREE L VAL=@p.inventory
manuf 10 FREE L MIS.MFR *(M)MR[mr]L[mrL]A|4
manuf.catlg 15 FREE L *(M)MR[mr]L[mrL]A|5
misc.item.packaging 25 FREE L *(M)MR[mr]L[mrL]M|0
misc.manuf 10 FREE L MIS.MFR *(M)MR[mr]L[mrL]M|2
misc.manuf.catlg 15 FREE L *(M)MR[mr]L[mrL]M|3
misc.smallest.unit 10 FREE L *(M)MR[mr]L[mrL]M|4
misc.vend.catlg 15 FREE L *(M)MR[mr]L[mrL]M|1
ord.dept 15 FREE L VAL=@p.dept
pkg.string.ptr 4 INT R *(M)MR[mr]L[mrL]A|6
po.line.deleted 1 YN L *(M)MR[mr]L[mrL]P|5
po.line.no 4 PINT R *(M)MR[mr]L[mrL]P|2
po.urn 30 URN L MM.PO *(M)MR[mr]L[mrL]P|1
price.confirmed 1 YN L *(M)MR[mr]L[mrL]|13
qty.per.order 10 INT R *(M)MR[mr]L[mrL]|18
qty.up 7 INT R *(M)MR[mr]L[mrL]|14
qty.up.with.up 18 FREE L VAL=(@p.qty.up_" "_@p.req.unit.of.pur)
req.unit.of.pur 10 FREE L *(M)MR[mr]L[mrL]|9
req.unit.of.pur.num 2 INT R VAL=(@po.unit.of.pur$(L(@req.unit.of.pur," "))?0N!1)
req.up.us 7 FREE L *(M)MR[mr]L[mrL]|10
req.up.with.us 15 FREE L *(M)MR[mr]L[mrL]|11
smallest.unit 10 FREE L VAL=(IF{@MM.PO.REQ.misc.smallest.unit;@MM.ITEM.smalles
VAL=t.unit})
smallest.unit.rpt 10 FREE L VAL=(IF{@MM.PO.REQ.misc.smallest.unit;@MM.ITEM.smalles
VAL=t.unit[@item.urn]})
stock.no 10 FREE L *(M)MR[mr]L[mrL]I|3
stock.on.hand 15 FREE L VAL=IF{@line.inventory 0+@MM.STOCK.qty.on.hand[@stock.
VAL=urn]^XX/(@req.up.us^PP)_IF{XX\PP'=0^XX ";"_XX}}
stock.on.order 15 FREE L VAL=IF{@line.inventory 0+@MM.STOCK.qty.on.order[@stock
VAL=.urn]^XX/(@req.up.us^PP)_IF{XX\PP'=0^XX ";"_XX}}
stock.urn 18 URN L MM.STOCK *(M)MR[mr]L[mrL]I|2
tax.code 3 FREE L MIS.TAX.CODE *(M)MR[mr]L[mrL]I|5
tot.ord.us 7 INT R VAL=(@MM.PO.REQ.req.up.us*@MM.PO.REQ.qty.up)
vend.catlg 15 FREE L *(M)MR[mr]L[mrL]A|3
vend.unit.of.pur 10 FREE L VAL=@MM.ITEM.vend.unit.of.pur[@item.urn,@vendor]
vendor 10 FREE L *(M)MR[mr]L[mrL]P|0
Ì € i 2
desc
[req.urn,line.no, desc.line]
*(M)MR[mr]L[mrL]D[mrDL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
desc.line 3 PINT R mrDL
sec.desc 50 FREE L *(M)MR[mr]L[mrL]D[mrDL]
Ì € i 2
vlevels
[req.urn, vlevel]
*(M)MR[mr]A1["L",mrVL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
vlevel 1 CHOICE L mrVL
vdate 8 DATE L *(M)MR[mr]A1["L",mrVL]|1
vsel 1 YN L *(M)MR[mr]A1["L",mrVL]|2
vuser 10 FREE L MIS.USER *(M)MR[mr]A1["L",mrVL]|0
Ì i 2
rpt.temp
[rep.urn]
/MRPE[mr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rep.urn 30 URN L MM.PO.REQ mr
Ì € i 2
rpt.temp.lines
[rep.urn, rpt.temp.line]
/MRPE[mr]L[mrEL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.temp.line 4 FREE L mrEL
rpt.temp.lval 50 FREE L /MRPE[mr]L[mrEL]
Ì € i 2
rpt.temp.main
[rep.urn, rpt.m.cnt]
/MRPE[mr]M[mrE]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.m.cnt 3 FREE L mrE
rpt.m.val 50 FREE L /MRPE[mr]M[mrE]
Index Files Subscripts/Physical Base
catlg.x [purch.facility,vend.catlg,item.urn]
?(M)MRMC[mw,gvC,mt]
date.num.x [purch.facility,order.date,number] = req.urn
?(M)MRDR[mw,mrOD,mrR]
date.x [purch.facility,order.date,req.urn]
?(M)MRD[mw,mrOD,mr]
dept.x [purch.facility,dept,req.urn]
?(M)MRDP[mw,gd,mr]
fac.x [purch.facility,req.urn]
?(M)MRXF[mw,mr]
id.x [sort.id,req.urn]
?(M)MRI[mrI,mr]
item.x [item.urn,req.urn,line.no]
?(M)MRIT[mt,mr,mrL]
itemf.x [purch.facility,item.urn,req.urn,line.no]
?(M)MRIF[mw,mt,mr,mrL]
manuf.x [purch.facility,manuf,item.urn]
?(M)MRTM[mw,gm,mt]
number.x [number,req.urn]
?(M)MRR[mrR,mr]
numberf.x [purch.facility,number,req.urn]
?(M)MRRF[mw,mrR,mr]
req.index [req.urn,line.no]
?(M)MRRI[mr,mrL]
status.x [status,req.urn]
?(M)MRS[mrS,mr]
type.x [type,req.urn]
?(M)MRT[mrT,mr]
ven.catlg.x [purch.facility,vend.catlg,item.urn]
?(M)MRVC[mw,gvC,mt]
vendor.x [purch.facility,vendor,req.urn,line.no]
?(M)MRV[mw,gr,mr,mrL]
|
|
| | | | | | | |