Preencher gets de forma condicional

[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.....

[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.

[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