Atenas Soluções Softwares

Na minha visão eu acho que um juiz dizer pra ela : "Delete o seu código fonte que vc criou na sua casa e não o comercialize !" , vc vai ter que começar outro igual do zero , acho estranho nesta condição dela . Das clausulas que sempre li sobre isso inclusive Leis Mundiais , somente o Japão diferencia-se dos demais paizes no que diz respeito a direitos autorais de softwares , os demais oque vale é propriedade intelectual em primeiro plano , neste caso dela então trabalhando em casa no computador dela , ferramentas dela sem nenhum contrato e registro em carteira , imaginem . Neste cenário dela , na minha opinião causa ganha pra ela , só nos resta aguardar ela pronunciar mais a frente oque aconteceu .

Bom dia pessoal , Discordo com algumas opiniões de visão deste contexto da Fabiane , vejam : O Direito intelectual do Sistema no caso da Fabiane que desenvolveu livremente em sua casa como ela mesmo disse não tem nenhuma relação empregatícia com esta automação , vejam oque diz a Lei Brasileira : http://www.planalto.gov.br/ccivil_03/LEIS/L9609.htm Em especial no caso da Fabiane este paragrafo : § 2º Pertencerão, com exclusividade, ao empregado, contratado de serviço ou servidor os direitos concernentes a programa de computador gerado sem relação com o contrato de trabalho, prestação de serviços ou vínculo estatutário, e sem a utilização de recursos, informações tecnológicas, segredos industriais e de negócios, materiais, instalações ou equipamentos do empregador, da empresa ou entidade com a qual o empregador mantenha contrato de prestação de serviços ou assemelhados, do contratante de serviços ou órgão público. Interessante este caso .

IF DEF.. não resolveria este caso de versão do Fastreport em questão pessoal ? Se estivéssemos falando de versões Delphi mais antigas como delphi 2010 ou anterior , mas XE7 já tendo que fazer upgrade de componentes que acompanha a IDE original .

Estou com o mesmo problema utilizando delphi xe7 fast 5.1.5 que acompanha a versão xe7 e não queria modificar o fonte original pessoal .

Utilize isso sempre que precisar ratear valores : procedure Get_Lista_Rateio_Valores( var List : TStringList ; ANum_Itens : Integer ; Val_Tot : Currency ) ; var i : Integer ; Val_Rateio : Currency ; begin List.Clear ; Val_Rateio := Val_Tot / ANum_Itens ; Val_Rateio := StrToFloat(FormatFloat('0.00', Val_Rateio)) ; for i := 1 to ANum_Itens do begin if i = ANum_Itens then begin List.Add( FormatFloat('0.00', Val_Tot) ) ; end else begin List.Add( FormatFloat('0.00', Val_Rateio) ) ; end ; Val_Tot := Val_Tot - Val_Rateio ; end; end; ...Vc vai distribuir os valores aos itens da sua Nota que foi rateado no StringList ! No seu caso ai 0,03 centavos de desconto para 15 itens quando permitido somente 2 casas decimais vc tera que sacrificar 12 itens sem desconto ai manu , ou seja , 0,01 centavo para os primeiros 3 itens da lista e o resto vai ficar sem desconto manja ? 1º item = 0,01 2º item = 0,01 3º item = 0,01 4º item = 0,00... Teste o método e depois post ai oque vc resolveu .

Hasa , Eu tenho duas formas de declarar a EFD Icms/Ipi , como o Juliomar disse acima o bacana é que de uma boa lida no guia pratico de implementação . Veja a hierarquia dos registros . Ou Informo ( C800 = Nível hierárquico: 2 + C850 = Nível hierárquico: 3 ) Declaração por CFe emitido ( Declaração Detalhada ) . Ou Informo ( C860 = Nível hierárquico: 2 + C890 = Nível hierárquico: 3 ) Declaração por equipamento Sat ( Declaração Consolidada ) .

Subi este arquivo pra vc testar , somente substitui algumas numeração de campos de documentos do emitente e contabilidade o resto deste arquivo é completo . Sped Icms/Ipi . Compõe este arquivo movimento Sat ,ECF e NFe de Entrada e Saída . http://www.filedropper.com/spedicms092015

Uma solução para isso , é no create da sua aplicação ou antes de ativar o componente ACBrECF vc escreve a flag Estado do arquivo ini deixando Estado=0 , o Sat não utiliza Estado para quando abre a aplicação .

João boa tarde , Sat não existe número de ECF , oque existe é somente o Número de Série do Sat , só . Vc já conseguiu vincular os componentes ACBr... e ativar o ACBrECF ? Se sim , após ativo vc pode executar como abaixo para obter o Número de Série do Sat ! StatusSat := ACBrSAT1.ConsultarStatusOperacional ; with ACBrSAT1.Status do Numero_Serie_Sat := NSERIE ; * StatusSat e Numero_Serie_Sat são variáveis String que utilizei somente como exemplo , utilize a chamada como desejar .

Bom dia , A Versão 2.1.5 do PVA está considerando erro o campo Cnpj / Cpf quando formatado com 14 casas . O próprio PVA testa quando informado 11 casas = CPF e 14 Cnpj . Segue anexo da correção . ACBrEFDBloco_C_Class.zip

Sat vc simplesmente gera uma impressão dos totais agrupados das alíquotas movimentadas pela sua AC com o layout que vc quiser de impressão , não é necessariamente uma redução Z com todas aquelas informações e aquele layout especifico .

Walter boa tarde , Para impostos Estaduais eu tenho um perfil da empresa baseado na UF onde esta estabelecida a Empresa e não NCM . NCM eu utilizo para impostos Federais , Pis Cofins , Ipi ...

Este trecho de código é o Retorno após o envio da NFe , vc captura o retorno na classe ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe ...

Discordo com o amigo Cristiano Abbud , Veja que o Sat é a contingencia a NFCe no estado de São Paulo , não pode haver nenhum bloqueio de uso do CFe após o retorno de aprovação do dispositivo Sat . A AC só tem responsabilidade nos dados informados ao Sat e não os dados homologados de funcionamento do dispositivo Sat .

Os caras homologam dispositivos Sat , sua AC gera cupons onde é assinado e autorizado o uso , o cliente vai embora com aquele cupom e depois "possivelmente" eles cancelam se algo discrepante , ta bom , te certinho .

Gertec é muito bom tbm . Não recomendado "Bematech" .

Gean , Veja , primeiro vc se queixou da impressão do ESC.. agora nem aprovar a venda no SAT não esta aprovando , realmente ta difícil o raciocínio , bom , de qlq forma acabei de testar uma venda com 60 itens e tudo ocorre perfeitamente cara . (Sat Dimep) , Não vi outro colega com este tipo de problema no forum . Não será talvez o SAT com problemas ? Só debugando mesmo .

Boa tarde Jean , Qual seria o problema , dá algum tipo de erro ? como ? quantos itens ? Por favor , seja mais claro e objetivo na questão para o pessoal ver se pode ajudar . Muito obrigado .

Ola José , O ACBrECFVirtualSat trabalha em conjunto com o ACBrECF , não funciona com nenhuma DLL de fabricante de ECF .

Sim , Cat52 é somente para ECF !

geanjesus , Este demo já foi feito com componentes do trunk2 , se vc abri-lo o .dpr e recompilar com o sua IDE atualizada com trunk2 vai tranquilo .

Vc tem que desenvolver uma sistema que processe uma fila das operações feitas dos terminais para ser consumida pela Sat . Existem tópicos aqui mesmo no forum que o pessoal fala sobre isso mas no caso não é somente conectar o cabo e sair compartilhando como uma Swite .

Só uma ideia , Mas para todo este pessoal que acho não ser poucos os colegas que no momento estão sem alternativas de se estabelecer em uma empresa de CNAE autorizado para uso do Sat , porque não se unem abrindo uma unica empresa , uma espécie de cooperativa , tudo legalizado com contrato entre os participantes ( Programadores ) . Tem que organizado se não vira bagunça , como disse só uma ideia .

Pode ser no create do form , uma unica vez vc carrega esta informação .

Vc pode utilizar assim se quiser : Cabecalho_Temp:=TStringList.Create ; try Cabecalho_Temp.Add( AlinhaC( SAT_Emit_xFant , 48 ) ) ; Cabecalho_Temp.Add( AlinhaC( SAT_Emit_EnderEmit_xLgr + ' , N-' + SAT_Emit_EnderEmit_nro , 48 ) ) ; Cabecalho_Temp.Add( AlinhaC( SAT_Emit_EnderEmit_xBairro + ' , ' + SAT_Emit_EnderEmit_xMun + '-' + SAT_Emit_EnderEmit_Uf , 48 ) ) ; Cabecalho_Temp.Add( '' ) ; TACBrECFVirtualBufferClass(ACBrECF1.ECFVirtual.ECFVirtualClass).Cabecalho.Assign( Cabecalho_Temp ); TACBrECFVirtualBufferClass(ACBrECF1.ECFVirtual.ECFVirtualClass).CNPJ := Formata_Cnpj_Cpf( SAT_Emit_CNPJ ) ; TACBrECFVirtualBufferClass(ACBrECF1.ECFVirtual.ECFVirtualClass).IE := SAT_Emit_IE ; finally FreeAndNil(Cabecalho_Temp); end ;