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

Reply via email to