Xailer & OZ Software

Hola a Todos !
Tengo 2 Preguntas
Cuando se ha creado un DataSet , tengo entendido se crea un archivo temporal
donde se guarda el Select.
1.- Como copio ese archivo a un Dbf para despues de ahi hacer el resto de
las operaciones.?
2.-Cuando abro dos o mas DataSets en forma seguida me aparece el siguiente
error:
el error sale cuando esta la propiedad :lAsynFetch en .T. , cuando
esta en .F. no sale este error
es normal o no al cambiar esta propiedad?
Primary Keys retrieve error
Class:s1000
[Microsoft][ODBC SQL Server Driver] Connection is busy with results for
another hstmt [#0]
on Procedure:TPOLIZACONTADO:BtnProcesar line:254
cSQLCATCUENTAS := 'Select * From CatCuentasContables Order by CtaMay,
SubCta, SSbCta, SSSCta'
WITH OBJECT ::oDSCATCUENTAS
:cSelect:=cSQLCATCUENTAS
:lAsynFetch :=.t. // ::oChkAsyn:lChecked
:OnComplete := {|| MSGINFO(::oDSCATCUENTAS:cNAME) }
:lDateAsString:=.t.
:Open()
END WITH
cSQLBANCOS := 'Select Cta_Bancaria, SUM(Importe * TipoCambio) As Suma,
TipoCambio From mVBacB ' +;
' WHERE FechaMov = ' + CHR(39)+ cFechaBanco + CHR(39) +;
' AND cveCancel <> ' + CHR(39)+ 'C' + CHR(39) +;
' AND Origen = ' + CHR(39)+ 'B' + CHR(39) +;
' GROUP BY CTA_BANCARIA,TIPOCAMBIO ORDER BY Cta_Bancaria'
With object ::oDSBANCOS
:cSelect:=cSQLBANCOS
:lAsynFetch :=.t. // ::oChkAsyn:lChecked
:lDateAsString:=.t.
:Open() <====== linea 254
end with

Martin:
Esa si me la se, porque lo acabo de hacer:
oDataSet:Select()
COPY TO (archivo.dbf)
Saludos
Rene Flores
http://www.ciber-tec.com
del Angel escribió:
> Hola a Todos !
>
> Tengo 2 Preguntas
>
> Cuando se ha creado un DataSet , tengo entendido se crea un archivo temporal
> donde se guarda el Select.
>
> 1.- Como copio ese archivo a un Dbf para despues de ahi hacer el resto de
> las operaciones.?
>
>
> 2.-Cuando abro dos o mas DataSets en forma seguida me aparece el siguiente
> error:
> el error sale cuando esta la propiedad :lAsynFetch en .T. , cuando
> esta en .F. no sale este error
> es normal o no al cambiar esta propiedad?
>
> Primary Keys retrieve error
>
> Class:s1000
>
> [Microsoft][ODBC SQL Server Driver] Connection is busy with results for
> another hstmt [#0]
>
> on Procedure:TPOLIZACONTADO:BtnProcesar line:254
>
>
> cSQLCATCUENTAS := 'Select * From CatCuentasContables Order by CtaMay,
> SubCta, SSbCta, SSSCta'
> WITH OBJECT ::oDSCATCUENTAS
> :cSelect:=cSQLCATCUENTAS
> :lAsynFetch :=.t. // ::oChkAsyn:lChecked
> :OnComplete := {|| MSGINFO(::oDSCATCUENTAS:cNAME) }
> :lDateAsString:=.t.
> :Open()
> END WITH
>
> cSQLBANCOS := 'Select Cta_Bancaria, SUM(Importe * TipoCambio) As Suma,
> TipoCambio From mVBacB ' +;
> ' WHERE FechaMov = ' + CHR(39)+ cFechaBanco + CHR(39) +;
> ' AND cveCancel <> ' + CHR(39)+ 'C' + CHR(39) +;
> ' AND Origen = ' + CHR(39)+ 'B' + CHR(39) +;
> ' GROUP BY CTA_BANCARIA,TIPOCAMBIO ORDER BY Cta_Bancaria'
>
> With object ::oDSBANCOS
> :cSelect:=cSQLBANCOS
> :lAsynFetch :=.t. // ::oChkAsyn:lChecked
> :lDateAsString:=.t.
> :Open() <====== linea 254
> end with
>
>
>

Muchas Gracias Rene !
Sabes gracias a tu curso voy muy avanzado en el proyecto que te comente ,
solo tengo un detalle que no he resuelto, y es con un tabla de Sql que es
mas 30 millones de registros y al aplicar una consulta 'Select * from
Vendet' , me marca error en una columna FolFactura, pero si esa columna la
pongo sola en el 'Select FolFactura from Vendet' jala bien. pienso que
el equipo de Xailer debe de darle una revisadita a los DataSets.
Porque dentro Sql Analyzer de SQL Server 2000 no hay ningun problema cuando
hago la consulta de todos los campos. de igual manera con el programa que
esta hecho en Delphi el cual es el que estoy convirtiendo a Xailer.
Otra cosa
le comente a mi Hermano sobre el curso y se intereso en tomarlo ,
inclusive llevaria a 2 o 3 personas mas.
Avisame cuando tengas otro.
Saludos...
"Rene Flores" <rflores.removeforspam@ciber-tec.com> wrote in message
news:[email=44a895bb@news.xailer.com...]44a895bb@news.xailer.com...[/email]
> Martin:
>
> Esa si me la se, porque lo acabo de hacer:
>
> oDataSet:Select()
> COPY TO (archivo.dbf)
>
> Saludos
>
> Rene Flores
> http://www.ciber-tec.com
> del Angel escribió:
>> Hola a Todos !
>>
>> Tengo 2 Preguntas
>>
>> Cuando se ha creado un DataSet , tengo entendido se crea un archivo
>> temporal
>> donde se guarda el Select.
>>
>> 1.- Como copio ese archivo a un Dbf para despues de ahi hacer el resto de
>> las operaciones.?
>>
>>
>> 2.-Cuando abro dos o mas DataSets en forma seguida me aparece el
>> siguiente
>> error:
>> el error sale cuando esta la propiedad :lAsynFetch en .T. ,
>> cuando
>> esta en .F. no sale este error
>> es normal o no al cambiar esta propiedad?
>>
>> Primary Keys retrieve error
>>
>> Class:s1000
>>
>> [Microsoft][ODBC SQL Server Driver] Connection is busy with results for
>> another hstmt [#0]
>>
>> on Procedure:TPOLIZACONTADO:BtnProcesar line:254
>>
>>
>> cSQLCATCUENTAS := 'Select * From CatCuentasContables Order by CtaMay,
>> SubCta, SSbCta, SSSCta'
>> WITH OBJECT ::oDSCATCUENTAS
>> :cSelect:=cSQLCATCUENTAS
>> :lAsynFetch :=.t. // ::oChkAsyn:lChecked
>> :OnComplete := {|| MSGINFO(::oDSCATCUENTAS:cNAME) }
>> :lDateAsString:=.t.
>> :Open()
>> END WITH
>>
>> cSQLBANCOS := 'Select Cta_Bancaria, SUM(Importe * TipoCambio) As Suma,
>> TipoCambio From mVBacB ' +;
>> ' WHERE FechaMov = ' + CHR(39)+ cFechaBanco + CHR(39) +;
>> ' AND cveCancel <> ' + CHR(39)+ 'C' + CHR(39) +;
>> ' AND Origen = ' + CHR(39)+ 'B' + CHR(39) +;
>> ' GROUP BY CTA_BANCARIA,TIPOCAMBIO ORDER BY Cta_Bancaria'
>>
>> With object ::oDSBANCOS
>> :cSelect:=cSQLBANCOS
>> :lAsynFetch :=.t. // ::oChkAsyn:lChecked
>> :lDateAsString:=.t.
>> :Open() <====== linea 254
>> end with
>>
>>
>>

Martin,
> el equipo de Xailer debe de darle una revisadita a los DataSets.
Sino recuerdo mal, ya se te contesto pidiendo más información y no hemos
recibido respuesta por tu parte.
Un saludo,
"Martin del Angel" <martindelangel@msn.com> escribió en el mensaje
news:[email=44a89fe6@news.xailer.com...]44a89fe6@news.xailer.com...[/email]
> Muchas Gracias Rene !
>
> Sabes gracias a tu curso voy muy avanzado en el proyecto que te comente ,
> solo tengo un detalle que no he resuelto, y es con un tabla de Sql que es
> mas 30 millones de registros y al aplicar una consulta 'Select * from
> Vendet' , me marca error en una columna FolFactura, pero si esa columna la
> pongo sola en el 'Select FolFactura from Vendet' jala bien. pienso que
> el equipo de Xailer debe de darle una revisadita a los DataSets.
>
> Porque dentro Sql Analyzer de SQL Server 2000 no hay ningun problema
> cuando hago la consulta de todos los campos. de igual manera con el
> programa que esta hecho en Delphi el cual es el que estoy convirtiendo a
> Xailer.
>
>
> Otra cosa
> le comente a mi Hermano sobre el curso y se intereso en tomarlo ,
> inclusive llevaria a 2 o 3 personas mas.
>
> Avisame cuando tengas otro.
>
>
>
> Saludos...
>
>
>
>
>
>
>
>
> "Rene Flores" <rflores.removeforspam@ciber-tec.com> wrote in message
> news:[email=44a895bb@news.xailer.com...]44a895bb@news.xailer.com...[/email]
>> Martin:
>>
>> Esa si me la se, porque lo acabo de hacer:
>>
>> oDataSet:Select()
>> COPY TO (archivo.dbf)
>>
>> Saludos
>>
>> Rene Flores
>> http://www.ciber-tec.com
>> del Angel escribió:
>>> Hola a Todos !
>>>
>>> Tengo 2 Preguntas
>>>
>>> Cuando se ha creado un DataSet , tengo entendido se crea un archivo
>>> temporal
>>> donde se guarda el Select.
>>>
>>> 1.- Como copio ese archivo a un Dbf para despues de ahi hacer el resto
>>> de
>>> las operaciones.?
>>>
>>>
>>> 2.-Cuando abro dos o mas DataSets en forma seguida me aparece el
>>> siguiente
>>> error:
>>> el error sale cuando esta la propiedad :lAsynFetch en .T. ,
>>> cuando
>>> esta en .F. no sale este error
>>> es normal o no al cambiar esta propiedad?
>>>
>>> Primary Keys retrieve error
>>>
>>> Class:s1000
>>>
>>> [Microsoft][ODBC SQL Server Driver] Connection is busy with results for
>>> another hstmt [#0]
>>>
>>> on Procedure:TPOLIZACONTADO:BtnProcesar line:254
>>>
>>>
>>> cSQLCATCUENTAS := 'Select * From CatCuentasContables Order by CtaMay,
>>> SubCta, SSbCta, SSSCta'
>>> WITH OBJECT ::oDSCATCUENTAS
>>> :cSelect:=cSQLCATCUENTAS
>>> :lAsynFetch :=.t. // ::oChkAsyn:lChecked
>>> :OnComplete := {|| MSGINFO(::oDSCATCUENTAS:cNAME) }
>>> :lDateAsString:=.t.
>>> :Open()
>>> END WITH
>>>
>>> cSQLBANCOS := 'Select Cta_Bancaria, SUM(Importe * TipoCambio) As Suma,
>>> TipoCambio From mVBacB ' +;
>>> ' WHERE FechaMov = ' + CHR(39)+ cFechaBanco + CHR(39) +;
>>> ' AND cveCancel <> ' + CHR(39)+ 'C' + CHR(39) +;
>>> ' AND Origen = ' + CHR(39)+ 'B' + CHR(39) +;
>>> ' GROUP BY CTA_BANCARIA,TIPOCAMBIO ORDER BY
>>> Cta_Bancaria'
>>>
>>> With object ::oDSBANCOS
>>> :cSelect:=cSQLBANCOS
>>> :lAsynFetch :=.t. // ::oChkAsyn:lChecked
>>> :lDateAsString:=.t.
>>> :Open() <====== linea 254
>>> end with
>>>
>>>
>>>
>
>

Martin,
Corrigo. La contestación estaba más abajo.
Saludos,
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:44a8c826$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Martin,
>
>> el equipo de Xailer debe de darle una revisadita a los DataSets.
>
> Sino recuerdo mal, ya se te contesto pidiendo más información y no hemos
> recibido respuesta por tu parte.
>
> Un saludo,
>
> "Martin del Angel" <martindelangel@msn.com> escribió en el mensaje
> news:[email=44a89fe6@news.xailer.com...]44a89fe6@news.xailer.com...[/email]
>> Muchas Gracias Rene !
>>
>> Sabes gracias a tu curso voy muy avanzado en el proyecto que te comente ,
>> solo tengo un detalle que no he resuelto, y es con un tabla de Sql que es
>> mas 30 millones de registros y al aplicar una consulta 'Select * from
>> Vendet' , me marca error en una columna FolFactura, pero si esa columna
>> la pongo sola en el 'Select FolFactura from Vendet' jala bien. pienso
>> que el equipo de Xailer debe de darle una revisadita a los DataSets.
>>
>> Porque dentro Sql Analyzer de SQL Server 2000 no hay ningun problema
>> cuando hago la consulta de todos los campos. de igual manera con el
>> programa que esta hecho en Delphi el cual es el que estoy convirtiendo a
>> Xailer.
>>
>>
>> Otra cosa
>> le comente a mi Hermano sobre el curso y se intereso en tomarlo ,
>> inclusive llevaria a 2 o 3 personas mas.
>>
>> Avisame cuando tengas otro.
>>
>>
>>
>> Saludos...
>>
>>
>>
>>
>>
>>
>>
>>
>> "Rene Flores" <rflores.removeforspam@ciber-tec.com> wrote in message
>> news:[email=44a895bb@news.xailer.com...]44a895bb@news.xailer.com...[/email]
>>> Martin:
>>>
>>> Esa si me la se, porque lo acabo de hacer:
>>>
>>> oDataSet:Select()
>>> COPY TO (archivo.dbf)
>>>
>>> Saludos
>>>
>>> Rene Flores
>>> http://www.ciber-tec.com
>>> del Angel escribió:
>>>> Hola a Todos !
>>>>
>>>> Tengo 2 Preguntas
>>>>
>>>> Cuando se ha creado un DataSet , tengo entendido se crea un archivo
>>>> temporal
>>>> donde se guarda el Select.
>>>>
>>>> 1.- Como copio ese archivo a un Dbf para despues de ahi hacer el resto
>>>> de
>>>> las operaciones.?
>>>>
>>>>
>>>> 2.-Cuando abro dos o mas DataSets en forma seguida me aparece el
>>>> siguiente
>>>> error:
>>>> el error sale cuando esta la propiedad :lAsynFetch en .T. ,
>>>> cuando
>>>> esta en .F. no sale este error
>>>> es normal o no al cambiar esta propiedad?
>>>>
>>>> Primary Keys retrieve error
>>>>
>>>> Class:s1000
>>>>
>>>> [Microsoft][ODBC SQL Server Driver] Connection is busy with results for
>>>> another hstmt [#0]
>>>>
>>>> on Procedure:TPOLIZACONTADO:BtnProcesar line:254
>>>>
>>>>
>>>> cSQLCATCUENTAS := 'Select * From CatCuentasContables Order by
>>>> CtaMay,
>>>> SubCta, SSbCta, SSSCta'
>>>> WITH OBJECT ::oDSCATCUENTAS
>>>> :cSelect:=cSQLCATCUENTAS
>>>> :lAsynFetch :=.t. // ::oChkAsyn:lChecked
>>>> :OnComplete := {|| MSGINFO(::oDSCATCUENTAS:cNAME) }
>>>> :lDateAsString:=.t.
>>>> :Open()
>>>> END WITH
>>>>
>>>> cSQLBANCOS := 'Select Cta_Bancaria, SUM(Importe * TipoCambio) As Suma,
>>>> TipoCambio From mVBacB ' +;
>>>> ' WHERE FechaMov = ' + CHR(39)+ cFechaBanco + CHR(39)
>>>> +;
>>>> ' AND cveCancel <> ' + CHR(39)+ 'C' + CHR(39) +;
>>>> ' AND Origen = ' + CHR(39)+ 'B' + CHR(39) +;
>>>> ' GROUP BY CTA_BANCARIA,TIPOCAMBIO ORDER BY
>>>> Cta_Bancaria'
>>>>
>>>> With object ::oDSBANCOS
>>>> :cSelect:=cSQLBANCOS
>>>> :lAsynFetch :=.t. // ::oChkAsyn:lChecked
>>>> :lDateAsString:=.t.
>>>> :Open() <====== linea 254
>>>> end with
>>>>
>>>>
>>>>
>>
>>
>
>