|
View previous topic :: View next topic
|
| Author |
Message |
Paulo Pinto
New User
Joined: 29 Feb 2008 Posts: 3 Location: Portugal
|
|
|
|
Hi, I'm trying to convert some sysin from FileAid to FileManager but I have dificulties. Could you help me with some of these sysin.
Samples :
$$DD01 COPY IF=(08,EQ,C'P.'),
IF=(90,EQ,C' PS'),
IF=(02,NE,C'SYS1.'),
MOVE=(+0,0,+0)
$$DD01 COPY PADCHAR=X'00',PRESERVE=ON
$$DD01 C RDW=3,IF=(12,EQ,C'HXPB*ERRO')
$$DD01 COPY F=MULTI,RDW=3, IF=(17,NE,C'HEADER',17,NE,C'TRAILER')
Thanks |
|
| Back to top |
|
 |
enrico-sorichetti
Superior Member

Joined: 14 Mar 2007 Posts: 10902 Location: italy
|
|
|
|
since there is no reason for people to know the FIle Aid syntax
you have more chances of getting replies if You describe in plain words the process
rather than shooting the fileaid statements and expect us to translate them for You |
|
| Back to top |
|
 |
Robert Sample
Global Moderator

Joined: 06 Jun 2008 Posts: 8700 Location: Dubuque, Iowa, USA
|
|
|
|
| What does the File Aid manual tell you? |
|
| Back to top |
|
 |
dick scherrer
Moderator Emeritus

Joined: 23 Nov 2006 Posts: 19243 Location: Inside the Matrix
|
|
|
|
Hello,
| Quote: |
| since there is no reason for people to know the FIle Aid syntax |
May be a reason this time. . . Looks like the process(es) are to be determined from these bits of code.
| Quote: |
| but I have dificulties. |
And this will continue until you become less dependent on others. For a task like this, suggest you create a small test input file and run the code. Then change the code and see the difference in output. Then change the data using the original code and see that difference. And (as Robert mentioned) have the documentation in another window for easy reference. |
|
| Back to top |
|
 |
Paulo Pinto
New User
Joined: 29 Feb 2008 Posts: 3 Location: Portugal
|
|
|
|
Hello, the problem is I don't know too much about FileAid or FileManager, but I have to convert about 150 sysin. I have converted at the moment about 100, the simplest ones. Many of them repeats on various jobs.
In these ones :
$DD01 COPY IF=(08,EQ,C'P.'), IF=(90,EQ,C' PS'), IF=(02,NE,C'SYS1.'),
MOVE=(+0,0,+0)
Copy records from input file to output file if position 8 has 'P.',position 90 has ' PS' and position 2 diferent from 'SYS1.'.
MOVE=(+0,0,+0) means MOVE=(to location,lenght,from location) I think is to copy records to the same position in output file.
$$DD01 COPY PADCHAR=X'00',PRESERVE=ON
Copy records, intialize output with padchar and preserve trailing blanks(spaces).
$$DD01 C RDW=3,IF=(12,EQ,C'HXPB*ERRO')
Copy records and do not include the RDW during record processing and do not displayit on output, if in position 12 has 'HXPB*ERRO'
$$DD01 COPY F=MULTI,RDW=3, IF=(17,NE,C'HEADER',17,NE,C'TRAILER')
Copy records form=multiple pass processing control,and do not include the RDW during record processing and do not displayit on output,
if in position 17 has not 'HEADER' or 'TRAILER'.
I don't see an equivalent in File Manager for this samples.
Thanks |
|
| Back to top |
|
 |
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
Ola,
There is a FileManager manual online from IBM. I guess you are studying manual already while waiting to see if anyone here knows anything specific?
These examples are coming from various jobsteps, rather than connected together? |
|
| Back to top |
|
 |
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
| Also, Paulo, if time is against you or you come to any dead-ends with particular examples, as long as you can accurately describe what needs to be done, your SORT product can likely do it, especially if DFSORT. If you need, there is a seperate forum for DFSORT, other installed SORT questions go in the JCL forum. |
|
| Back to top |
|
 |
Paulo Pinto
New User
Joined: 29 Feb 2008 Posts: 3 Location: Portugal
|
|
|
|
Hello, my problem is the time I have to convert all sysin, and the knowledge of the products (poor). I have to take a look at all sysin, consult both manuals (FileAid and FileManager), do some tests and construct new sysin.
If anyone knows File Manager and could help me specifically on these ones, would be good.
These examples are coming from various jobsteps - Yes these examples are coming from diferent jobs.
These sysin must be converted to FileManager (Customer requirement). |
|
| Back to top |
|
 |
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
Ola, I think you'll have to keep working on it. If you're lucky, someone will know. I don't understand the "Client Requirement".
I don't understand how you got stuck with the task, is there no File Manager expertise around you?
Have you searched the internet? Maybe you find something, have to weigh it against time lost hacking through the manual.
If you can spring (meaning arrange) the costs, I can be up there tommorow or Monday, at your convenience :-) I don't know File Manager, but I know manuals and a few other things. Laptop on the Alfa Pendula and I arrive an "expert" :-) |
|
| Back to top |
|
 |
mtaylor
Active User
Joined: 20 Feb 2009 Posts: 108 Location: Kansas City
|
|
|
|
| Surely IBM has a fileaid to filemanager conversion utility? |
|
| Back to top |
|
 |
|
|
 |
All times are GMT + 6 Hours |
|