× Linguagem de Programação ADVPL

Perguntas MT100LOK - Validar linha por linha na SD1

Mais
9 anos 11 meses atrás #26522 por eljusticeiro
Estou procurando um ponto de entrada ou alguma maneira de, na classificação da nota fiscal, obrigar o cadastro de um campo específico se o tipo do produto for "tal"

Ex.
Criamos um campo chamado D1_XXCR (Controle de Recebimento Interno), precisamos que seja obrigatório quando o tipo do produto seja "MP"

Segue um exemplo do código que estou tentando usar. Ele posiciona no B1, mas ao tentar pegar o valor do meu campo D1_XXCR ele não retorna nda, está vazio mesmo preenchendo

User Function MT100LOK()
Local nRet := .T.
if (SB1->B1_TIPO='MP')
if ALLTRIM(D1_XXCR)=''
MsgAlert('Favor verificar os campos: Controle de recebimento')
nRet := .F.
end if
endif
Return(nRet)

Por favor Acessar ou Registrar para participar da conversa.

Mais
9 anos 11 meses atrás #26523 por Tony.totvs
Alessandro, tenta assim:

User Function MT100LOK()
Local nRet := .T.

cXXCR := acols[n][ascan(aHeader,{|x| Upper(alltrim(x[2])) == "D1_XXCR"})]

// Verifica se esta deletado
if !acols[n][len(aCols[n])]

if (SB1->B1_TIPO='MP')
if ALLTRIM(cXXCR)=''
MsgAlert('Favor verificar os campos: Controle de recebimento')
nRet := .F.
end if
endif

endif

Return(nRet)

Por favor Acessar ou Registrar para participar da conversa.

Mais
9 anos 11 meses atrás #26526 por eljusticeiro
Deu certinho só
if !acols[n][len(aCols[n])]

que deu erro....

Por favor Acessar ou Registrar para participar da conversa.

Mais
9 anos 11 meses atrás #26528 por luizalbertovieiraalves
Usa Assim

If !acols[n,Len(aHeader)+1]

Luiz Alberto V Alves
(12) 9 8256-5905
Proprietário 3L Systems e MasterAdvpl

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.083 segundos
Joomla templates by a4joomla