Interested to Buy Any Domain ? << Click Here >> for more details...
hi is there any means of deletin a record from a ps usin
cobol
not using jcl?eg if i am reading a record and if some
condition is matched tat particular record must be deletd
fom the ps
- 5 Answers
- 15909 Views
- iNautix, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / manikandan
The above answer is do it with the JCL, if you want to do
the same with COBOL, you should be having two files, one is
input and the other one with new output file. Otherwise i
suppose we can't do it.
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / nagesh
Fine I would like go with answer #2, since physical deletion
is not possible with ps datasets , all you can do is exclude
the records meeting the condition while writing it to new ps
datasets.
let me remind once again that Deletion is not possible with
ps data sets.
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / saikat
take the infile and outfile same in the jcl but in 2 dd
statement. Declare one ainput file to read and other as
output file to write in cobol program. Then read the file
and srore the file contents in an array/table. after
reading the full file write the file from the array records.
| Is This Answer Correct ? | 0 Yes | 2 No |
Answer / mani
If you open the dataset in io mode can't we delete the
record, i think we can.
If it is a flat file or vsam file i think we can delete the
record but the space being used for that will not be recovered.
Please check it.
| Is This Answer Correct ? | 0 Yes | 4 No |
Answer / manikandan
Ofcourse you can do it. You can do it by a simple sort.
You can use either INCLUDE COND or EXCLUDE COND in the
sysin part.
Ex: If you want to delete a record whose first 4 characters
are 'BBBB', you can do it with the following sysin card,
SORT FIELDS=COPY
INCLUDE COND=(1,4,CH,NE'BBBB')
OR
SORT FIELDS=COPY
EXCLUDE COND=(1,4,CH,EQ'BBBB')
| Is This Answer Correct ? | 2 Yes | 9 No |
if a>b continue display x. dispaly y. end-if display 1 display 2. display 3. what should be my output ?
What are the differences bitween cobol and cobol-2?
I have two questions here. 1. How to read a flat file in reverse order? 2. How to read a VSAM KSDS file in reverse order? In both the cases we donot know the total number of records.
what is amode(24), amode(31), rmode(24) and rmode(any)?
Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefines a. 03 c occus 6 times pic 9. 02 d occurs 6 times pic 9. 03 e pic x(5) 03 f pic 999.
What is the Purpose of POINTER Phrase in STRING command in COBOL?
) How do u handle errors in BMS macro?
What are the different rules of SORT operation?
can i give 9(10) in comp 3 instead of s9(10) ? if i can give wht would be ths ans
) how do u code after getting data?
What are subroutines ? and how do we pass data to the sub routines?
what is Reentrancy and Quasi-reentrancy?
COBOL 
