Certificados A3

Como emitir NFSe em Brasília utilizando um certificado A3

ALTER TABLE Faturamento_Servico_Nota_Itens ADD Cnae TEXT(20);
ALTER TABLE Faturamento_Servico_Nota ADD CodIntermediario INT;
ALTER TABLE Faturamento_Servico_Nota ALTER COLUMN idNfse VARCHAR(50);
ALTER TABLE Faturamento_Servico_Nota ALTER COLUMN Nota INT;
ALTER TABLE Faturamento_Servico_Nota ALTER COLUMN MunPrestacao INT;
ALTER TABLE Faturamento_Servico_Nota ADD COLUMN idEmpresa INTEGER;
(definir o valor padrão desse campo para o Código da empresa que está em CD_EMPRESA)
CREATE INDEX Nota ON Faturamento_Servico_Nota_Itens(Nota)
CREATE INDEX CST_ISS ON Faturamento_Servico_Nota_Itens(CST_ISS)
ALTER TABLE Faturamento_Servico_Nota_Itens ADD ISSRetido BIT
ALTER TABLE Faturamento_Servico_Nota_Itens ALTER COLUMN CST_ISS VARCHAR(5);
ALTER TABLE Faturamento_Servico_Nota ADD InformacaoComplementar MEMO;
INSERT INTO CD_CONFIG_CAMPO (CODIGO, DESCRICAO) VALUES (596, "FATURAMENTO: EMISSÃO NFSE BRASILIA COM A3 (0=NÃO(PADRAO)/1=SIM):");
ALTER TABLE Faturamento_Servico_Nota ADD DataGeracao DATETIME;
ALTER TABLE Faturamento_Servico_Nota ADD COLUMN MunIncidencia INT;
CREATE TABLE Faturamento_Servico_Nota_Deducoes
(
Codigo AUTOINCREMENT,
CodigoNfse INT,
TipoDeducao INT,
DescricaoDeducao TEXT(150),
DataEmissao DATE,
ValorDedutivel MONEY,
ValorUtilizadoDeducao MONEY,
TipoIdentificacao BYTE,
ValorDocumento MONEY,
NumeroDocumento TEXT(9),
CodigoMunicipioGerador INT,
CodigoVerificacao TEXT(9),
UfNfe TEXT(2),
ChaveAcessoNfe TEXT(44),
IdentificacaoDocumento TEXT(255),
CpfCnpj TEXT(18),
NifFornecedor TEXT(40),
CodigoPais INT
);
CREATE TABLE Faturamento_Servico_Nota_Eventos
(
Codigo AUTOINCREMENT,
CodigoNfse INT,
IdentificacaoEvento TEXT(30),
DescricaoEvento TEXT(255)
);

ATENÇÃO, É IMPORTANTE EXECUTAR ESTAS SQL TAMBÉM, NO BANCO DE DADOS!
NA PRIMEIRA VEZ DO CLIENTE PARA AJUSTAR A TABELA FATURAMENTO_TIPO_ISS

SQL QUE COLOCA ZERO NA FRENTE DO CST DO SERVIÇO

UPDATE FATURAMENTO_TIPO_ISS SET FATURAMENTO_TIPO_ISS.CODIGO = "0" & [FATURAMENTO_TIPO_ISS]![CODIGO]
WHERE (((Left([FATURAMENTO_TIPO_ISS]![CODIGO],1))<10) AND ((Len([FATURAMENTO_TIPO_ISS]![CODIGO]))=4));

SQL TIRAR PONTO DA LISTA DE SERVIÇO

UPDATE FATURAMENTO_TIPO_ISS SET FATURAMENTO_TIPO_ISS.MUN = Replace([FATURAMENTO_TIPO_ISS]![MUN],".","");

 

O QUE O GERENCIADOR NÃO ATENDE 05/01: 
Repositório com os arquivos: AQUI

 

 

 

 


Revision #21
Created 3 January 2023 00:03:19 by Admin
Updated 5 February 2024 18:59:47 by Gustavo Henrique Braga Fernandes