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

suggestions for closing online files through batch


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

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Wed Mar 11, 2009 12:17 pm
Reply with quote

Currently we are closing the online files through batch job using IEBGENER and INTRDR.

Code:

STEP20 EXEC  PGM=IEBGENER
SYSUT1   DD  *
/*$VS,'RO (RESP),F OREGION,CEMT S FI(FILE1) CLO DIS' 
SYSUT2   DD  SYSOUT=(B,INTRDR),                 
             DCB=BLKSIZE=80                     
SYSIN    DD  DUMMY                               
SYSPRINT DD  SYSOUT=*                           

Say I am closing the file in step20 using the above technique , and I am using(in I-O mode) the file in step30, but the job submitted through INTRDR is not yet complete, hence the Job is abending at step30!

Can anyone please suggest a better way of closing/opening the online files?
Back to top
View user's profile Send private message
balajiofcrrcoe

New User


Joined: 07 Jul 2005
Posts: 41
Location: chennai

PostPosted: Wed Mar 11, 2009 12:43 pm
Reply with quote

Hi,

One suggestion which i can give is route the sysprint of the step STEP20 to dataset with disp=new.

use the same dataset for sysprint in step30 in disp=mod.

doing this step30 will wait for the dataset created in step20
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Mar 11, 2009 12:48 pm
Reply with quote

balajiofcrrcoe wrote:
Hi,
One suggestion which i can give is route the sysprint of the step STEP20 to dataset with disp=new.
use the same dataset for sysprint in step30 in disp=mod.
doing this step30 will wait for the dataset created in step20

Yes, and if you read the question and pay attention you will see that the problem lies with the command submitted via INTRDR and not the previous step.

I vaguely recall a package a long time ago (I think from COMPUWARE) which issued the close commands and waited for a response that the files were closed before terminating the step.

As for the problem ................... not sure if issuing the command under SDSF would be any better. Just a quick snippet from a past life .....
Code:

//SDSF     EXEC PGM=SDSF                           
//SYSOUT   DD SYSOUT=*                             
//SYSPRINT DD SYSOUT=*                             
//ISFOUT   DD DSN=&&SDSFOFF,DISP=(,DELETE,DELETE),
//            SPACE=(TRK,(15,15))                 
//ISFIN    DD *                                   
LOG                                               
/V 0DA2,OFFLINE                                   
/V 0DA5,OFFLINE                                   
/F CATALOG,UNALLOCATE(UCAT.Y2K01)                 
Back to top
View user's profile Send private message
krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Wed Mar 11, 2009 1:01 pm
Reply with quote

balajiofcrrcoe and expat thanks for response

expat,
Can u please help me in undertanding the /V statement in the control card? and also the syntax for the key word UNALLOCATE!
I have already checked for these in OS/390 V2R10.0 SDSF Guide and Reference, but didnt find any search results!
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Mar 11, 2009 1:43 pm
Reply with quote

The example is just that, the commands in there are for varying a couple of units offline and then removing a specified catalog from the CAS subsystem.

Just an example to see if it helps, not the specific commands that you want to execute.
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 Write line by line from two files DFSORT/ICETOOL 7
No new posts Compare only first records of the fil... SYNCSORT 7
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 Merge two VSAM KSDS files into third ... JCL & VSAM 6
Search our Forums:

Back to Top