Dennis, Thanks. That worked. Funny I thought of that, but if I used a SELECT it worked so I thought it was weird that the cursor would fail.
Jan -----Original Message----- From: Dennis McGrath <[email protected]> To: [email protected] (RBASE-L Mailing List) Date: Fri, 18 Jun 2010 12:01:26 -0500 Subject: [RBASE-L] - Re: What is wrong with this code... Make sure vInvoice is datatyped the same as Invoice# Dennis McGrath From: [email protected] [mailto:[email protected]] On Behalf Of jan johansen Sent: Friday, June 18, 2010 11:56 AM To: RBASE-L Mailing List Subject: [RBASE-L] - Re: What is wrong with this code... OK Rockstars, This is the 7.6 database that I needed to retype a column from INTEGER to NUMERIC (14,0). I have a weird problem I'm trying to trouble shoot. Basically there are rows in the sales table where Invoice# = .vInvoice. However when I run a cursor through it, the fetch fails. I'm scratching my head over this one. This code is very simplified just for troubleshooting. SET ERROR MESSAGE 705 OFF DROP CURSOR c1 SET ERROR MESSAGE 705 ON DECLARE c1 CURSOR FOR SELECT DELDATE,CUSTNO + FROM SALES + WHERE INVOICE# = .vInvoice OPEN c1 FETCH c1 INTO + vDELDATE INDIC ivDELDATE, + vCUSTNO INDIC ivCUSTNO WHILE SQLCODE <> 100 THEN -- Do what you have to do FETCH c1 INTO + vDELDATE INDIC ivDELDATE, + vCUSTNO INDIC ivCUSTNO ENDWHILE DROP CURSOR c1 RETURN Any ideas? Jan -----Original Message----- From: "Victor Timmons" <[email protected]> To: [email protected] (RBASE-L Mailing List) Date: Fri, 18 Jun 2010 09:40:19 -0700 Subject: [RBASE-L] - Re: What is wrong with this code... AMEN TO THAT BROTHER. When ever my users call me that is the first thing I ask them to do. I would say well over 90% of the time that fixes the problem and I get to be a rock star. Victor Timmons Tiz's Door Sales, Inc Visit us at www.tizdoors.com P Please consider the environment before printing this e-mail -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of Dennis McGrath Sent: Friday, June 18, 2010 9:16 AM To: RBASE-L Mailing List Subject: [RBASE-L] - Re: What is wrong with this code... The first rule of troubleshooting is "do the easiest tests first" Add to this the Windows penchant for getting it's panties in a knot (a British colloquialism I picked up), and the easiest first test is a restart. My users now do that first (after getting asked the question countless times) before they call me. They know I will ask! Dennis McGrath -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of Javier Valencia Sent: Friday, June 18, 2010 10:56 AM To: RBASE-L Mailing List Subject: [RBASE-L] - Re: What is wrong with this code... Tried that too with no luck. Today, after a computer re-start the code, with no changes, seems to be working correctly. Javier, Javier Valencia, PE 913-829-0888 Office 913-915-3137 Cell 913-649-2904 Fax [email protected] -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of Ben Petersen Sent: Friday, June 18, 2010 8:41 AM To: RBASE-L Mailing List Subject: [RBASE-L] - Re: What is wrong with this code... Shouldn't the text be enclosed in single quotes? SET VAR v_date TEXT = ('''+.vmonth + ', ' +(CTXT(IYR(.vinc_date)))+''') Ben On Thu, Jun 17, 2010 at 11:26 PM, Javier Valencia <[email protected]> wrote: > The following code runs correctly on 7.5 ==================== SET > ERROR MESSAGE 2038 OFF drop table Temp_graph1 SET ERROR MESSAGE 2038 > ON CREATE TEMP TABLE `Temp_graph1` + (`labor_sort` INTEGER , + > `labor_date` TEXT 15 , + > `labor_hr_reg` REAL , + > `labor_hr_ot` REAL , + > `labor_hr_2times` REAL , + > `labor_hr_all` REAL ) > > SET VAR vhr_reg_t REAL = 100.0 > SET VAR vhr_ot_t REAL = 100.0 > SET VAR vhr_2times_t REAL = 100.0 > SET VAR vhr_all_t REAL = 300.0 > SET VAR vinc_date DATE = '10/05/2007' > SET VAR vmonth = (TMON(.vinc_date)) > SET VAR v_date TEXT = (.vmonth + ', ' + CTXT(IYR(.vinc_date))) > > INSERT INTO temp_graph1 + > (labor_sort, + > labor_date, + > labor_hr_reg, + > labor_hr_ot, + > labor_hr_2times, + > labor_hr_all) + > VALUES + > (1,.v_date,.vhr_reg_t, .vhr_ot_t, .vhr_2times_t, .vhr_all_t) > > RETURN > ==================== > > The code simply creates a table, defines a few variables and loads > them into > the table. > > When I run the same code on Extreme64 I get the message: > > ERROR - Column labor_date must be a valid TEXT. (122) > > Obviously the variables are the correct type as they are freshly > defined and > verified while tracing. The code has been R:Styled and does not show > any errors. > Can anyone duplicate this issue? > I am running the latest R:Base Extreme 9.0(64) Version 9.0.1.10604 > > Any help will be greatly appreciated. > > Javier, > > Javier Valencia, PE > 913-829-0888 Office > 913-915-3137 Cell > 913-649-2904 Fax > [email protected] > > --- RBASE-L > ================================================ > TO POST A MESSAGE TO ALL MEMBERS: > Send a plain text email to [email protected] > > (Don't use any of these words as your Subject: > INTRO, SUBSCRIBE, UNSUBSCRIBE, SEARCH, REMOVE, SUSPEND, RESUME, > DIGEST, RESEND, HELP) ================================================ > TO SEE MESSAGE POSTING GUIDELINES: > Send a plain text email to [email protected] In the message SUBJECT, > put just one word: INTRO > ================================================ > TO UNSUBSCRIBE: > Send a plain text email to [email protected] In the message SUBJECT, > put just one word: UNSUBSCRIBE > ================================================ > TO SEARCH ARCHIVES: > Send a plain text email to [email protected] In the message SUBJECT, > put just one word: SEARCH-n (where n is the number of days). In the > message body, place any text to search for. > ================================================ > > >
