Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

change program to use flat file instead a KSDS file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
radhakrishnan82

Active User


Joined: 31 Mar 2005
Posts: 436
Location: chennai, India

PostPosted: Mon May 09, 2011 4:58 pm    Post subject: change program to use flat file instead a KSDS file
Reply with quote

Currently the programA is using vsam as its input file. The reqmt is to change the program to use flat file replacing vsam file KSDS.

The changes I made to the program are : 1. removed organisation is indexed, access mode in the select clause 2. removed START key usage in the procedure division during KSDS READ.

Please let me know whether any other changes I need to make to change the program to use flat file replacing vsam file KSDS. LRECL, layouts are same. Only aim is to replace vsam file with the flat file.
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8117
Location: East Dubuque, Illinois, USA

PostPosted: Mon May 09, 2011 5:04 pm    Post subject:
Reply with quote

If the logic of the code depends upon doing direct reads, you may have to rewrite the program from scratch. The mere fact the file layout is the same is so small a factor as to be almost insignificant. Without looking at the code, we will be unable to tell you what other changes would be needed. There are a number of people on this forum who would happily take on that assignment for their usual daily rate (expect to pay 500 to 1000 U.S. dollars per day if you go that route).
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Mon May 09, 2011 5:09 pm    Post subject:
Reply with quote

Euros not dollars!!
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8117
Location: East Dubuque, Illinois, USA

PostPosted: Mon May 09, 2011 5:16 pm    Post subject:
Reply with quote

Sorry, Dick, next time I'll say dollars or euros!
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Mon May 09, 2011 5:30 pm    Post subject:
Reply with quote

1.00 EUR = 1.43991 USD
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 654
Location: Whitby, ON, Canada

PostPosted: Mon May 09, 2011 5:47 pm    Post subject:
Reply with quote

I'd accept either one. icon_biggrin.gif
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Mon May 09, 2011 9:56 pm    Post subject: Re: change program to use flat file instead a KSDS file
Reply with quote

radhakrishnan82 wrote:
Currently the programA is using vsam as its input file. The reqmt is to change the program to use flat file replacing vsam file KSDS.

The changes I made to the program are : 1. removed organisation is indexed, access mode in the select clause 2. removed START key usage in the procedure division during KSDS READ.

Please let me know whether any other changes I need to make to change the program to use flat file replacing vsam file KSDS. LRECL, layouts are same. Only aim is to replace vsam file with the flat file.


Like Robert, I think you have more work ahead of you than this. You can't do a keyed read on a flat file. So, if you are reading your KSDS on a key (which it looks like) think some more.

Without knowing much more about what you are doing, we can't provide much of any use to you.

Why don't you want to use the KSDS?

How is the KSDS being used in the program at the moment?
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts How to generate a new unique Input fi... for1ranjith CLIST & REXX 11 Sat Jul 01, 2017 12:09 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us