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




Teste

Teste
teste