I'm trying to write a copy program for Source code or Load Data from one Pds to
Another.
The Source Code part seems to be working...no issues.
The Load library code however, I cant seem to figure out how PDS2TTRT is
populated.
Here is an example:
- DSN=ISPF.XXXX.LINKLIB,VOL=SER=DVL010 MEM=PDS$DMP1 -----------------
>dir pds$dmp1
PDS143I PDS$DMP1 DIRECTORY ENTRY, LENGTH=36
0000 D7C4E25B C4D4D7F1 01D9082C 01DA0400 *PDS$DMP1.R......*
0010 00000000 02E2001C C01CC000 00008812 *.....S..{.{...h.*
0020 01010000 *....*
PDS262I LOC NAME VALUE DESCRIPTION
PDS262I --- ---- ----- -----------
PDS262I 00 PDS2NAME PDS$DMP1 MEMBER NAME
PDS262I 08 PDS2TTRP 01D908 TTR OF FIRST BLOCK OF DATA
PDS262I 0B PDS2INDC 2C 1 TTRS FOLLOW; 12 HALFWORDS OF DATA
PDS262I 0C PDS2TTRT 01DA04,00 TTR OF FIRST TEXT BLOCK
PDS262I 10 PDS2TTRN 000000,00 (NOT USED FOR THIS MEMBER)
PDS262I 14 PDS2ATR1 02 NOT REENTRANT; NOT REUS; NOT OVERLAY; NOT TEST
PDS262I NOT ONLY LOAD; NOT SCATTER; EXEC; NOT 1 TEXT
PDS262I 15 PDS2ATR2 E2 NOT DC; TEXT ORG=0; EP=0; HAS RLDS
The data was written to PDS using WRITE Macro, the Directory using STOW Add.
PDS2TTRT "seems" to be an offset as to where load member starts. But there
doesn't seem to be a clear way to calculate this.
I have looked at PDS from CBT, but I don't understand what's going on.
Sometimes for the same member, the "offset" changes.
Is there a simple way to figure out what this value should be ??
Thanks,
Tom Savor
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
