can we redefine 77 level item is it possible
Answers were Sorted based on User's Feedback
Answer / ariyan
Yes You can redefine a 77 level variable but with 77 alone.
eg:
77 ws-amount-n pic 9(02).
77 ws-amount-x redefines ws-amount-n
pic x(02).
Is This Answer Correct ? | 7 Yes | 0 No |
Answer / joshin
yes it is possible.oly criteria behind the redifine is you
have to follow the same level no
Is This Answer Correct ? | 7 Yes | 5 No |
Answer / amit singh
yes it is possible.oly criteria behind the redifine is you
have to follow the same level no.
it's not possible.
Is This Answer Correct ? | 1 Yes | 0 No |
wirte a pgm in using files in which we hav 10 ,20,30 40...100 records in inputfile and i want them to be send to outputfile in reverse order. PLZ HELP ME OUT .........THIS IS A RECENT QUESTION IN IGATE..
If we put three reads in COBOL in the same para one after the other, to read a PS file,will it read the same record thrice or it will read three records sequentially? For example : Input File 01 02 03 Para 900 Read infile Display Infile rec Read infile Display infile rec Read infile Display infile rec. What will be the output?
There is a variable with value 19446. Requirement is to convert it to 194.46. I tried it by doing divide by 100 and my receiving field data type is 9(03)v99. But the output is 194. I am not getting the decimal value. Could anyone pls let me know how to get this done?
maximum of how many screens we can open in emulator
What is difference between COBOL and VS COBOL II?.
How to read the last 100 records from a COBOL file. The file contains N number of records.
What are literals?
i have a requrement in A as viswa!@#$%&^**reddy i need to move viswareddy in B without junk values pls say how to do ths reply fast
How to solve SOC7. I have the cobol coded as below 01 A PIC 9(4). 01 AIN REDEFINES A. 05 AIN1 PIC S9(4) 01 B PIC 9(4)V99. 01 BIN REDEFINES B. 05 BIN1 PIC S9(4)V99. PROCEDURE DIVISION. START-PARA. INITIALIZE A AIN B BIN. ACCEPT A B. DISPLAY 'VALUE OF A=' A. DISPLAY 'VALUE OF B=' B. DISPLAY 'VALUE OF BIN1=' BIN1. DISPLAY 'VALUE OF AIN1=' AIN1. COMPUTE AIN1 = BIN1 - AIN1. DISPLAY 'VALUE OF AIN1=' AIN1. When i'm executing this code i'm getting SOC7 for A = 12 & B=34. Can someone explain SDSF OUTPUT DISPLAY TCOM058R JOB05458 DSID 102 LINE 0 COLUMNS 02- 81 COMMAND INPUT ===> SCROLL ===> CSR ********************************* TOP OF DATA ********************************** VALUE OF A=12 VALUE OF B=34 VALUE OF BIN1=34 VALUE OF AIN1=12 CEE3207S The system detected a data exception (System Completion Code=0C7). From compile unit PROG1 at entry point PROG1 at statement 29 at compile +000004CE at address 00007ECE. Please address how to solve this issue Thanks in advance.
what is the difference b/w level no.01 & level no.77?
can we use variable picture clause as xx.99 in cobol.
How do you define a sort file in JCL that runs the COBOL program?