Portal | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
SARBCH REPORT DD writing error

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CA Products
View previous topic :: :: View next topic  
Author Message
kris_madras
Warnings : 1

New User


Joined: 04 Jul 2005
Posts: 28

PostPosted: Tue Sep 15, 2020 4:22 pm    Post subject: SARBCH REPORT DD writing error
Reply with quote

This is a strange error. Please help me how to fix this. If I use a File for //REPORT, I could see only 1 record but if I use //REPORT DD SYSOUT=*, I could see 2 records are coming. actually I need two records in the //REPORT file name of the data set but getting only first record. Job is giving RC=16 because -1 gen jobs are not there in SAR.


/
Code:
/CA7SART1 JOB (TEST,T),T,MSGCLASS=X,CLASS=T,NOTIFY=&SYSUID           
//STEP01  EXEC PGM=SARBCH                                             
//SYSPRINT DD SYSOUT=*                                               
//REPORT   DD DSN=TST1.KRIS.REPORT,                                         
//         DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,                               
//         SPACE=(CYL,(5,5),RLSE),                                   
//         DCB=(RECFM=FBA,LRECL=133,BLKSIZE=0)                       
//SYSIN    DD *                                                       
/LIST ID=JOB1 GEN=0                                               
/LIST ID=JOB1 GEN=-1                                             
/LIST ID=JOB2  GEN=0                                               
/LIST ID=JOB2  GEN=-1                                             

/*


In the REPORT file - TST1.KRIS.REPORT, I am getting only 1 record

ID Jobname Jobid Gen Seq Arc Date Arc Time Loc Lines Pages Blocks Xcode
-------------------------------- -------- -------- ----- ----- ---------- -------- ---- --------- -------- ------ ------
JOB1 JOB1 JOBXXXX 178 1 09/13/2020 10:48:20 PERM 7408 7 90


But if I use //REPORT DD SYSOUT=*, I could see 2 records are coming JOB1 and JOB2

ID Jobname Jobid Gen Seq Arc Date Arc Time Loc Lines Pages Blocks Xcode
-------------------------------- -------- -------- ----- ----- ---------- -------- ---- --------- -------- ------ ------
JOB1 JOB1 JOBXXXX 178 1 09/13/2020 10:48:20 PERM 7408 7 90

ID Jobname Jobid Gen Seq Arc Date Arc Time Loc Lines Pages Blocks Xcode
-------------------------------- -------- -------- ----- ----- ---------- -------- ---- --------- -------- ------ ------
JOB2 JOB2 JOBXXXX 178 1 09/13/2020 10:48:20 PERM 7408 7 90


JOB1 and JOB2 doesn't have -1 generations.
Back to top
View user's profile Send private message

kris_madras
Warnings : 1

New User


Joined: 04 Jul 2005
Posts: 28

PostPosted: Tue Sep 15, 2020 4:42 pm    Post subject:
Reply with quote

I gave DISP=MOD. Now it is writing 2 records to the output REPORT file.
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 -> CA Products All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Unload Report in ARCHIVE from CA-Disp... vpuerto CA Products 0 Sat Aug 29, 2020 7:31 am
No new posts EIBRESP =16 & EIBRESP2 = 01 while... Farheen CICS 4 Mon Aug 24, 2020 2:05 pm
This topic is locked: you cannot edit posts or make replies. issue with Syntax error shub2204 SYNCSORT 2 Wed Aug 12, 2020 3:11 pm
No new posts Force a Return Code and print error m... Rick Ryan SYNCSORT 30 Thu Jun 25, 2020 1:18 am
No new posts Question for Cobol Report Writer jackzhang75 COBOL Programming 3 Wed May 27, 2020 4:35 am

Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us