× Linguagem de Programação ADVPL

Perguntas Dúvida com registro C195 do SPED FISCAL

Mais
8 anos 6 meses atrás #29604 por Cae2
Boa tarde Matheus,

O meu problema (que estava vindo zerado), é porque esse PE não traz o registro já posicionado dentro da SFT, então tive que posicionar, senão ele retornava só o ICMS do primeiro registro.

faz um teste, dá uma olhada no que fiz:

==============
#Include 'Protheus.ch'

User Function SPEDC195()

Local cNFiscal := SUBSTR(CCHAVE,11,9)
Local cForneced := SUBSTR(CCHAVE,20,6)
//Local cNFiscal := ""
//Local cForneced := ""
Local nRet := 0
Local nSomaRet := 0

dbSelectArea("SFT")
dbSetOrder(8) // Filial + NF + Fornecedor

dbSeek(xFilial("SFT") + cNFiscal + cForneced)

While cNFiscal = FT_NFISCAL
nRet := FT_ICMSRET
nSomaRet += nRet
dbskip()
EndDo

Return "Valor do ICMS RETIDO: R$ " + cValtoChar(nSomaRet)
===================

Por favor Acessar ou Registrar para participar da conversa.

Mais
8 anos 6 meses atrás #29605 por Matheus.Frizzo
Boa tarde Flavio,

Muito obrigado! Vou testar!

Abraços

Por favor Acessar ou Registrar para participar da conversa.

Mais
8 anos 6 meses atrás #29606 por Matheus.Frizzo
Na verdade eu consegui trazer a descrição preenchendo o campo F4_CODOBSE no cadastro de TES, mas os valores ainda não.

|C195|000006|VALOR COMPLEMENTAR|

Vou fazer um teste com esse P.E.

Por favor Acessar ou Registrar para participar da conversa.

Mais
8 anos 5 meses atrás #29639 por Matheus.Frizzo
Pessoal,

Não consegui fazer funcionar corretamente, quando eu coloco Return "Valor do ICMS RETIDO: R$ " + cValtoChar(nSomaRet) a informação não sai e seu eu coloco Return "Valor do ICMS RETIDO: R$ " a informação sai, porem, não consegui trazer os valores.

Não sei se algum outro ponto de entrada pode estar interferindo, por exemplo o SPEDINFO" ou SPDPISIC"

Por favor Acessar ou Registrar para participar da conversa.

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