Jump to content

dev botao

ACBrSPEDPisCofins


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

Recommended Posts

Isaque,

Me dediquei bastante hj pois a partir de amanhã e pela próxima semana vou viajar e não terei tempo nenhum de programar. Assim que voltar, ajudarei no que puder. Enquanto isso, espero que os colegas continuem o trabalho.

Obrigado.

Paulo Junqueira

http://www.rt1.com.br

Sim, sou muito grato Paulo pelo que já fez.

Abs e boa viagem

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

  • Replies 185
  • Created
  • Last Reply

Top Posters In This Topic

Isaque,

estou subindo agora o bloco 9, fico no aguardo das pendencias, entro mais tarde para ver se voce ja disponibilizou alguma tarefa, veja se e nescessario alguma correção nas classes ja criadas ou se falta alguma,

abs.. e bom trabalho

Claudio Roberto de Souza.

Pessoal, vou baixar todos os blocos, e prometo que assim que puder dou um retorno, só peço por gentileza que não me cobrem isso hj, acabei de bater meu carro, nada sério, só danos materiais, o qual o seguro cobre, mas deixa agente chateado.

Amanhã, volto a postar aqui alguam coisa até o final do dia.

Abs

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

Isaque,

estou subindo agora o bloco 9, fico no aguardo das pendencias, entro mais tarde para ver se voce ja disponibilizou alguma tarefa, veja se e nescessario alguma correção nas classes ja criadas ou se falta alguma,

abs.. e bom trabalho

Claudio Roberto de Souza.

Pessoal, vou baixar todos os blocos, e prometo que assim que puder dou um retorno, só peço por gentileza que não me cobrem isso hj, acabei de bater meu carro, nada sério, só danos materiais, o qual o seguro cobre, mas deixa agente chateado.

Amanhã, volto a postar aqui alguam coisa até o final do dia.

Abs

Pessoal, estamos com todas as class criadas, estou dando uma lapidada, uma a uma, mas não estou conferindo se tem todos os campo ou não.

Em seguida, vou passar para vcs, como implementar a hierarquia, assim que puder ir ajudando.

Blocos criados:

Bloco_0

Bloco_1

Bloco_A

Bloco_C

Bloco_D

Bloco_F

Bloco_M

Bloco_9

Obrigado a todos

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

Bem suvi para o SVN, todos os blocos, criados 0,1,A,C,D,F,M e 9.

Agora gostaria de pedir a vc a ajudar para definir os registros que receberão LISTAS, para sabermos quais serão listas iremos olhar no manual e observarmos o seguinte:

A coluna ocorrencia de todos os registros as seguintes opções

1 - esse não é uma lista

1:1 - esse não é lista

V - esse é uma lista

1:N - esse é uma lista

Blz, então os registros V e 1:N, temos que fazer a implementação deles para que sejam uma lista, vou dar um exemplo abaixo mostrando como foi implementado no RegistroA010, do bloco A:


// REGISTRO A010: IDENTIFICAÇÃO DO ESTABELECIMENTO TRegistroA010 = class
private
fCNPJ:Integer; //02 Número de inscrição do estabelecimento no CNPJ. N 014* -
public
property CNPJ: Integer read FCNPJ write FCNPJ;
end;

/// Registro A010 - Lista
TRegistroA010List = class(TObjectList)
private
function GetItem(Index: Integer): TRegistroA010;
procedure SetItem(Index: Integer; const Value: TRegistroA010);
public
function New: TRegistroA010;
property Items[Index]: TRegistroA010 read GetItem write SetItem;
end;
[/code]

Simples assim, então para cada registro que a ocorrencia seja V ou 1:N, temos que fazer a implementação da lista como mostrado no RegistroA010 acima.

Obs: o BLOCO A, eu já fiz

Para realizar as implementações, baixem as Units dos blocos do SVN, ao implementar a lista em um bloco, reanexe-o aqui no forum que eu pego, e subo para o SVN.

Após essas implementaçaões temos que implementar a hierarquia, passo seguinte do treinamento hehehehehe.

Abs, e eu vou terminando o Bloco A, e implementando o componente.

Abs

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

Isaque, estou dando uma estudada no sped fiscal e vi que tem uma unit so para definir os tipos la, vamos fazer uma nova para resolver os "TODO" que voce ja colocou em alguns e os que ainda falta mapear ou vamos acresentar este tipos la na mesma unit do EFD? sera que daria conflito com algum tipo da EFD? seria melhor criar outra Unit?

ate mais, vou começar a conferir no manual e nas unit para ver se falta algum campo em algumas delas,

abs.

Claudio

Link to comment
Share on other sites

Isaque criei um projeto vazio para depurar as classes e achei varios erros, fui arrumando o que pude ate compilar, tive que fazer algumas implmentações, e achei alguns campos que talves esteja faltando, comentei eles para compilar e agora com mais tempo vou reler todas as unit e o manual, segue as classes com as devidas correções

ACBrEPCBloco_0.zip

Link to comment
Share on other sites

Isaque criei um projeto vazio para depurar as classes e achei varios erros, fui arrumando o que pude ate compilar, tive que fazer algumas implmentações, e achei alguns campos que talves esteja faltando, comentei eles para compilar e agora com mais tempo vou reler todas as unit e o manual, segue as classes com as devidas correções

OK, amanhã vou dar uma geral e te dou um retorno.

Abraço

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

oi Vania, estou estudando as classes do efd, a do pis confins vao ser nos mesmos moldes, o Isaque ja começou a faze-lo, estamos com as primeiras units feitas e em breve o Isaque ira revisar e subir para o svn, ai ele mesmo ira postar aqui o que falta para nos fazermos, no momento so estou me concentrando no manual do efd-pis/cofins para ver todos os tipos que temos que criar para as classes. mas e bom saber que teremos mais ajuda. apesar de ja ter sido prorrogado o prazo sera melhor ja termos o mesmo pronto antes do prazo final.

Link to comment
Share on other sites

oi Vania, estou estudando as classes do efd, a do pis confins vao ser nos mesmos moldes, o Isaque ja começou a faze-lo, estamos com as primeiras units feitas e em breve o Isaque ira revisar e subir para o svn, ai ele mesmo ira postar aqui o que falta para nos fazermos, no momento so estou me concentrando no manual do efd-pis/cofins para ver todos os tipos que temos que criar para as classes. mas e bom saber que teremos mais ajuda. apesar de ja ter sido prorrogado o prazo sera melhor ja termos o mesmo pronto antes do prazo final.

Cláudio, subi suas implementações para o SVN, adicionei tb uma unit "ACBrEPCBlocos.pas", essa unit, será onde iremos implementar todos os tipos que for necessário para o SPED Pis/Cofins.

Quero te agradecer, por sua imensa ajuda, não esta sobrando tempo, para mim produzir, final de ano vc sabe clientes novos, inventário, implantação de NFe, em vários clientes, pois aqui no ES não foi prorrogado para todos, enfim estou fazendo o que posso, e sua ajuda tem sido de grande valia.

Vi que vai ser preciso, dar uma geral em todas as class, pois tem propriedades sem a declaração de sua variável, vc até comentou, ai eu retirei seu comentário, para gente ir acertando logo, assim agente vê os erros.

Agora precisamos implementar a hierarquia, da class, o Bloco A, eu fiz e serve como exemplo, para quem puder ir ajudando, vou tentar explicar aqui como fazer a implementação, me baseando o Bloco A mesmo que já fiz:


A001 - Nivel - 1 - Esse é Pai
A010 - Nivel - 2 - Esse é filho do A001
A100 - Nivel - 3 - Esse é filho do A010
A110 - Nivel - 4 - Esse é filho do A100
A111 - Nivel - 4 - Esse é filho do A100
A120 - Nivel - 4 - Esse é filho do A100
A170 - Nivel - 4 - Esse é filho do A100
A990 - Nivel - 1 - Esse é Pai

Exemplo:
...
TRegistroA001 = class(TOpenBlocos)
private
FRegistroA010: TRegistroA010List;
public
constructor Create; virtual; /// Create
destructor Destroy; override; /// Destroy

property RegistroA010: TRegistroA010List read FRegistroA010 write FRegistroA010;
end;

...

{ TRegistroA001 }

constructor TRegistroA001.Create;
begin
FRegistroA010 := TRegistroA010List.Create;
end;

destructor TRegistroA001.Destroy;
begin
FRegistroA010.Free;
inherited;
end;



[/code]

Observer que quando o numero do nivel aumenta ele, passa a ser filho do numero menor a ele proprio.

Abs

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

  • Este tópico foi criado há 4905 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.