Histórico da Página

#INCLUDE "PROTHEUS.CH"

//-------------------------------------------------------------------
/*/{Protheus.doc} SPDFIS11
@description Alterar Serie da nota nos registros do SPED FISCAL e Contribuições
@parameters  
Paramixb[1] => Serie NF
Paramixb[2] => Especie do Documento
@return cSerie
@author xxxxxxxxxxx
@since xx/xx/xxxx
@version 0.0.1
/*/
//-------------------------------------------------------------------
User Function SPDFIS11()

Local cSerie    := Paramixb[1]
Local cEspecie  := Paramixb[2]

IF Alltrim(cSerie) $ "1A" .And. cEspecie = '55'
    cSerie := "001"
Endif

Return cSerie