MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Substituir Códigos

    avatar
    SidneyCS
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 12/07/2012

    [Resolvido]Substituir Códigos Empty [Resolvido]Substituir Códigos

    Mensagem  SidneyCS 24/7/2012, 15:46

    Pessoal Bom dia!

    Mais uma vez estou para tirar uma dúvida com voces, tenho a seguinte situação, as gerar um relatório preciso que os códigos sejam trocas, por exemplo: "1" por (Casado), "2" por (Solteiro), "3" por (Divorciado) e assim por diante, e tambem em que campos da estrurar coloco esses códigos.

    desde de já obrigado.

    Atenciosamente:

    Sidney C Silva
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]Substituir Códigos Empty Re: [Resolvido]Substituir Códigos

    Mensagem  Alexandre Neves 24/7/2012, 16:43

    Boa tarde, Sidney

    Julgo que a solução mais prática será criar uma tabela Situacoes (campo CodSituacao,campo Descricao): CodSituacao=1 Descricao=casado, CodSituacao=2 Descricao=Solteiro, CodSituacao=3 Descricao=Divorciado
    No acontecimento AoAbrir do relatório, colocar
    Recordsource="SELECT campox, campoy, ..., Descricao, ... FROM SuaTabela LEFT JOIN Situacoes ON SuaTabela.CampoCodigoSituacao=Situacoes.CodSituacao ..."
    Na origem do controlo, coloque Descricao como campo de dados
    avatar
    SidneyCS
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 12/07/2012

    [Resolvido]Substituir Códigos Empty Re: [Resolvido]Substituir Códigos

    Mensagem  SidneyCS 24/7/2012, 17:30

    não sei se seria o certo, eu so quero que ao gerar o relatório ele troque os códigos de acordo com o seu estado civil, então na verdade ele ja existe no banco de dados, ele ja esta em uma tabela, so quero que faça a sbstituição, entendeu como é?

    att;

    Sidney
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]Substituir Códigos Empty Re: [Resolvido]Substituir Códigos

    Mensagem  Alexandre Neves 24/7/2012, 17:48

    Eu sei como é. Indiquei esta forma porque, quando precisar acrescentar novo código, é fácil: acrescenta código e descrição na tabela respectiva e coloca o código correspondente na tabela de dados
    avatar
    SidneyCS
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 12/07/2012

    [Resolvido]Substituir Códigos Empty Re: [Resolvido]Substituir Códigos

    Mensagem  SidneyCS 24/7/2012, 18:41

    Mais eu acho que desta forma ele não vai dar certo aqui, por que o estado civil está amarrado a um cadastro onde possui, Nome, Endereços, Documentações, Dados Socio Economicos, Profissoes, são mais ou menos 120 campos, Criei um relatorio onde ele vai me mostrar os cadastros individual de cada pessoa, e neste cadastro tem Estado Civil, Sexo, Zona Rural ou Urbana, Escolaridade , etc. este campos que sitei estão representados por numeros, Este Relatório é como se fosse um Currículum Digital de cada cadastro que vai ser gerado, e ao gerar ele trocar o numeros de acordo com suas expecificações, exemplo:

    Como é.
    Nome: Sidney Carvalho da Silva
    Sexo: 1 Estado Civil: 2

    Como eu quero que fique ao gerar o Relatório.
    Nome: Sidney Carvalho da Silva
    Sexo: Masculino Estado Civil: Casado

    Ficou mais Claro?

    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]Substituir Códigos Empty Re: [Resolvido]Substituir Códigos

    Mensagem  Alexandre Neves 24/7/2012, 21:38

    Olá, Sidney
    Como só falou no estado civil
    Se possui muitas variáveis, estranho como carrega esses números sabendo a que opção pertence!
    Crie funções: uma para estado civil outra para sexo, etc.
    avatar
    SidneyCS
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 44
    Registrado : 12/07/2012

    [Resolvido]Substituir Códigos Empty Re: [Resolvido]Substituir Códigos

    Mensagem  SidneyCS 24/7/2012, 21:52

    Voce pode me exemplicar como fazer estas funções,

    Atenciosamente:

    Sidney C Silva
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]Substituir Códigos Empty Re: [Resolvido]Substituir Códigos

    Mensagem  Alexandre Neves 24/7/2012, 21:58

    Sidney,
    Tem de, além perguntar o que não sabe, procurar através das dúvidas dos outros ir aprendendo. O saber não ocupa lugar!

    Criar uma função para o estado civil:
    Function EstadoCivilExtenso(Codigo as integer)as string
    select Codigo
    case 1
    EstadoCivilExtenso="Casado"
    case 2
    EstadoCivilExtenso="Solteiro"
    case 3
    EstadoCivilExtenso="Divorciado"
    end select
    end function

    AoAbrir do relatório, coloque
    Recordsource="SELECT EstadoCivilEstenso(EstadoCivil) as EC, ...

    Na origem do campo EstadoCivil, coloque EC

    Para as outras variáveis, adapte desta forma

    Conteúdo patrocinado


    [Resolvido]Substituir Códigos Empty Re: [Resolvido]Substituir Códigos

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 27/4/2024, 08:35