Re: GLD541 - shows "Journal header" already exists

[MacWheel99@xxxxxxx]

Tom

The program that I wrote to deal with similar situation - it was 2 years ago.
The CL feeds to the RPG what type of GL transactions to be mucked with:
Company, fiscal year, fiscal period, old value (IN), new value (IQ).
I did it this way so that next time something mucked up, easy to alter CL to
specify values involved (if this happened more often, I might make a prompt
screen for it).

The RPG reads GJWL04 for update and GJHL01 for the facts.
GJW is looped through within the parameter range from CL
when we find GJW content that match parameter range & old value (IN)
use that to chain to GJH to see if the journal already exists there.
If it is not found, then no action needed.

If it is found, then:
substitute new value (IQ) for journal prefix;
write audit trail identifying what got altered;
update GJW field WJJRN with the replacement journal identification

This program needs to be run when no one else is in GLD.

I hope that this information is helpful to your current situation.

MacWheel99@aol.com (Alister Wm Macintyre) (Al Mac)