Retirar ponto e virgula de um valor

Discussão em 'Progress 4GL' iniciado por Demetrius, Julho 10, 2009.

  1. Demetrius

    Demetrius Sem Pontuação

    Galera,

    eu recebo os seguintes valores:

    1.236,49 e 36,20, gostaria de transformalos em 123649 e 3620.

    Alguém pode me ajudar?
  2. Agnaldo

    Agnaldo Membro Ativo

    Código:
    REPLACE(REPLACE(valor,",",""),".","").
    
  3. mcarril

    mcarril Membro Participativo

    Você pode também armazenar após o recebimento destes valores em uma variável inteira.
    Veja exemplo abaixo:

    DEF VAR v-dec AS DEC.
    DEF VAR v-int AS INT.

    v-dec = 12.55 /*(No caso o valor que entra)*/.
    v-int = v-dec * 100.

    DISP v-dec v-int FORMAT "9999".


    Ou você pode trabalhar com a variável que entra, formatando sem ponto e virgula e multiplicando-as por 100.

    Exemplo:

    DEF VAR v-dec AS DEC FORMAT "9999".

    v-dec = v-dec * 100.

    DISP v-dec.


    Abraços,
  4. Demetrius

    Demetrius Sem Pontuação

    Galera,
    muito obrigado!!!!

Compartilhe esta Página