RE: Ignore decimal data error

["Ed Chabot" <echabot@xxxxxxxxxxxxxxxxxx>]

  Don,
If you WRKPGM and do a 5 to Display Program Info., there is an entry for Fix
decimal data.  Press F1 on it and the help text explains the setting.  It
sounds like what you are looking for.
HTH


                        Display Program Information

 Program  . . . . . . . :   AP100R        Library  . . . . . . . :   GUNLIB
 Owner  . . . . . . . . :   GWARNER
 Program attribute  . . :   RPG

 Program creation information:
   Program creation date/time . . . . . . . . . . . :   08/18/99  09:50:27
   Type of program  . . . . . . . . . . . . . . . . :   OPM
   Source file  . . . . . . . . . . . . . . . . . . :   QRPGSRC
     Library  . . . . . . . . . . . . . . . . . . . :     GUNLIB
   Source member  . . . . . . . . . . . . . . . . . :   AP100R
   Source file change date/time . . . . . . . . . . :   06/24/99  12:31:37
   Observable information . . . . . . . . . . . . . :   *ALL
   User profile . . . . . . . . . . . . . . . . . . :   *USER
   Use adopted authority  . . . . . . . . . . . . . :   *YES
   Fix decimal data . . . . . . . . . . . . . . . . :   *NO
   Text description . . . . . . . . . . . . . . . . :   A/P Check Print -
Custom
ized

More...
 Press Enter to continue.


Ed Chabot
The Marlin Firearms Company
100 Kenna Drive
North Haven, CT 06473
(203)985-3254

-----Original Message-----
From: owner-midrange-l@midrange.com
[mailto:owner-midrange-l@midrange.com]On Behalf Of Fisher, Don
Sent: Monday, April 16, 2001 11:03 AM
To: 'Midrange List'
Subject: Ignore decimal data error


Would any of you happen to know how to determine whether an RPG program was
compiled with the IGNDECERR parameter set to "*YES"?

I am reviewing an old system written primariliy in RPG/400 with almost no
RPGIV code and would like to verify the absence of this technique.

The systems is at V4R1M0 and I've already checked the program APIs with no
luck although I might have been looking at the wrong book.

Any help will, as always, be greatly appreciated.

Donald R. Fisher, III
Project Manager
Heilig-Meyers Furniture Company
(804) 784-7500 ext. 2124
Don.Fisher@HeiligMeyers.com

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---