Interested to Buy Any Domain ? << Click Here >> for more details...
I have a source program compiled with Cobol-2. The output
file has a record length of 100 defined in the program but
a record of 60 bytes getting written into it. i.e. The rest
of 40 bytes I am not Writing anything. But it by default
puts some values into the last 40 bytes. However it does
not impact anything. But when Compiled the module with
Enterprise Cobol the last 40 bytes were spaces as fillers.
Can anyone explain?
- 5 Answers
- 16670 Views
- Cognizant, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / ram.g
hi
Before writing into the output file, just explicitly give
move spaces to rest of fields..
eg: ww-filler pic x(40) value spaces.
move ww-filler to ww-out-rec(61:40)
write ww-out-rec.
i hope the above code will resovle your problem.
Happy coding,
Ram.G
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / ramanujam
it may be filled with null values. Junk charecters.
Due to before writing data it has to initialize.
That is the reason it is showing junk charecters.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / prashanth
IN THE CASE OF FB , IT WILL FILL SPACE I.E, FILLER, BUT IN
VARAIBLE MODE YOU CAN'T SEE SPACE OR FILLER.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / vish
I think you ppl are hitting on wrong direction for
answering this question. The question doesn't seem to be
asking how to resolve a junk character, instead it's asking
about the different behaviour of the same program in two
different versions of Cobol - COBOLII and Enterprise COBOL.
One is placing junk characters in the last 40 bytes and the
other one intialized it to spaces. Any possible answer from
anyone now...?
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / sivakumar sekharannair
I will try to answer as per my understanding on the
behaviour.
With cobol-2 junk values- This is because the the 40 bytes
are not properly initialized and so the system puts some
junk values.
With enterprise cobol - spaces- I beleive that the
enterprise cobol before using an work arean intialize it by
itself and then use it. that is the reason why the unused
40 bytes had spaces.
My answer is just an assumption
| Is This Answer Correct ? | 1 Yes | 0 No |
How to retrive the 9th records out of ten records using the cobol program ?
where will we code call by content and call by reference dude pls reply soon ?
What was removed from COBOL in the COBOL II implementation?
what modification we need to do in jcl if we use sort in cobol? I mean whether we need to include tempary file used for sorting in assign statement?
study the following 01 A PIC 99V0 VALUE 5 01 B PIC 9V9 VALUE 6 01 C PIC 99V9 VALUE 2.5 01 D PIC 99 VALUE 3 COMPUTE A ROUNDED B C = A+B*C/D ON SIZE ERROR PERFORM PRINT-ERROR the comments of A.B.C after execution of the above statement are a.A=10 B=0 C=10 b.A=10 B=9.9 C=9.9 c.A=10 B=0 C=9.9 d.A=10 B=6 C=10
Why occurs cannot be used in 01 level in COBOL?
) How do u handle errors in BMS macro?
have in 100 records in a file i want to read first 3 records and skip next 3 records and agan i want to read 3 records and again i want to skip 3 records...
2 Answers ITC Indian Tobacco Company, PNP, TCS,
what are the limitations of Inline Perform?
Where the Plan is located in CICS-DB2
How can we know that cobol program is using report file or simple file....?
How can I find the maximum value of a field in a file while reading the file dynamically? without using sort function. Suppose i have a file with fields Timestamp, description, teamname, teamnumber.. i have read the file till end and find the maximun value of timestamp which is not in sorted order.. can we use function max(timestamp)?
COBOL 
