|
GetMACAddr
|
|
| Practically, this new (GETVAL('GetMACAddr','n')) function can be used to customize access to your R:BASE Turbo V-8 for Windows Applications. Consequently, you can use this function to customize the properties of any control and/or settings of form using the PROPERTY command based on unique MAC address of workstation.
|
| Assuming your application includes 6 main menu options, namely Customers, Contacts, Employees, Products, Sales, Quarterly Sales Reports, General Inquiry (Read Only) with Component IDs MM_Customers, MM_Contacts, MM_Employees, MM_Products, MM_Sales, MMQuarterlyReports, MM_GeneralInquiry accordingly.
|
|
|
| In a secure work environment, suppose only one workstation or notebook can have access to all menus with MAC address 00-0D-43-2B-D6-B4 and everyone else can only access to General Inquiry (Read Only) menu.
|
|
|
| If you would like to disable Customers, Contacts, Employees, Products, Sales and Quarterly Sales Report menus to all except the workstation or notebook with the MAC address 00-0D-43-2B-D6-B4, then here's an example to use as embedded Custom EEP in "On After Start EEP" option of form properties:
|
|
|
| IF (GETVAL('GetMACAddr','1')) <> '00-0D-43-2B-D6-B4' THEN
|
| PROPERTY MM_Customers ENABLED 'FALSE'
|
| PROPERTY MM_Contacts ENABLED 'FALSE'
|
| PROPERTY MM_Employees ENABLED 'FALSE'
|
| PROPERTY MM_Products ENABLED 'FALSE'
|
| PROPERTY MM_Sales ENABLED 'FALSE'
|
| PROPERTY MM_QuarterlyReports ENABLED 'FALSE'
|
| ENDIF
|
| RETURN
|
|
|
| If you would like to hide Customers, Contacts, Employees, Products, Sales and Quarterly Sales Report menus to all except the workstation or notebook with the MAC address 00-0D-43-2B-D6-B4, then here's an example to use as embedded Custom EEP in "On After Start EEP" option of form properties:
|
|
|
| IF (GETVAL('GetMACAddr','1')) <> '00-0D-43-2B-D6-B4' THEN
|
| PROPERTY MM_Customers VISIBLE 'FALSE'
|
| PROPERTY MM_Contacts VISIBLE 'FALSE'
|
| PROPERTY MM_Employees VISIBLE 'FALSE'
|
| PROPERTY MM_Products VISIBLE 'FALSE'
|
| PROPERTY MM_Sales VISIBLE 'FALSE'
|
| PROPERTY MM_QuarterlyReports VISIBLE 'FALSE'
|
| ENDIF
|
| RETURN
|