Campo Obrigatorio com condição

Boa tarde senhores, Preciso fazer esse procedimento: Quando um produto é adicionado no pedido de venda, faz uma verificação no campo B1_RASTRO do produto, Se o B1_RASTRO = 'L', Deixa o campo obrigatório C6_LOTECTL para a digitação.

Pesquisando Vi que uma forma de fazer isso é, fazendo a seguinte função dentro do X3_WHEN no campo C6_LOTECTL.

Iif(aCols[n,aScan(aHeader,{|x| AllTrim(x[2]) == "B1_RASTRO"})]$'L',.f.,.t.)

estou fazendo um prw e estou chamando ele dentro o campo c6_produto.

COMO POSSO PROSSEGUIR?

criado 29 de May de 2023
Lucas de Paulo Santos
1203 pontos
editado 29 de May de 2023

0

Consegui fazer funcionar , mas quando eu coloco o codigo do produto ele já avisa, não deixa ir para o outro campo
— Lucas de Paulo Santos 29 de May de 2023

Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

1 resposta

up 1 down
Você pode utilizar o ponto de entrada M410LIOK que é acionado na validação de linha e fazer sua validação de obrigatoriedade.

Outra coisa... para buscar valor na grid você pode utilizar a função GDFieldGet, sendo que B1_RASTRO vai ter que fazer um posicione
```
User Function M410LIOK()
    If INCLUI .OR. ALTERA
        If POSICIONE("SB1",1,xFilial("SB1")+GDFIELDGET("C6_PRODUTO"),"B1_RASTRO")=="L" .AND. Empty(GDFIELDGET("C6_LOTECTL"))
            //Msg aqui
            Return .F.
        EndIf
    EndIf
Return .T.
```
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 29 de May de 2023
  Saulo Gomes Martins
  81 pontos
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações

Campo Obrigatorio com condição

Comentário

1 resposta

Comentário

Não é a resposta que estava procurando? Procure outras perguntas com as tags sigacfg advpl ou faça a sua própria pergunta.