Cleaning up Procedure clutter

[Robert Ameeti]

At 7:38 PM -0700, 3/9/08, George Beauchemin wrote:

>I am not saying the Case Command is the only way to do it but I have 
>used it successfully.
>
>How?

Have all of the buttons call the same procedure, naming it something 
like '.FindRecord'

If the button's name is 'Find First Name' or 'Find Last Name', then ...

.FindRecord's code is

Case Info("Trigger") = "Button.Find First Name"
     ; >Procedure code to Find First Name here<
Case Info("Trigger") = "Button.Find Last Name"
     ; >Procedure code to Find Last Name here<
EndCase

-- 

<><><><><><><><><><><><><><><><><><>
Robert Ameeti

What's another word for Thesaurus?
<><><><><><><><><><><><><><><><><><>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://provue.com/pipermail/qna/attachments/20080309/eadbdfa4/attachment.html