Also, in addition to R:azzak's excellent explanation, if you want to use the form just to look at data without edit privileges use: BROWSE USING your_form_name WHERE your_where_clause ORDER BY your_order_clause Javier,
Javier Valencia, PE President Valencia Technology Group, L.L.C. 14315 S. Twilight Ln, Suite #14 Olathe, Kansas 66062-4578 Office (913)829-0888 Fax (913)649-2904 Cell (913)915-3137 ================================================ Attention: The information contained in this message and or attachments is intended only for the person or entity to which it is addressed and may contain confidential and/or privileged material. Any review, retransmission, dissemination or other use of, or taking of any action in reliance upon, this information by persons or entities other than the intended recipient is prohibited. If you received this in error, please contact the sender and delete the material from all system and destroy all copies. ====================================================== -----Original Message----- From: [email protected] [mailto:[EMAIL PROTECTED] Behalf Of A. Razzak Memon Sent: Friday, May 27, 2005 2:32 PM To: RBG7-L Mailing List Subject: [RBG7-L] - Re: making a form to be use only in edit mode orenter mode At 03:07 PM 5/27/2005, J Blaustein wrote: >How do I make a form usable only in a edit or enter mode? J, Take a look at the following forms using the appropriate RBG7 version: Using R:BASE 7.1 for Windows: Database: RRBYW9 Forms: Contacts, Customers, Employees, Products Application: RUN RRBYW9.DAT Using R:BASE 7.5 for Windows: Database: RRBYW10 Forms: Contacts, Customers, Employees, Products Application: RUN RRBYW10.DAT Using R:BASE V-8 "Turbo" Database: RRBYW12 Forms: Contacts, Customers, Employees, Products Application: RUN RRBYW12.DAT Notice that the same form, such as Customers, is used for ENTERing, EDITing and BROWSing. All custom DB navigation buttons such as First, Previous, Next, Last, Add, Delete, Save, Cancel, and Close along with the appropriate Enhanced Tab Page Caption are handled accordingly using the PROPERTY command, embedded as "On After Start EEP" as following: -- Start PROPERTY RBASE_FORM DONTSHOWSAVEDIALOG 'TRUE' PROPERTY RBASE_FORM DONTSHOWDELETEDIALOG 'TRUE' PROPERTY RBASE_FORM TOP 180 PROPERTY RBASE_FORM LEFT 390 SWITCH (.vMode) CASE 'ENTER' PROPERTY EnhancedTab_Page0 CAPTION 'New Customer' PROPERTY EGB_First ENABLED 'FALSE' PROPERTY EGB_Prev ENABLED 'FALSE' PROPERTY EGB_Next ENABLED 'FALSE' PROPERTY EGB_Last ENABLED 'FALSE' PROPERTY EGB_Add ENABLED 'FALSE' PROPERTY EGB_Del ENABLED 'FALSE' PROPERTY DBEdit_Company SET_FOCUS 'TRUE' BREAK CASE 'EDIT' PROPERTY EnhancedTab_Page0 CAPTION 'Existing Customer' PROPERTY EGB_First ENABLED 'FALSE' PROPERTY EGB_Prev ENABLED 'FALSE' PROPERTY EGB_Next ENABLED 'FALSE' PROPERTY EGB_Last ENABLED 'FALSE' PROPERTY EGB_Add ENABLED 'FALSE' PROPERTY EGB_Save SET_FOCUS 'TRUE' BREAK CASE 'VIEWALL' PROPERTY EnhancedTab_Page0 CAPTION 'Existing Customers' PROPERTY DBComboBox_PaymentTerms ENABLED 'FALSE' PROPERTY EGB_Add ENABLED 'FALSE' PROPERTY EGB_Del ENABLED 'FALSE' PROPERTY EGB_Save ENABLED 'FALSE' PROPERTY EGB_Cancel ENABLED 'FALSE' PROPERTY EGB_Next SET_FOCUS 'TRUE' BREAK DEFAULT BREAK ENDSW RETURN -- End The required variable "vMode" is SET at the application menu level. Example: To Enter New Customer: SET VAR vMode TEXT = 'ENTER' ENTER USING Customers To Edit Existing Customers: SET VAR vMode TEXT = 'EDIT' EDIT USING Customers WHERE ... To View All Existing Customers: SET VAR vMode TEXT = 'VIEWALL' BROWSE USING Customers WHERE ... For complete details, take a look at the entire application bundled with RBG7, RBG75 and RBG8. Hope that helps! Very Best R:egards, Razzak.
