Re: Program Example in ILE RPG: Reading encrypted data from a file does not compile -- RPG400-L

× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.

On 2019-11-08 5:05 a.m., Rishi Seth wrote:

It would be more helpful if you showed where the errors appeared in your compiler listing.

Here is one of the errors:

584 C callp Print('Open of Customer Processing -
585 * Information File (CUSPI) failed')
*RNF0267 20 584 009500 Character literal has missing trailing
apostrophe; apostrophe assumed.
*RNF0312 20 584 009500 A right parenthesis is expected but is not found.
586 C return error

The cause of the error is easier to see in the actual code:

C callp Print('Open of Customer Processing -
* Information File (CUSPI) failed')
C return error

The line with the second part of the literal is commented out.

About the errors for this callp statement:
C callp CrtKeyCtx( KEY :keySize :keyFormat +
c :keytype :keyform :KEKctx +
c AESctx :FKctx :QUSEC)

Look at this similar callp statement which does not get any errors:
C callp CrtKeyCtx( QC3D040000 :keySize :'4'
C :keyType :keyForm :*omit
c :*omit :kekctx :QUSEC)

There are many other errors, but if you study the messages from the compiler and then study your code, I think you will be able to figure them out.

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.