OpenEuphoria

Error message

• Posted by jondolar <lavigne.s at videotron.ca> Aug 12, 2003
• 385 views

I'm using Meditor and the folowing message appears often...sequence 
found inside character string. The ex.err file gives a lot of 
information for someone who khows what to look for (I don't 
unfortunately :(
Here is part of the ex.err file (skipping all the included info etc)

C:\EUPHORIA\AAA_TEST\SLDBTest.exw:34
sequence found inside character string 

 C:\EUPHORIA\AAA_TEST\database.e:
	current_db = 3
	current_table = 23
	db_names = {
				 {97'a',97'a',97'a',46'.',101'e',100'd',98'b'}
			   }
	db_file_nums = {3}
	db_lock_methods = {0}
	current_lock = 0
	key_pointers = {461}
	db_fatal_id = 0
	mem = 609896

 C:\EUPHORIA\AAA_TEST\SLDBTest.exw:
	fname = {
			  {
				{66'B',111'o',98'b'},
				1
			  },
			  {
				{87'W',97'a',108'l',116't',101'e',114'r'},
				2
			  },
			  {
				{80'P',97'a',117'u',108'l'},
				3
			  },
			  {
				{65'A',108'l',98'b',101'e',114'r',116't'},
				4
			  },
			  {
				{67'C',104'h',114'r',105'i',115's'},
				5
			  }
			}
	data1 = {
			  {74'J',97'a',99'c',107'k'},
			  6
			}
	data2 = {
			  {74'J',97'a',99'c',107'k'},
			  6,
			  {
				{
				  {66'B',111'o',98'b'},
				  1
				},
				{
				  {87'W',97'a',108'l',116't',101'e',114'r'},
				  2
				},
				{
				  {80'P',97'a',117'u',108'l'},
				  3
				},
				{
				  {65'A',108'l',98'b',101'e',114'r',116't'},
				  4
				},
				{
				  {67'C',104'h',114'r',105'i',115's'},
				  5
				}
			  }
			}
	wk = 13
	result = 0
	i = 3

The following is the actual code.

include get.e
include misc.e
include sort.e
include database.e

sequence fname, data1, data2
integer wk, result

result = db_create("aaa",DB_LOCK_NO) 
	if result = -2 then
	   result = db_open("aaa",DB_LOCK_NO)
	end if
printf(1,"%d",result)	
wk = wait_key()

result = db_create_table("tbl1")
	if result = -2 then
	result = db_select_table("tbl1")
	end if
printf(1,"%d",result)
wk = wait_key()

fname = ({{"Bob",1},{"Walter",2},{"Paul",3},{"Albert",4},{"Chris",5}})
result = db_insert(1,{"Jack",6})
data1 = db_record_data(1)
data2 = append(data1,fname)
for i = 1 to length(data2) do
	printf(1,"%s",data2[i]) 
end for 
wk = wait_key() 
db_replace_data(1,data2)

Can anybody point me in the right direction

TIA

Serge Lavigne