CICS DPL call

Vkp321 · New User Joined: 05 Jan 2009 Posts: 56 Location: Dublin

Hi Team,
Please help the SYSID can be associated to one or multiple remote programs

EXEC CICS LINK
PROGRAM ('PROG2')
COMMAREA (WS-COMMAREA)
LENGTH (WS-LEN)
SYSID(‘CICR’)
TRANSID(‘TRN2’)
SYNCONRETURN
END-EXEC.

Robert Sample · Posted: Thu Jun 16, 2022 2:15 am

Not quite. SYSID refers to the system name of a CICS region. That CICS region can have hundreds, if not thousands, of programs defined to it -- just like any other CICS region. The SYSID is not arbitrary -- it is established by a system programmer when creating the CICS region and hence is known to the operating system as well as CICS.

Vkp321 · New User Joined: 05 Jan 2009 Posts: 56 Location: Dublin

Thank you Robert.

How to pass updated values from DPL program to client region?

Vkp321 · New User Joined: 05 Jan 2009 Posts: 56 Location: Dublin

Hi Robert,
Do you know the exact COMMAREA size to pass to the DPL program. Any IBM manual to support this change

Robert Sample · Posted: Wed Jun 22, 2022 1:53 am

COMMAREA is a user area and as such the length depends entirely upon the programmer and the application -- it could be anything from zero bytes to 24K-1 (or 32K-1 depending). The sample program given in www.ibm.com/docs/en/cics-ts/5.3?topic=dmscwmb-example-request-message-dpl-program-through-cics-websphere-mq-bridge uses 100 for the COMMAREA length; other programs and applications may use longer or shorter COMMAREA. The how-to is in www.ibm.com/docs/en/cics-ts/5.3?topic=dpl-introduction-programming and if you really want to know how it works, start coding and testing programs.

Vkp321 · New User Joined: 05 Jan 2009 Posts: 56 Location: Dublin

Thank you Robert for your answer, you are right
I worked on DPL program and could see the 32767(32KB - 1Byte) bytes passed and processed at remote program
when I tried to send 32768 bytes (32KB) the client program Error out for the COMMAREA length error

So it confirms the max size 32KB means 32KB - 1 Byte however
it is not declared on IBM manual specifically so I asked the query

www.ibm.com/common/ssi/ShowDoc.wss?docURL=/common/ssi/rep_sm/4/877/ENUS5655-Y04/index.html

Garry Carroll · Posted: Wed Jun 22, 2022 7:49 pm

If the 32k-1byte limitation is a concern, try using Channels and Containers which removes the limitation.

Garry.