If using the IBM COBOL Set for AIX (or similar compiler), check for
MAP
and
LIST
compiler options. You may also want to compare the output with OPT and NOOPT. If you start at:
http://publib.boulder.ibm.com/infocenter/comphelp/v7v91/index.jsp?topic=/com.ibm.aix.cbl.doc/pgaix.htm...
Yes, you may include the info in your copy book.
So far, there have been NO "conforming" implementations created by any vendor.
I don't know of any "programmer oriented" books. (Actually, there is one, but it is in Dutch <G>).
Some day, I'll update the FAQ with all the information about it...
Although there was already a FAQ with a "copy-book" of file status codes for "traditional" ('85 Standard) COBOL, I have now added a FAQ with (all the excruciating) details of "standard" file status codes from the '02 Standard.
This includes new
- 0x *> implementor defined succesful
-...
To determin if your compiler supports larger than the base-10 values specified by the number of "9's" in the PICTURE in COMP-? or USAGE BINARY fields, check for a compiler option (or directive) similar to:
TRUNC/NOTRUNC
or
TRUNC(STD)
When running in "standard" (TRUNC) mode, then...
Although there is another FAQ on the "traditional" file status codes, there are some new ones in the '02 Standard (and some new implementor defined ranges). The following information is from the '02 Standard:
* * * * * * * *
I-O status expresses one of the following conditions upon...
It may be in the thread somewhere, but if you are using a compiler that reats COMP the same as USAGE BINARY (which many do - but not all) *AND* you are running in "standard conforming mode" then it is true that a field like:
05 Num1 Pic S9(5)V99 COMP.
will "truncate" above +99999.99 or...
If you are using a current IBM mainframe compiler, then make certain that you understand the differences between
DBCS
and
Unicode
Checkout the
- NSYMBOL compiler option
- The NATIONAL-OF and DISPLAY-OF intrinsic functions
- What "CCSID" means on an IBM mainframe system
All of these...
Also, all the Micro Focus documentation is availabe (for free) online.
Check out:
http://supportline.microfocus.com//documentation/index.asp
Bill Klein
What compiler?
What operating system?
(Depending upon the answer to these questions, this may be semi-easy or semi-hard or virtually impossible)
Bill Klein
Having seen this (or at least a similar) note in another forum, I just wanted to make certain that the original poster understands that when you say "CALL" a program in a CICS environment, that this means that you are using the COBOL
CALL
statement. If you are using
EXEC CICS LINK / XCTL...
Althugh I am aware that some vendors do have extensions allowing OCCURS at the 01 (and some at the 77) level, there are some reasons - not just historical for NOT allowing this. The most obvious (to me) reason has to do with questions of what happens if you allow it for 01-levels under and FD...
To the best of my knowledge, EVERY Micro Focus product since about 1995 has required run-time licenses for ALL applications.
I suggest that you check the license agreement, if you have any question about what is and is not legal to distribute without paying run-time licensing fees.
Bill Klein
Have you talked to MF about it? Again, it is my understanding that they do hvae some "bundles" (and individual developer prices) that MIGHT meet your needs.
Bill Klein
For a 60 to 70 "end-user" situation, you MIGHT also want to contact your Micro Focus "sales representative". I believe that they have "multi-licensing" deals that MIGHT make this more cost-effective than a conversion from one vendor's COBOL to another (depending upon how many Micro Focus...
Working with "mainframe type data items" on a PC raises MANY quesitons.
First, what type of mainframe? (My guess is that the person is assuming that all "mainframes" work like IBM MVS, OS/390, and zOS computers - but I could be mistaken on this assumption). That is NOT true.
Second, if...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.