Hello All:
After upgrading from IDMS 16.0 SP1 to 17.0 SP1 we are receiving syntax
erro=
rs in IDMSDMLC,
Below is the error and below that is the first section of code that
receive=
s this error, the cut and paste from the compile that works is from IDMS
16.0 the DMLC syntax errors are from 17.0.
I also have a cut and paste of the JCL for IDMSDMCL, have anyone
experience=
d these issues under 17.0 SP1?
- - LISTING OF MESSAGES - -
04055 01886 PERFORM IDMS-STATUS
|
E DML004 Syntax Error
|
E DML004 Syntax Error
05928 03442 PERFORM IDMS-STATUS
|
E DML004 Syntax Error
|
E DML004 Syntax Error
05940 03451 PERFORM IDMS-STATUS.
|
E DML004 Syntax Error
|
E DML004 Syntax Error
06242 00100 PERFORM IDMS-STATUS
|
E DML004 Syntax Error
01884 MOVE WS-TX-YR TO TAX520-II-VAL
TXBII
01885 * OBTAIN TAXII-TBL-REC WITHIN TBL-KEYIX USING TAX520-II-KEY
DMLC0
MOVE 99 TO DML-SEQUENCE
CALL 'IDMS' USING SUBSCHEMA-CTRL
IDBMSCOM (33)
SR520
TBL-KEYIX
TAX520-II-KEY
IDBMSCOM (43);
01886 PERFORM IDMS-STATUS
TXBII
XXDMLC EXEC PGM=3D3DIDMSDMLC
XXSTEPLIB DD DSN=3D3DTAXCM.IDMS.&LOAD..DBA.LOADLIB,DISP=3D3DSHR
IEFC653I SUBSTITUTION JCL -
DSN=3D3DTAXCM.IDMS.TAXZ.DBA.LOADLIB,DISP=3D3DSH=
R
XX DD DSN=3D3DTAXCM.IDMS.&LOAD..LOADLIB,DISP=3D3DSHR
IEFC653I SUBSTITUTION JCL - DSN=3D3DTAXCM.IDMS.TAXZ.LOADLIB,DISP=3D3DSHR
XX DD DSN=3D3DTAXCM.IDMS.&LOAD..USER.LOADLIB,DISP=3D3DSHR
IEFC653I SUBSTITUTION JCL -
DSN=3D3DTAXCM.IDMS.TAXZ.USER.LOADLIB,DISP=3D3DS=
HR
XXSYSCTL DD DSN=3D3DTAXCM.IDMS.&SYSCTL..SYSCTL,DISP=3D3DSHR
IEFC653I SUBSTITUTION JCL - DSN=3D3DTAXCM.IDMS.TAXP.SYSCTL,DISP=3D3DSHR
XXSYSIDMS DD DSN=3D3DTAXCM.&CVCONT..COPYLIB(&DICT),DISP=3D3DSHR
IEFC653I SUBSTITUTION JCL -
DSN=3D3DTAXCM.PROD.COPYLIB(APPLDICT),DISP=3D3DS=
HR
XXSYSIPT DD DSN=3D3D&&PAN,DISP=3D3D(OLD,DELETE,DELETE)
XXSYSPCH DD DSN=3D3D&&DMLC,DISP=3D3D(,PASS),
XX UNIT=3D3DVIO,SPACE=3D3D(CYL,(3,1),RLSE),
XX DCB=3D3D(RECFM=3D3DFB,LRECL=3D3D80,BLKSIZE=3D3D0)
XXSYS001 DD UNIT=3D3DVIO,SPACE=3D3D(TRK,(30,10),RLSE)
XXSYS002 DD UNIT=3D3DVIO,SPACE=3D3D(TRK,(30,10),RLSE)
XXSYS003 DD UNIT=3D3DVIO,SPACE=3D3D(TRK,(30,10),RLSE)
XXSYSLST DD SYSOUT=3D3D*,DCB=3D3DBLKSIZE=3D3D133
William M. Allen, Jr.
ARCH Consulting Associates, Ltd.
(704) 641-0296
The information transmitted is intended only for the person or entity to which it is addressed and may contain CONFIDENTIAL material. If you receive this material/information in error, please contact the sender and delete or destroy the material/information.
"
IDMS 3rd-party providers forum
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
IDMSVENDOR-L@LISTSERV.IUASSN.COM
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
Normal
Normal
Re: [IDMSVENDOR-L] COBOL Compile issues under IDMS 17.0 SP1
"its not the fix i would object to - its the optional bits that revert
functionality to a prior release
i think that turning on the bit(s) is fine as long as it is accompanied
with an immediate effort to modify the source to comply with the idms
software - should not be the other way around (since this is only
enforcing a requirement that has been around forever but must have been
abused so many times enforcement is now required ...)
Chris Hoelscher
IDMS/DB2 Database Architect
Humana Inc
502-476-2538
choelscher@humana.com
you only need to test the programs that you want to work correctly
From:
""Atkinson, Wesley"" <
Wesley_Atkinson@DELL.COM>
To:
IDMSVENDOR-L@LISTSERV.IUASSN.COM
Date:
03/01/2010 12:03 PM
Subject:
Re: [IDMSVENDOR-L] COBOL Compile issues under IDMS 17.0 SP1
Sent by:
IDMS 3rd-party providers forum <
IDMSVENDOR-L@LISTSERV.IUASSN.COM>
I couldn't agree more and I held my nose applying the PTF. But, I believe
=
we heard this fix would be sourced to future releases, though I've not
read=
that anywhere.