Como eu varia para colocar um valid nesta coluna?
oBrwDb:AddColumn( HColumn():New( "Sal.Fixo" ,
FieldBlock(Fieldname(6)),"N", 12,02) ):Picture:="@E 999,999.99"
Marcos Roberto
Como eu faria para colocar um valid nesta coluna?
Moderador: Moderadores
-
marcos.gurupi
- Usuário Nível 4

- Mensagens: 939
- Registrado em: 06 Jul 2004 11:53
- Localização: Gurupi-TO
-
marcos.gurupi
- Usuário Nível 4

- Mensagens: 939
- Registrado em: 06 Jul 2004 11:53
- Localização: Gurupi-TO
Re: Como eu faria para colocar um valid nesta coluna?
Seria a coluna em um browse exemplificado no post acima.
Marcos Roberto.
Marcos Roberto.
Marcos Roberto
NetService Software
NetService Software
-
clebervn
- Usuário Nível 3

- Mensagens: 286
- Registrado em: 12 Jun 2007 10:49
- Localização: Florianópolis/SC
Re: Como eu faria para colocar um valid nesta coluna?
Não sei se é exatamente isto q vc quer...
oBrowse2:AddColumn( HColumn():New( "Uso",;
{|SetVal,oBrowse2,nposcol|f_uso(&vNomebase->uso)}, ;
"C", 10, 0,.F.,,,,,,,{|| {x_BLACK, x_WHITE , x_WHITE, x_DARKBLUE} }, ))
FUNCTION F_USO(xUSO)
IF xUso = "A"
vRet := "Automático"
ELSEIF xUso = "I"
vRet := "Informado"
ELSEIF xuso = "O"
vRet := "Obrig.dig."
ELSE
vRet := ""
ENDIF
RETURN vRet
eu fiz isso pra mostrar um certo valor na tela, mas vc pode fazer tb pra validar .....
oBrowse2:AddColumn( HColumn():New( "Uso",;
{|SetVal,oBrowse2,nposcol|f_uso(&vNomebase->uso)}, ;
"C", 10, 0,.F.,,,,,,,{|| {x_BLACK, x_WHITE , x_WHITE, x_DARKBLUE} }, ))
FUNCTION F_USO(xUSO)
IF xUso = "A"
vRet := "Automático"
ELSEIF xUso = "I"
vRet := "Informado"
ELSEIF xuso = "O"
vRet := "Obrig.dig."
ELSE
vRet := ""
ENDIF
RETURN vRet
eu fiz isso pra mostrar um certo valor na tela, mas vc pode fazer tb pra validar .....
-
clebervn
- Usuário Nível 3

- Mensagens: 286
- Registrado em: 12 Jun 2007 10:49
- Localização: Florianópolis/SC
Re: Como eu faria para colocar um valid nesta coluna?
se não for detalhe mais realmente o q vc deseja validar nessa coluna.... o valor ? se for o q deseja ou não mostrar....