View previous topic :: View next topic |
Author |
Message |
rrv Beginner
Joined: 01 Nov 2004 Posts: 19 Topics: 6
|
Posted: Tue Nov 09, 2004 2:08 pm Post subject: COBOL2 Compiler Option - NUMPROC |
|
|
Hi There
I was wondering if someone could answer the following query regarding one of the COBOL compiler options (NUMPROC) and its implications vis-a-vis S0C7/ASRA abends in CICS.
Consider the following piece of code:
Code: |
01 WS-EXCP-MSG PIC X(33) VALUE SPACES.
01 WS-TABLE-1 OCCURS 8 TIMES INDEXED BY X-IDX-1.
03 WS-EXCP-SW PIC 9(01).
01 WS-TABLE-2 OCCURS 8 TIMES INDEXED BY X-IDX-2.
03 WS-TABLE-ENTRY PIC X(33).
SET X-IDX-2 TO WS-EXCP-SW (X-IDX-1).
MOVE WS-TABLE-ENTRY(X-IDX-2) TO WS-EXCP-MSG.
|
What is the effect of NUMPROC(PFD) and NUMPROC(NOPFD) on the above code if all occurrences of WS-EXCP-SW were to contain X'00' initially? I understand that PFD results in increased efficiency, but does that mean data exceptions are not handled at run time?
Many Thanks
Ram |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12372 Topics: 75 Location: San Jose
|
|
Back to top |
|
|
rrv Beginner
Joined: 01 Nov 2004 Posts: 19 Topics: 6
|
Posted: Thu Nov 11, 2004 2:36 pm Post subject: |
|
|
Kolusu
Thanks for your response. That explains it all.
Regards
Ram |
|
Back to top |
|
|
|
|