MM.DELIVER
       2
   mm.delivery.location
     mm.deliver.email.address

 Ì       2
mm.delivery.location    (main) 
[mnemonic]
&MLL[mllDL]

 Field Name                 Len Dat Typ  J  DPM                                                                    
 mnemonic                    15 FREE     L                 mllDL                                                      
 active                       2 YN       L                 &MLL[mllDL]|0                                              
 addr1                       30 FREE     L                 &MLL[mllDL]AD|0                                            
 addr2                       30 FREE     L                 &MLL[mllDL]AD|1                                            
 addr3                       30 FREE     L                 &MLL[mllDL]AD|2                                            
 city                        20 FREE     L                 &MLL[mllDL]AD|3                                            
 comment                     60 FREE     L                 &MLL[mllDL]AD|7                                            
 comment2                    60 FREE     L                 &MLL[mllDL]AD|8                                            
 department                  15 FREE     L  MIS.GL.DEPT    &MLL[mllDL]|2                                          
 last.update                 10 PINT     R                 &MLL[mllDL]UPD                                             
 location                    40 FREE     L                 &MLL[mllDL]|1                                              
 phone                       15 PHONE    L                 &MLL[mllDL]AD|6                                            
 state                        2 FREE     L                 &MLL[mllDL]AD|4                                            
 zip.postal.code             10 ZIP.POST L  MIS.ZIP        &MLL[mllDL]AD|5                                        
 Ì        2
mm.deliver.email.address    (email.address) 
[mnemonic, email.q]
&MLL[mllDL]AD["E",mllEQ]

 Field Name                 Len Dat Typ  J  DPM                                                                    
 email.q                      2 PINT     R                 mllEQ                                                      
 email                       40 FREE     L                 &MLL[mllDL]AD["E",mllEQ]|0