how can u redefine picx(10) with pic 9(6).
- 3 Answers
- 9222 Views
- TCS, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / sujith
05 WS-TX-REASON PIC X(10).
05 FILLER REDEFINES WS-TX-REASON.
10 WS-TX-NUM PIC 9(06).
10 FILLER PIC X(04).
| Is This Answer Correct ? | 35 Yes | 2 No |
Answer / narasimha reddy.k
05 WS-TX-REASON PIC X(10).
05 WS-TX-NUM REDEFINES WS-TX-REASON PIC 9(06).
| Is This Answer Correct ? | 10 Yes | 2 No |
Answer / mehdee
05 WS-TX-REASON PIC X(10).
05 FILLER REDEFINES WS-TX-REASON.
10 WS-TX-NUM PIC X(06).
10 FILLER PIC X(04).
| Is This Answer Correct ? | 7 Yes | 18 No |
Is it possible that the redefines clause has different picture clauses compared to the one it redefined?
How to increase the logical record length of existing PS file?
How can we find out wether to declare the data items like Integer, Char,Comp? If comp types how can we decide wether it is Comp and Comp3.How it is? Please Explain... Cheers.
01 a pic x(6) value is abcdef 01 b pic x(3) move a to b wht will be the value in b ?
How to pass return codes from cobol to jcl?
have in 100 records in a file i want to move only matched records to one output_file1 and nonmathed records are moved to another output_file2 ... any one can provide logic code
What is COMP SYNC?
What does the INITIALIZE verb do?
What is rmode(24)
consider the following PROCEDURE DIVISION entry OPEN EXTEND IN-FILE identify the correct statement a.organization of IN-FILE is sequential and records can be added in the beginning b.organization of IN-FILE is sequential and records can be added in the end c.organization of IN-FILE is indexed and records can be added in the beginning d.organization of IN-FILE is indexed and records can be added in the end
How to read a 100 record from a file through cobol?
Consider the following: 77 W-NUM PIC 9 VALUE 0 ------ MOVE 1 TO W-NUM PERFORM PARA-X UNTIL W-NUM > 9. ------ PARA-X ADD 1 TO W-NUM How many times PARA-X is executed ?
COBOL 
