Press F1 on that message for help. Record the message id. I have a
utility that scans message files and I've determined that is
DSPMSGD RANGE(RPG1011) MSGF(QRPGMSGE)
The first parameter is the program name. The second is the statement
number in that program which noticed the error and the third is the file
with the bogus data. In an older style of RPG which has fallen out of
practice for newer styles of RPG you used to have record indicators. For
example, an H in the first column might indicate a Header record, while a
D in the first column might indicate a Detail record associated with a
previous header record. Like I said, this has fallen out of favor for a
different database design in which the header rows are in one table and
the detail rows are in another. Makes it much easier to query data with
tools outside of RPG or other programming languages. About the only place
you see this in practice anymore is ancient programs which haven't been
touched since being migrated over from the S/34. Or EDI programs.

I suppose someone may have wrote a new one to read converted spreadsheet
data. And what may have happen is that the user decided to pretty up the
spreadsheet and now there's a new line beginning with some character not
previously trapped for.

As others have said, I would defer this to your programming staff. If you
suspect it is the spreadsheet issue find out who creates the spreadsheet
and see if my supposition is possible. If the line is strictly comments
have them remove it before submitting the spreadsheet. If it's necessary
to be processed - refer to your programming staff.

If this job is really holding up production and it will take some time to
sober up your programmer then take the option D to dump the RPG program.
You will then, most likely, get another message from a calling CL program
which informs you that the RPG program ended abnormally and again asking
you whether to cancel the CL program or continue on.

CAUTION: If your RPG program is called by a CL which looks like this:
/* Pretty up data by calling an initial RPG program */
call ZKP9AXI
/* delete order file and replace with spreadsheet data */
dltf orderdata
cpyf klupfinal orderdata

and you just abort the rpg data and continue on can you see how this may
cause drastic action? That is a major reason why most people on this list
refer you to your programming staff. It's not that we're union and we
feel we need to protect our jobs and those not in the brotherhood are
incompetent.


Rob Berendt

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

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

This mailing list archive is Copyright 1997-2024 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].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.