Steve,

Try this:

SET VAR V1 INTEGER = NULL
SELECT CUSTNUB2 INTO V1 INDICATOR IV1 FROM SPECINSTR WHERE UNITLIST LIKE
'Y%'

IF V1 = .VTHIS_CUSTNUB2 THEN
SET VAR VCHECK_LIST = 'TEST1'
ENDIF

SET VAR V2 INTEGER = NULL
SELECT CUSTNUB2 INTO V2 INDICATOR IV2 FROM SPECINSTR WHERE UNITLIST LIKE
'N%'

IF V2 = .VTHIS_CUSTNUB2 THEN
SET VAR VCHECK_LIST = 'TEST2'
ENDIF

Claudine
________________________________________
From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of Steve Breen
Sent: Saturday, November 08, 2008 10:05 PM
To: RBASE-L Mailing List
Subject: [RBASE-L] - I do not have it right yet, do I ?

-- test command A100808T
-- Set variable vCheck_List
-- Used to remind a user to Check A Spread Sheet for Customer Equipment
Verifcation
-- Major Assumption - var This_CustNub2 is set on form entry
-- This is being used as a entry - exit eep
Clear var vCheck_List
if .vthis_custnub2 = custnub2 in specinstr and UnitList like 'Y' then
set var vCheck_List = 'test1'
if .vthis_custnub2 = custnub2 in specinstr and UnitList like 'N' then
set var vCheck_List = 'test2'
endif

--- RBASE-L
================================================
TO POST A MESSAGE TO ALL MEMBERS:
Send a plain text email to [email protected]

(Don't use any of these words as your Subject:
INTRO, SUBSCRIBE, UNSUBSCRIBE, SEARCH,
REMOVE, SUSPEND, RESUME, DIGEST, RESEND, HELP)
================================================
TO SEE MESSAGE POSTING GUIDELINES:
Send a plain text email to [email protected]
In the message SUBJECT, put just one word: INTRO
================================================
TO UNSUBSCRIBE: 
Send a plain text email to [email protected]
In the message SUBJECT, put just one word: UNSUBSCRIBE
================================================
TO SEARCH ARCHIVES:
Send a plain text email to [email protected]
In the message SUBJECT, put just one word: SEARCH-n
(where n is the number of days). In the message body, 
place any 
text to search for.
================================================


Reply via email to