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

dynamic open and what alloc the files?


IBM Mainframe Forums -> JCL & VSAM
Post new topic   This topic is locked: you cannot edit posts or make replies.
View previous topic :: View next topic  
Author Message
grabeva

New User


Joined: 07 Sep 2006
Posts: 23

PostPosted: Tue Nov 18, 2008 10:20 pm
Reply with quote

Hello....all

My program opens 1 different file according to a read MQ-message.

First program
- read a MQ message, : fileAA
- call moduleA using variable=fileAA
continue with process.
Stop run



moduleA
open output fileAA
return.


My job is like this:
Code:

//XTPMQ001 EXEC PGM=First program,REGION=4096K                   
//STEPLIB  DD   DSN=ENDEVOR.ADMINWRK.LOADLIB,DISP=SHR       
//         DD   DSN=CEE.SCEERUN,DISP=SHR                     
//         DD   DSN=CEE.SCEELPA,DISP=SHR                     
//         DD   DSN=MQM.V5R3.SCSQLOAD,DISP=SHR               
//         DD   DSN=MQM.V5R3.SCSQANLE,DISP=SHR               
//         DD   DSN=MQM.V5R3.SCSQAUTH,DISP=SHR               
//FILEBB DD DSN=FILEBB(+1),         
//            DISP=(,CATLG,DELETE),                         
//            SPACE=(TRK,(3000,100),RLSE),                   
//            RECFM=FB,LRECL=470                             
//FILEAA   DD DSN=FILEAA(+1),             
//            DISP=(,CATLG,DELETE),                         
//            SPACE=(TRK,(3000,100),RLSE),                   
//            RECFM=FB,LRECL=215                             


when program end, alloc 2 gdg, one with information another with cero register.

The problem is that I want to open a new gdg, only for the file that I want.
How write jcl with dynamic alloc?

thanks for yours times.
Gra
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Tue Nov 18, 2008 10:52 pm
Reply with quote

Search these forums for the BPXWDYN Dynamic Allocation module and see if that might work within your program.
Back to top
View user's profile Send private message
grabeva

New User


Joined: 07 Sep 2006
Posts: 23

PostPosted: Thu Nov 20, 2008 9:16 pm
Reply with quote

my level is IBM COBOL for OS/390 & VM 2.2.1, i cant use B​P​X​W​D​Y​N,
because its up Enterprise.
i have another possibility?
Back to top
View user's profile Send private message
grabeva

New User


Joined: 07 Sep 2006
Posts: 23

PostPosted: Wed Oct 21, 2009 4:35 am
Reply with quote

i look for BPXWDYN Dynamic Allocation in this forum, but i dont find anything....please do yo give me a link that explain how i use...thks.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Wed Oct 21, 2009 5:12 am
Reply with quote

I did a search on BPXWDYN and found many hits immediately, including www.ibmmainframes.com/viewtopic.php?t=41691 which talks about exactly how to use it.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Wed Oct 21, 2009 7:48 pm
Reply with quote

Do not double-post the same question. . .

This topic is now locked.

And, as you were told in your original topic, you do not neet dynamic allocation.

d
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies. 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 Using Dynamic file handler in the Fil... COBOL Programming 2
No new posts Calling an Open C library function in... CICS 1
No new posts Merge two VSAM KSDS files into third ... JCL & VSAM 6
Search our Forums:

Back to Top