At 02:51 PM 4/24/2013, James Bentley wrote:
Where to imbed eep commands?
I have a form "EdMbrInformation"
that contains multiple tabs as part of a Parent/Child
table structure.
Parent table "MbrRegister" linking key MbrNumber
Subordinate tables:
MbrCurHomeInfo
MbrCurWorkInfo
MbrEmailInfo
MbrFaceBookInfo
MbrLinkedInInfo
MbrComment
on each Panel Page there are six "bit" buttons
Close
Cancel
Refresh
Save
Delete
Add
For any MbrNumber each of the Child Tables may contain
0,1, or many rows.
Depending on whether the form mode is Enter/Edit/Browse
certian buttons need to be ENABLED or disabled
For example
If the Child table contains 0 rows
Disable the Delete Button
Enable the Add Button
I have devised the following code.
---
SELECT COUNT(*) INTO FvMbrCmtCount FROM MbrCommentInfo WHERE
MbrNumber=.FvMbrRegMbrNumber
PROPERTY EGBMbrCmt_close ENABLED 'TRUE'
PROPERTY EGBMbrCmt_cancel ENABLED 'TRUE'
PROPERTY EGBMbrCmt_refresh ENABLED 'TRUE'
SWITCH(.RBTI_FORM_MODE)
CASE 'ENTER'
PROPERTY EGBMbrCmt_save ENABLED 'TRUE'
PROPERTY EGBMbrCmt_delete ENABLED 'FALSE'
PROPERTY EGBMbrCmt_add ENABLED 'FALSE'
BREAK
CASE 'EDIT'
PROPERTY EGBMbrCmt_save ENABLED 'TRUE'
IF FvMbrCmtCount = 0 THEN
PROPERTY EGBMbrCmt_delete ENABLED 'FALSE'
PROPERTY EGBMbrCmt_add ENABLED 'TRUE'
ELSE
PROPERTY EGBMbrCmt_delete ENABLED 'TRUE'
PROPERTY EGBMbrCmt_add ENABLED 'FALSE'
ENDIF
BREAK
CASE 'BROWSE'
PROPERTY EGBMbrCmt_refresh ENABLED 'FALSE'
PROPERTY EGBMbrCmt_save ENABLED 'False'
PROPERTY EGBMbrCmt_delete ENABLED 'False'
PROPERTY EGBMbrCmt_add ENABLED 'FALSE'
BREAK
DEFAULT
BREAK
ENDSW
RETURN
My question is where should I embed the code?
* Table: ON ROW ENTRY
* Panel: ON TAB CHANGE
* Other location(s)
James,
If the goal is to execute that common code dynamically, based upon several
conditions, I recommend to define a "Custom Form Action" and then recall
that form action on demand using PROPERTY RBASE_FORM_ACTION actionname ' '
as Custom EEP for all possible scenarios.
Hope that helps!
Very Best R:egards,
Razzak
www.rbase.com
www.facebook.com/rbase
