IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

SYSIN to copy the inputs to a flat file


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
anandkumarrn

New User


Joined: 06 Feb 2009
Posts: 23
Location: India

PostPosted: Thu Jan 28, 2010 8:59 pm
Reply with quote

Hi,

Is there any utility to copy the values given in the SYSIN statement into a flat file in the same step.

Like ,

//data1 dd dsn=bcil.sample.test // File to be copied
//sysin dd *

123
2345
32323

and the output for bcil.sample.test. will be

123
2345
32323

Regards,
Anand
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10888
Location: italy

PostPosted: Thu Jan 28, 2010 9:20 pm
Reply with quote

IEBGENER ??

I am in a very good mood today

Code:
//ieb exec pgm=iebgener
//sysin dd dummy
//sysprint dd sysout=*
//sysut1 dd *,dcb=lrecl=80
1
2
3
4
5
//sysut2 dd .......
//    dcb=(recfm=fb,lrecl=80)
Back to top
View user's profile Send private message
anandkumarrn

New User


Joined: 06 Feb 2009
Posts: 23
Location: India

PostPosted: Fri Jan 29, 2010 10:20 am
Reply with quote

Hi,

thanks for the information.

But my requirement is like, i will be giving my input data in the SYSIN and not in the SYSUT1 as u have mentioned.

some thing like this..

//DD1 DD DSN=SAMPLE.TEST.OUTPUT // flat file
//SYSIN DD *

123
3546
288

And the output of my SAMPLE.TEST.OUTPUT will be

123
3546
288

Thanks,
Anand.

enrico-sorichetti wrote:
IEBGENER ??

I am in a very good mood today

Code:
//ieb exec pgm=iebgener
//sysin dd dummy
//sysprint dd sysout=*
//sysut1 dd *,dcb=lrecl=80
1
2
3
4
5
//sysut2 dd .......
//    dcb=(recfm=fb,lrecl=80)
Back to top
View user's profile Send private message
MBabu

Active User


Joined: 03 Aug 2008
Posts: 400
Location: Mumbai

PostPosted: Fri Jan 29, 2010 10:28 am
Reply with quote

enrico was trying to say that there is no way to know what SYSIN can do if you don't know what program is being used. Lots of programs use SYSIN. In fact, most programs use SYSIN. You need to tell us more than just a dd name.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10888
Location: italy

PostPosted: Fri Jan 29, 2010 11:06 am
Reply with quote

Quote:
But my requirement is like, i will be giving my input data in the SYSIN


do You have doctor' s prescription for that?? icon_question.gif icon_evil.gif

utilities use sysin for control cards, data is read on a different dd.

if You want data on the sysin You will have to write Your own program
Back to top
View user's profile Send private message
Alissa Margulies

SYNCSORT Support


Joined: 25 Jul 2007
Posts: 496
Location: USA

PostPosted: Sat Jan 30, 2010 2:06 am
Reply with quote

Without writing your own program, the closest I can think of using SYSIN to create your output data is the following:
Code:
//S1    EXEC PGM=SORT   
//SYSOUT  DD SYSOUT=* 
//SORTOUT DD DSN=OUTPUT.FILE
//SORTIN  DD *                                     
A                             
//SYSIN   DD *                                 
   SORT FIELDS=COPY                               
   OUTFIL REMOVECC,
   BUILD=(C'123',/,                         
          C'3546',/,                       
          C'288')   
/*
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Sat Jan 30, 2010 2:57 am
Reply with quote

Hello,

Quote:
But my requirement is like, i will be giving my input data in the SYSIN
How did this "requirement" originate?

What is the business or technical reason for this?

Did someone dictate you had to do this or is this your choice?
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Sat Jan 30, 2010 4:06 am
Reply with quote

I think that SYSIN is being used very generically for any instream data.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Sat Jan 30, 2010 4:24 am
Reply with quote

Hi Craig,

Quote:
I think that SYSIN is being used very generically for any instream data.
One would surely hope. . . But with the following posted. . .
Quote:
But my requirement is like, i will be giving my input data in the SYSIN and not in the SYSUT1 as u have mentioned.


One thing that does make me curious is how the data got into the sysin. . .
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Sat Jan 30, 2010 5:47 am
Reply with quote

Maybe some is sending punched cards with jcl included? I hope there is an operator that knows how to use a card reader, I hope there is a card reader available. The last time I had any card input I had to go to the data center myself because the operators on duty didn't know how.
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1248
Location: Richfield, MN, USA

PostPosted: Sat Jan 30, 2010 6:08 am
Reply with quote

EVERYONE knows that the card reader is between the sorter and interpreter and behind the collator and reproducer!
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Sat Jan 30, 2010 6:28 am
Reply with quote

Terry Heinze wrote:
EVERYONE knows that the card reader is between the sorter and interpreter and behind the collator and reproducer!
I'm not sure, the last 2540 I used was right next to the console (1052?).....
Back to top
View user's profile Send private message
MBabu

Active User


Joined: 03 Aug 2008
Posts: 400
Location: Mumbai

PostPosted: Sat Jan 30, 2010 11:56 am
Reply with quote

Don't the compilers and/or assembler use SYSIN for data? The linkage editor allows a mix pf control cards and object deck data.... Could be SYSLIN I'm thinking about though (too lazy to check)
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Sat Feb 06, 2010 9:07 pm
Reply with quote

Did the original poster switch to a different profession?
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1248
Location: Richfield, MN, USA

PostPosted: Sat Feb 06, 2010 9:17 pm
Reply with quote

Either that, or as all too frequently happens on these bulletin boards, the OP has "taken the info and run" without providing any kind of feedback. icon_sad.gif
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1787
Location: Bloomington, IL

PostPosted: Sat Feb 06, 2010 9:23 pm
Reply with quote

Craq Giegerich wrote:
Did the original poster switch to a different profession?

We may hope.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Unable to interpret a hex value to De... COBOL Programming 7
No new posts Copy only TEXT or String from a record SYNCSORT 4
No new posts how to eliminate null indicator value... DB2 7
No new posts Use Copy Utility DB2 7
No new posts Format Binary file to EBCDIC JCL & VSAM 4
Search our Forums:

Back to Top