adilsonpazzini

Saiu a noticia ref a prorrogação para cancelamento por evento , queria saber se ela será valida para todos os estados ou não , pois como tenho sistemas para outros estados , se nao teria que criar parametro de cancelamento se sera por evento ou o atual . Se alguem souber agradesço Adilson Pazzini . Conforme o Ajuste Sinief 16/12 houve prorrogação de prazo para o cancelamento normal da NF-e, portanto até a data mencionada neste ajuste (31/03/2013), poderão ser utilizadas as duas formas de cancelamento, tanto o modelo atual quanto o futuro (registro de evento).

Preciso de um sistema pra controle de Transportadoras com CT-e integrado . Adilson Pazzini .

Mandei tambem em outro forum . segue abaixo : Paulo Albuquerque View profile Translate to English More options Nov 21, 9:14 am Bom Dia, Adilson! Nesta TAG os campos obrigatórios são o cpodigo da ANP e a UF do estado de consumo, as demais são facultativas. De acordo com a NT 2012.003b, apartir do dia 19 de novembro entrariam em vigor algumas novas regras, incluindo esta do Grupo L1. Aqui no Ceará (e creio que em todo o país) não tem jeito, tem que ser informado pelo menos os dois campos obrigatórios. Na própria NT existe uma tabela com vários produtos incluindo seu código ANP, entre eles existem vários tipos de óleos. Em 21 de novembro de 2012 08:05, ADILSON escreveu: - Show quoted text - -- Um grande abraço! Paulo Albuquerque OBS: Brincadeira o governo ja tem o tal do NCM agora o ANP pra oleo ... onde vamos parar ..

Rejeição - 660 - CFOP de Combustivel e não foi informado grupo de Combustivel da NF-e. Salve galera , estou com um problema para o Estado de GOIAS , um cliente meu foi faturar Oleo pra um cliente consumidor final , com o CFOP - [5656 Venda de combustível ou lubrificante adquirido ou recebido de terceiros destinado a consumidor ou usuário final] , A partir de hoje o webservice deles . rejeitou com o erro 660 , Agora fiquei em duvida , pois como se trata de Oleo e não de Combustivel , mesmo assim devo preencher a TAG - L1 - Detalhamento Específico de Combustíveis , pois vi q la a unica informação q pode ser lançada como oleo seria a tag L102 - cProdANP ref a D02.2 Tabela de Códigos de Produto da ANP (Combustíveis e Lubrificantes) .o restando vi q parece q nao tera como ser informado pois se trata de Combustiveis . queria saber com vc´s se é isso mesmo ... Até a empresa é uma oficina de Motos , e esta vendendo oleo para o Cliente . Desde já agradesço . Sem mais, Adilson Pazzini .

Entao , mais esses campos . podem alterar o valor da soma do agrupamento . o que vc pode fazer , ou é informalos na sequencia ex: SELECT DATA , CODPRODUTO , CAMPO1 , CAMPO2 , CAMPO3 , SUM(CAMPO_VALOR1) , SUM(CAMPO_VALOR2) FROM TABELA WHERE DATA >= '00/00/0000' AND DATA <= '00/00/0000' GROUP BY DATA , CODPRODUTO , CAMPO1 , CAMPO2 , CAMPO3 Pra group by . vc nunca vai conseguir usar com * , sempre terá que informar os campos . Ai o que vc precisa ver é se no informando campo o valor nao soma com por agrupar errado ... ai o que vc pode fazer, ou criar um stored procedure no Firebird q te resulte o valor , ou vc faz um query com o agrupamento por dia e codigo do produto e depois faz outra query em seguida com as outras informações que vc precisa ver . Adilson .

select DATA , CODPRODUTO , sum(CAMPO_VALOR) FROM TABELA WHERE DATA >= '00/00/0000' AND DATA <= '00/00/0000' GROUP BY DATA , CODPRODUTO Ref a data 00/00/0000 vc informa a data que vc quizer OK , ATÉ O LANCE AI ESTA NO SELECT ...SUM . toda vez q utiliza o SUM , vc deve fazer o group by . Pelos campos que vc quer que agrupe / some o valor .

Outro problema que percebi é que quando da o erro ERRO: The operation timed out - URL:https://producao.ginfes.com.br/ServiceGinfesImpl - SOAPAction:"" , no envio para a provedor , e retorna com o erro de Time out , qndo tento enviar novamente , da o erro de ACESS MEMORY . Adilson Pazzini

estou tentando enviar e esta me retornando esse erro [Não é possível carregar crl do certificado] e as vezes tambem ta retornando ERRO: The operation timed out - URL:https://producao.ginfes.com.br/ServiceGinfesImpl - SOAPAction:"" até o segundo erro da a impressao de q o servidor esta demorando demais pra retornar por isso da o time out . mais o primeiro nunca vi este erro e do nada . acaba enviando e protocolando a nfse ... mais as vezes ta dando esse erro de carregar o crl do certificado ... queria saber se alguem ja passou por esse problema ...so pra saber o que é . sem mais, Desde ja agradesço Adilson Pazzini .

Então , como exemplo . vou pegar o estado do PR Q no link ref a NF-e . realmente ele fala q esta com a Contingencia ativada . mais nao fala qual tipo devera ser usada a SCAN ou DPEC .. isso que queria saber onde é possivel saber qual devemos utilizar , pois que nem hj . tenho um cliente no estado do PR . mais nao sei qual tipo de Contingência ativar .... Resultado do link da NF-e: Contingência Ativada CE-Desde 24/8/2012 09:24:35 MG-Desde 9/10/2012 11:31:02 PE-Desde 21/9/2012 11:42:09 PR-Desde 28/10/2012 15:30:00 Contingência Agendada Não há agendamentos para o serviço de contingência.

Valeu galera , agora fica a duvida do seguinte . como vou saber . pelo sefaz mesmo , se o que esta disponivel pra utilização é o SCAN ou o DPEC ... se no site do NF-e fala algo ref a isso . pra poder liberar pro cliente ... Desde ja agradesço Adilson Pazzini .

Aproveitando o Topico , como vou posso saber em qual tipo enviar . se SCAN ou DPEC , ou tanto faz , qualquer um daria certo ? .. ou dependendo do estado é uma forma ou outra ... Desde já agradesço Adilson Pazzini

Boa pessoal , queria saber o seguinte . estou fazendo o cancelamento pelo GINFES , cidade TATUI-SP , e qndo envio o cancelamento ., pego o retorno do retorno Ex: NFSe.NotasFiscais.LoadFromFile('122-nfse.xml'); NFSe.CancelarNFSe('2');//--> cancelamento ... //pegando o retorno . NFSe.WebServices.CancNfse.CodigoCancelamento iif(NFSe.WebServices.CancNfse.DataHora = 0, '',DateTimeToStr(NFSe.WebServices.CancNfse.DataHora)) mais a data sempre retorna ZERADO .. queria saber se é isso mesmo , ou estou pegando de algum lugar errado ... Desde ja agradesço . Sem mais, Adilson Pazzini .

Tem como Aumentar o Tamanho do campo DISCRIMINAÇÃO DOS SERVICOS pra impressao , pois dependendo do tamanho da Descrição . ta criando duas paginas pra impressao ... nao sei se teria como deixa isso uma opcao do componente pra impressao . ate´assim . diminuir a tamnho do fonte ou almentar mesmo o numero de linhas .. se isso seria possive . Adilson Pazzini .

Daniel , queria agradescer sua resposta . Então Daniel , cheguei tambem testar com o SQLDb do proprio Lazarus , e o problema continua , o que fiz , foi alterar o dialeto mesmo , que no caso acabou funcionando conforme passei acima .. o Que fico com duvida entao é assim . hj meu sistema contempla varios modulos , eu queria ir convertendo aos poucos para lazarus. so que pelo que vi . utilizando DELPHI7 , nao vou conseguir fazer isso . acho q teria q converter para uma versao do Delphi mais atual , que suporte UNICODE pra ai começar a utilizar o lazarus e convertendo aos poucos o sistema . Se tiver uma opniao sobre isso . ou qualquer usuario que ja teve esta experiencia . agradesceria se comenta-sem algo . Sem mais, Adilson Pazzini .

Obrigado pela resposta Daniel , até eu cheguei mandar essa pergunta no firebase , e eles la me retornaram dizendo q se eu troca-se o Dialect de 1 para 3 . resolveria meu problema . ate cheguei fazer um teste assim , tipo , agora no lazarus retornou a pesquisa , mais ainda assim . em uma outra ja deu um erro na hora de executar . Ai agora minha duvida fico no seguinte , Se eu troca-se todo o meu banco de ISO8859 para UTF8 , eu tenho o Delphi-7 , Será q no Delphi7 Iria funcionar corretamente o sistema , ou precisaria tambem fazer um upgrade para XE pra que entenda o banco nesse novo CharacterSet UTF8 ..? E assim . ainda eu to vendo tudo isso . justamente pra ir aos pouco convertendo para Lazarus ... Desde já agradesço ., Adilson Pazzini .

AProveitando o Topico . estou com duvidas se em todos os estados , ja está disponivel o cancelamento por Eventos . ou só em alguns estados esta liberado ? ... e se caso exitir algum estado q nao esteja ainda , qual o prazo pra deixar todos funcionando .. Desde ja agradesço Adilson PAzzini .

Aproveitando o Topico . estou utilizando o componente em Homologação , pois estou ainda adaptando o sistema . e ao cancelar um RPS , pelo provedor Ginfes . nao me da erro , mais retorna vazio os campos CodCancelamento=1 DtRetorno= Isso é normal . Adilson Pazzini .

Salve galera ... Vou tentar passar o meu problema . Bom hj tenho um sistema em Delphi 7 com Firebird 2.1 , e qndo iniciei o sistema ate agora estou utilizando o Character Set no Firebird ISO8859_1 , e para campos como Nome utilizo o Colate PT_BR . Ai comecei a fazer alguns projetos em Lazarus utilizando ZEOS , Utilizando essas configuracoes abaixo: DM.DATABASE.Connected := false ; DM.DATABASE.HostName := 'localhost' ; DM.DATABASE.Database := 'c:\sistema\banco.fdb' ; DM.DATABASE.User := 'SYSDBA'; DM.DATABASE.Password := 'masterkey'; DM.DATABASE.Properties.Add('lc_ctype=ISO8859_1'); DM.DATABASE.Properties.Add('codepage=UTF8'); DM.DATABASE.Properties.Add('Dialect=1'); DM.DATABASE.LoginPrompt := False; So que é o seguinte . dependendo da Query que executo , com parametros de pesquisa , ele nao retorna registro nenhum . Se eu fizer uma query simples . tipo de uma tabela só . abre normalmente . ... Existe alguma coisa haver com o Unicode com o Characterset utilizado no banco , pois no Delphi , esta mesma query ,funciona perfeitamente me retornando registros . mais ja no Lazarus nao me resultou nada ... Desde ja agradesço Adilson PAZZINI

with ACBrSPEDFiscal1.Bloco_1 do begin with Registro1001New do begin if CK_BLOCO1010.Checked = false then begin IND_MOV := imSemDados; end else begin IND_MOV := imcomDados; //== reaberto... with Registro1010New do begin IND_EXP := 'N'; IND_CCRF := 'N'; IND_COMB := 'N'; IND_COMB := 'N'; IND_USINA := 'N'; IND_VA := 'N'; IND_EE := 'N'; IND_CART := 'N'; //-- CARTAO DE CRÉDITO .. DEPOIS PRECISA CRIAR OS REGISTROS PARA CARTAO... IND_FORM := 'N'; IND_AER := 'N'; end; { with Registro1600New do begin COD_PART TOT_CREDITO TOT_DEBITO end; } //--REGISTRO DE CARTAO CRÉDITO end;//--> se gera ou nao o bloco 1010 end; end; ACBrSPEDFiscal1.WriteBloco_1; Tenta assim pra ver .. no meu dessa forma ta dando Certo ... Adilson .

Bom não sei se seria a melhor opção . mais acabei pegando o valor do campo ConsNfseRps.RetWS e criando o arquivo xml pelo savetofile do TStringList. Abaixo a Rotina ... se alguem achar algo errado por favor postar . Obrigado ... NFSe.ConsutarNFSeporRps(NFSe.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero, NFSe.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie, TipoRPSToStr(NFSe.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo), NFSe.NotasFiscais.Items[0].NFSe.Prestador.Cnpj, NFSe.NotasFiscais.Items[0].NFSe.Prestador.InscricaoMunicipal); aTEXTO := NFSe.NotasFiscais.Items[0].Msg+sLineBreak+ '[sTATUS]'+sLineBreak+ 'Protocolo='+nfse.WebServices.ConsNfseRps.NFSeRetorno.ListaNfse.CompNfse.Items[0].Nfse.Protocolo+sLineBreak+ 'CodVerificacao='+nfse.WebServices.ConsNfseRps.NFSeRetorno.ListaNfse.CompNfse.Items[0].Nfse.CodigoVerificacao+sLineBreak+ 'Numero='+nfse.WebServices.ConsNfseRps.NFSeRetorno.ListaNfse.CompNfse.Items[0].Nfse.Numero+sLineBreak+ 'XML='+UTF8Encode(NFSe.WebServices.ConsNfseRps.RetWS)+sLineBreak; aProtocolo :=nfse.WebServices.ConsNfseRps.NFSeRetorno.ListaNfse.CompNfse.Items[0].Nfse.Protocolo; aVerificacao :=nfse.WebServices.ConsNfseRps.NFSeRetorno.ListaNfse.CompNfse.Items[0].Nfse.CodigoVerificacao; aNumeroNFSe :=nfse.WebServices.ConsNfseRps.NFSeRetorno.ListaNfse.CompNfse.Items[0].Nfse.numero; //===> salvando arquivo xml do nfs-e if (aNumeroNFSe <> '') and (UTF8Encode(NFSe.WebServices.ConsNfseRps.RetWS)<>'') then if not FileExists(trim(FATNFMonitor.edtPastaMensal.text)+ExtractYearMonth(qry.fieldbyname('DTEMI').asdatetime)+'\'+inttostr(strtoint(aNumeroNFSe))+'-nfse.xml') then begin aXML:=TStringList.Create; try aXML.Clear; // Usando para add outros e-mail como Com-Cópia aXML.Add(UTF8Encode(NFSe.WebServices.ConsNfseRps.RetWS)); aXML.SaveToFile(trim(FATNFMonitor.edtPastaMensal.text)+ExtractYearMonth(qry.fieldbyname('DTEMI').asdatetime)+'\'+inttostr(strtoint(aNumeroNFSe))+'-nfse.xml'); finally aXML.Free; end; end;

Acho que poderia deixar o tipo tpSemPagamento , Mais bloquealo no C100

Alguem sabe me dizer nessa função . como posso fazer pra poder gravar o xml de retorno da NFS-e ..? sem mais, Adilson Pazzini .

ja ta no Site do lazarus http://www.lazarus.freepascal.org/ E ja disponivel pra baixar . Adilson .

Protocolo := acbrNfse1.NotasFiscais.Items[0].NFSe.Protocolo; CodVerificacao := acbrNfse1.NotasFiscais.Items[0].NFSe.CodigoVerificacao;

Então GALERA . ref a alteração TACBrTipoPagamento = ( tpVista, // 0 - À Vista tpPrazo, // 1 - A Prazo tpOutros, // 2 - Outros tpNenhum // Preencher vazio ); de tipo excluir o tipo 9 ... Para o bloco A100 a.. o tpSemPagamento , deve continuar existindo . pois o Validador exige esse campo . Adilson Pazzini .