Histórico da Página
01. DADOS GERAIS
Linha de Produto: | Microsiga Protheus® |
---|---|
Segmento: | Serviços |
Módulo: | Fiscal |
02. DESCRIÇÃO
Inclusão do ponto de entrada FSA231UND na rotina FISA230 - Apuração do Ressarcimento, da Restituição e da Complementação do ICMS-ST para o Estado de Santa Catarina, a DRCST.
...
O ponto de entrada é acionado durante a apuração do ressarcimento, para cada documento fiscal, e a tabela F1M, ao fim do processamento, deverá armazenar os valores retornados pelo ponto nos campos F1M_QTDMOV, F1M_UNIDAD, F1M_FATCON. O campo F1M_QTDCON será resultado da multiplicação dos campos F1M_QTDMOV e F1M_FATCON. Tais valores serão posteriormente utilizados na geração do arquivo a ser transmitido.
03. Especificação
Programa | FISA231.PRW FISA230A.PRW |
---|---|
Sintaxe | FSA231UND- Unidade de medida e quantidade do item informadas no documento fiscal ( [cAlias] ) --> aRet |
Parâmetros do ponto de entrada:
Nome | Tipo | Descrição |
---|---|---|
PARAMIXB[1] | Caracter | Alias posicionado (será o alias da query utilizada no processamento do movimento). |
Retorno:
O ponto de entrada deverá retornar um array de 4 posições:
...
Aviso | ||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||||||||||||||||||||||||||||||||||||||||||
Segundo disposições da Portaria SEF N° 378/2018, o campos FAT_CONV dos Registros 2112, 2113 e 2130 devem possuir 6 casas decimais. Na rotina FISA230, tais campos são representados pelos campos F1K_FATCON e F1M_FATCON, que originalmente possuem apenas 2 decimais. Neste caso, quando o retorno do ponto de entrada indicar um fator de conversão com mais decimais, é recomendada a alteração dos decimais dos campos campos F1K_FATCON e F1M_FATCON conforme abaixo, via Configurador:
|
04. EXEMPLO DE UTILIZAÇÃO
O exemplo abaixo considera a utilização da segunda unidade de medida da tabela SB1:
...
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE "PROTHEUS.CH" #INCLUDE "RWMAKE.CH" User Function FSA231UND() Local cAlsMov := PARAMIXB[1] //---Alias posicionado---// Local aRetorno := {} Local aAreaAnt := GetArea() If (cAlsMov)->FT_TIPOMOV == 'E' DbSelectArea('SD1') SD1->(DbSetOrder(1)) //---D1_FILIAL+D1_DOC+D1_SERIE+D1_FORNECE+D1_LOJA+D1_COD+D1_ITEM---// If SD1->(DbSeek(xFilial("SD1") + (cAlsMov)->(FT_NFISCAL+FT_SERIE+FT_CLIEFOR+FT_LOJA+FT_PRODUTO+FT_ITEM))) If !Empty(SD1->D1_QTSEGUM) .And. !Empty(SD1->D1_SEGUM) Aadd(aRetorno, SD1->D1_SEGUM) //---Unidade de medida do item no Documento Fiscal---// Aadd(aRetorno, SD1->D1_QTSEGUM) //---Quantidade do item no Documento Fiscal---// Aadd(aRetorno, (1/(cAlsMov)->B1_CONV)) //---Fator de Conversão para a unidade de medida constante no Registro 0200---// Aadd(aRetorno, (cAlsMov)->B1_TIPCONV) //---Tipo de Conversão: M-Multiplicação / D-Divisão---// EndIf EndIf EndIf RestArea(aAreaAnt) Return aRetorno |
05. DEMAIS INFORMAÇÕES
Não há.
06. ASSUNTOS RELACIONADOS
- FISA230 - Apuração do Ressarcimento, da Restituição e da Complementação do ICMS-ST para o Estado de Santa Catarina - DRCST
- Portaria SEF N° 378/2018
...