adilsonpazzini

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.

Obrigado Kiko ... Outra coisa alguem sabe se o ACBR tem algum componente /ou função que faça consistencia do Código EAN digitado , para verificação se o codigo é valido ou não ? Sem mais, Adilson Pazzini

Outra coisa . meu cliente acho que ele leu este post . e entendeu q ele mesmo criaria seu proprio codigo de barras ... http://www.robertodiasduarte.com.br/sef ... om-fiscal/ Só que o que eu entendi é que . caso ele tenha o codigo de barras GTIN do fabricante , ele teria que utilizar este codigo pra impressao da NF . e caso não exista ele mesmo poderia criar . só que entendo que não seria um GTIN válido , somente interno . e que sairia na NF . mais não nas tag´s cEAN e cEANTrib ... Se alguem tiver mais informações . por favor continuem este poste .até que seja bem esclarecido .. Adilson Pazzini

Então Kiko. até o que estou comentando é ref ao XML mesmo. e não ao Danfe ... só pra confirmar então . a criação do Código de Barras teria que ser feita pela GS1 Brasil . isso pra que seja informada no XML na tag cEAN e cEANTrib ...caso não tenha esse codigo cadastrado na GS1 Brasil . ai eu nao informaria essas Tags cEAN e cEANTrib ...? Obrigado .. Adilson Pazzini

Então Italo , foi isso que o pessoal da GS1 Brasil falou . que o eminte não poderia criar este codigo , a não ser que ele fosse o fabricante . e ainda sim esse codigo tem que vir desta empresa GS1 Brasil .E que jamais podera ser criado um codigo de barras EAN sem passar por eles . Se alguem tiver mais informações . por favor continuem este poste .até que seja bem esclarecido .. Obrigado . ADILSON

Rapaziada . to numa emcubaredeira , o Contador de um cliente meu , disse que ele mesmo criar seus Codigos de Barras , ele comentou comigo q quando não vem o codigo de barras do FABRICANTE , ele mesmo criar , até tem um sistema dele que cria este codigo , iniciando com o 789 ... agora fiquei perdido . pois ligando na empresa q faz essas criações , a pessoa me comentou que jamais pode criar o codigo de barras .pois tem que vir deles ... e ai esse cliente me pede um programa pro proprio sistema gerar um codigo de barras ... Quem devo obedecer agora ...? Quem ja passou e puder me ajudar agradesco ... Caso realmente seja possivel a criação do codigo de barras , existe algum componente que faça isso . a criação do codigo e nao a impressao ... Desde já agradesco a todos. Adilson Pazzini

Bom , liguei na empresa responsável por criar os códigos de barras , ela me informou , que é obrigatório informar o código barras . quando este código ja vem informado do Fabricante , ai sim temos que replicar esse EAN , caso não existe não é obrigatório . Deixo em anexo um arquivo em PDF que comenta sobre esse Caso . Microsoft_Word_-_FAQ_-_Obrigatoriedade_GTIN.pdf

Valeu Italo pelos esclarecimentos . Adilson Pazzini

Ajudou sim Italo , mais só mais uma Duvida esse codigo de Barras seria obrigatório ser informado na emissão da NF-e caso o emitente for emisso de ECF , caso não seja emisso de ECF . acho q tambem não tem obrigatóriedade de informar este campo no XML da nf-e? Muito Obrigado . Adilson Pazzini

Bom dia , pessoal . alguem poderia me dizer ref a esse código de Barras , pois tenho um cliente que está exigindo esta impressão no DANFE , e este cliente não emite Cupom Fiscal somente NF-e , ai ele me pediu onde diz na lei que fala que não é obrigatório a impressão do Codigo de Barras na DANFE .. Desde já agradesço e Muito Obrigado . Adilson Pazzini .

Referente a segunda pergunta ,. eu já consegui fazer gerar consolidado o arquivo . na verdade eu estava querendo gerar os registros fora da sequencia . teria que gerar os registros 0 de todas as empresas , Ai volta na empresa inicial e gira novamente para o bloco A , AI Volta pra empresa INCIAL e gira novamente para o bloco C e assim por diante , ai acabou dando certo . Adilson Pazzini .

há alguem que já conseguiu gerar o arquivo Consolidado .. pois to tentando aqui .fazendo com mais de uma empresa isso , incluido os registro pro componente . mais qndo termina de gerar o arquivo . só aparece dados da primeira empresa que foi iniciada a geracao do arquivo ... Desde já agradesco Adilson Pazzini .

Boa tarde amigos , queria saber o seguinte , qndo se tratando de empresa Matriz e Filial , se é obrigatório gerar o arquivo Consolidados , tipo Matriz e Filial no mesmo arquivo , e se caso for , será que no proprio validador teria como unir , se no caso eu gera-se os arquivos separados , pois hj estou com um problema q a minha empresa Matriz e filial , tem a base separada ... Desde já Agradesco . Adilson Pazzini .

Falha nossa .rs .. É verdade mesmo Barbosa . até acabei passando esse atalho pois utilizei pra iniciar o meu aqui , mais realmente o demo ta melhor agora . Adilson .

No demo do acbr sped pis e cofins , ja tem um exemplo simples la . basta vc estudar o blocos e incluir os registros conforme informação de seu ERP . o Componente está funcional ,. eu estou utilizando para empresas LUCRO REAL . talvez exista alguns registros para lucro presumido q não estajam no componente . mais o pessoal ta incluindo ... Tem esse link abaixo com um exemplo postado por um colaborador .... pode servir para inicio . download/file.php?id=792 Adilson

Para versão CAPICOM ... NFe.Configuracoes.Certificados.DataVenc Openssl . não existe essa função . Adilson Pazzini