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
 

 

NEED TO REFORMAT BDAM FILE

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
mariapie

New User


Joined: 03 Dec 2010
Posts: 3
Location: INDIA

PostPosted: Fri Dec 03, 2010 9:06 am    Post subject: NEED TO REFORMAT BDAM FILE
Reply with quote

Hi,
We have a requirement where we need to reformat a BDAM file which was created a decade ago. we dont have any program of creation of the file. but we have the corresponding book. since we are new to BDAM we dont understand how to reformat the file in accordance with the change in copybook. can anyone help me in understanding the structure of a BDAM copybook.

Maria
Back to top
View user's profile Send private message

dick scherrer

Site Director


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

PostPosted: Fri Dec 03, 2010 9:54 am    Post subject:
Reply with quote

Hello and welcome to the forum,

Quote:
can anyone help me in understanding the structure of a BDAM copybook
You need to post this copybook. There are many ways to utilize bdam . . .
Back to top
View user's profile Send private message
mariapie

New User


Joined: 03 Dec 2010
Posts: 3
Location: INDIA

PostPosted: Fri Dec 03, 2010 10:30 am    Post subject: layout like this
Reply with quote

Code:
*         
*  DESCRIPTION   3330    3340    3350      3375    3380
*  --------------------   ------  ------  ------      ------  ------
*  BLOCK SIZE......2480         
*  DATA REC SIZE...VARIA   B      
*  RECS - BLOCK....N/A         
*  BLOCKS-TRACK.........   5       3       7      12      16
*  BLOCKS-CYLINDER......   95      36     210      144     240
*         
SPACE         
JMKBLOCK DS    2480C         
JMKBLKSZ EQU   *-JMKBLOC   K      
EJECT         
*   #RE   CS   CAPACITY
*   ---   --   -----------------
JMKSYIDX EQU   1      1   
JMKSYOPR EQU   1      1   
JMKSYEXC EQU   1      1   
JMKSYSEC EQU   1      1   
JMKSYDS1 EQU   1      1   
JMKSYDS2 EQU   1      1   
JMKSYOPS EQU   44      44   
JMK#SYRC EQU   JMKSYOPS+         
*         
*         
JMKBKSTC EQU   1         
JMKBKOPR EQU   20         
*CFCOOPR EQU   10         
JMKCOEXC EQU   1         
JMKCOSEC EQU   1         
JMKCORTC EQU   10         
JMKCOOPS EQU   880         
*CFCOOPS EQU   440         
JMKCORTS EQU   1         
JMKCOEXS EQU   75         
JMK#CORC EQU   4+JMKCORT   C+JMKCOOPS+JMKCORTS+JMKB   KE   XS
EJECT         
*         
JMKR#SIX EQU   1         
JMKR#SOP EQU   2         
JMKR#SEX EQU   3         
JMKR#SSC EQU   4         
JMKR#SD1 EQU   5         
JMKR#SD2 EQU   6         
JMKR#SOS EQU   7         
*   
*   
JMKR#COS EQU   0   
JMKR#BOP EQU   JMKR#COS+   JMKCOSTC     
JMKR#BEX EQU   JMKR#BOP+   JMKCOOPR   
JMKR#BSC EQU   JMKR#BEX+   JMKCOEXC     
JMKR#BRA EQU   JMKR#BSC+   JMKCOSEC     
JMKR#BOS EQU   JMKR#BRA+   JMKCORTC     
JMKR#BRS EQU   JMKR#BOS+   JMKCOOPS     
JMKR#BES EQU   JMKR#BRS+   JMKCORTS     
EJECT   
*   
ORG   JMKBLOCK   
JMKCDTLM DS    PL3   
DS    XL1   
JMKCNXDA DS    XL4   
JMKCALOC DS    XL4
*
*
JMKXCO# DS    PL2
JMKXDA  DS    XL4
JMKXSZ  EQU   *-JMKXCO
DS    99XL6
JMKX#ET EQU   100
SPACE
*
*
SPACE
JMCYONUS DS    C
JMCYALLI DS    C
JMCYSTOP DS    C
JMCYSPIS DS    C
JMCYEXCP DS    C
JMCYGENI DS    C
JMCYSOPR DS    C
JMCYSECF DS    C
JMCYSECE DS    C
JMCYDSTP DS    C
JMCYDSSC DS    C
JMCYDSUS DS    C
JMCYAPL DS    5X
*
      
*
Back to top
View user's profile Send private message
dick scherrer

Site Director


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

PostPosted: Fri Dec 03, 2010 10:48 am    Post subject:
Reply with quote

Hello,

And what is the change to be made? When posting code, data, jcl, etc the Code tag should be used to preserve alignment and improve readability. Your "copybook" has been Code'd

How is the file referenced (programs, utilities, etc.)?
Back to top
View user's profile Send private message
mariapie

New User


Joined: 03 Dec 2010
Posts: 3
Location: INDIA

PostPosted: Fri Dec 03, 2010 10:58 am    Post subject: REFERENCE OF FILE
Reply with quote

It is referenced as an input file in an sort step. and it has a control card which has an program which is actually super linked.

MODS E15=(JMCLKLOD,30000,STEPLIB,N),
INPFIL EXIT
OUTFIL EXIT

The actual change needed is to a increased a field length for eg.
JMKXCO# DS PL2 to PL3
Back to top
View user's profile Send private message
dick scherrer

Site Director


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

PostPosted: Fri Dec 03, 2010 8:03 pm    Post subject:
Reply with quote

Hello,

You need to look at the module executed by the E15 exit. It will show how the file is really used. There are probably other processes that access this file as well. . .

It will help you to hex dump a few records and look at the actual content of the records.
Back to top
View user's profile Send private message
dick scherrer

Site Director


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

PostPosted: Sat Dec 04, 2010 3:25 am    Post subject:
Reply with quote

Hello,

Have you determined what the file contains and what this is used for (other than this sort exit)?
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 Converting Variable block file to Fix... bhavana yalavarthi DFSORT/ICETOOL 10 Tue May 16, 2017 2:20 pm
No new posts Getting error while opening a variabl... apandey1 COBOL Programming 5 Fri May 05, 2017 12:22 pm
No new posts Issue with NDM process to transmit ES... chetanambi All Other Mainframe Topics 6 Wed May 03, 2017 10:52 am
No new posts File processing vishwakotin Mainframe Interview Questions 9 Fri Apr 28, 2017 11:38 am
No new posts Occurrence of various strings within ... TS70363 JCL & VSAM 1 Thu Apr 27, 2017 8:18 pm


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