Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

EDF Contribuições


Dercide Alvarez
  • Este tópico foi criado há 2327 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Boa tarde,

Não sei se aqui é o local correto, mas como estamos falando de Trunk2.

Esse problema já ocorria na Trunk.

No registro D600, 03-COD_MUN, ele não assume o valor informado.

QTD_CONS tambem não assume o valor informado.

Nos registros D601 e D605, 02-COD_CLASS ele não assume o valor informado, estou passando '0599', ele coloca 

Dercide.

Link to comment
Share on other sites

Pelo o que vi nos fontes, o problema esta na função LFill, a qual possue várias (overload).

Mas pelo o que vi, o problema é quando o campo é Integer, mas em vez de chamar a LFill que faz o tratamento para integer/Int64, esta chamando a que trata DataTime, e com isso o retorno esta trazendo valores errados.

Assim que achar uma solução posto um retorno.

 

Dercide.

Link to comment
Share on other sites

Bom dia, faça a correção pelo Trunk e anexe aqui para que eu suba para Trunk2.

--
Isaque Pinheiro
Aracruz/ES - Brasil
___________________________________________________________________________
Site Oficial: www.isaquepinheiro.com.br 
Youtube: youtube.com/isaquepinheirooficialbr
Facebook: facebook.com.br/isaquepinheirooficialbr
Instagram: instagram.com/isaquepinheirooficialbr
Linkdin: https://www.linkedin.com/in/isaquepinheirooficialbr

Conheça o Projeto ORMBr Framework for Delphi - https://www.ormbr.com.br

 

Link to comment
Share on other sites

Gentileza baixe esse .PAS e substitua o seu ai e teste se resolve o ocorrido, aguardo o retorno.

ACBrTXTClass.pas

  • Like 1

--
Isaque Pinheiro
Aracruz/ES - Brasil
___________________________________________________________________________
Site Oficial: www.isaquepinheiro.com.br 
Youtube: youtube.com/isaquepinheirooficialbr
Facebook: facebook.com.br/isaquepinheirooficialbr
Instagram: instagram.com/isaquepinheirooficialbr
Linkdin: https://www.linkedin.com/in/isaquepinheirooficialbr

Conheça o Projeto ORMBr Framework for Delphi - https://www.ormbr.com.br

 

Link to comment
Share on other sites

  • 3 weeks later...

Boa tarde Isaque,

Somente hoje vi o teu post com o anexo.

Mas hoje 12/01 atualizei os fontes da trunck2 e o erro persiste.

Eu fiz um ajustes na ACBrEPCBloco_D_Class.Pas o qual resolveu o problema.

Estou anexando para você analisar se é viavel ou não.

Como disse, o problema é na chamada da função LFILL, onde na D600 os campos COD_MUN e QTD_CONS chamam a função que trata data.

E nas D601 e D605 nos campos COD_CLASS.

A unica coisa que fiz, foi neste campos incluir o parametro do tamanho do campo. No QTD_CONS, coloquei 10, pois é numerico e não possui tamanho fixo, os outros estão de acordo com o lay-out.

As minhas alterações foram nas seguintes linhas :

1259  ==>  LFill( COD_MUN, 7 ) 

1263 ==>  LFill( QTD_CONS, 10 )   

1302 ==>  LFill( COD_CLASS, 4 )

1330 ==>  LFill( COD_CLASS, 4 )

Aguardo um retorno.

 

Dercide.

 

 

 

ACBrEPCBloco_D_Class.pas

  • Like 1
Link to comment
Share on other sites

  • Consultores
42 minutos atrás, Dercide Alvarez disse:

Boa tarde Isaque,

Somente hoje vi o teu post com o anexo.

Mas hoje 12/01 atualizei os fontes da trunck2 e o erro persiste.

Eu fiz um ajustes na ACBrEPCBloco_D_Class.Pas o qual resolveu o problema.

Estou anexando para você analisar se é viavel ou não.

Como disse, o problema é na chamada da função LFILL, onde na D600 os campos COD_MUN e QTD_CONS chamam a função que trata data.

E nas D601 e D605 nos campos COD_CLASS.

A unica coisa que fiz, foi neste campos incluir o parametro do tamanho do campo. No QTD_CONS, coloquei 10, pois é numerico e não possui tamanho fixo, os outros estão de acordo com o lay-out.

As minhas alterações foram nas seguintes linhas :

1259  ==>  LFill( COD_MUN, 7 ) 

1263 ==>  LFill( QTD_CONS, 10 )   

1302 ==>  LFill( COD_CLASS, 4 )

1330 ==>  LFill( COD_CLASS, 4 )

Aguardo um retorno.

 

Dercide.

 

 

 

ACBrEPCBloco_D_Class.pas

Boa tarde

como ficou seus arquivos gerados após essa mudança?

  • Like 1
Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

 

Link to comment
Share on other sites

Juliomar,

Os arquivos ficaram corretos, conforme o lay-out.

Nos ultimos meses, eu gerava e alterava manualmente os TXT, e agora foram gerados sem necessidades de ajustes manual.

Não cheguei a verificar outros tipos de registros que utilizam a mesma função, apenas ajustei os que necessito. D600, D601 e D605.

Pode ser que algum outro registro que utilize a função LFILL para campos numéricos ocorra o mesmo problema.

Dercide.

  • Like 1
Link to comment
Share on other sites

  • Este tópico foi criado há 2327 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.