Perguntas Ponto de entrada Rotina Mata103

Estou precisando um ponto de entrada para validar a digitação de campos nos itens da nota fiscal de entrada.
tabela SD1 antes da gravação.

Usa o MT100TOK.

Abraços.

Boa tarde,

Mas como faço para pegar o valor de cada itens da nota para estar fazendo a validação. O item especifico que desejo fazer a validação e o campo D1_local de cada item lançado.

Boa tarde Flávio,

utilize o ponto de entrada MT100LOK(), que valida o item da nota fiscal de entrada em que está posicionado.

tdn.totvs.com.br/pages/releaseview.actio...D5854?pageId=6085397


Att
Thales

Bom dia,

Fez esse código abaixo porém o mesmo não faz a validação.



User Function MT100LOK
public Tipo:=.F.
public cCodUser := RetCodUsr() //Retorna o Codigo do Usuario


DbSelectArea("SZ7")
DbSetorder(1)

If MsSeek(xFilial("SD1")+cCodUser+SD1->D1_LOCAL)
Tipo:=.T.

Else
Tipo:=.F.
Alert("Usuário não tem permissão para o referido armazem")

ENDIF

Flávio, o que você está retornando nessa função?

Apenas uma dica:
NUNCA declare variáveis PUBLIC a não ser que você tenha 100% de certeza que não existe uma com esse nome.
Para sua função, utilize variáveis do tipo LOCAL

Caso exista uma variável publica com o mesmo nome da que você está definindo, a original será sobreposta e poderá causar problemas no funcionamento normal do sistema.

Sobre o problema, você tentou debugar?
Ele está entrando no PE?