MVSFORUMS.com

[shekar123]

Basically i am trying to generate a output file which has a header , detail rec and a trailer.At the run time i will be assiging values to both Header rec & trailer rec that is why i have opened both of them in OUTPUT MODE in PROCEDURE DIVISION.In my program i want to print first the header , then the detail record and then the trailer.I am coding in my program like this .But when i try to compile my program i am getting compile time error saying:

A non-level-88 "VALUE" clause was found in the "FILE SECTION" or "LINKAGE SECTION". The "VALUE" clause was
treated as comments.

SAME MESSAGE ON LINE NO:



Can we not assign values / initialize to elementary items in a record structure of a File in File section ? Can anybody help me out why i am getting compile time error ?

Morever i have two very big messages which needs to be declared at level 88 but the messages are too long.How can i define them as the message is more than 133 bytes in length.

[dtf]

[Phantom]

Shekar123,

That is just an information message - not an error. You code should work fine. If you get an compilation error, pls post the error message and compiler options used.

Your second question has already been answered by Kolusu and Dtf in this thread. Pls don't post the same question again and again.
http://www.mvsforums.com/helpboards/viewtopic.php?t=4748

Thanks,
Phantom

[kolusu]

Shekar123,

Data items defined in the FILE and LINKAGE SECTIONS do not actually allocate any storage (i.e., they provide addressability to already existing storage areas), VALUE clauses other than level-88 condition-name entries may notbe specified in these sections. So you need to move your definitions to working-storage section.

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

[shekar123]

Kolusu,

Thanks for the answer regarding the File Concepts initialization and i got my doubt cleared.But still i am getting a information message like "A severe error was found in the program. The "OPTIMIZE" compiler option was cancelled.Does compiler option OPTIMIZE plays a vital role in any compilation of a program and can u please brief me what could be the cause for compile option OPTIMIZE to be cancelled and what exactly do we mean by OPTIMIZE option ? I have read about the option in one of the links but i am unable to make out any understanding.


My compile options are :


Invocation parameters:
LIB,APOST,NOADV,OBJ,NOD,SQL("APOSTSQL,APOST"),VBREF,OPT,X,NODYN,MAP,NOOFF,LIST,S,BUF(12K),RENT,TERM,NOC(E),NOSEQ
Options in effect:
NOADATA
NOADV
APOST
ARITH(COMPAT)
NOAWO
BUFSIZE(12288)
NOCICS
CODEPAGE(1140)
NOCOMPILE(E)
NOCURRENCY
DATA(31)
NODATEPROC
DBCS
NODECK
NODIAGTRUNC
NODLL
.
.
.
.

[kolusu]

[kirank]

Hi kolusu,
i'm using mf cobol.
For the question :
Can we not assign values / initialize to elementary items in a record structure of a File in File section ? Can anybody help me out why i am getting compile time error ?

when i tried it as :

data division.
file section.
01 file-rec.
05 ename pic x(5) value "abcde".

and i opened the file and writing file-rec.
it is writing properly. it is not giving any compilation errors.

[Phantom]

kirank,

As I said earlier, that was just an INFORMATION message not an error.

Shekar123,

Did by any chance, your job ended in an RC >=8 ? (Assuming there are no other errors in your program).

Thanks,
Phantom

[kolusu]

kirank,

You only get informational messages during compilation even on the mainframe and the code will work. The return code is zero. However the output file will not have the record "abcde" . Did you check if it actually wrote the record with "abcde".

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

[kirank]

Hi kolusu,

you are correct. It is not writing record to the output file. But where as when i accept a value into the data item and writing it to the output file, it is writing properly.

Thanks for the clarification.

kirank