adilsonpazzini

Então . existe algumas empresa q utilizo o ACBRNFeMonitor CAPICOM , onde q a senha é solicitada toda vez q Monitor é reiniciado . informando a senha uma vez . ele nao chama mais , tambem tem outras que ao informar la a SERIE do certificado e a senha . ele nem pede , qndo carrega , funciona estilo o PFX . e tambem tem outras q pedem a senha a toda requisição feita pro Monitor , ate esta ultima estou tentando ver o porque isso ... E nessa q ta pedindo toda hora , ja foi instalado no WIndows 2003 Server e Windows 7 . a ambos pedem a senha PIN a cada requisicao do ACBRmonitor , agora fiquei de testar em um XP pra ver se vai pedir . ADilson

Se vc ja trabalha com ACBRNfeMONITOR . entao tá facil . so trocar a versao de OpenSSL pela CAPICOM .ai a forma deusar e igual . A diferença vc vai ver que a CAPICOM vai buscar o serial do Cerficado no Internet Explorer em vez do Arquivo PFX . o resto é tudo igual . Pra baixar a versao CAPICOM pode pegar no site http://anfm.blogspot.com/ Adilson PAZZINI .

Ou usar o ACBRnfemonitor Capicom , ai no caso .vc pode gerar o xml pelo seu programa hj q utiliza Openssl , e na hora de assinar , e enviar pros webservices . vc podera utilizar o ACBRNfeMonitor . enviando por comando TCP ou arquivo TEXTO mesmo , até será mais viavel ,. pois os certificados TOKEN . nao tem como vc compartilhar via Rede . por isso seria interessante utilizar o ACBRNFeMonitor .. Adilson Pazzini

Ate a versao 1.0.4 , O pva nao pedia a chave , qndo a NF-e é cancelada , agora atualizando pra versao 1.0.5 , esta obrigando q tenha chave , mesmo qndo a NF-e esteja cancelada ... alguem ja notou isso ? até na verdade estou postando mais pra confirmar , pois este procedimento novo nao nescessitaria de alteracao no componente . so na forma de gerar mesmo ... Adilson Pazzini .

Esses procedimentos podem ser feitos tambem , qndo o certificado é da caixa ? , ref. a cadeia de certificados da Certisising? Adilson

Chegou a ver se o certificado ta aparcendo no Internet Explorer , igual o marcio falou ai ?

O gozado é que vem uma tela Dizendo Login .... tava vendo nas configurações do Token, que tem um tempo de expiração do PINN . como se fosse um login . Algum ja viu algo parecido... AdiLSON Pazzini

Só pra registrar , o Certifcado é da Caixa Economica PJ X1 o Software do Certificado é o Charismathics Security Token Configurator ... Se alguem ja passou por isso , se possivel me ajude . Adilson Pazzini .

Então Ricardo . até tenho alguns clientes que funcionam assim . mais esse dias , um cliente novo meu da Bahia , foi instalado o novo Certificado , e só q toda solicitação WebService ele ta me pedindo pra informar a Senha PINN , Tipo se vou enviar uma NF-e . ele pede a Senha PINN e ai se eu for enviar outra ele pede novamente . tipo sempre pedindo a senha . toda vez que faz qualquer solicitacao pro monitor , não sei se isso é algum parametro da Instalacao do Cerficado . mais fico horrivel pro cliente ... agora nao sei se isso e desses cerficados 2.0 que saiu . ou se foi feito algum configuracao errada mesmo , na instalacao ... Desde ja agradesço Adilson .

Bom , consegui resolver , o problema esta no Layout do XML q foi me passado errado . acertando consegui enviar . Queria saber o seguinte , eu consegui enviar somente utilizando o componente HTTPReqResp1 , e pelo HTTPRIO1 não deu certo ,queria saber qual a diferença de fazer de um pra outro ? alguem poderia me ajudar . so pra conhecimento . a diferença do HTTPRIO1 para o HTTPReqResp1 ? Sem mais, Adilson Pazzini

Bom dia amigos , estou desenvolvendo uma Aplicação , que faz um tipo de um re-envio do xml da NF-e pra um webservice de uma empresa , só tentei utilizando os componenetes HTTPRIO1 e o HTTPReqResp1 , e o maximo que consegui foi um retorno do webservice dizendo que o arquivo não é um XML valido , estou postando em conjunto a aplicação com os fontes . para que se possivel algume que tenha conhecimentos mais avançado possa me ajustar de alguma forma , o sistema faz o seguinte , qndo é clicado na forma de envio vai em busca do arquivo XML , e ai localizando os arquivos XML da NF-e . associo com ACBRNfe , e ai pego a propriedade XML do componenete e envio para o WebService no metodo que ta la que se chama EnviaXML . tambem queria saber qual a diferença de enviar pelo HTTPRIO1 para o HTTPReqResp1 ? Site do WebService : http://portaldealerasp.t-systems.com.br ... nline.asmx e em conjunto o segue os fontes do programa , os XML de nfe valido para envio que estão em uma sub pasta \201201 o manual que esta na sub pasta \manual , Quem puder me ajudar eu agradesço desde já Adilson Pazzini . WebServiceTesteAak.rar

Pessoal . seguinte . outro problema que me aconteceu , não sei se é alguma regra nova ref a versão 2.0 dos cerficados , ou alguma Opçao de Instação tambem do Certificado . mais toda vez agora que vai Emitir uma NF-e ou Consultar um Status do Webservice , o sistema pede a Senha PINN , alguem ja passou por isso ? Delphi 7 , ACBRNfeMonitor , Via Sockets .. Desde ja Agradesço , Adilson Pazzini

Existe alguma forma se informar a senha PINN pelo proprio ACBRNfeMonitor , sem precisar ter que informar onde o certificado esteja ? Adilson Pazzini .

Beleza . valeu Galera ... ADILSON

Boa tarde pessoal , feliz ano novo pra tudo mundo ai, Seguinte . tentei procurar algumas coisa ref a isso , mais não encontrei no forum . alguem sabe me dizer se tem como Deixar o ACBRNFeMonitor como Servico do Windows , pois tenho um cliente . onde ele vai instalar no Servidor dele . e queria que ja inicia-se mesmo sem que precise q logue algum usuario pra poder carregar ... Alguem sabe se isso é possivel . Sem mais, Adilson PAZZINI

Eu faço assim . e fica correto pra mim ... isso CRT=3 =========> CST := cst60 ; with Imposto do begin with ICMS do begin if (varCRT = '1') then //--> se for simples nacional ... begin if QItensP.FieldByName('CSOSN').AsString = '101' then CSOSN := csosn101 else if QItensP.FieldByName('CSOSN').AsString = '102' then CSOSN := csosn102 else if QItensP.FieldByName('CSOSN').AsString = '103' then CSOSN := csosn103 else if QItensP.FieldByName('CSOSN').AsString = '201' then CSOSN := csosn201 else if QItensP.FieldByName('CSOSN').AsString = '202' then CSOSN := csosn202 else if QItensP.FieldByName('CSOSN').AsString = '203' then CSOSN := csosn203 else if QItensP.FieldByName('CSOSN').AsString = '300' then CSOSN := csosn300 else if QItensP.FieldByName('CSOSN').AsString = '400' then CSOSN := csosn400 else if QItensP.FieldByName('CSOSN').AsString = '500' then CSOSN := csosn500 else if QItensP.FieldByName('CSOSN').AsString = '900' then CSOSN := csosn900; end else begin //---> regime normal .. CRT=3 if QItensP.FieldByName('CODTRB').AsString = '03' then //--- tributado Integralmente CST := cst00 else ///====> o seu caso aqui ...... if QItensP.FieldByName('CODTRB').AsString = '08' then //--> substituição Tributária CST := cst60 else if QItensP.FieldByName('CODTRB').AsString = '09' then CST := cst60 else if QItensP.FieldByName('CODTRB').AsString = '10' then CST := cst00 else if QItensP.FieldByName('CODTRB').AsString = '04' then CST := cst40 else if QItensP.FieldByName('CODTRB').AsString = '83' then //-- imobilizado com ICM CST := cst00 else if QItensP.FieldByName('CODTRB').AsString = '88' then //-- imobilizado com ST CST := cst60 ; end;//-->encerrando CRT... if (QItensP.fieldbyname('VRSBT').asfloat > 0) and (QItensP.fieldbyname('VRICM').asfloat > 0) then begin CST := cst10 ; //--> calculo icms st .... ICMS.vBCST := STRTOFLOAT(FORMATFLOAT('#0.00',QItensP.fieldbyname('BSSBT').asfloat)) ; ICMS.vICMSST := STRTOFLOAT(FORMATFLOAT('#0.00',QItensP.fieldbyname('VRSBT').asfloat)) ; ICMS.modBC := dbiPrecoTabelado; ICMS.pICMS := QItensP.fieldbyname('PCICM').asfloat ; ICMS.vBC := STRTOFLOAT(FORMATFLOAT('#0.00',QItensP.fieldbyname('BSICM').asfloat)) ; if QItensP.fieldbyname('PCICM').asfloat > 0 then ICMS.vICMS := STRTOFLOAT(FORMATFLOAT('#0.00',QItensP.fieldbyname('VRICM').asfloat)) ; end else begin ICMS.modBC := dbiPrecoTabelado; ICMS.pICMS := QItensP.fieldbyname('PCICM').asfloat ; ICMS.vICMS := STRTOFLOAT(FORMATFLOAT('#0.00',QItensP.fieldbyname('VRICM').asfloat)) ; ICMS.vBC := STRTOFLOAT(FORMATFLOAT('#0.00',QItensP.fieldbyname('BSICM').asfloat)) ; end; //==== origem da mercadoria ======================================= if QItensP.FieldByName('ORIMER').AsString = '0' then //=0-Nacional ICMS.orig := oeNacional else if QItensP.FieldByName('ORIMER').AsString = '1' then //=1-Estrangeira-Importação Direta ICMS.orig := oeEstrangeiraImportacaoDireta else if QItensP.FieldByName('ORIMER').AsString = '2' then //=2-Estrangeira-Adquirida no Mercado Interno ICMS.orig := oeEstrangeiraAdquiridaBrasil else ICMS.orig := oeNacional; end;//--TAG ICMS....

Quando imprime essa Mensagem NFe Não autorizada , quer dizer que a Tag protnfe não está presente no XML que vc ta carregando no componente pra imprimir ... comigo as vezes acontece de enviar e vir o resultado mais nao incluir esta tag . ai qndo acontece isso , eu faço a consulta da NF-e pela chave e quando vem o resultado acaba sendo incluido essa tag protnfe, isso é claro se realmente tiver autorizada la no sefaz. Adilson Pazzini

Isso é um problema na versão do seu Schemas , ja existe um topico falando sobre isso .

Hj ja tem o Padrão GINFES e ABRASF funcionando para algumas cidades , existem tambem ja um demo explicando como funciona . basta apenas instalar o componente e testalo pelo DEMO , poderia passaar de qual Cidade e Estado vc está precisando que funcione , se puder tambem qual o provedor fornecedor do NFS-e da cidade em questão ... Adilson Pazzini

Capturar Ultimo Componente Acionado Delphi , cheguei a ver algo como Pegar nome do Formulário -> Screen.ActiveForm.Name e o componenete que o foco parou - > Screen.ActiveForm.ActiveControl.Name , mais o que eu queria mesmo era saber qual foi o ultimo botão acionado , até o problema ref ao foco , seria que eu utilizo o componente speedButton . e o mesmo nao fica com o foco nele e por isso nao mostra nessa variavel Screen.ActiveForm.ActiveControl.Name , queria saber se existe alguma forma de conseguir pegar qual foi o botao / ou procedimento executado , pois estou montando um arquivo de log e preciso saber qual foi o evendo gerador do erro . Sem mais, Adilson PAZZINI

Tenta a 0.9.30rc2 .... link abaixo . ftp://ftp.freepascal.org/pub/lazarus/re ... 32%20bits/ Adilson .

Valeu ... a todos . Adilson

No caso para caso exista os código GTIN-8, GTIN-12, ou GTIN-14 (antigos códigos EAN, UPC e DUN-14) , como procederia para o calculo desses outros Padrões ? Adilson Pazzini .

Valeuuu ... muito Obrigadooo ...

Pessoal , tentei ver no DEMO do validador esta funcção pra validação de EAN . e não achei . vc teria um exemplo de como proceder para validar o EAN? sem mais, Adilson Pazzini.