How to covert given string into ASCII value in COBOL/MF
COBOL
Answers were Sorted based on User's Feedback
Answer / asmara
Just by using translate verb only u can easily translate it.
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / anu
please explained the answr for this question in detail.
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / asmara
translate(Rtrim(Ltrim(substr(col_1,1,6))),'$',0123456789')
=''
thru leading (LTRIM) and Trailing (RTRIM) spaces from the
substring, then translates embedded spaces to $ and digits
to spaces and leaves any other char unchanged, then checks
to be sure there is nothing but spaces left. We can say
that we are checking the substring contains only numberic
digits, optionally with leading and/or trailing spaces.
| Is This Answer Correct ? | 0 Yes | 2 No |
Is it possible that the redefines clause has different picture clauses compared to the one it redefined?
What are literals?
we can use set true for condition names.. similarly can we code set to false in cobol pgm? will it work?
how to display date in reverse order if the pic clause of the is numeric suppose date is 09032010 ==> need to print in 20100309 (pic clause is numeric)
How to display the index.(displacement from an array)
How can you get the ksds file records into your cobol program?
How you can characterize tables in cobol?
What is the significance of the PROGRAM-ID paragraph? If this name doesnt match with the name of the COBOL program, does it make a difference? Is the name specified in the PROGRAM-ID paragraph used as a name for the load module or any such thing?
77 a pic x(4) value '1234' -----> instead of this 'abcd' 77 b pic 9(4) value zeros. move a to b what is the answers for both cases? IS it possible? Give me elementary move rules briefly......
9(2).99 how many bytes take? Why . consider as a byte?
how would you resolve sb37 and SE37?
i have two file, each file having : file1 is having 2 fields field1 field2 file2 is having 3 fields field1 field2 field3 my req is to make it one file like: field1 field2 field1 field2 field3 if anyone know please send me syntax, i tried this with DFSORT but could not succeed.