Imprimi Página | Fechar janela

Bloqueio

Impresso de: Helpfacil - Portal do conhecimento
Nome do Forum: ADVPL
Descrição do Forum: Dúvidas sobre a programação em ADVPL
URL:http://www.helpfacil.com.br/display_topic_threads.asp?ForumID=1&TopicID=44446
Data da Impressão: quinta-feira, 23 de janeiro de 2025 at 10:56


Topico: Bloqueio

Postado por: WANDERSONW
Assunto: Bloqueio
Data Postagem: domingo, 18 de fevereiro de 2024 at 09:42

Bom dia Pessoal,

Fiz um rotina para validar se o código de barras digitado já existe na base de dados, isso ele esta fazendo corretamente, agora preciso que quando ele encontrar o código de barras ele não deixe o usuário seguir com o cadastro e o foco deve manter no campo onde esta sendo feito a validação.

Abaixo segue o fonte caso alguém possa me ajudar a concluir este fonte.

User Function IMCAD002()

     Local aAreaSB1 :=GetArea()
     Local lRet      := .T.
     Local cCpoBarra :=‘‘

     cQuery:= "SELECT B1_CODBAR "
     cQuery+= " FROM "
     cQuery+=RetSqlName(‘SB1‘) + " SB1 WITH(NOLOCK)"
     cQuery+= " WHERE SB1.D_E_L_E_T_ =‘‘ "
     cQuery+= "   AND SB1.B1_FILIAL =‘" + FWxFilial(‘SB1‘) +"‘"
     cQuery+= "   AND SB1.B1_CODBAR =‘" + ALLTRIM(M->B1_CODBAR) +"‘"
     TCQuery cQuery New Alias "TMPSB1"

     cCpoBarra:=TMPSB1->B1_CODBAR

     If !Empty(cCpoBarra)
          FwAlertWarning(‘Atenção..‘ + CRLF + CRLF +;
               ‘ Este codigo de barra já existe, favor verifiar!!!‘,‘Codigo de Barra‘)
          lRet:=.F.
          SB1->B1_CODBAR:=Space(13)
     EndIf

     RestArea(aAreaSB1)
Return(lRet)



Respostas:

Postado Por: LCA.LEO
Data Postagem: domingo, 18 de fevereiro de 2024 at 12:16

Bom dia,

Vc pode usar a user Item, que é o PE da própria rotina de produto, esse PE é em MVC. Nela vc consegue validar:
- A abertura da tela da rotina;
- A digitação do campo;
- A gravação dos dados, antes ou depois do commit;
- O cancelamento, entre outros


Lè0



Postado Por: LCA.LEO
Data Postagem: domingo, 18 de fevereiro de 2024 at 12:16

Bom dia,

Vc pode usar a user Item, que é o PE da própria rotina de produto, esse PE é em MVC. Nela vc consegue validar:
- A abertura da tela da rotina;
- A digitação do campo;
- A gravação dos dados, antes ou depois do commit;
- O cancelamento, entre outros


Lè0



Postado Por: EMERSON.EN
Data Postagem: domingo, 18 de fevereiro de 2024 at 15:07

chame esta função na validação do usuário do campo.

também verifique se o código de barras pertence a outro código de produto.
se pertencer ao mesmo produto você precisa deixar gravar.






Imprimir Página | Fechar Janela