Bloquear campo

[marbio]

Ola,

E o seguinte tenho bloquear o campo data quando colocar PG, se tiver em branco passa


Ex:

JAN: PG data -> ai num passa aqui
Fev: data
Mar: data
Abr: Data



Fonte +/-


@10,03 say 'JAN:' get xjan pict '@!' valid pago(xjan)
@10,11 say 'Dat:' get xjand valid xjan='PG' .and. xjand<>ctod("")
@11,03 say 'FEV:' get xfev pict '@!' valid pago(xfev)
@11,11 say 'Dat:' get xjand
@12,03 say 'MAR:' get xmar pict '@!' valid pago(xmar)
@12,11 say 'Dat:' get xjand
@13,03 say 'ABR:' get xabr pict '@!' valid pago(xabr)
@13,11 say 'Dat:' get xjand

fico no aguardo com a ajuda dos amigos

desde ja agradeço.

[Trazom]

Nao entendi direito

mas é assim

pra bloquear a entrada do foco no get use a clausula when assim:

@10,10 get x
@12,10 get y when x=´PG´ (ou so se estiver branco)

explique melhor por favor,