sHelp
                                     MM.IREQ.TEMP
     i   2
 main
   lines
     deliver.to.locations
   nonstock
   stock
   users

 Ì   €   i   2
main
[mnemonic]
&(M)MCTI[mcti]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mnemonic                    15 FREE     L                 mcti                                                        
 active                       1 YN       L                 &(M)MCTI[mcti]|0                                            
 check                        1 FREE     L                 VAL=IF{%MM.IREQ.TEMP.security(mnemonic);0}                  
 department                  15 FREE     L  MIS.GL.DEPT    &(M)MCTI[mcti]|2                                        
 description                 30 FREE     L                 &(M)MCTI[mcti]|4                                            
 display.order               14 FREE     L                 &(M)MCTI[mcti]|6                                            
 last.upd.user               10 FREE     L  MIS.USER       &(M)MCTI[mcti]|3                                        
 line.cnt                     3 PINT     R                 &(M)MCTI[mcti]|5                                            
 nonstk.req                  15 FREE     L  MM.NONSTK.REQ                                                          
 purch.facility              10 FREE     L  MIS.PUR.FAC    &(M)MCTI[mcti]|1                                        
 rec.req                     15 FREE     L  MM.REC.REQ                                                             
 Ì   €   i   2
lines
[mnemonic,  line.no]
&(M)MCTI[mcti]L[mctL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 line.no                      3 PINT     R                 mctL                                                        
 approx.cost                 11 DEC4     R                 &(M)MCTI[mcti]L[mctL]|13                                    
 ee.del.to                    1 YN       L                 &(M)MCTI[mcti]L[mctL]|10                                    
 ee.new                       1 YN       L                 &(M)MCTI[mcti]L[mctL]|12                                    
 inventory                   10 FREE     L  MM.INVENT      &(M)MCTI[mcti]L[mctL]|5                                 
 item.no                     12 FREE     L                 &(M)MCTI[mcti]L[mctL]|0                                     
 item.pkg.ptr                 4 FREE     L                 &(M)MCTI[mcti]L[mctL]|11                                    
 item.qty                     4 SINT     R                 &(M)MCTI[mcti]L[mctL]|7                                     
 item.tx.cd                   3 FREE     L  MIS.TAX.CODE   &(M)MCTI[mcti]L[mctL]|8                                 
 item.unit                   10 FREE     L                 &(M)MCTI[mcti]L[mctL]|6                                     
 item.urn                    43 URN      L  MM.ITEM        &(M)MCTI[mcti]L[mctL]|1                                 
 jit                          1 YN       L                 &(M)MCTI[mcti]L[mctL]|9                                     
 stock.no                    18 FREE     L                 &(M)MCTI[mcti]L[mctL]|3                                     
 stock.urn                   18 URN      L  MM.STOCK       &(M)MCTI[mcti]L[mctL]|2                                 
 vendor                      11 FREE     L  MIS.VEN        &(M)MCTI[mcti]L[mctL]|4                                 
 Ì   €   i   2
deliver.to.locations
[mnemonic,line.no,  location]
&(M)MCTI[mcti]L[mctL]DL[mrq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 location                    15 FREE     L                 mrq                                                         
 instructions                30 FREE     L                 &(M)MCTI[mcti]L[mctL]DL[mrq]|0                              
 Ì   €   i   2
nonstock
[mnemonic,  ns.ven]
&(M)MCTI[mcti]V[gr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ns.ven                      11 FREE     L  MIS.VEN        gr                                                      
 ns.lns                       3 PINT     R                 &(M)MCTI[mcti]V[gr]|0                                       
 Ì   €   i   2
stock
[mnemonic,  st.inv]
&(M)MCTI[mcti]I[mi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 st.inv                      10 FREE     L  MM.INVENT      mi                                                      
 st.lns                       3 PINT     R                 &(M)MCTI[mcti]I[mi]|0                                       
 Ì   €   i   2
users
[mnemonic,  user]
&(M)MCTI[mcti]U[gu]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 user                        10 FREE     L  MIS.USER       gu                                                      

 Index Files                        Subscripts/Physical Base

 fac.x                              [purch.facility,mnemonic] = active
                                      &(M)MCTIF[mw,mcti]

 item.x                             [item.urn,mnemonic,line.no]
                                      &(M)MCTII[mt,mcti,mctL]

 stock.x                            [stock.urn,mnemonic,line.no]
                                      &(M)MCTIS[ms,mcti,mctL]