Can I declare S9(19) in cobol

prashant_mq · New User Joined: 29 Aug 2006 Posts: 24

Hi,

Can I declare s9(19) in cobol.

What is the maximum numeric digits allowed.
Whats the alternative to use s9(19).

Thanks

Craq Giegerich · Posted: Tue Jun 10, 2008 3:09 am Post subject:

You need to check the manuals for your version of COBOL

For Enterprise COBOL

prashant_mq · New User Joined: 29 Aug 2006 Posts: 24

How do you declare in the JCL?

Craq Giegerich · Posted: Tue Jun 10, 2008 4:38 am Post subject:

You don't declare COBOL Pic's in JCL!

dick scherrer · Posted: Tue Jun 10, 2008 5:47 am Post subject:

Hello,

prashant_mq · New User Joined: 29 Aug 2006 Posts: 24

prashant_mq · New User Joined: 29 Aug 2006 Posts: 24

I'm writing a COBOL program to simulate setup message properties for the latest MQ version 7.

I need a variable of S9(19) in order to create the message handle.

Here is the link of the API call:
http://publib.boulder.ibm.com/infocenter/wmqv7/v7r0/topic/com.ibm.mq.csqzak.doc/fr40230_.htm?resultof=%22%4d%51%43%52%54%4d%48%22%20%22%6d%71%63%72%74%6d%68%22%20

dick scherrer · Posted: Tue Jun 10, 2008 7:54 am Post subject:

Hello,

ARITH(EXTEND) is one of the parms that may be supplied to the compiler. It is usually specified as an override in the execute jcl.

When your compile is submitted, there are most likely parameters supplied in the compile PARM. You would need to add ARITH to those parms.

I'd suggest you talk with whoever supports your standard compiler processes and explain the requirement and they should be able to show you how to do this on your system.

stodolas · Posted: Tue Jun 10, 2008 8:03 am Post subject:

We put it as the very first line in the COBOL source if we need it. Before any IDENTIFICATION or anything else it acts as a precompiler directive.

prashant_mq · New User Joined: 29 Aug 2006 Posts: 24

dick scherrer · Posted: Tue Jun 10, 2008 1:11 pm Post subject:

Hello,

stodolas · Posted: Tue Jun 10, 2008 6:49 pm Post subject:

Here is how we do it. It goes as the first line in the COBOL source.

prashant_mq · New User Joined: 29 Aug 2006 Posts: 24

prashant_mq · New User Joined: 29 Aug 2006 Posts: 24

I have tried to put the ARITH(EXTEND) on the PARM.COBOL= in JCL and also PROCESS ARITH(EXTEND) or CBL ARITH(EXTEND) before the IDENTIFICATION DIVISION, however it is still failed.

dick scherrer · Posted: Tue Jun 10, 2008 7:26 pm Post subject:

Hello,

You have posted nothing that shows where you used the extend

Have you tried the method Steve posted? In the code or in the jcl will work so you should check with your organization on which method is proper for your system. Either should get you thru an initial test.

So far, we've seen nothing that would tell the compiler that large numbers were valid.