Prrenchimento de campo

@ 076, aPosGet[12,1] SAY Alltrim("Tipo Op.:") OF oDlg PIXEL SIZE 050,010

@ 076, 088 MSGET ocROP VAR cROP F3 ("RISATO") SIZE 006, 006 OF oDlg COLORS 0, 16777215 PIXEL HASBUTTON VALID NomeOP()

@ 076, 140 MSGET ocRDES VAR cRDES When .F. SIZE 0100, 006 OF oDlg COLORS 0, 16777215 PIXEL

Minha dúvida e a seguinte gostaria de quando o campo ocROP for preenchido e perder o foco ele preenche o campo ocRDES com o valor que vem da minha minha função NomeOP(). Mas não estou cosneguindo fazer isso.

O que pdoeria ser?

Bom dia, Flavio!

Como está sua função NomeOp? Por ser uma função de validação, lembre-se que ela precisa ter retorno lógico.

Se a variável cRDES estiver como Private, você pode preencher a mesma dentro da função NomeOp, exemplo:


Static Function NomeOp

// efetuo a minha lógica

cRDes := 'Conteúdo Desejado'

Return(.T.) // validação teve sucesso e permite sair do campo