Página 1 de 1

Preencher gets de forma condicional

Enviado: 16 Ago 2005 23:40
por Manoel
Noite pessoal !!!!
Ando meio sumido né !!!!
Gostaria de saber se tem como, a partir de preenchimento de um get eu habilitar ou desabilitar os próximos de acordo com o conteudo colocado nele.
Vamos explicar: tenho um get que será preenchido com uma determinada resposta (sim ou Não) e em função desta resposta, os demais gets poderão ser ou não preenchidos.
Atenciosamente.


Manoel Messias da Fonseca
PS: Estou precisando de um programa para emissão de notas de serviço e respectivos boletos, quem tiver.....

Enviado: 17 Ago 2005 03:29
por Stanis Luksys
Olá,

Muito simples, basta usar a cláusula WHEN do comando GET, por exemplo numa clínica a pessoa só faz exame de papanicolau se for mulher, e espermograma só se for homem:

Código: Selecionar todos

@ 0, 0 say "SEXO:" get cSexo pict "@!" valid $ "MF"
@ 2, 0 say "EXAME PAPA NICOLAU OK (S/N):" get cPapa pict "@!" valid $ "SN" WHEN cSexo = "F" 
@ 4, 0 say "ESPERMOGRAMA OK (S/N):" get cEsp pict "@!" valid $ "SN" WHEN cSexo = "M"
Qualquer expressão válida pelo Clipper pode ser utilizada na cláusula WHEN, inclusive um CODE BLOCK ou uma UDF.

Espero ter colaborado.

Muito obrigado

Enviado: 17 Ago 2005 21:45
por Manoel
Muito obrigado mesmo.
Sabe como é né. Eu que sou programador de fim-de-semana só tenho feito o "arroz com feijão" e esqueci destas cláusulas.
Muito bom mesmo.
Atenciosamente.


Manoel Messias da Fonseca