Gerando Registros do SPED Completo |
Gera o relatório do SPED Fiscal com todos os registros obrigatórios.
Parâmetros:
cOrigem: variável STRING com path+nome do arquivo contendo o download da MFD (.mfd). Caso este parâmetro seja NULL, a dll fará o download automaticamente com base no período de datas informado.
cDestino: variável STRING com path+nome do arquivo texto de destino.
cDataInicial: variável STRING com a data inicial no formato "DD/MM/AAAA".
cDataFinal: variável STRING com a data final no no formato "DD/MM/AAAA".
cPerfil: variável STRING com o perfil do relatório a ser gerado, sendo "A", "B" ou "T", onde T = Todos os registros (A e B).
cCFOP: variável STRING com o código CFOP do estabelecimento, com o tamanho de 4 dígitos.
cCodObsLancFiscal: variável STRING com o código da observação do lançamento fiscal, com o tamanho de 6 dígitos. Caracter branco caso opcional.
cAliquotaPis: variável STRING com o valor percentual da alíquota para o cálculo do PIS, com o tamanho de 4 dígitos sem a vírgula (0000) ou 5 dígitos com a vírgula (00,00).
cAliquotaCofins: variável STRING com o valor percentual da alíquota para o cálculo do COFINS, com o tamanho de 4 dígitos sem a vírgula (0000) ou 5 dígitos com a vírgula (00,00).
cEmpresa: variável STRING com o nome do estabelecimento, com o até 80 caracteres.
cCodMunicipioIBGE: variável STRING com o código do município na tabela do IBGE.
Observações:
Possíveis retornos da Função (INTEIRO):
0: Erro de comunicação. 1: OK. 3: Não foi possível criar arquivo TXT. 4: Data informada inválida. -1 - Erro de execução da função. -2: Parâmetro inválido na função. -4: O arquivo de inicialização BemaFI32.ini não foi encontrado no diretório de sistema do Windows. -5: Erro ao abrir a porta de comunicação. -27: Status da impressora diferente de 6,0,0 (ACK, ST1 e ST2).
Exemplo:
' Exemplo em Visual Basic iRetorno = Bematech_FI_GeraRegistrosSpedCompleto("C:\download.mfd", "C:\resultado.txt", "01/09/2010", "30/09/2010", "T", "5929", " ", "00,00", "00,00", "Empresa Tal", "1234567")
// Exemplo em Delphi cArquivoMFD := 'C:\download.mfd'; cArquivoTXT := 'C:\resultado.txt'; cDataInicial := '01/09/2010'; cDataFinal := '30/09/2010'; cPerfil := 'T'; cCFOP := '5929'; cCODOBSFiscal := ' '; cAliqPIS := '00,00'; cAliqCOFINS := '00,00'; cEmpresa := 'Empresa Tal'; cCodMunicipio := '1234567';
iRetorno = Bematech_FI_GeraRegistrosSpedCompleto( pchar( cArquivoMFD ), pchar( cArquivoTXT ), pchar( cDataInicial ), pchar( cDataFinal ), pchar( cPerfil ), pchar( cCFOP ), pchar( cCODOBSFiscal ), pchar( cAliqPIS ), pchar( cAliqCOFINS ), pchar( cEmpresa ), pchar( cCodMunicipio ) ); |