Ì € 2
main
[date,purch.facility]
*(M)MG[mg,mw]
Field Name Len Dat Typ J DPM Offset/Local/VAL
date 8 DATE L mg
purch.facility 10 FREE L MIS.PUR.FAC mw
check.purch.facility 1 YN L VAL=IF{%MIS.PUR.FAC.check.user(purch.facility,@.user)
VAL="Y";"N"}
closed.date 8 DATE L *(M)MG[mg,mw]|1
closed.time 4 TIME L *(M)MG[mg,mw]|2
closing 7 FREE L *(M)MG[mg,mw]|0
period 10 FREE L MIS.GL.PERIOD VAL=MIS.GL.PERIOD.date.x[c.date]
Ì € 2
buyers
[date,purch.facility, buyer]
*(M)MG[mg,mw]E[gu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
buyer 10 FREE L MIS.USER gu
buyer.no.lines 7 PINT R *(M)MG[mg,mw]E[gu]|3
buyer.no.pos 7 PINT R *(M)MG[mg,mw]E[gu]|2
buyer.no.return.pos 7 PINT R *(M)MG[mg,mw]E[gu]|8
buyer.order.value 10 SMONEY R *(M)MG[mg,mw]E[gu]|1
buyer.return.value 10 SMONEY R *(M)MG[mg,mw]E[gu]|7
buyer.ytd.no.lines 7 PINT R *(M)MG[mg,mw]E[gu]|6
buyer.ytd.no.pos 7 PINT R *(M)MG[mg,mw]E[gu]|5
buyer.ytd.no.return.pos 7 PINT R *(M)MG[mg,mw]E[gu]|10
buyer.ytd.order.value 10 SMONEY R *(M)MG[mg,mw]E[gu]|4
buyer.ytd.return.value 10 SMONEY R *(M)MG[mg,mw]E[gu]|9
Ì € 2
depts
[date,purch.facility, dept]
*(M)MG[mg,mw]A[gd]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dept 15 FREE L MIS.GL.DEPT gd
check.dept 1 YN L VAL=IF{%MIS.GL.DEPT.user.ok(MM.PUR.STATS.dept) "Y";"N"
VAL=}
Ì € 2
dept.accts
[date,purch.facility,dept, dept.acct]
*(M)MG[mg,mw]A[gd,ga]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dept.acct 25 FREE L MIS.GL.ACCOUNT ga
Ì € 2
dept.acct.items
[date,purch.facility,dept,dept.acct, dept.acct.item]
*(M)MG[mg,mw]A[gd,ga,mt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dept.acct.item 43 URN L MM.ITEM mt
dai.no.pos 7 PINT R *(M)MG[mg,mw]A[gd,ga,mt]|4
dai.on.order.qty.up 7 INT R VAL=(@dai.on.order.qty.us!0^XX/(IF{@dept.acct.item's.p
VAL=vend.up.us;@dai.up.us}^SU)_IF{XX\SU'=0^XX ";"_XX})
dai.on.order.qty.us 7 PINT R *(M)MG[mg,mw]A[gd,ga,mt]|5
dai.on.order.valu 10 SMONEY R VAL=(@dai.on.order.value!0)
dai.on.order.value 10 SMONEY R *(M)MG[mg,mw]A[gd,ga,mt]|6
dai.order.qty.up 7 INT R VAL=(@dai.order.qty.us^XX/(IF{@dept.acct.item's.pvend.
VAL=up.us;@dai.up.us}^SU)_IF{XX\SU'=0^XX ";"_XX})
dai.order.qty.us 7 PINT R *(M)MG[mg,mw]A[gd,ga,mt]|0
dai.order.value 10 SMONEY R *(M)MG[mg,mw]A[gd,ga,mt]|1
dai.rcv.qty.up 7 INT R VAL=(@dai.rcv.qty.us^XX/(IF{@dept.acct.item's.pvend.up
VAL=.us;@dai.up.us}^SU)_IF{XX\SU'=0^XX ";"_XX})
dai.rcv.qty.us 7 PINT R *(M)MG[mg,mw]A[gd,ga,mt]|2
dai.rcv.value 10 SMONEY R *(M)MG[mg,mw]A[gd,ga,mt]|3
dai.up.us 7 FREE L *(M)MG[mg,mw]A[gd,ga,mt]|7
dai.ytd.no.pos 7 PINT R *(M)MG[mg,mw]A[gd,ga,mt]|10
dai.ytd.order.qty.up 7 INT R VAL=(@dai.ytd.order.qty.us^XX/(IF{@dept.acct.item's.pv
VAL=end.up.us;@dai.up.us}^SU)_IF{XX\SU'=0^XX ";"_XX})
dai.ytd.order.qty.us 7 PINT R *(M)MG[mg,mw]A[gd,ga,mt]|8
dai.ytd.order.value 10 SMONEY R *(M)MG[mg,mw]A[gd,ga,mt]|9
Ì € 2
inventories
[date,purch.facility, inv]
*(M)MG[mg,mw]I[mi]
Field Name Len Dat Typ J DPM Offset/Local/VAL
inv 10 FREE L MM.INVENT mi
check.inv 1 YN L VAL=IF{%MM.INVENT.security(MM.PUR.STATS.inv,1,"","") "
VAL=N";"Y"}
Ì € 2
inv.accts
[date,purch.facility,inv, inv.acct]
*(M)MG[mg,mw]I[mi,ga]
Field Name Len Dat Typ J DPM Offset/Local/VAL
inv.acct 25 FREE L MIS.GL.ACCOUNT ga
Ì € 2
inv.acct.items
[date,purch.facility,inv,inv.acct, inv.acct.item]
*(M)MG[mg,mw]I[mi,ga,mt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
inv.acct.item 43 URN L MM.ITEM mt
iai.no.pos 7 PINT R *(M)MG[mg,mw]I[mi,ga,mt]|4
iai.on.order.qty.up 7 INT R VAL=(@iai.on.order.qty.us!0^XX/(IF{@inv.acct.item's.pv
VAL=end.up.us;@iai.up.us}^SU)_IF{XX\SU'=0^XX ";"_XX})
iai.on.order.qty.us 7 PINT R *(M)MG[mg,mw]I[mi,ga,mt]|5
iai.on.order.valu 10 SMONEY R VAL=(@iai.on.order.value!0)
iai.on.order.value 10 SMONEY R *(M)MG[mg,mw]I[mi,ga,mt]|6
iai.order.qty.up 7 INT R VAL=(@iai.order.qty.us^XX/(IF{@inv.acct.item's.pvend.u
VAL=p.us;@iai.up.us}^SU)_IF{XX\SU'=0^XX ";"_XX})
iai.order.qty.us 7 PINT R *(M)MG[mg,mw]I[mi,ga,mt]|0
iai.order.value 10 SMONEY R *(M)MG[mg,mw]I[mi,ga,mt]|1
iai.rcv.qty.up 7 INT R VAL=(@iai.rcv.qty.us^XX/(IF{@inv.acct.item's.pvend.up.
VAL=us;@iai.up.us}^SU)_IF{XX\SU'=0^XX ";"_XX})
iai.rcv.qty.us 7 PINT R *(M)MG[mg,mw]I[mi,ga,mt]|2
iai.rcv.value 10 SMONEY R *(M)MG[mg,mw]I[mi,ga,mt]|3
iai.up.us 7 FREE L *(M)MG[mg,mw]I[mi,ga,mt]|7
iai.ytd.no.pos 7 PINT R *(M)MG[mg,mw]I[mi,ga,mt]|10
iai.ytd.order.qty.up 7 INT R VAL=(@iai.ytd.order.qty.us^XX/(IF{@inv.acct.item's.pve
VAL=nd.up.us;@iai.up.us}^SU)_IF{XX\SU'=0^XX ";"_XX})
iai.ytd.order.qty.us 7 PINT R *(M)MG[mg,mw]I[mi,ga,mt]|8
iai.ytd.order.value 10 SMONEY R *(M)MG[mg,mw]I[mi,ga,mt]|9
Ì € 2
vendors
[date,purch.facility, vendor]
*(M)MG[mg,mw]C[gr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
vendor 11 FREE L MIS.VEN gr
vend.cmplt.time.sum 7 PINT R *(M)MG[mg,mw]C[gr]|13
vend.comp.avg.time 6 PDEC2 R VAL=(@vend.cmplt.time.sum:5D/@vend.no.compl.pos:2D)
vend.first.avg.time 6 PDEC2 R VAL=(@vend.lead.sum:5D/@vend.first.dlvs:2D)
vend.first.dlvs 7 PINT R *(M)MG[mg,mw]C[gr]|7
vend.first.rcpts.count 7 PINT R *(M)MG[mg,mw]C[gr]|18
vend.first.rcpts.pct.tot 7 PDEC3 R *(M)MG[mg,mw]C[gr]|17
vend.first.rcpts.qty 7 PINT R *(M)MG[mg,mw]C[gr]|11
vend.first.rcts.ord.qty 7 PINT R *(M)MG[mg,mw]C[gr]|9
vend.lead.sum 7 PINT R *(M)MG[mg,mw]C[gr]|16
vend.no.compl.pos 7 PINT R *(M)MG[mg,mw]C[gr]|15
vend.no.late.dlvs 7 PINT R *(M)MG[mg,mw]C[gr]|12
vend.no.lines 7 PINT R *(M)MG[mg,mw]C[gr]|14
vend.no.pos 7 PINT R *(M)MG[mg,mw]C[gr]|8
vend.order.value 10 SMONEY R *(M)MG[mg,mw]C[gr]|1
vend.percent.late 6 PDEC2 R VAL=(@vend.no.late.dlvs:5D/@vend.first.dlvs*100:2D)
vend.percent.recd 6 PDEC2 R VAL=(@vend.first.rcpts.pct.tot:5D/@vend.first.rcpts.co
VAL=unt:2D)
vend.rcpts.per.line 6 PDEC2 R VAL=(@vend.reg.tot.rcpts:5D/@vend.reg.lns.compltd:2D)
vend.rcv.qty 7 PINT R *(M)MG[mg,mw]C[gr]|2
vend.rcv.value 10 SMONEY R *(M)MG[mg,mw]C[gr]|3
vend.reg.lns.compltd 7 PINT R *(M)MG[mg,mw]C[gr]|6
vend.reg.lns.ord 7 PINT R *(M)MG[mg,mw]C[gr]|6
vend.reg.tot.rcpts 7 PINT R *(M)MG[mg,mw]C[gr]|10
Ì € 2
vend.items
[date,purch.facility,vendor, vend.item]
*(M)MG[mg,mw]C[gr,mt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
vend.item 43 URN L MM.ITEM mt
vend.item.no.lines 7 PINT R *(M)MG[mg,mw]C[gr,mt]|2
vend.item.rcv.qty.up 7 INT R VAL=(@vend.item.rcv.qty.us^XX/@MM.ITEM.vend.up.us_IF{X
VAL=X\@MM.ITEM.vend.up.us'=0^XX ";"_XX})
vend.item.rcv.qty.us 7 PINT R *(M)MG[mg,mw]C[gr,mt]|0
vend.item.rcv.value 10 SMONEY R *(M)MG[mg,mw]C[gr,mt]|1
|
|
| | | | | | | |