|
ActiveDelphi .: O site do programador Delphi! :.
|
Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
e_pera Novato
Registrado: Quinta-Feira, 22 de Janeiro de 2009 Mensagens: 97
|
Enviada: Qua Dez 18, 2024 11:15 am Assunto: Extração de Dados |
|
|
Bom dia,
Tenho um arquivo TXT de um CNIS que preciso extrair os dados (Nome, CPF, NIT, Código Emp., Origem do Vínculo, Data Inicio, Data Fim, Competência e Remuneração), alguém pode me ajudar, pois não sei como extrair estes dados, já tentei de todas as formas, estou usando o Delphi, e, irei exportar para uma base de dados Firebird, abaixo anexo o arquivo que tenho.
Código: | Página 1 de 15
INSS
CNIS - Cadastro Nacional de Informações Sociais
Extrato Previdenciário 16/12/2024 09:30:32
Identificação do Filiado
NIT: 666.66666.66-6 CPF: 999.999.999-99 Nome: UMDOIS DE OLIVEIRA QUATRO
Data de nascimento: 22/05/1964 Nome da mãe: TRES QUATRO DE OLIVEIRA
Relações Previdenciárias
Matrícula do Tipo Filiado no
Seq. NIT Código Emp. Origem do Vínculo Trabalhador Vínculo Data Início Data Fim Últ. Remun.
1 666.66666.66-6 01.535.699/0004-08 AR NASCIMENTO ENGENHARIA E CONSTRUCOES LTDA Empregado ou Agente 16/05/1983 30/08/1984 08/1984
Público
Remunerações
Competência Remuneração Indicadores Competência Remuneração Indicadores Competência Remuneração Indicadores
05/1983 27.390,96 06/1983 51.391,97 07/1983 50.985,09
08/1983 47.866,03 09/1983 51.798,85 10/1983 70.300,03
11/1983 100.067,95 12/1983 105.942,17
01/1984 82.733,75 02/1984 75.305,86 03/1984 78.194,99
04/1984 129.340,81 05/1984 108.809,91 06/1984 105.299,91
07/1984 108.809,91 08/1984 324.690,28
Matrícula do Tipo Filiado no
Seq. NIT Código Emp. Origem do Vínculo Trabalhador Vínculo Data Início Data Fim Últ. Remun.
2 666.66666.66-6 50.015.932/0001-86 ROMA SERVICOS ADMINISTRATIVOS ENGENHARIA E Empregado ou Agente 24/08/1984 20/10/1986 09/1986
CONST LTDA Público
Remunerações
Competência Remuneração Indicadores Competência Remuneração Indicadores Competência Remuneração Indicadores
08/1984 28.079,97 09/1984 105.299,91 10/1984 185.999,72
11/1984 223.080,47 12/1984 229.616,28
01/1985 197.000,50 02/1985 177.999,34 03/1985 197.000,50
O INSS poderá rever a qualquer tempo as informações constantes deste extrato, observados os arts.19 ao 19-F do RPS aprovado pelo Decreto 3.048/99.
O segurado somente terá reconhecida como tempo de contribuição ao RGPS a competência cujo valor consolidado seja igual ou superior ao salário mínimo, sendo assegurados os ajustes de complementação, utilização
ou agrupamento, conforme o caso, de acordo com o § 14 do art.195 da CF/1988 e art.29 da EC 103/2019.
Página 2 de 15
INSS
CNIS - Cadastro Nacional de Informações Sociais
Extrato Previdenciário 16/12/2024 09:30:32
Identificação do Filiado
NIT: 666.66666.66-6 CPF: 999.999.999-99 Nome: UMDOIS DE OLIVEIRA QUATRO
Data de nascimento: 22/05/1964 Nome da mãe: TRES QUATRO DE OLIVEIRA
Relações Previdenciárias
04/1985 354.999,32 05/1985 367.001,63 06/1985 381.998,69
07/1985 394.001,01 08/1985 394.001,01 09/1985 381.998,69
10/1985 678.998,49 11/1985 657.000,00 12/1985 679.002,00
01/1986 679.002,00 02/1986 679.002,00 03/1986 851,00
04/1986 1.105,99 05/1986 1.118,99 06/1986 1.280,00
07/1986 1.703,00 08/1986 1.518,99 09/1986 1.218,00
Matrícula do Tipo Filiado no
Seq. NIT Código Emp. Origem do Vínculo Trabalhador Vínculo Data Início Data Fim Últ. Remun.
3 666.66666.66-6 50.015.932/0001-86 ROMA SERVICOS ADMINISTRATIVOS ENGENHARIA E Empregado ou Agente 26/11/1987 31/03/1988 03/1988
CONST LTDA Público
Remunerações
Competência Remuneração Indicadores Competência Remuneração Indicadores Competência Remuneração Indicadores
11/1987 1.233,01 12/1987 11.498,00
01/1988 17.153,99 02/1988 19.221,98 03/1988 29.238,00
Matrícula do Tipo Filiado no
Seq. NIT Código Emp. Origem do Vínculo Trabalhador Vínculo Data Início Data Fim Últ. Remun.
4 666.66666.66-6 60.812.633/0021-70 CEMSA CONSTRUCOES ENGENHARIA E MONTAGENS S Empregado ou Agente 01/04/1988 08/08/1989 08/1989
A Público
Indicadores: PADM-EMPR
Remunerações
Competência Remuneração Indicadores Competência Remuneração Indicadores Competência Remuneração Indicadores
04/1988 22.676,99 05/1988 41.903,99 06/1988 41.941,99
O INSS poderá rever a qualquer tempo as informações constantes deste extrato, observados os arts.19 ao 19-F do RPS aprovado pelo Decreto 3.048/99.
O segurado somente terá reconhecida como tempo de contribuição ao RGPS a competência cujo valor consolidado seja igual ou superior ao salário mínimo, sendo assegurados os ajustes de complementação, utilização
ou agrupamento, conforme o caso, de acordo com o § 14 do art.195 da CF/1988 e art.29 da EC 103/2019.
Página 3 de 15
INSS
CNIS - Cadastro Nacional de Informações Sociais
Extrato Previdenciário 16/12/2024 09:30:32
Identificação do Filiado
NIT: 666.66666.66-6 CPF: 999.999.999-99 Nome: UMDOIS DE OLIVEIRA QUATRO
Data de nascimento: 22/05/1964 Nome da mãe: TRES QUATRO DE OLIVEIRA
Relações Previdenciárias
07/1988 44.144,03 08/1988 56.330,95 09/1988 67.409,00
10/1988 121.863,04 11/1988 149.993,04 12/1988 168.386,94
01/1989 254,00 02/1989 221,99 03/1989 223,00
04/1989 243,99 05/1989 240,00 06/1989 502,00
07/1989 570,99 08/1989 1.363,99
Matrícula do Tipo Filiado no
Seq. NIT Código Emp. Origem do Vínculo Trabalhador Vínculo Data Início Data Fim Últ. Remun.
5 666.66666.66-6 15.104.599/0001-80 SAMA S.A. - MINERACOES ASSOCIADAS Empregado ou Agente 10/08/1989 17/08/1992 08/1992
Público
Remunerações
Competência Remuneração Indicadores Competência Remuneração Indicadores Competência Remuneração Indicadores
08/1989 740,00 09/1989 1.393,00 10/1989 2.273,99
11/1989 3.900,99 12/1989 4.426,00
01/1990 7.334,94 02/1990 9.571,86 03/1990 19.296,89
04/1990 16.647,90 05/1990 17.267,71 06/1990 24.204,74
07/1990 24.379,55 08/1990 29.490,60 09/1990 37.424,96
10/1990 35.552,86 11/1990 43.174,55 12/1990 47.363,58
01/1991 56.341,55 02/1991 65.656,19 03/1991 66.294,90
04/1991 66.653,60 05/1991 80.491,60 06/1991 82.698,20
07/1991 91.057,10 08/1991 118.819,80 09/1991 174.669,60
10/1991 159.201,00 11/1991 332.627,40 12/1991 320.027,40
01/1992 369.474,81 02/1992 382.382,23 03/1992 666.595,10
O INSS poderá rever a qualquer tempo as informações constantes deste extrato, observados os arts.19 ao 19-F do RPS aprovado pelo Decreto 3.048/99.
O segurado somente terá reconhecida como tempo de contribuição ao RGPS a competência cujo valor consolidado seja igual ou superior ao salário mínimo, sendo assegurados os ajustes de complementação, utilização
ou agrupamento, conforme o caso, de acordo com o § 14 do art.195 da CF/1988 e art.29 da EC 103/2019. |
|
|
Voltar ao Topo |
|
|
joemil Moderador
Registrado: Quinta-Feira, 25 de Março de 2004 Mensagens: 9099 Localização: Sinop-MT
|
Enviada: Sex Dez 27, 2024 3:14 pm Assunto: |
|
|
rapaz, esse arquivo aí é complicado. nao tem opcao em csv, xml, json, excel...? _________________ <b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/ |
|
Voltar ao Topo |
|
|
e_pera Novato
Registrado: Quinta-Feira, 22 de Janeiro de 2009 Mensagens: 97
|
Enviada: Seg Dez 30, 2024 2:54 pm Assunto: |
|
|
Boa tarde,
Tentei fazer a conversão do Txt para XML mas não consegui, utilizei o seguinte código:
Código: |
procedure RunGhostscript(const Params: string);
begin
ShellExecute(0, 'open', 'C:\Program Files (x86)\gs\gs10.04.0\bin\gswin32.exe', PChar(Params), nil, SW_NORMAL);
end;
procedure PDFToXML(const PDFFileName, XMLFileName: string);
var
XMLDOC: IXMLDocument;
RootNode, PageNode: IXMLNode;
PageText: TStringList;
i: Integer;
TempFileName: string;
begin
// Parâmetros do Ghostscript para extrair texto
TempFileName := ChangeFileExt(PDFFileName, '.txt');
RunGhostscript(Format('-sDEVICE=txtwrite -o "%s" "%s"', [TempFileName, PDFFileName]));
// Ler o arquivo de texto gerado pelo Ghostscript
PageText := TStringList.Create;
try
PageText.LoadFromFile(TempFileName);
XMLDOC := NewXMLDocument;
RootNode := XMLDOC.AddChild('PDFDocument');
for i := 0 to PageText.Count - 1 do
begin
PageNode := RootNode.AddChild('Page');
PageNode.Attributes['Number'] := i + 1;
PageNode.Text := PageText[i];
end;
XMLDOC.SaveToFile(XMLFileName);
finally
PageText.Free;
end;
end;
|
Se puder me informar onde eu errei agradeço, mas se não puder, encontrei uma pagina que convertia TXT em XML, então vou repassar uma parte do XML para que possa me ajudar:
Código: |
</office>
<text>
</draw>
</draw>
<draw>
<draw>
<text><text>Extrato Previdenciário</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>16/12/2024 09:30:32</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>NIT:</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>120.92293.05-4</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>CPF:</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>315.926.601-00</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Nome:</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>JOAQUIM FARIAS NERES</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Data de nascimento:</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>22/05/1964</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Nome da mãe:</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<text>
</draw>
<draw>
<text>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>MARIA FARIAS NERES</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>Página 1 de 15</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>Identificação do Filiado</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Código Emp.</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Origem do Vínculo</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Tipo Filiado no</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Vínculo</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Data Início Data Fim Últ. Remun.</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Seq.</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>NIT</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Matrícula do</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Trabalhador</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>1</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>01.535.699/0004-08</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>AR NASCIMENTO ENGENHARIA E CONSTRUCOES LTDA</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Empregado ou Agente</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Público</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>16/05/1983 30/08/1984</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>08/1984</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<text>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>120.92293.05-4</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>Competência</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>Remuneração</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>Indicadores</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>Competência</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>Remuneração</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>Indicadores</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>Competência</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Remuneração</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>Indicadores</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Remunerações</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>05/1983</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>27.390,96</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>06/1983</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>51.391,97</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>07/1983</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>50.985,09</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>08/1983</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>47.866,03</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>09/1983</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>51.798,85</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>10/1983</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>70.300,03</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>11/1983</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>100.067,95</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>12/1983</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>105.942,17</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>01/1984</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>82.733,75</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>02/1984</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>75.305,86</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>03/1984</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>78.194,99</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>04/1984</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>129.340,81</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>05/1984</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>108.809,91</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>06/1984</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>105.299,91</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>07/1984</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>108.809,91</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>08/1984</text></text>
</draw>
</draw>
<draw>
<text>
</draw>
<draw>
<text>
</draw>
<draw>
<text>
</draw>
<draw>
<draw>
<text><text>324.690,28</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Código Emp.</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Origem do Vínculo</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Tipo Filiado no</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Vínculo</text></text>
</draw>
</draw>
<draw>
<draw>
<text><text>Data Início Data Fim Últ. Remun.</text></text>
</draw>
</draw>
|
|
|
Voltar ao Topo |
|
|
|
|
Enviar Mensagens Novas: Proibido. Responder Tópicos Proibido Editar Mensagens: Proibido. Excluir Mensagens: Proibido. Votar em Enquetes: Proibido.
|
|