Ì i 2
error.lines
[le.no]
/MCUER[mcuLE]
Field Name Len Dat Typ J DPM Offset/Local/VAL
le.no 3 PINT R mcuLE
le.line 3 PINT R /MCUER[mcuLE]|0
le.txt 100 FREE L /MCUER[mcuLE]|1
Ì € i 2
main
[urn]
*(M)MCU[mcu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 30 URN L mcu
active 1 YN L *(M)MCU[mcu]|0
cnt.err 5 PINT R *(M)MCU[mcu]X|10
cnt.warn 5 PINT R *(M)MCU[mcu]X|9
department 15 FREE L MIS.GL.DEPT *(M)MCU[mcu]|5
edate 10 DATE L *(M)MCU[mcu]X|0
edev 15 FREE L *(M)MCU[mcu]X|2
euser 10 FREE L MIS.USER *(M)MCU[mcu]X|1
idate 10 DATE L *(M)MCU[mcu]|9
idev 15 FREE L *(M)MCU[mcu]|7
iuser 10 FREE L MIS.USER *(M)MCU[mcu]|6
number 10 FREE L *(M)MCU[mcu]|1
pdate 10 DATE L *(M)MCU[mcu]X|6
pdev 15 FREE L *(M)MCU[mcu]X|8
purch.facility 10 FREE L MIS.PUR.FAC *(M)MCU[mcu]|3
puser 10 FREE L MIS.USER *(M)MCU[mcu]X|7
req.tot.approx 11 DEC4 R *(M)MCU[mcu]|8
status 9 CHOICE L *(M)MCU[mcu]|2
temp.include 1 YN L VAL=IF{c.template'=@template "N";"Y"}
template 15 FREE L MM.IREQ.TEMP *(M)MCU[mcu]|4
vdate 10 DATE L *(M)MCU[mcu]X|3
vdev 15 FREE L *(M)MCU[mcu]X|5
vuser 10 FREE L MIS.USER *(M)MCU[mcu]X|4
Ì € i 2
lines
[urn, line.no]
*(M)MCU[mcu]L[mcuL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
line.no 3 PINT R mcuL
approx.cost 11 DEC4 R *(M)MCU[mcu]L[mcuL]|13
ee.del.to 1 YN L *(M)MCU[mcu]L[mcuL]|10
ee.new 1 YN L *(M)MCU[mcu]L[mcuL]|12
inventory 10 FREE L MM.INVENT *(M)MCU[mcu]L[mcuL]|5
item.no 12 FREE L *(M)MCU[mcu]L[mcuL]|0
item.pkg.ptr 4 FREE L *(M)MCU[mcu]L[mcuL]|11
item.qty 4 SINT R *(M)MCU[mcu]L[mcuL]|7
item.tx.cd 3 FREE L MIS.TAX.CODE *(M)MCU[mcu]L[mcuL]|8
item.unit 10 FREE L *(M)MCU[mcu]L[mcuL]|6
item.urn 43 URN L MM.ITEM *(M)MCU[mcu]L[mcuL]|1
jit 1 YN L *(M)MCU[mcu]L[mcuL]|9
ln.line 4 PINT R *(M)MCU[mcu]L[mcuL]A|3
ln.po 30 URN L MM.PO *(M)MCU[mcu]L[mcuL]A|0
ln.req 30 URN L MM.PO.REQ *(M)MCU[mcu]L[mcuL]A|1
ln.stk.req.no 6 FREE L *(M)MCU[mcu]L[mcuL]A|2
lp.acct 25 FREE L MIS.GL.ACCOUNT *(M)MCU[mcu]L[mcuL]P|1
lp.conv.up 10 FREE L *(M)MCU[mcu]L[mcuL]P|3
lp.cost.up 10 DEC4 R *(M)MCU[mcu]L[mcuL]P|2
lp.eoc 7 FREE L MIS.GL.EOC *(M)MCU[mcu]L[mcuL]P|0
lp.up.us 7 PINT R *(M)MCU[mcu]L[mcuL]P|4
stock.no 18 FREE L *(M)MCU[mcu]L[mcuL]|3
stock.urn 18 URN L MM.STOCK *(M)MCU[mcu]L[mcuL]|2
vendor 11 FREE L MIS.VEN *(M)MCU[mcu]L[mcuL]|4
Ì € i 2
deliver.to.locations
[urn,line.no, location]
*(M)MCU[mcu]L[mcuL]DL[mrq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
location 15 FREE L mrq
instructions 30 FREE L *(M)MCU[mcu]L[mcuL]DL[mrq]|0
Ì € i 2
offspring.i
[urn, off.inv]
*(M)MCU[mcu]W[mi]
Field Name Len Dat Typ J DPM Offset/Local/VAL
off.inv 10 FREE L MM.INVENT mi
ofi.lines 3 PINT R *(M)MCU[mcu]W[mi]|0
ofir.req 6 PINT R *(M)MCU[mcu]W[mi]SR|0
Ì € i 2
offspring.v
[urn, off.ven]
*(M)MCU[mcu]V[gr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
off.ven 11 FREE L MIS.VEN gr
ofv.jit 3 PINT R *(M)MCU[mcu]V[gr]|1
ofv.lines 3 PINT R *(M)MCU[mcu]V[gr]|0
ofv.po 30 PINT R *(M)MCU[mcu]V[gr]PO|0
ofv.po.ver 1 YN L *(M)MCU[mcu]V[gr]PO|1
ofv.req 30 PINT R *(M)MCU[mcu]V[gr]PR|0
Ì € i 2
ofv.cd
[urn,off.ven, cd.query]
*(M)MCU[mcu]V[gr]CD[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.query 10 FREE L MIS.QUERY ggv
cd.query.resp 75 QRY.RESP L *(M)MCU[mcu]V[gr]CD[ggv]|0
Ì € i 2
ofv.cds
[urn,off.ven, cds.cds]
*(M)MCU[mcu]V[gr]CDS[gxx]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cds.cds 15 FREE L MIS.SCREEN gxx
print.cds 0 FREE L VAL=DO{@Next(cds.cds) %MIS.SCREEN.print(cds.cds,^@Root
VAL=(@ofv.cd),"",0)}
print.cds.verbatim 0 FREE L VAL=DO{@Next(cds.cds) %MIS.SCREEN.print(cds.cds,^@Root
VAL=(@ofv.cd),1,0)}
Ì € i 2
templates
[urn, irt.no]
*(M)MCU[mcu]T[mctiI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
irt.no 4 PINT R mctiI
irt.mnemonic 15 FREE L MM.IREQ.TEMP *(M)MCU[mcu]T[mctiI]
Index Files Subscripts/Physical Base
fac.x [purch.facility,number]
?(M)MCUFN[mw,mcuR]
item.x [item.urn,urn,line.no]
?(M)MCUIX[mt,mcu,mcuL]
num.x [number] = urn
?(M)MCUNU[mcuR]
status.x [purch.facility,status,number]
?(M)MCUSN[mw,mcuST,mcuR]
stock.x [stock.urn,urn,line.no]
?(M)MCUSX[ms,mcu,mcuL]
|
|
| | | | | | | |