Good morning. I have a situation where we need to process a large number of rcds in a short period of time and I'm wondering if anyone might have been in this same situation and came up with a good solution. The program is simple, but it is currently processing approx 16M rcds. Here's a brief look at what the program needs to do.
DOW NOT %EOF
SETGT <On key fields> FILEB
READPE FILEB <-- The reason this is needed is because the key includes year and week and all may not exist, so we need to grab the latest available
IF NOT %EOF
CHAIN <key> FILEC
ADD FIELDS TO TOTALS
MOVE FIELDS AND TOTALS TO RCD
Any suggestions would be greatly appreciated. I was actually trying to think of ways to possibly break it down into multiple jobs being submitted, or something like that. I'd be interested to hear any other ideas. Thanks, all!!