Re: Inventory History

[Tom Jedrzejewicz <tomjedrz@xxxxxxxxx>]

Al -- 

There may be an easier solution . . . 

1. Restore the ITH file from tape to ANOTHER LIBRARY.

2. Write a Query to find put the records in the restored version of
ITH and NOT in the production versionto an output file.
-- RESTORE/ITH as the first file, BPCSF/ITH as the secondary file
-- join type 3 (unmatched records)
-- join criteria - be sure of uniqueness - (see note below)
-- select ALL fields from the restored file
-- put the records into an OUTFILE, how about RESTORE/ITHX

3. Query ITHX and confirm to your satisfaction that it has the records
you need and only the records you need.  Repeat #1 & #2 adjusting the
query if necessary.
--> Do not cut corners here - run lots of tests, comparing quantities
and record counts across time periods, etc, until you are 100% sure
the output file is correct.

4. Save a copy of the production ITH file

5. CPYF *ADD from the output file to the production ITH file.
--> CPYF MBROPT(*ADD) -- no *MAP, *DROP, etc.
--> Test again - look for duplicate records

6. Run a reset, and query balances against the saved ITH from step 4.

Note:  I am not sure how the transaction sequence number works on your
system.  We have had issues with it, and have a (very simple) program
to reset it based on date and time.  I would NOT use the sequence
number to test for uniqueness.

Have fun.




-- 
Tom Jedrzejewicz
tomjedrz@xxxxxxxxx