Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
How to implement this logic

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Mainframe COBOL
Author Message
diwakar_rao

New User


Joined: 04 Mar 2007
Posts: 10
Location: Chennai

PostPosted: Tue Jul 01, 2008 12:01 am    Post subject: How to implement this logic
Reply with quote

Hi,

a)1 Input file as below

Empid Empname Prjcd Skill1 Skill2 Skill3 => field name
====================================
RN0001 AA 10001 COBOL JCL VSAM
RN0002 AB 10002 COBOL VSAM
RN0003 AC 10003 VSAM JCL

b) To write a pgm to create 3 Output files as follows

Output File 1 => for COBOL skillset

Empid Empname Prjcd Skills
==========================
RN0001 AA 10001 COBOL
RN0002 AB 10002 COBOL

Output File 2 => for JCL skillset

Empid Empname Prjcd Skills
==========================
RN0001 AA 10001 JCL
RN0002 AB 10002 JCL
RN0003 AC 10003 JCL

Output file 3 => for VSAM skillset

Empid Empname Prjcd Skills
==========================
RN0001 AA 10001 VSAM
RN0002 AB 10002 VSAM

Pls let me know the logic to implement to create the above output files ?
Back to top
View user's profile Send private message
References
PostPosted: Tue Jul 01, 2008 12:01 am    Post subject: Re: How to implement this logic Reply with quote

dick scherrer

Global Moderator


Joined: 23 Nov 2006
Posts: 8036
Location: 221 B Baker St

PostPosted: Tue Jul 01, 2008 12:20 am    Post subject:
Reply with quote

Hello,

Do not double post.

You repeated The Errors from your duplicate post here. The output follows no rules. . . It does not match the input.

The logic is to open the input file and the output files, then write the appropriate records into the output files.

You need to write some code and then post back here when there are questions/problems rather than ask the forum do your work for you.
Back to top
View user's profile Send private message
PeD

Active User


Joined: 26 Nov 2005
Posts: 297
Location: Belgium

PostPosted: Tue Jul 01, 2008 12:30 am    Post subject:
Reply with quote

Am I dreaming?
Back to top
View user's profile Send private message
dbzTHEdinosauer

Senior Member


Joined: 20 Oct 2006
Posts: 1520
Location: germany

PostPosted: Tue Jul 01, 2008 12:31 pm    Post subject:
Reply with quote

only if you think companies will stop outsourcing.
Back to top
View user's profile Send private message
Anuj D.

Global Moderator


Joined: 22 Apr 2006
Posts: 1962
Location: Phoenix, AZ

PostPosted: Wed Jul 02, 2008 12:56 pm    Post subject:
Reply with quote

dbzTHEdinosauer wrote:
only if you think companies will stop outsourcing.
There are some guys working very hard to meet Your expectations Dick...

Mercy.. icon_smile.gif
Back to top
View user's profile Send private message
Antonio Barata
Warnings : 1

New User


Joined: 04 Apr 2007
Posts: 36
Location: Lisbon, Portugal

PostPosted: Wed Jul 02, 2008 1:50 pm    Post subject:
Reply with quote

Anuj D. wrote:
There are some guys working very hard to meet Your expectations Dick...

Mercy.. icon_smile.gif


I think you're right. But there are also some guys trying to make others work for them.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Mainframe COBOL All times are GMT + 6 Hours
Page 1 of 1