Histórico da Página
01.
...
DATOS GENERALES
| Linha Línea de Produtoproducto: | Microsiga Protheus® |
|---|---|
| Segmento: | ServiçosServicios |
| Módulo: | Fiscal |
| Programa: | SPEDFISCAL |
02.
...
VISIÓN GENERAL
Este ponto punto de entrada possibilita a alteração dos seguintes campos do registro C100 do permite la modificación de los siguientes campos del registro C100 del SPED IPI/ICMS:
- 13 - IND_PGTO (Indicador do del tipo de pagamentopago);.
- 17 - IND_FRT (Indicador do del tipo de freteflete) e y/ouo
- 03 - IND_EMIT (Indicador do emitente do del emisor del documento fiscal).
03.
...
ESPECIFICACIÓN
Parámetros del punto de entrada
NomeNombre | Tipo | DescriçãoDescripción | ObrigatórioObligatorio |
|---|---|---|---|
| PARAMIXB | Array of Record | [1] = Alias da tabela temporária de processamento do Alias de la tabla temporal de procesamiento del SPED [2] = Array contendo dados do Array con los datos del documento final [3] = Array contendo dados para gravação do Array con los datos para grabación del registro C100 do del Sped Fiscal. | X |
...
Devolución
NomeNombre | Tipo | DescriçãoDescripción |
|---|---|---|
| aRet | Array | Array com as informaçõescon la información aRet [01] = Indicação Indicación de pagamentopago aRet [02] = Indicador do del tipo do fretede flete aRet [03] = Indicador do emitente do del emisor del documento fiscal |
04.
...
EJEMPLO DE
...
UTILIZACIÓN
Exemplo Ejemplo 1: Alterando apenas os Al modificar solamente los campos 13 - IND_PGTO e 17 y17 - IND_FRT
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#Include "Protheus.ch"
#Include "TopConn.ch"
User Function SPDFIS05()
Local cAlias := ParamixB[1]
Local aDoc := ParamixB[2]
Local aC100 := ParamixB[3]
Local cIndpagto := ""
Local cIndfrt := ""
//conteudocontenido dodel array dodel documento fiscal
//01-docto fiscal
//02-serie nffact
//03-cliente/fornecedorproveedor
//04-codigocódigo lojatienda
//05-datafecha docto
//06-datafecha emissaoemision
//07-datafecha cancelamentoanulacion
//08-formulario propriopropio
//09-CFOP
//10-vaziovacio
//11-aliquotaalicuota ICMS
//12-numero PDV
//13-base ICMS
//14-aliquotaalicuota ICMS
//15-valor ICMS
//16-valor isentoexento ICMS
//17-outrosotros ICMS
//18-ICMS retidoretenido ST
//19-contaCuenta contabilcontable
//20-tipo lanctoasto
//21-tipo freteflete
//22-filialsucursal
//23-estado
//24-observacaoobservacion
//25-chaveclave NFE
//26-tipo emissaoemision
//27-prefixoprefijo
//28-duplicatafactura de credito
//29-cupomcomprobante fiscal
//30-transportadoraEmpresa de transportes
//31-peso bruto
//32-peso liquidoneto
//33-veiculovehiculo 1
//34-veiculovehiculo 2
//35-veiculovehiculo 3
//36-optante pelopor el simples nacional
//37-regimeregimen Paraiba
//38-NFFact original
//39-serie nffact original
If (cAlias)->FT_NFISCAL == "000000001"
cIndpagto := "0"
cIndfrt := "0"
Endif
Return {cIndpagto,cIndfrt} |
Exemplo Ejemplo 2: Alterando apenas o Al modificar solamente el campo 03 - IND_EMIT
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#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 := Len(aC100)
aAdd(aRet, aC100[nPos][13]) //mantém-se omantiene el valor já informado para oel campo 13-IND_PGTO
aAdd(aRet, aC100[nPos][17]) //mantém-se omantiene el valor já informado para oel campo 17-IND_FRT
If aC100[nPos][6] == "08" .And.; // 06 - COD_SIT
aDoc[3] == "SP0001" .And.; // Cliente
aDoc[4] == "01" .And.; // LojaTienda
AllTrim(aDoc[9]) == "5101" // CFOP
aAdd(aRet, "1") //alteramodifica oel valor que seráse presentará apresentadoen noel campo 03-IND_EMIT
Endif
Return aRet |
05.
...
OTRAS INFORMACIONES
No hay
...
Não há.
Visão Geral
Import HTML Content
Conteúdo das Ferramentas