sHelp
                                     MM.EQP
     i   2
 main
   comments
   contr
   contr.ee
   customer.defined.queries
     customer.def.mult.queries
   customer.defined.screens
   pm
   usage.by.date
   warranty

 Ì   €   i   2
main
[id]
*(M)MU[mu]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 id                          10 FREE     L                 mu                                                          
 active                       1 YN       L                 *(M)MU[mu]|0                                                
 cust.def.screen             15 FREE     L  MIS.SCREEN     VAL=(+@customer.defined.screens[""])                    
 date.acquired                8 DATE     L                 *(M)MU[mu]|14                                               
 dept                        15 FREE     L  MIS.GL.DEPT    *(M)MU[mu]|4                                            
 dept.chk.ok                 15 FREE     L                 VAL=IF{%MIS.GL.DEPT.user.ok(@dept^MGDP) MGDP}               
 desc                        30 FREE     L                 *(M)MU[mu]|1                                                
 dft.eoc                      7 FREE     L  MIS.GL.EOC     *(M)MU[mu]|15                                           
 eqp.class                    8 FREE     L  MM.EQP.CLASS   *(M)MU[mu]|3                                            
 invoice                     15 FREE     L                 *(M)MU[mu]|13                                               
 last.update                 10 FREE     L                 *(M)MU[mu]UPD                                               
 location                    15 FREE     L                 *(M)MU[mu]|5                                                
 maint.grp                   10 FREE     L  MM.EQP.MAINT   *(M)MU[mu]|17                                           
 maint.grp.ok                10 FREE     L  MM.EQP.MAINT   VAL=%MM.EQP.MAINT.user.ok(maint.grp)                    
 mfr                         10 FREE     L  MIS.MFR        *(M)MU[mu]|9                                            
 mfr.serial.no               15 FREE     L                 *(M)MU[mu]|10                                               
 new.eqp                     10 FREE     L                                                                             
 pm.cds                      15 FREE     L  MIS.SCREEN     VAL=@MM.EQP.WO.TYPE.cust.def.scrn[@MM.EQP.pm.id]        
 pm.freq                     10 FREE     L                 VAL=@MM.EQP.WO.TYPE.freq[@MM.EQP.pm.id]                     
 pm.last.wo                   6 PINT     R  MM.EQP.WO      VAL=%MM.EQP.WO.find.last.wo(id,@pm.id)                  
 pm.priority                  1 CHOICE   L                 VAL=@MM.EQP.WO.TYPE.priority[@MM.EQP.pm.id]                 
 pm.sched                     1 YN       L                 VAL=@MM.EQP.WO.TYPE.active[@MM.EQP.pm.id]                   
 pm.usage                     8 PINT     R                 VAL=@MM.EQP.WO.TYPE.usage[@MM.EQP.pm.id]                    
 pm.usage.freq                5 PINT     R                 VAL=IF{@usage.average&@pm.usage @pm.usage:8D/@usage.av      
                                                           VAL=erage:0D!1}                                             
 po.no                       10 FREE     L                 *(M)MU[mu]|12                                               
 price                        9 MONEY    R                 *(M)MU[mu]|11                                               
 print.cd.screen              0 FREE     L                 VAL=DO{@Next(cd.screen) %MIS.SCREEN.print(cd.screen,^@      
                                                           VAL=customer.defined.fields,"",0)}                          
 print.cd.screen.verbatim     0 FREE     L                 VAL=DO{@Next(cd.screen) %MIS.SCREEN.print(cd.screen,^@      
                                                           VAL=customer.defined.fields,1,0)}                           
 pur.vendor                  11 FREE     L  MIS.VEN        *(M)MU[mu]|6                                            
 purch.facility              10 FREE     L  MIS.PUR.FAC                                                            
 ser.vendor                  11 FREE     L  MIS.VEN        *(M)MU[mu]|7                                            
 tsk.user                    10 FREE     L  MIS.USER       *(M)MU[mu]|18                                           
 usage.average               10 DEC4     R                 *(M)MU[mu]U|0                                               
 usage.average.monthly       10 DEC4     R                 VAL=@usage.average*30:4D:10LT                               
 usage.average.weekly        10 DEC4     R                 VAL=@usage.average*7:4D:10LT                                
 usage.avg.override           1 YN       L                 *(M)MU[mu]U|6                                               
 usage.days.for.avg           4 PINT     R                 *(M)MU[mu]U|1                                               
 usage.last.date              8 DATE     L                 VAL=@Last(usage.date)                                       
 usage.last.purged            8 DATE     L                 *(M)MU[mu]U|4                                               
 usage.meter.digits           2 PINT     R                 *(M)MU[mu]U|7                                               
 usage.stat.type              1 CHOICE   L                 *(M)MU[mu]U|3                                               
 usage.stats                  1 YN       L                 *(M)MU[mu]U|2                                               
 usage.user                  10 FREE     L  MIS.USER       *(M)MU[mu]U|5                                           
 user.access                  1 YN       L                 VAL=IF{%MM.EQP.id.M.sel(MM.EQP.id) "Y";"N"}                 
 Ì   €   i   2
comments
[id,  comm.queue]
*(M)MU[mu]M[muM]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 comm.queue                   2 PINT     R                 muM                                                         
 comm.line                   74 FREE     L                 *(M)MU[mu]M[muM]                                            
 Ì   €   i   2
contr
[id,  contr.ven,contr.no]
*(M)MU[mu]C[gr,muc]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 contr.ven                   11 FREE     L  MIS.VEN        gr                                                      
 contr.no                    10 FREE     L                 muc                                                         
 contr.queue                  2 PINT     R                 *(M)MU[mu]C[gr,muc]|0                                       
 Ì   €   i   2
contr.ee
[id,  contr.ee.queue]
*(M)MU[mu]CE[muC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 contr.ee.queue               2 PINT     R                 muC                                                         
 contr.ee.no                 10 FREE     L                 *(M)MU[mu]CE[muC]|1                                         
 contr.ee.ven                11 FREE     L  MIS.VEN        *(M)MU[mu]CE[muC]|0                                     
 Ì   €   i   2
customer.defined.queries
[id,  cd.query]
*(M)MU[mu]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)MU[mu]CD[ggv]|0                                         
 Ì   €   i   2
customer.def.mult.queries
[id,cd.query,  cdm.seq.no]
*(M)MU[mu]CD[ggv]M[ggvN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 cdm.seq.no                   3 PINT     R                 ggvN                                                        
 cdm.response                75 QRY.RESP L                 *(M)MU[mu]CD[ggv]M[ggvN]|0                                  
 Ì   €   i   2
customer.defined.screens
[id,  cd.screen]
*(M)MU[mu]CDS[gxx]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 cd.screen                   15 FREE     L  MIS.SCREEN     gxx                                                     
 Ì   €   i   2
pm
[id,  pm.id]
*(M)MU[mu]P[mup]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pm.id                       10 FREE     L  MM.EQP.WO.TYPE mup                                                     
 pm.mark                      1 FREE     L                 *(M)MU[mu]P[mup]|0                                          
 pm.tsk.user                 10 FREE     L  MIS.USER       *(M)MU[mu]P[mup]|1                                      
 Ì   €   i   2
usage.by.date
[id,  usage.date]
*(M)MU[mu]U[muUD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 usage.date                   8 DATE     L                 muUD                                                        
 usage.increment             10 INT      R                 *(M)MU[mu]U[muUD]|1                                         
 usage.qty.total             10 PINT     R                 *(M)MU[mu]U[muUD]|0                                         
 usage.rollover.count         7 INT      R                 *(M)MU[mu]U[muUD]|2                                         
 Ì   €   i   2
warranty
[id,  warr.queue]
*(M)MU[mu]W[muW]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 warr.queue                   2 PINT     R                 muW                                                         
 warr.desc                   60 FREE     L                 *(M)MU[mu]W[muW]|0                                          
 warr.exp                     8 DATE     L                 *(M)MU[mu]W[muW]|1                                          

 Index Files                        Subscripts/Physical Base

 component.x                        [component,id]
                                      ?(M)MUCX[muC,mu]

 maint.x                            [maint.grp,id]
                                      ?(M)MUMG[mum,mu]

 name.index                         [desc,id]
                                      ?(M)MUI[muD,mu]

 pm.index                           [id,pm.id]
                                      ?(M)MUPX[mu,mup]