Comando para tirar character especiais

Discussão em 'Progress 4GL' iniciado por luizclairrodrigues, Dezembro 14, 2012.

  1. luizclairrodrigues

    luizclairrodrigues Membro Participativo

    Bom dia!
    alguém sabe me dizer como eu faço um comando para tirar character especiais como Ç ^´~ .
    obrigado .
  2. lwazevedo

    lwazevedo Membro Ativo

    você pode usar o replace(palavra,"O que deseja tirar","Substitui o que você quer tirar").

    var = "AB;CDE;XXXX".
    Ex: replace(var,";"," ").

    espero que isso ajude.
  3. jdchaves

    jdchaves Membro Participativo

    EX usando msm comando citado no post anterior:

    Código:
    DEFINE VARIABLE c-texto-sem-acento AS CHARACTER   NO-UNDO.
    
    assign c-texto-sem-acento = 'Este é um teste muito grandão! Parabéns'
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ô', 'o')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'õ', 'o')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ö', 'o')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ó', 'o')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ò', 'o')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ô', 'o')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'á', 'a')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ã', 'a')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'à', 'a')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'â', 'a')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ä', 'a')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ë', 'e')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'é', 'e')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ê', 'e')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'è', 'e')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'í', 'i')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ì', 'i')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ï', 'i')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'î', 'i')
           c-texto-sem-acento =  replace(c-texto-sem-acento, 'ñ', 'n').
    
    MESSAGE c-texto-sem-acento 
        VIEW-AS ALERT-BOX INFO BUTTONS OK.
    
  4. luizclairrodrigues

    luizclairrodrigues Membro Participativo

    Que beleza Valeu Amigo!

Compartilhe esta Página