Duvida no Grid em Mysql

[Marcos]

Novamente aqui para lhes pedir ajuda, como fazer com que o Grid mostre ao invés dos (Valores) gravados na Tabela a (Descrição) na qual se refere o valor que está na variável pública xuser e xacao ?

Código: Selecionar todos

aadd(xuser,'Usuários')
aadd(xacao,'Inclusão')
add item {str(oRow:fieldGet(1)),str(oRow:fieldGet(2)),str(oRow:fieldGet(3))} to grid_auditoria of form_auditoria

Obrigado.

[alxsts]

Olá!

Poderia ser mais claro? A dúvida é sobre grid ou MySQL? Qual grid?

[Marcos]

Realmente minha explicação ficou vaga, vou tentar melhorar. Antes destas linhas tem um grid chamado grid_auditoria, na tabela tem 2 campos Int que são gravados os números referente ao PRG acessado e o que o Usuário faz no sistema, só que no Grid não quero mostrar o número para o Operador, preciso mostrar a Descrição do que Ele fez, exemplo: Acessou o PRG de Clientes e Excluiu um Cliente. Preciso colocar esta informação no Add item do Grid.

Código: Selecionar todos

define window form_auditoria;
   at 000,000;
   width 600;
   height 620;
   title 'Auditoria (acessos)';
   icon 'iconezed';
   modal;
   nosize;
   on init pesquisar()
define grid grid_auditoria
         parent form_auditoria
         col 000
         row 105
         width 795
         height 430
         headers {'Código','Data','Hora','Usuário','Módulo','Ação'}
         widths {090,110,100,150,80,80}
         fontname 'verdana'
         fontsize 010
         fontbold .T.
         backcolor WHITE
         fontcolor {105,105,105}     
      end grid
end window
form_auditoria.center
form_auditoria.activate
return(nil)
*********************************
static function pesquisar()
...
...
add item {str(oRow:fieldGet(1)),str(oRow:fieldGet(2)),str(oRow:fieldGet(3))} to grid_auditoria of form_auditoria

[wmanesco]

Se eu entendi você só quer trocar os valores? Acho que seria isso então


Não conheço muito minigui mas deve funcionar..

Código: Selecionar todos

//digamos que a posicao 3 seja a ação, acho que da pra voce fazer assim
add item {str(oRow:fieldGet(1)),str(oRow:fieldGet(2)), RetornaAcao( oRow ) } to grid_auditoria of form_auditoria

STATIC FUNCTION RetornaAcao( oRow )
   LOCAL cAcao := ""

   IF oRow:fieldGet(3) == 1
       cAcao :="blabla"
   ELSEIF oRow:fieldGet(3) == 2
        cAcao := "x"
   ENDIF 

RETURN cAcao

[Marcos]

Obrigado wmanesco, funcionou perfeitamente.