Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
suggestions for closing online files through batch

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
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    Post subject: suggestions for closing online files through batch
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    Post subject:
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: 8631
Location: Back in jolly old England

PostPosted: Wed Mar 11, 2009 12:48 pm    Post subject:
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    Post subject:
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: 8631
Location: Back in jolly old England

PostPosted: Wed Mar 11, 2009 1:43 pm    Post subject:
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    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
No new posts Compare two PS files using ICE TOOL f... SENTHIL MURUGAAN DFSORT/ICETOOL 5 Sun Dec 24, 2017 1:26 pm
No new posts CA Intertest Batch 555shanth CA Products 0 Tue Nov 28, 2017 11:10 am
No new posts Compare VSAM files using DFSORT pshongal DFSORT/ICETOOL 5 Thu Nov 23, 2017 10:24 am
No new posts How to query MAXGENS of an existing P... Chuchulo Hatyzak JCL & VSAM 4 Wed Nov 22, 2017 10:23 pm
No new posts Split files upto certain limit based ... bubbu75 DFSORT/ICETOOL 5 Tue Nov 14, 2017 11:11 pm

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