Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Creating Variable Length pattern file using IEBDG?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
sudarshan.srivathsav

New User


Joined: 10 Jul 2012
Posts: 24
Location: USA

PostPosted: Tue Sep 23, 2014 2:41 am    Post subject: Creating Variable Length pattern file using IEBDG?
Reply with quote

Hi All,

I create multiple pattern files for testing purposes using the IEBDG utility of IBM, note that I always create "Fixed Block" files.

Now , I am in need of creating a variable length file , but I am getting this error when i try to do so:

Code:
                              DATA GENERATOR OUTPUT FOR CONTROL CARDS AND MESSAGES                       PAGE  0001         
          DSD OUTPUT=(OUT)                                                       00380033                                   
          FD  NAME=F1,STARTLOC=5,LENGTH=6,PICTURE=5,'12345',ACTION=RO            00390033                                   
          FD  NAME=F2,STARTLOC=11,LENGTH=6,PICTURE=5,'67890',ACTION=RP           00400033                                   
          FD  NAME=F3,STARTLOC=17,LENGTH=35,FORMAT=ZD,INDEX=1                    00410033                                   
          FD  NAME=F4,STARTLOC=52,LENGTH=5,PICTURE=5,'12345',ACTION=RP           00420033                                   
          FD  NAME=F5,STARTLOC=57,LENGTH=5,PICTURE=5,'67890',ACTION=RO           00430033                                   
          FD  NAME=F6,STARTLOC=62,LENGTH=63,FORMAT=AL,ACTION=SL                  00440033                                   
          CREATE QUANTITY=00900000,NAME=(F1,F2,F3,F3,F4,F6),FILL=X'FF'           00450033                                   
IEB716I PICTURE STRING OR FD FIELD OVERFLOWS OUTPUT RECORD OR INPUT FIELD SELECTED OVERRUNS INPUT WORKAREA                   
          END                                                                    00460033                                   
IEB700I                     DATA GENERATION HAS BEEN              COMPLETED COMPLETION CODE IS EIGHT                         

Actual JCL:***********************************************
//PATTERN  EXEC PGM=IEBDG                                             
//SYSPRINT DD  SYSOUT=*                                               
//OUT      DD  DSN=XXXXX.RAND.DATA.M100MB.TC2,                       
//             DISP=(NEW,CATLG,CATLG),                                 
//             UNIT=(SYSDA,10),                                       
//             STORCLAS=SC2,                                           
//             SPACE=(CYL,(1200,200),RLSE),                           
//             DCB=(RECFM=VB,LRECL=125,BLKSIZE=0)                     
//SYSIN    DD  *                                                       
 DSD OUTPUT=(OUT)                                                     
 FD  NAME=F1,STARTLOC=5,LENGTH=6,PICTURE=5,'12345',ACTION=RO           
 FD  NAME=F2,STARTLOC=11,LENGTH=6,PICTURE=5,'67890',ACTION=RP         
 FD  NAME=F3,STARTLOC=17,LENGTH=35,FORMAT=ZD,INDEX=1                   
 FD  NAME=F4,STARTLOC=52,LENGTH=5,PICTURE=5,'12345',ACTION=RP         
 FD  NAME=F5,STARTLOC=57,LENGTH=5,PICTURE=5,'67890',ACTION=RO         
 FD  NAME=F6,STARTLOC=62,LENGTH=63,FORMAT=AL,ACTION=SL                 
 CREATE QUANTITY=00900000,NAME=(F1,F2,F3,F3,F4,F6),FILL=X'FF'         
 END                                                                   





What could be the reason for this, also can anyone suggest me or share a JCL which creates a Variable length file using IEBDG utility...

I already did try to find it in IBM manuals, not able to find it, so any help from you guys would be really appreciated...Thanks in advance.!!
Back to top
View user's profile Send private message

Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1825
Location: UK

PostPosted: Tue Sep 23, 2014 6:05 pm    Post subject: Reply to: Creating Variable Length pattern file using IEBDG?
Reply with quote

One thing I can see is that your last FD defines a record of length 125 bytes but your JCL specifies 125 bytes - you need 4 bytes for the RDW so either your FD must be reduced in size or you LRECL increased.
Back to top
View user's profile Send private message
sudarshan.srivathsav

New User


Joined: 10 Jul 2012
Posts: 24
Location: USA

PostPosted: Tue Sep 23, 2014 8:46 pm    Post subject:
Reply with quote

Nic, Thanks you rightly pointed me about the RDW!.. Thanks
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts How to generate a new unique Input fi... for1ranjith CLIST & REXX 11 Sat Jul 01, 2017 12:09 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us