I think *DEC is not for binary - others on the list will know better -
my guess for RPGLE would be: D wkCount S 10I 0 Inz(0)

-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Vinay Gavankar
Sent: Wednesday, December 31, 2014 11:33 AM
To: Midrange Systems Technical Discussion
Subject: Re: QUSRJOBI API & CPF0859 error

The new field name is not same as any other variable name.

For the call, the first parameter is a *CHAR of length 512, second is *DEC 4, 0 with value of 512, third is 'JOBI0400', fourth is '*' and last is a blank.

Not sure if *DEC is how you define binary and the value to initialize it with. If that is incorrect, it would mess things up. What is the right way to do it?



On Wed, Dec 31, 2014 at 12:11 PM, Jim Oberholtzer < midrangel@xxxxxxxxxxxxxxxxx> wrote:

I would also check variable names. Did you by chance use the same
variable name in the new file and API data?.

Yea I know that's basic but how many times do you see it?

--
Jim Oberholtzer
Chief Technical Architect
Agile Technology Architects


-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of
Scott Mildenberger
Sent: Wednesday, December 31, 2014 11:07 AM
To: Midrange Systems Technical Discussion
Subject: RE: QUSRJOBI API & CPF0859 error

Possibly the call to QUSRJOBI has a parameter coded incorrectly and
you are corrupting memory. Previously, it just happened to work and
now it doesn't because the memory being corrupted is important.

Scott


-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of
Vinay Gavankar
Sent: Wednesday, December 31, 2014 9:07 AM
To: Midrange Systems Technical Discussion
Subject: QUSRJOBI API & CPF0859 error

Hi,

Happy New Year!

I have a CL program which is working in production.

The program has a file defined and a RCVF command. It also has a call
to QUSRJOBI API at the beginning of the program. The RCVF command is
after a lot of other processing.

I changed the file to add another field, and recompiled the program
(target Release = V7R1M0) in Dev box.

The program blows up on the RCVF command with CPF0859 error (File
Override caused I/O buffer size to be exceeded).

If I comment out the call to the QUSRJOBI API, and recompile the
program (not sure WHY someone tried this), the program executes
normally with no error.

Any suggestions on why this might be happening?

Regards
Vinay
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take
a moment to review the archives at http://archive.midrange.com/midrange-l.


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take
a moment to review the archives at http://archive.midrange.com/midrange-l.


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take
a moment to review the archives at
http://archive.midrange.com/midrange-l.


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.


This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].