Can we move X(9) to 9(9). If yes what are the ways for
doing this?
Answers were Sorted based on User's Feedback
Answer / varun v
yes you can..use REDEFINES for the same purpose.
Working storage section:-
01 WS-VARX PIC X(9) VALUE SPACES.
01 WS-VARN REDEFINES WS-VARX PIC 9(9).
Now you can move X(9) variable to WS-VARX.Eventually it is
moved to the 9(9) variable WS-VARN.
Is This Answer Correct ? | 12 Yes | 5 No |
Answer / ashish
Alphanumeric to numeric movement is possible but not always,
say if it has numeric value then only it is possible o/w if
it contains alphabetic value then it wont b possible
Is This Answer Correct ? | 10 Yes | 4 No |
Answer / nidhi
The NUMVAL function returns the numeric value represented by the
alphanumeric character string specified in an argument. The function
strips away any leading or trailing blanks in the string, producing a
numeric value that can be used in an arithmetic expression.
Is This Answer Correct ? | 1 Yes | 0 No |
The disposition parameter in the jcl is share ( DISP+SHR ) and the program opens file in extend mode what will happen?
Suppose, file A has 100 records and file B has 500 records. We want to write records common to both A and B into file C and records which are present only in either A or B into another file D. What should be the logic of Cobol program to achieve this?
7 Answers Bank Of America, Mind Tree,
What is the difference between structured cobol programming and object alternativelyiented cobol?
what r the types of perform statement
I have a Flat file in which certain records are present in a tabular format. I need to extract some of the records on some basis from it and copy them into a flat file...how it can be done ??
how will u retreive value from a table.write it with syntex. 01 ws-table 05 ws-table1 occurs 10 times. 05 ws-table2 occurs 10 times. the above is 2 dimensional array..how will u retrieve 1st element of an array
Suppose i want to declare a binary comp fild of 7 byte .how to write?
Explain sorting techniques in cobol program? Provide the sort file definition, the sort statement, its syntax and meaning
what is rediffine clause?in what situation it can use?give me real time example?
is it possible to rename 01 level?
s9(18) comp-3:: What is the size of memory it takes internally?
01 ws-p pic 9(2). 01 ws-q pic 9(2) value 01. 01 ws-r pic 9(2) value 99. p.d. compute p = q + r what will be result of p ans(00) but my question is that how i got 10 on the place of 00. (truncation will ocuure on right side not left). please tell me ?