Histórico da Página

01. DADOS GERAIS

Linha de Produto:	Microsiga Protheus®
Segmento:	Serviços
Módulo:	Fiscal
Programa:	SPEDFISCAL

02. VISÃO GERAL

Este ponto de entrada possibilita a alteração dos seguintes campos do registro C100 do SPED IPI/ICMS:

13 - IND_PGTO (Indicador do tipo de pagamento);
17 - IND_FRT (Indicador do tipo de frete) e/ou
03 - IND_EMIT (Indicador do emitente do documento fiscal).

03. ESPECIFICAÇÃO

Parâmetros do ponto de entrada

Nome

Tipo

Descrição

Obrigatório

PARAMIXB

Array of Record

[1] = Alias da tabela temporária de processamento do SPED

[2] = Array contendo dados do documento final

[3] = Array contendo dados para gravação do registro C100 do Sped Fiscal.

X

Retorno

Nome

Tipo

Descrição

aRet

Array

Array com as informações

aRet [01] = Indicação de pagamento

aRet [02] = Indicador do tipo do frete

aRet [03] = Indicador do emitente do documento fiscal

04. EXEMPLO DE UTILIZAÇÃO

Exemplo 1: Alterando apenas os campos 13 - IND_PGTO e 17 - IND_FRT

...

Bloco de código

language	java
theme	Midnight
title	SPDFIS05
linenumbers	true
collapse	true

#Include "Protheus.ch"
#Include "TopConn.ch"
 
User Function SPDFIS05()
    Local cAlias    := ParamixB[1]
    Local aDoc      := ParamixB[2]
    Local aC100     := ParamixB[3]
    Local aRet      := {}
    Local nPos
    
    nPos := Len(aC100)
 
    If aC100[nPos][6] == "08" .And.; // 06 - COD_SIT
       aDoc[3] == "SP0001" .And.; // Cliente
       aDoc[4] == "01" .And.; // Loja
       aDoc[9] == "5102" // CFOP
        aAdd(aRet, aC100[13]) //mantem-se o valor já informado para o campo 13-IND_PGTO
        aAdd(aRet, aC100[17]) //mantem-se o valor já informado para o campo 17-IND_FRT
        aAdd(aRet, "1") //altera o valor que será apresentado no campo 03-IND_EMIT
    Endif
 
Return aRet

05. DEMAIS INFORMAÇÕES

Não há.

Árvore de páginas

Versões comparadas

Versão antiga 6

Nova versão 7

Chave