Relink SHEXMODS and EXPAND to AMODE 31 RMODE24 in the CCVBLOAD library:
Example JCL below:
//LKED EXEC PGM=IEWL,REGION=2048K,
// PARM='NCAL'
//SYSLIB DD DSN=SYS1.CCVBLOAD,DISP=SHR
//SYSLMOD DD DSN=SYS1.CCVBLOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSLIN DD *
MODE AMODE(31) RMODE(24)
INCLUDE SYSLIB(SHEXMODS)
ENTRY SHEXSUBS
NAME SHEXMODS (R)
//
Additional JCL for EXPAND relink
//LINK02 EXEC PGM=IEWL,PARM='NORENT,NOREUS'
//SYSUT1 DD UNIT=SYSDA,SPACE=(1024,(500,50))
//SYSPRINT DD SYSOUT=*
//INPUT DD DISP=SHR,DSN=your 55.CMPMVS.CCVBLOAD
//SYSLMOD DD DISP=SHR,DSN=your 55.TEST.CMPMVS.CCVBLOAD
//SYSLIN DD *
INCLUDE INPUT(EXPAND)
ENTRY EXPAND
MODE AMODE(31),RMODE(24)
NAME EXPAND(R)