Hi everyone!
We're facing this problem when trying to display a map (EXEC CICS SEND MAP) in our CICS program :
090428.i5201dap!ARTSTRN.12189726.1.0: gtrid x0 x5412ea24 x1f186: (1) Abend AEI9 detected in transaction KI18 program KI2C0710 036/000
We're usig COBOL-IT , and the both the map & the COBOL are compiled without errors .
This is the dump:
TRACE:2 >>>> CALL SERVICE : <KI18-KI2C0710>========== FML Buffer RECEIVED - Begin service ==========
CX_FMBTYPE 2
CX_MAGICNO 2271560481
CX_VERSION 100
CX_CMDID 100
CX_CMDFLAGS 0
CX_SIGNEDONFLAG 0
CX_TERMROWS 24
CX_TERMCOLS 80
CX_TERMATTRIB 5
CX_TERMALTROWS 0
CX_TERMALTCOLS 0
CX_TERMALTERNATE 0
CX_RESOURCECLS TX
CX_TRACEFILTER
CX_ORIGINID
CX_SESSIONID 0001515090937000
CX_MODELID IBM-3278-2-E
CX_TERM_OUTBOUND ibm-37
CX_TERM_INBOUND ascii
CX_RESOURCENAME KI18
CX_SYSID CICS
CX_TCTUANOMAP \00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\
00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00
CX_INPUTMSGNOMAP ' DKI18
CX_TRANSID KI18
CX_TERMID .001
CX_USERID
(FLDID(231327376)) \00\00\00\00\00\00\00\00\00\00\00\00
(FLDID(231327379)) CICS.001
(FLDID(231327388)) \00\01n
(FLDID(231329600)) KI18\00
TRACE:5 >> tcpstub >> TCP_InitTerm
TRACE:2 --TCP_InitTerm rc=0
TRACE:5 -- TCP_GetTctua - Begin
TRACE:5 -- TCP : isTctuaPresent
TRACE:5 >> tcpstub >> TCP_Tctua - Size<100>
TRACE:2 GetTctua <110020b60-100l>
TRACE:2 TCTUA size <100>
TRACE:5 >> tcpstub >> TCP_InitializeEib
TRACE:2 ===== EIB FIELD DETAIL ==================================
TRACE:2 EIBTIME.....<0090959C>
TRACE:2 EIBDATE.....<0114257C>
TRACE:2 EIBTRNID....<KI18>
TRACE:2 EIBTASKN....<0020005C>
TRACE:2 EIBTRMID....<.001>
TRACE:2 EIBCPOSN....<4>
TRACE:2 EIBCALEN....<0>
TRACE:2 EIBAID......<'>
TRACE:2 EIBFN.......< >
TRACE:2 EIBRCODE....< >
TRACE:2 EIBDS.......< >
TRACE:2 EIBREQID....< >
TRACE:2 EIBRSRCE....< >
TRACE:2 EIBSYNC.....<^@>
TRACE:2 EIBFREE.....<^@>
TRACE:2 EIBRECV.....<^@>
TRACE:2 EIBSEND.....<^@>
TRACE:2 EIBATT......<^@>
TRACE:2 EIBEOC......<^@>
TRACE:2 EIBFMH......<^@>
TRACE:2 EIBCOMPL....<^@>
TRACE:2 EIBSIG......<^@>
TRACE:2 EIBCONF.....<^@>
TRACE:2 EIBERR......<^@>
TRACE:2 EIBERRCD....< >
TRACE:2 EIBSYNRB....<^@>
TRACE:2 EIBNODAT....<^@>
TRACE:2 EIBRESP.....<0>
TRACE:2 EIBRESP2....<0>
TRACE:2 EIBRLDBK....<^@>
TRACE:2 ===== END EIB FIELD DETAIL ==============================
TRACE:2 >> tcpstub >> TCP_InitializeEib >> DONE
TRACE:5 -- TCP_GetCommArea - Begin
TRACE:5 -- TCP : isCommAreaPresent
TRACE:5 -- TCP : No CommArea
TRACE:2 GetCommArea <0-0l>
TRACE:2 >> COMMAREA extract size = 0
TRACE:2 generate_task start
TRACE:2 Call service 'CICSDB_runtime_info'
TRACE:2 generate_task end, ret=0
TRACE:3 ARTSTRN strsvc tpbegin done
TRACE:2 >> tcpstub >> TCP_UpdateEib
TRACE:2 >> tcpstub >> TCP_UpdateEib - EIBAID=<27/'''>
TRACE:2 >> tcpstub >> TCP_UpdateEib - EIBRESP=<0>
TRACE:2 >> tcpstub >> TCP_UpdateEib - EIBRESP2=<0>
TRACE:2 >> tcpstub >> TCP_UpdateEib - EIBRCODE=< >
TRACE:2 >> tcpstub >> TCP_UpdateEib >> DONE
TRACE:2 INFO : <TCP_UpdateEib> DONE
-------------------------------------------------------------------------------
{{{{{ 11731046 - 2014/09/15 09:09:59.742 - KI18
---- ARTSTRN:11731046 ---- 0114257c ---- 0090959c ----
TRACE:2 create_handleset: Create a HANDLE SET:528
TRACE:2 >> KixProgramRealSubmit >> ProgramName=<set_err_proc>
TRACE:2 >> KixProgramRealSubmit >> ProgramName=<KI2C0710>
TRACE:5 KIX__HANDLE_CON_REGISTER: labels: ' PGM-NOTFOUND
'
<<<<< 11731046 - 2014/09/15 09:09:59.742 - KI2C0710 - KIX__ASKTIME
ABSTIME 00008 - 0000000000000000 - ........
. . . . . . . . . . . . . . . . . . . . . . . . . .
ABSTIME 00008 - 003619760999740C - .6.v..t.
KIX-IETRACE - KIX__ASKTIME________________
EIBFN - '1002' 'ASKTIME '
EIBRESP - '000' 'NORMAL '
EIBRESP2 - '000'
EIBCALEN - '+00000'
EIBAID - '''
EIBTRNID - 'KI18'
EIBTRMID - '.001'
EIBTASKN - '0020006'
EIBRSRCE - ' '
>>>>> 11731046 - 2014/09/15 09:09:59.743 - KI2C0710 - KIX__ASKTIME - '000' '000'
<<<<< 11731046 - 2014/09/15 09:09:59.743 - KI2C0710 - KIX__FORMATTIME
DDMMYY 00008 - 0000000000000000 - ........
DATESEP 00001 - 2D - -
ABSTIME 00008 - 003619760999740C - .6.v..t.
. . . . . . . . . . . . . . . . . . . . . . . . . .
DDMMYY 00008 - 31352D30392D3134 - 15-09-14
DATESEP 00001 - 2D - -
ABSTIME 00008 - 003619760999740C - .6.v..t.
KIX-IETRACE - KIX__FORMATTIME_____________
EIBFN - 'A29C' 'FORMATTIME '
EIBRESP - '000' 'NORMAL '
EIBRESP2 - '000'
EIBCALEN - '+00000'
EIBAID - '''
EIBTRNID - 'KI18'
EIBTRMID - '.001'
EIBTASKN - '0020006'
EIBRSRCE - ' '
>>>>> 11731046 - 2014/09/15 09:09:59.744 - KI2C0710 - KIX__FORMATTIME - '000' '000'
<<<<< 11731046 - 2014/09/15 09:09:59.744 - KI2C0710 - KIX__SEND_MAP
FROM 00134 - 0000000000000000000000000000004B - ...............K
00134 - 4932433037313000000031352D30392D - I2C0710...15-09-
00134 - 313420200000004B4931380000410000 - 14 ...KI18..A..
00134 - 00000000000038000000000000000000 - ......8.........
MAPSET 00007 - 525353424D3030 - RSSBM00
ERASE 00000 - -
MAP 00007 - 525353424D3030 - RSSBM00
TRACE:2 >> tcpstub >> TCP__SendMap- MapName<RSSBM00> - MapSet<RSSBM00> - Size<134>
TRACE:2 >> tcpstub >> ERROR: send map BmsTerm[36]
TRACE:2 >> tcpstub >> TCP_UpdateEib
TRACE:2 >> tcpstub >> TCP_UpdateEib - EIBAID=<27/'''>
TRACE:2 >> tcpstub >> TCP_UpdateEib - EIBRESP=<36>
TRACE:2 >> tcpstub >> TCP_UpdateEib - EIBRESP2=<0>
TRACE:2 >> tcpstub >> TCP_UpdateEib - EIBRCODE=< >
TRACE:2 >> tcpstub >> TCP_UpdateEib >> DONE
KIX-IERROR - CICS ERROR
KIX-IETRACE - KIX__SEND_MAP_______________
EIBFN - '189C' 'SEND MAP '
EIBRESP - '036' 'MAPFAIL '
EIBRESP2 - '000'
EIBCALEN - '+00000'
EIBAID - '''
EIBTRNID - 'KI18'
EIBTRMID - '.001'
EIBTASKN - '0020006'
EIBRSRCE - 'RSSBM00 '
>>>>> 11731046 - 2014/09/15 09:09:59.746 - KI2C0710 - KIX__SEND_MAP - '036' '000'
TRACE:2 cit_dump level 1
(1) Abend AEI9 detected in transaction KI18 program KI2C0710 036/000
TRACE:2 -----> KixProgramReturn - Return to <KI2C0710> eibcalen 0
TRACE:2 free_labellist labelcnt: '1'
TRACE:3 KixProgramRealSubmit RETURN with longjmp
TRACE:2 -----> KixProgramReturn(longjump) - STATUS_ABORT
TRACE:2 > cancel level 1
TRACE:5 In level 0, force to reset ABPROGRM
}}}}} 11731046 - 2014/09/15 09:09:59.747 - KI18 - 'A'
-------------------------------------------------------------------------------
TRACE:3 tpabort done 1
TRACE:2 >> tcpstub >> TCP__SendText
TRACE:5 >> tcpstub >> TCP_SetTctua size<100l>
TRACE:5 >> tcpstub >> TCP_SetTctua DONE
TRACE:5 FileSelectedRemove (directory:regexp '/tmp':'.*-\[.*]-\[11731046]-.*')
TRACE:5 FileSelectedRemove (directory:/tmp)
TRACE:5 >> tcpstub >> TCP_ReleaseTerm
TRACE:2 delete_task start
TRACE:2 TASKN '0020006C'
TRACE:2 Call service 'CICSDB_runtime_info'
TRACE:2 delete_task not support
TRACE:2 delete_task end, ret=0
========== FML Buffer SEND - End service ===============
CX_FMBTYPE | 2 |
CX_MAGICNO | 2271560481 |
CX_VERSION | 100 |
CX_CMDID | 100 |
CX_CMDFLAGS | 0 |
CX_SIGNEDONFLAG 0
CX_TERMROWS | 24 |
CX_TERMCOLS | 80 |
CX_TERMATTRIB 5
CX_TERMALTROWS 0
CX_TERMALTCOLS 0
CX_RESOURCECLS TX
CX_TRACEFILTER
CX_ORIGINID
CX_SESSIONID | 0001515090937000 |
CX_MODELID | IBM-3278-2-E |
CX_TERM_OUTBOUND | ibm-37 |
CX_TERM_INBOUND ascii
CX_RESOURCENAME KI18
CX_TCTUANOMAP \00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\
00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00\00
CX_INPUTMSGNOMAP | ' DKI18 |
CX_TRANSID | KI18 |
CX_TERMID | .001 |
CX_USERID
(FLDID(231327376)) | \00\00\00\00\00\00\00\00\00\00\00\00 |
(FLDID(231327379)) | CICS.001 |
(FLDID(231327388)) | \00\01n |
(FLDID(231329600)) | KI18\00 |
TRACE:2 return_val=<1-TPFAIL>TRACE:2 return_code=<56>
Thanks for your help!!!