MVSFORUMS.com

krish_caitu · Beginner Joined: 24 Oct 2005 Posts: 4 Topics: 1

Hi All !!

Could you please let me know how to find the length of the Assembler Copy book ?

And what will be the process of finding the length of multible copy books ?

For more clarity I want to know whether there is any procedure as like File-Aid option 8 (View) ...

To add more, currently we are putting all the copy books whose lengths are to be computed as different CSECTs in a dummy assembler program and just compiling it ...and then we are looking the SYSPRINT to know the length ..

I beleive there should be more efficient procedure than this.

Please help me out of this

Thanks for your time !!!

Dibakar · Posted: Sat Nov 12, 2005 3:52 am Post subject:

kolusu · Posted: Sat Nov 12, 2005 4:27 am Post subject:

Dibakar · Posted: Sat Nov 12, 2005 5:48 am Post subject:

Kolusu,

I am assuming that assembler copybooks are macros which can have dyanamic expansion during compilation.

I have come across some macros which are used for multiple structures. Based on the structure name provided the macros can have different expansion. Like -

krish_caitu · Beginner Joined: 24 Oct 2005 Posts: 4 Topics: 1

Dibakar & kolusu,

Thanks alot for your time

As I am a beginer in Assembly Language I dont know whether there are any loop holes in the procedure that we are currently following.

My requirement seems to be very simple but still I am unable to find an efficient solution.

Requirement is ...
Our installation is having 500+ Cobol Copy books and their corresponding MACLIBS. And each year there will be changes to the Cobol Copy books and we need to reflect those changes to the respective Maclibs. During data conversions from previous version to new version, as Length plays imp role we need to ensure that both, Cobol & corresponding Assembler Copy books, will be of same length.

As there are 500+ copy books i wanted to know whether there is any way to find the length in a single go.

We may assume that there wont be any Dynamic expansion of the Copy book lengths as i havnt seen any such instance till now in our installation.

Please help me out .........

MikeBaker · Beginner Joined: 04 May 2004 Posts: 96 Topics: 9

Krish Caitu,

If Length plays an important role (as you say), then you should (from now on) permanently include the length as a dynamically generated field inside each of your Assembler copybooks.

At the start and end of the copybook put an EQU, and also code an AL storage field. Example:-

MikeBaker · Beginner Joined: 04 May 2004 Posts: 96 Topics: 9

PS: One final note... all of the above code will only add 2 extra bytes to your code. 'A' is for Address, and a length of 2 = AL2. And if you omit the length specifer for Address Constants, you'll get a default Fullword.

krish_caitu · Beginner Joined: 24 Oct 2005 Posts: 4 Topics: 1

Hi MikeBaker,

Thanks alot .... Smile

MikeBaker · Beginner Joined: 04 May 2004 Posts: 96 Topics: 9

WHOOPS... sorry, but I have made a mistake. Obviously cannot count. The decimal value here is 30 (not 32!), and you'll get the hex equivalent for 30 (whatever that is...)

I tested this code inside an assembler program this morning, but obviously missed out a 2 byte field along the way. However if you decide to include the AL2 within the two EQU's, then it will equal 32!

Prove it to yourself anyway, and you'll see.