Thanks, Doug, it _should_ be impossible but point taken and about to be
implemented.
Regards,
Alastair.
From: Doug Hamilton
Sent: Friday, June 11, 2010 3:22 PM
To: RBASE-L Mailing List
Subject: [RBASE-L] - RE: EEP Switch/Endsw problem (v9.0_32)
Alastair, in addition to Dennis' suggestion, you may want to add a DEFAULT
block before the ENDSW to catch the rare instance when vNameTitle is not 'Name'
or 'Title'.
PROPERTY VID_vSelName ENABLED 'FALSE'
IF vTitleType = 'TrackTitle' THEN
PROPERTY RBID_SortTitle ENABLED 'FALSE'
ELSE
PROPERTY RBID_SortTitle ENABLED 'TRUE'
ENDIF
BREAK
DEFAULT
--error message or action if vNameTitle is not Name or Title
BREAK
ENDSW
Doug
Dennis McGrath wrote:
Before pressing F10 on the switch line, try to add a watch on vNameTitle.
I venture to say it is not there or is misspelled or is not a text variable.
Dennis McGrath
----------------------------------------------------------------------------
From: [email protected] [mailto:[email protected]] On Behalf Of Alastair
Burr
Sent: Friday, June 11, 2010 7:24 AM
To: RBASE-L Mailing List
Subject: [RBASE-L] - EEP Switch/Endsw problem (v9.0_32)
I have an EEP which used to work in v7.6 but is giving me an error in v9.
I have Traced and R:Styled endlessly this morning but to no avail - there
just doesn't seem to be anything wrong and I have run out of ideas of what else
to look for.
The first error message is the usual Endwhile, Endsw or Endif missing in
input file (462)
After clearing that I get what seems contradictory: No While, Switch or If
blocks are open on current input source (466)
This is the relevant block of code:
--
---------------------------------------------------------------------------
-- Return the parameters back to the form to build the menu:
--
---------------------------------------------------------------------------
PROPERTY IDGB_EnterChoices VISIBLE 'FALSE'
PROPERTY IDGB_ChoiceMade VISIBLE 'TRUE'
SWITCH (.vNameTitle) -- fails on pressing [F10] on this line?
CASE 'Name'
PROPERTY RBID_NameTitle ENABLED 'FALSE'
PROPERTY RBID_NameType ENABLED 'FALSE'
PROPERTY RBID_TitleType ENABLED 'FALSE'
PROPERTY RBID_SortName ENABLED 'TRUE'
PROPERTY RBID_SortTitle ENABLED 'FALSE'
PROPERTY VID_vSelName ENABLED 'TRUE'
BREAK
CASE 'Title'
PROPERTY RBID_NameTitle ENABLED 'FALSE'
PROPERTY RBID_NameType ENABLED 'FALSE'
PROPERTY RBID_TitleType ENABLED 'FALSE'
PROPERTY RBID_SortName ENABLED 'FALSE'
PROPERTY VID_vSelName ENABLED 'FALSE'
IF vTitleType = 'TrackTitle' THEN
PROPERTY RBID_SortTitle ENABLED 'FALSE'
ELSE
PROPERTY RBID_SortTitle ENABLED 'TRUE'
ENDIF
BREAK
ENDSW
PROPERTY TABLE Temp_MCM_Table 'REFRESH'
PROPERTY CID_vSelId ENABLED 'TRUE'
PROPERTY CID_vSelId SET_FOCUS 'TRUE'
PROPERTY CID_vSelId REFRESHLIST 'TRUE'
PROPERTY CID_vSelId LISTOPEN 'TRUE'
PROPERTY IDI_Image SET_FOCUS 'TRUE'
RETURN
Anybody got any ideas whatmay be going on?
Regards,
Alastair
----------------------------
Alastair Burr
St. Albans, UK.
[email protected]
-----------------------------
------------------------------------------------------------------------------
No virus found in this incoming message.
Checked by AVG - www.avg.com
Version: 9.0.829 / Virus Database: 271.1.1/2931 - Release Date: 06/11/10
07:35:00
