CNPJ Propriedades

Índice

1. Numero
2. Filial
3. FilialComoString
4. Digito
5. Formatado

---

1. property Numero: AnsiString
   Acesso: leitura e gravação.
   Valor: string contento apenas a parte que corresponde ao número do CNPJ.
   Exceções: classe> ECNPJ, código(s): ceStringCNPJInvalida.
   O número representado por esta propriedade não contém nem a parte referente a filial nem os dígitos verificadores. Caso seu valor seja alterado, o valor referente ao dígito verificador é automaticamente atualizado para refletir o novo número.
   Outra verificação realizada é quanto a parte referente a filial. Se seu valor for igual a zero, ele é automaticamente alterado para 0001.
   Ex.:
   

var
  cnpj: TCNPJ;
begin
  cnpj := '12345678910114';
  Writeln(cnpj.Numero); // Imprime 12345678.

  cnpj := NULL_CNPJ;
  cnpj.Numero := '12345678';
  Writeln(cnpj.Filial); // Imprime 1.
  Writeln(cnpj.FilialComoString); // Imprime 0001.
  Writeln(cnpj.Digito); // Imprime 95.
end;

---

2. property Filial: TNumeroFilialType
   Acesso: leitura e gravação.
   Valor: número que representa uma filial da empresa, que compartilham o mesmo número de CNPJ.
   Exceções: nenhuma.
   Os valores aceitáveis para esta propriedade são quaisquer números entre 1 e 9999, conforme o formato do CNPJ especifica. Isso é garantido pelo tipo TNumeroFilialType. Ex.:
   

var
  cnpj: TCNPJ;
begin
  cnpj := '12345678000195';
  Writeln(cnpj.Filial); // Imprime 1
  cnpj.Filial := 4;
  Writeln(cnpj.Formatado); // Imprime 12.345.678/0004-38 (dígito é atualizado)
end;

---

3. property FilialComoString: AnsiString
   Acesso: somente leitura.
   Valor: string contendo o número da filial no formato 0000.
   Exceções: nenhuma.
   

var
  cnpj: TCNPJ;
begin
  cnpj := '12345678000195';
  Writeln(cnpj.FilialComoString); // Imprime 0001.
end;

---

4. property Digito: AnsiString
   Acesso: somente leitura.
   Valor: string contendo os dígitos verificadores do CNPJ.
   Exceções: nenhuma.
   

var
  cnpj: TCNPJ;
begin
  cnpj := '12345678000195';
  Writeln(cnpj.Digito); // Imprime 95
end;

---

5. function Formatado: AnsiString;
   Acesso: somente leitura.
   Valor: string contendo o número do CNPJ completo no formato 00.000.000/0000-00.
   Exceções: nenhuma.
   

var
  cnpj: TCNPJ;
begin
  cnpj := '12345678000195';
  Writeln(cnpj.Formatado); // Imprime 12.345.678/0001-95
end;