what are the diferences b/w sub-script and index?
Answers were Sorted based on User's Feedback
Answer / kiran
Index is a displacement we cannot do any arthematic
operation by using index only we can asign value by using SET
Ex: set indexname to 1
upby/downby
Subcript is working storage variable we can use in
arethematic operations and used for occurances of a para
| Is This Answer Correct ? | 10 Yes | 0 No |
Answer / ajay dwivedi
Subscript refers to an array occurrance, whereas Index
shows the displacement in number of bytes.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / mchava
A subscript is a working storage data definition item,
typically a PIC (999) where a value must be moved to the
subscript and then incremented or decremented by ADD TO and
SUBTRACT FROM statements.
An index is a register item that exists outside the
program's working storage. You SET an index to a value and
SET it UP BY value and DOWN BY value.
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / sumankumar
SUB-SCRIPT IS NOTHING BUT NUMBER ITS CAN DEFINE IN PERFORM
AND IT CAN BE INCREMENTED BY ARITHMETIC OPERATION, AND IT
CAN BE DISPLAY DIRECTLY
INDEX IS NOTHING BUT DISPLAY POSITION OFF ARRY COMAND AND IT
INCREMENTED BY SET VERB AND IT CANNOT DIRECTLY DISPLAYED
| Is This Answer Correct ? | 0 Yes | 1 No |
Difference between ps, esds
if we display var1 then what will b displayed in below condition. 77 var1 pic s9(2) value -10. 77 var1 pic s9(2) value -11. " " " -12. " " " -13. -14 ... ... -19.
How many bytes do a s9 (7) comp-3 field occupy?
In a COBOL program, 2 tables TABLE1 and TABLE2 are defined that are indexed by INDEX1 and INDEX2 respectively. Can we use INDEX1 with TABLE2 and INDEX2 with TABLE1?
How many maximum number of procedures can we write in one COBOL program?
give the examples of strings in cobol
I have a source program compiled with Cobol-2. The output file has a record length of 100 defined in the program but a record of 60 bytes getting written into it. i.e. The rest of 40 bytes I am not Writing anything. But it by default puts some values into the last 40 bytes. However it does not impact anything. But when Compiled the module with Enterprise Cobol the last 40 bytes were spaces as fillers. Can anyone explain?
I have the file which is having the extension no as records. sample file will look like below. 2310 3410 3256 4350 3781 5408 I need to replace the record which is starting with 3 to 5 (i.e) 3410 to 5410. How can we do it through cobol and cobol-db2 program? I need the possible logic?
give the examples for strings and unstrings in cobol
how do you reference the variable block file formats from cobol programs
Describe the cobol database components?
What is Redefines clause?