Xailer & OZ Software

Ing. Ignacio, saludos.
Le agradesco la respuesta sobre dudas de formato en fechas.
Lo resolví de con la función mencionada por usted DToSQL.
Quedando el ejemplo asi:
MemVar Campo1,campo2,CAMPO3,VAR_FECHA
Local cuenta
Private Campo1,campo2,Campo3,VAR_FECHA
Cuenta=1
Campo1=Ltrim(Str(Cuenta))
Campo2="PEDRO DE LEON RODAS"+AllTrim(str(Cuenta))
Campo3="A"
Var_Fecha=DToSQL(Date())
::Base:BeginTrans()
::Base:Execute("Insert into clientes (numero,nombre,estatus1,FECHA) Values
('&CAMPO1','&CAMPO2','&CAMPO3','&Var_fecha') ")
::Base:CommitTrans()
Tambien doy gracias a los que me brindaron alguna respuesta.

Pedro.
Me vino bien tambien a mi. A partir de ahora estoy usando DtoSQL en lugar de
DtoS. Yo trabajo con MySQL y no habia tenido ningun problema hasta el
momento, pero si esta funcion es mas compatible con otros motores, la uso.
Ya modifique mis fuentes.
Gracias.
"PEDRO DE LEON RODAS" <deleonpe@terra.com.mx> escribió en el mensaje
news:[email=497e6378@svctag-j7w3v3j....]497e6378@svctag-j7w3v3j....[/email]
> Ing. Ignacio, saludos.
>
> Le agradesco la respuesta sobre dudas de formato en fechas.
>
> Lo resolví de con la función mencionada por usted DToSQL.
>
> Quedando el ejemplo asi:
>
> MemVar Campo1,campo2,CAMPO3,VAR_FECHA
> Local cuenta
> Private Campo1,campo2,Campo3,VAR_FECHA
>
> Cuenta=1
>
> Campo1=Ltrim(Str(Cuenta))
> Campo2="PEDRO DE LEON RODAS"+AllTrim(str(Cuenta))
> Campo3="A"
> Var_Fecha=DToSQL(Date())
>
> ::Base:BeginTrans()
>
> ::Base:Execute("Insert into clientes (numero,nombre,estatus1,FECHA) Values
> ('&CAMPO1','&CAMPO2','&CAMPO3','&Var_fecha') ")
>
> ::Base:CommitTrans()
>
>
> Tambien doy gracias a los que me brindaron alguna respuesta.
>
>
>
>