Discussion:
[hercules-390] cobol cics - accessing DB2 ???
marco.bakos@gmail.com [hercules-390]
2018-08-23 20:22:04 UTC
Permalink
My name is Marco, and when I go to use in program COBOL/CICS accessing DB2, I have a problem.


I'd like to know how can I connect DB2 to CICS, I coded a COBOL/CICS program accessing DB2, and in my environment Hercules, when I run the transaction, I receive abend AEY9, informing that I don't have a connection with DB2.


What to do to have a connection with the DB2??


My Hercules is version 3.13 (in macOS - High Sierra). In the TSO I access the DB2 through the ISPF, but in CICS doesn't work.


I will appreciate if someone could help me in the correct settings to access the db2 through the cics.


thanks.
TSDunlap tsdunlap@wowway.com [hercules-390]
2018-08-23 20:36:59 UTC
Permalink
Marco,

There is a DB2CONN resource in CICS which must be defined to connect to
DB2.  Here is an example of ours:
  DEFINE DB2CONN(DC1A)  GROUP(DB2V12)
     TCBLIMIT(8)  PURGECYCLE(0,30)
     COMAUTHID(CICSUSER)  COMTHREADLIM(1)
     PLAN(CICSPL)  AUTHTYPE(USER)  THREADLIMIT(3)
     DROLLBACK(YES)  PRIORITY(EQUAL)
Post by ***@gmail.com [hercules-390]
My name is Marco, and when I go to use in program COBOL/CICS accessing
DB2, I have a problem.
I'd like to know how can I connect DB2 to CICS, I coded a COBOL/CICS
program accessing DB2, and in my environment Hercules, when I run the
transaction, I receive abend AEY9, informing that I don't have a
connection with DB2.
What to do to have a connection with the DB2??
My Hercules is version 3.13 (in macOS - High Sierra). In the TSO I
access the DB2 through the ISPF, but in CICS doesn't work.
I will appreciate if someone could help me in the correct settings to
access the db2 through the cics.
thanks.
--
______________________________________________________________________
Regards,
Thomas Dunlap Chief Technology Officer ***@themisinc.com
Themis, Inc. http://www.themisinc.com 908 400-6485
'Marco A. Bakos' marco.bakos@gmail.com [hercules-390]
2018-08-23 23:12:31 UTC
Permalink
Hi Thomas,

Thank you for your information.

I defined DB2Conn and installed (like you said to me):

DEFINE DB2CONN(DB9G) GROUP(BAKOS)
TCBLIMIT(8) PURGECYCLE(0,30)
COMAUTHID(CICSUSER) COMTHREADLIM(1)
PLAN(CICSPL) AUTHTYPE(USER) THREADLIMIT(3)
DROLLBACK(YES) PRIORITY(EQUAL)

And didn't work. I received abend AEY9 again.

Questions?

1-) The PLAN(CICSPL), use this or I have to define one, (if I have to
define one, could you give me an example?)
2-) The COMAUTHID(CICSUSER), use this or I have to input a specific one?
3-) Do I need to inform DB2Conn in the Program or Transaction definition,
or elsewhere?

When I execute the transaction (DC02), abend with AEY9, and in the
mainframe console receive this message:

18.50.32 STC00024 +DFHFC0208I CICS
LSR pool 1 is being built dynamically by CICS because all of the
necessary parameters have not been supplied. Either there is no
LSRPOOL definition or it is incomplete. The following are not
defined: 'CI SIZE' 'STRINGS' 'MAXKEYLENGTH'. A delay is possible.

I appreciate your attention.

Thanks.



<https://mailtrack.io/> Sent with Mailtrack
<https://mailtrack.io/install?source=signature&lang=en&referral=***@gmail.com&idSignature=22>
<#>

_______________________________________
*Marco Antonio Bakos*
Post by ***@gmail.com [hercules-390]
Marco,
There is a DB2CONN resource in CICS which must be defined to connect to
DEFINE DB2CONN(DC1A) GROUP(DB2V12)
TCBLIMIT(8) PURGECYCLE(0,30)
COMAUTHID(CICSUSER) COMTHREADLIM(1)
PLAN(CICSPL) AUTHTYPE(USER) THREADLIMIT(3)
DROLLBACK(YES) PRIORITY(EQUAL)
My name is Marco, and when I go to use in program COBOL/CICS accessing
DB2, I have a problem.
I'd like to know how can I connect DB2 to CICS, I coded a COBOL/CICS
program accessing DB2, and in my environment Hercules, when I run the
transaction, I receive abend AEY9, informing that I don't have a connection
with DB2.
What to do to have a connection with the DB2??
My Hercules is version 3.13 (in macOS - High Sierra). In the TSO I access
the DB2 through the ISPF, but in CICS doesn't work.
I will appreciate if someone could help me in the correct settings to
access the db2 through the cics.
thanks.
--
______________________________________________________________________
Regards,
Themis, Inc. http://www.themisinc.com 908 400-6485
TSDunlap tsdunlap@wowway.com [hercules-390]
2018-08-24 09:21:52 UTC
Permalink
Marco,

The Plan CICSPL is what our applications use.  You will neew one of your
own for DB2 and your applications.  Likewise, the user ID CICSUSER is
our ID associated with the DB2 plan and applications. You will require
one of your own.

The DB2CONN is its own resource and not related to either PROGRAM or
TRANSACTION definitions.

As for the message you include, it is due to the fact that you have not
defined an LSRPOOL for the associated VSAM files you have defined in CICS.
Post by 'Marco A. Bakos' ***@gmail.com [hercules-390]
Hi Thomas,
Thank you for your information.
DEFINE DB2CONN(DB9G)  GROUP(BAKOS)
     TCBLIMIT(8)  PURGECYCLE(0,30)
     COMAUTHID(CICSUSER)  COMTHREADLIM(1)
     PLAN(CICSPL)  AUTHTYPE(USER)  THREADLIMIT(3)
     DROLLBACK(YES)  PRIORITY(EQUAL)
And didn't work. I received abend AEY9 again.
Questions?
1-) The PLAN(CICSPL), use this or I have to define one, (if I have to
define one, could you give me an example?)
2-) The COMAUTHID(CICSUSER), use this or I have to input a specific one?
3-) Do I need to inform DB2Conn in the Program or Transaction
definition, or elsewhere?
When I execute the transaction (DC02), abend with AEY9, and in the
18.50.32 STC00024  +DFHFC0208I CICS
 LSR pool 1 is being built dynamically by CICS because all of the
 necessary parameters have not been supplied. Either there is no
 LSRPOOL definition or it is incomplete. The following are not
 defined:  'CI SIZE' 'STRINGS' 'MAXKEYLENGTH'. A delay is possible.
I appreciate your attention.
Thanks.
<https://mailtrack.io/> Sent with Mailtrack
<#>
_______________________________________
*Marco Antonio Bakos*
Marco,
There is a DB2CONN resource in CICS which must be defined to
  DEFINE DB2CONN(DC1A) GROUP(DB2V12)
     TCBLIMIT(8) PURGECYCLE(0,30)
     COMAUTHID(CICSUSER) COMTHREADLIM(1)
     PLAN(CICSPL)  AUTHTYPE(USER) THREADLIMIT(3)
     DROLLBACK(YES) PRIORITY(EQUAL)
Post by ***@gmail.com [hercules-390]
My name is Marco, and when I go to use in program COBOL/CICS
accessing DB2, I have a problem.
I'd like to know how can I connect DB2 to CICS, I coded a
COBOL/CICS program accessing DB2, and in my environment Hercules,
when I run the transaction, I receive abend AEY9, informing that
I don't have a connection with DB2.
What to do to have a connection with the DB2??
My Hercules is version 3.13 (in macOS - High Sierra). In the TSO
I access the DB2 through the ISPF, but in CICS doesn't work.
I will appreciate if someone could help me in the correct
settings to access the db2 through the cics.
thanks.
--
______________________________________________________________________
Regards,
Themis, Inc.http://www.themisinc.com 908 400-6485
--
______________________________________________________________________
Regards,
Thomas Dunlap Chief Technology Officer ***@themisinc.com
Themis, Inc. http://www.themisinc.com 908 400-6485
Loading...