DEF VAR Dia as DATE NO-UNDO.
DEF VAR qtdeDias as INTEGER NO-UNDO.
ASSIGN Dia = TODAY.
ASSIGN qtdeDias = Dia - date(1,1,year(Dia)) + 1.
DISP qtdeDias.
Dicas de Progress e novidades de Tecnologia Tips and Tricks of Progress and WebSpeed. Samples Sources Nao achou o que encontrava ? Poste nos comentarios e um de nossos editores postaram um artigo sobre o assunto.
Postado por
Dantas
às
05:31
Um comentário:
Dantas, boa tarde.
Estou trabalhando uma oportunidade para analista de negócio/desenvolvedor Datasul.
É para um projeto em Campinas.
Caso você se interesse, meu e-mail é: tatiana.sousa@holdti.com.br
Peço tambem algumas indicações já que temos três vagas com esse perfil no projeto.
Obrigada.
Tatiana
Postar um comentário