Search & Select returning values to multiple Forms Controls

[Frosty the Coder]

List,

I have a search & select over a table w/a two-part key.

The FORMS DATA STRUCTURE for that Search/Select shows both
parts of the key.

W/in a FIX/INSPECT, I reference this SEARCH/SELECT on the
two diff forms controls that comprise the key.

Can I have the visual assist return BOTH key values into
their appropriate FORMS CONTROLS?

TIA

Gene

Gene Piekarski, Jr

AS/400, B733, SP11.2, NT client
AS/400, B733, SP14, W2000 client
XE, SP15.1

 

[Zoltan_Gyimesi]

Hi Gene (again),

Briefly:
Yes, you can do everything.

Keywords are:
"Visual Assist Button Clicked" event + "Suppress Default Visual Assist Form" system function (General Category)

Steps:
1.) Define any dummy Visual Assist Form over your control.
2.) Issue "Suppress Default Visual Assist Form" system function call in the "Visual Assist Button Clicked" event of the control.
3.) Call your custom Search'n Select form. Pass to/back as many parameters to/from it as you wich and if there is any then add the remaining part of your logic to the ER.

Really hope, "Visual Assist Button Clicked" event + "Suppress Default Visual Assist Form" system function (General Category) exist on your system too (they didn't in B7321).

Please, keep us informed! Thanks!

Good luck,

Zoltán

B7332 SP11, ESU 4116422, Intel NT4, SQL 7 SP1
(working with B7321, B7331, XE too)

 

[Zoltan_Gyimesi]

Hi Gene,

You can find something similar suggestion as my previous reply on the Tips & Traps board of the Forum.

Subject: SEARCH & SELECT VISUAL ASSIST ON CONTROLS WITH DIF
Sender: Zoltan_Gyimesi
Date/Time: 12/15/00 09:37 AM

Regards,

Zoltán

B7332 SP11, ESU 4116422, Intel NT4, SQL 7 SP1
(working with B7321, B7331, XE too)

 

[Frosty the Coder]

I'd seen your Tips/Traps entry when searching this out
but had not put forth the mental effort to relate it to what
I was hoping to do.

I will give your approach a shot & keep you posted as
to how it works.

Thanks (again and again...)

Gene



Gene Piekarski, Jr

AS/400, B733, SP11.2, NT client
AS/400, B733, SP14, W2000 client
XE, SP15.1