The following is the code used to create the view.
create view lettsource as select t1.*, t2.send_letter from scellclient t1, sendlett t2
where ((#Date - t1.firstletter >1) and (#Date - t1.firstletter <=5) OR
(t1.followupletter1 = .#DATE)) AND t1.dateofc is null
PAUSE 3 USING "Looking for letters..."
select Count(*) into vexists from lettsource
if vexists = 0 then
pause 1 using "No First Follow-Up Letters Due."
else
pause 1 using "First Follow-Up Letters Found. Go to 'Edit Addresses' if
necessary."
endif
break
================================================
TO SEE MESSAGE POSTING GUIDELINES:
Send a plain text email to [EMAIL PROTECTED]
In the message body, put just two words: INTRO rbase-l
================================================
TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED]
In the message body, put just two words: UNSUBSCRIBE rbase-l