|
Thanks Dennis, this is what I get when I wrk w/them...any ideas?
Work with Edit Descriptions
Edit
Opt Description Text
QEDIT5 EDIT CODE SIMILAR TO 'B' EXCEPT DR=+
QEDIT6 EDTCD SIMILAR TO 'K' EXCEPT * PRTS AS TOTAL IND
QEDIT7 EDIT CODE SIMILAR TO 'J' EXCEPT FIXED $ PRINTS
QEDIT8 created by CHGIBMOBJ7 Use for telephone plus AC
QEDIT9 Recreated Edit code9
XEDIT8 created by CHGIBMOBJ7 Use for telephone plus AC
XEDIT9 created by CHGIBMOBJ7
ZEDIT9 created by CHGIBMOBJ7
-----Original Message-----
From: Dennis Lovelady <iseries@xxxxxxxxxxxx>
To: 'Midrange Systems Technical Discussion' <midrange-l@xxxxxxxxxxxx>
Sent: Fri, Jun 25, 2010 8:07 am
Subject: RE: compile msg CPD7520 on edit codes
I should have sent you to:
GO CMDEDTD
Dennis Lovelady
ttp://www.linkedin.com/in/dennislovelady
-
It is only impossible until it is not."
-- Captain Jean-Luc Picard
WRKEDTD will allow you to change the 5-9 edit codes. What do you see
on that display?
Did these sources by any chance come from another system? A little
history may help us understand the source of your issue.
Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
"A banker warned the British poet Robert Graves that one could not
grow
rich writing poetry. He replied that if there was no money in poetry,
there was certainly no poetry in money, and so it was all even."
-- Robert Graves
> Hi Folks, I'm at a loss for how to resolve this. Compiles are
> returning CPD7520, does anyone know what is needed to resolve them
and
> compile? Is there a file that holds edit codes? I can view them
but
> I'm remembering that there might be a way to create user defined
edit
> codes and put them in a file? I've seen other posts on this on
> midrange but can't tell how to resolve the msg.
>
> Any help appreciated.
>
> Thanks, Frank
>
>
> Display
Spooled
> File
> File . . . . . : C01CANOD
> Page/Line 4/16
> Control . . . . .
> Columns 1 - 130
> Find . . . . . . 7520
>
>
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7.
> ...+....8....+....9....+....0....+....1....+....2....+....3
> 1320 A WTEL01 10Y 0O 11 12EDTCDE(8)
> 01/19/98
> * CPD7520-* .
> * CPD7528-*
> 1330 prm A WVEH04 3S 0O 11 40
> 10/19/05
> 1340 A 74 DSPATR(ND)
> 01/19/98
> 1350 A WYER04 4S 0O 11 43
> 01/19/98
> * CPD7866-******
> 1360 A 74 DSPATR(ND)
> 01/19/98
> 1370 A WMAK04 8A O 11 48
> 01/19/98
>
> Display
Spooled
> File
> File . . . . . : C01CANOD
> Page/Line 9/5
> Control . . . . .
> Columns 1 - 130
> Find . . . . . . 7520
>
>
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7.
> ...+....8....+....9....+....0....+....1....+....2....+....3
> ID Severity Number
> * CPD7520 20 3 Message . . . . : Keyword ignored
> because of error in list of values.
> * CPD7528 20 3 Message . . . . : Number of
decimal
> replace positions not valid.
> * CPD7866 10 5 Message . . . . : Field overlaps
> another field with no conditions specified.
> 5722SS1 V5R4M0 060210 Data Description
> ZPGMR20/C01CANOD 6/24/10 15:09:52 Page 10
> Message Summary
> Total Informational Warning Error
> Severe
> (0-9) (10-19) (20-29)
> (30-99)
> 11 0 5 6
> 0
> * CPF7302 40 Message . . . . : File C01CANOD
not
> created in library ZPGMR20.
> * * * * * E N D O F C O M P I L A T
I
O
> N * * * * *
>
>
>
>
>
>
>
> --
> 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.
-
his is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
o post a message email: MIDRANGE-L@xxxxxxxxxxxx
o subscribe, unsubscribe, or change list options,
isit: http://lists.midrange.com/mailman/listinfo/midrange-l
r email: MIDRANGE-L-request@xxxxxxxxxxxx
efore posting, please take a moment to review the archives
t http://archive.midrange.com/midrange-l.
--
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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.