Why occurs can not be used in 01 level ?
- 2 Answers
- 8430 Views
- TCS, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / anil prajapati
occurs can not be define at 01 level because records never
repeated only fields are repeated
| Is This Answer Correct ? | 15 Yes | 1 No |
Answer / nitin
if we put occut at 01 level record will be repeated not
fields.
| Is This Answer Correct ? | 3 Yes | 1 No |
What will happen if a variable is declared as below.. Explain with an example? Working storage section:- 01 WS-VARX PIC X(10) VALUE 'ABCDEFGHIJ'. 01 WS-VARN REDEFINES WS-VARX PIC 9(5) VALUE '12345'. What will happen I want Display WS-VARX and WS-VARN?
How can you add a particular field in copybook?
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
how to transfer the file from pc to mainframe??
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 Linkage section? What is the Use and Why the parm length use alway "PARM-LENGTH PIC S9(4) or PIC S9 (4) COMP." any reason?.Please let me know any one... Cheers,Prasad
What is difference between comp & comp-4?
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
Have you used comp and comp-3 in your project? And how?
Mention the guidelines to write a structured cobol program?
what is dynamic array in cobol? what is the difference b/w array and table in cobol?
can internal sort be applied to sort ksds files?
COBOL 
