View previous topic :: View next topic
|
Author |
Message |
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010 Posts: 3053 Location: NYC,USA
|
|
|
|
Code: |
exec cice delete file(file name) end-exec, |
should this alone would work for deleting all the records? |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
What does the CICS Application Programming Reference manual tell you about the EXEC CICS DELETE command? |
|
Back to top |
|
|
Bill O'Boyle
CICS Moderator
Joined: 14 Jan 2008 Posts: 2501 Location: Atlanta, Georgia, USA
|
|
|
|
Whoa, you may want to think about doing this in Batch with a Batch program or 3rd-Party product. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
After closing this file to the online. . .
However - Between the performance issue and the potential for failed/incorrect transactions, suggest you consider what Bill has posted. . . |
|
Back to top |
|
|
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010 Posts: 3053 Location: NYC,USA
|
|
|
|
Yes, I agree with you all, but just wanted to know if we can do that as well in online. |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
You can delete all records in a VSAM file in CICS by reading for update each record and deleting it; however, this is NEVER a good design for a system since you are using CICS in a very wrong way.
Probably the most common and easiest way to do what you want is to close the file to CICS, delete and define it, load an initial record into it, then open the file to CICS again. |
|
Back to top |
|
|
daveporcelan
Active Member
Joined: 01 Dec 2006 Posts: 792 Location: Pennsylvania
|
|
|
|
Quote: |
Yes, I agree with you all, but just wanted to know if we can do that as well in online.
|
Translation for forum abuser to english:
I know all of you experts advise against this, but I just wanted to waste everyones valuable time for my own curiosity. Please get back to providing help for those who really need it. |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
Quote: |
Please get back to providing help for those who really need it. |
he did not say or imply that, at all. |
|
Back to top |
|
|
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010 Posts: 3053 Location: NYC,USA
|
|
|
|
Thanks Robert. |
|
Back to top |
|
|
quanzhong
New User
Joined: 12 Aug 2008 Posts: 46 Location: china
|
|
|
|
使用CLOSE EMPTY去清空一个online文件
Code: |
005900 EXEC CICS SET
006000 FILE (SS84WS-COMMAND-FILE-NAME)
006100 CLOSED
006200 ENABLED
006300 EMPTY
006400 NOHANDLE
006500 END-EXEC
|
|
|
Back to top |
|
|
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010 Posts: 3053 Location: NYC,USA
|
|
|
|
Thanks quanzhong
I will check . |
|
Back to top |
|
|
Bill O'Boyle
CICS Moderator
Joined: 14 Jan 2008 Posts: 2501 Location: Atlanta, Georgia, USA
|
|
|
|
To ensure data/program integrity, EVERY program which accesses this file must issue ENQ/DEQ API's, using the same resource-name, when the region is ACTIVE, while attempting to DELETE all the records. Hopefully, there aren't too many programs.
This is why a Batch solution would be the better way to go when the region is DOWN.
Just my .02 cents.... |
|
Back to top |
|
|
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010 Posts: 3053 Location: NYC,USA
|
|
|
|
Bill, Noted and thanks. |
|
Back to top |
|
|
|