I have never used an IF where the right hand side of the comparison does a
look up. I would be surprised if that is legal (I might well be wrong
there.) You may try doing the lookup first. eg
SET VAR vtcols INTEGER = sys_column_id IN sys_columns +
WHERE sys_column_name = 'ordbudgt'
IF vcols = .vtcols THEN
----- Original Message -----
From: "J. Andrus" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, July 20, 2001 3:18 AM
Subject: RE: Error on a blank line - Razzak's Reply
> Razzak,
>
> Making the changes you suggest below resulted in same error message,
> "Break in file EditOrd.rmd at line 118 for -ERROR- invalid INTEGER value
> (2418)", again at the blank line preceding the IF command.
>
> I even tried NOT using the SET VAR vColsTXT TEXT = NULL (since I thought
> variables used in CHOOSE were not to be predefined) while leaving the SET
> VAR vCols INTEGER = NULL and the SET VAR vCols = .vColsTXT you suggested
in.
> Again the same error occurred at the blank line preceding the IF command.
>
> As before, at the point of error, all variables are of the correct data
> type particularly vcols as INTEGER used in the IF statement as follows:
> IF vcols = sys_column_id IN sys_columns WHERE sys_column_name = 'ordbudgt'
> THEN
>
> Also, vtblid contains the correct ID for TORD, the correct table.
>
> Any other thoughts?
> TIA
> Jim
>
> > -----Original Message-----
> > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
> > Behalf Of A. Razzak Memon
> > Sent: Thursday, July 19, 2001 2:24 PM
> > To: [EMAIL PROTECTED]
> > Subject: Re: Error on a blank line - Razzak's Reply
> >
> > Jim,
> >
> > I would suggest to use two separate variables, i.e,
> > variable with TEXT data type for CHOOSE command and
> > then variable with INTEGER data type to convert the
> > retrieved value from CHOOSE.
> >
> > Try the following example:
> >
> > SET VAR vColsTXT TEXT = NULL
> > SET VAR vCols INTEGER = NULL
> >
> > CLS
> > CHOOSE vColsTXT FROM #VALUES +
> > FOR Sys_Comment, Sys_Column_Id FROM Sys_Columns +
> > WHERE Sys_Table_Id = .vTblId AT 10 CENTER +
> > TITLE 'Press [Enter] or Click to select or [Esc] to exit.' +
> > CAPTION 'Select The Search Field' FORMATTED
> >
> > IF vColTXT IS NULL OR vColTXT = '[Esc]' THEN
> > GOTO Done
> > ENDIF
> >
> > SET VAR vCols = .vColsTXT
> >
> > You may also want to check the validity of vTblID before
> > using the CHOOSE command.
> >
> > Enjoy and make sure to have fun!
> >
> > Very Best Regards,
> >
> > Razzak.
> >
> > At 01:47 PM 7/19/2001 -0400, J. Andrus wrote:
> >
> > >Using Trace, the coding below results in the error - "Break in file
> > >EditOrd.rmd at line 116 for - ERROR- Invalid INTEGER value (2418)"..
> >
> > >--Select a column to identify the order to edit
> > >CHOOSE vcols FROM #VALUES FOR sys_comment, sys_column_id FROM
> > sys_columns +
> > >WHERE sys_table_id = .vtblid AT 10 CENTER TITLE 'Press [Enter]
> > or Click to
> > >select or [Esc] to exit.' CAPTION 'Select The Search Field'
> > >SET VAR vcols INT = .vcols
> >
> > ===================================-============================
> > R:BASE Developers's Conference: http://www.rbase.com/conference
> > Official R:BASE List Server: mailto:[EMAIL PROTECTED]
> > RBTI Events/Training: http://www.rbase2000.com/events
> > R:DCC Members: http://www.rbase2000.com/rdcc
> > ================================================================
> > R:BASE, Oterro & R:Tango are registered trademarks of RBTI.
> > ==================================-=============================
> >
>
