Xailer & OZ Software

Esto:
::oMySQLDataSource1:Execute( "DELETE FROM pernoba WHERE ftoma
>='"+inicio+"' and;
ftoma <= '"+final+"' and resage= '"+rtrim(cValText)+"'" )
Antes se lo comia con patatas. Ahora se le atraganta.
Paco v

Paco,
¿¿ Y cómo se le atraganta ??
Saludos,
José Luis Capel
"Paco V." <ssi-quita-esto@ono.com> escribió en el mensaje
news:4714fff0$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Esto:
> ::oMySQLDataSource1:Execute( "DELETE FROM pernoba WHERE ftoma
> >='"+inicio+"' and;
> ftoma <= '"+final+"' and resage= '"+rtrim(cValText)+"'" )
>
> Antes se lo comia con patatas. Ahora se le atraganta.
>
> Paco v
>

Creo que el problema tiene que ver con el ; del cambio de linea ¿Puede ser?
Compilando Form09.prg...
Form09.prg(354) Error E0002 Unterminated string: '' and +;'
Form09.prg(355) Error E0002 Unterminated string: ' )'
Form09.prg(357) Error E0002 Unterminated string: '' and;'
Form09.prg(358) Error E0002 Unterminated string: ' )'

Paco,
> Creo que el problema tiene que ver con el ; del cambio de linea ¿Puede
> ser?
>
> Compilando Form09.prg...
> Form09.prg(354) Error E0002 Unterminated string: '' and +;'
> Form09.prg(355) Error E0002 Unterminated string: ' )'
> Form09.prg(357) Error E0002 Unterminated string: '' and;'
> Form09.prg(358) Error E0002 Unterminated string: ' )'
Quizás lo que comentó Fredy hace poco sobre la concatenación de cadenas con
; en varias líneas fuera un bug anterior de xHarbour que ahora han corregido
(la verda es que a mí me extrañó mucho que funcionara) y por eso ahora te da
el error. Procura cerrar las cadenas en cada línea, y si lo necesitas
terminas la línea con un + ;
Vamos, que la expresión que has puesto debería ser:
::oMySQLDataSource1:Execute( "DELETE FROM pernoba WHERE ftoma
>='"+inicio+"' and " + ;
"ftoma <= '"+final+"' and resage= '"+rtrim(cValText)+"'" )
fíjate que he añadido las comillas de cierre en la primera línea, y otras
comillas de apertura en la segunda línea.
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

Paco,
Yo estoy utilizando mucho las cláusulas TEXT INTO / ENDTEXT para sentencias
Sql relativamente grandes.
Saludos,
José Luis Capel
PD: ESO ya está en mi ordenador
"Paco V." <ssi-quita-esto@ono.com> escribió en el mensaje
news:471503ef$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Creo que el problema tiene que ver con el ; del cambio de linea ¿Puede
> ser?
>
> Compilando Form09.prg...
> Form09.prg(354) Error E0002 Unterminated string: '' and +;'
> Form09.prg(355) Error E0002 Unterminated string: ' )'
> Form09.prg(357) Error E0002 Unterminated string: '' and;'
> Form09.prg(358) Error E0002 Unterminated string: ' )'
>
>
>
>

Ejemplito "porfi"
PD:Lo quito
Paco V
"José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
news:[email=4715c006@ozsrv2.ozlan.local...]4715c006@ozsrv2.ozlan.local...[/email]
> Paco,
>
> Yo estoy utilizando mucho las cláusulas TEXT INTO / ENDTEXT para
> sentencias Sql relativamente grandes.
> Saludos,
> José Luis Capel
> PD: ESO ya está en mi ordenador
>
> "Paco V." <ssi-quita-esto@ono.com> escribió en el mensaje
> news:471503ef$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Creo que el problema tiene que ver con el ; del cambio de linea ¿Puede
>> ser?
>>
>> Compilando Form09.prg...
>> Form09.prg(354) Error E0002 Unterminated string: '' and +;'
>> Form09.prg(355) Error E0002 Unterminated string: ' )'
>> Form09.prg(357) Error E0002 Unterminated string: '' and;'
>> Form09.prg(358) Error E0002 Unterminated string: ' )'
>>
>>
>>
>>
>
>

Paco,
LOCAL cSelect
TEXT INTO cSelect
SELECT micampo1, micampo2, micampo3 FROM
miTabla INNER JOIN miotratabla ON mitabla.micampo1 =
miotratabla.otrocampo
WHERE micampo1 IN ( SELECT micampo2 FROM otratablacualquiera WHERE
micampo2 = mitabla.micampo1)
ENDTEXT
Lo que hay entre text y endtext es literal. Sin comillas y sin nada.
Si quieres meter variables usa privates y ponlas como si fueran macros.
SAludos,
José Luis CApel
"Paco V." <ssi-quita-esto@ono.com> escribió en el mensaje
news:[email=4715c13d@ozsrv2.ozlan.local...]4715c13d@ozsrv2.ozlan.local...[/email]
> Ejemplito "porfi"
>
> PD:Lo quito
>
> Paco V
> "José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
> news:[email=4715c006@ozsrv2.ozlan.local...]4715c006@ozsrv2.ozlan.local...[/email]
>> Paco,
>>
>> Yo estoy utilizando mucho las cláusulas TEXT INTO / ENDTEXT para
>> sentencias Sql relativamente grandes.
>> Saludos,
>> José Luis Capel
>> PD: ESO ya está en mi ordenador
>>
>> "Paco V." <ssi-quita-esto@ono.com> escribió en el mensaje
>> news:471503ef$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>> Creo que el problema tiene que ver con el ; del cambio de linea ¿Puede
>>> ser?
>>>
>>> Compilando Form09.prg...
>>> Form09.prg(354) Error E0002 Unterminated string: '' and +;'
>>> Form09.prg(355) Error E0002 Unterminated string: ' )'
>>> Form09.prg(357) Error E0002 Unterminated string: '' and;'
>>> Form09.prg(358) Error E0002 Unterminated string: ' )'
>>>
>>>
>>>
>>>
>>
>>
>
>

José,
>
> Quizás lo que comentó Fredy hace poco sobre la concatenación de cadenas
> con ; en varias líneas fuera un bug anterior de xHarbour que ahora han
> corregido (la verda es que a mí me extrañó mucho que funcionara) y por eso
> ahora te da el error. Procura cerrar las cadenas en cada línea, y si lo
> necesitas terminas la línea con un + ;
>
> Vamos, que la expresión que has puesto debería ser:
>
> ::oMySQLDataSource1:Execute( "DELETE FROM pernoba WHERE ftoma
> >='"+inicio+"' and " + ;
> "ftoma <= '"+final+"' and resage= '"+rtrim(cValText)+"'" )
>
> fíjate que he añadido las comillas de cierre en la primera línea, y otras
> comillas de apertura en la segunda línea.
>
Pues ese bug debe llevar tiempo... Tengo código de Noviembre 2005 de esa
manera. Ahora tengo que cambiarlo
Saludos,
José Luis Capel

Voy a probarlo
Ahora ejecuto la aplicación y me aparece el debuger y hay se queda.
Paco V
"José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
news:4715c4bd$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Paco,
>
> LOCAL cSelect
>
> TEXT INTO cSelect
> SELECT micampo1, micampo2, micampo3 FROM
> miTabla INNER JOIN miotratabla ON mitabla.micampo1 =
> miotratabla.otrocampo
> WHERE micampo1 IN ( SELECT micampo2 FROM otratablacualquiera WHERE
> micampo2 = mitabla.micampo1)
> ENDTEXT
>
> Lo que hay entre text y endtext es literal. Sin comillas y sin nada.
>
> Si quieres meter variables usa privates y ponlas como si fueran macros.
>
> SAludos,
> José Luis CApel
>
>
> "Paco V." <ssi-quita-esto@ono.com> escribió en el mensaje
> news:[email=4715c13d@ozsrv2.ozlan.local...]4715c13d@ozsrv2.ozlan.local...[/email]
>> Ejemplito "porfi"
>>
>> PD:Lo quito
>>
>> Paco V
>> "José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
>> news:[email=4715c006@ozsrv2.ozlan.local...]4715c006@ozsrv2.ozlan.local...[/email]
>>> Paco,
>>>
>>> Yo estoy utilizando mucho las cláusulas TEXT INTO / ENDTEXT para
>>> sentencias Sql relativamente grandes.
>>> Saludos,
>>> José Luis Capel
>>> PD: ESO ya está en mi ordenador
>>>
>>> "Paco V." <ssi-quita-esto@ono.com> escribió en el mensaje
>>> news:471503ef$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>> Creo que el problema tiene que ver con el ; del cambio de linea ¿Puede
>>>> ser?
>>>>
>>>> Compilando Form09.prg...
>>>> Form09.prg(354) Error E0002 Unterminated string: '' and +;'
>>>> Form09.prg(355) Error E0002 Unterminated string: ' )'
>>>> Form09.prg(357) Error E0002 Unterminated string: '' and;'
>>>> Form09.prg(358) Error E0002 Unterminated string: ' )'
>>>>
>>>>
>>>>
>>>>
>>>
>>>
>>
>>
>
>

Paco,
Recontruye TODO el proyecto y los OBJs o LIBs que estés utilizando
también!!!
Un Saludo,
Xevi.
"Paco V." <ssi-quita-esto@ono.com> escribió en el mensaje de noticias
news:4715cc1c$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Voy a probarlo
> Ahora ejecuto la aplicación y me aparece el debuger y hay se queda.
>
> Paco V
>
> "José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
> news:4715c4bd$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Paco,
>>
>> LOCAL cSelect
>>
>> TEXT INTO cSelect
>> SELECT micampo1, micampo2, micampo3 FROM
>> miTabla INNER JOIN miotratabla ON mitabla.micampo1 =
>> miotratabla.otrocampo
>> WHERE micampo1 IN ( SELECT micampo2 FROM otratablacualquiera WHERE
>> micampo2 = mitabla.micampo1)
>> ENDTEXT
>>
>> Lo que hay entre text y endtext es literal. Sin comillas y sin nada.
>>
>> Si quieres meter variables usa privates y ponlas como si fueran macros.
>>
>> SAludos,
>> José Luis CApel
>>
>>
>> "Paco V." <ssi-quita-esto@ono.com> escribió en el mensaje
>> news:[email=4715c13d@ozsrv2.ozlan.local...]4715c13d@ozsrv2.ozlan.local...[/email]
>>> Ejemplito "porfi"
>>>
>>> PD:Lo quito
>>>
>>> Paco V
>>> "José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
>>> news:[email=4715c006@ozsrv2.ozlan.local...]4715c006@ozsrv2.ozlan.local...[/email]
>>>> Paco,
>>>>
>>>> Yo estoy utilizando mucho las cláusulas TEXT INTO / ENDTEXT para
>>>> sentencias Sql relativamente grandes.
>>>> Saludos,
>>>> José Luis Capel
>>>> PD: ESO ya está en mi ordenador
>>>>
>>>> "Paco V." <ssi-quita-esto@ono.com> escribió en el mensaje
>>>> news:471503ef$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>>> Creo que el problema tiene que ver con el ; del cambio de linea ¿Puede
>>>>> ser?
>>>>>
>>>>> Compilando Form09.prg...
>>>>> Form09.prg(354) Error E0002 Unterminated string: '' and +;'
>>>>> Form09.prg(355) Error E0002 Unterminated string: ' )'
>>>>> Form09.prg(357) Error E0002 Unterminated string: '' and;'
>>>>> Form09.prg(358) Error E0002 Unterminated string: ' )'
>>>>>
>>>>>
>>>>>
>>>>>
>>>>
>>>>
>>>
>>>
>>
>>
>
>