×
Linguagem de Programação ADVPL
Perguntas MT250TOK
- manoelcarlosjunior
- Autor do Tópico
- Desconectado
- Membro Especialista
-
Menos
Mais
- Postagens: 116
- Obrigados Recebidos: 0
10 anos 2 meses atrás #24741
por manoelcarlosjunior
MT250TOK foi criado por manoelcarlosjunior
Gente to tentando fazer um bloqueio na tela de movimentos da produção gostaria de bloquear a confirmação caso não preencher o lote se o lote for obrigatório na sb1
Em um ponto usei aCols mais nesse não ta dando certo nesse já tentei, não ta bloqueando quem puder me ajudar ....
Segue o meu ultimo código.
User Function MT250TOK()
Local _cCod := SD3->D3_COD
Local _cLote := SD3->D3_LOTECTL
Local _lRet := .T.
If Empty(_cLote) .and. POSICIONE("SB1",1,XFILIAL("SB1")+ _cCod ,"B1_RASTRO") <> 'N'
Aviso(" AVISO - LOTE OBRIGATORIO !!!" , "O Lote devera ser Preenchido para continuar a Inclusao..!",{"OK"},1)
_lRet := .F.
Return(_lRet)
ENDIF
Return(_lRet)
Abraço
Em um ponto usei aCols mais nesse não ta dando certo nesse já tentei, não ta bloqueando quem puder me ajudar ....
Segue o meu ultimo código.
User Function MT250TOK()
Local _cCod := SD3->D3_COD
Local _cLote := SD3->D3_LOTECTL
Local _lRet := .T.
If Empty(_cLote) .and. POSICIONE("SB1",1,XFILIAL("SB1")+ _cCod ,"B1_RASTRO") <> 'N'
Aviso(" AVISO - LOTE OBRIGATORIO !!!" , "O Lote devera ser Preenchido para continuar a Inclusao..!",{"OK"},1)
_lRet := .F.
Return(_lRet)
ENDIF
Return(_lRet)
Abraço
Por favor Acessar ou Registrar para participar da conversa.
- admin
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 216
- Obrigados Recebidos: 0
- manoelcarlosjunior
- Autor do Tópico
- Desconectado
- Membro Especialista
-
Menos
Mais
- Postagens: 116
- Obrigados Recebidos: 0
10 anos 2 meses atrás #24748
por manoelcarlosjunior
Respondido por manoelcarlosjunior no tópico MT250TOK
Valeu Adm !!!!
Problema solucionado !!!
Forte abraço !!
Problema solucionado !!!
Forte abraço !!
Por favor Acessar ou Registrar para participar da conversa.
Tempo para a criação da página:0.076 segundos