I don't know what you mean by 'extract' and 'convert' in your question but.. do you simply want to download source code from a mainframe to do something with it on a windows machine? Is your concern over converting from EBCDIC to ASCII encoding? If so, your file transfer will do all that in one...
Then you do need 2 sorts followed by an extract followed by sort into final sequence. Temporary files are not a problem. after ll, they are deleted when no longer needed i.e. at the end of the total process.
Nic
Is there a 1-to-1 relationship of the records between files 1 and 2? If so, are the records in the same sequence ie the first record for id 1123 in file 1 matches the first record for id 1123 in the other file? If so to both questions then it is a simple 2-file match - no need to discard...
I found 51 different meanings for ERP - which is yours (and it is probably irrelevant to your question but...who knows?)?
How are these reports currently generated? Can you not modify that process?
Nic
Please do not plaster your query over every forum that you find. Use only one. If no response after a few (like 7) days then post elsewhere. All other postings of this topic I will delete.
Nic
If what is in the manuals is not enough then I suggest you contact the vendor - assuming you have paid for a legitimate copy then that should include support. If you want web links then search the web.
Nic
Have both datasets in the same sort order - it is a simple 2-file match. Or convert the big dataset to VSAM or a database.
But you don't say what your environment is.
Nic
Generally any program can read a file of any length! File length is a function of the number of records in the file. As you mention DCB it isn't a file but a dataset. But perhaps you mean varying length RECORDS? You should look up the manual and refer to the RECORD clause.
Nic
You have no source code? No program specs? Probably no hope! But, I think, Microfocus provided the COBOL compiler - maybe they could provide something to allow you to read the indexed file(s). Possibly you could try browsing the .dat files in a text editor and extract the data from there - a...
If you do not know how to use a counter then you have a problem!
Basic outline:
Using EXECIO read the first 250 lines
Read 1 record using EXECIO
Do While RC = 0
Select
When Pos('BEGIN',in.1) > 0
Then Do
Do i = 1 To 11
Use EXECIO to write the record...
The blocksize that you specified is not a multiple of the record length. Before starting to write Rexx programs I suggest you learn the basics of z/OS data sets. In addition, you shuld allow the system to determine your blocksize. You do this by coding BLKSIZE(0).
Nic
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.