Re: CICS Problem

Is it possible that your program is just running
into the paragraph? EG if
coming from a section, it will execute everything
till the next section
unless you specify the THRU portion of the Perform
command.

JP
Bank of Ireland - Enterprise Solutions & Services.
t:+353 (0)1 4804573
f:+353 (0)1 6040301

Bank of Ireland incorporated in Ireland with Limited
Liability.
Registered Office - Head Office, Lower Baggot
Street, Dublin 2. Registered
Number - C-1
Bank of Ireland is regulated by the Financial
Regulator in Ireland and
authorised by the Financial Services Authority in
the UK.
Security Classification - Amber Confidential to Bank
of Ireland Group Staff
and authorised third parties ; Not for further
distribution.






Harold Bearce


<hlbearce@rabinnovativeso
To: COBOL Programming on the iSeries/AS400
<cobol400-l@xxxxxxxxxxxx>
ftware.com>
cc:

Sent by:
Subject: Re: [COBOL400-L] CICS Problem

cobol400-l-bounces@midran


ge.com








28/01/2008 16:39


Please respond to COBOL


Programming on the


iSeries/AS400












That is the logical place to check the values.\

Scott Lindstrom <SLindstrom@xxxxxxxxxx> wrote:
Can you display the contents of ACEMPNOI and
WS-COMM-BEGIN after the ELSE
just to confirm what you think is true?

Scott Lindstrom
Unix and AS/400 Technical Support
847 482 7602



.net>
Sent by: To
cobol400-l-bounce "'COBOL Programming on the
s@xxxxxxxxxxxx iSeries/AS400'"

cc
01/27/2008 08:05
PM Subject
[COBOL400-L] CICS Problem

Please respond to
COBOL Programming
on the
iSeries/AS400
nge.com>






I'm a very new CICS programmer, and I'm running into
a problem.

I'm trying to compare two data items. Both are PIC
X(09). Both will
contain numbers, though.

At one point in the CICS program, I have:

IF ACEMPNOI = WS-COMM-BEGIN
NEXT SENTENCE
ELSE
PERFORM 1100-START-BROWSE THRU 1100-EXIT.

The problem is, the Else branch always triggers when
the program reaches
this statement, as though the two data values are
different, even when I
can
verify that they are not.

ACEMPNOI is the field that receives the account
number from the CICS map.
WS-COMM-BEGIN is the field in the DFHCOMMAREA that
contains the last
ACEMPNOI that was searched on. I save it to this
COMMAREA data item
whenever the program executes a successful STARTBR.

What am I doing wrong here?

Any advice would be appreciated.

Thanks.

Lora

--
This is the COBOL Programming on the iSeries/AS400
(COBOL400-L) mailing
list
To post a message email: COBOL400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:

or email: COBOL400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the
archives
at http://archive.midrange.com/cobol400-l.



--
This is the COBOL Programming on the iSeries/AS400
(COBOL400-L) mailing
list
To post a message email: COBOL400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:

or email: COBOL400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the
archives
at http://archive.midrange.com/cobol400-l.




Harold Bearce
--
This is the COBOL Programming on the iSeries/AS400
(COBOL400-L) mailing
list
To post a message email: COBOL400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:

or email: COBOL400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the
archives
at http://archive.midrange.com/cobol400-l.



<PRE>
**************************
</PRE>
This email and any files transmitted with it are
confidential and intended solely for the use of the
individual or entity to whom they are addressed. If
you

This is the COBOL Programming on the iSeries/AS400
(COBOL400-L) mailing list
To post a message email: COBOL400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:

or email: COBOL400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the
archives
at http://archive.midrange.com/cobol400-l.