diego.bonfim

Bom Dia Graça, tudo bem? Estou com problema parecido, você conseguiu resolver a questão do NUTRI.TXT no formato RDC 429?

Bom Dia Willian, você conseguiu avançar com essa demanda ? Também me encontro com essa dúvida.

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.

Você utiliza Lazarus? Em que momento você define a impressora? Na hora de imprimir ou ao criar o formulário?

Eu faço dessa forma: Imp := Ini.ReadString('IMPRESSORA', 'PORTA', ''); ACBrSATExtratoFortes.Impressora := Imp; Aparentemente, acredito estar correto. Sempre na hora de imprimir SAT eu faço esse comando.

É 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.

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?

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).