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
 

 

Where do I find the length of the load module

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

New User


Joined: 22 Jan 2010
Posts: 14
Location: Topeka, KS

PostPosted: Sat Feb 20, 2010 1:28 am    Post subject: Where do I find the length of the load module
Reply with quote

After reading Comparing two loadlib's using AMBLIST where do I find the length of the load module.

I agree with:

Quote:
anyone that is responsible for production programs would never trust that two loads that differ in any respect.
If they are not the same, they are not the same.


Too many programmers work differently given the same standards. Like using developement before production environment. And was there a hot fix applied and never moved up to the production source code?

I stuck where it is suppose to be the same... but we know people worked different. (Not enforced standards)
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7989
Location: Bellevue, IA

PostPosted: Sat Feb 20, 2010 2:04 am    Post subject:
Reply with quote

Load module length location is not always in the same spot but for a recent AMBLIST run I needed to do, the CSECT length was located at:
Code:
0RECORD# 10    TYPE 01 - CONTROL            CONTROL SIZE 4                   RLD
0                 CESD#   LENGTH
                     1     1D48
Back to top
View user's profile Send private message
awkksgovus

New User


Joined: 22 Jan 2010
Posts: 14
Location: Topeka, KS

PostPosted: Sat Feb 20, 2010 3:09 am    Post subject: AMBLIST... on the mainframe.
Reply with quote

System doesn't seem to like the execution of the JCL on the mainframe.

IEF085I REGION UNAVAILABLE, ERROR CODE=20

Error code 20 may appear for one of several reasons:

The job step requested a V=V region, but there was not enough virtual storage in the region.
Fragmentation of the local system queue area (LSQA), scheduler work area (SWA) or subpools 229, 230, or 249 occurred, making it impossible to obtain the region requested by the job step.
The job step requested a V=R region that exceeds the global V=R area size.

I will check it out with our systems programmer. Not sure if we have used this utility. Or perhaps it is my misuse of it.
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Sat Feb 20, 2010 7:53 am    Post subject:
Reply with quote

If you're looking for simply the size of the load module, a PDS member list should also show it.
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 Feb 20, 2010 9:41 am    Post subject:
Reply with quote

Hello,

If you post the jcl submitted along with the sysout information generated by the run it may help someone help you.
Back to top
View user's profile Send private message
awkksgovus

New User


Joined: 22 Jan 2010
Posts: 14
Location: Topeka, KS

PostPosted: Wed Feb 24, 2010 2:25 am    Post subject: OK, got tech support.... minor details.
Reply with quote

I think record 11 is where I see it... tell me if I got it right:

RECORD# 11 TYPE 01 - CONTROL CONTROL SIZE 4
CESD# LENGTH
7 1800

Where 1800 would be it. icon_rolleyes.gif
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7989
Location: Bellevue, IA

PostPosted: Wed Feb 24, 2010 4:02 am    Post subject:
Reply with quote

Yep -- just remember that's a HEX number, not decimal.
Back to top
View user's profile Send private message
awkksgovus

New User


Joined: 22 Jan 2010
Posts: 14
Location: Topeka, KS

PostPosted: Wed Feb 24, 2010 7:56 pm    Post subject: Follow up...
Reply with quote

Actually... I did it against another program that I know is different. I got the same number.

It actually shows on record #1 - example:

Code:
TYPE 20 - CESD     ESDID 1                      ESD SIZE 240           
 CESD#    SYMBOL    TYPE     ADDRESS     R/R/A    ID/LENGTH(DEC)   (HEX)
    1    DFHECI    00(SD)     000000      06             32          20
    2    DFHEI1    03(LR)     000008      06              1           1
    3    DLZEI01   03(LR)     000008      06              1           1
    4    DLZEI02   03(LR)     000008      06              1           1
    5    DLZEI03   03(LR)     000008      06              1           1
    6    DLZEI04   03(LR)     000008      06              1           1
    7    PROGRAMA  00(SD)     000020      07          21864        5568
    8    IGZCBSO   00(SD)     006AE8      06           1376         560
    9    CEESTART  00(SD)     006A68      07            128          80
   10    CEEBETBL  00(SD)     006A48      07             32          20


PROGRAMA is the one I was looking for.

FYI. icon_wink.gif
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 Writing on to GSAM variable length rohanthengal JCL & VSAM 6 Fri Mar 03, 2017 7:46 pm
No new posts Can DFSPARM override SORTKEYS paramet... ashek15 DB2 2 Tue Jan 31, 2017 11:36 pm
No new posts find particular member name in PDS us... ravi243 CLIST & REXX 10 Mon Dec 19, 2016 6:44 pm
No new posts How to find the first monday of the w... abdulrafi COBOL Programming 10 Fri Nov 25, 2016 3:24 pm
No new posts SQZ pipe delimited file with 1 column... Rick Silvers DFSORT/ICETOOL 6 Sun Nov 06, 2016 8:11 pm


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