× Linguagem de Programação ADVPL

Perguntas Validar campo a ser digitado

Mais
11 anos 8 meses atrás #11671 por vcardoso
Respondido por vcardoso no tópico Validar campo a ser digitado
Consegui pessoal. Valeu!

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 8 meses atrás #11672 por kanaamlrr
Respondido por kanaamlrr no tópico Validar campo a ser digitado
Se puder posta ai pra galera como ficou.
Valeu!

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 8 meses atrás #11676 por vcardoso
Respondido por vcardoso no tópico Validar campo a ser digitado
Claro. Segue a tela:


DEFINE MSDIALOG oDlg TITLE "Informe os Parametros" FROM 000,000 TO 400,600 PIXEL
@ 010, 010 SAY "Informe o Codigo do Cliente" SIZE 120, 20 OF oDlg PIXEL
@ 025, 010 SAY "Informe o Codigo da Loja" SIZE 120, 20 OF oDlg PIXEL
@ 040, 010 SAY "Informe a Condicao de Pagamento" SIZE 120, 20 OF oDlg PIXEL
@ 010, 120 MSGET cCliente SIZE 55, 11 VALID ExistCpo("SA1",cCliente) F3 "SA1" PICTURE "@R 999999" OF oDlg PIXEL
@ 025, 120 MSGET cLoja SIZE 55, 11 Valid ExistCpo("SA1",cCliente+cLoja) PICTURE "@R 99" OF oDlg PIXEL
@ 040, 120 MSGET cCondPag SIZE 55, 11 Valid ExistCpo("SC5", cCondPag) F3 "SE4" PICTURE "@R 99" OF oDlg PIXEL
DEFINE SBUTTON FROM 120, 160 TYPE 1 ACTION (nOpca := 1, oDlg:End()) ENABLE OF oDlg
DEFINE SBUTTON FROM 120, 220 TYPE 2 ACTION (nOpca := 2, oDlg:End()) ENABLE OF oDlg
ACTIVATE MSDIALOG oDlg CENTERED

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.102 segundos
Joomla templates by a4joomla