Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Physical File name to be read in COBOL Module

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
santosh.iim

New User


Joined: 20 Apr 2006
Posts: 9

PostPosted: Wed Apr 07, 2010 11:58 pm    Post subject: Physical File name to be read in COBOL Module
Reply with quote

Hi,
I have a special case where we need to read the Physical File name in COBOL module and based on the name, we have some business logic to perform.

So far, the above logic was being performed by HLASM using DTF macros.

Now we are migrating Assmebler to COBOL and are searching for replacement of above code.

Just to Simplify what we are trying to do

in JCL
//MASTER VGUNDU0.IRTCTC.TIP, DISP=SHR

In COBOL Module

File Section. SELECT MM1 ASSIGN TO MASTER.

We want to read the PHYSICAL DATASET name which is input in the JCL with some ddname, meaning COBOL module should be able to read the file name as VGUNDU0.IRTCTC.TIP.

Hope it's clear.

Please help.
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Thu Apr 08, 2010 12:04 am    Post subject:
Reply with quote

search for it, it has been asked and answered on this board - within the last two years.
Back to top
View user's profile Send private message
MBabu

Active User


Joined: 03 Aug 2008
Posts: 401
Location: Mumbai

PostPosted: Thu Apr 08, 2010 5:00 am    Post subject:
Reply with quote

search for TIOT
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Thu Apr 08, 2010 5:12 am    Post subject: Reply to: Physical File name to be read in COBOL Module
Reply with quote

Search for LISTDSI (Rexx function) which is for non-VSAM.

Bill
Back to top
View user's profile Send private message
superk

Moderator Team Head


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

PostPosted: Thu Apr 08, 2010 7:07 am    Post subject: Reply to: Physical File name to be read in COBOL Module
Reply with quote

There's this previous topic.
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm
No new posts Need Suggestion on COBOL program vickey_dw COBOL Programming 5 Thu Jan 05, 2017 10:55 pm
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us