365 dias de dicas de desenvolvimento Progress OpenEdge // Dica #235
Jaison Antoniazzi
Progress OpenEdge specialist, author of three books: Advanced Progress ABL, Progress OpenEdge RDBMS, and 365 Tips for Progress ABL and OpenEdge
Bom dia, pessoal, tudo bom?
Vamos ver o que temos para hoje...
Hum, função Normalize... passo, pouco ganho, muito trabalho para isso e para aquilo!
Operador Not bit-a-bit para enumerações, nem... Próxima!
Operador lógico Not, esse é divertido... mesmo já tendo o mostrado em muitas dicas, como na dica 41, dica 43, dica 58 e em muitas outras...
Programa dica235
Para trazer os clientes que não iniciam por J e ordenados pelo nome dos clientes... Discriminação com a letra inicial do meu nome! :D
/*
File : dica235.p
Author(s) : Jaison Antoniazzi
*/
for each customer
fields(customer.custnum
customer.name)
no-lock
where not customer.name begins "J"
by customer.name:
display
customer.custnum
customer.name.
end.
Esse programa retornou...
Programa dica235b
O contrário de verdadeiro é...
/*
File : dica235b.p
Author(s) : Jaison Antoniazzi
*/
define variable falso as logical no-undo.
message not falso
view-as alert-box.
Resultou em...
yes
Gostou? Essa dica foi curtinha, mas gostei de compartilhar, pois durante muito tempo eu não soube como fazer o not do begins.
Essa foi a dica 235. Até a próxima e forte abraço.
Créditos da imagem para Freepik.