Re: CPF5192 -- RPG400-L


On 20/05/2006, at 2:18 AM, Rob Dixon wrote:

I am getting CPF 5192 with negative response code 1005012A when writing
multiple formats to the screen.


This sense code means:
        "An attempt was made to write past the end of display"

I am not using a subfile nor any special 5250 features such as scrollbars, etc.
I have used this technique and this display file for many years without
problem.

The display file was compiled with RSTDSP(*YES) and DFRWRT(*YES) and
SHARE(*YES) but in the present situation, only one program is writingto it.
If I change the DFRWRT to *NO, it works OK, but I don't want to do this
permanently because it materially affects response times. Thissuggeststhat it is not a data problem. Certainly, I cannot see any invaliddata
in a dump.

Has any one any bright ideas please?

I don't know why DFTWRT(*NO) works yet DFRWRT(*YES) fails except thatthe latter effectively merges the formats and writes the result in onego. It is possible that during this process the 5250 data stream ismessed up. You'd need to trace the data stream in both cases andcompare to spot the difference. PC5250 will let you trace the datastream. Gene Gaunt provided a TRC5250 utility in one of the trade ragsa few years ago which will also do this. I have a modified version(fixed a few defects, improved the behaviour, handled additional 5250data, etc.

So I would start by asking why is the display being compiled? Probablybecause it was changed. So what changed that is different? This islikely the area causing the problem.

Also, ask whether you are using it on the same release (compile andrun-time) as the one on which it has been working. If not then perhapsyou need some PTFs or perhaps you should bounce it to IBM support sinceit compiles OK but won't run as expected.


Regards,
Simon Coulter.
--------------------------------------------------------------------
   FlyByNight Software         AS/400 Technical Specialists

   http://www.flybynight.com.au/
   Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
   Fax:   +61 3 9419 0175                                   \ /
                                                             X
                 ASCII Ribbon campaign against HTML E-Mail  / \
--------------------------------------------------------------------