| |
|
RSS Feed - WebSphere MQ Support
|
RSS Feed - Message Broker Support
|
| One transaction slows down the other |
« View previous topic :: View next topic » |
| Author |
Message
|
| jsp_ejb |
 Posted: Mon Nov 02, 2009 12:50 pm Post subject: |
 |
|
Novice
Joined: 27 Jun 2004
Posts: 21
Location: Chicago
|
WS-DE-WRAPPER-PGM-ID is Program C.
VP1016 2370-CALL-DE-WRAPPER.
VP1016 IF DE-STATUS-OFF
VP1016 OR WS-DECISION-ENG-FAIL-CTR > WS-DECISION-ENG-FAIL-MAX
VP1016 GO TO 2370-EXIT
VP1016 END-IF.
VP1016*--------------------------------------------------------------
VP1016 PERFORM 2372-SETUP-CALL-TO-DE-WRAPPER THRU 2372-EXIT.
VP1016*--------------------------------------------------------------
VP1016 CALL WS-DE-WRAPPER-PGM-ID USING WS-DUMMY-DFHEIBLK
VP1016 , WS-DUMMY-DFHCOMMAREA
VP1016 , C920-COMM-AREA
VP1016 ON EXCEPTION
VP1016 ADD 1 TO WS-DECISION-ENG-FAIL-CTR
VP1016 SET ERR-MSG-BAD-CICS TO TRUE
...............
VP1016 PERFORM 8000-PROCESS-ERROR THRU 8000-EXIT
VP1016 GO TO 2370-EXIT
VP1016 END-CALL. |
|
| Back to top |
|
 |
| bruce2359 |
| Posted: Mon Nov 02, 2009 3:28 pm Post subject: |
|
|
Poobah
Joined: 05 Jan 2008
Posts: 9469
Location: US: west coast, almost. Otherwise, enroute.
|
PERFORM is a COBOL verb that says to execute a series of COBOL statments within a paragraph of COBOL statements.
PERFORM is also a CICS command (CEMT PERFORM SHUTDOWN) that doesn't launch applications.
I don't see any EXEC CICS call in what you provided. How exactly does this code call a CICS application?
_________________
I like deadlines. I like to wave as they pass by.
ב''ה
Lex Orandi, Lex Credendi, Lex Vivendi. As we Worship, So we Believe, So we Live. |
|
| Back to top |
|
|
| jsp_ejb |
| Posted: Mon Nov 02, 2009 3:55 pm Post subject: |
|
|
Novice
Joined: 27 Jun 2004
Posts: 21
Location: Chicago
|
Sorry the word "perform" misled you. While I was typing it, I was thinking about something else.
It is the "CALL" command. Again, C is not a defined CICS transaction, it is only a program(a module if you will). |
|
| Back to top |
|
|
| bruce2359 |
| Posted: Tue Nov 03, 2009 6:53 am Post subject: |
|
|
Poobah
Joined: 05 Jan 2008
Posts: 9469
Location: US: west coast, almost. Otherwise, enroute.
|
With more precidsion...
The application is NOT using a CICS CALL command; rather, it isusing a COBOL CALL statement. Refer to the COBOL APR and APG manuals, and the CICS APR and APG manuals, to see the differences.
This indicates that program C is not defined (with CEDA) to CICS at all, yes? It is not a CICS transaction, nor is it a CICS program.
Is the called program C statically linked into the executable A? OR is C dynamically called at execution time by A? Look at the linkedit sysout for the answers to these questions.
If dynamically called, at execution time, MVS (not CICS) fetch routines must find C in the traditional ways it finds any other program.
_________________
I like deadlines. I like to wave as they pass by.
ב''ה
Lex Orandi, Lex Credendi, Lex Vivendi. As we Worship, So we Believe, So we Live. |
|
| Back to top |
|
|
| bruce2359 |
| Posted: Sat Nov 21, 2009 5:03 pm Post subject: |
|
|
Poobah
Joined: 05 Jan 2008
Posts: 9469
Location: US: west coast, almost. Otherwise, enroute.
|
Hello jsp_ejb.
Any progress or resolution for this? We've all been waiting by our email boxes...
_________________
I like deadlines. I like to wave as they pass by.
ב''ה
Lex Orandi, Lex Credendi, Lex Vivendi. As we Worship, So we Believe, So we Live. |
|
| Back to top |
|
|
|
|
|
|
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
|
|
|
|
