Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: WMK
  • Order by date
  1. WMK

    Debugging Core under AIX

    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...
  2. WMK

    "Standard" Error Message Codes/Numbers

    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...
  3. WMK

    &quot;Standard&quot; Error Message Codes/Numbers

    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 -...
  4. WMK

    What is the largest numeric value stored in pic s(5)v999

    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...
  5. WMK

    COBOL File Status Codes - in the '02 Standard

    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...
  6. WMK

    What is the largest numeric value stored in pic s(5)v999

    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...
  7. WMK

    Kanji charecters in Cobol

    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...
  8. WMK

    Sorting an arrary or table

    Also, all the Micro Focus documentation is availabe (for free) online. Check out: http://supportline.microfocus.com//documentation/index.asp Bill Klein
  9. WMK

    reading any file from any library

    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
  10. WMK

    Cobol occurs &amp; index - thru CICS

    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...
  11. WMK

    occurs if statement

    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...
  12. WMK

    Reasonally priced COBOL licenses

    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
  13. WMK

    Reasonally priced COBOL licenses

    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
  14. WMK

    Reasonally priced COBOL licenses

    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...
  15. WMK

    PC COBOL Standards

    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...
  16. WMK

    pic x(2) to hex

    Because I didn't handle the first response correctly, I thought that I would also post a (complete program, you would only need snippets) for converting HEX (in display format) to decimal values. Identification Division. Program-ID. HEX2DEC. Data Division...
  17. WMK

    pic x(2) to hex

    OOPS, Please realize that my last reply was WRONG, given the input description that you give us. You said that the input would be in "hex" (2 characters), e.g 00 = X'00' BUT AB = (some charcter) would also be valid. Therefore, to use the approach I suggested, you need to A) allow...
  18. WMK

    pic x(2) to hex

    The IBM COBOL for OS/390 and VM (and later IBM MVS and OS/390) compiler all support the ANSI/ISO 1989 Intrinsic Functions module. They do not, however, support one byte binary fields (which I don't think is really necessary for this). Consider using the folloiwng (compatible across platforms...
  19. WMK

    fetch within a fetch - S0C4 error

    This also MAY depend upon which release/version of - COBOL - PL/I - Language Environement you are using. There are DEFINITE differences in what is and is not allowable for COBOL / PL/I ILC depending upon what release and version of each of these you are using. Bill Klein
  20. WMK

    Group level isue between NetCobol and MicroFocus

    Given the code snippet 03 TABEL1 VALUES ZEROES. 05 XITAB1 PIC S9 OCCURS 10 TIMES INDEXED BY XI1. 03 TABEL2 VALUES ZEROES. 05 XITAB2 PIC S9 OCCURS 10 TIMES. My guess is that you (or the original coder) is not (was not aware that with any ANSI '85 Standard conforming...

Part and Inventory Search

Back
Top