Bob,
   i dont have anything as sophisticated as that.

I am opening up the file in the main program and passing it through to the subroutine.

I dont understand how a file pointer could end up referencing SYS.MESSAGE though when the application software never references it.

Thanks for the suggestion though.

jak
----- Original Message ----- From: "Bob Woodward" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Wednesday, February 08, 2006 12:15 PM
Subject: RE: [U2] SYS.MESSAGE file being corrupted


Hi John,

In our system, we have a subroutine that opens files and places the file
handle information in a dimensioned array.  When the subroutine is
called, it first checks the array to see if it's already been opened.
If it has, the handle information is passed back without having done an
actual open.  If the file is not already in the list, an open is done
and it's added to the array then the newly opened handle information is
passed back to the calling subroutine.

If you have this same type of environment, then my comments would be in
reference to the array getting clobbered and passing back bad
information for a file which is a pointer that ends up going to the
SYS.MESSAGES file instead of the intended file.  Normally I would assume
that this would only end up with records being written but it's
something to check for.

BobW


-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of John Kent
Sent: Tuesday, February 07, 2006 4:14 PM
To: [email protected]
Subject: Re: [U2] SYS.MESSAGE file being corrupted

Bob/Kevin
   the platform is Windows 2000 and its a dynamic file passed in
through a
subroutine.
ie CALL *SUB(FILE1,FILE2)

I have checked for it being clobbered  and we do not refer to
SYS.MESSAGE so
i cant see how this could happen

I have tried writing test programs to get the same error message but
without
success

jak
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/


--
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.375 / Virus Database: 267.15.2/253 - Release Date: 7/02/2006
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to