|
Usuários |
|
38 Usuários Online
|
|
[Dicas]
Formatar CPF/CNPJ direto no Firebird via SP |
Publicado por nilcemar : Quarta, Novembro 16, 2011 - 08:56 GMT-3 (1257 leituras)
2 Comentários Enviar para um amigo Versão para impressão
|
O exemplo abaixo cria uma Stored Procedure no Firebird para retornar CPF ou CNPJ formatados com pontuação. Você passa como parâmetro somente os números do documento create or alter procedure FORMATA_CPFCNPJ (
INCPFCNPJ varchar(14))
returns (
RESULTADO varchar(18))
as
begin
if (char_length(:incpfcnpj)=11) then --CPF
begin
resultado = Substring( :inCPFCNPJ from 1 for 3 ) || '.' || Substring( :inCPFCNPJ from 4 for 3 ) || '.' ||
Substring( :inCPFCNPJ from 7 for 3 ) || '-' || Substring( inCPFCNPJ from 10 for 2 );
end
else
if (char_length(:incpfcnpj)=14) then --CNPJ 17.605.320/0001-78
begin
resultado = Substring( :inCPFCNPJ from 1 for 2 ) || '.' || Substring( :inCPFCNPJ from 3 for 3 ) || '.' ||
Substring( :inCPFCNPJ from 6 for 3 ) || '/' ||
Substring( :inCPFCNPJ from 9 for 4 ) || '-' || Substring( inCPFCNPJ from 13 for 2 );
end
suspend;
end^
SET TERM ; ^
COMMENT ON PARAMETER FORMATA_CPFCNPJ.INCPFCNPJ IS
'Numero do CPF ou CNPJ sem pontuação';
Esta procedure é selecionável por causa da cláusula SUSPEND. Se quiser torná-la executável, elimine esta cláusula.
Nilcemar P. Ferreira - nilcemar@gmail.com
nilcemar.blogspot.com
|
|
Comentários | |
| | Comentários pertencem aos seus respectivos autores. Não somos responsáveis pelo seus conteúdos. |
|
|
Edição 112 |
|
|
50 Programas Fontes |
|
|
Produtos |
|
|