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

JCL instream data length > 80


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

New User


Joined: 23 Jun 2005
Posts: 3

PostPosted: Thu Jun 23, 2005 5:38 am
Reply with quote

Hi,

I am trying to FTP some data generated from an online CICS/IDEAL program from mainframe onto non-mainframe environment. For this I am creating and submitting a batch job from the online program. The data is passed to the JCL as instream parameter. I need to FTP the data, so I am copying the instream data onto a dataset using IDCAMS, before FTP-ing.

Problem arises because my data rec length is 132, as IDCAMS is able to copy only 80 bytes length from the instream data. Any suggestion how the full 132 bytes instream data could be copied to a dataset?

I should not write the data in a dataset directly from the online program because many users could use the transaction at the simultaneously.

Advise please.
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Thu Jun 23, 2005 6:32 am
Reply with quote

I can't answer the question as far as CICS/IDEAL and how it works, but you might want to review this post:

ibmmainframes.com/viewtopic.php?t=987&highlight=instream
Back to top
View user's profile Send private message
ughosal

New User


Joined: 23 Jun 2005
Posts: 3

PostPosted: Thu Jun 23, 2005 12:43 pm
Reply with quote

Superk,
Thanks for your reply, but I cannot figure out from the previous postings you referred how to copy longer than 80 instream data into a PS dataset. Please could you type me the JCL step as an example.

I am currently using IDCAMS, and it truncates data after 80th column.
Back to top
View user's profile Send private message
MGIndaco

Active User


Joined: 10 Mar 2005
Posts: 432
Location: Milan, Italy

PostPosted: Thu Jun 23, 2005 10:17 pm
Reply with quote

Hi Ughosal, see better the post of Superk, at bottom you will find the answer...
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Mon Jun 27, 2005 7:43 pm
Reply with quote

The copy of 132-bytes of instream data works for me:
Code:

//*
//STEP0001 EXEC PGM=IDCAMS
//SYSUT1   DD   *
----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8----+----9----+----0----+----1----+----2----+----3--
//SYSUT2   DD   DSN=&SYSUID..TEST132.DATA,DISP=(,CATLG,DELETE),
//         UNIT=SYSDA,SPACE=(CYL,(1,1)),RECFM=FB,LRECL=132
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
  REPRO IFILE(SYSUT1) OFILE(SYSUT2) REUSE
//*
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 Store the data for fixed length COBOL Programming 1
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts PARSE Syntax for not fix length word ... JCL & VSAM 7
No new posts Data set Rec-Cnt and Byte-Cnt Testing & Performance 2
No new posts VB to VB copy - Full length reached SYNCSORT 8
Search our Forums:

Back to Top