I found a way using a web app to delete the records. Now to find a way
to keep users from copying and pasting. Good luck to me on that one...







Bob Ostrowski | Senior Programmer/Analyst
TRAINOR GLASS COMPANY | National - IT
11901 S. Austin Ave. | Alsip, IL 60803
T 708.293.4218 | F 708.293.6218
bob.ostrowski@xxxxxxxxxxxxxxxx | www.trainorglass.com





-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Dennis Lovelady
Sent: Saturday, April 16, 2011 7:04 AM
To: 'Midrange Systems Technical Discussion'
Subject: RE: Copying and Pasting from MS Word

If you write your program so that RPG doesn't try to move the decimal
fields
on input, you will avoid the incoming Decimal Data error that's causing
you
fits.

How can you do that? Just use a DS input or (I cannot believe I'm
saying
this!) internally-define the record. Then you can (using RRN) CHAIN to
the
record of interest, and execute your DELETE operation.

Does it make sense?

Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
"Nothing is more humiliating than to see idiots succeed in enterprises
we
have failed in."
-- Flaubert


For some reason or another, people here like to copy and paste text
from
MS Word into green screen applications.
Maybe they think they are going to get bold and italics to print in a
QPRINT output file, who knows? Anyway,
what ever hidden characters are in Word's text, they are corrupting
records in physical files. Until now, I've been
able to write a simple RPG program to chain to the bad records and
delete them. This morning, I tried this and
received the error "decimal data error at statement A00009" and the
records won't delete. Nor will they delete
using the UPDDTA command. I get a "record does not exist" error. All
I
see using UPDDTA are the three key fields
of the file and none of the other data.

Does anybody have another idea for a way to delete these bad records?

Aside from chopping off the hands of the people doing this, is there
also a way you can think of to check for
those hidden characters from Office products?









Bob Ostrowski | Senior Programmer/Analyst
TRAINOR GLASS COMPANY | National - IT
11901 S. Austin Ave. | Alsip, IL 60803
T 708.293.4218 | F 708.293.6218
bob.ostrowski@xxxxxxxxxxxxxxxx <mailto:bob.ostrowski@xxxxxxxxxxxxxxxx>
| www.trainorglass.com <http://www.trainorglass.com>





--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.



This thread ...

Follow-Ups:
Replies:

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

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