Ponto de entrada para Alteração conta contábil do registro H010.
Descrição: | Criado ponto de entrada no bloco F500 para que a query a ser processada. | ||||||||||||
Localização: | Livros Fiscais > Miscelânea > Apurações > Apuração EFD Contribuições | ||||||||||||
Eventos: | Apuração da EFD Contribuições | ||||||||||||
Programa Fonte: | SPED FISCAL | ||||||||||||
Função: | SPEDFFiltro | ||||||||||||
Sintaxe | SPDFIS07 - Conta Contábil registro H010 ( [ cCodProduto ], [ nTipo ], [ cArmazem ] ) --> cRetorno | ||||||||||||
Retorno: |
Importante: Foi removido parâmetro de Armazém, nesta posição é passado parâmetro em branco. |
Exemplo:
#include 'protheus.ch'
#include 'parmtype.ch'
User Function SPDFIS07()
Local cCodProduto := PARAMIXB[1] //Codigo do Produto
Local cSituacao := PARAMIXB[2] // Situação do inventario
Local cRetorno := ""
If cSituacao == '0' //0- Item de propriedade do informante e em seu poder
cRetorno := SB1->B1_CONTA
ElseIf cSituacao== '1' // 1- Item de propriedade do informante em posse de terceiros
cRetorno := "2222"
ElseIf cSituacao== '2' // 2- Item de propriedade de terceiros em posse do informante
cRetorno := "4444"
EndIf
Return cRetorno