-
Total de ítens
20 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por diego.bonfim
-
-
Bom Dia Willian, você conseguiu avançar com essa demanda ? Também me encontro com essa dúvida.
- 1
-
Boa Noite, descobri onde estava o problema.
Estava passando o nome da impressora junto com a porta para o Fortes, exemplo: RAW:IMPRESSORA
Alterei para o nome da impressora somente, e pronto. Resolvido.
Obrigado Lincoln, pela ajuda.
- 1
-
Você utiliza Lazarus?
Em que momento você define a impressora? Na hora de imprimir ou ao criar o formulário? -
-
Em 30/07/2021 at 13:10, lincoln disse:
SEGUINTE
1 compartilhe a impressora que vc vai usar par aimprimir direto
exemplo
\\nome do computador\nome da impressora
ACBrPosPrinter1.Porta:=IBQuery2IMPRESSORA.ASSTRING;
voce pode usar um arquivo ini ou campo na tabela ponha o nome da impressora
É isso mesmo que faço, uso um arquivo INI. No ACBrPosPrinter funciona perfeitamente esse processo, porém no ACBrExtratoFortes que ele desconsidera a impressora definida no INI.
-
Em 30/07/2021 at 12:45, lincoln disse:
eu sempre deixo a impressora padrao que vo usar no sistema, se o cliente or usar outra el escolhe na hora
Então Lincoln, eu não deixo padrão pois tenho cliente que possui impressora A4 e usa para imprimir boletos, e muitas vezes ele muda ela para padrão.
-
Olá, Boa Tarde.
Pessoal, eu já li o tópico abaixo antes de criar esse novo, porém não consegui resolver o problema ainda.
Seguinte, sempre que mando uma impressão Sat pelo ACBrExtratoFortes, ele desconsidera as informações que defino para a impressora, e manda a impressão na impressora padrão.
Desse modo tenho que deixar a impressora como padrão do computador.
Recentemente o que está me ocorrendo também, é que quando imprimo um etiqueta pelo ACBrETQ, as próximas impressões do Sat saem na impressora de etiqueta.
Segue abaixo o código para imprimir SAT:
LarguraBobina := StrToInt(Ini.ReadString('IMPRESSORA', 'LARGURA', ''));
MargemSuperior := StrToInt(Ini.ReadString('IMPRESSORA', 'MARGEM_CIMA', ''));
MargemInferior := StrToInt(Ini.ReadString('IMPRESSORA', 'MARGEM_BAIXO', ''));
MargemEsquerda := StrToInt(Ini.ReadString('IMPRESSORA', 'MARGEM_ESQ', ''));
MargemDireita := StrToInt(Ini.ReadString('IMPRESSORA', 'MARGEM_DIR', ''));
Imp := Ini.ReadString('IMPRESSORA', 'PORTA', '');procedure TfrmPrincipal.PrepararImpressao;
begin
ACBrSATExtratoFortes.Impressora := Imp;
ACBrSATExtratoFortes.LarguraBobina := LarguraBobina;
ACBrSATExtratoFortes.MargemSuperior := MargemSuperior;
ACBrSATExtratoFortes.MargemInferior := MargemInferior;
ACBrSATExtratoFortes.MargemEsquerda := MargemEsquerda;
ACBrSATExtratoFortes.MargemDireita := MargemDireita;end;
PrepararImpressao;
ACBrSAT.ImprimirExtrato;Segue abaixo o código para imprimir etiqueta:
Ini := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'config.ini');
with ACBrETQ do
begin
Desativar;case Ini.ReadString('IMP_ETQ', 'DPI', '') of
'dpi203' : DPI:= TACBrETQDPI(dpi203);
'dpi300' : DPI:= TACBrETQDPI(dpi300);
'dpi600' : DPI:= TACBrETQDPI(dpi600);
end;case Ini.ReadString('IMP_ETQ', 'MODELO', '') of
'etqNenhum' : Modelo:= TACBrETQModelo(etqNenhum);
'etqPpla' : Modelo:= TACBrETQModelo(etqPpla);
'etqPplb' : Modelo:= TACBrETQModelo(etqPplb);
'etqZPLII' : Modelo:= TACBrETQModelo(etqZPLII);
'etqEpl2' : Modelo:= TACBrETQModelo(etqEpl2);
end;Porta := Ini.ReadString('IMP_ETQ', 'PORTA', '');
Temperatura := StrToIntDef(Ini.ReadString('IMP_ETQ', 'TEMPERATURA', ''),10);
Velocidade := StrToIntDef(Ini.ReadString('IMP_ETQ', 'VELOCIDADE', ''),-1);case Ini.ReadString('IMP_ETQ', 'BACKFEED', '') of
'bfNone' : BackFeed:= TACBrETQBackFeed(bfNone);
'bfOn' : BackFeed:= TACBrETQBackFeed(bfOn);
'bfOff' : BackFeed:= TACBrETQBackFeed(bfOff);
end;Unidade := etqMilimetros; //etqDecimoDeMilimetros;
MargemEsquerda:= StrToIntDef(Ini.ReadString('IMP_ETQ', 'MARGEM_ESQ', ''), 0);case Ini.ReadString('IMP_ETQ', 'ORIGEM', '') of
'ogNone' : Origem:= TACBrETQOrigem(ogNone);
'ogTop' : Origem:= TACBrETQOrigem(ogTop);
'ogBottom' : Origem:= TACBrETQOrigem(ogBottom);
end;case Ini.ReadString('IMP_ETQ', 'PAGCOD', '') of
'pceNone' : PaginaDeCodigo:= TACBrETQPaginaCodigo(pceNone);
'pce437' : PaginaDeCodigo:= TACBrETQPaginaCodigo(pce437);
'pce850' : PaginaDeCodigo:= TACBrETQPaginaCodigo(pce850);
'pce852' : PaginaDeCodigo:= TACBrETQPaginaCodigo(pce852);
'pce860' : PaginaDeCodigo:= TACBrETQPaginaCodigo(pce860);
'pce1250' : PaginaDeCodigo:= TACBrETQPaginaCodigo(pce1250);
'pce1252' : PaginaDeCodigo:= TACBrETQPaginaCodigo(pce1252);
end;Ativar;
end;with ACBrETQ do
begin
if (Modelo = etqPpla) then
begin
ImprimirTexto(orNormal, 2, 2, 2, 21, 2, Copy(LabelProduto.Caption, 0, 30));
ImprimirCaixa(10,32,56,17,1,1);
ImprimirBarras(orNormal, barEAN13, 2, 2, 4, 2, ComboBoxProduto.Text, 10, becSIM);
ImprimirTexto(orNormal, 3, 4, 4, 2, 24, ' R$');
ImprimirTexto(orNormal, 3, 4, 4, 2, 41, ' '+copy(LabelPreco.Caption, 4, Length(LabelPreco.Caption)));
end
else if (Modelo = etqEpl2) then
begin
ImprimirTexto(orNormal, 2, 2, 2, 3, 3, Copy(LabelProduto.Caption, 0, 30), 0, True);
ImprimirTexto(orNormal, 2, 2, 1, 8, 3, '');
ImprimirBarras(orNormal, barEAN13, 2, 2, 13, 5, ComboBoxProduto.Text, 10, becSIM);
ImprimirCaixa(10,32,56,13,1,1);
ImprimirTexto(orNormal, 3, 3, 2, 16, 34, 'R$');
ImprimirTexto(orNormal, 3, 4, 4, 12, 45, copy(LabelPreco.Caption, 4, Length(LabelPreco.Caption)));
end;ACBrETQ.Imprimir(StrToIntDef('1', 1), StrToIntDef(Ini.ReadString('IMP_ETQ', 'AVANCO', ''), 0));
Desativar;
end; -
Banco de Dados Firebird.
-
Projetos são em Lazarus.
-
Boa Noite,
Sistemas ERP e PDV com mais de 1 ano em mercado, já com 7 clientes.
PDV com integração a Sat, balança, gaveta.
Estou colocando a venda por falta de tempo para gerenciar.
Os cliente ficam em Barueri e Cajamar (SP), a maioria possui internet no estabelecimento, facilitando o suporte.
Whatsapp: (11) 9 6871-1292
Segue em anexo algumas imagens dos sistemas.
Foto de Diego Bonfim Foto de Diego Bonfim Foto de Diego Bonfim Foto de Diego Bonfim Foto de Diego Bonfim
-
Bom Dia Juliana,
Claro, de repente alguém já se deparou com essa dúvida. Abaixo está o parecer da contabilidade:
Em relação a tributação do PIS/COFINS estão correta a sua afirmação, pois só poderá haver um modelo de tributação para cada item da NF-e, que é determinado pelo código do CST, como no XML abaixo, foi informado = 1 (Operação Tributável com Alíquota Básica).
No caso da Substituição Tributária do PIS/COFINS o imposto é recolhido uma única vez pelo fabricante do produto, sendo que momento da revenda o revendedor de produto sujeito à ST de PIS e Cofins deve classificar a operação de revenda com o CST 05 (grupos de PIS e de Cofins tributado) informando o valor zero (R$ 0,00) no campo de base de cálculo (em decorrência da substituição).
Por exemplo:
Campos de CST: Informar o código 05;
Campos de Base de Cálculo: Informar o valor zero (R$ 0,00);
Campos de Alíquota: Informar as alíquotas de 0,65% (PIS) e 3% (Cofins).Minha dúvida é, somente uso PISST/CONFINSST quando a cst for 05?
- 1
-
Boa Tarde Pessoal,
Essa semana me deparei com uma dúvida, primeiramente questionei minha contabilidade, porém não consegui entender muito bem a explicação. Pesquisei não somente no fórum, mas também em vários sites e não consegui esclarecer.
Em que momento eu devo informar as tags abaixo:
<PISST>
<qBCProd></qBCProd>
<vAliqProd></vAliqProd>
<vPIS></vPIS>
</PISST><COFINSST>
<qBCProd></qBCProd>
<vAliqProd></vAliqProd>
<vCOFINS></vCOFINS>
</COFINSST>Não identifiquei na nota técnica a CST (pis / cofins) que pede esses campos.
Se alguém puder me ajudar, agradeço.
-
Boa Noite André, desculpe minha ignorância, mas não entendi muito bem. Eu devo adicionar o componente ao projeto e adicionar essas linhas que você informa no comentário? Mesmo assim ele continua me retornando erro da não existência dos parâmetros (PastaInput, PastaOutput e Timeout) na função TACBrSATMFe_integrador_XML(SAT).
-
Boa Tarde, somente para passar uma experiência minha, para caso alguém ainda tiver com dúvida. Não possuo uma software house, somente presto serviço para um unico cliente (lojista), e foi ativado o sat utilizando o CNPJ do contribuinte como Software House também. No momento de cadastrar a software house, deve-se marcar a opção Uso Próprio (acho que é isso, ou algo parecido).
-
Boa Tarde Pessoal,
Após realizar o update do SVN (tentei mais de uma vez, inclusive desinstalei o trunk removendo os arquivos do disco e instalei novamente), está me apresentando o seguinte erro:
Undeclared identifier: 'PastaInput'
Na linha abaixo:
if Modelo = mfe_Integrador_XML then
begin
TACBrSATMFe_integrador_XML(SAT).PastaInput := edMFEInput.Text;
TACBrSATMFe_integrador_XML(SAT).PastaOutput := edMFEOutput.Text;
TACBrSATMFe_integrador_XML(SAT).Timeout := seMFETimeout.Value;
end;No arquivo do componente (ACBrSATMFe_integrador.pas) eu não localizei essas três funções (PastaInput, PastaOutput e Timeout).
Fico agradecido desde já.
-
Em 18/02/2017 at 16:16, Sérgio Assunção disse:
Vale lembrar que esse termo teste é uma norma definida no Manual de Orientação.
Estando o SAT funcionando em condição de teste, o Extrato do CF-e-SAT deverá indicar tal condição no corpo do extrato, no bloco de informações “I – TÍTULO”, por meio da impressão do texto “= T E S T E =” e de 3 linhas de caracteres “>”. O número do Extrato deverá constar como “000000”
Pontilhado por lembrar desse ponto Sérgio, na verdade estou somente fazendo testes internos fora de produção, utilizando o emulador off-line.
Gostaria de alterar o layout somente para sabe a disposição na impressão do cupom. Não estou conseguindo fazer isso.
-
Boa Tarde, sou novo no desenvolvimento para sat, e já pesquisei sobre o assunto aqui no fórum, porém não consegui localizar uma resposta que me ajudasse.
Antes de tudo, já atualizei o SVN na minha máquina.
Estou realizando testes de comunicação do sistema com Sat através do emulador offline da receita, já consigo imprimir cfe, porém gostaria de alterar algumas informações no cabeçalho do cupom, especificamente aquela palavra = TESTE = que fica um pouco abaixo do topo.
Já tentei editar o arquivo ACBr\Fontes\ACBrSAT\Extrato\Fortes\ACBrSATExtratoFortes.pas, porém ainda continua aparecendo. Não sei o que está faltando fazer para que dê certo, alguém tem alguma ideia?
Muito obrigado.
-
Muito Obrigado Sérgio Assunção, esse tópico eu não havia encontrado.
Vou tentar utilizar o CNPJ do meu cliente como uso próprio do sistema. Pelo menos a princípio.
-
Boa Noite a todos,
Sou novo em desenvolvimento e estou com uma dúvida, na verdade pesquisei em vários tópicos e não encontrei uma resposta clara e definitiva. Não possuo empresa aberta, estou iniciando como autônomo, gostaria de saber se posso utilizar o CNPJ do meu cliente (EMITENTE) também como Software House? Desculpe se a pergunta está sendo muito óbvia ou sem sentido, mas é que realmente estou com dúvida nisso.
Caso isso não seja possível, qual as opções para desenvolvedores autônomos, somente abrindo um empresa? E essa não pode ser MEI, por não possuir CNAE com início 62?
Obrigado pela atenção, e novamente desculpa pela ignorância.
ACBrCargaBal Informações Nutricionais Dúvidas
em ACBrSerial
Postado
Bom Dia Graça, tudo bem? Estou com problema parecido, você conseguiu resolver a questão do NUTRI.TXT no formato RDC 429?