Exemplo Simples de como formatar CGC / CNPJ

Discussão em 'Comandos Básicos' iniciado por fdantas, Janeiro 27, 2009.

  1. fdantas

    fdantas Administrator Moderador

    Exemplo Simples de como formatar CGC / CNPJ



    Código:
    def var c-cgc as char format "x(19)".
def var c-format-cgc as char init "999.999.999/9999-99".

assign c-cgc = string("045341433000110",c-format-cgc).

disp c-cgc.
    fdantas, Janeiro 27, 2009
    #1

Compartilhe esta Página