Re: Copying and Pasting from MS Word

Redefine the file using SQL instead of using DDS. You cannot get decimal
data errors injected into the file then. Try this:
STRSQL

CREATE TABLE QTEMP/DELME (
MYDEC DEC ( 15, 5),
THISDEC DEC ( 15, 5),
PRIMARY KEY (MYDEC)
)
RCDFMT DELMER

F3
DSPFD QTEMP/DELME
Record
Length
16
CRTPF QTEMP/TEST RCDLEN(16)
UPDDTA QTEMP/TEST
Enter in all characters for one row.
F3
CPYF FROMFILE(QTEMP/TEST) TOFILE(QTEMP/DELME) MBROPT(*ADD) FMTOPT(*NOCHK)
Data mapping error on member DELME. 1 -- There is data in a decimal field
that is not valid.
Data mapping error on member DELME.
Data mapping error on member DELME.
C
Cancel reply received for message CPF5029.
Error writing to member DELME in file DELME.
0 records copied to DELME in QTEMP.

If DELME was defined using DDS it would have taken that crud.

Of course, if you then had the error on the write, how would your data
entry program handle that? Does it assume that any error on a write is
because the key already exists and then does an update? Or, that the file
is full? Does it even check for an error on an update? Or does it just
ignore an indicator that was set on? Some code, carried over from 1978,
will need to be updated.

Then again, some data entry edits might be nice. Some like defined fields
to do math like
test.numField = Screen.numField * 1; // might have to wrap this with a
Monitor.
If test.numField<> Screen.numField ...




Rob Berendt