There is an APAR for this problem with WHEN statements. It is SE28383.
Eric Simpson
WebSphere Development Studio Client for iSeries, IBM Toronto Lab,
D1/140/8200/MKM
Phone: (905) 413-3226, T/L: 969-3226, Fax: (905) 413-4850
Email: esimpson@xxxxxxxxxx
MKirkpatrick@west
erndental.com
Sent by: To
wdsci-l-bounces@m wdsci-l@xxxxxxxxxxxx
idrange.com cc
Subject
04/05/2007 05:02 [WDSCI-L] SHOW BLOCK NESTING action
PM
Please respond to
Websphere
Development
Studio Client for
iSeries
<wdsci-l@midrange
.com>
Using WDSCi 7.0.0.1
Within my BEGSR/ENDSR I have a SELECT with 3 WHEN stmts. I position the
cursor at the BEGSR stmt and press Ctl-Shift-O. An outline starts at the
BEGSR stmt and finishes at the ENDSR stmt. That's fine. A block is also
outlined starting at the SELECT stmt and finishing at the ENDSL stmt.
That's fine. But then a block starts at the first WHEN stmt and finishes
at the next WHEN stmt. And no more nested blocks. Am I misunderstanding
the purpose of this action? Thanks.
| begsr CheckCtlBreak;
| | select;
| | | when cb10 <> cb10Save
| | | or Null10 <> Null10Save;
| | | exsr EndLvl10;
| | | when cb20a <> cb20aSave
| | or Null20a <> Null20aSave
| | or cb20b <> cb20bSave
| | or Null20b <> Null20bSave;
| | exsr EndLvl20;
| | when cb30 <> cb30Save
| | or Null30 <> Null30Save;
| | exsr EndLvl30;
| | endsl;
| endsr;
Michael Kirkpatrick
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.
Unless you are the addressee (or authorized to receive for the addressee),
you may not use, copy or disclose to anyone this email or any information
contained in this email. If you have received this email in error, please
advise the sender by replying to this email, and delete this email
immediately. Please note that any views or opinions presented in this
email are solely those of the author and do not necessarily represent those
of Western Dental Services, Inc. Finally, the recipient should check this
email and any attachments for the presence of viruses. Western Dental
Services, Inc. accepts no liability for any damage caused by any virus
transmitted by this email.
--
This is the Websphere Development Studio Client for iSeries (WDSCI-L)
mailing list
To post a message email: WDSCI-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/wdsci-l
or email: WDSCI-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
http://archive.midrange.com/wdsci-l.
midrange.com
