From Newsgroup: comp.sys.ibm.as400.misc

Hello All;

Does anyone know of a program which can scan all numeric files in all physical files within a library and report any found data decimal errors? I have a client who asked about such a program.

There are programs that can scan a single field in a single file but I haven't come across a program that can scan all numeric fields in every physical file within a library.

Many Thanks.

KM
--- Synchronet 3.21d-Linux NewsLink 1.2

From Newsgroup: comp.sys.ibm.as400.misc

On Thursday, August 17, 2023 at 10:12:54rC>AM UTC-4, K M wrote:

Hello All;

Does anyone know of a program which can scan all numeric files in all physical files within a library and report any found data decimal errors? I have a client who asked about such a program.

There are programs that can scan a single field in a single file but I haven't come across a program that can scan all numeric fields in every physical file within a library.

Many Thanks.

KM

Well IBM offers this solution: https://www.ibm.com/support/pages/correcting-decimal-data-errors
A more comprehensive approach can be found in the discussions in and on Simon's piece here: https://www.rpgpgm.com/2015/04/coping-with-data-decimal-error-when.html - the comments reference a piece I wrote fro ITJungle.
It really depends on whether you want to know which fields in which records are in error and how you want to fix them.
--- Synchronet 3.21d-Linux NewsLink 1.2

From Newsgroup: comp.sys.ibm.as400.misc

Thanks for the response Jon.
The customer basically wants to scan every numeric field in a choice of physical files looking for data decimal errors; whether that be *ALL files across *ALL libs or any combination thereof down to a single file. I suppose if a program exists that scanned and produced RNQ0907, then output with the file and field names along with RRNs would be enough.
He didn't go into details about how he wants the field values corrected. Only reporting them for now.
Simon's RPGPGM.COM example is close and I'll pass it along to the customer. BTW, I never thought how useful a program like this could be. The customer's request seems quite reasonable.
--- Synchronet 3.21d-Linux NewsLink 1.2

From Newsgroup: comp.sys.ibm.as400.misc

On Friday, August 18, 2023 at 1:34:15rC>PM UTC-4, K M wrote:

Thanks for the response Jon.

The customer basically wants to scan every numeric field in a choice of physical files looking for data decimal errors; whether that be *ALL files across *ALL libs or any combination thereof down to a single file. I suppose if a program exists that scanned and produced RNQ0907, then output with the file and field names along with RRNs would be enough.

He didn't go into details about how he wants the field values corrected. Only reporting them for now.

Simon's RPGPGM.COM example is close and I'll pass it along to the customer. BTW, I never thought how useful a program like this could be. The customer's request seems quite reasonable.

It is a reasonable request as long as they intend to do something about theroot cause. The crritical thing is to use information from programs such as these toghether with journal entries to establish the programs in error and fix them!
--- Synchronet 3.21d-Linux NewsLink 1.2

From Newsgroup: comp.sys.ibm.as400.misc

On 8/18/2023 1:34 PM, K M wrote:

Thanks for the response Jon.

The customer basically wants to scan every numeric field in a choice of physical files looking for data decimal errors; whether that be *ALL files across *ALL libs or any combination thereof down to a single file. I suppose if a program exists that scanned and produced RNQ0907, then output with the file and field names along with RRNs would be enough.

He didn't go into details about how he wants the field values corrected. Only reporting them for now.

Check out this solution by saitology campaign. It addresses all of your requirements and then some:

https://www.reddit.com/r/IBMi/comments/17ru8vo/decimal_data_errors_on_ibm_i/

--- Synchronet 3.21d-Linux NewsLink 1.2