I suggest you use the DYNAMIC call of IEANTxx the deal with tokens.
Directly from the CVT or using LOAD and BASR
João
-----Mensagem original-----
De: IBM Mainframe Assembler List <ASSEMBLER-LIST@LISTSERV.UGA.EDU> Em nome
de Dave Clark
Enviada em: segunda-feira, 4 de dezembro de 2023 17:05
Para: ASSEMBLER-LIST@LISTSERV.UGA.EDU
Assunto: Re: Linkage Editor Include Order
"IBM Mainframe Assembler List" <ASSEMBLER-LIST@LISTSERV.UGA.EDU> wrote on
12/04/2023 02:16:08 PM:
> Is it possible to influence the order the linkage editor includes
objects?
I found an answer that works for z/VSE. After cataloging the main
object for my load module, I use the following linkage editor statements
to specify the order I want for my included objects and the linkage editor
honors this specified order.
// LIBDEF PHASE,CATALOG=DAP.PROD,TEMP
// OPTION CATAL
PHASE RXVSAMIO,*
INCLUDE RXVSAMIO
INCLUDE RXVSAMBK
INCLUDE RXVSAMBR
INCLUDE RXVSAMXA
INCLUDE RXVSAMXR
INCLUDE DTEMAN
INCLUDE IEANTCR
INCLUDE IEANTRT
// EXEC PGM=LNKEDT,SIZE=128K
/* EOD
CSECT/ LOADED RELOC. PARTIT. PHASE TAKEN AMODE/RMODE
ENTRY AT FACTOR OFFSET OFFSET FROM
-------------------------------------------------------------
RXVSAMIO 500078 500078 507D05 24 24
-------------------------------------------------------------
RXVSAMIO 500078 500078 000000 000000 RXVSAMIO 24 24
RXVSAMBK 502E78 502E78 002E00 002E00 RXVSAMBK 24 24
RXVSAMBR 504078 504078 004000 004000 RXVSAMBR 24 24
RXVSAMXA 505378 505378 005300 005300 RXVSAMXA 24 24
RXVSAMXR 506778 506778 006700 006700 RXVSAMXR 24 24
DTEMAN 507678 507678 007600 007600 DTEMAN 31 ANY
IEANTCR 507C78 507C78 007C00 007C00 IEANTCR 31 ANY
IEANTRT 507CC0 507CC0 007C48 007C48 IEANTRT 31 ANY
Sincerely,
Dave Clark
--
int.ext: 91078
direct: (937) 531-6378
home: (937) 751-3300
Winsupply Group Services
3110 Kettering Boulevard
Dayton, Ohio 45439 USA
(937) 294-5331
****************************************************************************
*****************
This email message and any attachments is for use only by the named
addressee(s) and may contain confidential, privileged and/or proprietary
information. If you have received this message in error, please
immediately notify the sender and delete and destroy the message and all
copies. All unauthorized direct or indirect use or disclosure of this
message is strictly prohibited. No right to confidentiality or privilege
is waived or lost by any error in transmission.
****************************************************************************
*****************
