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

formated print in fileaid/batch
IBM Mainframe Forums -> Compuware & Other Tools
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
smily
Warnings : 1
New User


Joined: 24 Jul 2006
Posts: 6
PostPosted: Tue Dec 12, 2006 5:45 pm
 Reply with quote
hi,
how can i code a jcl which is using fileaid to print my output data in a formated way.
i tried this but i m getting this message
$$DD01 FPRINT OUT=2,LAYOUT=PS002,SHOW=FORMAT
BVE01-Required DD statement missing - DD??M or DD??RL, where ?? is 00-99.
.....SKIPPING TO NEXT $$DD CARD RC=8

And my JCL is :
Code:

//xxxxxx JOB (00400),'TEST JCL',CLASS=E,MSGCLASS=H,REGION=0M
//STEP2 EXEC PGM=FILEAID                                     
//SYSPRINT  DD   SYSOUT=*                                     
//SYSLIST   DD   SYSOUT=*                                     
//SYSTOTAL  DD   SYSOUT=*                                     
//DD01      DD   DSN=MPDT.TEST.SRC3(PS003),DISP=SHR           
//DD02O     DD   DSN=MPDT.TEST.SRC2(PS003),DISP=SHR           
//DD03RL    DD   DSN=MPDT.TEST.SRC2,DISP=SHR                 
$$DD01  FPRINT OUT=2,LAYOUT=PS002,SHOW=FORMAT                 
/*                                                           
//                                                           
Back to top
View user's profile Send private message
DavidatK

Active Member


Joined: 22 Nov 2005
Posts: 700
Location: Troy, Michigan USA
PostPosted: Sat Dec 16, 2006 4:03 am
 Reply with quote
This what I get when I submit a batch job to print via. fileaid.

Code:

//JS10     EXEC PGM=FILEAID,REGION=6M                         
//SYSPRINT DD  SYSOUT=*                                       
//SYSLIST  DD  SYSOUT=*                                       
//DD01     DD  DSN=YOUR.SEQ.DATA,       
//             DISP=SHR                                       
//DD01RL   DD  DSN=YOUR.PDS.COPYLIB,                 
//             DISP=SHR                                       
//DD01SC   DD  DSN=YOUR.FILEAID.SC.D06349.T171959(SELECT),   
//             DISP=(OLD,DELETE,DELETE)                       
//SYSIN    DD  *                                             
$$DD01 FPRINT  SHOW=FORMAT,LAYOUT=YOURCB                   
/*                                                           
//         

   Menu  Utilities  Compilers  Help                                             
 -------------------------------------------------------------------------------
 BROWSE    YOUR.FILEAID.SC.D06349.T171959(SELECT)    Line 00000000 Col 001 080
 Command ===>                                                  Scroll ===> PAGE
********************************* Top of Data **********************************
/*                                                                             
/* CAUTION:  Manually editing this member with a Product other                 
/* than File-AID will corrupt the directory entry when saving                   
/* this member.  Statistics will overlay information in the                     
/* directory entry required when loading Selection Criteria and                 
/* XREFs, rendering the member unusable.                                       
/*                                                                             
/* COMPUWARE ASSUMES NO LIABILITY FOR RESULTS OF USING MEMBERS                 
/* THAT HAVE BEEN EDITED MANUALLY.                                             
/*                                                                             
/* Copyright (c) 1993-2004 by COMPUWARE Corporation,                           
/* All Rights Reserved.                                                         
                                                                               
DEFINE BLOCKS=SELECTION,                 
                                         
       INITIAL_SKIP=0,                   
       THEN_SELECT=1,                     
       THEN_SKIP=0,                       
                                         
       MAXIMUM_TO_SEARCH=ALL,             
       MAXIMUM_TO_SELECT=ALL             


Note the names of the DD statements

Dave
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 -> Compuware & Other Tools

 

Similar Topics
Topic Forum Replies
No new posts Search two or more word with FILEAID Compuware & Other Tools 15
No new posts How to get a stack trace on a looping... ABENDS & Debugging 5
No new posts Calling Java method from batch COBOL ... COBOL Programming 5
No new posts Help in Automating Batch JCL jobs mon... JCL & VSAM 3
No new posts JCL sortcard to print only the records DFSORT/ICETOOL 11
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us