sHelp
                                     MM.EQP.WO
     i   2
   mm.eqp.wo
     mm.eqp.wo.comments
     mm.eqp.wo.customer.def.queries
       mm.eq.wo.cust.def.mult.queries
     mm.eqp.wo.item.data
     mm.eqp.wo.labor.data
   mm.eqp.wo.reports
     mm.eqp.wo.selections
     mm.eqp.wo.report.data
       mm.eqp.wo.report.wo.data

 Ì     i   2
mm.eqp.wo    (main) 
[no]
:MUW[muw]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 no                           6 PINT     R                 muw                                                         
 cd.screen                   15 FREE     L  MIS.SCREEN     :MUW[muw]CD|0                                           
 complete.date                8 DATE     L                 :MUW[muw]|14                                                
 contr.no                    11 FREE     L  MM.EQP.CONTR   :MUW[muw]|8                                             
 date                         8 DATE     L                 :MUW[muw]|1                                                 
 desc                        30 FREE     L                 :MUW[muw]|5                                                 
 downtime                     7 ETIME    L                 :MUW[muw]|13                                                
 eoc                          7 FREE     L  MIS.GL.EOC     :MUW[muw]|15                                            
 eqp                         10 FREE     L  MM.EQP         :MUW[muw]|0                                             
 gl.exp.acct                 25 FREE     L  MIS.GL.ACCOUNT VAL=IF{@MM.EQP.dept[@MM.EQP.WO.eqp]^DPT&(@MM.EQP.WO.eo  
                                                           VAL=c^EOC) V(@MM.PARAM.gl.exp.acct.expr);""}                
 inhouse                      1 YN       L                 :MUW[muw]|6                                                 
 late                         1 YN       L                 VAL=IF{@date<@.today&(@status="SCHEDULED") "Y";"N"}      
 maint.grp                   10 FREE     L  MM.EQP.MAINT   VAL=@MM.EQP.maint.grp[@eqp]                             
 pm                          10 FREE     L  MM.EQP.WO.TYPE VAL=IF{"Y"=@pm.type @type}                              
 pm.type                      1 YN       L                 :MUW[muw]|3                                                 
 print.cd.screen              0 FREE     L                 VAL=IF{@cd.screen %MIS.SCREEN.print(@cd.screen,^@custo      
                                                           VAL=mer.defined.fields,"",0)}                               
 print.cd.screen.verbatim     0 FREE     L                 VAL=IF{@cd.screen %MIS.SCREEN.print(@cd.screen,^@custo      
                                                           VAL=mer.defined.fields,1,0)}                                
 priority                     1 CHOICE   L                 :MUW[muw]|11                                                
 priority.out                 1 PINT     R                 VAL=0+@priority                                             
 skill.level.1               10 FREE     L  MM.EQP.SKILL   VAL=@MM.EQP.WO.labor.skill[1]                           
 skill.level.1.hours          6 PDEC2    R                 VAL=@MM.EQP.WO.labor.hours[1]                               
 start.date                   8 DATE     L                 :MUW[muw]|12                                                
 status                      10 CHOICE   L                 :MUW[muw]|2                                                 
 total.cost                   9 MONEY    R                 VAL=@total.labor.cost+@total.material.cost                  
 total.labor.cost             9 MONEY    R                 :MUW[muw]|17                                                
 total.labor.hours            9 DEC2     R                 :MUW[muw]|16                                                
 total.material.cost          9 MONEY    R                 :MUW[muw]|18                                                
 type                        10 FREE     L  MM.EQP.WO.TYPE :MUW[muw]|4                                             
 usage.date                   8 DATE     L                 :MUW[muw]|10                                                
 usage.qty                   10 PINT     R                 :MUW[muw]|9                                                 
 user.access                  1 YN       L                 VAL=IF{%MM.EQP.MAINT.user.ok(@maint.grp) "Y";"N"}           
 vendor                      11 FREE     L  MIS.VEN        :MUW[muw]|7                                             
 yes.no                       1 YN       L                                                                             
 Ì     i   2
mm.eqp.wo.comments    (comments) 
[no, comment.no]
:MUW[muw]C[muwC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 comment.no                   2 PINT     R                 muwC                                                        
 comment.line                74 FREE     L                 :MUW[muw]C[muwC]                                            
 Ì     i   2
mm.eqp.wo.customer.def.queries    (customer.defined.queries) 
[no, cd.query]
:MUW[muw]CD[ggv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cd.query                    10 FREE     L  MIS.QUERY      ggv                                                     
 cd.response                 75 QRY.RESP L                 :MUW[muw]CD[ggv]|0                                          
 Ì     i   2
mm.eq.wo.cust.def.mult.queries    (customer.def.mult.queries) 
[no,cd.query, cdm.seq.no]
:MUW[muw]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                 :MUW[muw]CD[ggv]M[ggvN]|0                                   
 Ì     i   2
mm.eqp.wo.item.data    (item.data) 
[no, item.no]
:MUW[muw]I[mtR]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 item.no                     10 FREE     L                 mtR                                                         
 item                        43 URN      L  MM.ITEM        :MUW[muw]I[mtR]|3                                       
 item.cost.um                10 PDEC4    R                 :MUW[muw]I[mtR]|4                                           
 item.extended.cost          10 MONEY    R                 VAL=@item.cost.um*@item.qty:2D                              
 item.inventory              10 FREE     L  MM.INVENT      :MUW[muw]I[mtR]|5                                       
 item.qty                     7 PINT     R                 :MUW[muw]I[mtR]|1                                           
 item.um                      4 FREE     L                 :MUW[muw]I[mtR]|0                                           
 item.um.us                   7 PINT     R                 :MUW[muw]I[mtR]|2                                           
 Ì     i   2
mm.eqp.wo.labor.data    (labor.data) 
[no, labor.seq.no]
:MUW[muw]L[muwL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 labor.seq.no                 3 PINT     R                 muwL                                                        
 labor.extended.cost          8 MONEY    R                 VAL=IF{@labor.rate&@labor.hours @labor.rate*@labor.hou      
                                                           VAL=rs:2D}                                                  
 labor.hours                  6 PDEC2    R                 :MUW[muw]L[muwL]|1                                          
 labor.rate                   8 PDEC2    R                 :MUW[muw]L[muwL]|4                                          
 labor.rate.type             10 CHOICE   L                 :MUW[muw]L[muwL]|3                                          
 labor.skill                 10 FREE     L  MM.EQP.SKILL   :MUW[muw]L[muwL]|0                                      
 labor.worker                30 FREE     L                 :MUW[muw]L[muwL]|2                                          
 Ì     i   2
mm.eqp.wo.reports    (reports) 
[report]
:MUWR[muwr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 report                      10 FREE     L                 muwr                                                        
 rep.compile.status          10 CHOICE   L                 :MUWR[muwr]C|0                                              
 rep.maint.grp               10 FREE     L  MM.EQP.MAINT   :MUWR[muwr]C|18                                         
 rep.new.page                 5 CHOICE   L                 :MUWR[muwr]C|15                                             
 rep.num.records              6 PINT     R                 :MUWR[muwr]C|14                                             
 rep.report.format            1 CHOICE   L                 :MUWR[muwr]C|6                                              
 rep.selection               10 FREE     L  MM.SELECT      :MUWR[muwr]C|17                                         
 rep.sort.1                  15 FREE     L  MM.FIELDS      :MUWR[muwr]C|11                                         
 rep.sort.2                  15 FREE     L  MM.FIELDS      :MUWR[muwr]C|12                                         
 rep.sort.3                  15 FREE     L  MM.FIELDS      :MUWR[muwr]C|13                                         
 rep.sort.level               7 CHOICE   L                 :MUWR[muwr]C|9                                              
 rep.start.date               8 DATE     L                 :MUWR[muwr]C|1                                              
 rep.start.time               5 TIME     L                 :MUWR[muwr]C|2                                              
 rep.stop.date                8 DATE     L                 :MUWR[muwr]C|3                                              
 rep.stop.time                5 TIME     L                 :MUWR[muwr]C|4                                              
 rep.subtotal                 5 CHOICE   L                 :MUWR[muwr]C|16                                             
 rep.title                   50 FREE     L                 :MUWR[muwr]C|5                                              
 Ì     i   2
mm.eqp.wo.selections    (selections) 
[report, rep.sel.queue]
:MUWR[muwr]C["S",muwSQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 rep.sel.queue                2 PINT     R                 muwSQ                                                       
 rep.select.field            15 FREE     L  MM.FIELDS      :MUWR[muwr]C["S",muwSQ]|0                               
 rep.select.from             30 FREE     L                 :MUWR[muwr]C["S",muwSQ]|1                                   
 rep.select.from.date         8 DATE     L                 :MUWR[muwr]C["S",muwSQ]|3                                   
 rep.select.to               30 FREE     L                 :MUWR[muwr]C["S",muwSQ]|2                                   
 rep.select.to.date           8 DATE     L                 :MUWR[muwr]C["S",muwSQ]|4                                   
 Ì     i   2
mm.eqp.wo.report.data    (report.data) 
[report, rep.sort1,rep.sort2,rep.sort3,rep.prop.no]
:MUWR[muwr]R[muWV1,muWV2,muWV3,mu]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 rep.sort1                   15 FREE     L                 muWV1                                                       
 rep.sort2                   15 FREE     L                 muWV2                                                       
 rep.sort3                   15 FREE     L                 muWV3                                                       
 rep.prop.no                 10 FREE     L  MM.EQP         mu                                                      
 Ì     i   2
mm.eqp.wo.report.wo.data    (report.wo.data) 
[report,rep.sort1,rep.sort2,rep.sort3,rep.prop.no, rep.wo.no]
:MUWR[muwr]R[muWV1,muWV2,muWV3,mu]L[muw]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 rep.wo.no                    6 PINT     R  MM.EQP.WO      muw                                                     
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 mm.eqp.wo.date.index               [date,no] = status
   date.x                             ?MUWB[muwD,muw]

 mm.eqp.wo.eqp.date.index           [MM.EQP.id,date,no] = status
   eqp.date.x                         ?MUWC[mu,muwD,muw]

 mm.eqp.wo.eqp.pm.date.index        [MM.EQP.id,type,date,no] = status
   eqp.pm.date.x                      ?MUWD[mu,mup,muwD,muw]

 mm.eqp.wo.eqp.index                [MM.EQP.id,no] = status
   eqp.x                              ?MUWA[mu,muw]

 mm.eqp.wo.item.x                   [item,no]
   item.x                             ?MUWI[mt,muw]