cobol

I am trying to read a EBCDIC file and convert it to ASCII format in Java, with a help of copybook. I am using JRecord to read the copybook. So now, how do I get the field level from the copybook using JRecord? Edit 1: Kindly excuse me for a vague question. I have no experience in mainframe or cobol. I am adding few more details if it could help. My source file contains multiple transaction details. The copybook contains the information on the transaction and the fields relating to that particular transaction. I have to split the each transaction and its fields to a separate file(containing one

OK so I'm taking an online COBOL class now and this week the content is control break and control field... For previous lectures I can understand easily but I have no idea what this lecture talks about. What is a control field and what's the usage? Thanks. Here are the lecture websites: http://flashserver.ait.iastate.edu/shchang/cobol/chapter10/chapter10u1/index.html http://flashserver.ait.iastate.edu/shchang/cobol/chapter10/chapter10u2/index.html http://flashserver.ait.iastate.edu/shchang/cobol/chapter10/chapter10u3/index.html A Control Field is a field which indicates how data is grouped.

I have faced a mysterious problem while using the COMPUTE function in AS/400. The scenario is as follows: 01 WSAA-AMOUNT-A PIC S9(15)V9(02) COMP-3. 01 WSAA-AMOUNT-B-01 PIC S9(16)V9(02) VALUE 0. 01 WSAA-AMOUNT-B-02 PIC S9(13)V9(05) VALUE 0. 01 WSAA-AMOUNT-C PIC S9(16)V9(02) VALUE 0. 01 WSAA-RESULT PIC S9(15)V9(02) VALUE 0. MOVE 2500.87 TO WSAA-AMOUNT-A. MOVE 12285 TO WSAA-AMOUNT-B-01. MOVE 12285 TO WSAA-AMOUNT-B-02. MOVE 4387.5 TO WSAA-AMOUNT-C. COMPUTE WSAA-RESULT ROUNDED = (WSAA-AMOUNT-A / ( WSAA-AMOUNT-B-01 + WSAA-AMOUNT-C) * 100 ). DISPLAY WSAA-RESULT. COMPUTE WSAA-RESULT ROUNDED = (WSAA

I think I'm using Enterprise COBOL for z/OS. What's a technique to emulate the functionality of, for example, the standard C library's sleep() function? Probably the easiest method is to use the Language Environment callable service CEE3DLY or CEEDLYM . Modern Coding I don't know whether you have found your answer or not. There is an IBM program that enables the machine to sleep ... or to wait : its name is ILBOWAT0 . Here is the link of a very good example on how you can code it : http://www.mvsforums.com/helpboards/viewtopic.php?t=2008&highlight=delay In this example, WAIT-TIME is in seconds

I am trying to understand how the COBOL variables with COMP Usage clause stores values. I tried one example as below 01 VAR14 PIC S9(5) USAGE COMP. MOVE 12345 TO VAR14 DISPLAY VAR14 In SPOOL the value of VAR14 is coming as 0000012345 . S9(5) COMP size is 4 bytes as per manuals so my understanding is VAR14 should be displayed as 000012345 . The binary representation as below: 0000 0000 0000 0000 0011 0000 0011 0100‬ Can someone please help in understanding the output value 0000012345 ? Thanks In IBM's Enterprise COBOL, there are four ways to define a binary field: COMP; COMP-4; BINARY; COMP-5.