TDM MF EXIT function (GTMEXIT module) receives error CEE3552S DLL TDMA001F does not export any variables or functions.
PROCESSING HIST_INFO_PSSOA.CFUNC_BDSCO_ULT
PROCESSING EXIT(TDMA001F,,,,,,,,,)
BEFORE NUMBER 000000000000000002
CEE3552S DLL TDMA001F does not export any variables or functions.
From compile unit GTMEXIT at entry point GTMEXIT at compile unit offset +00000452 at entry offset +00000452
at address 1DCD9472.
Program Name GTXWHR
Program Version 6.2.00
Program Date 2020-09-01
MAPCSV Out:
Passed (80) =>"Table","Column","Function","Parm1","Parm2","Parm3","Parm4","KeepNulls","Datefor
Passed (80) =>HIST_INFO_PSSOA,CDOCTO,MASTERPLAN,,,,,N,,,,,,,,,,,,,,,
Passed (80) =>HIST_INFO_PSSOA,EEMAIL_PSSOA,EMAIL,,,,,N,,,,,,,,,,,,,,,
Passed (80) =>HIST_INFO_PSSOA,EHPAGE_PSSOA,SEQLOV,FLOWERS,,,,N,,,,,,,,,,,,,,,
Passed (80) =>HIST_INFO_PSSOA,CFUNC_BDSCO_ULT,EXIT,TDMA001F,,,,N,,,,,,,,,,,,,,,
Passed (80) =>HIST_INFO_PSSOA,CRESDT_DOMCL_UNIC,USPHONE10,,,,,N,,,,,,,,,,,,,,,
Passed (80) =>HIST_INFO_PSSOA,IAPLDO_PSSOA,SEQLOV,US CITY,,,,N,,,,,,,,,,,,,,,
Passed (80) =>HIST_INFO_PSSOA,IPSSOA_COPLT_DETLH,SEQLOV,BUSINESS TYPE,,,,N,,,,,,,,,,,,,,,
Run Type ==> D
File Type ==> F
File Format ==> X
WHERE ==> Y
Bundle IDs ==> 00000
Sort Cards ==> 00004
MAPCSV Inp ==> 00008
Header ==> 00001
Blank ==> 00000
Comment ==> 00000
Standard ==> 00007
MAPCSV SUB ==> 00008
MAPCSV OUT ==> 00008
MAPLEN Out ==> 01000
Ignored ==> 00000
Replaced ==> 00000
Generated ==> 00000
Program name GTXMAP
Program version 6.2.11
Program date 2022-05-23
In SYSOUT:
IDI0002I Module GTXMSKL, program GTMEXIT, offset X'452': Abend U4038.
All
Component : Mainframe
Wrong compile and link parameters for EXIT.
With the proper compile and link parameters (described below) the error was fixed and the masking EXIT is running successfully.
COMPILE:
//COMP EXEC PGM=IGYCRCTL,REGION=0M,
// PARM=('LIST,APOST,NOSEQ,LIST,MAP,XREF,SOURCE,EXPORTALL')
LINK:
//LKED EXEC PGM=IEWL,COND=(4,LT,COMP),
// PARM='MAP,RENT,DYNAM=DLL,CASE=MIXED,LIST=NOIMP'
This resolved the issue.