Pablo Ricardo

26 Abril, 2016

Como carregar certificado. Enquanto não clico em um "btn" para pegar o acbrnfMain.SSL.SelecionarCertificado; ele não carrega o mesmo. Como fazer isso automaticamente. Já tenho o serial e senha salvos no banco.

20 Abril, 2016

         for n := 0 to acbrnfMain.NotasFiscais.Items[0].NFe.Det.Count - 1 do
          begin
            with acbrnfMain.NotasFiscais.Items[n].NFe.Det.Items[0] do
            begin
              CodProd := dtmdlmnConfig.GetCodProd(CodSessao, CodEstab,
                Prod.cProd);

              if CodProd = 0 then
                dtmdlmnImport.SaveProduto(CodSessao, CodEstab, Prod.cProd,
                  Prod.xProd, Prod.NCM);

              CodProd := dtmdlmnConfig.GetCodProd(CodSessao, CodEstab,
                Prod.cProd);

              case Imposto.ICMS.orig of
                oeNacional:
                  Origem := 0;
                oeEstrangeiraImportacaoDireta:
                  Origem := 1;
                oeEstrangeiraAdquiridaBrasil:
                  Origem := 2;
                oeNacionalConteudoImportacaoSuperior40:
                  Origem := 3;
                oeNacionalProcessosBasicos:
                  Origem := 4;
                oeNacionalConteudoImportacaoInferiorIgual40:
                  Origem := 5;
                oeEstrangeiraImportacaoDiretaSemSimilar:
                  Origem := 6;
                oeEstrangeiraAdquiridaBrasilSemSimilar:
                  Origem := 7;
                oeNacionalConteudoImportacaoSuperior70:
                  Origem := 8;
              end;
              SaveNFeItem(CodSessao, CodEstab, ChvNFe, IntToStr(Prod.nItem),
                CodProd, Prod.xProd, Prod.qCom, Prod.uCom, Prod.vProd,
                Prod.vDesc, IntToStr(Origem), Prod.CfOp, '', 0, 0, 0, 0, 0, 0,
                '', '', '', 0, 0, 0, '', 0, 0, 0, 0, 0, '', 0, 0, 0, 0, 0);
            end;

Estou com problemas nesse contador pra recuperar todos os itens do XML. Qual a lógica correta?

Pra ser mais preciso aqui:

     for n := 0 to acbrnfMain.NotasFiscais.Items[0].NFe.Det.Count - 1 do
          begin
            with acbrnfMain.NotasFiscais.Items[n].NFe.Det.Items[0] do
            begin

Só vai o primeiro item, tenho que por outro cont mais não estou entendendo a lógica.

Me desculpem. O correto era

         for n := 0 to acbrnfMain.NotasFiscais.Items[0].NFe.Det.Count - 1 do
          begin
            with acbrnfMain.NotasFiscais.Items[0].NFe.Det.Items[n] do
            begin
              CodProd := dtmdlmnConfig.GetCodProd(CodSessao, CodEstab,
                Prod.cProd);

9 Abril, 2016

Observei em um Sped de um cliente que ele informa o cabeçalho da nota |55| e |59| porém como forço o cliente a entregar detalhado. Exemplo, cupom eletrônico PAI e itens Filho?

Observei que ele entrega via c180 os itens, porém não tem relação com nenhuma NF-e ou CF-e impossibilitando de eu exercer a analise que utilizo para alguns relatórios próprios.

Quais blocos apresentam o pai e filho do eletrônico?

Caso não tenha pai e filho, onde fica a referência das vendas qeu fora consolidada no c180?

Alguem pode me ajudar?

17 Fevereiro, 2016

É... não entendi. Esse maxNSU não resgato de lugar algum. Toda consulta eu salvo o NSU e na próxima consulta utilizo ele.

15 Fevereiro, 2016

Eu li a nota técnica NT 2012_002.pdf e não me deixa claro como proceder quanto há mais documentos.

Exemplo: Ao fazer uma nova instalação em um cliente, utilizamos no NSU = 0 para alimentarmos nosso banco para nossas rotinas. Na rotina exemplo do trunk ou trunk2, observa-se o code

if acbrnfMain.WebServices.DistribuicaoDFe.retDistDFeInt.cStat = 137 then
      sTemMais := 'N'
    else
      sTemMais := 'S';
    if acbrnfMain.WebServices.DistribuicaoDFe.retDistDFeInt.cStat = 138 then
    begin

Pois bem, se tem mais documentos ele é passado pelo último NSU recebido? Utilizando o último NSU pego a partir dali ou tem que passar algum parâmetro para continuar recebendo via NSU 0?

Obrigado.

11 Janeiro, 2016

Então, verifiquei. Ok. Teem se as tabelas igual eu as tenho. O que preciso é que o texto dos NCM's com 8 dígitos tenha os textos dos mesmos NCM's com 4, 5 e etc... Entende?

1- Equinos

11- - Outros

Preciso do Registro 11 - Equinos - Outros.

Isso já existe pronto? Se não qual a lógica posso usar pra concatenar isso? Estou perdido. Obrigado.

11 Janeiro, 2016

Alguém tem alguma maneira ou lógica para organizar o texto dos NCM's com 8 dígitos? Exemplo:

0101	Cavalos, asininos e muares, vivos.
01012	Cavalos:
01012100	Reprodutores de raça pura
01012900	Outros
01013000	Asininos
01019000	Outros
0102	Animais vivos da espécie bovina.
01022	Bovinos domésticos:
010221	Reprodutores de raça pura
01022110	Prenhes ou com cria ao pé
01022190	Outros
010229	Outros
0102291	Para reprodução
01022911	Prenhes ou com cria ao pé
01022919	Outros
01022990	Outros
01023	Búfalos:
010231	Reprodutores de raça pura
01023110	Prenhes ou com cria ao pé
01023190	Outros
010239	Outros

De modo a nunca existir descrição "Outros" e que os que tenham 8 dígitos tenha o texto completo do grupo pertencente.

Importar e tentar fazer select, no excel alguma função, ou já tem essas descrições feitas. Estou um pouco perdido. O que fazer?

14 Janeiro, 2015

me adiciona que posso lhe ajudar...

Resolveu meu problema. Muito profissional e sabe o que está fazendo!

12 Janeiro, 2015

sistemascomfontes skype do segundo cano que levei... que m**da!

6 Janeiro, 2015

Ja te mandei um convite no skype amigo...to aguardando vc add...

Não chegou nenhum pedido, passa ai preu adicionar

3 Janeiro, 2015

Ja depositei pra dois aqui o valor de de 1 foi 100,00 R$ e pra outro R$ 150,00. E nenhum nem conectou pra tentar. Olha a data que postei isso ai... até hj nada.

Mais alguém?

22 Dezembro, 2014

Preciso de consultoria na instalação e compilação do pacote acbr e rave/quick/fast

Qual preço?

Skype: nlyrk0

Email: [email protected]

20 Dezembro, 2014

Ok... Runtime. Entendo perfeitamente. Agora... Eu estou perguntando isso partindo do principio que nao consigo compilar o pacote do rave... Se he tao simples como voces dizem pq a dificuldade de instalar o pacote? Nao sou o primeiro a ter esse problema. Ja pesquisei o forum todo...

19 Dezembro, 2014

Pra usar o code base o que tenho que fazer? Tenho que baixar outra extenção do rave?

19 Dezembro, 2014

Estou querendo utilizar o rave pra imprimir danfe porém não consigo distinguir pela pesquisa do forum a diferença entre o rave e rave code base. Estou utilizando o Nevrona Rave Reports 11.0.7 porém não tem tudo e não estou conseguindo compilar... alguma ajuda? Já pesquisei o forum todo.

18 Novembro, 2014

Bem, estou encerrando essa do cabeçalho das nfe's pra importar os itens, porém já importo do sped nessa estrutura e o sped me fornece esses mesmos dados do cabeçalho.

Eu salvava nfe de xml em tabelas separadas das nfes do sped... por isso essa confusão. Vou finalizar esse cabeçalho, testar, caso funcione posto o code aqui pra ajudar quem queira. Muito obrigado novamente.

Edit.: http://www.tax-contabilidade.com.br/guias/guiasIndex.php?idGuia=22o molde que importo do sped.

23    VL_BC_ICMS_ST    Valor da BC do ICMS substituição tributária.    N    -    02    OC    OC
24    VL_ICMS_ST    Valor do ICMS retido por substituição tributária.    N    -    02    OC    OC
25    VL_IPI    Valor total do IPI.    N    -    02    OC    OC
26    VL_PIS    Valor total do PIS.    N    -    02    OC    OC
27    VL_COFINS    Valor total da COFINS.    N    -    02    OC    OC
28    VL_PIS_ST    Valor total do PIS retido por substituição tributária.    N    -    02    OC    OC
29    VL_COFINS_ST    Valor total da COFINS retido por substituição tributária.    N    -    02    OC    OC

18 Novembro, 2014

Sim tem a informação que está querendo saber!

conforme falei é só olhar o fonte

NFe.Ide.tpNF = tnEntrada, tnSaida

Cara, já li o manual, so encontro essa informação nos itens, as que estão faltando.... to ficando doido já.

	dtmdlImportacao.SaveNFe(Emit.CnpjCpf,
		procNFe.chNFe,
		Ide.tpNF,
		IndEmit,
		CodPart,
		Ide.modelo,
		CodSit,
		IntToStr(Ide.serie),
		IntToStr(Ide.nNF),
		Ide.dEmi,
		Ide.dSaiEnt,
		VlDoc,
		Ide.indPag,
		Total.ICMSTot.vDesc,
		VlAbatNt,
		VlMerc,
		IndFrt,
		Total.ICMSTot.vFrete,
		Total.ICMSTot.vSeg,
		Total.ICMSTot.vOutro,
		Total.ICMSTot.vBC,
		Total.ICMSTot.vICMS,
		Total.ICMSTot.vBCST,
		Total.ICMSTot.vST,
		Total.ICMSTot.vIPI,
		Total.ICMSTot.vPIS,
		Total.ICMSTot.vCOFINS,
		VlPisSt,
		VlCofinsSt,
		dtmdlImportacao.acbrnfMain.NotasFiscais.Items[0].XML
	);

IndEmit,

CodPart,

CodSit,

VlDoc,

VlAbatNt,

VlMerc,

IndFrt,

VlPisSt,

VlCofinsSt

O código do participante vou pegar comparando com cnpj/cpf. Já tenho no meu BD.

18 Novembro, 2014

Esses que não tem como o participante tudo bem, faço a consulta. Mas o que realmente queria saber era se tem alguma tag dentro do XML ou vou ter que ver pelo natureza de operação pra definir o campo IND_OPER que define se é entrada ou saída. Antes de vir perguntar eu já pesquisei o eschema, os campos. Só preciso me certificar, pq vou ter que fzer mto código pra depois descobrir que tinha outro meio pela ACBr entendeu... vlw pela resposta amigo.

18 Novembro, 2014

Tenho a função:

procedure TdtmdlImportacao.SaveNFe(CnpjCpf, 
ChvNfe, 
IndOper, 
IndEmit, 
CodPart,
CodMod, 
CodSit, 
Ser, 
NumDoc: string; 
DtDoc, 
DtES: TDateTime; 
VlDoc: Double;
IndPgto: string; 
VlDesc, 
VlAbatNt, 
VlMerc: Double; 
IndFrt: string;
VlFrt, 
VlSeg, 
VlOutDa,
VlBcIcms, 
VlIcms, 
VlBsIcmsSt, 
VlIcmsSt, 
VlIpi, 
VlPis,
VlCofins, 
VlPisSt, 
VlCofinsSt: Double; 
XML: Variant);

Até agora só consegui:

          dtmdlImportacao.SaveNFe(Emit.CnpjCpf,
              procNFe.chNFe,
              IndOper??,
              IndEmit??,
              CodPart??,
              CodMod??,
              CodSit??,
              IntToStr(Ide.serie),
              IntToStr(Ide.nNF),
              Ide.dEmi,
              Ide.dEmi,
              VlDoc??,
              IndPgto??,
              Total.ICMSTot.vDesc,
              VlAbatNt??,
              VlMerc??,
              IndFrt??,
              Total.ICMSTot.vFrete,
              Total.ICMSTot.vSeg,
              Total.ICMSTot.vOutro,
              VlBcIcms??,
              Total.ICMSTot.vICMS,
              VlBsIcmsSt??,
              VlIcmsSt??,
              Total.ICMSTot.vIPI,
              Total.ICMSTot.vPIS,
              Total.ICMSTot.vCOFINS,
              VlPisSt,
              VlCofinsSt,
              dtmdlImportacao.acbrnfMain.NotasFiscais.Items[0].XML,
          );

Alguma luz?

18 Novembro, 2014

Estou montando, esses é os que ainda não achei, por enquanto... Tô nos valores.

IND_OPER VARCHAR(1),
IND_EMIT VARCHAR(1),
IND_FRT VARCHAR(1),

18 Novembro, 2014

Estou utilizando o componente para importar xml pra dentro do meu sistema, tem alguns campos do BD que não consigo achar no componente como extrair. Estou populando essa estrutura abaixo.

    CHV_NFE        VARCHAR(44) NOT NULL,
    IND_OPER       VARCHAR(1),
    IND_EMIT       VARCHAR(1),
    COD_PART       VARCHAR(60),
    COD_MOD        VARCHAR(2),
    COD_SIT        VARCHAR(2),
    SER            VARCHAR(3),
    NUM_DOC        VARCHAR(9),
    DT_DOC         TIMESTAMP,
    DT_E_S         TIMESTAMP,
    VL_DOC         DOUBLE PRECISION DEFAULT 0,
    IND_PGTO       VARCHAR(1),
    VL_DESC        DOUBLE PRECISION DEFAULT 0,
    VL_ABAT_NT     DOUBLE PRECISION DEFAULT 0,
    VL_MERC        DOUBLE PRECISION DEFAULT 0,
    IND_FRT        VARCHAR(1),
    VL_FRT         DOUBLE PRECISION DEFAULT 0,
    VL_SEG         DOUBLE PRECISION DEFAULT 0,
    VL_OUT_DA      DOUBLE PRECISION DEFAULT 0,
    VL_BC_ICMS     DOUBLE PRECISION DEFAULT 0,
    VL_ICMS        DOUBLE PRECISION DEFAULT 0,
    VL_BC_ICMS_ST  DOUBLE PRECISION DEFAULT 0,
    VL_ICMS_ST     DOUBLE PRECISION DEFAULT 0,
    VL_IPI         DOUBLE PRECISION DEFAULT 0,
    VL_PIS         DOUBLE PRECISION DEFAULT 0,
    VL_COFINS      DOUBLE PRECISION DEFAULT 0,
    VL_PIS_ST      DOUBLE PRECISION DEFAULT 0,
    VL_COFINS_ST   DOUBLE PRECISION DEFAULT 0,
    XML            BLOB SUB_TYPE 0 SEGMENT SIZE 80

14 Novembro, 2014

Há a possiblidade de impressão do DANFE sem utilização de XML apenas passando parâmetros dos dados que tenho em DB? Ou vou ter que fazer na mão?

14 Novembro, 2014

Para fazer o download pelas destinadas eu assumiria o lugar do meu cliente, sendo assim também é uma posição errada. Eu iria confirmar como sendo o meu cliente para depois liberar o download e efetua-lo para importar no meu sistema. Estou sem saber o que fazer.

14 Novembro, 2014

Minha necessidade é essa:

Preciso do cabeçalho da NFe, e Itens;

Importo Sped, porém não se informa os itens das NFe's emitidas;

Importo o XML que o cliente tem (atualizo os itens da pré importadas do SPED);

Se mesmo assim alguma NFe ficou sem itens, quero utilizar ACBr para baixar os itens dessas notas pré importadas no SPED e XML, então tenho todo o cabeçalho. Queria fazer isso sem quebrar o CAPTCHA.

14 Novembro, 2014

No exemplo ACBrNFe2 tem opção de baixar XML pela chave. Porém o retorno nunca é o XML, então só consigo baixar NFe com itens (o que seria a consulta completa) pelas destinadas?

Entrar

Sobre nós...

Blocks

Notes ACBrLibNFe

Fóruns

Downloads

Calendário

Posts postados por Pablo Ricardo

Sobre nós...

Informação Importante