terça-feira, 9 de setembro de 2014
Windev Cnpj formatado Tabela
Windev Cnpj formatado Tabela
------------- empresa------------
IF Val(TABLE_empresa.COL_jud_fis)=1 THEN // se for juridica
//TABLE_empresa.COL_IdInscricao_cnpj_cpf..DisplayMask = "99.999.999.9999-99" // nao funciona
TABLE_empresa.COL_IdInscricao_cnpj_cpf = Left(TABLE_empresa.COL_IdInscricao_cnpj_cpf,2) + "." + Middle(TABLE_empresa.COL_IdInscricao_cnpj_cpf,3,3) + "." + Middle(TABLE_empresa.COL_IdInscricao_cnpj_cpf,6,3) + "." + Middle(TABLE_empresa.COL_IdInscricao_cnpj_cpf,9,4) + "-" + Middle(TABLE_empresa.COL_IdInscricao_cnpj_cpf,13,2)
END
-------- CADASTRO GERAL -----
IF Val(TABLE_cadastro_geral.COL_Juridica_Fisica)=1 THEN // se for juridica
TABLE_cadastro_geral.COL_IdInscricao_cnpj_cpf = Left(TABLE_cadastro_geral.COL_IdInscricao_cnpj_cpf,2) + "." + Middle(TABLE_cadastro_geral.COL_IdInscricao_cnpj_cpf,3,3) + "." + Middle(TABLE_cadastro_geral.COL_IdInscricao_cnpj_cpf,6,3) + "." + Middle(TABLE_cadastro_geral.COL_IdInscricao_cnpj_cpf,9,4) + "-" + Middle(TABLE_cadastro_geral.COL_IdInscricao_cnpj_cpf,13,2)
END
------ FORNECEDOR --------------
IF Val(TABLE_fornecedor.COL_tipo_jur_fis)=1 THEN // se for juridica
TABLE_fornecedor.COL_IdInscricao_cnpj_cpf = Left(TABLE_fornecedor.COL_IdInscricao_cnpj_cpf,2) + "." + Middle(TABLE_fornecedor.COL_IdInscricao_cnpj_cpf,3,3) + "." + Middle(TABLE_fornecedor.COL_IdInscricao_cnpj_cpf,6,3) + "." + Middle(TABLE_fornecedor.COL_IdInscricao_cnpj_cpf,9,4) + "-" + Middle(TABLE_fornecedor.COL_IdInscricao_cnpj_cpf,13,2)
END
Assinar:
Postagens (Atom)