|
View previous topic :: View next topic
|
| Author |
Message |
akodakka
New User
.jpg)
Joined: 20 May 2010
Posts: 75
Location: India
|
|
|
|
Hi
Am doing XPEDITOR on CICS-DB2 program. But sometimes i am able to XPED successfully but sometimes it giving an error message when it call the first SQL statement. And when i go to sysout of batch job from where am triggering this online process am seeing as ASRA.
Am linking this program from another CICS prog and this program will do some DB2 retrieval and return back to the calling prog.
Can anyone help me with this
| Code: |
COMMAND ===> SCROLL ===> CSR
MODULE: XXXNMPO ******** Remote BREAK/ABEND is no longer available ********
------ --------------------------------------------------------------------->
001135 SQL-SKIP.
001136 GO TO SQL-INIT-END.
001137 SQL-INITIAL.
001138 MOVE 1 TO SQL-INIT-FLAG.
001139 CALL 'DSNHADDR' USING SQL-VPARMPTR OF SQL-PLIST5
001140 SQL-PVAR-LIST5.
001141 CALL 'DSNHADD2' USING SQL-PVAR-ADDRS1 IN
|
|
|
| Back to top |
|
 |
PeterHolland
Global Moderator
Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen
|
|
|
|
| Dont expect an answer from me, being a hardcore capitalist. |
|
| Back to top |
|
|
akodakka
New User
Joined: 20 May 2010
Posts: 75
Location: India
|
|
|
|
| sorry....i didn't get you |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
you have to set breaks in your code
and you have to set traps for your programs (1,6). |
|
| Back to top |
|
|
akodakka
New User
Joined: 20 May 2010
Posts: 75
Location: India
|
|
|
|
Hi
Yes i have put break pint in my program. And in 1.6 the trap also. |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
man, you are talking about CICS program, batch job,
explain completely the process. |
|
| Back to top |
|
|
akodakka
New User
Joined: 20 May 2010
Posts: 75
Location: India
|
|
|
|
Hi am invoking my online process by a btach job..its for testing only. in real time there will be front end triggering. That is just a invoking job.Am sure this is not coming in picture as an issue
My actual issue is when i do the XPED on the programs. |
|
| Back to top |
|
|
akodakka
New User
Joined: 20 May 2010
Posts: 75
Location: India
|
|
|
|
Hi
Can anyone help me please |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
Hello,
You haven't provided any detail for someone to use to help you. . .
| Quote: |
| My actual issue is when i do the XPED on the programs. |
I suspect the actual issue is why you are trying to run XPED in the first place. . .
Suggest you place some diagnostic code into the problem module and determine where/when the abend (or other problem) occurs. |
|
| Back to top |
|
|
akodakka
New User
Joined: 20 May 2010
Posts: 75
Location: India
|
|
|
|
Hi
When i Run the program in normal without keeping in XPED its processing fine. But when i keep in XPED it gives error some time. Mostly the first rime it will run but when i do XPED agian it gives the above message that i mentioned in my first post |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
Hello,
If it is running "fine" without xped, why try to run it with xped?
It sounds like you have the process incorrectly set up, but have you have posted no actual specifics for someone use to help you. We have people (i'm not one of them) who are very good with xped, but they can only use what they have to work with.
For you to get more/better help, you need to provide more complete info about exactly what you are doing and what goes wrong. |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
******** Remote BREAK/ABEND is no longer available ********
simply means that there is no active transaction.
either you pf9'd thru the break, or did not have a trap set prior to the transaction starting.
the above is displayed by xped when there is a USER processing error,
and the user has looked for an active breakpoint.
it is NOT an error by XPED. |
|
| Back to top |
|
|
akodakka
New User
Joined: 20 May 2010
Posts: 75
Location: India
|
|
|
|
Hi
Thanks..But i have kept break points and trapped the transaction.
But this is happening when an SQL statement executed. Any guess this may be a program error |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
| Quote: |
Any guess this may be a program error
|
no, programmer/xpeditor user error
and I still suggest that you are PF12ing and the session is completing.
first sql statement will invoke all that stuff db2 inserts between procedure division (using) and your first line of code.
get into a habit of placing a break on the last CALL to 'DSNHADDR',
just before SQL-INIT-END.
then PF9 from then on to return to your code. |
|
| Back to top |
|
|
akodakka
New User
Joined: 20 May 2010
Posts: 75
Location: India
|
|
|
|
| Code: |
--------------------- XPEDITER/CICS - SOURCE LISTING (2.L) -----------OPT--ADE
COMMAND ===> SCROLL ===> CSR
MODULE: XXXXX12 ******** Remote BREAK/ABEND is no longer available ********
------ --------------------------------------------------------------------->
001234 CALL 'DSNHADD2' USING SQL-AVAR-ADDRS1 IN
001235 SQL-AVAR-LIST14 MAX-RATE OF DCSSSP-SBSSSS SQL-NULL WS-TRAN
001236 OF DCLRBP-SBAMAX SQL-NULL.
001237 B CALL 'DSNHADDR' USING SQL-CODEPTR OF SQL-PLIST14 SQLCA.
001238 SQL-INIT-END.
001239 CONTINUE. |
I did the same thing but still seeing same eroor |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
you have to start a new transaction............
and it is not an xped error.
it is an user/programmer error that indicates you do not know how to use the tool........ |
|
| Back to top |
|
|
|
|
