ca.portal.admin

Re: [IDMSVENDOR-L] COBOL Compile issues under IDMS 17.0 SP1

Discussion created by ca.portal.admin on Mar 11, 2010
i believe ON is an accepted literal to follow the sort -key WITHOUT the
otherwise required semicolon or period

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:
""Pierce, Richard (DOT)"" <Richard.Pierce@STATE.MA.US>
To:
IDMSVENDOR-L@LISTSERV.IUASSN.COM
Date:
03/11/2010 09:59 AM
Subject:
Re: [IDMSVENDOR-L] COBOL Compile issues under IDMS 17.0 SP1
Sent by:
IDMS 3rd-party providers forum <IDMSVENDOR-L@LISTSERV.IUASSN.COM>



While investigating the impact of this on our shop, I started to wonder
if the following would compile correctly with the new restritions.

OBTAIN MMVR-SACT WITHIN MMVS-SACT-FNCT-X =20
USING W-SACT-KEY =20
ON DB-REC-NOT-FOUND =20
DISPLAY 'SACT NOT FOUND ' W-PARM-REC =20
GO TO S0500-EXIT. =20

Any thoughts, comments or ideas?

Dick

Richard Pierce
(617) 973-8911
richard.pierce@state.ma.us

Outcomes