RE: primary and secondary files, match fields, summarizing/printi ng single line per key

Cral
        i knocked up a simple program based on yours plus the 
data you included - here is my output:

 PLOYER    PLOMKT    PLOIGR    PLOCSZ    PLOCVT    PLOITM 
   2005       EUR        CD        30       352     01160 
   2005       EUR        CD        35       304     01254 
   2005       EUR        JC        05       106     01250 
   2005       EUR        JC        05       106     01255 
   2005       EUR        JC        10       302     01250 
   2005       EUR        MS        10       304     01250 
   2005       EUR        PL        10       352     01159 
   2005       EUR        PL        30       304     01253 
   2005       USA        PL        10       304     01250 

As you can see, in my version, the L1has only triggered once..
Files were keyed as per your I specs (all 6 fields)

Mike

Sample Program:
FCSPLNORDIP  E           K        DISK                    
FCSINVSUMIS  E           K        DISK                    
FQPRINT  O   F     132     OF     PRINTER                 
I*                                                        
IPLNMJ1      01                                           
I                                              PLOYER  M6 
I                                              PLOMKTL3M5 
I                                              PLOIGRL2M4 
I                                              PLOCSZL1M3 
I                                              PLOCVTL1M2 
I                                              PLOITML1M1 
IINVSUM      02                                           
I              IVSYER                          PLOYER  M6 
I              IVSMKT                          PLOMKTL3M5 
I              IVSIGR                          PLOIGRL2M4 
I              IVSCSZ                          PLOCSZL1M3 
I              IVSCVT                          PLOCVTL1M2 
I              IVSITM                          PLOITML1M1 
C           *IN30     IFEQ *OFF                
C                     MOVE *ON       *IN30     
C                     EXCPTHEADER              
C                     ENDIF                    
CL1                   EXCPTEL1                 
OQPRINT  E  101           HEADER               
O       OR        OF                           
O                                   10 'PLOYER'
O                                   20 'PLOMKT'
O                                   30 'PLOIGR'
O                                   40 'PLOCSZ'
O                                   50 'PLOCVT'
O                                   60 'PLOITM'
O        E  1             EL1                  
O                         PLOYER    10         
O                         PLOMKT    20         
O                         PLOIGR    30         
O                         PLOCSZ    40         
O                         PLOCVT    50         
O                         PLOITM    60         
###########################################

This message has been scanned by F-Secure Anti-Virus for Microsoft Exchange.
For more information, connect to http://www.F-Secure.com/

**********************************************************************
This communication and the information it contains: - (a) Is intended for the 
person(s) or organisation(s) named above and for no other person(s) or 
organisation(s). Access to this mail by anyone else is unauthorised. (b) Is 
confidential, and may be legally privileged or otherwise protected in law. 
Unauthorised use, circulation, copying or disclosure of any part of this 
communication may be unlawful. (c) May be susceptible to interference, and 
should not be assumed that it has come in its original form and/or from the 
stated sender or PinkRoccade UK accepts no responsibility for information, 
errors or omissions in this e-mail or use or misuse thereof or any act done or 
omitted to be done in connection with this communication. If you are not the 
intended recipient, please inform postmaster@xxxxxxxxxxxxxxxxx immediately and 
delete it and all copies from your system.

www.pinkroccade.co.uk
**********************************************************************