John Minyo helped me to develop a procedure I use where I want to "edit using formname" if data exists, else "enter formname" if no data.
In the on before start eep add: Set v isformstarted text = 'No' In the on after start eep add: Set v isformstarted text = 'Yes' Then in your code you can: Set v isformstarted text = null Edit using formname where . If isformstarted = 'No' then Enter using formname Endif Kenny From: [email protected] [mailto:[email protected]] On Behalf Of A.G. IJntema Sent: Thursday, December 23, 2010 2:42 AM To: RBASE-L Mailing List Subject: [RBASE-L] - RE: error var If the selection is empty you'll get a warning (2059) not an error. I think there is a difference between them and that's why the errvar stays 0. Personally I would solve this in another way. First you can calculate if there are any rows available (select count(*)) and if so the use Edit using Hope this helps Tony From: [email protected] [mailto:[email protected]] On Behalf Of J BLAUSTEIN Sent: donderdag 23 december 2010 2:17 To: RBASE-L Mailing List Subject: [RBASE-L] - error var I am using the below code where there is no records available - I assume that the error var would not = 0 - I am using the latest version of 9.0 64 - ??? set error var verr edit usi A9_21ADDRESS where ALASTN contain .vlastname set v verr1 = .verr set err var off if verr1 <> 0 then -- J. Blaustein J Blaustein Associates, Inc. 12 Herrick Drive Lawrence, NY 11559 516-371-3445 FAX 516-345-8009
