Warning while running app - West Wind Technologies Support

FoxInCloud

Warning while running app

Warning while running app
Michele
thn@foxincloud.com

Sep 18, 2014 @ 05:04am

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

awapphost.warning Awhtmlgen.o_pageframe1.opage1.ousr.ocontrol_aclass(): Class '_combobox_tagen' can't be instantiated standalone: Method or procedure init(): error #10 ("Syntax error.") at code line #12 ("Select Code,Des1 From Tagen Where Tipo = cTable Order By Code Into Cursor (cTable) ReadWrite")

Re: Warning while running app
FoxInCloud Support - Thierry N.
Michele

45Z0CLMZR

Sep 18, 2014 @ 05:52am

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

-- thn (FoxInCloud)

Re: Warning while running app
Michele
Thierry Nivelet (FoxInCloud)

45Z0F76AJ

Sep 18, 2014 @ 07:05am

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

Re: Warning while running app
FoxInCloud Support - Thierry N.
Michele

45Z0FI4DB

Sep 18, 2014 @ 07:13am

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

-- thn (FoxInCloud)

Re: Warning while running app
Michele
Thierry Nivelet (FoxInCloud)

45Z0FO9PZ

Sep 18, 2014 @ 07:18am

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

Re: Warning while running app
FoxInCloud Support - Thierry N.
Michele

45Z0FT585

Sep 18, 2014 @ 07:22am

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

-- thn (FoxInCloud)

Re: Warning while running app
Michele
Thierry Nivelet (FoxInCloud)

45Z0H1DL4

Sep 18, 2014 @ 07:56am

In one form i have one only combobox, but the Init() of this combo was called three times and one of these had This.TipoTab = "". Now i test This.TipoTab and when empty i skip all the code in the Init()......
At the moment it seems ok. Have you other suggests ?

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

Re: Warning while running app
Michele
Michele

45Z0HR1NS

Sep 18, 2014 @ 08:16am

Another problem. Always with some combo.....In one form a i have on of these combo (linked to Tagen.dbf). I can select it and see all the values in it. I select a value and it is shown correctly. Whan i try to save data in the combo.value i have no value....even if i selected a record.....the same problem if i put in my form other combos.....

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

Re: Warning while running app
FoxInCloud Support - Thierry N.
Michele

45Z0J0J4Y

Sep 18, 2014 @ 08:52am

that's normal: when it generates the HTML, in order to get the visual characteristics at each level of class (and build the css accordingly), FoxInCloud instantiates each class, using createObject() - so the class.init() must be able to run even if the class is not used in a form.

If an error occurs during this, probably in class.init(), you get a warning "Class 'xxx' can't be instantiated standalone"

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

-- thn (FoxInCloud)

Re: Warning while running app
FoxInCloud Support - Thierry N.
Michele

45Z0J24ZX

Sep 18, 2014 @ 08:53am

do you have combo.boundTo and .controlSource?

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

-- thn (FoxInCloud)

Re: Warning while running app
Michele
Thierry Nivelet (FoxInCloud)

45Z0JM6FI

Sep 18, 2014 @ 09:09am

Combo.BoundTo = .F.
Combo.ControlSource = ""

In these forms i always work without controlsource on controls....

do you have combo.boundTo and .controlSource?

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

Re: Warning while running app
FoxInCloud Support - Thierry N.
Michele

45Z15YV6A

Sep 18, 2014 @ 07:34pm

i would try
Combo.BoundTo = .T.

Combo.BoundTo = .F.
Combo.ControlSource = ""

In these forms i always work without controlsource on controls....

do you have combo.boundTo and .controlSource?

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

-- thn (FoxInCloud)

Re: Warning while running app
Michele
Thierry Nivelet (FoxInCloud)

46000ZFVF

Sep 19, 2014 @ 12:27am

Nothing changes....The particular thing is that in other forms the same controls works...

i would try
Combo.BoundTo = .T.

Combo.BoundTo = .F.
Combo.ControlSource = ""

In these forms i always work without controlsource on controls....

do you have combo.boundTo and .controlSource?

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

Re: Warning while running app
FoxInCloud Support - Thierry N.
Michele

46001WTYR

Sep 19, 2014 @ 12:53am

no javascript error?

Nothing changes....The particular thing is that in other forms the same controls works...

i would try
Combo.BoundTo = .T.

Combo.BoundTo = .F.
Combo.ControlSource = ""

In these forms i always work without controlsource on controls....

do you have combo.boundTo and .controlSource?

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

-- thn (FoxInCloud)

Re: Warning while running app
Michele
Thierry Nivelet (FoxInCloud)

4600334WX

Sep 19, 2014 @ 01:26am

If i open firebug i don't see errors....

no javascript error?

Nothing changes....The particular thing is that in other forms the same controls works...

i would try
Combo.BoundTo = .T.

Combo.BoundTo = .F.
Combo.ControlSource = ""

In these forms i always work without controlsource on controls....

do you have combo.boundTo and .controlSource?

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

Re: Warning while running app
FoxInCloud Support - Thierry N.
Michele

463087QXI

Sep 22, 2014 @ 03:49am

Fixed by remote support.

If i open firebug i don't see errors....

no javascript error?

Nothing changes....The particular thing is that in other forms the same controls works...

i would try
Combo.BoundTo = .T.

Combo.BoundTo = .F.
Combo.ControlSource = ""

In these forms i always work without controlsource on controls....

do you have combo.boundTo and .controlSource?

OK thanks
if you have a syntax error it means that some of the terms in the SQL-select is incorrect
could you set step on just before the SELECT and see what can be wrong?
Thanks

TaGen.DBF is a table that contains different codes...In This.TipoTab i have a 2 characters string that is necessary to select only the requested records in TaGen.DBF...

what do you have in This.TipoTab?

DoDefault()This.CursorName = This.TipoTab + Sys(3)
cTable = This.CursorName
lUsed  = Used("TaGen")
If !lUsed
	=Use("TaGen")
Else
	nRec = Recno("TaGen")
EndIf
Select Code,Des1 From Tagen Where Tipo = This.TipoTab Order By Code Into Cursor (cTable) ReadWrite
*!*Insert Into (cTable) (Des1) Values ("")
Index On Code Tag Code
This.RowSourceType  = 6
This.RowSource      = cTable + ".Des1,Code"
This.BoundColumn    = 2
This.FirstElement   = 1
If !lUsed
	Use In TaGen
Else
	=Go(nRec,"TaGen")
EndIf
This.Refresh

can you post _combobox_tagen.Init() full code?

What is wrong ? In my logo i have this warning every time i use a combobox....The app works fine and even all my comboboxes

-- thn (FoxInCloud)