Re: Copying and Pasting from MS Word

[Luis Rodriguez <luisro58@xxxxxxxxx>]

Robert,

You could define a BEFORE trigger (either for update and/or insert) and
check and fix the bad data before it gets to the file.

That said, although chopping off fingers seems a little extreme, I always
thought that it would be nice to have a way to send electric shocks to the
users thru the keyboard :-)

IF %USER_ERROR >= n;
  SEND_SHOCK();
ENDIF:

Regards,

Luis Rodriguez
IBM Certified Systems Expert — eServer i5 iSeries
--



On Sat, Apr 16, 2011 at 7:16 AM, Robert Ostrowski <
Bob.Ostrowski@xxxxxxxxxxxxxxxx> wrote:

> 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.