What is SET TO TRUE all about, anyway?
Answers were Sorted based on User's Feedback
Answer / srivatsa
Set to True is used for 88 level condition data names.
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / mahathiaz
In COBOL II the 88 levels can be set rather than moving
their associated values to the related data item.
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / mujib khan
condition name condition is one of the condition statement..
others are
relative,sign,class,compound.
88 level no can be used as condition name
eg:
01 a pic x(1).
88 std pic value 'a' 'b' 'c'.
here in procedure division if we code
set std to true.
means every time it will return a thts the true value.
| Is This Answer Correct ? | 4 Yes | 1 No |
Answer / sroul4
in addition to #3
Set to true means the value is of the variable is 1 and 0
if false.
| Is This Answer Correct ? | 3 Yes | 0 No |
'SET TO TRUE' is used to set the value of 88 level data items.
Example
-----------
05 ws-paper pic x(1).
88 ws-hindu value 'y'.
88 ws-toi value 'n'.
if set ws-hindu to true, then ws-paper contains value 'y'
This is same as move 'y' to ws-paper
if set ws-toi to true, then ws-paper contains value 'n'
This is same as move 'n' to ws-paper
Please correct me if i am wrong.
| Is This Answer Correct ? | 3 Yes | 0 No |
how do you reference the variable block file formats from cobol programs
what is s000 u4087 error? please give the all error codes in cobol,jcl.
example for sub strings ? and refernce modifications whit output pls
0 Answers College School Exams Tests, IBM,
What are the pertinent COBOL
i was faced one question- i have value -00001234.56 Suppress the zeroes and the output should be -1234.56 But Not - 1234.56 spaces should not be available after suppressing the zeroes. logic in jcl and cobol?
how many bytes does s9(15) occupy in comp1 comp2 and comp3 ?
How to display the index.(displacement from an array)
What happens when we move a comp-3 field to an edited (say z (9). Zz-)?
what is the coding difference between COBOL and CICS.
01rec1. 05 a pic 999v99 value 123.12 05 b pic 99v9 value 45.9 02 rec2. 05 x pic 999v99 05 y pic 99v99 05 z pic x(3) value 'abc' if rec1 is moved to rec2 then what is the value of rec2?
What is the figurative constant in cobol?
Write a program to explain size error.