I am pretty sure there is nothing you can do. If you have the original
source you may be able to compile pre-link and bind into a PDS. The whole
point of program objects was to provide additional functionality over and
above load modules. Therefore, you cannot copy without losing this
functionality and end up with a broken program. In my early days of
computing I was introduced to fixed-block-architecture disks. I still find
it odd that you cannot simply copy data from one place to another and it
just works. I have looked into IBM DASD architecture to understand this a
little better, but I have found it hard to find the references that make
this totally clear. IIRC, Fred Brooks who led the design of the IBM/360
admitted that the originsl DASD architecture was a design mistake, but maybe
I'm mistaken.
I do not know why this functionality was not added to load-modules within a
PDS. I suspect it was a decision to work with and invest in new technology
and leave the old technolgy stable. However, there maybe technical reasons
why its easier to add this to PDSEs rather that a PDS. Hopefully someone
else can elucidate.
HTH
Julian
----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LIST...@VM.MARIST.EDU with the message: INFO TSO-REXX
This is off-topic for REXX but can you use the Linkage Editor (Binder) -
like this:
// EXEC PGM=LINKEDIT
//SYSPRINT DD SYSOUT=*
//PDSE DD DSN=MY.PDSE.LOAD(MYPROG),DISP=SHR
//SYSLMOD DD DSN=MY.PDS.LOAD,DISP=SHR
//SYSLIN DD *
INCLUDE PDSE(MYPROG)
NAME MYPROG(R)
HTH,
Ken
Karl-Heinz
Wittemann
<k...@SPGMBH.DE> To
TSO-...@VM.MARIST.EDU
Sent by: TSO REXX cc
Discussion List
<TSO-...@VM.MARI Subject
ST.EDU> copy a load module
Tue 03/14/06
09:35 AM
Please respond to
TSO REXX
Discussion List
<TSO-...@VM.MARI
ST.EDU>
hi folks,
we got a loadmodul inside a pds-e and we are not able to copy it to a
pds-loadlib. we tried with iebcopy, pdsfast, and 3.3. the message we get is
IEW2606S 4B39 MODULE INCORPORATES VERSION 3 PROGRAM OBJECT FEATURES AND
CANNOT
BE SAVED IN LOAD MODULE FORMAT.
also we tried to reblock with adrdssu. any idea, what we can do?
thanks
heinz
The attributes of input-library are
Dataset Name: XCK10D3.MAILB.LNKLIB.PDSE
Management Class: XU1TEMP Allocation Units:
CYLINDER
Storage Class: TSO1
Volume serial: ET0111 Primary Allocation:
34
Device type: 3390-9 Secondary Allocation:
20
Data Class:
Organization: PO-E Total Allocation:
34
Record format: U Allocated Extents:
1
Record length: 0 Used Pages:
1,932
Block size: 6144
Creation date: 2006/03/13 Directory Blocks Aloc:
NOLIMIT
Expiration date: ** None ** Directory Blocks Used:
1
Last Reference date: 2006/03/14 Number of Members:
1
Blocks per Track: 8 Total Allocation (Tracks):
510
Percentage Utilized: 31 Used Allocation (Tracks):
161
Track Utilization: 84
Dataset type:
LIBRARY/POB
the output-libra is
Dataset Name: XHU5099.TEST.PGMLIB
Management Class: XU1ABKUP Allocation Units:
CYLINDER
Storage Class: TSO1
Volume serial: ET0112 Primary Allocation:
10
Device type: 3390-9 Secondary Allocation:
10
Data Class:
Organization: PO Total Allocation:
10
Record format: U Allocated Extents:
1
Record length: 32760 Used Allocation:
1
Block size: 32760 Used Extents:
1
Creation date: 2006/03/14 Directory Blocks Aloc:
50
Expiration date: ** None ** Directory Blocks Used:
1
Last Reference date: 2006/03/14 Number of Members:
0
Blocks per Track: 1 Total Allocation (Tracks):
150
Percentage Utilized: 1 Used Allocation (Tracks):
2
Track Utilization: 56
Dataset type:
PDS
--
Mobil: +49(0)172 893 68 81
Fax: +49(0)1212 510 111 239
> sorry for my stupidity. about relink i didn't think. anyway a lot of
> errors. i
> have no source, i know nothing about the program also not in wich language
> it
> is written. i'll send it back to the company where it was written.
>
> anyway thanks for help. seems to be late friday afternoon and i should go
> into
> weekend.
>
> z/OS V1 R6 BINDER 13:44:17 TUESDAY MARCH 14, 2006
> BATCH EMULATOR JOB(XHU5099C) STEP( ) PGM= LINKEDIT
>
> IEW2322I 1220 1 INCLUDE PDSE(UMBMAIN)
> IEW2322I 1220 2 NAME UMBMAIN(R)
> IEW2457E 9208 SYMBOL system UNRESOLVED. NO CALL LIBRARY SPECIFIED.
> IEW2457E 9208 SYMBOL putenv UNRESOLVED. NO CALL LIBRARY SPECIFIED.
> IEW2457E 9208 SYMBOL sprintf UNRESOLVED. NO CALL LIBRARY SPECIFIED.
> IEW2457E 9208 SYMBOL fopen UNRESOLVED. NO CALL LIBRARY SPECIFIED.
> IEW2457E 9208 SYMBOL fclose UNRESOLVED. NO CALL LIBRARY SPECIFIED.
> IEW2457E 9208 SYMBOL exit UNRESOLVED. NO CALL LIBRARY SPECIFIED.
> IEW2457E 9208 SYMBOL fprintf UNRESOLVED. NO CALL LIBRARY SPECIFIED.
> --
> Mobil: +49(0)172 893 68 81
> Fax: +49(0)1212 510 111 239
>
>
> Zitat von Ken MacKenzie <Kenneth....@PRAMERICA.IE>:
>
So you need to have your C run-time library available in your link (actually
binder) JCL. Add a SYSLIB that points to that.
Kind regards,
-Steve Comstock
The Trainer's Friend, Inc.
http://www.trainersfriend.com
"Julian Levens" <Jul...@CAPSCAN.COM> wrote in message news:EIEJLGIBFGFPJLIHI...@Capscan.com...