xbrowse: picture

[silvinamazzaro]

Hola: estoy usando xbrowse y no se cómo darle formato a los campos para que me los muestre bien en el browse
x que esto oCol:cEditPicture:="@z 999,999.99" lo respeta solo en la edición
hay alguna manera de hacerlo?
necesito que me muestre blancos cuando es cero..
sldos
Silvina

[carlos vargas]

umm, revisando el codigo me encuentro:

Code: Select all  Expand view  RUN

   DATA xEditPicture PROTECTED  // Picture mask to be used for Get editing and display of data
   ASSIGN cEditPicture( u ) INLINE ::xEditPicture := u
   ACCESS cEditPicture      INLINE XEval( ::xEditPicture, ::Value, Self )
 

asi que en teoria el cEditPicture deberia funcionar tanto para la edicion, como para mostrarlo.

salu2
carlos vargas

[Joel Andujo]

Yo lo tengo así :
oCol:bEditValue :={|| (v:POL:cAlias)->z0Cta }
oCol:cEditPicture:='@Z 999,999,999.99'

funciona muy bien, tal vez tengas oCol:bStrData en lugar de oCol:bEditValue.

saludos!!

[silvinamazzaro]

no entendí los parámetros que son, te recuerdo que lo que quiero es el picture en el browse no en la edición..

Yo lo tengo así :
oCol:bEditValue :={|| (v:POL:cAlias)->z0Cta }
oCol:cEditPicture:='@Z 999,999,999.99'

funciona muy bien, tal vez tengas oCol:bStrData en lugar de oCol:bEditValue.

saludos!!

[FranciscoA]

Intenta con esto:

Code: Select all  Expand view  RUN

XbrNumFormat( 'A', .t. )

@1,1 XBROWSE oBrw OF oDlg ;
     COLUMNS "Texto" ;
     HEADERS "TEXTO" ;
     ALIAS "PRUEBA"
 

[silvinamazzaro]

Hola, no se, para que sirve XbrNumFormat ? no hace nada...
lo que yo quiero es formatear las columnas, poner el picture en los importes para que me muestre la columna como yo quiera
o sea, no el ceditpicture no lo respeta, calculo que es solo para la edición

Intenta con esto:

Code: Select all  Expand view  RUN

XbrNumFormat( 'A', .t. )

@1,1 XBROWSE oBrw OF oDlg ;
     COLUMNS "Texto" ;
     HEADERS "TEXTO" ;
     ALIAS "PRUEBA"
 

[acuellar]

Silvina
Has intentado con TRANSFORM

Code: Select all  Expand view  RUN

oCol:bEditValue :={|| TRANS(CAMPO,"@Z 999,999.99) }

[silvinamazzaro]

no sé si se entendió la pregunta, quiero ponerle un formato para mostrar en el browse, no para la edición...
si, utilizando trans() funciona pero me transforma la columna de nca a alfanca y luego no la reconoce el maketotal , etc

Silvina
Has intentado con TRANSFORM

Code: Select all  Expand view  RUN

oCol:bEditValue :={|| TRANS(CAMPO,"@Z 999,999.99) }

[silvinamazzaro]

ESTABA HACIENDO ESTO
oCol:=xLbx:AddCol() , oCol:cHeader:= cTitulo , oCol:bStrData := bCampo , oCol:nWidth := nAncho ) ,;

AHORA HAGO
oCol:=xLbx:AddColumn( cTitulo , bCampo , cPicture ,,,, nAncho , .F., .F.,,,,,, .F.,,,,, .F.,,, ) , oCol:oHeaderFont:=memvar->oDatos:oFont9 )

[MarioG]

Esto es lo que buscas:

WITH OBJECT ::oBrwCab:TotalVenta
:nHeadStrAlign:= :nDataStrAlign:= AL_RIGHT
:nWidth := 85
:cEditPicture:= "@E( 999,999,999.99"
END