1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.
  2. Anuncie Aqui
    Anuncie aqui você Também: fdantas@4each.com.br

Comando Replace

Discussão em 'Progress 4GL' iniciado por leandro.marcelino, Agosto 16, 2012.

  1. leandro.marcelino

    leandro.marcelino Sem Pontuação

    Boa tarde pessoal,
    Eu estou tentando usar o comando REPLACE, mas não estou tendo sucesso.

    A minha necessidade é a seguinte:
    Eu tenho que transformar valores decimais em texto
    exemplo:
    2,52 -> 00000000252

    Mas com o REPLACE fica 0000000025_ (no lugar do "underline" fica um espaço vazio).

    Como eu posso fazer essa transformação?

    Att,
    Leandro.
  2. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Se o seu campo decimal estiver sempre com duas casas decimais poderá fazer da seguinte forma:

    d-variavel = d-variavel * 100.
    c-string = string(d-variavel,'999999999999').


    Veja se isso te ajuda!!!!
  3. leandro.marcelino

    leandro.marcelino Sem Pontuação

    Boa tarde Rogério,
    Muito obrigado, funcionou certinho.

    Att,
    Leandro.
  4. tartarotti

    tartarotti Sem Pontuação

    DEFINE VARIABLE d-var-1 AS DECIMAL FORMAT "999999.99" NO-UNDO.
    DEFINE VARIABLE d-var-2 AS DECIMAL FORMAT "999999" NO-UNDO.
    DEFINE VARIABLE c-var-1 AS CHARACTER NO-UNDO.


    ASSIGN d-var-1 = 123.45
    d-var-2 = d-var-1 * 100.

    DISP d-var-1 SKIP
    d-var-2 WITH 1 COL SCROLLABLE.

    ASSIGN c-var-1 = STRING(d-var-2,'999999').

    DISP c-var-1.
  5. leandro.marcelino

    leandro.marcelino Sem Pontuação

    Boa tarde tartarotti,
    Obrigado.

    Att,
    Leandro.

Compartilhe esta Página