Ir para conteúdo
  • Cadastre-se

Dangelo2010

Membros Pro
  • Total de ítens

    602
  • Registro em

  • Última visita

Posts postados por Dangelo2010

  1. Sim e isso mesmo sao 5000 mil linhas mais isso aconteceu de ontem para hoje o cliente foi gerar uma nota de numero 142 com a mesma mensagem e fico certo dai ele gero uma outra de numero 144 tambem com a mesma mensagem e foi justamente nessa hora que teve o erro foi truncado ai eu debuquei para ver e passa certinho com 466 linhas mais na hora que chega na unit pcnNFeW ele ja chega com 337 linhas cortando o resto da observação.

  2. Fortes

    Mais o problema não e a impressão e sim o componente, e que dei uma debugada aqui e eu estou passando a quantidade de linhas correto

    mais o componente esta truncando ou seja estou passado assim

    InfAdic.infCpl := MensagemEmp + Alltrim(ObsComplementar);

    mais quando passa para a unit "pcnNFeW"

    procedure TNFeW.GerarInfAdic;

    begin

    if (trim(nfe.InfAdic.infAdFisco) <> EmptyStr) or

    (trim(nfe.InfAdic.infCpl) <> EmptyStr) or

    (nfe.InfAdic.obsCont.Count > 0) or

    (nfe.InfAdic.obsFisco.Count > 0) or

    (nfe.InfAdic.procRef.Count > 0) then

    begin

    Gerador.wGrupo('infAdic', 'Z01');

    Gerador.wCampo(tcStr, 'Z02', 'infAdFisco', 01, 2000, 0, nfe.InfAdic.infAdFisco, DSC_INFADFISCO);

    ****** AQUI JA TRUNCA *****************

    --> Gerador.wCampo(tcStr, 'Z03', 'infCpl ', 01, 5000, 0, nfe.InfAdic.infCpl, DSC_INFCPL);

    ****** AQUI JA TRUNCA *****************

    (**)GerarInfAdicObsCont;

    (**)GerarInfAdicObsFisco;

    (**)GerarInfAdicProcRef;

    Gerador.wGrupo('/infAdic');

    end;

    end;

  3. As informações complementares estão sendo truncadas na hora de enviar para a sefaz e na impressão do DANFE. Está sendo limitada para 337 linhas e ja fiz de tudo e nada, alquem teria alguma ideia do que poderia ser isso.

    Dangelo!

  4. Isso mesmo no caso do município de Santos tem como fazer isso sim usando lotes, mais como buscar esse retorno para saber qual número de nota pertence a cada RPS, essa e minha duvida.

    No caso da NFs tem como sim enviar o número do lote recebido e buscar o número do protocolo de cada NFe.

  5. Estou usando o emulador Bematech e o Exemplo que esta nos ACBrECF

    Ativar

    #0#0#0#0#0#0#0

    - + - + - + - + - + - + - + - + - + - + - + -

    Abre Não Fiscal:

    #0#0#4#0#0#0#0

    - + - + - + - + - + - + - + - + - + - + - + -

    Comprovante não fiscal: 01 inválido

    - + - + - + - + - + - + - + - + - + - + - + -

  6. Não estou consequindo registrar itens no Exe do ACBrECF pois eu consigo abrir e cancelar mais não consigo registrar alquem ja consequiu isso.

    procedure TForm1.RegistraItemNaoFiscal1Click(Sender: TObject);

    Var Valor, CodCNF : String ;

    begin

    CodCNF := '01' ;

    Valor := '0' ;

    if not InputQuery('Registra Item Não Fiscal',

    'Entre com o indice do Comprovante Não Fiscal', CodCNF ) then

    exit ;

    if not InputQuery('Registra Item Não Fiscal',

    'Entre com o Valor do Comprovante Não Fiscal', Valor ) then

    exit ;

    ACBrECF1.RegistraItemNaoFiscal(CodCNF, StrToFloatDef(Valor,0),

    'TESTE DE COMPROVANTE NAO FISCAL');

    mResp.Lines.Add( 'Registra Item Nao Fiscal: '+ CodCNF +' '+ Valor );

    AtualizaMemos ;

    end;

  7. Favor corrigir o erro no Registro 1620 do Sped Pis/Cofins Campo 03 "ORIG_CRED" esta com erro pois o campo esta recebendo Integer no lugar de String pois o Campo 03 "ORIG_CRED"

    tem que passar 0 (Zero) a esquerda.

    Ex: 01 - Credito Decorrente....

    02 - Credito Tranferido por Pessoa .....

    Grato!

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.