Jim,
I always do it like Razzak does below but with one minor alteration:
SET VAR vCols = (int(.vColsTXT))
The CHOOSE command always returns a text value. Theoretically they
should both work, but I have never had a problem doing it my way. Maybe it
will help solve your problem. If you continue to have problems, then make
sure your sytax is good (things like CAPTION before TITLE- it appears
okay in your example) and check your where clause for validity. Perhaps
vTblId is not an integer data type?- this would also cause your problem.
Best regards,
Mike Young
On Thu, 19 Jul 2001 14:23:31 -0400, A. Razzak Memon wrote:
>
>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.
>==================================-====================
=========
>
