Xailer & OZ Software

Pepe Lutrillo

Buenos dias:
Tengo un campo memo en donde tengo capturada la siguiente información:
RENG1
RENG2
RENG3
RENG4
Al intentar imprimirlo utilizo, por ejemplo:
:TextOut( X, Y, Substr(::oDataSetConceptos:NOTAS, 1, 63))
La impresión aparece:
RENG1 RENG2 RENG3 RENG4
Como puedo hacer para que dentro ...

Pepe Lutrillo

Gracias Mil Carlos,
Pepe Lutrillo

Pepe Lutrillo

Buenos Dias:
Estoy utilizando un TSQLQuery, trayendo información de MS-SQL:
SELECT ID, Nombre, FechaReport, FechaCreate FROM Unit
Las fechas son de tipo DateTime.
Creo un TDBBrowse y coloco las 4 columnas. Al seleccionar dentro del browse la opción de filtrado, las columnas ID y Nombre pueden ...

Pepe Lutrillo

Ramón,
Es lo mismo si el campo solo existe en uno de los datasets.
Si tienes un campo (por ejemplo, CLAVE) en ambos dataset, debes identificarlo con el alias.
A eso te refieres?
Gracias nuevamente.
Pepe Lutrillo

Pepe Lutrillo

Hola Ramón.
Funciona agregando el alias del campo
ilterEval := "UPPER('%') $ Upper(Regiones->Clave)
Gracias por tu ayuda
Saludos,
Pepe Lutrillo

Pepe Lutrillo

Buenos Dias:
Tengo un par de dataset que están relacionados.
::oDataSet:SetRelation("REGION" , ::oDataSetRegiones)
Dentro de un TDBBrowse creo un campo calculado de esta forma:
WITH OBJECT oCol1 := TDBBrwColumn():New(::oBrw)
:cHeader := "Region"
:nAlignment := taLEFTHEADERCENTER
:lVisible ...

Pepe Lutrillo

Perfecto.
Mil gracias de nuevo,
Pepe Lutrillo

Pepe Lutrillo

Alf+
Mil gracias.
En donde puedo bscar la documentación de esta función?. No la encuentro en la documentación de Xailer.
Nuevamente, gracias por tu ayuda
Pepe Lutrillo

Pepe Lutrillo

Buenos Dias X-Men:
Tengo una aplicación que necesita ejecutar otra aplicación a través de un WinExec. Sin embargo funciona perfecto cuando la versión de Windows está en Inglés, (accesando /Program Files) y no funciona cuando la versión está en español (Archivos de Programas).
Hay alguna forma de ...

Pepe Lutrillo

José,
Mil gracias,
Pepe Lutrillo

Pepe Lutrillo

Buenos dias X-Men:
Tengo una aplicación que se conecta via ADO a un SQL Server.
Dentro de una tabla de SQL Server tengo un campo de tipo Datetime
Cuando despliego directamente el campo, me aparece la fecha y la hora.
MsgBox(::oSQLQuery1:CreateTimeUTC) -> 26/05/2010 23:24:40:81
Sin embargo ...

Pepe Lutrillo

Ignacio,
Funciona perfecto. Muchas gracias.
Saludos, Pp Lu3o
Ignacio Ortiz de Zúñiga wrote:
> Pepe,
>
> El error se producía cuando automáticamente se ponía en modo LANDSCAPE
> porque no cabía el informe. Con este mensaje te mando el módulo arreglado.
> No obstante si lo deseas también ...

Pepe Lutrillo

Ignacio,
El error se produce cuando se imprime un campo en varios renglones. He
reproducido el error y te estoy enviando el ejemplo a tu correo personal.
Mil gracias por tu ayuda
Saludos, Pp Lu3o
Ignacio Ortiz de Zúñiga wrote:
> Pepe,
>
> Acabo de modificar el primer listado de ...

Pepe Lutrillo

Ignacio,
Perfecto.
Mil gracias.
Pp Lu3o
Ignacio Ortiz de Zúñiga wrote:
> Pepe,
>
> Utiliza mejor el evento OnSeek del TBrowse. Veo que no sale el evento
> publicado en el inspector de objetos, pero ya está arreglado. No obstante
> puedes asignarlo tu por código sin problema.
>
> En ...

Pepe Lutrillo

Hola X-Men:
Estoy utilizando un TDBBrowse.
En el evento Onchar tengo:
METHOD BrwChar( oSender, nKey, nFlags ) CLASS X
::oDataSet:Seek( Upper( chr(nKey ) ) )
::oBrw:Refresh(.T.)
RETURN Nil
En OnRClick tengo
METHOD BrwRClick( oSender, nPosX, nPosY, nItem ) CLASS TMaLuisBrw
::oBrw:Edit ...

Pepe Lutrillo

Ignacio,
Sustituí el DBFDataSet.obj en el Xailer.lib e incorporé la línea de
código en mi proyecto. Ahora todo funciona perfecto.
Muchas gracias y felicidades por este gran producto
Saludos,
Pp Lu3o
Ignacio Ortiz de Zúñiga wrote:
> Pepe,
>
>
>>Si incorporo el archivo DbfDataSet.obj en ...

Pepe Lutrillo

Ignacio,
Si incorporo el archivo DbfDataSet.obj en mi proyecto, el error persiste.
De igual forma, si sustituyo el DbfDataSet.obj en Xailer.lib, al ligar
el programa me envía el siguiente error:
Linking: Gal4Win.exe...
Error: Unresolved external '_HB_FUN_TDBFDATASET' referenced from
C ...

Pepe Lutrillo

Ignacio,
Tengo el mismo problema. Incluí en mi proyecto el DBFDATASET.OBJ que
acabas de subir, reconstruí el projecto, y al ejecutarlo, me da el
siguiente error:
TDBFDATASET:REFRESH(737)
Error BASE/1004 Class: 'NIL' has no exported method: REFRESH
Arguments: ()
En este método:
METHOD ...

Pepe Lutrillo

Ignacio,
Hice el cambio en el archivo xailer.lib. Ahora funciona perfectamente.
Como parte de de lista de deseos: una cláusula MULTIPLE en COLUMN of
oRep, para imprimir varios renglones en una sola columna.
Mil gracias
Saludos, Pp Lu3o
Ignacio Ortiz de Zúñiga wrote:
> Pepe,
>
> tlib.exe ...

Pepe Lutrillo

Ignacio,
Gracias por tu respuesta.
Que programa/utilería puedo utilizar para incorporar el REPORT.OBJ en
Xailer.lib?
Mil gracias,
Saludos, Pp Lu3o
Ignacio Ortiz de Zúñiga wrote:
> Pepe,
>
> Es muy extraño. Compruebo que el método existe. Parece como si fuese un
> error del linker que ...

Pepe Lutrillo

Ramón,
El archivo que me envió Ignacio lo incluí al proyecto. En el
"administrador de proyectos" me aparece el archivo "Report.obj" debajo
de "Otros".
Al parecer el problema está en la definición del método Printatcol
dentro del archivo report.obj, por lo que la modificación que sugieres ...

Pepe Lutrillo

Ignacio,
He adaptado mi código de acuerdo a tu respuesta. Sin embargo, obtengo el
siguiente error, aún cuando ya integré a mi proyecto el archivo
report.obj que posteaste:
PRINTMEMO(424)
Error BASE/1004 Message not found: TREPORT:PRINTATCOL
Arguments: ()
Mil gracias
Saludos, Pp Lu3o ...

Pepe Lutrillo

Jose Ramón,
Gracias por tu mensaje.
cString := ::Cadena(::oDataSet) llama a un método (y no a una función)
que forma el string en base al contenido de varios campos. El valor
resultante de String es correcto.
Lo que intento hacer obtener en "Eval(bCodigo)" es la expresión a
utilizar y no el ...

Pepe Lutrillo

Ignacio,
Mil gracias por tu respuesta.
Precisamente uso la variable para evitar los campos en blanco.
No hay forma de eliminarlos?
Intento hacer lo siguiente:
METHOD Reporte(lPreview) CLASS TRepxCli
...
...
Local bCodigo:= {|| ::ChecaExp()}
..
..
COLUMN OF oRep ;
DATA Eval(bCodigo ...

Pepe Lutrillo

Hola Equipo Xailer:
Tengo varios campos, (Campo1, Campo2, Campo3...Campon) todos con una
longitud de 50 caracteres. El valor de los mismos no siempre ocupa los
50 caracteres.
Quiero imprimir una variable de la siguiente forma:
cVariable := Alltrim(Campo1) + Alltrim(Campo2) + Alltrim(Campo3 ...

Se encontraron 45 coincidencias

Imprension de campos memo en Canvas

Filtros en TDBBrowse con Fechas con formato DateTime

Filtros en TDBBrowse con Fechas con formato DateTime

Filtros con dataset relacionados

Filtros con dataset relacionados

Filtros con dataset relacionados

Acceso a variables de ambiente

Acceso a variables de ambiente

Acceso a variables de ambiente

DateTime

DateTime

Re: Margen en impresi

Re: Margen en impresi

OnChar y Edición en un TDBBrowse

OnChar y Edición en un TDBBrowse

Erro DataSet vers

Erro DataSet vers

Erro DataSet vers

Renglones múltiples en Reportes

Renglones múltiples en Reportes

Renglones múltiples en Reportes

Renglones múltiples en Reportes

Renglones múltiples en Reportes

Renglones múltiples en Reportes

Renglones múltiples en Reportes