× Linguagem de Programação ADVPL

Perguntas DIvisao no protheus

Mais
10 anos 2 meses atrás #24719 por brunogfx4
Galera bom dia, estou tentando fazer uma operacao SIMPLES no protheus de DIVISAO usando /, mas ele me aparece a seguinte mensagem:

"type mismatch on / on IMPRODAPE"


@ li,000 PSAY "VOLUME: " + AllTrim(Str(SCK->CK_QTDVEN/nTotEmb))

Alguem poderia me ajudar?

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 2 meses atrás #24720 por admin
Respondido por admin no tópico DIvisao no protheus
Tenta assim:

li,000 PSAY "VOLUME: " + TransForm((SCK->CK_QTDVEN/nTotEmb),'@E 9,999.9999')

Precisaria ver parte do código do fonte que vc está usando:

Verifique se a variavel nTotEmb não está vazia.

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 2 meses atrás #24723 por brunogfx4
Respondido por brunogfx4 no tópico DIvisao no protheus
Bom dia amigo, infelizmente deu o mesmo erro.

a variavel citada acima esta dessa forma.

nTotEmb := Posicione("SB1",1,xFilial("SB1")+SCK->CK_PRODUTO,"SB1->B1_TPEMB")

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 2 meses atrás #24724 por rafaeltonini
Respondido por rafaeltonini no tópico DIvisao no protheus
SCK->CK_QTDVEN
SB1->B1_TPEMB
Verifica se esses 2 campos são numéricos, type mismatch nesse caso pode ser na concatenação ou ou algum dos campos é caractere e não pode ser feita a operação.

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 2 meses atrás #24725 por brunogfx4
Respondido por brunogfx4 no tópico DIvisao no protheus
Eu ja tinha imaginado isso, acabei de olhar e voce esta certo, como posso fazer essa conversao do campo B1_TPEMB para numerico no programa?

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 2 meses atrás #24726 por rafaeltonini
Respondido por rafaeltonini no tópico DIvisao no protheus
Esse campo na SB1 é customizado né? não achei ele aqui no meu SX3!

Bom, caso o campo seja caractere com conteúdo que "deveria" ser numérico pode usar Val()
@ li,000 PSAY "VOLUME: " + AllTrim(Str(SCK->CK_QTDVEN/val(nTotEmb)))

Por favor Acessar ou Registrar para participar da conversa.

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