|
View previous topic :: View next topic
|
| Author |
Message |
jagadeesanm87
New User
Joined: 20 Jan 2011
Posts: 14
Location: Mumbai, India
|
|
|
|
Hi,
In CICS, I need to execute a XCTL command as below
| Code: |
CECI XCTL PROGRAM (RP9Z410)
COMMAREA (<GetHis2MfDataRequest>
<ServiceId>SVB0XX</ServiceId>) LENGTH(10000) |
On execution I get the below msg.
| Code: |
STATUS: ABOUT TO EXECUTE COMMAND NAME=
EXEC CICS Xctl
Program( 'RP9Z410 ' )
< COmmarea() < Length() > >
< INPUTMSG() < INPUTMSGLen() > >
< CHannel() >
MESSAGES: 106 ERROR
DFHAC2001 09/21/2011 09:12:11 HMECICS Transaction '' is not recognized. Check
that the transaction name is correct. |
Seems like only 1st line is considered.
Please let me know what is wrong. And how to add multiple lines in CICS transaction.
Thanks |
|
| Back to top |
|
 |
Robert Sample
Global Moderator
Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA
|
|
|
|
CECI allows entry of data across multiple lines -- what it does not allow is use of
| Code: |
<GetHis2MfDataRequest>
<ServiceId>SVB0XX</ServiceId> |
If this is data you attempting to pass to your RP9Z410 program, you need to define a variable in CECI and set the value of that variable to the text. Your COMMAREA would then point to the CECI variable. |
|
| Back to top |
|
|
jagadeesanm87
New User
Joined: 20 Jan 2011
Posts: 14
Location: Mumbai, India
|
|
|
|
Thanks Robert  ,
How do we define the CECI variable, could you give me an example on using here.
Thanks. |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
| Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA
|
|
|
|
After you type in CECI on the CICS screen, hit PF5. You'll get a screen that looks like
| Code: |
VARIABLES LENGTH DATA
&DFHC +00016 THIS IS A SAMPLE
&DFHW +00046 EXEC CICS WRITEQ QUEUE('""CIV000') FROM(&DFHC)
&DFHR +00045 EXEC CICS READQ QUEUE('""CIV000') INTO(&DFHC) |
add your variable on the next line, set its length, then hit enter. For example:
| Code: |
VARIABLES LENGTH DATA
&DFHC +00016 THIS IS A SAMPLE
&DFHW +00046 EXEC CICS WRITEQ QUEUE('""CIV000') FROM(&DFHC)
&DFHR +00045 EXEC CICS READQ QUEUE('""CIV000') INTO(&DFHC)
&commarea +10000 |
You can then place the cursor on the & of your new variable, hit the enter key and get a data entry screen, such as (partial display of a full screen)
| Code: |
EXPANSION OF: LENGTH= +10000 NAME= &COMMAREA
+00000
+00064
+00128
+00192
+00256
+00320
+00384
+00448
+00512
+00576 |
Once you've entered your data, hit enter to get back to the CECI menu, put in your XCTL command, and away you go. |
|
| Back to top |
|
|
jagadeesanm87
New User
Joined: 20 Jan 2011
Posts: 14
Location: Mumbai, India
|
|
|
|
Thanks Robert 
This is a good lesson for me.
I get the below error on execution by using variable.
| Code: |
STATUS: ABOUT TO EXECUTE COMMAND NAME=
EXEC CICS Xctl
Program( 'RP9Z410 ' )
< COmmarea( ' <GETHIS2MFDATAREQUEST> ' ... )
< Length( +10000 ) > >
< INPUTMSG() < INPUTMSGLen() > >
< CHannel() >
DFHAC2206 10:02:04 HMECICS Transaction CECI failed with abend ASRA. Updates to
local recoverable resources backed out. |
Don't know how to proceed further.
Am I missing something very important. Please help
Thanks |
|
| Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA
|
|
|
|
| Debug the ASRA. You might try using CEDF, or Xpediter if you have it, but something in your program is not working correctly. |
|
| Back to top |
|
|
jagadeesanm87
New User
Joined: 20 Jan 2011
Posts: 14
Location: Mumbai, India
|
|
|
|
Yes Robert, there was an error in the program. I figured it out today. And now it is working fine.
Thanks a lot |
|
| Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA
|
|
|
|
| Glad to hear it -- thanks for letting us know. |
|
| Back to top |
|
|
|
|
